]> code.citadel.org Git - citadel.git/blobdiff - citadel/citadel.c
* Variable names, comments, documentation, etc... removed the acronym 'BBS'
[citadel.git] / citadel / citadel.c
index 471a19c2892beeff51306edd9b0ebc7391a31b99..58846072b990060cad796cc2c3f219aea416b950 100644 (file)
@@ -68,7 +68,6 @@ char editor_paths[MAX_EDITORS][SIZ];  /* paths to external editors */
 char printcmd[SIZ];            /* print command */
 int editor_pid = (-1);
 char fullname[USERNAME_SIZE];
-struct CtdlServInfo serv_info; /* Info on the server connected */
 int screenwidth;
 int screenheight;
 unsigned room_flags;
@@ -101,7 +100,7 @@ int termn8 = 0;                     /* Set to nonzero to cause a logoff */
 int secure;                    /* Set to nonzero when wire is encrypted */
 int can_do_msg4 = 0;           /* Set to nonzero if the server can handle MSG4 commands */
 
-extern char express_msgs;      /* express messages waiting! */
+extern char instant_msgs;      /* instant messages waiting! */
 extern int rc_ansi_color;      /* ansi color value from citadel.rc */
 extern int next_lazy_cmd;
 
@@ -110,7 +109,7 @@ CtdlIPC *ipc_for_signal_handlers;   /* KLUDGE cover your eyes */
 /*
  * here is our 'clean up gracefully and exit' routine
  */
-void logoff(CtdlIPC *ipc, int code)
+void ctdl_logoff(char *file, int line, CtdlIPC *ipc, int code)
 {
        int lp;
 
@@ -148,7 +147,12 @@ void logoff(CtdlIPC *ipc, int code)
                kill(0 - getpgrp(), SIGKILL);
        }
        color(ORIGINAL_PAIR);   /* Restore the old color settings */
-       sttybbs(SB_RESTORE);    /* return the old terminal settings */
+       stty_ctdl(SB_RESTORE);  /* return the old terminal settings */
+       /* 
+        * uncomment the following if you need to know why Citadel exited
+       printf("*** Exit code %d at %s:%d\n", code, file, line);
+       sleep(2);
+        */
        exit(code);             /* exit with the proper exit code */
 }
 
@@ -170,7 +174,7 @@ void dropcarr(int signum)
  */
 void catch_sigcont(int signum)
 {
-       sttybbs(SB_LAST);
+       stty_ctdl(SB_LAST);
        signal(SIGCONT, catch_sigcont);
 }
 
@@ -202,7 +206,7 @@ void userlist(CtdlIPC *ipc, char *patn)
 {
        char buf[SIZ];
        char fl[SIZ];
-       struct tm *tmbuf;
+       struct tm tmbuf;
        time_t lc;
        int r;                          /* IPC response code */
        char *listing = NULL;
@@ -216,21 +220,21 @@ void userlist(CtdlIPC *ipc, char *patn)
        pprintf("       User Name           Num  L  LastCall  Calls Posts\n");
        pprintf("------------------------- ----- - ---------- ----- -----\n");
        while (strlen(listing) > 0) {
-               extract_token(buf, listing, 0, '\n');
+               extract_token(buf, listing, 0, '\n', sizeof buf);
                remove_token(listing, 0, '\n');
 
                if (sigcaught == 0) {
-                   extract(fl, buf, 0);
+                   extract_token(fl, buf, 0, '|', sizeof fl);
                    if (pattern(fl, patn) >= 0) {
                        pprintf("%-25s ", fl);
                        pprintf("%5ld %d ", extract_long(buf, 2),
                               extract_int(buf, 1));
                        lc = extract_long(buf, 3);
-                       tmbuf = (struct tm *) localtime(&lc);
+                       localtime_r(&lc, &tmbuf);
                        pprintf("%02d/%02d/%04d ",
-                              (tmbuf->tm_mon + 1),
-                              tmbuf->tm_mday,
-                              (tmbuf->tm_year + 1900));
+                              (tmbuf.tm_mon + 1),
+                              tmbuf.tm_mday,
+                              (tmbuf.tm_year + 1900));
                        pprintf("%5ld %5ld\n", extract_long(buf, 4), extract_long(buf, 5));
                    }
 
@@ -246,7 +250,7 @@ void userlist(CtdlIPC *ipc, char *patn)
  */
 void load_user_info(char *params)
 {
-       extract(fullname, params, 0);
+       extract_token(fullname, params, 0, '|', sizeof fullname);
        axlevel = extract_int(params, 1);
        timescalled = extract_int(params, 2);
        posted = extract_int(params, 3);
@@ -480,7 +484,7 @@ void dotgoto(CtdlIPC *ipc, char *towhere, int display_name, int fromungoto)
                        system(rc_gotmail_cmd);
                }
        }
-       status_line(serv_info.serv_humannode, serv_info.serv_bbs_city,
+       status_line(ipc->ServInfo.humannode, ipc->ServInfo.site_location,
                        room_name, secure, newmailcount);
 }
 
@@ -538,28 +542,32 @@ void gotonext(CtdlIPC *ipc)
 void forget_all_rooms_on(CtdlIPC *ipc, int ffloor)
 {
        char buf[SIZ];
-       struct march *flist, *fptr;
-       struct ctdlipcroom *room;       /* Ignored */
+       struct march *flist = NULL;
+       struct march *fptr = NULL;
+       struct ctdlipcroom *room = NULL;
        int r;                          /* IPC response code */
 
-       scr_printf("Forgetting all rooms on %s...\r", &floorlist[ffloor][0]);
+       scr_printf("Forgetting all rooms on %s...\n", &floorlist[ffloor][0]);
        scr_flush();
        remove_march("_FLOOR_", ffloor);
        r = CtdlIPCKnownRooms(ipc, AllAccessibleRooms, ffloor, &flist, buf);
        if (r / 100 != 1) {
-               scr_printf("%-72s\n", buf);
+               scr_printf("Error %d: %s\n", r, buf);
                return;
        }
        while (flist) {
                r = CtdlIPCGotoRoom(ipc, flist->march_name, "", &room, buf);
                if (r / 100 == 2) {
                        r = CtdlIPCForgetRoom(ipc, buf);
+                       if (r / 100 != 2) {
+                               scr_printf("Error %d: %s\n", r, buf);
+                       }
+
                }
                fptr = flist;
                flist = flist->next;
                free(fptr);
        }
-       scr_printf("%-72s\r", "");
 }
 
 
@@ -572,15 +580,15 @@ void gf_toroom(CtdlIPC *ipc, char *towhere, int mode)
 
        floor_being_left = curr_floor;
 
-       if (mode == GF_GOTO) {  /* <;G>oto mode */
+       if (mode == GF_GOTO) {          /* <;G>oto mode */
                updatels(ipc);
                dotgoto(ipc, towhere, 1, 0);
        }
-       if (mode == GF_SKIP) {  /* <;S>kip mode */
+       else if (mode == GF_SKIP) {     /* <;S>kip mode */
                dotgoto(ipc, towhere, 1, 0);
                remove_march("_FLOOR_", floor_being_left);
        }
-       if (mode == GF_ZAP) {   /* <;Z>ap mode */
+       else if (mode == GF_ZAP) {      /* <;Z>ap mode */
                dotgoto(ipc, towhere, 1, 0);
                remove_march("_FLOOR_", floor_being_left);
                forget_all_rooms_on(ipc, floor_being_left);
@@ -622,11 +630,36 @@ void gotofloor(CtdlIPC *ipc, char *towhere, int mode)
                return;
        }
        for (mptr = march; mptr != NULL; mptr = mptr->next) {
-               if ((mptr->march_floor) == tofloor)
+               if ((mptr->march_floor) == tofloor) {
                        gf_toroom(ipc, mptr->march_name, mode);
+                       return;
+               }
+       }
+
+       /* Find first known room on the floor */
+
+       strcpy(targ, "");
+       mptr = NULL;
+       r = CtdlIPCKnownRooms(ipc, SubscribedRooms, tofloor, &mptr, buf);
+       if (r / 100 == 1) {
+               struct march *tmp = mptr;
+
+               /* TODO: room order is being ignored? */
+               if (mptr)
+                       strncpy(targ, mptr->march_name, ROOMNAMELEN);
+               while (mptr) {
+                       tmp = mptr->next;
+                       free(mptr);
+                       mptr = tmp;
+               }
+       }
+       if (strlen(targ) > 0) {
+               gf_toroom(ipc, targ, mode);
                return;
        }
 
+       /* No known rooms on the floor; unzap the first one then */
+
        strcpy(targ, "");
        mptr = NULL;
        r = CtdlIPCKnownRooms(ipc, AllAccessibleRooms, tofloor, &mptr, buf);
@@ -655,17 +688,18 @@ void gotofloor(CtdlIPC *ipc, char *towhere, int mode)
  */
 void forget_this_floor(CtdlIPC *ipc)
 {
-
        if (curr_floor == 0) {
                scr_printf("Can't forget this floor.\n");
                return;
        }
-       if (floorlist[0][0] == 0)
+       if (floorlist[0][0] == 0) {
                load_floorlist(ipc);
+       }
        scr_printf("Are you sure you want to forget all rooms on %s? ",
               &floorlist[(int) curr_floor][0]);
-       if (yesno() == 0)
+       if (yesno() == 0) {
                return;
+       }
 
        gf_toroom(ipc, "_BASEROOM_", GF_ZAP);
 }
@@ -700,9 +734,9 @@ void check_screen_dims(void)
 /*
  * set floor mode depending on client, server, and user settings
  */
-void set_floor_mode(void)
+void set_floor_mode(CtdlIPC* ipc)
 {
-       if (serv_info.serv_ok_floors == 0) {
+       if (ipc->ServInfo.ok_floors == 0) {
                floor_mode = 0; /* Don't use floors if the server */
        }
        /* doesn't support them!          */
@@ -758,14 +792,14 @@ void get_serv_info(CtdlIPC *ipc, char *supplied_hostname)
 {
        char buf[SIZ];
 
-       CtdlIPCServerInfo(ipc, &serv_info, buf);
+       CtdlIPCServerInfo(ipc, buf);
 
        /* be nice and identify ourself to the server */
        CtdlIPCIdentifySoftware(ipc, SERVER_TYPE, 0, REV_LEVEL,
                 (ipc->isLocal ? "local" : CITADEL),
                 (supplied_hostname) ? supplied_hostname : 
                 /* Look up the , in the bible if you're confused */
-                (locate_host(buf), buf), buf);
+                (locate_host(ipc, buf), buf), buf);
 
        /* Tell the server what our preferred content formats are */
        if ((CtdlIPCSpecifyPreferredFormats(ipc, buf, "text/html|text/plain") / 100 )== 2) {
@@ -814,8 +848,8 @@ char *SortOnlineUsers(char *listing) {
        /* Copy the list into a fixed-record-size array for sorting */
        for (i=0; i<rows; ++i) {
                memset(buf, 0, SIZ);
-               extract_token(buf, listing, i, '\n');
-               memcpy(&sortbuf[i*SIZ], buf, SIZ);
+               extract_token(buf, listing, i, '\n', sizeof buf);
+               memcpy(&sortbuf[i*SIZ], buf, (size_t)SIZ);
        }
 
        /* Do the sort */
@@ -866,14 +900,14 @@ void who_is_online(CtdlIPC *ipc, int longlist)
                        int isidle = 0;
                        
                        /* Get another line */
-                       extract_token(buf, listing, 0, '\n');
+                       extract_token(buf, listing, 0, '\n', sizeof buf);
                        remove_token(listing, 0, '\n');
 
-                       extract(username, buf, 1);
-                       extract(roomname, buf, 2);
-                       extract(fromhost, buf, 3);
-                       extract(clientsoft, buf, 4);
-                       extract(flags, buf, 7);
+                       extract_token(username, buf, 1, '|', sizeof username);
+                       extract_token(roomname, buf, 2, '|', sizeof roomname);
+                       extract_token(fromhost, buf, 3, '|', sizeof fromhost);
+                       extract_token(clientsoft, buf, 4, '|', sizeof clientsoft);
+                       extract_token(flags, buf, 7, '|', sizeof flags);
 
                        idletime = timenow - extract_long(buf, 5);
                        idlehours = idletime / 3600;
@@ -892,9 +926,9 @@ void who_is_online(CtdlIPC *ipc, int longlist)
                        }
 
                        if (longlist) {
-                               extract(actual_user, buf, 8);
-                               extract(actual_room, buf, 9);
-                               extract(actual_host, buf, 10);
+                               extract_token(actual_user, buf, 8, '|', sizeof actual_user);
+                               extract_token(actual_room, buf, 9, '|', sizeof actual_room);
+                               extract_token(actual_host, buf, 10, '|', sizeof actual_host);
 
                                pprintf("  Flags: %s\n", flags);
                                pprintf("Session: %d\n", extract_int(buf, 0));
@@ -1020,10 +1054,11 @@ int main(int argc, char **argv)
                logoff(NULL, 3);
        }
 
-       sttybbs(SB_SAVE);       /* Store the old terminal parameters */
+       stty_ctdl(SB_SAVE);     /* Store the old terminal parameters */
        load_command_set();     /* parse the citadel.rc file */
-       sttybbs(SB_NO_INTR);    /* Install the new ones */
-       signal(SIGHUP, dropcarr);       /* Cleanup gracefully if carrier is dropped */
+       stty_ctdl(SB_NO_INTR);  /* Install the new ones */
+       /* signal(SIGHUP, dropcarr);FIXME */    /* Cleanup gracefully if carrier is dropped */
+       signal(SIGPIPE, dropcarr);      /* Cleanup gracefully if local conn. dropped */
        signal(SIGTERM, dropcarr);      /* Cleanup gracefully if terminated */
        signal(SIGCONT, catch_sigcont); /* Catch SIGCONT so we can reset terminal */
 #ifdef SIGWINCH
@@ -1076,8 +1111,8 @@ int main(int argc, char **argv)
                if (!strcmp(argv[a], "-p")) {
                        struct stat st;
                
-                       if (chdir(BBSDIR) < 0) {
-                               perror("can't change to " BBSDIR);
+                       if (chdir(CTDLDIR) < 0) {
+                               perror("can't change to " CTDLDIR);
                                logoff(NULL, 3);
                        }
 
@@ -1087,7 +1122,7 @@ int main(int argc, char **argv)
                         * guaranteed to have the uid/gid we want.
                         */
                        if (!getuid() || !getgid()) {
-                               if (stat(BBSDIR "/citadel.config", &st) < 0) {
+                               if (stat(CTDLDIR "/citadel.config", &st) < 0) {
                                        perror("couldn't stat citadel.config");
                                        logoff(NULL, 3);
                                }
@@ -1127,7 +1162,7 @@ int main(int argc, char **argv)
 #endif
        ipc_for_signal_handlers = ipc;  /* KLUDGE cover your eyes */
 
-       CtdlIPC_getline(ipc, aaa);
+       CtdlIPC_chat_recv(ipc, aaa);
        if (aaa[0] != '2') {
                scr_printf("%s\n", &aaa[4]);
                logoff(ipc, atoi(aaa));
@@ -1151,7 +1186,7 @@ int main(int argc, char **argv)
                                {
                                        sptr2++;
                                        *sptr2 = '\0';
-                                       strncpy(nonce, sptr, NONCE_SIZE);
+                                       strncpy(nonce, sptr, (size_t)NONCE_SIZE);
                                }
                }
 
@@ -1167,11 +1202,11 @@ int main(int argc, char **argv)
 #endif
 
        get_serv_info(ipc, telnet_client_host);
-       scr_printf("%-24s\n%s\n%s\n", serv_info.serv_software, serv_info.serv_humannode,
-                  serv_info.serv_bbs_city);
+       scr_printf("%-24s\n%s\n%s\n", ipc->ServInfo.software, ipc->ServInfo.humannode,
+                  ipc->ServInfo.site_location);
        scr_flush();
 
-       status_line(serv_info.serv_humannode, serv_info.serv_bbs_city, NULL,
+       status_line(ipc->ServInfo.humannode, ipc->ServInfo.site_location, NULL,
                    secure, -1);
 
        screenwidth = 80;       /* default screen dimensions */
@@ -1258,7 +1293,8 @@ int main(int argc, char **argv)
 
 NEWUSR:        if (strlen(rc_password) == 0) {
                scr_printf("'%s' not found.\n"
-                       "Do you want to create a new account with this name? ");
+                       "Do you want to create a new account with this name? ",
+                       fullname);
                if (yesno() == 0)
                        goto GSTA;
        }
@@ -1347,7 +1383,7 @@ NEWUSR:   if (strlen(rc_password) == 0) {
        check_screen_dims();
 #endif
 
-       set_floor_mode();
+       set_floor_mode(ipc);
 
        /* Enter the lobby */
        dotgoto(ipc, "_BASEROOM_", 1, 0);
@@ -1383,14 +1419,16 @@ NEWUSR: if (strlen(rc_password) == 0) {
                                entmsg(ipc, 0, 2);
                                break;
                        case 78:
-                               newprompt("What do you want your username to be? ", aaa, 32);
-                               snprintf(bbb, sizeof bbb, "ENT0 2|0|0|0|%s", aaa);
-                               CtdlIPC_putline(ipc, bbb);
-                               CtdlIPC_getline(ipc, aaa);
-                               if (strncmp("200", aaa, 3))
-                                       scr_printf("\n%s\n", aaa);
-                               else
-                                       entmsg(ipc, 0, 0);
+                               {
+                                       /* Only m.author is used */
+                                       struct ctdlipcmessage m;
+                                       newprompt("What do you want your username to be? ", m.author, USERNAME_SIZE - 1);
+                                       r = CtdlIPCPostMessage(ipc, 2, &m, aaa);
+                                       if (r / 100 != 2)
+                                               scr_printf("%s\n", aaa);
+                                       else
+                                               entmsg(ipc, 0, 0);
+                               }
                                break;
                        case 5:                         /* <G>oto */
                                updatels(ipc);
@@ -1425,7 +1463,7 @@ NEWUSR:   if (strlen(rc_password) == 0) {
                                        dotgoto(ipc, argbuf, 0, 0);
                                }
                                break;
-                       case 95: /* what exactly is the numbering scheme supposed to be anyway? */
+                       case 95: /* what exactly is the numbering scheme supposed to be anyway? --Ford, there isn't one. -IO */
                                dotungoto(ipc, argbuf);
                                break;
                        case 10:
@@ -1546,19 +1584,19 @@ NEWUSR: if (strlen(rc_password) == 0) {
                                enternew(ipc, "roomname", aaa, 20);
                                r = CtdlIPCChangeRoomname(ipc, aaa, bbb);
                                if (r / 100 != 2)
-                                       scr_printf("\n%s\n", aaa);
+                                       scr_printf("\n%s\n", bbb);
                                break;
                        case 76:
                                enternew(ipc, "hostname", aaa, 25);
                                r = CtdlIPCChangeHostname(ipc, aaa, bbb);
                                if (r / 100 != 2)
-                                       scr_printf("\n%s\n", aaa);
+                                       scr_printf("\n%s\n", bbb);
                                break;
                        case 77:
                                enternew(ipc, "username", aaa, 32);
                                r = CtdlIPCChangeUsername(ipc, aaa, bbb);
                                if (r / 100 != 2)
-                                       scr_printf("\n%s\n", aaa);
+                                       scr_printf("\n%s\n", bbb);
                                break;
 
                        case 35:
@@ -1657,12 +1695,12 @@ NEWUSR: if (strlen(rc_password) == 0) {
                        case 2:
                                if (ipc->isLocal) {
                                        screen_reset();
-                                       sttybbs(SB_RESTORE);
+                                       stty_ctdl(SB_RESTORE);
                                        snprintf(aaa, sizeof aaa, "USERNAME=\042%s\042; export USERNAME;"
                                                 "exec ./subsystem %ld %d %d", fullname,
                                                 usernum, screenwidth, axlevel);
                                        ka_system(aaa);
-                                       sttybbs(SB_NO_INTR);
+                                       stty_ctdl(SB_NO_INTR);
                                        screen_set();
                                } else {
                                        scr_printf("*** Can't run doors when server is not local.\n");
@@ -1707,12 +1745,12 @@ NEWUSR: if (strlen(rc_password) == 0) {
 
                        case 37:
                                enter_config(ipc, 0);
-                               set_floor_mode();
+                               set_floor_mode(ipc);
                                break;
 
                        case 59:
                                enter_config(ipc, 3);
-                               set_floor_mode();
+                               set_floor_mode(ipc);
                                break;
 
                        case 60:
@@ -1748,7 +1786,11 @@ NEWUSR:  if (strlen(rc_password) == 0) {
                                break;
 
                        case 25:
-                               edituser(ipc);
+                               edituser(ipc, 25);
+                               break;
+
+                       case 96:
+                               edituser(ipc, 96);
                                break;
 
                        case 8:
@@ -1817,7 +1859,7 @@ TERMN8:   scr_printf("%s logged out.", fullname);
        CtdlIPCLogout(ipc);
        if ((mcmd == 29) || (mcmd == 15)) {
                screen_delete();
-               sttybbs(SB_RESTORE);
+               stty_ctdl(SB_RESTORE);
                formout(ipc, "goodbye");
                logoff(ipc, 0);
        }