* Holy war on strlen: use IsEmptyStr where apropriate.
[citadel.git] / citadel / messages.c
index 1cd168ad59d9616765f0500d0c838da67684dd7c..79e03b1b4d32e931a62b89e52e988ee24fe0f787 100644 (file)
@@ -1,7 +1,7 @@
 /*
  * $Id$
  *
- * Citadel/UX message support routines
+ * Citadel message support routines
  * see copyright.txt for copyright information
  */
 
 #include <limits.h>
 #include <sys/wait.h>
 #include <sys/stat.h>
-#include <sys/time.h>
+
+#if TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# if HAVE_SYS_TIME_H
+#  include <sys/time.h>
+# else
+#  include <time.h>
+# endif
+#endif
+
+#ifdef HAVE_PTHREAD_H
+#include <pthread.h>
+#endif
+
 #include <stdarg.h>
 #include "citadel.h"
+#include "citadel_ipc.h"
+#include "citadel_decls.h"
 #include "messages.h"
 #include "commands.h"
 #include "rooms.h"
 #include "tools.h"
+#include "html.h"
 #ifndef HAVE_SNPRINTF
 #include "snprintf.h"
 #endif
+#include "screen.h"
 
 #define MAXWORDBUF SIZ
-#define MAXMSGS 512
+#define NO_REPLY_TO    "nobody ... xxxxxx"
+
+char reply_to[SIZ];
+char reply_subject[SIZ];
 
 struct cittext {
        struct cittext *next;
        char text[MAXWORDBUF];
 };
 
-void sttybbs(int cmd);
-int fmout(int width, FILE * fp, char pagin, int height, int starting_lp,
-         char subst);
-int haschar(char *st, int ch);
-int checkpagin(int lp, int pagin, int height);
-void getline(char *string, int lim);
-void formout(char *name);
-int yesno(void);
-void newprompt(char *prompt, char *str, int len);
+void stty_ctdl(int cmd);
+int haschar(const char *st, int ch);
+void ctdl_getline(char *string, int lim);
 int file_checksum(char *filename);
-void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd);
+void progress(CtdlIPC* ipc, unsigned long curr, unsigned long cmax);
 
-char reply_to[512];
-long msg_arr[MAXMSGS];
+unsigned long *msg_arr = NULL;
+int msg_arr_size = 0;
 int num_msgs;
+char rc_alt_semantics;
 extern char room_name[];
 extern unsigned room_flags;
+extern unsigned room_flags2;
 extern long highest_msg_read;
-extern struct CtdlServInfo serv_info;
 extern char temp[];
 extern char temp2[];
 extern int screenwidth;
@@ -68,21 +85,25 @@ extern char fullname[];
 extern char axlevel;
 extern unsigned userflags;
 extern char sigcaught;
-extern char editor_path[];
 extern char printcmd[];
 extern int rc_allow_attachments;
 extern int rc_display_message_numbers;
 extern int rc_force_mail_prompts;
-
 extern int editor_pid;
+extern CtdlIPC *ipc_for_signal_handlers;       /* KLUDGE cover your eyes */
+int num_urls = 0;
+char urls[MAXURLS][SIZ];
+char imagecmd[SIZ];
+int has_images = 0;                            /* Current msg has images */
+struct parts *last_message_parts = NULL;       /* Parts from last msg */
+
+
 
 void ka_sigcatch(int signum)
 {
-       char buf[SIZ];
        alarm(S_KEEPALIVE);
        signal(SIGALRM, ka_sigcatch);
-       serv_puts("NOOP");
-       serv_gets(buf);
+       CtdlIPCNoop(ipc_for_signal_handlers);
 }
 
 
@@ -189,7 +210,7 @@ void add_word(struct cittext *textlist, char *wordbuf)
 /*
  * begin editing of an opened file pointed to by fp
  */
-void citedit(FILE * fp)
+void citedit(CtdlIPC *ipc, FILE * fp)
 {
        int a, prev, finished, b, last_space;
        int appending = 0;
@@ -240,12 +261,10 @@ void citedit(FILE * fp)
                if (a == 127)
                        a = 8;
 
-       /******* new ***********/
-               if ((a > 32) && (a < 127) && (prev == 13)) {
+               if ((a != 32) && (prev == 13)) {
                        add_word(textlist, "\n");
-                       printf(" ");
+                       scr_printf(" ");
                }
-       /***********************/
 
                if ((a == 32) && (prev == 13)) {
                        add_word(textlist, "\n");
@@ -253,15 +272,22 @@ void citedit(FILE * fp)
                }
 
                if (a == 8) {
-                       if (strlen(wordbuf) > 0) {
+                       if (!IsEmptyStr(wordbuf)) {
                                wordbuf[strlen(wordbuf) - 1] = 0;
-                               putc(8, stdout);
-                               putc(32, stdout);
-                               putc(8, stdout);
+                               scr_putc(8);
+                               scr_putc(32);
+                               scr_putc(8);
                        }
+               } else if (a == 23) {
+                       do {
+                               wordbuf[strlen(wordbuf) - 1] = 0;
+                               scr_putc(8);
+                               scr_putc(32);
+                               scr_putc(8);
+                       } while (!IsEmptyStr(wordbuf) && wordbuf[strlen(wordbuf) - 1] != ' ');
                } else if (a == 13) {
-                       printf("\n");
-                       if (strlen(wordbuf) == 0)
+                       scr_printf("\n");
+                       if (IsEmptyStr(wordbuf))
                                finished = 1;
                        else {
                                for (b = 0; b < strlen(wordbuf); ++b)
@@ -277,7 +303,7 @@ void citedit(FILE * fp)
                                strcpy(wordbuf, "");
                        }
                } else {
-                       putc(a, stdout);
+                       scr_putc(a);
                        wordbuf[strlen(wordbuf) + 1] = 0;
                        wordbuf[strlen(wordbuf)] = a;
                }
@@ -297,15 +323,15 @@ void citedit(FILE * fp)
                                                b = 0;
                                        }
                                for (b = 0; b < strlen(wordbuf); ++b) {
-                                       putc(8, stdout);
-                                       putc(32, stdout);
-                                       putc(8, stdout);
+                                       scr_putc(8);
+                                       scr_putc(32);
+                                       scr_putc(8);
                                }
-                               printf("\n%s", wordbuf);
+                               scr_printf("\n%s", wordbuf);
                        } else {
                                add_word(textlist, wordbuf);
                                strcpy(wordbuf, "");
-                               printf("\n");
+                               scr_printf("\n");
                        }
                }
                prev = a;
@@ -329,200 +355,391 @@ void citedit(FILE * fp)
        }
 }
 
-/* Read a message from the server
+
+/*
+ * Free the struct parts
+ */
+void free_parts(struct parts *p)
+{
+       struct parts *a_part = p;
+
+       while (a_part) {
+               struct parts *q;
+
+               q = a_part;
+               a_part = a_part->next;
+               free(q);
+       }
+}
+
+
+/*
+ * Read a message from the server
  */
-int read_message(
+int read_message(CtdlIPC *ipc,
        long num,   /* message number */
-       char pagin) /* 0 = normal read, 1 = read with pagination, 2 = header */
+       int pagin, /* 0 = normal read, 1 = read with pagination, 2 = header */
+       FILE *dest) /* Destination file, NULL for screen */
 {
        char buf[SIZ];
-       char m_subject[SIZ];
-       char from[SIZ], node[SIZ], rfca[SIZ];
        char now[SIZ];
        int format_type = 0;
        int fr = 0;
        int nhdr = 0;
+       struct ctdlipcmessage *message = NULL;
+       int r;                          /* IPC response code */
+       char *converted_text = NULL;
+       char *lineptr;
+       char *nextline;
+       char *searchptr;
+       int i;
+       char ch;
+       int linelen;
+       int final_line_is_blank = 0;
+
+       has_images = 0;
 
        sigcaught = 0;
-       sttybbs(1);
+       stty_ctdl(1);
+
+       strcpy(reply_to, NO_REPLY_TO);
+       strcpy(reply_subject, "");
 
-       sprintf(buf, "MSG0 %ld|%d", num, (pagin == READ_HEADER ? 1 : 0));
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0] != '1') {
-               printf("*** msg #%ld: %s\n", num, buf);
+       r = CtdlIPCGetSingleMessage(ipc, num, (pagin == READ_HEADER ? 1 : 0),
+                               (can_do_msg4 ? 4 : 0),
+                               &message, buf);
+       if (r / 100 != 1) {
+               err_printf("*** msg #%ld: %d %s\n", num, r, buf);
                ++lines_printed;
                lines_printed =
                    checkpagin(lines_printed, pagin, screenheight);
-               sttybbs(0);
+               stty_ctdl(0);
                return (0);
        }
 
-       strcpy(m_subject, "");
-       strcpy(reply_to, "nobody ... xxxxx");
-       strcpy(from, "");
-       strcpy(node, "");
-       strcpy(rfca, "");
-
-       printf("\n");
-       ++lines_printed;
-       lines_printed = checkpagin(lines_printed, pagin, screenheight);
-       printf(" ");
-       if (pagin == 1) {
+       if (dest) {
+               fprintf(dest, "\n ");
+       } else {
+               scr_printf("\n");
+               ++lines_printed;
+               lines_printed = checkpagin(lines_printed, pagin, screenheight);
+               if (pagin != 2)
+                       scr_printf(" ");
+       }
+       if (pagin == 1 && !dest) {
                color(BRIGHT_CYAN);
        }
 
+       /* View headers only */
        if (pagin == 2) {
-               while (serv_gets(buf), strcmp(buf, "000")) {
-                       if (buf[4] == '=') {
-                               printf("%s\n", buf);
-                               ++lines_printed;
-                               lines_printed =
-                                   checkpagin(lines_printed,
-                                              pagin, screenheight);
+               pprintf("nhdr=%s\nfrom=%s\ntype=%d\nmsgn=%s\n",
+                               message->nhdr ? "yes" : "no",
+                               message->author, message->type,
+                               message->msgid);
+               if (!IsEmptyStr(message->subject)) {
+                       pprintf("subj=%s\n", message->subject);
+               }
+               if (!IsEmptyStr(message->email)) {
+                       pprintf("rfca=%s\n", message->email);
+               }
+               pprintf("hnod=%s\nroom=%s\nnode=%s\ntime=%s",
+                               message->hnod, message->room,
+                               message->node, 
+                               asctime(localtime(&message->time)));
+               if (!IsEmptyStr(message->recipient)) {
+                       pprintf("rcpt=%s\n", message->recipient);
+               }
+               if (message->attachments) {
+                       struct parts *ptr;
+
+                       for (ptr = message->attachments; ptr; ptr = ptr->next) {
+                               pprintf("part=%s|%s|%s|%s|%s|%ld\n",
+                                       ptr->name, ptr->filename, ptr->number,
+                                       ptr->disposition, ptr->mimetype,
+                                       ptr->length);
                        }
                }
-               sttybbs(0);
+               pprintf("\n");
+               stty_ctdl(0);
                return (0);
        }
 
-       while (serv_gets(buf), strncasecmp(buf, "text", 4)) {
-               if (!strncasecmp(buf, "nhdr=yes", 8))
-                       nhdr = 1;
-               if (!strncasecmp(buf, "from=", 5)) {
-                       strcpy(from, &buf[5]);
-               }
-               if (nhdr == 1)
-                       buf[0] = '_';
-               if (!strncasecmp(buf, "type=", 5))
-                       format_type = atoi(&buf[5]);
-               if ((!strncasecmp(buf, "msgn=", 5))
-                   && (rc_display_message_numbers)) {
+       if (rc_display_message_numbers) {
+               if (dest) {
+                       fprintf(dest, "[#%s] ", message->msgid);
+               } else {
                        color(DIM_WHITE);
-                       printf("[");
+                       scr_printf("[");
                        color(BRIGHT_WHITE);
-                       printf("#%s", &buf[5]);
+                       scr_printf("#%s", message->msgid);
                        color(DIM_WHITE);
-                       printf("] ");
+                       scr_printf("] ");
                }
-               if (!strncasecmp(buf, "from=", 5)) {
+       }
+       if (nhdr == 1 && !is_room_aide) {
+               if (dest) {
+                       fprintf(dest, " ****");
+               } else {
+                       scr_printf(" ****");
+               }
+       } else {
+               fmt_date(now, sizeof now, message->time, 0);
+               if (dest) {
+                       fprintf(dest, "%s from %s ", now, message->author);
+                       if (!IsEmptyStr(message->email)) {
+                               fprintf(dest, "<%s> ", message->email);
+                       }
+               } else {
+                       color(BRIGHT_CYAN);
+                       scr_printf("%s ", now);
                        color(DIM_WHITE);
-                       printf("from ");
+                       scr_printf("from ");
                        color(BRIGHT_CYAN);
-                       printf("%s ", &buf[5]);
+                       scr_printf("%s ", message->author);
+                       if (!IsEmptyStr(message->email)) {
+                               color(DIM_WHITE);
+                               scr_printf("<");
+                               color(BRIGHT_BLUE);
+                               scr_printf("%s", message->email);
+                                       color(DIM_WHITE);
+                               scr_printf("> ");
+                       }
                }
-               if (!strncasecmp(buf, "subj=", 5))
-                       strcpy(m_subject, &buf[5]);
-
-               if (!strncasecmp(buf, "rfca=", 5)) {
-                       safestrncpy(rfca, &buf[5], sizeof(rfca) - 5);
-                       color(DIM_WHITE);
-                       printf("<");
-                       color(BRIGHT_BLUE);
-                       printf("%s", &buf[5]);
-                       color(DIM_WHITE);
-                       printf("> ");
+               if (!IsEmptyStr(message->node)) {
+                       if ((room_flags & QR_NETWORK)
+                           || ((strcasecmp(message->node, ipc->ServInfo.nodename)
+                            && (strcasecmp(message->node, ipc->ServInfo.fqdn))))) {
+                               if (IsEmptyStr(message->email)) {
+                                       if (dest) {
+                                               fprintf(dest, "@%s ", message->node);
+                                       } else {
+                                               color(DIM_WHITE);
+                                               scr_printf("@");
+                                               color(BRIGHT_YELLOW);
+                                               scr_printf("%s ", message->node);
+                                       }
+                               }
+                       }
                }
-               if ((!strncasecmp(buf, "hnod=", 5))
-                   && (strcasecmp(&buf[5], serv_info.serv_humannode))
-                   && (strlen(rfca) == 0)) {
-                       color(DIM_WHITE);
-                       printf("(");
-                       color(BRIGHT_WHITE);
-                       printf("%s", &buf[5]);
-                       color(DIM_WHITE);
-                       printf(") ");
+               if (strcasecmp(message->hnod, ipc->ServInfo.humannode)
+                   && (!IsEmptyStr(message->hnod)) && (IsEmptyStr(message->email))) {
+                       if (dest) {
+                               fprintf(dest, "(%s) ", message->hnod);
+                       } else {
+                               color(DIM_WHITE);
+                               scr_printf("(");
+                               color(BRIGHT_WHITE);
+                               scr_printf("%s", message->hnod);
+                               color(DIM_WHITE);
+                               scr_printf(") ");
+                       }
                }
-               if ((!strncasecmp(buf, "room=", 5))
-                   && (strcasecmp(&buf[5], room_name))
-                   && (strlen(rfca) == 0)) {
-                       color(DIM_WHITE);
-                       printf("in ");
-                       color(BRIGHT_MAGENTA);
-                       printf("%s> ", &buf[5]);
+               if (strcasecmp(message->room, room_name) && (IsEmptyStr(message->email))) {
+                       if (dest) {
+                               fprintf(dest, "in %s> ", message->room);
+                       } else {
+                               color(DIM_WHITE);
+                               scr_printf("in ");
+                               color(BRIGHT_MAGENTA);
+                               scr_printf("%s> ", message->room);
+                       }
                }
-
-               if (!strncasecmp(buf, "node=", 5)) {
-                       safestrncpy(node, &buf[5], sizeof(buf) - 5);
-                       if ((room_flags & QR_NETWORK)
-                           ||
-                           ((strcasecmp
-                             (&buf[5], serv_info.serv_nodename)
-                             &&
-                             (strcasecmp(&buf[5], serv_info.serv_fqdn)))))
-                       {
-                               if (strlen(rfca) == 0) {
-                                       color(DIM_WHITE);
-                                       printf("@");
-                                       color(BRIGHT_YELLOW);
-                                       printf("%s ", &buf[5]);
-                               }
+               if (!IsEmptyStr(message->recipient)) {
+                       if (dest) {
+                               fprintf(dest, "to %s ", message->recipient);
+                       } else {
+                               color(DIM_WHITE);
+                               scr_printf("to ");
+                               color(BRIGHT_CYAN);
+                               scr_printf("%s ", message->recipient);
                        }
                }
+       }
+       
+       if (dest) {
+               fprintf(dest, "\n");
+       } else {
+               scr_printf("\n");
+       }
 
-               if (!strncasecmp(buf, "rcpt=", 5)) {
-                       color(DIM_WHITE);
-                       printf("to ");
-                       color(BRIGHT_CYAN);
-                       printf("%s ", &buf[5]);
+       /* Set the reply-to address to an Internet e-mail address if possible
+        */
+       if (message->email != NULL) if (!IsEmptyStr(message->email)) {
+               if (!IsEmptyStr(message->author)) {
+                       snprintf(reply_to, sizeof reply_to, "%s <%s>", message->author, message->email);
                }
-               if (!strncasecmp(buf, "time=", 5)) {
-                       fmt_date(now, atol(&buf[5]));
-                       printf("%s ", now);
+               else {
+                       safestrncpy(reply_to, message->email, sizeof reply_to);
                }
        }
 
-       if (nhdr == 1) {
-               if (!is_room_aide) {
-                       printf(" ****");
-               } else {
-                       printf(" %s", from);
-               }
+       /* But if we can't do that, set it to a Citadel address.
+        */
+       if (!strcmp(reply_to, NO_REPLY_TO)) {
+               snprintf(reply_to, sizeof(reply_to), "%s @ %s",
+                        message->author, message->node);
        }
-       printf("\n");
 
-       if (strlen(rfca) > 0) {
-               strcpy(reply_to, rfca);
-       } else {
-               snprintf(reply_to, sizeof(reply_to), "%s @ %s", from,
-                        node);
+       if (!dest) {
+               ++lines_printed;
+               lines_printed = checkpagin(lines_printed, pagin, screenheight);
+       }
+
+       if (message->subject != NULL) {
+               safestrncpy(reply_subject, message->subject,
+                                               sizeof reply_subject);
+               if (!IsEmptyStr(message->subject)) {
+                       if (dest) {
+                               fprintf(dest, "Subject: %s\n",
+                                                       message->subject);
+                       } else {
+                               color(DIM_WHITE);
+                               scr_printf("Subject: ");
+                               color(BRIGHT_CYAN);
+                               scr_printf("%s\n", message->subject);
+                               ++lines_printed;
+                               lines_printed = checkpagin(lines_printed,
+                                               pagin, screenheight);
+                       }
+               }
        }
 
-       if (pagin == 1)
+       if (pagin == 1 && !dest) {
                color(BRIGHT_WHITE);
-       ++lines_printed;
-       lines_printed = checkpagin(lines_printed, pagin, screenheight);
+       }
 
-       if (strlen(m_subject) > 0) {
-               printf("Subject: %s\n", m_subject);
-               ++lines_printed;
-               lines_printed =
-                   checkpagin(lines_printed, pagin, screenheight);
+       /******* end of header output, start of message text output *******/
+
+       /*
+        * Convert HTML to plain text, formatting for the actual width
+        * of the client screen.
+        */
+       if (!strcasecmp(message->content_type, "text/html")) {
+               converted_text = html_to_ascii(message->text, 0, screenwidth, 0);
+               if (converted_text != NULL) {
+                       free(message->text);
+                       message->text = converted_text;
+                       format_type = 1;
+               }
+       }
+
+       /* Text/plain is a different type */
+       if (!strcasecmp(message->content_type, "text/plain")) {
+               format_type = 1;
        }
 
+       /* Extract URL's */
+       num_urls = 0;   /* Start with a clean slate */
+       searchptr = message->text;
+       while ( (searchptr != NULL) && (num_urls < MAXURLS) ) {
+               searchptr = strstr(searchptr, "http://");
+               if (searchptr != NULL) {
+                       safestrncpy(urls[num_urls], searchptr, sizeof(urls[num_urls]));
+                       for (i = 0; i < strlen(urls[num_urls]); i++) {
+                               ch = urls[num_urls][i];
+                               if (ch == '>' || ch == '\"' || ch == ')' ||
+                                   ch == ' ' || ch == '\n') {
+                                       urls[num_urls][i] = 0;
+                                       break;
+                               }
+                       }
+                       num_urls++;
+                       ++searchptr;
+               }
+       }
+
+       /*
+        * Here we go
+        */
        if (format_type == 0) {
-               fr = fmout(screenwidth, NULL,
+               fr = fmout(screenwidth, NULL, message->text, dest,
                           ((pagin == 1) ? 1 : 0), screenheight, (-1), 1);
        } else {
-               while (serv_gets(buf), strcmp(buf, "000")) {
+               /* renderer for text/plain */
+
+               lineptr = message->text;
+
+               do {
+                       nextline = strchr(lineptr, '\n');
+                       if (nextline != NULL) {
+                               *nextline = 0;
+                               ++nextline;
+                               if (*nextline == 0) nextline = NULL;
+                       }
+
                        if (sigcaught == 0) {
-                               printf("%s\n", buf);
-                               lines_printed = lines_printed + 1 +
-                                   (strlen(buf) / screenwidth);
-                               lines_printed =
-                                   checkpagin(lines_printed, pagin,
-                                              screenheight);
+                               linelen = strlen(lineptr);
+                               if (lineptr[linelen-1] == '\r') {
+                                       lineptr[--linelen] = 0;
+                               }
+                               if (dest) {
+                                       fprintf(dest, "%s\n", lineptr);
+                               } else {
+                                       scr_printf("%s\n", lineptr);
+                                       lines_printed = lines_printed + 1 +
+                                           (linelen / screenwidth);
+                                       lines_printed =
+                                           checkpagin(lines_printed, pagin,
+                                                      screenheight);
+                               }
                        }
-               }
+                       if (lineptr[0] == 0) final_line_is_blank = 1;
+                       else final_line_is_blank = 0;
+                       lineptr = nextline;
+               } while (nextline);
                fr = sigcaught;
        }
-       printf("\n");
-       ++lines_printed;
-       lines_printed = checkpagin(lines_printed, pagin, screenheight);
+       if (!final_line_is_blank) {
+               if (dest) {
+                       fprintf(dest, "\n");
+               }
+               else {
+                       scr_printf("\n");
+                       ++lines_printed;
+                       lines_printed = checkpagin(lines_printed, pagin, screenheight);
+               }
+       }
 
-       if (pagin == 1)
+       /* Enumerate any attachments */
+       if ( (pagin == 1) && (can_do_msg4) && (message->attachments) ) {
+               struct parts *ptr;
+
+               for (ptr = message->attachments; ptr; ptr = ptr->next) {
+                       if ( (!strcasecmp(ptr->disposition, "attachment"))
+                          || (!strcasecmp(ptr->disposition, "inline"))
+                          || (!strcasecmp(ptr->disposition, ""))
+                       ) {
+                               if ( (strcasecmp(ptr->number, message->mime_chosen))
+                                  && (!IsEmptyStr(ptr->mimetype))
+                               ) {
+                                       color(DIM_WHITE);
+                                       pprintf("Part ");
+                                       color(BRIGHT_MAGENTA);
+                                       pprintf("%s", ptr->number);
+                                       color(DIM_WHITE);
+                                       pprintf(": ");
+                                       color(BRIGHT_CYAN);
+                                       pprintf("%s", ptr->filename);
+                                       color(DIM_WHITE);
+                                       pprintf(" (%s, %ld bytes)\n", ptr->mimetype, ptr->length);
+                                       if (!strncmp(ptr->mimetype, "image/", 6)) {
+                                               has_images++;
+                                       }
+                               }
+                       }
+               }
+       }
+
+       /* Save the attachments info for later */
+       last_message_parts = message->attachments;
+
+       /* Now we're done */
+       free(message->text);
+       free(message);
+
+       if (pagin == 1 && !dest)
                color(DIM_WHITE);
-       sttybbs(0);
+       stty_ctdl(0);
        return (fr);
 }
 
@@ -541,13 +758,13 @@ void replace_string(char *filename, long int startpos)
        int substitutions = 0;
        long msglen = 0L;
 
-       printf("Enter text to be replaced:\n: ");
-       getline(srch_str, 128);
-       if (strlen(srch_str) == 0)
+       scr_printf("Enter text to be replaced:\n: ");
+       ctdl_getline(srch_str, (sizeof(srch_str)-1) );
+       if (IsEmptyStr(srch_str))
                return;
 
-       printf("Enter text to replace it with:\n: ");
-       getline(rplc_str, 128);
+       scr_printf("Enter text to replace it with:\n: ");
+       ctdl_getline(rplc_str, (sizeof(rplc_str)-1) );
 
        fp = fopen(filename, "r+");
        if (fp == NULL)
@@ -562,7 +779,7 @@ void replace_string(char *filename, long int startpos)
                buf[strlen(buf)] = a;
                if (strlen(buf) >= strlen(srch_str)) {
                        ptr = (&buf[strlen(buf) - strlen(srch_str)]);
-                       if (!strncasecmp(ptr, srch_str, strlen(srch_str))) {
+                       if (!strncmp(ptr, srch_str, strlen(srch_str))) {
                                strcpy(ptr, rplc_str);
                                ++substitutions;
                        }
@@ -577,64 +794,91 @@ void replace_string(char *filename, long int startpos)
                }
        }
        fseek(fp, wpos, 0);
-       if (strlen(buf) > 0)
+       if (!IsEmptyStr(buf))
                fwrite((char *) buf, strlen(buf), 1, fp);
        wpos = ftell(fp);
        fclose(fp);
        truncate(filename, wpos);
-       printf("<R>eplace made %d substitution(s).\n\n", substitutions);
+       scr_printf("<R>eplace made %d substitution(s).\n\n", substitutions);
 }
 
 /*
  * Function to begin composing a new message
  */
-int make_message(char *filename,       /* temporary file name */
-               char *recipient,        /* NULL if it's not mail */
-               int anon_type,          /* see MES_ types in header file */
-               int format_type,
-               int mode)
+int client_make_message(CtdlIPC *ipc,
+                                               char *filename,         /* temporary file name */
+                                               char *recipient,        /* NULL if it's not mail */
+                                               int is_anonymous,
+                                               int format_type,
+                                               int mode,
+                                               char *subject,          /* buffer to store subject line */
+                                               int subject_required)
 {
        FILE *fp;
        int a, b, e_ex_code;
        long beg;
-       char datestr[64];
+       char datestr[SIZ];
+       char header[SIZ];
+       char *editor_path = NULL;
        int cksum = 0;
 
-       if (mode == 2)
-               if (strlen(editor_path) == 0) {
-                       printf
-                           ("*** No editor available, using built-in editor\n");
+       if (mode >= 2)
+       {
+               if((mode-2) < MAX_EDITORS && !IsEmptyStr(editor_paths[mode-2])) {
+                       editor_path = editor_paths[mode-2];
+               } else if (!IsEmptyStr(editor_paths[0])) {
+                       editor_path = editor_paths[0];
+               } else {
+                       err_printf("*** No editor available, "
+                               "using built-in editor\n");
                        mode = 0;
                }
+       }
 
-       fmt_date(datestr, time(NULL));
+       fmt_date(datestr, sizeof datestr, time(NULL), 0);
+       header[0] = 0;
 
-       if (room_flags & QR_ANONONLY) {
-               printf(" ****");
+       if (room_flags & QR_ANONONLY && !recipient) {
+               snprintf(header, sizeof header, " ****");
        }
        else {
-               printf(" %s from %s", datestr, fullname);
-               if (strlen(recipient) > 0) {
-                       printf(" to %s", recipient);
+               snprintf(header, sizeof header,
+                       " %s from %s",
+                       datestr,
+                       (is_anonymous ? "[anonymous]" : fullname)
+                       );
+               if (!IsEmptyStr(recipient)) {
+                       size_t tmp = strlen(header);
+                       snprintf(&header[tmp], sizeof header - tmp,
+                               " to %s", recipient);
                }
        }
-       printf("\n");
+       scr_printf("%s\n", header);
+       if (subject != NULL) if (!IsEmptyStr(subject)) {
+               scr_printf("Subject: %s\n", subject);
+       }
+       
+       if ( (subject_required) && (IsEmptyStr(subject)) ) {
+               newprompt("Subject: ", subject, 70);
+       }
 
        beg = 0L;
 
        if (mode == 1) {
-               printf("(Press ctrl-d when finished)\n");
+               scr_printf("(Press ctrl-d when finished)\n");
        }
+
        if (mode == 0) {
                fp = fopen(filename, "r");
                if (fp != NULL) {
-                       fmout(screenwidth, fp, 0, screenheight, 0, 0);
+                       fmout(screenwidth, fp, NULL, NULL, 0,
+                               screenheight, 0, 0);
                        beg = ftell(fp);
                        fclose(fp);
                } else {
                        fp = fopen(filename, "w");
                        if (fp == NULL) {
-                               printf("*** Error opening temp file!\n"
+                               err_printf("*** Error opening temp file!\n"
                                        "    %s: %s\n",
                                        filename, strerror(errno));
                        return(1);
@@ -648,19 +892,19 @@ ME1:      switch (mode) {
        case 0:
                fp = fopen(filename, "r+");
                if (fp == NULL) {
-                       printf("*** Error opening temp file!\n"
+                       err_printf("*** Error opening temp file!\n"
                                "    %s: %s\n",
                                filename, strerror(errno));
                        return(1);
                }
-               citedit(fp);
+               citedit(ipc, fp);
                fclose(fp);
                goto MECR;
 
        case 1:
-               fp = fopen(filename, "w");
+               fp = fopen(filename, "a");
                if (fp == NULL) {
-                       printf("*** Error opening temp file!\n"
+                       err_printf("*** Error opening temp file!\n"
                                "    %s: %s\n",
                                filename, strerror(errno));
                        return(1);
@@ -673,21 +917,27 @@ ME1:      switch (mode) {
                                a = 10;
                        if (a != 4) {
                                putc(a, fp);
-                               putc(a, stdout);
+                               scr_putc(a);
                        }
                        if (a == 10)
-                               putc(13, stdout);
+                               scr_putc(10);
                } while (a != 4);
                fclose(fp);
                break;
 
        case 2:
+       default:        /* allow 2+ modes */
                e_ex_code = 1;  /* start with a failed exit code */
+               screen_reset();
+               stty_ctdl(SB_RESTORE);
                editor_pid = fork();
                cksum = file_checksum(filename);
                if (editor_pid == 0) {
+                       char tmp[SIZ];
+
                        chmod(filename, 0600);
-                       sttybbs(SB_RESTORE);
+                       snprintf(tmp, sizeof tmp, "WINDOW_TITLE=%s", header);
+                       putenv(tmp);
                        execlp(editor_path, editor_path, filename, NULL);
                        exit(1);
                }
@@ -697,38 +947,42 @@ ME1:      switch (mode) {
                                b = ka_wait(&e_ex_code);
                        } while ((b != editor_pid) && (b >= 0));
                editor_pid = (-1);
-               sttybbs(0);
+               stty_ctdl(0);
+               screen_set();
                break;
        }
 
-MECR:  if (mode == 2) {
+MECR:  if (mode >= 2) {
                if (file_checksum(filename) == cksum) {
-                       printf("*** Aborted message.\n");
+                       err_printf("*** Aborted message.\n");
                        e_ex_code = 1;
                }
-               if (e_ex_code == 0)
+               if (e_ex_code == 0) {
                        goto MEFIN;
+               }
                goto MEABT2;
        }
 
        b = keymenu("Entry command (? for options)",
                    "<A>bort|<C>ontinue|<S>ave message|<P>rint formatted|"
+                   "add s<U>bject|"
                    "<R>eplace string|<H>old message");
 
-       if (b == 'a')
-               goto MEABT;
-       if (b == 'c')
-               goto ME1;
-       if (b == 's')
-               goto MEFIN;
+       if (b == 'a') goto MEABT;
+       if (b == 'c') goto ME1;
+       if (b == 's') goto MEFIN;
        if (b == 'p') {
-               printf(" %s from %s", datestr, fullname);
-               if (strlen(recipient) > 0)
-                       printf(" to %s", recipient);
-               printf("\n");
+               scr_printf(" %s from %s", datestr, fullname);
+               if (!IsEmptyStr(recipient)) {
+                       scr_printf(" to %s", recipient);
+               }
+               scr_printf("\n");
+               if (subject != NULL) if (!IsEmptyStr(subject)) {
+                       scr_printf("Subject: %s\n", subject);
+               }
                fp = fopen(filename, "r");
                if (fp != NULL) {
-                       fmout(screenwidth, fp,
+                       fmout(screenwidth, fp, NULL, NULL,
                              ((userflags & US_PAGINATOR) ? 1 : 0),
                              screenheight, 0, 0);
                        beg = ftell(fp);
@@ -743,10 +997,16 @@ MECR:     if (mode == 2) {
        if (b == 'h') {
                return (2);
        }
+       if (b == 'u') {
+               if (subject != NULL) {
+                       newprompt("Subject: ", subject, 70);
+               }
+               goto MECR;
+       }
 
 MEFIN: return (0);
 
-MEABT: printf("Are you sure? ");
+MEABT: scr_printf("Are you sure? ");
        if (yesno() == 0) {
                goto ME1;
        }
@@ -754,13 +1014,15 @@ MEABT2:  unlink(filename);
        return (2);
 }
 
+
+#if 0
 /*
  * Transmit message text to the server.
  * 
  * This loop also implements a "tick" counter that displays the progress, if
  * we're sending something that will take a long time to transmit.
  */
-void transmit_message(FILE *fp)
+void transmit_message(CtdlIPC *ipc, FILE *fp)
 {
        char buf[SIZ];
        int ch, a;
@@ -776,7 +1038,7 @@ void transmit_message(FILE *fp)
                if (ch == 10) {
                        if (!strcmp(buf, "000"))
                                strcpy(buf, ">000");
-                       serv_puts(buf);
+                       CtdlIPC_putline(ipc, buf);
                        strcpy(buf, "");
                } else {
                        a = strlen(buf);
@@ -786,62 +1048,115 @@ void transmit_message(FILE *fp)
                                buf[a] = 0;
                                if (!strcmp(buf, "000"))
                                        strcpy(buf, ">000");
-                               serv_puts(buf);
+                               CtdlIPC_putline(ipc, buf);
                                strcpy(buf, "");
                        }
                        if (strlen(buf) > 250) {
                                if (!strcmp(buf, "000"))
                                        strcpy(buf, ">000");
-                               serv_puts(buf);
+                               CtdlIPC_putline(ipc, buf);
                                strcpy(buf, "");
                        }
                }
 
                if ((time(NULL) - lasttick) > 2L) {
-                       printf(" %3ld%% completed\r",
+                       scr_printf(" %3ld%% completed\r",
                               ((ftell(fp) * 100L) / msglen));
-                       fflush(stdout);
+                       scr_flush();
                        lasttick = time(NULL);
                }
 
        }
-       serv_puts(buf);
-       printf("                \r");
-       fflush(stdout);
+       CtdlIPC_putline(ipc, buf);
+       scr_printf("                \r");
+       scr_flush();
 }
+#endif
+
+
+/*
+ * Make sure there's room in msg_arr[] for at least one more.
+ */
+void check_msg_arr_size(void) {
+       if ((num_msgs + 1) > msg_arr_size) {
+               msg_arr_size += 512;
+               msg_arr = realloc(msg_arr,
+                       ((sizeof(long)) * msg_arr_size) );
+       }
+}
+
 
+/*
+ * break_big_lines()  -  break up lines that are >1024 characters
+ *                       otherwise the server will truncate
+ */
+void break_big_lines(char *msg) {
+       char *ptr;
+       char *break_here;
+
+       if (msg == NULL) {
+               return;
+       }
+
+       ptr = msg;
+       while (strlen(ptr) > 1000) {
+               break_here = strchr(&ptr[900], ' ');
+               if ((break_here == NULL) || (break_here > &ptr[999])) {
+                       break_here = &ptr[999];
+               }
+               *break_here = '\n';
+               ptr = break_here++;
+       }
+}
 
 
 /*
  * entmsg()  -  edit and create a message
  *              returns 0 if message was saved
  */
-int entmsg(int is_reply,       /* nonzero if this was a <R>eply command */
-               int c)          /* */
-{
-       char buf[300];
-       char cmd[SIZ];
+int entmsg(CtdlIPC *ipc,
+               int is_reply,   /* nonzero if this was a <R>eply command */
+               int c,          /* mode */
+               int masquerade  /* prompt for a non-default display name? */
+) {
+       char buf[SIZ];
        int a, b;
        int need_recp = 0;
        int mode;
-       long highmsg;
+       long highmsg = 0L;
        FILE *fp;
+       char subject[SIZ];
+       struct ctdlipcmessage message;
+       unsigned long *msgarr = NULL;
+       int r;                  /* IPC response code */
+       int subject_required = 0;
 
        if (c > 0)
                mode = 1;
        else
                mode = 0;
 
+       strcpy(subject, "");
+
        /*
         * First, check to see if we have permission to enter a message in
         * this room.  The server will return an error code if we can't.
         */
-       sprintf(cmd, "ENT0 0||0|%d", mode);
-       serv_puts(cmd);
-       serv_gets(cmd);
+       strcpy(message.recipient, "");
+       strcpy(message.author, "");
+       strcpy(message.subject, "");
+       message.text = "";              /* point to "", changes later */
+       message.anonymous = 0;
+       message.type = mode;
+
+       if (masquerade) {
+               newprompt("Display name for this message: ", message.author, 40);
+       }
 
-       if ((strncmp(cmd, "570", 3)) && (strncmp(cmd, "200", 3))) {
-               printf("%s\n", &cmd[4]);
+       r = CtdlIPCPostMessage(ipc, 0, &subject_required, &message, buf);
+
+       if (r / 100 != 2 && r / 10 != 57) {
+               scr_printf("%s\n", buf);
                return (1);
        }
 
@@ -849,12 +1164,14 @@ int entmsg(int is_reply, /* nonzero if this was a <R>eply command */
         * in this room, but a recipient needs to be specified.
         */
        need_recp = 0;
-       if (!strncmp(cmd, "570", 3))
+       if (r / 10 == 57) {
                need_recp = 1;
+       }
 
        /* If the user is a dumbass, tell them how to type. */
-       if ((userflags & US_EXPERT) == 0)
-               formout("entermsg");
+       if ((userflags & US_EXPERT) == 0) {
+               formout(ipc, "entermsg");
+       }
 
        /* Handle the selection of a recipient, if necessary. */
        strcpy(buf, "");
@@ -863,29 +1180,42 @@ int entmsg(int is_reply, /* nonzero if this was a <R>eply command */
                        if (is_reply) {
                                strcpy(buf, reply_to);
                        } else {
-                               printf("Enter recipient: ");
-                               getline(buf, 60);
-                               if (strlen(buf) == 0)
+                               scr_printf("Enter recipient: ");
+                               ctdl_getline(buf, (SIZ-100) );
+                               if (IsEmptyStr(buf))
                                        return (1);
                        }
                } else
                        strcpy(buf, "sysop");
        }
+       strcpy(message.recipient, buf);
+
+       if (is_reply) {
+               if (!IsEmptyStr(reply_subject)) {
+                       if (!strncasecmp(reply_subject,
+                          "Re: ", 3)) {
+                               strcpy(message.subject, reply_subject);
+                       }
+                       else {
+                               snprintf(message.subject,
+                                       sizeof message.subject,
+                                       "Re: %s",
+                                       reply_subject);
+                       }
+               }
+       }
 
-       b = 0;
        if (room_flags & QR_ANONOPT) {
-               printf("Anonymous (Y/N)? ");
+               scr_printf("Anonymous (Y/N)? ");
                if (yesno() == 1)
-                       b = 1;
+                       message.anonymous = 1;
        }
 
        /* If it's mail, we've got to check the validity of the recipient... */
-       if (strlen(buf) > 0) {
-               sprintf(cmd, "ENT0 0|%s|%d|%d", buf, b, mode);
-               serv_puts(cmd);
-               serv_gets(cmd);
-               if (cmd[0] != '2') {
-                       printf("%s\n", &cmd[4]);
+       if (!IsEmptyStr(message.recipient)) {
+               r = CtdlIPCPostMessage(ipc, 0, &subject_required,  &message, buf);
+               if (r / 100 != 2) {
+                       scr_printf("%s\n", buf);
                        return (1);
                }
        }
@@ -894,70 +1224,73 @@ int entmsg(int is_reply, /* nonzero if this was a <R>eply command */
         * tell upon saving whether someone else has posted too.
         */
        num_msgs = 0;
-       serv_puts("MSGS LAST|1");
-       serv_gets(cmd);
-       if (cmd[0] != '1') {
-               printf("%s\n", &cmd[5]);
+       r = CtdlIPCGetMessages(ipc, LastMessages, 1, NULL, &msgarr, buf);
+       if (r / 100 != 1) {
+               scr_printf("%s\n", buf);
        } else {
-               while (serv_gets(cmd), strcmp(cmd, "000")) {
-                       msg_arr[num_msgs++] = atol(cmd);
-               }
+               for (num_msgs = 0; msgarr[num_msgs]; num_msgs++)
+                       ;
        }
 
        /* Now compose the message... */
-       if (make_message(temp, buf, b, 0, c) != 0) {
+       if (client_make_message(ipc, temp, message.recipient,
+          message.anonymous, 0, c, message.subject, subject_required) != 0) {
+           if (msgarr) free(msgarr);   
                return (2);
        }
 
        /* Reopen the temp file that was created, so we can send it */
        fp = fopen(temp, "r");
 
-       /* Yes, unlink it now, so it doesn't stick around if we crash */
-       unlink(temp);
-
-       if (fp == NULL) {
-               printf("*** Internal error while trying to save message!\n"
-                       "    %s: %s\n",
+       if (!fp || !(message.text = load_message_from_file(fp))) {
+               err_printf("*** Internal error while trying to save message!\n"
+                       "%s: %s\n",
                        temp, strerror(errno));
+               unlink(temp);
                return(errno);
        }
 
+       if (fp) fclose(fp);
+
+       /* Break lines that are >1024 characters, otherwise the server
+        * will truncate them.
+        */
+       break_big_lines(message.text);
+
        /* Transmit message to the server */
-       sprintf(cmd, "ENT0 1|%s|%d|%d||", buf, b, mode);
-       serv_puts(cmd);
-       serv_gets(cmd);
-       if (cmd[0] != '4') {
-               printf("%s\n", &cmd[4]);
+       r = CtdlIPCPostMessage(ipc, 1, NULL, &message, buf);
+       if (r / 100 != 4) {
+               scr_printf("%s\n", buf);
                return (1);
        }
 
-       transmit_message(fp);
-       serv_puts("000");
+       /* Yes, unlink it now, so it doesn't stick around if we crash */
+       unlink(temp);
 
-       fclose(fp);
+       if (num_msgs >= 1) highmsg = msgarr[num_msgs - 1];
 
-       highmsg = msg_arr[num_msgs - 1];
-       num_msgs = 0;
-       serv_puts("MSGS NEW");
-       serv_gets(cmd);
-       if (cmd[0] != '1') {
-               printf("%s\n", &cmd[5]);
+       if (msgarr) free(msgarr);
+       msgarr = NULL;
+       r = CtdlIPCGetMessages(ipc, NewMessages, 0, NULL, &msgarr, buf);
+       if (r / 100 != 1) {
+               scr_printf("%s\n", buf);
        } else {
-               while (serv_gets(cmd), strcmp(cmd, "000")) {
-                       msg_arr[num_msgs++] = atol(cmd);
-               }
+               for (num_msgs = 0; msgarr[num_msgs]; num_msgs++)
+                       ;
        }
 
        /* get new highest message number in room to set lrp for goto... */
-       maxmsgnum = msg_arr[num_msgs - 1];
+       maxmsgnum = msgarr[num_msgs - 1];
 
        /* now see if anyone else has posted in here */
        b = (-1);
        for (a = 0; a < num_msgs; ++a) {
-               if (msg_arr[a] > highmsg) {
+               if (msgarr[a] > highmsg) {
                        ++b;
                }
        }
+       if (msgarr) free(msgarr);
+       msgarr = NULL;
 
        /* In the Mail> room, this algorithm always counts one message
         * higher than in public rooms, so we decrement it by one.
@@ -967,13 +1300,14 @@ int entmsg(int is_reply, /* nonzero if this was a <R>eply command */
        }
 
        if (b == 1) {
-               printf("*** 1 additional message has been entered "
+               scr_printf("*** 1 additional message has been entered "
                        "in this room by another user.\n");
        }
        else if (b > 1) {
-               printf("*** %d additional messages have been entered "
+               scr_printf("*** %d additional messages have been entered "
                        "in this room by other users.\n", b);
        }
+    free(message.text);
 
        return(0);
 }
@@ -997,13 +1331,13 @@ void process_quote(void)
        line = 0;
        fgets(buf, 128, qfile);
        while (fgets(buf, 128, qfile) != NULL) {
-               printf("%2d %s", ++line, buf);
+               scr_printf("%2d %s", ++line, buf);
        }
-       printf("Begin quoting at [ 1] : ");
-       getline(buf, 3);
+       scr_printf("Begin quoting at [ 1] : ");
+       ctdl_getline(buf, 3);
        qstart = (buf[0] == 0) ? (1) : atoi(buf);
-       printf("  End quoting at [%d] : ", line);
-       getline(buf, 3);
+       scr_printf("  End quoting at [%d] : ", line);
+       ctdl_getline(buf, 3);
        qend = (buf[0] == 0) ? (line) : atoi(buf);
        rewind(qfile);
        line = 0;
@@ -1024,34 +1358,158 @@ void process_quote(void)
 /*
  * List the URL's which were embedded in the previous message
  */
-void list_urls()
+void list_urls(CtdlIPC *ipc)
 {
        int i;
        char cmd[SIZ];
 
        if (num_urls == 0) {
-               printf("There were no URL's in the previous message.\n\n");
+               scr_printf("There were no URL's in the previous message.\n\n");
                return;
        }
 
        for (i = 0; i < num_urls; ++i) {
-               printf("%3d %s\n", i + 1, urls[i]);
+               scr_printf("%3d %s\n", i + 1, urls[i]);
        }
 
        if ((i = num_urls) != 1)
                i = intprompt("Display which one", 1, 1, num_urls);
 
-       sprintf(cmd, rc_url_cmd, urls[i - 1]);
+       snprintf(cmd, sizeof cmd, rc_url_cmd, urls[i - 1]);
        system(cmd);
-       printf("\n");
+       scr_printf("\n");
 }
 
+
+/*
+ * Run image viewer in background
+ */
+int do_image_view(const char *filename)
+{
+       char cmd[SIZ];
+       pid_t childpid;
+
+       snprintf(cmd, sizeof cmd, imagecmd, filename);
+       childpid = fork();
+       if (childpid < 0) {
+               unlink(filename);
+               return childpid;
+       }
+
+       if (childpid == 0) {
+               int retcode;
+               pid_t grandchildpid;
+
+               grandchildpid = fork();
+               if (grandchildpid < 0) {
+                       return grandchildpid;
+               }
+
+               if (grandchildpid == 0) {
+                       int nullfd;
+                       int outfd = -1;
+                       int errfd = -1;
+
+                       nullfd = open("/dev/null", O_WRONLY);
+                       if (nullfd > -1) {
+                               dup2(1, outfd);
+                               dup2(2, errfd);
+                               dup2(nullfd, 1);
+                               dup2(nullfd, 2);
+                       }
+                       retcode = system(cmd);
+                       if (nullfd > -1) {
+                               dup2(outfd, 1);
+                               dup2(errfd, 2);
+                               close(nullfd);
+                       }
+                       unlink(filename);
+                       exit(retcode);
+               }
+
+               if (grandchildpid > 0) {
+                       exit(0);
+               }
+       }
+
+       if (childpid > 0) {
+               int retcode;
+
+               waitpid(childpid, &retcode, 0);
+               return retcode;
+       }
+       
+       return -1;
+}
+
+
+/*
+ * View an image attached to a message
+ */
+void image_view(CtdlIPC *ipc, unsigned long msg)
+{
+       struct parts *ptr = last_message_parts;
+       char part[SIZ];
+       int found = 0;
+
+       /* Run through available parts */
+       for (ptr = last_message_parts; ptr; ptr = ptr->next) {
+               if ((!strcasecmp(ptr->disposition, "attachment")
+                  || !strcasecmp(ptr->disposition, "inline"))
+                  && !strncmp(ptr->mimetype, "image/", 6)) {
+                       found++;
+                       if (found == 1) {
+                               strcpy(part, ptr->number);
+                       }
+               }
+       }
+
+       while (found > 0) {
+               if (found > 1)
+                       strprompt("View which part (0 when done)", part, SIZ-1);
+               found = -found;
+               for (ptr = last_message_parts; ptr; ptr = ptr->next) {
+                       if ((!strcasecmp(ptr->disposition, "attachment")
+                          || !strcasecmp(ptr->disposition, "inline"))
+                          && !strncmp(ptr->mimetype, "image/", 6)
+                          && !strcasecmp(ptr->number, part)) {
+                               char tmp[PATH_MAX];
+                               char buf[SIZ];
+                               void *file = NULL; /* The downloaded file */
+                               int r;
+       
+                               /* view image */
+                               found = -found;
+                               r = CtdlIPCAttachmentDownload(ipc, msg, ptr->number, &file, progress, buf);
+                               if (r / 100 != 2) {
+                                       scr_printf("%s\n", buf);
+                               } else {
+                                       size_t len;
+       
+                                       len = (size_t)extract_long(buf, 0);
+                                       progress(ipc, len, len);
+                                       scr_flush();
+                                       CtdlMakeTempFileName(tmp, sizeof tmp);
+                                       strcat(tmp, ptr->filename);
+                                       save_buffer(file, len, tmp);
+                                       free(file);
+                                       do_image_view(tmp);
+                               }
+                               break;
+                       }
+               }
+               if (found == 1)
+                       break;
+       }
+}
+
 /*
  * Read the messages in the current room
  */
-void readmsgs(
-       int c,          /* 0=Read all  1=Read new  2=Read old 3=Read last q */
-       int rdir,       /* 1=Forward (-1)=Reverse */
+void readmsgs(CtdlIPC *ipc,
+       enum MessageList c,             /* see listing in citadel_ipc.h */
+       enum MessageDirection rdir,     /* 1=Forward (-1)=Reverse */
        int q           /* Number of msgs to read (if c==3) */
 ) {
        int a, b, e, f, g, start;
@@ -1064,51 +1522,37 @@ void readmsgs(
        char pagin;
        char cmd[SIZ];
        char targ[ROOMNAMELEN];
-       char filename[SIZ];
+       char filename[PATH_MAX];
+       char save_to[PATH_MAX];
+       void *attachment = NULL;        /* Downloaded attachment */
+       FILE *dest = NULL;      /* Alternate destination other than screen */
+       int r;                          /* IPC response code */
 
        if (c < 0)
-               b = (MAXMSGS - 1);
+               b = (num_msgs - 1);
        else
                b = 0;
 
-       strcpy(prtfile, tmpnam(NULL));
+       CtdlMakeTempFileName(prtfile, sizeof prtfile);
 
-       num_msgs = 0;
-       strcpy(cmd, "MSGS ");
-       switch (c) {
-       case 0:
-               strcat(cmd, "ALL");
-               break;
-       case 1:
-               strcat(cmd, "NEW");
-               break;
-       case 2:
-               strcat(cmd, "OLD");
-               break;
-       case 3:
-               sprintf(&cmd[strlen(cmd)], "LAST|%d", q);
-               break;
+       if (msg_arr) {
+               free(msg_arr);
+               msg_arr = NULL;
        }
-       serv_puts(cmd);
-       serv_gets(cmd);
-       if (cmd[0] != '1') {
-               printf("%s\n", &cmd[5]);
+       r = CtdlIPCGetMessages(ipc, c, q, NULL, &msg_arr, cmd);
+       if (r / 100 != 1) {
+               scr_printf("%s\n", cmd);
        } else {
-               while (serv_gets(cmd), strcmp(cmd, "000")) {
-                       if (num_msgs == MAXMSGS) {
-                               memcpy(&msg_arr[0], &msg_arr[1],
-                                      (sizeof(long) * (MAXMSGS - 1)));
-                               --num_msgs;
-                       }
-                       msg_arr[num_msgs++] = atol(cmd);
-               }
+               for (num_msgs = 0; msg_arr[num_msgs]; num_msgs++)
+                       ;
        }
 
-       if (num_msgs == 0) {
-               printf("*** There are no ");
-               if (c == 1) printf("new ");
-               if (c == 2) printf("old ");
-               printf("messages in this room.\n");
+       if (num_msgs == 0) {    /* TODO look at this later */
+               if (c == LastMessages) return;
+               scr_printf("*** There are no ");
+               if (c == NewMessages) scr_printf("new ");
+               if (c == OldMessages) scr_printf("old ");
+               scr_printf("messages in this room.\n");
                return;
        }
 
@@ -1119,7 +1563,7 @@ void readmsgs(
        for (a = start; ((a < num_msgs) && (a >= 0)); a = a + rdir) {
                while (msg_arr[a] == 0L) {
                        a = a + rdir;
-                       if ((a == MAXMSGS) || (a == (-1)))
+                       if ((a == num_msgs) || (a == (-1)))
                                return;
                }
 
@@ -1139,31 +1583,39 @@ RAGAIN:         pagin = ((arcflag == 0)
                        screenwidth = 80;
                }
 
+               /* clear parts list */
+               free_parts(last_message_parts);
+               last_message_parts = NULL;
+
                /* now read the message... */
-               e = read_message(msg_arr[a], pagin);
+               e = read_message(ipc, msg_arr[a], pagin, dest);
 
                /* ...and set the screenwidth back if we have to */
                if ((quotflag) || (arcflag)) {
                        screenwidth = hold_sw;
                }
-RMSGREAD:      fflush(stdout);
+RMSGREAD:      scr_flush();
                highest_msg_read = msg_arr[a];
                if (quotflag) {
-                       freopen("/dev/tty", "r+", stdout);
+                       fclose(dest);
+                       dest = NULL;
                        quotflag = 0;
                        enable_color = hold_color;
                        process_quote();
                }
                if (arcflag) {
-                       freopen("/dev/tty", "r+", stdout);
+                       fclose(dest);
+                       dest = NULL;
                        arcflag = 0;
                        enable_color = hold_color;
                        f = fork();
                        if (f == 0) {
                                freopen(prtfile, "r", stdin);
-                               sttybbs(SB_RESTORE);
+                               screen_reset();
+                               stty_ctdl(SB_RESTORE);
                                ka_system(printcmd);
-                               sttybbs(SB_NO_INTR);
+                               stty_ctdl(SB_NO_INTR);
+                               screen_set();
                                unlink(prtfile);
                                exit(0);
                        }
@@ -1171,7 +1623,12 @@ RMSGREAD:        fflush(stdout);
                                do {
                                        g = wait(NULL);
                                } while ((g != f) && (g >= 0));
-                       printf("Message printed.\n");
+                       scr_printf("Message printed.\n");
+               }
+               if (rc_alt_semantics && c == 1) {
+                       char buf[SIZ];
+
+                       r = CtdlIPCSetMessageSeen(ipc, msg_arr[a], 1, buf);
                }
                if (e == 3)
                        return;
@@ -1181,36 +1638,37 @@ RMSGREAD:       fflush(stdout);
                        e = 'n';
                } else {
                        color(DIM_WHITE);
-                       printf("(");
+                       scr_printf("(");
                        color(BRIGHT_WHITE);
-                       printf("%d", num_msgs - a - 1);
+                       scr_printf("%d", num_msgs - a - 1);
                        color(DIM_WHITE);
-                       printf(") ");
+                       scr_printf(") ");
 
-                       keyopt
-                           ("<B>ack <A>gain <Q>uote <R>eply <N>ext <S>top ");
+                       keyopt("<B>ack <A>gain <Q>uote <R>eply <N>ext <S>top ");
                        if (rc_url_cmd[0] && num_urls)
-                               keyopt("<U>RL View ");
-                       keyopt("<?>Help/others -> ");
+                               keyopt("<U>RLview ");
+                       if (has_images > 0 && !IsEmptyStr(imagecmd))
+                               keyopt("<I>mages ");
+                       keyopt("<?>help -> ");
 
                        do {
                                lines_printed = 2;
                                e = (inkey() & 127);
                                e = tolower(e);
-/* return key same as <N> */ if (e == 13)
+/* return key same as <N> */ if (e == 10)
                                        e = 'n';
 /* space key same as <N> */ if (e == 32)
                                        e = 'n';
 /* del/move for aides only */
-                                   if ((!is_room_aide)
-                                       && ((room_flags & QR_MAILBOX) ==
-                                           0)) {
-                                       if ((e == 'd') || (e == 'm')
-                                           || (e == 'c'))
+                                   if (  (!is_room_aide)
+                                      && ((room_flags & QR_MAILBOX) == 0)
+                                      && ((room_flags2 & QR2_COLLABDEL) == 0)
+                                      ) {
+                                       if ((e == 'd') || (e == 'm'))
                                                e = 0;
                                }
 /* print only if available */
-                               if ((e == 'p') && (strlen(printcmd) == 0))
+                               if ((e == 'p') && (IsEmptyStr(printcmd)))
                                        e = 0;
 /* can't file if not allowed */
                                    if ((e == 'f')
@@ -1218,104 +1676,115 @@ RMSGREAD:     fflush(stdout);
                                        e = 0;
 /* link only if browser avail*/
                                    if ((e == 'u')
-                                       && (strlen(rc_url_cmd) == 0))
+                                       && (IsEmptyStr(rc_url_cmd)))
+                                       e = 0;
+                               if ((e == 'i')
+                                       && (IsEmptyStr(imagecmd) || !has_images))
                                        e = 0;
                        } while ((e != 'a') && (e != 'n') && (e != 's')
                                 && (e != 'd') && (e != 'm') && (e != 'p')
                                 && (e != 'q') && (e != 'b') && (e != 'h')
                                 && (e != 'r') && (e != 'f') && (e != '?')
-                                && (e != 'u') && (e != 'c'));
+                                && (e != 'u') && (e != 'c') && (e != 'y')
+                                && (e != 'i'));
                        switch (e) {
                        case 's':
-                               printf("Stop\r");
+                               scr_printf("Stop");
                                break;
                        case 'a':
-                               printf("Again\r");
+                               scr_printf("Again");
                                break;
                        case 'd':
-                               printf("Delete\r");
+                               scr_printf("Delete");
                                break;
                        case 'm':
-                               printf("Move\r");
+                               scr_printf("Move");
                                break;
                        case 'c':
-                               printf("Copy\r");
+                               scr_printf("Copy");
                                break;
                        case 'n':
-                               printf("Next\r");
+                               scr_printf("Next");
                                break;
                        case 'p':
-                               printf("Print\r");
+                               scr_printf("Print");
                                break;
                        case 'q':
-                               printf("Quote\r");
+                               scr_printf("Quote");
                                break;
                        case 'b':
-                               printf("Back\r");
+                               scr_printf("Back");
                                break;
                        case 'h':
-                               printf("Header\r");
+                               scr_printf("Header");
                                break;
                        case 'r':
-                               printf("Reply\r");
+                               scr_printf("Reply");
                                break;
                        case 'f':
-                               printf("File\r");
+                               scr_printf("File");
                                break;
                        case 'u':
-                               printf("URL's\r");
+                               scr_printf("URL's");
+                               break;
+                       case 'y':
+                               scr_printf("mY next");
+                               break;
+                       case 'i':
                                break;
                        case '?':
-                               printf("? <help>\r");
+                               scr_printf("? <help>");
                                break;
                        }
-                       if (userflags & US_DISAPPEAR)
-                               printf("\r%79s\r", "");
+                       if (userflags & US_DISAPPEAR || e == 'i')
+                               scr_printf("\r%79s\r", "");
                        else
-                               printf("\n");
-                       fflush(stdout);
+                               scr_printf("\n");
+                       scr_flush();
                }
                switch (e) {
                case '?':
-                       printf("Options available here:\n");
-                       printf(" ?  Help (prints this message)\n");
-                       printf(" S  Stop reading immediately\n");
-                       printf(" A  Again (repeats last message)\n");
-                       printf(" N  Next (continue with next message)\n");
-                       printf(" B  Back (go back to previous message)\n");
-                       if ((is_room_aide)
-                           || (room_flags & QR_MAILBOX)) {
-                               printf(" D  Delete this message\n");
-                               printf
-                                   (" M  Move message to another room\n");
-                               printf
-                                   (" C  Copy message to another room\n");
+                       scr_printf("Options available here:\n"
+                               " ?  Help (prints this message)\n"
+                               " S  Stop reading immediately\n"
+                               " A  Again (repeats last message)\n"
+                               " N  Next (continue with next message)\n"
+                               " Y  My Next (continue with next message you authored)\n"
+                               " B  Back (go back to previous message)\n");
+                       if (  (is_room_aide)
+                          || (room_flags & QR_MAILBOX)
+                          || (room_flags2 & QR2_COLLABDEL)
+                       ) {
+                               scr_printf(" D  Delete this message\n"
+                                       " M  Move message to another room\n");
                        }
-                       if (strlen(printcmd) > 0)
-                               printf(" P  Print this message\n");
-                       printf
-                           (" Q  Quote portions of this message for your next post\n");
-                       printf
-                           (" H  Headers (display message headers only)\n");
+                       scr_printf(" C  Copy message to another room\n");
+                       if (!IsEmptyStr(printcmd))
+                               scr_printf(" P  Print this message\n");
+                       scr_printf(
+                               " Q  Quote portions of this message for your next post\n"
+                               " H  Headers (display message headers only)\n");
                        if (is_mail)
-                               printf(" R  Reply to this message\n");
+                               scr_printf(" R  Reply to this message\n");
                        if (rc_allow_attachments)
-                               printf
+                               scr_printf
                                    (" F  (save attachments to a file)\n");
-                       if (strlen(rc_url_cmd) > 0)
-                               printf(" U  (list URL's for display)\n");
-                       printf("\n");
+                       if (!IsEmptyStr(rc_url_cmd))
+                               scr_printf(" U  (list URL's for display)\n");
+                       if (!IsEmptyStr(imagecmd) && has_images > 0)
+                               scr_printf(" I  Image viewer\n");
+                       scr_printf("\n");
                        goto RMSGREAD;
                case 'p':
-                       fflush(stdout);
-                       freopen(prtfile, "w", stdout);
+                       scr_flush();
+                       dest = fopen(prtfile, "w");
                        arcflag = 1;
                        hold_color = enable_color;
                        enable_color = 0;
                        goto RAGAIN;
                case 'q':
-                       fflush(stdout);
-                       freopen(temp2, "w", stdout);
+                       scr_flush();
+                       dest = fopen(temp2, "w");
                        quotflag = 1;
                        hold_color = enable_color;
                        enable_color = 0;
@@ -1331,62 +1800,96 @@ RMSGREAD:       fflush(stdout);
                case 'c':
                        newprompt("Enter target room: ",
                                  targ, ROOMNAMELEN - 1);
-                       if (strlen(targ) > 0) {
-                               sprintf(cmd, "MOVE %ld|%s|%d",
-                                       msg_arr[a], targ,
-                                       (e == 'c' ? 1 : 0));
-                               serv_puts(cmd);
-                               serv_gets(cmd);
-                               printf("%s\n", &cmd[4]);
-                               if (cmd[0] == '2')
+                       if (!IsEmptyStr(targ)) {
+                               r = CtdlIPCMoveMessage(ipc, (e == 'c' ? 1 : 0),
+                                                      msg_arr[a], targ, cmd);
+                               scr_printf("%s\n", cmd);
+                               if (r / 100 == 2)
                                        msg_arr[a] = 0L;
                        } else {
                                goto RMSGREAD;
                        }
-                       if (cmd[0] != '2')
-                               goto RMSGREAD;
+                       if (r / 100 != 2)       /* r will be init'ed, FIXME */
+                               goto RMSGREAD;  /* the logic here sucks */
                        break;
                case 'f':
                        newprompt("Which section? ", filename,
                                  ((sizeof filename) - 1));
-                       snprintf(cmd, sizeof cmd,
-                                "OPNA %ld|%s", msg_arr[a], filename);
-                       serv_puts(cmd);
-                       serv_gets(cmd);
-                       if (cmd[0] == '2') {
-                               extract(filename, &cmd[4], 2);
-                               download_to_local_disk(filename,
-                                                      extract_int(&cmd[4],
-                                                                  0));
+                       r = CtdlIPCAttachmentDownload(ipc, msg_arr[a],
+                                       filename, &attachment, progress, cmd);
+                       if (r / 100 != 2) {
+                               scr_printf("%s\n", cmd);
                        } else {
-                               printf("%s\n", &cmd[4]);
+                               extract_token(filename, cmd, 2, '|', sizeof filename);
+                               /*
+                                * Part 1 won't have a filename; use the
+                                * subject of the message instead. IO
+                                */
+                               if (IsEmptyStr(filename))
+                                       strcpy(filename, reply_subject);
+                               destination_directory(save_to, filename);
+                               save_buffer(attachment,
+                                               extract_unsigned_long(cmd, 0),
+                                               save_to);
+                       }
+                       if (attachment) {
+                               free(attachment);
+                               attachment = NULL;
                        }
                        goto RMSGREAD;
                case 'd':
-                       printf("*** Delete this message? ");
+                       scr_printf("*** Delete this message? ");
                        if (yesno() == 1) {
-                               sprintf(cmd, "DELE %ld", msg_arr[a]);
-                               serv_puts(cmd);
-                               serv_gets(cmd);
-                               printf("%s\n", &cmd[4]);
-                               if (cmd[0] == '2')
+                               r = CtdlIPCDeleteMessage(ipc, msg_arr[a], cmd);
+                               scr_printf("%s\n", cmd);
+                               if (r / 100 == 2)
                                        msg_arr[a] = 0L;
                        } else {
                                goto RMSGREAD;
                        }
                        break;
                case 'h':
-                       read_message(msg_arr[a], READ_HEADER);
+                       read_message(ipc, msg_arr[a], READ_HEADER, NULL);
                        goto RMSGREAD;
                case 'r':
                        savedpos = num_msgs;
-                       entmsg(1, (DEFAULT_ENTRY == 46 ? 2 : 0));
+                       entmsg(ipc, 1, ((userflags & US_EXTEDIT) ? 2 : 0), 0);
                        num_msgs = savedpos;
                        goto RMSGREAD;
                case 'u':
-                       list_urls();
+                       list_urls(ipc);
                        goto RMSGREAD;
+               case 'i':
+                       image_view(ipc, msg_arr[a]);
+                       goto RMSGREAD;
+           case 'y':
+          { /* hack hack hack */
+            /* find the next message by me, stay here if we find nothing */
+            int finda;
+            int lasta = a;
+            for (finda = (a + rdir); ((finda < num_msgs) && (finda >= 0)); finda += rdir)
+              {
+               /* This is repetitively dumb, but that's what computers are for.
+                  We have to load up messages until we find one by us */
+               char buf[SIZ];
+               int founda = 0;
+               struct ctdlipcmessage *msg = NULL;
+                
+               /* read the header so we can get 'from=' */
+               r = CtdlIPCGetSingleMessage(ipc, msg_arr[finda], 1, 0, &msg, buf);
+               if (!strncasecmp(msg->author, fullname, sizeof(fullname))) {
+                       a = lasta; /* meesa current */
+                       founda = 1;
                }
+
+               free(msg);
+
+               if (founda)
+                       break; /* for */
+               lasta = finda; /* keep one behind or we skip on the reentrance to the for */
+              } /* for */
+          } /* case 'y' */
+      } /* switch */
        }                       /* end for loop */
 }                              /* end read routine */
 
@@ -1396,16 +1899,16 @@ RMSGREAD:       fflush(stdout);
 /*
  * View and edit a system message
  */
-void edit_system_message(char *which_message)
+void edit_system_message(CtdlIPC *ipc, char *which_message)
 {
-       char desc[64];
-       char read_cmd[64];
-       char write_cmd[64];
-
-       sprintf(desc, "system message '%s'", which_message);
-       sprintf(read_cmd, "MESG %s", which_message);
-       sprintf(write_cmd, "EMSG %s", which_message);
-       do_edit(desc, read_cmd, "NOOP", write_cmd);
+       char desc[SIZ];
+       char read_cmd[SIZ];
+       char write_cmd[SIZ];
+
+       snprintf(desc, sizeof desc, "system message '%s'", which_message);
+       snprintf(read_cmd, sizeof read_cmd, "MESG %s", which_message);
+       snprintf(write_cmd, sizeof write_cmd, "EMSG %s", which_message);
+       do_edit(ipc, desc, read_cmd, "NOOP", write_cmd);
 }
 
 
@@ -1414,24 +1917,68 @@ void edit_system_message(char *which_message)
 /*
  * Verify the message base
  */
-void check_message_base(void)
+void check_message_base(CtdlIPC *ipc)
 {
        char buf[SIZ];
+       char *transcript = NULL;
+       int r;          /* IPC response code */
 
-       printf
+       scr_printf
            ("Please read the documentation before running this command.\n"
            "Having done so, do you still want to check the message base? ");
        if (yesno() == 0)
                return;
 
-       serv_puts("FSCK");
-       serv_gets(buf);
-       if (buf[0] != '1') {
-               printf("%s\n", &buf[4]);
+       r = CtdlIPCMessageBaseCheck(ipc, &transcript, buf);
+       if (r / 100 != 1) {
+               scr_printf("%s\n", buf);
                return;
        }
 
-       while (serv_gets(buf), strcmp(buf, "000")) {
-               printf("%s\n", buf);
+       while (transcript && !IsEmptyStr(transcript)) {
+               lines_printed = 1;
+               extract_token(buf, transcript, 0, '\n', sizeof buf);
+               remove_token(transcript, 0, '\n');
+               pprintf("%s\n", buf);
        }
+       if (transcript) free(transcript);
+       return;
+}
+
+
+/*
+ * Loads the contents of a file into memory.  Caller must free the allocated
+ * memory.
+ */
+char *load_message_from_file(FILE *src)
+{
+       size_t i;
+       size_t got = 0;
+       char *dest = NULL;
+
+       fseek(src, 0, SEEK_END);
+       i = ftell(src);
+       rewind(src);
+
+       dest = (char *)calloc(1, i + 1);
+       if (!dest)
+               return NULL;
+
+       while (got < i) {
+               size_t g;
+
+               g = fread(dest + got, 1, i - got, src);
+               got += g;
+               if (g < i - got) {
+                       /* Interrupted system call, keep going */
+                       if (errno == EINTR)
+                               continue;
+                       /* At this point we have either EOF or error */
+                       i = got;
+                       break;
+               }
+               dest[i] = 0;
+       }
+
+       return dest;
 }