Mix/Src/menu.c

/* Mixmaster version 3  --  (C) 1999 Anonymizer Inc.

   Mixmaster may be redistributed and modified under certain conditions.
   This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF
   ANY KIND, either express or implied. See the file COPYRIGHT for
   details.

   Menu-based user interface
   $Id: menu.c,v 1.2 2002/08/22 04:01:16 weaselp Exp $ */


#include "menu.h"
#include "mix3.h"
#include <string.h>
#include <ctype.h>
#include <stdlib.h>
#include <fcntl.h>
#ifdef POSIX
#include <unistd.h>
#else
#include <io.h>
#endif
#include <assert.h>

void menu_folder(char command, char *foldername)
{
  mix_init(NULL);
  if (foldername)
    menu_init();
  read_folder(command, foldername, ANON);
  menu_exit();
}

void read_folder(char command, char *foldername, char *nym)
{
  char path[PATHMAX] = "stdin", path_with_tilde[PATHMAX], l[LINELEN];
  char *h;
  FILE *f;
  BUFFER *folder;
  BUFFER *line, *field, *content, *name;
  BUFFER *index;
  BUFFER *mail, *log;
  int mailfolder = -1;  /* -1 = unknown, 0 = no mailfolder, 1 = mailfolder */
  int num = 0;
  long from = -1, subject = -1;
  int folder_has_changed;
  BUFFER *deleted_message;
  BUFFER *new_folder;
  BUFFER *new_index;
  long length;

#ifdef USE_NCURSES
  char sub[LINELEN], str[LINELEN], search[LINELEN] = "";
  long p;
  int display, range, selected, i, redraw, c, q;

#endif
  int ispgp = 0, eof = 0;
  folder_has_changed = 0;

  line = buf_new();
  field = buf_new();
  content = buf_new();
  index = buf_new();
  mail = buf_new();
  name = buf_new();
  folder = buf_new();
  log = buf_new();

  if (foldername == NULL)
    f = stdin;
  else {
    if (foldername[0] == '~' && (h = getenv("HOME")) != NULL) {
      strncpy(path, h, PATHMAX);
      strcatn(path, foldername + 1, PATHMAX);
    } else
      strncpy(path, foldername, PATHMAX);
    f = fopen(path, "r");
  }
  if (f == NULL) {
#ifdef USE_NCURSES
    if (foldername)
      beep();
#endif
    mix_status("Can't read %s.", path);
    goto end;
  }
  for (;;) {
    if (fgets(l, sizeof(l), f) == NULL)
      eof = 1;
    else if (mailfolder == -1) {
      if (strleft(l, "From "))
        mailfolder = 1;
      if (strileft(l, "from:") || strileft(l, "path:")
          || strileft(l, "xref:"))
        mailfolder = 0;
    }
    if (eof || (mailfolder && strleft(l, "From ")) ||
        (mailfolder == 0 && from != -1 &&
         (strileft(l, "path:") ||
          strileft(l, "xref:")))) {
      if (num > 1)
        mix_status("Reading message %d", num);
#ifdef USE_PGP
      if (ispgp)
        switch (nym_decrypt(mail, NULL, log)) {
        case 2:
          from = -1, subject = -1;
          while (buf_getline(mail, line) == 0) {
            if (bufileft(line, "from:"))
              from = folder->length + mail->ptr - line->length - 1;
            if (bufileft(line, "subject:"))
              subject = folder->length + mail->ptr - line->length - 1;
          }
          folder_has_changed = 1;
          break;
        case -1:
          buf_clear(mail);
          from = -1, subject = -1;
          continue;
        default:
          ;
        }
#endif
      buf_cat(folder, mail);
      buf_clear(mail);
      ispgp = 0;
      if (num > 0) {
        buf_appendl(index, from);
        buf_appendl(index, subject);
      }
      if (eof)
        break;

      buf_appendl(index, folder->length);
      from = subject = -1;
      num++;
    }
    if (from == -1 && strileft(l, "from:"))
      from = folder->length + mail->length;

    if (subject == -1 && strileft(l, "subject:"))
      subject = folder->length + mail->length;

    buf_appends(mail, l);
    if (strleft(l, begin_pgp))
      ispgp = 1;
  }

  if (foldername)
    fclose(f);
  else {
    dup2(open("/dev/tty", O_RDWR), fileno(stdin));
    menu_init();
  }

  mix_status("");
  if (folder->length == 0) {
#ifdef USE_NCURSES
    clear();
    beep();
#endif
    mix_status("%s is empty.", path);
    goto end;
  }
  if (mailfolder == -1) {
#ifdef USE_NCURSES
    clear();
    beep();
#endif
    mix_status("%s is not a mail folder.", path);
    goto end;
  }
#ifndef USE_NCURSES
  if (command == 0) {
    buf_write(folder, stdout);
    goto end;
  }
  if (num > 1) {
    mix_status("Folder contains several messages.");
    goto end;
  }
#endif

  if (num < 2) {
    folder->ptr = 0;
    mimedecode(folder);

    if (command != 0)
      send_message(command, nym, folder);
#ifdef USE_NCURSES
    else
      read_message(folder, nym);

    clear();
#endif
    goto end;
  }
#ifdef USE_NCURSES
  display = selected = 0;
  range = LINES - 3;
  redraw = 2;

  for (;;) {
    if (selected < 0)
      selected = 0;
    if (selected >= num)
      selected = num - 1;

    if (selected < display) {
      display = selected - range / 2;
      redraw = 2;
    }
    if (selected >= display + range) {
      display = selected - range / 2;
      redraw = 2;
    }
    if (display >= num - 5)
      display = num - 5;
    if (display < 0)
      display = 0;

    if (redraw) {
      if (redraw == 2) {
        clear();
        standout();
        mvprintw(0, 0, "Mixmaster %s", VERSION);
        printw("   %.20s reading %.50s", nym, path);
        standend();
      }
      for (i = display; i < display + range; i++) {
        if (i < num) {
          index->ptr = 12 * i;
          p = buf_getl(index);
          buf_clear(name);
          folder->ptr = buf_getl(index);
          if (folder->ptr < 0)
            folder->ptr = 0;
          else {
            buf_getheader(folder, field, line);
            if (line->length) {
              decode_header(line);
              rfc822_name(line, name);
            }
          }
          if (i == selected)
            standout();

          mvaddnstr(i - display + 2, 0, name->data, 18);

          sub[0] = '\0';
          folder->ptr = buf_getl(index);
          if (folder->ptr < 0)
            folder->ptr = 0;
          else {
            buf_getheader(folder, field, content);
            if (content->length) {
              decode_header(content);
              strncpy(sub, content->data, sizeof(sub));
            }
          }
          if (sub[0] == '\0')
            strcpy(sub, "(no subject)");
          mvaddnstr(i - display + 2, 20, sub, COLS - 21);

          if (i == selected)
            standend();
        }
      }
    }
    move(LINES - 1, COLS - 1);
    refresh();
    redraw = 0;

    c = getch();
    switch (c) {
    case '\014':
      display = selected - range / 2;
      redraw = 2;
      break;
    case 'q':
      clear();
      goto end;
    case '/':
      echo();
      cl(LINES - 1, 0);
      printw("Search: ");
      refresh();
      wgetnstr(stdscr, str, LINELEN);
      if (str[0] != '\0')
        strncpy(search, str, LINELEN);
      noecho();
      for (i = (selected < num ? selected + 1 : 0); i < num; i++) {
        index->ptr = 12 * i + 4;
        folder->ptr = buf_getl(index);
        if (folder->ptr < 0)
          folder->ptr = 0;
        else {
          buf_getheader(folder, field, line);
          if (line->length) {
            decode_header(line);
            if (bufifind(line, search))
              break;
          }
        }
        folder->ptr = buf_getl(index);
        if (folder->ptr < 0)
          folder->ptr = 0;
        else {
          buf_getheader(folder, field, line);
          if (line->length) {
            decode_header(line);
            if (bufifind(line, search))
              break;
          }
        }
      }
      if (i < num)
        selected = i;
      else
        beep();
      redraw = 1;
      break;
    case '\r':                  /* read message */
    case '\n':
    case 'r':                   /* reply to message */
    case 'g':
    case 'f':
    case 'm':
    case 'p':
    case 's':
      index->ptr = 12 * selected;
      p = buf_getl(index);
      if (selected < num - 1) {
        index->ptr = 12 * (selected + 1);
        q = buf_getl(index) - p;
      } else
        q = folder->length - p;
      buf_clear(mail);
      buf_append(mail, folder->data + p, q);
      mimedecode(mail);
      if(c == 's')
        savemsg(mail);
      else{
        if (c == '\r' || c == '\n')
          read_message(mail, nym);
        else
          send_message(c, nym, mail);
      }
      redraw = 2;
      break;
    case 'd':                   /* delete message */
      /* Remove message from folder */
      if(num > 0){
        index->ptr = 12 * selected;
        p = buf_getl(index);
        if (selected < num - 1) {
          index->ptr = 12 * (selected + 1);
          q = buf_getl(index) - p;
        } else
          q = folder->length - p;
        deleted_message = buf_new();
        new_folder = buf_new();
        buf_cut_out(folder, deleted_message, new_folder, p, q);
        buf_free(deleted_message);
        buf_free(folder);
        folder = new_folder;
        /* Update index file */
        new_index = buf_new();
        index->ptr = 0;
        if(selected > 0)
          buf_get(index, new_index, 12 * selected);
        index->ptr = 12 * (selected + 1);
        while((from = buf_getl(index)) != -1){
          subject = buf_getl(index);
          length = buf_getl(index);
          buf_appendl(new_index, from - q);
          buf_appendl(new_index, subject - q);
          buf_appendl(new_index, length - q);
        }
        buf_free(index);
        index = new_index;
        /* Done */
        num--;
        folder_has_changed = 1;
      }
      redraw = 2;
      break;
    case KEY_UP:
      selected--;
      redraw = 1;
      break;
    case KEY_DOWN:
    case 'n':                   /* nym ???? */
      selected++;
      redraw = 1;
      break;
    case KEY_PPAGE:
      selected -= range;
      redraw = 1;
      break;
    case KEY_NPAGE:
      selected += range;
      redraw = 1;
      break;
    default:
      beep();
    }
  }
#endif

end:
#ifdef USE_NCURSES
  /* If folder has changed, ask user about saving new folder. */
  if (folder_has_changed && !streq(path, "stdin")) {
    mvprintw(LINES - 2, 0, "Buffer has changed. Save [y/n]? ");
    c = getch();
    cl(LINES - 2, 0);
    if ((c == 'y') || (c == 'Y')){
      strncpy(path_with_tilde, path, PATHMAX-1);
      strcat(path_with_tilde, "~");
      rename(path, path_with_tilde); /* Rename folder to folder~ */
      f = fopen(path, "w"); /* Write new folder */
      if (f == NULL)
        mix_status("Can't write to %s.", path);
      else{
        buf_write(folder, f);
        mix_status("Wrote %s.", path);
        fclose(f);
      }
    }
    else{
      mix_status("%s was not saved.", path);
    }
  }
#endif
  buf_free(folder);
  buf_free(line);
  buf_free(field);
  buf_free(content);
  buf_free(index);
  buf_free(mail);
  buf_free(name);
  buf_free(log);
}

#ifdef USE_NCURSES
static int sortrel(const void *a, const void *b)
{
  int na, ra, nb, rb;

  na = *(int *) a;
  nb = *(int *) b;

  ra = *((int *) a + 1);
  rb = *((int *) b + 1);
  return rb - ra;
}

void menu_main(void)
{
  int y, x;
  int pool, n;
  int c;
  BUFFER *chainlist, *line;
  char nym[LINELEN] = ANON;

  chainlist = buf_new();
  line = buf_new();

  mix_init(NULL);
  menu_init();

menu_redraw:
  clear();
  for (;;) {
    standout();
    mvprintw(0, 0, "Mixmaster %s", VERSION);
    mvprintw(0, COLS - sizeof(COPYRIGHT), COPYRIGHT);
    standend();
    mix_status(NULL);

    mvprintw(8, 4, "n)ym: %s", nym);
    y = 12, x = 25;
    mvprintw(y++, x, "m)ail");
    mvprintw(y++, x, "p)ost to Usenet");
    mvprintw(y++, x, "r)ead mail");
    mvprintw(y++, x, "d)ummy message");
    mvprintw(y++, x, "s)end messages from pool");
    mvprintw(y++, x, "q)uit");

    pool = pool_read(NULL);
    if (pool == 1)
      mvprintw(4, 2, "%3d outgoing message in the pool. \n", pool);
    else
      mvprintw(4, 2, "%3d outgoing messages in the pool.\n", pool);

    move(LINES - 1, COLS - 1);
    refresh();
    c = getch();
    if (c != ERR) {
      mix_status("");
      switch (c) {
      case '\014':
        mix_status("");
        goto menu_redraw;
      case 'n':
        menu_nym(nym);
        goto menu_redraw;
      case 'm':
      case 'p':
        send_message(c, nym, NULL);
        break;
      case 'd':
        mix_status("Creating message...");
        if (mix_encrypt(MSG_NULL, NULL, NULL, 1, chainlist) != 0) {
          if (chainlist->length > 0)
            mix_status("%s", chainlist->data);
          else
            mix_genericerror();
          beep();
        } else {
          for (n = 0; buf_getline(chainlist, line) == 0; n++) ;
          if (n > 1)
            mix_status("Done (%d packets).", n);
          else
            mix_status("Chain: %s", chainlist->data);
        }
        break;
      case 's':
        mix_status("Mailing messages...");
        mix_send();
        mix_status("Done.");
        break;
      case 'r':
        {
          char name[LINELEN];

          cl(LINES - 3, 0);
          if (getenv("MAIL"))
            printw("File name [%s]: ", getenv("MAIL"));
          else
            printw("File name: ");
          echo();
          wgetnstr(stdscr, name, LINELEN);
          noecho();
          cl(LINES - 3, 0);
          if (name[0] == '\0') {
            if (getenv("MAIL"))
              read_folder(0, getenv("MAIL"), nym);
          } else
            read_folder(0, name, nym);
        }
        break;
      case 'q':
      case 'Q':
        goto quit;
      default:
        beep();
      }
    }
  }

quit:
  menu_exit();
  buf_free(chainlist);
  buf_free(line);
}

void read_message(BUFFER *message, char *nym)
{
  int l = 0;
  int c;
  int inhdr = 1, txtbegin;
  BUFFER *field, *content, *line, *hdr;
  char sub[LINELEN] = "mail";
  char thisnym[LINELEN] = "";

  field = buf_new();
  content = buf_new();
  line = buf_new();
  hdr = buf_new();

  if (thisnym[0] == '\0')
    strncpy(thisnym, nym, LINELEN);

  if (bufleft(message, "From nymserver ")) {
    /* select nym if Nym: pseudo header is in the first line */
    buf_getline(message, line);
    buf_getheader(message, field, content);
    if (bufieq(field, "Nym"))
      strncpy(thisnym, content->data, sizeof(thisnym));
    buf_rewind(message);
  }
  while (buf_getheader(message, field, content) == 0) {
    if (bufieq(field, "received") || bufleft(field, "From "))
      continue;
    if (bufieq(field, "subject"))
      strncpy(sub, content->data, sizeof(sub));
    buf_appendheader(hdr, field, content);
  }
  if (strlen(sub) > COLS - strlen(VERSION) - strlen(thisnym) - 23)
    sub[COLS - strlen(VERSION) - strlen(thisnym) - 24] = '\0';
  txtbegin = message->ptr;

loop:
  clear();
  standout();
  mvprintw(0, 0, "Mixmaster %s", VERSION);
  printw("   %.20s reading %.50s\n", thisnym, sub);
  standend();
  mix_status(NULL);

  while (l < LINES - 2) {
    if (inhdr) {
      if (buf_getline(hdr, line) == -1)
        buf_clear(line), inhdr = 0;
    } else {
      if (buf_getline(message, line) == -1) {
        standout();
        mvprintw(LINES - 1, 0, "Command");
        standend();
        refresh();
        for (;;) {
          c = getch();
          switch (c) {
          case 'm':
          case 'p':
          case 'r':
          case 'g':
          case 'f':
            send_message(c, thisnym, message);
            goto end;
          case 'u':
            inhdr = 0;
            message->ptr = txtbegin;
            l = 0;
            goto loop;
          case 'h':
            inhdr = 1;
            hdr->ptr = 0;
            message->ptr = txtbegin;
            l = 0;
            goto loop;
          case 's':
            savemsg(message);
            /* fallthru */
          case 'q':
          case 'i':
          case '\n':
          case '\r':
            goto end;
          case '\014':
            refresh();
            continue;
          default:
            beep();
            refresh();
          }
        }
      }
    }
    mvprintw(l + 1, 0, "%s\n", line->data);
    l += (line->length - 1) / COLS + 1;
  }
  standout();
  mvprintw(LINES - 1, 0, "MORE");
  standend();
  refresh();
  for (;;) {
    c = getch();
    switch (c) {
    case 'm':
    case 'p':
    case 'r':
    case 'g':
    case 'f':
      send_message(c, thisnym, message);
      goto end;
    case 'u':
      inhdr = 0;
      message->ptr = txtbegin;
      l = 0;
      goto loop;
    case 'h':
      inhdr = 1;                /* show full header */
      hdr->ptr = 0;
      message->ptr = txtbegin;
      l = 0;
      goto loop;
    case 's':
      savemsg(message);
      /* fallthru */
    case 'q':
    case 'i':
      goto end;
    case ' ':
    case '\n':
    case '\r':
      l = 0;
      goto loop;
    case '\014':
      refresh();
      continue;
    default:
      beep();
      refresh();
    }
  }
end:
  buf_free(field);
  buf_free(content);
  buf_free(line);
  buf_free(hdr);
}

int menu_replychain(int *d, int *l, char *mdest, char *pdest, char *psub,
                    char *r)
{
  int c;
  char line[LINELEN];
  char reliability[9];

redraw:
  clear();
  standout();
  printw("Create a nym reply block:");
  standend();
  mix_status(NULL);

  mvprintw(3, 0, "Type of reply block:\n");
  if (*d == MSG_MAIL)
    standout();
  printw(" m)ail ");
  if (*d == MSG_MAIL)
    standend();

  if (*d == MSG_POST)
    standout();
  printw(" Usenet message p)ool ");
  if (*d == MSG_POST)
    standend();

  if (*d == MSG_NULL)
    standout();
  printw(" cover t)raffic ");
  if (*d == MSG_NULL)
    standend();

  if (*d != MSG_NULL)
    mvprintw(6, 0, "d)estination: %s", *d == MSG_MAIL ? mdest : pdest);
  if (psub && *d == MSG_POST)
    mvprintw(7, 0, "s)ubject: %s", psub);
  chain_reliability(r, 1, reliability); /* chaintype 1=ek */
  mvprintw(8, 0, "c)hain: %-39s (reliability: %s)", r, reliability);
  mvprintw(10, 0, "l)atency: %d hours", *l);
  move(LINES - 1, COLS - 1);

  for (;;) {
    refresh();
    c = getch();
    switch (c) {
    case 'm':
      *d = MSG_MAIL;
      goto redraw;
    case 'p':
      *d = MSG_POST;
      goto redraw;
    case 't':
      *d = MSG_NULL;
      goto redraw;
    case 'q':
      return (-1);
    case 'd':
      cl(6, 0);
      printw("d)estination: ");
      echo();
      wgetnstr(stdscr, *d == MSG_MAIL ? mdest : pdest, LINELEN);
      noecho();
      goto redraw;
    case 'l':
      cl(10, 0);
      printw("l)atency: ");
      echo();
      wgetnstr(stdscr, line, LINELEN);
      *l = strtol(line, NULL, 10);
      if (*l < 0)
        *l = 0;
      noecho();
      goto redraw;
    case 'c':
      menu_chain(r, 1, *d == MSG_POST);
      goto redraw;
    case '\014':
      goto redraw;
    case '\n':
    case '\r':
      return (0);
    case 's':
      if (*d == MSG_POST) {
        cl(7, 0);
        printw("s)ubject: ");
        echo();
        wgetnstr(stdscr, psub, LINELEN);
        noecho();
        goto redraw;
      }
    default:
      beep();
    }
  }
}

void menu_chain(char *chainstr, int chaintype, int post)
     /* chaintype 0=mix 1=ek 2=newnym */
{
  REMAILER remailer[MAXREM];
  int rlist[2 * MAXREM];
  char newchain[CHAINMAX];
  char info[LINELEN];
  int num = 0, i, middlemanlast=0, ok = 1;
  int c, x, y;
  int nymserv = 0;
  int chain[20], chainlen = 0;
  char reliability[9];

  if (chaintype == 2)
    nymserv = 1, chaintype = 1;
  assert(chaintype == 0 || chaintype == 1);

  clear();
  standout();
  if (nymserv)
    printw("Select nym server:\n\n");
  else
    printw("Select remailer chain:\n\n");
  standend();

  if (chaintype == 1)
    num = t1_rlist(remailer);
  else
    num = mix2_rlist(remailer);

  if (num < 1) {
    mix_status("Can't read remailer list.");
    beep();
    return;
  }
  for (i = 0; i < num; i++) {
    rlist[2 * i] = i + 1;
    rlist[2 * i + 1] = remailer[i + 1].info[chaintype].reliability -
      remailer[i + 1].info[chaintype].latency / 3600;
    if (remailer[i + 1].info[chaintype].history[0] == '\0')
      rlist[2 * i + 1] = -1;
    if ((nymserv && !remailer[i + 1].flags.newnym) ||
        ((chaintype == 0 && !remailer[i + 1].flags.mix) ||
         (chaintype == 1 && !nymserv && (!remailer[i + 1].flags.ek
                                         || !remailer[i + 1].flags.pgp))))
      rlist[2 * i] = 0, rlist[2 * i + 1] = -2;
  }
  qsort(rlist, num - 1, 2 * sizeof(int), sortrel);

  for (i = 0; i < num; i++)
    if (rlist[2 * i + 1] == -2) {
      num = i;
      break;
    }
  if (num < 1) {
    mix_status("No remailers found!");
    return;
  }
  if (num > 2 * (LINES - 6))
    num = 2 * (LINES - 6);
  if (num > 2 * 26)
    num = 2 * 26;

  for (i = 0; i < num && rlist[2 * i + 1] > -2; i++) {
    y = i, x = 0;
    if (y >= LINES - 6)
      y -= LINES - 6, x += 40;
    mvprintw(y + 2, x, "%c", i < 26 ? i + 'a' : i - 26 + 'A');
    mvprintw(y + 2, x + 2, "%s", remailer[rlist[2 * i]].name);
    mvprintw(y + 2, x + 16, "%s",
             remailer[rlist[2 * i]].info[chaintype].history);
    sprintf(info, "%3.2f",
            remailer[rlist[2 * i]].info[chaintype].reliability / 100.0);
    mvprintw(y + 2, x + 29 + 6 - strlen(info), "%s%%", info);
  }
  y = num + 3;
  if (y > LINES - 4)
    y = LINES - 4;
  mvprintw(y, 0, "*  select at random");

  for (;;) {
    newchain[0] = '\0';
    for (i = 0; i < chainlen; i++) {
      if (i)
        strcatn(newchain, ",", CHAINMAX);
      if (chain[i])
        strcatn(newchain, remailer[chain[i]].name, CHAINMAX);
      else
        strcatn(newchain, "*", CHAINMAX);
    }
    if (chainlen > 0) {
      ok = 1;
      middlemanlast = remailer[chain[chainlen - 1]].flags.middle;
      if (post && !remailer[chain[chainlen - 1]].flags.post)
        ok = 0;
    } else
      ok = 1;

    mvprintw(LINES - 4, 40,
      middlemanlast ? 
        "MIDDLEMAN   " :
        (ok ?
          "            " : 
          "NO POSTING  "));
    cl(LINES - 3, 0);
    cl(LINES - 2, 0);
    cl(LINES - 1, 0);
    if(!nymserv){
      chain_reliability(newchain, chaintype, reliability);
      mvprintw(LINES - 4, 58, "(reliability: %s)", reliability);
    }
    mvprintw(LINES - 3, 0, nymserv ? "Nym server: %s" : "Chain: %s",
             newchain);
    refresh();
    c = getch();
    if (c == '\n' || c == '\r') {
      if (ok || middlemanlast)
        break;
      else
        beep();
    } else if (c == '*') {
      if (chainlen > 19 || (nymserv && chainlen > 0))
        beep();
      else
        chain[chainlen++] = 0;
    } else if ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z')) {
      if (c >= 'a')
        c -= 'a';
      else
        c = c - 'A' + 26;

      if (chainlen > 19 || (nymserv && chainlen > 0) || c >= num)
        beep();
      else
        chain[chainlen++] = rlist[2 * c];
    } else if (c == killchar())
      chainlen = 0;
    else if ((c == KEY_BACKSPACE || c == KEY_LEFT || c == erasechar())
             && chainlen > 0)
      --chainlen;
    else
      beep();
  }
  if (chainlen)
    strncpy(chainstr, newchain, CHAINMAX);
}

#endif
1	rabbi	1	/* Mixmaster version 3 -- (C) 1999 Anonymizer Inc.
2
3			Mixmaster may be redistributed and modified under certain conditions.
4			This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF
5			ANY KIND, either express or implied. See the file COPYRIGHT for
6			details.
7
8			Menu-based user interface
9	weaselp	165	$Id: menu.c,v 1.2 2002/08/22 04:01:16 weaselp Exp $ */
10	rabbi	1
11
12			#include "menu.h"
13			#include "mix3.h"
14			#include <string.h>
15			#include <ctype.h>
16			#include <stdlib.h>
17			#include <fcntl.h>
18			#ifdef POSIX
19			#include <unistd.h>
20			#else
21			#include <io.h>
22			#endif
23			#include <assert.h>
24
25			void menu_folder(char command, char *foldername)
26			{
27			mix_init(NULL);
28			if (foldername)
29			menu_init();
30			read_folder(command, foldername, ANON);
31			menu_exit();
32			}
33
34			void read_folder(char command, char foldername, char nym)
35			{
36			char path[PATHMAX] = "stdin", path_with_tilde[PATHMAX], l[LINELEN];
37			char *h;
38			FILE *f;
39			BUFFER *folder;
40			BUFFER line, field, content, name;
41			BUFFER *index;
42			BUFFER mail, log;
43			int mailfolder = -1; /* -1 = unknown, 0 = no mailfolder, 1 = mailfolder */
44			int num = 0;
45			long from = -1, subject = -1;
46			int folder_has_changed;
47			BUFFER *deleted_message;
48			BUFFER *new_folder;
49			BUFFER *new_index;
50			long length;
51
52			#ifdef USE_NCURSES
53			char sub[LINELEN], str[LINELEN], search[LINELEN] = "";
54			long p;
55			int display, range, selected, i, redraw, c, q;
56
57			#endif
58			int ispgp = 0, eof = 0;
59			folder_has_changed = 0;
60
61			line = buf_new();
62			field = buf_new();
63			content = buf_new();
64			index = buf_new();
65			mail = buf_new();
66			name = buf_new();
67			folder = buf_new();
68			log = buf_new();
69
70			if (foldername == NULL)
71			f = stdin;
72			else {
73			if (foldername[0] == '~' && (h = getenv("HOME")) != NULL) {
74			strncpy(path, h, PATHMAX);
75			strcatn(path, foldername + 1, PATHMAX);
76			} else
77			strncpy(path, foldername, PATHMAX);
78			f = fopen(path, "r");
79			}
80			if (f == NULL) {
81			#ifdef USE_NCURSES
82			if (foldername)
83			beep();
84			#endif
85			mix_status("Can't read %s.", path);
86			goto end;
87			}
88			for (;;) {
89			if (fgets(l, sizeof(l), f) == NULL)
90			eof = 1;
91			else if (mailfolder == -1) {
92			if (strleft(l, "From "))
93			mailfolder = 1;
94			if (strileft(l, "from:") \|\| strileft(l, "path:")
95			\|\| strileft(l, "xref:"))
96			mailfolder = 0;
97			}
98			if (eof \|\| (mailfolder && strleft(l, "From ")) \|\|
99			(mailfolder == 0 && from != -1 &&
100			(strileft(l, "path:") \|\|
101			strileft(l, "xref:")))) {
102			if (num > 1)
103			mix_status("Reading message %d", num);
104			#ifdef USE_PGP
105			if (ispgp)
106			switch (nym_decrypt(mail, NULL, log)) {
107			case 2:
108			from = -1, subject = -1;
109			while (buf_getline(mail, line) == 0) {
110			if (bufileft(line, "from:"))
111			from = folder->length + mail->ptr - line->length - 1;
112			if (bufileft(line, "subject:"))
113			subject = folder->length + mail->ptr - line->length - 1;
114			}
115			folder_has_changed = 1;
116			break;
117			case -1:
118			buf_clear(mail);
119			from = -1, subject = -1;
120			continue;
121			default:
122			;
123			}
124			#endif
125			buf_cat(folder, mail);
126			buf_clear(mail);
127			ispgp = 0;
128			if (num > 0) {
129			buf_appendl(index, from);
130			buf_appendl(index, subject);
131			}
132			if (eof)
133			break;
134
135			buf_appendl(index, folder->length);
136			from = subject = -1;
137			num++;
138			}
139			if (from == -1 && strileft(l, "from:"))
140			from = folder->length + mail->length;
141
142			if (subject == -1 && strileft(l, "subject:"))
143			subject = folder->length + mail->length;
144
145			buf_appends(mail, l);
146			if (strleft(l, begin_pgp))
147			ispgp = 1;
148			}
149
150			if (foldername)
151			fclose(f);
152			else {
153			dup2(open("/dev/tty", O_RDWR), fileno(stdin));
154			menu_init();
155			}
156
157			mix_status("");
158			if (folder->length == 0) {
159			#ifdef USE_NCURSES
160			clear();
161			beep();
162			#endif
163			mix_status("%s is empty.", path);
164			goto end;
165			}
166			if (mailfolder == -1) {
167			#ifdef USE_NCURSES
168			clear();
169			beep();
170			#endif
171			mix_status("%s is not a mail folder.", path);
172			goto end;
173			}
174			#ifndef USE_NCURSES
175			if (command == 0) {
176			buf_write(folder, stdout);
177			goto end;
178			}
179			if (num > 1) {
180			mix_status("Folder contains several messages.");
181			goto end;
182			}
183			#endif
184
185			if (num < 2) {
186			folder->ptr = 0;
187			mimedecode(folder);
188
189			if (command != 0)
190			send_message(command, nym, folder);
191			#ifdef USE_NCURSES
192			else
193			read_message(folder, nym);
194
195			clear();
196			#endif
197			goto end;
198			}
199			#ifdef USE_NCURSES
200			display = selected = 0;
201			range = LINES - 3;
202			redraw = 2;
203
204			for (;;) {
205			if (selected < 0)
206			selected = 0;
207			if (selected >= num)
208			selected = num - 1;
209
210			if (selected < display) {
211			display = selected - range / 2;
212			redraw = 2;
213			}
214			if (selected >= display + range) {
215			display = selected - range / 2;
216			redraw = 2;
217			}
218			if (display >= num - 5)
219			display = num - 5;
220			if (display < 0)
221			display = 0;
222
223			if (redraw) {
224			if (redraw == 2) {
225			clear();
226			standout();
227			mvprintw(0, 0, "Mixmaster %s", VERSION);
228			printw(" %.20s reading %.50s", nym, path);
229			standend();
230			}
231			for (i = display; i < display + range; i++) {
232			if (i < num) {
233			index->ptr = 12 * i;
234			p = buf_getl(index);
235			buf_clear(name);
236			folder->ptr = buf_getl(index);
237			if (folder->ptr < 0)
238			folder->ptr = 0;
239			else {
240			buf_getheader(folder, field, line);
241			if (line->length) {
242			decode_header(line);
243			rfc822_name(line, name);
244			}
245			}
246			if (i == selected)
247			standout();
248
249			mvaddnstr(i - display + 2, 0, name->data, 18);
250
251			sub[0] = '\0';
252			folder->ptr = buf_getl(index);
253			if (folder->ptr < 0)
254			folder->ptr = 0;
255			else {
256			buf_getheader(folder, field, content);
257			if (content->length) {
258			decode_header(content);
259			strncpy(sub, content->data, sizeof(sub));
260			}
261			}
262			if (sub[0] == '\0')
263			strcpy(sub, "(no subject)");
264			mvaddnstr(i - display + 2, 20, sub, COLS - 21);
265
266			if (i == selected)
267			standend();
268			}
269			}
270			}
271			move(LINES - 1, COLS - 1);
272			refresh();
273			redraw = 0;
274
275			c = getch();
276			switch (c) {
277			case '\014':
278			display = selected - range / 2;
279			redraw = 2;
280			break;
281			case 'q':
282			clear();
283			goto end;
284			case '/':
285			echo();
286			cl(LINES - 1, 0);
287			printw("Search: ");
288			refresh();
289			wgetnstr(stdscr, str, LINELEN);
290			if (str[0] != '\0')
291			strncpy(search, str, LINELEN);
292			noecho();
293			for (i = (selected < num ? selected + 1 : 0); i < num; i++) {
294			index->ptr = 12 * i + 4;
295			folder->ptr = buf_getl(index);
296			if (folder->ptr < 0)
297			folder->ptr = 0;
298			else {
299			buf_getheader(folder, field, line);
300			if (line->length) {
301			decode_header(line);
302			if (bufifind(line, search))
303			break;
304			}
305			}
306			folder->ptr = buf_getl(index);
307			if (folder->ptr < 0)
308			folder->ptr = 0;
309			else {
310			buf_getheader(folder, field, line);
311			if (line->length) {
312			decode_header(line);
313			if (bufifind(line, search))
314			break;
315			}
316			}
317			}
318			if (i < num)
319			selected = i;
320			else
321			beep();
322			redraw = 1;
323			break;
324			case '\r': /* read message */
325			case '\n':
326			case 'r': /* reply to message */
327			case 'g':
328			case 'f':
329			case 'm':
330			case 'p':
331			case 's':
332			index->ptr = 12 * selected;
333			p = buf_getl(index);
334			if (selected < num - 1) {
335			index->ptr = 12 * (selected + 1);
336			q = buf_getl(index) - p;
337			} else
338			q = folder->length - p;
339			buf_clear(mail);
340			buf_append(mail, folder->data + p, q);
341			mimedecode(mail);
342			if(c == 's')
343			savemsg(mail);
344			else{
345			if (c == '\r' \|\| c == '\n')
346			read_message(mail, nym);
347			else
348			send_message(c, nym, mail);
349			}
350			redraw = 2;
351			break;
352			case 'd': /* delete message */
353			/* Remove message from folder */
354			if(num > 0){
355			index->ptr = 12 * selected;
356			p = buf_getl(index);
357			if (selected < num - 1) {
358			index->ptr = 12 * (selected + 1);
359			q = buf_getl(index) - p;
360			} else
361			q = folder->length - p;
362			deleted_message = buf_new();
363			new_folder = buf_new();
364			buf_cut_out(folder, deleted_message, new_folder, p, q);
365			buf_free(deleted_message);
366			buf_free(folder);
367			folder = new_folder;
368			/* Update index file */
369			new_index = buf_new();
370			index->ptr = 0;
371			if(selected > 0)
372			buf_get(index, new_index, 12 * selected);
373			index->ptr = 12 * (selected + 1);
374			while((from = buf_getl(index)) != -1){
375			subject = buf_getl(index);
376			length = buf_getl(index);
377			buf_appendl(new_index, from - q);
378			buf_appendl(new_index, subject - q);
379			buf_appendl(new_index, length - q);
380			}
381			buf_free(index);
382			index = new_index;
383			/* Done */
384			num--;
385			folder_has_changed = 1;
386			}
387			redraw = 2;
388			break;
389			case KEY_UP:
390			selected--;
391			redraw = 1;
392			break;
393			case KEY_DOWN:
394			case 'n': /* nym ???? */
395			selected++;
396			redraw = 1;
397			break;
398			case KEY_PPAGE:
399			selected -= range;
400			redraw = 1;
401			break;
402			case KEY_NPAGE:
403			selected += range;
404			redraw = 1;
405			break;
406			default:
407			beep();
408			}
409			}
410			#endif
411
412			end:
413			#ifdef USE_NCURSES
414			/* If folder has changed, ask user about saving new folder. */
415			if (folder_has_changed && !streq(path, "stdin")) {
416			mvprintw(LINES - 2, 0, "Buffer has changed. Save [y/n]? ");
417			c = getch();
418			cl(LINES - 2, 0);
419			if ((c == 'y') \|\| (c == 'Y')){
420			strncpy(path_with_tilde, path, PATHMAX-1);
421			strcat(path_with_tilde, "~");
422			rename(path, path_with_tilde); /* Rename folder to folder~ */
423			f = fopen(path, "w"); /* Write new folder */
424			if (f == NULL)
425			mix_status("Can't write to %s.", path);
426			else{
427			buf_write(folder, f);
428			mix_status("Wrote %s.", path);
429			fclose(f);
430			}
431			}
432			else{
433			mix_status("%s was not saved.", path);
434			}
435			}
436			#endif
437			buf_free(folder);
438			buf_free(line);
439			buf_free(field);
440			buf_free(content);
441			buf_free(index);
442			buf_free(mail);
443			buf_free(name);
444			buf_free(log);
445			}
446
447			#ifdef USE_NCURSES
448			static int sortrel(const void a, const void b)
449			{
450			int na, ra, nb, rb;
451
452			na = (int ) a;
453			nb = (int ) b;
454
455			ra = ((int ) a + 1);
456			rb = ((int ) b + 1);
457			return rb - ra;
458			}
459
460			void menu_main(void)
461			{
462			int y, x;
463			int pool, n;
464			int c;
465			BUFFER chainlist, line;
466			char nym[LINELEN] = ANON;
467
468			chainlist = buf_new();
469			line = buf_new();
470
471			mix_init(NULL);
472			menu_init();
473
474			menu_redraw:
475			clear();
476			for (;;) {
477			standout();
478			mvprintw(0, 0, "Mixmaster %s", VERSION);
479			mvprintw(0, COLS - sizeof(COPYRIGHT), COPYRIGHT);
480			standend();
481			mix_status(NULL);
482
483			mvprintw(8, 4, "n)ym: %s", nym);
484			y = 12, x = 25;
485			mvprintw(y++, x, "m)ail");
486			mvprintw(y++, x, "p)ost to Usenet");
487			mvprintw(y++, x, "r)ead mail");
488			mvprintw(y++, x, "d)ummy message");
489			mvprintw(y++, x, "s)end messages from pool");
490			mvprintw(y++, x, "q)uit");
491
492			pool = pool_read(NULL);
493			if (pool == 1)
494			mvprintw(4, 2, "%3d outgoing message in the pool. \n", pool);
495			else
496			mvprintw(4, 2, "%3d outgoing messages in the pool.\n", pool);
497
498			move(LINES - 1, COLS - 1);
499			refresh();
500			c = getch();
501			if (c != ERR) {
502			mix_status("");
503			switch (c) {
504			case '\014':
505			mix_status("");
506			goto menu_redraw;
507			case 'n':
508			menu_nym(nym);
509			goto menu_redraw;
510			case 'm':
511			case 'p':
512			send_message(c, nym, NULL);
513			break;
514			case 'd':
515			mix_status("Creating message...");
516			if (mix_encrypt(MSG_NULL, NULL, NULL, 1, chainlist) != 0) {
517			if (chainlist->length > 0)
518			mix_status("%s", chainlist->data);
519			else
520			mix_genericerror();
521			beep();
522			} else {
523			for (n = 0; buf_getline(chainlist, line) == 0; n++) ;
524			if (n > 1)
525			mix_status("Done (%d packets).", n);
526			else
527			mix_status("Chain: %s", chainlist->data);
528			}
529			break;
530			case 's':
531			mix_status("Mailing messages...");
532			mix_send();
533			mix_status("Done.");
534			break;
535			case 'r':
536			{
537			char name[LINELEN];
538
539			cl(LINES - 3, 0);
540			if (getenv("MAIL"))
541			printw("File name [%s]: ", getenv("MAIL"));
542			else
543			printw("File name: ");
544			echo();
545			wgetnstr(stdscr, name, LINELEN);
546			noecho();
547			cl(LINES - 3, 0);
548			if (name[0] == '\0') {
549			if (getenv("MAIL"))
550			read_folder(0, getenv("MAIL"), nym);
551			} else
552			read_folder(0, name, nym);
553			}
554			break;
555			case 'q':
556			case 'Q':
557			goto quit;
558			default:
559			beep();
560			}
561			}
562			}
563
564			quit:
565			menu_exit();
566			buf_free(chainlist);
567			buf_free(line);
568			}
569
570			void read_message(BUFFER message, char nym)
571			{
572			int l = 0;
573			int c;
574			int inhdr = 1, txtbegin;
575			BUFFER field, content, line, hdr;
576			char sub[LINELEN] = "mail";
577			char thisnym[LINELEN] = "";
578
579			field = buf_new();
580			content = buf_new();
581			line = buf_new();
582			hdr = buf_new();
583
584			if (thisnym[0] == '\0')
585			strncpy(thisnym, nym, LINELEN);
586
587			if (bufleft(message, "From nymserver ")) {
588			/* select nym if Nym: pseudo header is in the first line */
589			buf_getline(message, line);
590			buf_getheader(message, field, content);
591			if (bufieq(field, "Nym"))
592			strncpy(thisnym, content->data, sizeof(thisnym));
593			buf_rewind(message);
594			}
595			while (buf_getheader(message, field, content) == 0) {
596			if (bufieq(field, "received") \|\| bufleft(field, "From "))
597			continue;
598			if (bufieq(field, "subject"))
599			strncpy(sub, content->data, sizeof(sub));
600			buf_appendheader(hdr, field, content);
601			}
602			if (strlen(sub) > COLS - strlen(VERSION) - strlen(thisnym) - 23)
603			sub[COLS - strlen(VERSION) - strlen(thisnym) - 24] = '\0';
604			txtbegin = message->ptr;
605
606			loop:
607			clear();
608			standout();
609			mvprintw(0, 0, "Mixmaster %s", VERSION);
610			printw(" %.20s reading %.50s\n", thisnym, sub);
611			standend();
612			mix_status(NULL);
613
614			while (l < LINES - 2) {
615			if (inhdr) {
616			if (buf_getline(hdr, line) == -1)
617			buf_clear(line), inhdr = 0;
618			} else {
619			if (buf_getline(message, line) == -1) {
620			standout();
621			mvprintw(LINES - 1, 0, "Command");
622			standend();
623			refresh();
624			for (;;) {
625			c = getch();
626			switch (c) {
627			case 'm':
628			case 'p':
629			case 'r':
630			case 'g':
631			case 'f':
632			send_message(c, thisnym, message);
633			goto end;
634			case 'u':
635			inhdr = 0;
636			message->ptr = txtbegin;
637			l = 0;
638			goto loop;
639			case 'h':
640			inhdr = 1;
641			hdr->ptr = 0;
642			message->ptr = txtbegin;
643			l = 0;
644			goto loop;
645			case 's':
646			savemsg(message);
647			/* fallthru */
648			case 'q':
649			case 'i':
650			case '\n':
651			case '\r':
652			goto end;
653			case '\014':
654			refresh();
655			continue;
656			default:
657			beep();
658			refresh();
659			}
660			}
661			}
662			}
663			mvprintw(l + 1, 0, "%s\n", line->data);
664			l += (line->length - 1) / COLS + 1;
665			}
666			standout();
667			mvprintw(LINES - 1, 0, "MORE");
668			standend();
669			refresh();
670			for (;;) {
671			c = getch();
672			switch (c) {
673			case 'm':
674			case 'p':
675			case 'r':
676			case 'g':
677			case 'f':
678			send_message(c, thisnym, message);
679			goto end;
680			case 'u':
681			inhdr = 0;
682			message->ptr = txtbegin;
683			l = 0;
684			goto loop;
685			case 'h':
686			inhdr = 1; /* show full header */
687			hdr->ptr = 0;
688			message->ptr = txtbegin;
689			l = 0;
690			goto loop;
691			case 's':
692			savemsg(message);
693			/* fallthru */
694			case 'q':
695			case 'i':
696			goto end;
697			case ' ':
698			case '\n':
699			case '\r':
700			l = 0;
701			goto loop;
702			case '\014':
703			refresh();
704			continue;
705			default:
706			beep();
707			refresh();
708			}
709			}
710			end:
711			buf_free(field);
712			buf_free(content);
713			buf_free(line);
714			buf_free(hdr);
715			}
716
717			int menu_replychain(int d, int l, char mdest, char pdest, char *psub,
718			char *r)
719			{
720			int c;
721			char line[LINELEN];
722			char reliability[9];
723
724			redraw:
725			clear();
726			standout();
727			printw("Create a nym reply block:");
728			standend();
729			mix_status(NULL);
730
731			mvprintw(3, 0, "Type of reply block:\n");
732			if (*d == MSG_MAIL)
733			standout();
734			printw(" m)ail ");
735			if (*d == MSG_MAIL)
736			standend();
737
738			if (*d == MSG_POST)
739			standout();
740			printw(" Usenet message p)ool ");
741			if (*d == MSG_POST)
742			standend();
743
744			if (*d == MSG_NULL)
745			standout();
746			printw(" cover t)raffic ");
747			if (*d == MSG_NULL)
748			standend();
749
750			if (*d != MSG_NULL)
751			mvprintw(6, 0, "d)estination: %s", *d == MSG_MAIL ? mdest : pdest);
752			if (psub && *d == MSG_POST)
753			mvprintw(7, 0, "s)ubject: %s", psub);
754			chain_reliability(r, 1, reliability); /* chaintype 1=ek */
755			mvprintw(8, 0, "c)hain: %-39s (reliability: %s)", r, reliability);
756			mvprintw(10, 0, "l)atency: %d hours", *l);
757			move(LINES - 1, COLS - 1);
758
759			for (;;) {
760			refresh();
761			c = getch();
762			switch (c) {
763			case 'm':
764			*d = MSG_MAIL;
765			goto redraw;
766			case 'p':
767			*d = MSG_POST;
768			goto redraw;
769			case 't':
770			*d = MSG_NULL;
771			goto redraw;
772			case 'q':
773			return (-1);
774			case 'd':
775			cl(6, 0);
776			printw("d)estination: ");
777			echo();
778			wgetnstr(stdscr, *d == MSG_MAIL ? mdest : pdest, LINELEN);
779			noecho();
780			goto redraw;
781			case 'l':
782			cl(10, 0);
783			printw("l)atency: ");
784			echo();
785			wgetnstr(stdscr, line, LINELEN);
786			*l = strtol(line, NULL, 10);
787			if (*l < 0)
788			*l = 0;
789			noecho();
790			goto redraw;
791			case 'c':
792			menu_chain(r, 1, *d == MSG_POST);
793			goto redraw;
794			case '\014':
795			goto redraw;
796			case '\n':
797			case '\r':
798			return (0);
799			case 's':
800			if (*d == MSG_POST) {
801			cl(7, 0);
802			printw("s)ubject: ");
803			echo();
804			wgetnstr(stdscr, psub, LINELEN);
805			noecho();
806			goto redraw;
807			}
808			default:
809			beep();
810			}
811			}
812			}
813
814			void menu_chain(char *chainstr, int chaintype, int post)
815			/* chaintype 0=mix 1=ek 2=newnym */
816			{
817			REMAILER remailer[MAXREM];
818			int rlist[2 * MAXREM];
819			char newchain[CHAINMAX];
820			char info[LINELEN];
821	weaselp	165	int num = 0, i, middlemanlast=0, ok = 1;
822	rabbi	1	int c, x, y;
823			int nymserv = 0;
824			int chain[20], chainlen = 0;
825			char reliability[9];
826
827			if (chaintype == 2)
828			nymserv = 1, chaintype = 1;
829			assert(chaintype == 0 \|\| chaintype == 1);
830
831			clear();
832			standout();
833			if (nymserv)
834			printw("Select nym server:\n\n");
835			else
836			printw("Select remailer chain:\n\n");
837			standend();
838
839			if (chaintype == 1)
840			num = t1_rlist(remailer);
841			else
842			num = mix2_rlist(remailer);
843
844			if (num < 1) {
845			mix_status("Can't read remailer list.");
846			beep();
847			return;
848			}
849			for (i = 0; i < num; i++) {
850			rlist[2 * i] = i + 1;
851			rlist[2 * i + 1] = remailer[i + 1].info[chaintype].reliability -
852			remailer[i + 1].info[chaintype].latency / 3600;
853			if (remailer[i + 1].info[chaintype].history[0] == '\0')
854			rlist[2 * i + 1] = -1;
855			if ((nymserv && !remailer[i + 1].flags.newnym) \|\|
856			((chaintype == 0 && !remailer[i + 1].flags.mix) \|\|
857			(chaintype == 1 && !nymserv && (!remailer[i + 1].flags.ek
858			\|\| !remailer[i + 1].flags.pgp))))
859			rlist[2 * i] = 0, rlist[2 * i + 1] = -2;
860			}
861			qsort(rlist, num - 1, 2 * sizeof(int), sortrel);
862
863			for (i = 0; i < num; i++)
864			if (rlist[2 * i + 1] == -2) {
865			num = i;
866			break;
867			}
868			if (num < 1) {
869			mix_status("No remailers found!");
870			return;
871			}
872			if (num > 2 * (LINES - 6))
873			num = 2 * (LINES - 6);
874			if (num > 2 * 26)
875			num = 2 * 26;
876
877			for (i = 0; i < num && rlist[2 * i + 1] > -2; i++) {
878			y = i, x = 0;
879			if (y >= LINES - 6)
880			y -= LINES - 6, x += 40;
881			mvprintw(y + 2, x, "%c", i < 26 ? i + 'a' : i - 26 + 'A');
882			mvprintw(y + 2, x + 2, "%s", remailer[rlist[2 * i]].name);
883			mvprintw(y + 2, x + 16, "%s",
884			remailer[rlist[2 * i]].info[chaintype].history);
885			sprintf(info, "%3.2f",
886			remailer[rlist[2 * i]].info[chaintype].reliability / 100.0);
887			mvprintw(y + 2, x + 29 + 6 - strlen(info), "%s%%", info);
888			}
889			y = num + 3;
890			if (y > LINES - 4)
891			y = LINES - 4;
892			mvprintw(y, 0, "* select at random");
893
894			for (;;) {
895			newchain[0] = '\0';
896			for (i = 0; i < chainlen; i++) {
897			if (i)
898			strcatn(newchain, ",", CHAINMAX);
899			if (chain[i])
900			strcatn(newchain, remailer[chain[i]].name, CHAINMAX);
901			else
902			strcatn(newchain, "*", CHAINMAX);
903			}
904			if (chainlen > 0) {
905	weaselp	165	ok = 1;
906			middlemanlast = remailer[chain[chainlen - 1]].flags.middle;
907	rabbi	1	if (post && !remailer[chain[chainlen - 1]].flags.post)
908			ok = 0;
909			} else
910			ok = 1;
911
912	weaselp	165	mvprintw(LINES - 4, 40,
913			middlemanlast ?
914			"MIDDLEMAN " :
915			(ok ?
916			" " :
917			"NO POSTING "));
918	rabbi	1	cl(LINES - 3, 0);
919			cl(LINES - 2, 0);
920			cl(LINES - 1, 0);
921			if(!nymserv){
922			chain_reliability(newchain, chaintype, reliability);
923			mvprintw(LINES - 4, 58, "(reliability: %s)", reliability);
924			}
925			mvprintw(LINES - 3, 0, nymserv ? "Nym server: %s" : "Chain: %s",
926			newchain);
927			refresh();
928			c = getch();
929			if (c == '\n' \|\| c == '\r') {
930	weaselp	165	if (ok \|\| middlemanlast)
931	rabbi	1	break;
932			else
933			beep();
934			} else if (c == '*') {
935			if (chainlen > 19 \|\| (nymserv && chainlen > 0))
936			beep();
937			else
938			chain[chainlen++] = 0;
939			} else if ((c >= 'a' && c <= 'z') \|\| (c >= 'A' && c <= 'Z')) {
940			if (c >= 'a')
941			c -= 'a';
942			else
943			c = c - 'A' + 26;
944
945			if (chainlen > 19 \|\| (nymserv && chainlen > 0) \|\| c >= num)
946			beep();
947			else
948			chain[chainlen++] = rlist[2 * c];
949			} else if (c == killchar())
950			chainlen = 0;
951			else if ((c == KEY_BACKSPACE \|\| c == KEY_LEFT \|\| c == erasechar())
952			&& chainlen > 0)
953			--chainlen;
954			else
955			beep();
956			}
957			if (chainlen)
958			strncpy(chainstr, newchain, CHAINMAX);
959			}
960
961			#endif