* Holy war on strlen: use IsEmptyStr where apropriate.
[citadel.git] / citadel / commands.c
index e7b307adead776fc0946f74c6768937ce49d3d8b..0a2042e3ad1efcc773f8a05a020f48a613c882dd 100644 (file)
@@ -53,6 +53,7 @@
 #include "tools.h"
 #include "rooms.h"
 #include "client_chat.h"
+#include "citadel_dirs.h"
 #ifndef HAVE_SNPRINTF
 #include "snprintf.h"
 #endif
@@ -76,10 +77,8 @@ int rc_force_mail_prompts;
 int rc_remember_passwords;
 int rc_ansi_color;
 int rc_color_use_bg;
-int num_urls = 0;
 int rc_prompt_control = 0;
 time_t rc_idle_threshold = (time_t)900;
-char urls[MAXURLS][SIZ];
 char rc_url_cmd[SIZ];
 char rc_gotmail_cmd[SIZ];
 
@@ -96,7 +95,7 @@ struct citcmd *cmdlist = NULL;
 
 /* these variables are local to this module */
 char keepalives_enabled = KA_YES;      /* send NOOPs to server when idle */
-int ok_to_interrupt = 0;               /* print express msgs asynchronously */
+int ok_to_interrupt = 0;               /* print instant msgs asynchronously */
 time_t AnsiDetect;                     /* when did we send the detect code? */
 int enable_color = 0;                  /* nonzero for ANSI color */
 
@@ -159,7 +158,7 @@ int checkpagin(int lp, unsigned int pagin, unsigned int height)
        if (!pagin) return(0);
        if (lp>=(height-1)) {
                set_keepalives(KA_HALF);
-               hit_any_key();
+               hit_any_key(ipc_for_signal_handlers);   /* Cheating -IO */
                set_keepalives(KA_YES);
                return(0);
        }
@@ -201,44 +200,44 @@ void pprintf(const char *format, ...) {
 
 
 /*
- * print_express()  -  print express messages if there are any
+ * print_instant()  -  print instant messages if there are any
  */
-void print_express(void)
+void print_instant(void)
 {
        char buf[1024];
        FILE *outpipe;
        time_t timestamp;
-       struct tm *stamp;
+       struct tm stamp;
        int flags = 0;
        char sender[64];
        char node[64];
        char *listing = NULL;
        int r;                  /* IPC result code */
 
-       if (express_msgs == 0)
+       if (instant_msgs == 0)
                return;
 
        if (rc_exp_beep) {
                ctdl_beep();
        }
-       if (strlen(rc_exp_cmd) == 0) {
+       if (IsEmptyStr(rc_exp_cmd)) {
                color(BRIGHT_RED);
                scr_printf("\r---");
        }
        
-       while (express_msgs != 0) {
+       while (instant_msgs != 0) {
                r = CtdlIPCGetInstantMessage(ipc_for_signal_handlers, &listing, buf);
                if (r / 100 != 1)
                        return;
        
-               express_msgs = extract_int(buf, 0);
+               instant_msgs = extract_int(buf, 0);
                timestamp = extract_long(buf, 1);
                flags = extract_int(buf, 2);
-               extract(sender, buf, 3);
-               extract(node, buf, 4);
+               extract_token(sender, buf, 3, '|', sizeof sender);
+               extract_token(node, buf, 4, '|', sizeof node);
                strcpy(last_paged, sender);
        
-               stamp = localtime(&timestamp);
+               localtime_r(&timestamp, &stamp);
 
                /* If the page is a Logoff Request, honor it. */
                if (flags & 2) {
@@ -246,7 +245,7 @@ void print_express(void)
                        return;
                }
        
-               if (strlen(rc_exp_cmd) > 0) {
+               if (!IsEmptyStr(rc_exp_cmd)) {
                        outpipe = popen(rc_exp_cmd, "w");
                        if (outpipe != NULL) {
                                /* Header derived from flags */
@@ -260,28 +259,28 @@ void print_express(void)
                                else
                                        fprintf(outpipe, "Message ");
                                /* Timestamp.  Can this be improved? */
-                               if (stamp->tm_hour == 0 || stamp->tm_hour == 12)
+                               if (stamp.tm_hour == 0 || stamp.tm_hour == 12)
                                        fprintf(outpipe, "at 12:%02d%cm",
-                                               stamp->tm_min, 
-                                               stamp->tm_hour ? 'p' : 'a');
-                               else if (stamp->tm_hour > 12)           /* pm */
+                                               stamp.tm_min, 
+                                               stamp.tm_hour ? 'p' : 'a');
+                               else if (stamp.tm_hour > 12)            /* pm */
                                        fprintf(outpipe, "at %d:%02dpm",
-                                               stamp->tm_hour - 12,
-                                               stamp->tm_min);
+                                               stamp.tm_hour - 12,
+                                               stamp.tm_min);
                                else                                    /* am */
                                        fprintf(outpipe, "at %d:%02dam",
-                                               stamp->tm_hour, stamp->tm_min);
+                                               stamp.tm_hour, stamp.tm_min);
                                fprintf(outpipe, " from %s", sender);
-                               if (strncmp(serv_info.serv_nodename, node, 32))
+                               if (strncmp(ipc_for_signal_handlers->ServInfo.nodename, node, 32))
                                        fprintf(outpipe, " @%s", node);
                                fprintf(outpipe, ":\n%s\n", listing);
                                pclose(outpipe);
-                               if (express_msgs == 0)
+                               if (instant_msgs == 0)
                                        return;
                                continue;
                        }
                }
-               /* fall back to built-in express message display */
+               /* fall back to built-in instant message display */
                scr_printf("\n");
                lines_printed++;
 
@@ -296,20 +295,20 @@ void print_express(void)
                        scr_printf("Message ");
        
                /* Timestamp.  Can this be improved? */
-               if (stamp->tm_hour == 0 || stamp->tm_hour == 12)/* 12am/12pm */
-                       scr_printf("at 12:%02d%cm", stamp->tm_min, 
-                               stamp->tm_hour ? 'p' : 'a');
-               else if (stamp->tm_hour > 12)                   /* pm */
+               if (stamp.tm_hour == 0 || stamp.tm_hour == 12)/* 12am/12pm */
+                       scr_printf("at 12:%02d%cm", stamp.tm_min, 
+                               stamp.tm_hour ? 'p' : 'a');
+               else if (stamp.tm_hour > 12)                    /* pm */
                        scr_printf("at %d:%02dpm",
-                               stamp->tm_hour - 12, stamp->tm_min);
+                               stamp.tm_hour - 12, stamp.tm_min);
                else                                            /* am */
-                       scr_printf("at %d:%02dam", stamp->tm_hour, stamp->tm_min);
+                       scr_printf("at %d:%02dam", stamp.tm_hour, stamp.tm_min);
                
                /* Sender */
                scr_printf(" from %s", sender);
        
                /* Remote node, if any */
-               if (strncmp(serv_info.serv_nodename, node, 32))
+               if (strncmp(ipc_for_signal_handlers->ServInfo.nodename, node, 32))
                        scr_printf(" @%s", node);
        
                scr_printf(":\n");
@@ -352,15 +351,21 @@ static void really_do_keepalive(void) {
 
        time(&idlet);
 
+       /* This may sometimes get called before we are actually connected
+        * to the server.  Don't do anything if we aren't connected. -IO
+        */
+       if (!ipc_for_signal_handlers)
+               return;
+
        /* If full keepalives are enabled, send a NOOP to the server and
         * wait for a response.
         */
        if (keepalives_enabled == KA_YES) {
                r = CtdlIPCNoop(ipc_for_signal_handlers);
-               if (express_msgs > 0) {
+               if (instant_msgs > 0) {
                        if (ok_to_interrupt == 1) {
                                scr_printf("\r%64s\r", "");
-                               print_express();
+                               print_instant();
                                scr_printf("%s%c ", room_name,
                                       room_prompt(room_flags));
                                scr_flush();
@@ -372,8 +377,8 @@ static void really_do_keepalive(void) {
         * server supports it) and then do nothing.
         */
        if ( (keepalives_enabled == KA_HALF)
-          && (serv_info.serv_supports_qnop > 0) ) {
-               CtdlIPC_putline(ipc_for_signal_handlers, "QNOP");
+          && (ipc_for_signal_handlers->ServInfo.supports_qnop > 0) ) {
+               CtdlIPC_chat_send(ipc_for_signal_handlers, "QNOP");
        }
 }
 
@@ -474,9 +479,9 @@ int inkey(void)
                 * necessary and then waits again.
                 */
                do {
-                       scr_set_windowsize();
+                       scr_set_windowsize(ipc_for_signal_handlers);
                        do_keepalive();
-                       scr_set_windowsize();
+                       scr_set_windowsize(ipc_for_signal_handlers);
 
                        FD_ZERO(&rfds);
                        FD_SET(0, &rfds);
@@ -489,21 +494,28 @@ int inkey(void)
                /* At this point, there's input, so fetch it.
                 * (There's a hole in the bucket...)
                 */
-               a = scr_getc(SCR_NOBLOCK);
-               if (a == 127)
+               a = scr_getc(SCR_BLOCK);
+               if (a == 127) {
                        a = 8;
-               if (a > 126)
-                       a = 0;
-               if (a == 13)
+               }
+               if (a == 13) {
                        a = 10;
+               }
+/* not so fast there dude, we have to handle UTF-8 and ISO-8859-1...
+               if (a > 126) {
+                       a = 0;
+               }
                if (((a != 23) && (a != 4) && (a != 10) && (a != 8) && (a != NEXT_KEY) && (a != STOP_KEY))
-                   && ((a < 32) || (a > 126)))
+                   && ((a < 32) || (a > 126))) {
                        a = 0;
+               }
+ */
 
 #ifndef DISABLE_CURSES
 #if defined(HAVE_CURSES_H) || defined(HAVE_NCURSES_H)
-               if (a == ERR)
-                       a = 0;
+               if (a == ERR) {
+                       logoff(NULL, 3);
+               }
 #endif
 #endif
 
@@ -555,7 +567,7 @@ int yesno_d(int d)
 /* Gets a line from the terminal */
 /* string == Pointer to string buffer */
 /* lim == Maximum length - if negative, no-show */
-void getline(char *string, int lim) 
+void ctdl_getline(char *string, int lim) 
 {
        int a, b;
        char flag = 0;
@@ -567,9 +579,10 @@ void getline(char *string, int lim)
        strcpy(string, "");
        gl_string = string;
        async_ka_start();
-      GLA:a = inkey();
-       a = (a & 127);
-       if ((a == 8 || a == 23) && (strlen(string) == 0))
+
+GLA:   a = inkey();
+       /* a = (a & 127); ** commented out because it isn't just an ASCII world anymore */
+       if ((a == 8 || a == 23) && (IsEmptyStr(string)))
                goto GLA;
        if ((a != 10) && (a != 8) && (strlen(string) == lim))
                goto GLA;
@@ -582,7 +595,7 @@ void getline(char *string, int lim)
                do {
                        string[strlen(string) - 1] = 0;
                        scr_putc(8); scr_putc(32); scr_putc(8);
-               } while (strlen(string) && string[strlen(string) - 1] != ' ');
+               } while (!IsEmptyStr(string) && string[strlen(string) - 1] != ' ');
                goto GLA;
        }
        if ((a == 10)) {
@@ -612,7 +625,7 @@ void strprompt(char *prompt, char *str, int len)
        int i;
        char buf[128];
 
-       print_express();
+       print_instant();
        color(DIM_WHITE);
        scr_printf("%s ", prompt);
        color(DIM_MAGENTA);
@@ -633,7 +646,7 @@ void strprompt(char *prompt, char *str, int len)
        color(DIM_WHITE);
        scr_printf(": ");
        color(BRIGHT_CYAN);
-       getline(buf, len);
+       ctdl_getline(buf, len);
        if (buf[0] != 0)
                strcpy(str, buf);
        color(DIM_WHITE);
@@ -698,7 +711,7 @@ void newprompt(char *prompt, char *str, int len)
        color(BRIGHT_MAGENTA);
        scr_printf("%s", prompt);
        color(DIM_MAGENTA);
-       getline(str, len);
+       ctdl_getline(str, len);
        color(DIM_WHITE);
 }
 
@@ -719,16 +732,20 @@ void load_command_set(void)
 {
        FILE *ccfile;
        char buf[1024];
+       char editor_key[100];
        struct citcmd *cptr;
        struct citcmd *lastcmd = NULL;
        int a, d;
        int b = 0;
+       int i;
 
 
        /* first, set up some defaults for non-required variables */
 
-       strcpy(editor_path, "");
+       for (i = 0; i < MAX_EDITORS; i++)
+               strcpy(editor_paths[i], "");
        strcpy(printcmd, "");
+       strcpy(imagecmd, "");
        strcpy(rc_username, "");
        strcpy(rc_password, "");
        rc_floor_mode = 0;
@@ -758,8 +775,7 @@ void load_command_set(void)
                ccfile = fopen(buf, "r");
        }
        if (ccfile == NULL) {
-               snprintf(buf, sizeof buf, "%s/citadel.rc", BBSDIR);
-               ccfile = fopen(buf, "r");
+               ccfile = fopen(file_citadel_rc, "r");
        }
        if (ccfile == NULL) {
                ccfile = fopen("/etc/citadel.rc", "r");
@@ -772,7 +788,7 @@ void load_command_set(void)
                logoff(NULL, 3);
        }
        while (fgets(buf, sizeof buf, ccfile) != NULL) {
-               while ((strlen(buf) > 0) ? (isspace(buf[strlen(buf) - 1])) : 0)
+               while ((!IsEmptyStr(buf)) ? (isspace(buf[strlen(buf) - 1])) : 0)
                        buf[strlen(buf) - 1] = 0;
 
                if (!strncasecmp(buf, "encrypt=", 8)) {
@@ -804,11 +820,21 @@ void load_command_set(void)
 #endif
 
                if (!strncasecmp(buf, "editor=", 7))
-                       strcpy(editor_path, &buf[7]);
+                       strcpy(editor_paths[0], &buf[7]);
+
+               for (i = 0; i < MAX_EDITORS; i++)
+               {
+                       sprintf(editor_key, "editor%d=", i);
+                       if (!strncasecmp(buf, editor_key, strlen(editor_key)))
+                               strcpy(editor_paths[i], &buf[strlen(editor_key)]);
+               }
 
                if (!strncasecmp(buf, "printcmd=", 9))
                        strcpy(printcmd, &buf[9]);
 
+               if (!strncasecmp(buf, "imagecmd=", 9))
+                       strcpy(imagecmd, &buf[9]);
+
                if (!strncasecmp(buf, "expcmd=", 7))
                        strcpy(rc_exp_cmd, &buf[7]);
 
@@ -830,7 +856,7 @@ void load_command_set(void)
                        rc_allow_attachments = atoi(&buf[18]);
                }
                if (!strncasecmp(buf, "idle_threshold=", 15)) {
-                       rc_idle_threshold = atoi(&buf[15]);
+                       rc_idle_threshold = atol(&buf[15]);
                }
                if (!strncasecmp(buf, "remember_passwords=", 19)) {
                        rc_remember_passwords = atoi(&buf[19]);
@@ -872,11 +898,14 @@ void load_command_set(void)
                        strcpy(rc_gotmail_cmd, &buf[11]);
 
                if (!strncasecmp(buf, "alternate_semantics=", 20)) {
-                       if (!strncasecmp(&buf[11], "yes", 3))
+                       if (!strncasecmp(&buf[20], "yes", 3)) {
                                rc_alt_semantics = 1;
-                       if (!strncasecmp(&buf[11], "no", 2))
+                       }
+                       else {
                                rc_alt_semantics = 0;
+                       }
                }
+
                if (!strncasecmp(buf, "cmd=", 4)) {
                        strcpy(buf, &buf[4]);
 
@@ -900,7 +929,7 @@ void load_command_set(void)
                        a = 0;
                        b = 0;
                        buf[strlen(buf) + 1] = 0;
-                       while (strlen(buf) > 0) {
+                       while (!IsEmptyStr(buf)) {
                                b = strlen(buf);
                                for (d = strlen(buf); d >= 0; --d)
                                        if (buf[d] == ',')
@@ -956,8 +985,11 @@ char *cmd_expand(char *strbuf, int mode)
        for (a = 0; a < strlen(exp); ++a) {
                if (strbuf[a] == '&') {
 
+                       /* dont echo these non mnemonic command keys */
+                       int noecho = strbuf[a+1] == '<' || strbuf[a+1] == '>' || strbuf[a+1] == '+' || strbuf[a+1] == '-';
+
                        if (mode == 0) {
-                               strcpy(&exp[a], &exp[a + 1]);
+                               strcpy(&exp[a], &exp[a + 1 + noecho]);
                        }
                        if (mode == 1) {
                                exp[a] = '<';
@@ -1057,7 +1089,7 @@ int getcmd(CtdlIPC *ipc, char *argbuf)
        /* if we're running in idiot mode, display a cute little menu */
        IFNEXPERT formout(ipc, "mainmenu");
 
-       print_express();
+       print_instant();
        strcpy(argbuf, "");
        cmdpos = 0;
        for (a = 0; a < 5; ++a)
@@ -1122,7 +1154,7 @@ int getcmd(CtdlIPC *ipc, char *argbuf)
                        if (cmdmatch(cmdbuf, cptr, 5)) {
                                /* We've found our command. */
                                if (requires_string(cptr, cmdpos)) {
-                                       getline(argbuf, 32);
+                                       ctdl_getline(argbuf, 64);
                                } else {
                                        scr_printf("\n");
                                }
@@ -1139,6 +1171,13 @@ int getcmd(CtdlIPC *ipc, char *argbuf)
                                    || (cptr->c_cmdnum == 20))
                                        next_lazy_cmd = 13;
 
+                               /* If this command is "read new"
+                                * then the next lazy-command (space bar)
+                                * should be "goto"
+                                */
+                               if (cptr->c_cmdnum == 13)
+                                       next_lazy_cmd = 5;
+
                                return (cptr->c_cmdnum);
 
                        }
@@ -1149,11 +1188,13 @@ int getcmd(CtdlIPC *ipc, char *argbuf)
                        for (cptr = cmdlist; cptr != NULL; cptr = cptr->next) {
                                if (cmdmatch(cmdbuf, cptr, cmdpos)) {
                                        for (a = 0; a < 5; ++a) {
-                                               pprintf("%s ", cmd_expand(cptr->c_keys[a], 1));
+                                          keyopt(cmd_expand(cptr->c_keys[a], 1));
+                                  pprintf(" ");
                                        }
                                        pprintf("\n");
                                }
                        }
+               sigcaught = 0;
 
                        pprintf("\n%s%c ", room_name, room_prompt(room_flags));
                        got = 0;
@@ -1178,13 +1219,13 @@ int getcmd(CtdlIPC *ipc, char *argbuf)
 /*
  * set tty modes.  commands are:
  * 
- * 01- set to bbs mode
+ * 01- set to Citadel mode
  * 2 - save current settings for later restoral
  * 3 - restore saved settings
  */
 #ifdef HAVE_TERMIOS_H
-void sttybbs(int cmd)
-{                              /* SysV version of sttybbs() */
+void stty_ctdl(int cmd)
+{                              /* SysV version of stty_ctdl() */
        struct termios live;
        static struct termios saved_settings;
        static int last_cmd = 0;
@@ -1227,8 +1268,8 @@ void sttybbs(int cmd)
 
 }
 #else
-void sttybbs(int cmd)
-{                              /* BSD version of sttybbs() */
+void stty_ctdl(int cmd)
+{                              /* BSD version of stty_ctdl() */
        struct sgttyb live;
        static struct sgttyb saved_settings;
        static int last_cmd = 0;
@@ -1287,8 +1328,6 @@ int fmout(
        int column = 0;         /* Current column */
        size_t i;               /* Generic counter */
 
-       num_urls = 0;   /* Start with a clean slate of embedded URL's */
-
        /* Space for a single word, which can be at most screenwidth */
        word = (char *)calloc(1, width);
        if (!word) {
@@ -1315,6 +1354,11 @@ int fmout(
 
        /* Run the message body */
        while (*e) {
+               /* Catch characters that shouldn't be there at all */
+               if (*e == '\r') {
+                       e++;
+                       continue;
+               }
                /* First, are we looking at a newline? */
                if (*e == '\n') {
                        e++;
@@ -1338,6 +1382,15 @@ int fmout(
                        old = '\n';
                        continue;
                }
+
+               /* Are we looking at a nonprintable?
+                * (This section is now commented out because we could be displaying
+                * a character set like UTF-8 or ISO-8859-1.)
+               if ( (*e < 32) || (*e > 126) ) {
+                       e++;
+                       continue;
+               } */
+
                /* Or are we looking at a space? */
                if (*e == ' ') {
                        e++;
@@ -1380,30 +1433,6 @@ int fmout(
                if (e[i] == '\t' || e[i] == '\f' || e[i] == '\v')
                        e[i] = ' ';
 
-               /*
-                * Check for and copy URLs
-                * We will get the entire URL even if it's longer than the
-                * screen width, as long as the server didn't break it up
-                */
-               if (!strncasecmp(e, "http://", 7) ||
-                   !strncasecmp(e, "ftp://", 6)) {
-                       int j;
-
-                       strncpy(urls[num_urls], e, i);
-                       urls[num_urls][i] = 0;
-                       for (j = 0; j < strlen(e); j++) {
-                               char c;
-
-                               c = urls[num_urls][j];
-                               if (c == '>' || c == '\"' || c == ')' ||
-                                   c == ' ' || c == '\n') {
-                                       urls[num_urls][j] = 0;
-                                       break;
-                               }
-                       }
-                       num_urls++;
-               }
-
                /* Break up really long words */
                /* TODO: auto-hyphenation someday? */
                if (i >= width) 
@@ -1569,13 +1598,13 @@ void keyopt(char *buf) {
        color(DIM_WHITE);
        for (i=0; i<strlen(buf); ++i) {
                if (buf[i]=='<') {
-                       scr_putc(buf[i]);
+                       pprintf("%c", buf[i]);
                        color(BRIGHT_MAGENTA);
                } else {
-                       if (buf[i]=='>') {
+                       if (buf[i]=='>'&& buf[i+1] != '>') {
                                color(DIM_WHITE);
                        }
-                       scr_putc(buf[i]);
+                       pprintf("%c", buf[i]);
                }
        }
        color(DIM_WHITE);
@@ -1606,12 +1635,12 @@ char keymenu(char *menuprompt, char *menustring) {
                        } 
                        else {
                                for (i=0; i<choices; ++i) {
-                                       extract(buf, menustring, i);
+                                       extract_token(buf, menustring, i, '|', sizeof buf);
                                        keyopt(buf);
                                        scr_printf(" ");
                                }
                        }
-                       scr_printf(" -> ");
+                       scr_printf("-> ");
                        display_prompt = 0;
                }
                ch = lkey();
@@ -1620,7 +1649,7 @@ char keymenu(char *menuprompt, char *menustring) {
                        scr_printf("\rOne of...                               ");
                        scr_printf("                                      \n");
                        for (i=0; i<choices; ++i) {
-                               extract(buf, menustring, i);
+                               extract_token(buf, menustring, i, '|', sizeof buf);
                                scr_printf("   ");
                                keyopt(buf);
                                scr_printf("\n");
@@ -1630,7 +1659,7 @@ char keymenu(char *menuprompt, char *menustring) {
                }
 
                for (i=0; i<choices; ++i) {
-                       extract(buf, menustring, i);
+                       extract_token(buf, menustring, i, '|', sizeof buf);
                        for (c=1; c<strlen(buf); ++c) {
                                if ( (ch == tolower(buf[c]))
                                   && (buf[c-1]=='<')
@@ -1640,7 +1669,7 @@ char keymenu(char *menuprompt, char *menustring) {
                                                        scr_putc(buf[a]);
                                                }
                                        }
-                                       scr_printf("\n\n");
+                                       scr_printf("\n");
                                        return ch;
                                }
                        }