]> code.citadel.org Git - citadel.git/blobdiff - citadel/rooms.c
* Bug fixes: Fix numerous char array size mismatches, signed/unsigned
[citadel.git] / citadel / rooms.c
index 7c390c32c65fed0a596860992667a34c9d509191..84a4ee23e1401f2a19f9ff70264236d7b445970a 100644 (file)
@@ -21,6 +21,7 @@
 #include <stdarg.h>
 #include "citadel.h"
 #include "citadel_ipc.h"
+#include "citadel_decls.h"
 #include "rooms.h"
 #include "commands.h"
 #include "tools.h"
 
 void sttybbs(int cmd);
 void hit_any_key(void);
-int yesno(void);
-void strprompt(char *prompt, char *str, int len);
-void newprompt(char *prompt, char *str, int len);
-void dotgoto(char *towhere, int display_name, int fromungoto);
-void serv_read(char *buf, int bytes);
-void formout(char *name);
-int inkey(void);
-void progress(long int curr, long int cmax);
+void dotgoto(CtdlIPC *ipc, char *towhere, int display_name, int fromungoto);
+void progress(unsigned long curr, unsigned long cmax);
 int pattern(char *search, char *patn);
 int file_checksum(char *filename);
 int nukedir(char *dirname);
@@ -56,7 +51,6 @@ extern char editor_path[];
 extern int screenwidth;
 extern int screenheight;
 extern char fullname[];
-extern int userflags;
 extern char sigcaught;
 extern char floor_mode;
 extern char curr_floor;
@@ -71,7 +65,7 @@ extern int uglistsize;
 extern char floorlist[128][SIZ];
 
 
-void load_floorlist(void)
+void load_floorlist(CtdlIPC *ipc)
 {
        int a;
        char buf[SIZ];
@@ -81,16 +75,17 @@ void load_floorlist(void)
        for (a = 0; a < 128; ++a)
                floorlist[a][0] = 0;
 
-       r = CtdlIPCFloorListing(&listing, buf);
+       r = CtdlIPCFloorListing(ipc, &listing, buf);
        if (r / 100 != 1) {
                strcpy(floorlist[0], "Main Floor");
                return;
        }
        while (*listing && strlen(listing)) {
                extract_token(buf, listing, 0, '\n');
-               strcpy(listing, &listing[strlen(buf) + 1]);
+               remove_token(listing, 0, '\n');
                extract(floorlist[extract_int(buf, 0)], buf, 1);
        }
+       free(listing);
 }
 
 
@@ -171,30 +166,34 @@ int rordercmp(struct roomlisting *r1, struct roomlisting *r2)
 /*
  * Common code for all room listings
  */
-void listrms(char *variety)
+static void listrms(CtdlIPC *ipc, enum RoomList variety, int floor)
 {
        char buf[SIZ];
-
+       struct march *listing = NULL;
+       struct march *tmp = NULL;
        struct roomlisting *rl = NULL;
        struct roomlisting *rp;
        struct roomlisting *rs;
-
+       int r;          /* IPC response code */
 
        /* Ask the server for a room list */
-       serv_puts(variety);
-       serv_gets(buf);
-       if (buf[0] != '1') {
+       r = CtdlIPCKnownRooms(ipc, variety, floor, &listing, buf);
+       if (r / 100 != 1) {
                return;
        }
-       while (serv_gets(buf), strcmp(buf, "000")) {
+       while (listing) {
                rp = malloc(sizeof(struct roomlisting));
-               extract(rp->rlname, buf, 0);
-               rp->rlflags = extract_int(buf, 1);
-               rp->rlfloor = extract_int(buf, 2);
-               rp->rlorder = extract_int(buf, 3);
+               strncpy(rp->rlname, listing->march_name, ROOMNAMELEN);
+               rp->rlflags = listing->march_flags;
+               rp->rlfloor = listing->march_floor;
+               rp->rlorder = listing->march_order;
                rp->lnext = NULL;
                rp->rnext = NULL;
 
+               tmp = listing->next;
+               free(listing);
+               listing = tmp;
+
                rs = rl;
                if (rl == NULL) {
                        rl = rp;
@@ -247,20 +246,19 @@ void list_other_floors(void)
  * List known rooms.  kn_floor_mode should be set to 0 for a 'flat' listing,
  * 1 to list rooms on the current floor, or 1 to list rooms on all floors.
  */
-void knrooms(int kn_floor_mode)
+void knrooms(CtdlIPC *ipc, int kn_floor_mode)
 {
-       char buf[SIZ];
        int a;
 
-       load_floorlist();
+       load_floorlist(ipc);
 
        if (kn_floor_mode == 0) {
                color(BRIGHT_CYAN);
                pprintf("\n   Rooms with unread messages:\n");
-               listrms("LKRN");
+               listrms(ipc, SubscribedRoomsWithNewMessages, -1);
                color(BRIGHT_CYAN);
                pprintf("\n\n   No unseen messages in:\n");
-               listrms("LKRO");
+               listrms(ipc, SubscribedRoomsWithNoNewMessages, -1);
                pprintf("\n");
        }
 
@@ -268,13 +266,11 @@ void knrooms(int kn_floor_mode)
                color(BRIGHT_CYAN);
                pprintf("\n   Rooms with unread messages on %s:\n",
                        floorlist[(int) curr_floor]);
-               snprintf(buf, sizeof buf, "LKRN %d", curr_floor);
-               listrms(buf);
+               listrms(ipc, SubscribedRoomsWithNewMessages, curr_floor);
                color(BRIGHT_CYAN);
                pprintf("\n\n   Rooms with no new messages on %s:\n",
                        floorlist[(int) curr_floor]);
-               snprintf(buf, sizeof buf, "LKRO %d", curr_floor);
-               listrms(buf);
+               listrms(ipc, SubscribedRoomsWithNoNewMessages, curr_floor);
                color(BRIGHT_CYAN);
                pprintf("\n\n   Other floors:\n");
                list_other_floors();
@@ -287,8 +283,7 @@ void knrooms(int kn_floor_mode)
                                color(BRIGHT_CYAN);
                                pprintf("\n   Rooms on %s:\n",
                                        floorlist[a]);
-                               snprintf(buf, sizeof buf, "LKRA %d", a);
-                               listrms(buf);
+                               listrms(ipc, AllAccessibleRooms, a);
                                pprintf("\n");
                        }
                }
@@ -299,18 +294,18 @@ void knrooms(int kn_floor_mode)
 }
 
 
-void listzrooms(void)
+void listzrooms(CtdlIPC *ipc)
 {                              /* list public forgotten rooms */
        color(BRIGHT_CYAN);
        pprintf("\n   Forgotten public rooms:\n");
-       listrms("LZRM");
+       listrms(ipc, UnsubscribedRooms, -1);
        pprintf("\n");
        color(DIM_WHITE);
        IFNEXPERT hit_any_key();
 }
 
 
-int set_room_attr(int ibuf, char *prompt, unsigned int sbit)
+int set_room_attr(CtdlIPC *ipc, unsigned int ibuf, char *prompt, unsigned int sbit)
 {
        int a;
 
@@ -329,21 +324,20 @@ int set_room_attr(int ibuf, char *prompt, unsigned int sbit)
  * The supplied argument is the 'default' floor number.
  * This function returns the selected floor number.
  */
-int select_floor(int rfloor)
+int select_floor(CtdlIPC *ipc, int rfloor)
 {
        int a, newfloor;
        char floorstr[SIZ];
 
        if (floor_mode == 1) {
                if (floorlist[(int) curr_floor][0] == 0) {
-                       load_floorlist();
+                       load_floorlist(ipc);
                }
 
                do {
                        newfloor = (-1);
                        safestrncpy(floorstr, floorlist[rfloor],
                                    sizeof floorstr);
-                       strprompt("Which floor", floorstr, SIZ);
                        for (a = 0; a < 128; ++a) {
                                if (!strcasecmp
                                    (floorstr, &floorlist[a][0]))
@@ -380,43 +374,28 @@ int select_floor(int rfloor)
 /*
  * .<A>ide <E>dit room
  */
-void editthisroom(void)
+void editthisroom(CtdlIPC *ipc)
 {
-       char rname[ROOMNAMELEN];
-       char rpass[10];
-       char rdir[15];
-       unsigned rflags;
-       int rbump;
-       char raide[32];
+       int rbump = 0;
+       char raide[USERNAME_SIZE];
        char buf[SIZ];
-       int rfloor;
-       int rorder;
-       int expire_mode = 0;
-       int expire_value = 0;
+       struct quickroom *attr = NULL;
+       struct ExpirePolicy *eptr = NULL;
+       int r;                          /* IPC response code */
 
        /* Fetch the existing room config */
-       serv_puts("GETR");
-       serv_gets(buf);
-       if (buf[0] != '2') {
-               scr_printf("%s\n", &buf[4]);
+       r = CtdlIPCGetRoomAttributes(ipc, &attr, buf);
+       if (r / 100 != 2) {
+               scr_printf("%s\n", buf);
                return;
        }
-
-       extract(rname, &buf[4], 0);
-       extract(rpass, &buf[4], 1);
-       extract(rdir, &buf[4], 2);
-       rflags = extract_int(&buf[4], 3);
-       rfloor = extract_int(&buf[4], 4);
-       rorder = extract_int(&buf[4], 5);
-       rbump = 0;
+       eptr = &(attr->QRep);
 
        /* Fetch the name of the current room aide */
-       serv_puts("GETA");
-       serv_gets(buf);
-       if (buf[0] == '2') {
-               safestrncpy(raide, &buf[4], sizeof raide);
-       }
-       else {
+       r = CtdlIPCGetRoomAide(ipc, buf);
+       if (r / 100 == 2) {
+               safestrncpy(raide, buf, sizeof raide);
+       } else {
                strcpy(raide, "");
        }
        if (strlen(raide) == 0) {
@@ -426,76 +405,71 @@ void editthisroom(void)
        /* Fetch the expire policy (this will silently fail on old servers,
         * resulting in "default" policy)
         */
-       serv_puts("GPEX room");
-       serv_gets(buf);
-       if (buf[0] == '2') {
-               expire_mode = extract_int(&buf[4], 0);
-               expire_value = extract_int(&buf[4], 1);
-       }
+       r = CtdlIPCGetMessageExpirationPolicy(ipc, 0, &eptr, buf);
 
        /* Now interact with the user. */
-       strprompt("Room name", rname, ROOMNAMELEN - 1);
 
-       rfloor = select_floor(rfloor);
-       rflags = set_room_attr(rflags, "Private room", QR_PRIVATE);
-       if (rflags & QR_PRIVATE) {
-               rflags = set_room_attr(rflags,
+       attr->QRfloor = select_floor(ipc, attr->QRfloor);
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Private room", QR_PRIVATE);
+       if (attr->QRflags & QR_PRIVATE) {
+               attr->QRflags = set_room_attr(ipc, attr->QRflags,
                                       "Accessible by guessing room name",
                                       QR_GUESSNAME);
        }
 
        /* if it's public, clear the privacy classes */
-       if ((rflags & QR_PRIVATE) == 0) {
-               if (rflags & QR_GUESSNAME) {
-                       rflags = rflags - QR_GUESSNAME;
+       if ((attr->QRflags & QR_PRIVATE) == 0) {
+               if (attr->QRflags & QR_GUESSNAME) {
+                       attr->QRflags = attr->QRflags - QR_GUESSNAME;
                }
-               if (rflags & QR_PASSWORDED) {
-                       rflags = rflags - QR_PASSWORDED;
+               if (attr->QRflags & QR_PASSWORDED) {
+                       attr->QRflags = attr->QRflags - QR_PASSWORDED;
                }
        }
 
        /* if it's private, choose the privacy classes */
-       if ((rflags & QR_PRIVATE)
-           && ((rflags & QR_GUESSNAME) == 0)) {
-               rflags = set_room_attr(rflags,
+       if ((attr->QRflags & QR_PRIVATE)
+           && ((attr->QRflags & QR_GUESSNAME) == 0)) {
+               attr->QRflags = set_room_attr(ipc, attr->QRflags,
                                       "Accessible by entering a password",
                                       QR_PASSWORDED);
        }
-       if ((rflags & QR_PRIVATE)
-           && ((rflags & QR_PASSWORDED) == QR_PASSWORDED)) {
-               strprompt("Room password", rpass, 9);
+       if ((attr->QRflags & QR_PRIVATE)
+           && ((attr->QRflags & QR_PASSWORDED) == QR_PASSWORDED)) {
+               strprompt("Room password", attr->QRpasswd, 9);
        }
 
-       if ((rflags & QR_PRIVATE) == QR_PRIVATE) {
-               rbump =
-                   boolprompt("Cause current users to forget room", 0);
+       if ((attr->QRflags & QR_PRIVATE) == QR_PRIVATE) {
+               rbump = boolprompt("Cause current users to forget room", 0);
        }
 
-       rflags =
-           set_room_attr(rflags, "Preferred users only", QR_PREFONLY);
-       rflags = set_room_attr(rflags, "Read-only room", QR_READONLY);
-       rflags = set_room_attr(rflags, "Directory room", QR_DIRECTORY);
-       rflags = set_room_attr(rflags, "Permanent room", QR_PERMANENT);
-       if (rflags & QR_DIRECTORY) {
-               strprompt("Directory name", rdir, 14);
-               rflags =
-                   set_room_attr(rflags, "Uploading allowed", QR_UPLOAD);
-               rflags =
-                   set_room_attr(rflags, "Downloading allowed",
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Preferred users only", QR_PREFONLY);
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Read-only room", QR_READONLY);
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Directory room", QR_DIRECTORY);
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Permanent room", QR_PERMANENT);
+       if (attr->QRflags & QR_DIRECTORY) {
+               strprompt("Directory name", attr->QRdirname, 14);
+               attr->QRflags =
+                   set_room_attr(ipc, attr->QRflags, "Uploading allowed", QR_UPLOAD);
+               attr->QRflags =
+                   set_room_attr(ipc, attr->QRflags, "Downloading allowed",
                                  QR_DOWNLOAD);
-               rflags =
-                   set_room_attr(rflags, "Visible directory", QR_VISDIR);
-       }
-       rflags = set_room_attr(rflags, "Network shared room", QR_NETWORK);
-       rflags = set_room_attr(rflags,
+               attr->QRflags =
+                   set_room_attr(ipc, attr->QRflags, "Visible directory", QR_VISDIR);
+       }
+       attr->QRflags = set_room_attr(ipc, attr->QRflags, "Network shared room", QR_NETWORK);
+       attr->QRflags2 = set_room_attr(ipc, attr->QRflags2,
+                               "Self-service list subscribe/unsubscribe",
+                               QR2_SELFLIST);
+       attr->QRflags = set_room_attr(ipc, attr->QRflags,
                               "Automatically make all messages anonymous",
                               QR_ANONONLY);
-       if ((rflags & QR_ANONONLY) == 0) {
-               rflags = set_room_attr(rflags,
+       if ((attr->QRflags & QR_ANONONLY) == 0) {
+               attr->QRflags = set_room_attr(ipc, attr->QRflags,
                                       "Ask users whether to make messages anonymous",
                                       QR_ANONOPT);
        }
-       rorder = intprompt("Listing order", rorder, 1, 127);
+       attr->QRorder = intprompt("Listing order", attr->QRorder, 1, 127);
 
        /* Ask about the room aide */
        do {
@@ -504,7 +478,7 @@ void editthisroom(void)
                        strcpy(raide, "");
                        break;
                } else {
-                       r = CtdlIPCQueryUsername(raide, buf);
+                       r = CtdlIPCQueryUsername(ipc, raide, buf);
                        if (r / 100 != 2)
                                scr_printf("%s\n", buf);
                }
@@ -517,7 +491,7 @@ void editthisroom(void)
 
        /* Angels and demons dancing in my head... */
        do {
-               snprintf(buf, sizeof buf, "%d", expire_mode);
+               snprintf(buf, sizeof buf, "%d", attr->QRep.expire_mode);
                strprompt("Message expire policy (? for list)", buf, 1);
                if (buf[0] == '?') {
                        scr_printf("\n"
@@ -527,142 +501,122 @@ void editthisroom(void)
                                "3. Expire by message age\n");
                }
        } while ((buf[0] < 48) || (buf[0] > 51));
-       expire_mode = buf[0] - 48;
+       attr->QRep.expire_mode = buf[0] - 48;
 
        /* ...lunatics and monsters underneath my bed */
-       if (expire_mode == 2) {
-               snprintf(buf, sizeof buf, "%d", expire_value);
+       if (attr->QRep.expire_mode == 2) {
+               snprintf(buf, sizeof buf, "%d", attr->QRep.expire_value);
                strprompt("Keep how many messages online?", buf, 10);
-               expire_value = atol(buf);
+               attr->QRep.expire_value = atol(buf);
        }
 
-       if (expire_mode == 3) {
-               snprintf(buf, sizeof buf, "%d", expire_value);
+       if (attr->QRep.expire_mode == 3) {
+               snprintf(buf, sizeof buf, "%d", attr->QRep.expire_value);
                strprompt("Keep messages for how many days?", buf, 10);
-               expire_value = atol(buf);
+               attr->QRep.expire_value = atol(buf);
        }
 
        /* Give 'em a chance to change their minds */
        scr_printf("Save changes (y/n)? ");
 
        if (yesno() == 1) {
-               r = CtdlIPCSetRoomAide(raide, buf);
-               if (r != 2) {
+               r = CtdlIPCSetRoomAide(ipc, raide, buf);
+               if (r / 100 != 2) {
                        scr_printf("%s\n", buf);
                }
 
-               r = CtdlIPCSetMessageExpirationPolicy(0, expire_mode,
-                                                     expire_value, buf);
+               r = CtdlIPCSetMessageExpirationPolicy(ipc, 0, eptr, buf);
+               if (r / 100 != 2) {
+                       scr_printf("%s\n", buf);
+               }
 
-               snprintf(buf, sizeof buf, "SETR %s|%s|%s|%d|%d|%d|%d",
-                        rname, rpass, rdir, rflags, rbump, rfloor,
-                        rorder);
-               serv_puts(buf);
-               serv_gets(buf);
-               scr_printf("%s\n", &buf[4]);
-               if (buf[0] == '2')
-                       dotgoto(rname, 2, 0);
+               r = CtdlIPCSetRoomAttributes(ipc, rbump, attr, buf);
+               scr_printf("%s\n", buf);
+               strncpy(buf, attr->QRname, ROOMNAMELEN);
+               free(attr);
+               if (r / 100 == 2)
+                       dotgoto(ipc, buf, 2, 0);
        }
+       else free(attr);
 }
 
 
 /*
  * un-goto the previous room
  */
-void ungoto(void)
+void ungoto(CtdlIPC *ipc)
 {
        char buf[SIZ];
-       int r;                          /* IPC response code */
 
        if (uglistsize == 0)
                return;
 
        snprintf(buf, sizeof buf, "GOTO %s", uglist[uglistsize-1]); 
-       serv_puts(buf);
-       serv_gets(buf);
+       CtdlIPC_putline(ipc, buf);
+       CtdlIPC_getline(ipc, buf);
        if (buf[0] != '2') {
                scr_printf("%s\n", &buf[4]);
                return;
        }
        snprintf(buf, sizeof buf, "SLRP %ld", uglistlsn[uglistsize-1]); 
-       serv_puts(buf);
-       serv_gets(buf);
+       CtdlIPC_putline(ipc, buf);
+       CtdlIPC_getline(ipc, buf);
        if (buf[0] != '2') {
                scr_printf("%s\n", &buf[4]);
        }
     safestrncpy (buf, uglist[uglistsize-1], sizeof(buf));
     uglistsize--;
     free(uglist[uglistsize]);
-       dotgoto(buf, 0, 1); /* Don't queue ungoto info or we end up in a loop */
+       /* Don't queue ungoto info or we end up in a loop */
+       dotgoto(ipc, buf, 0, 1);
 }
 
 
-/* Here's the code for simply transferring the file to the client,
- * for folks who have their own clientware.  It's a lot simpler than
- * the [XYZ]modem code below...
- * (This function assumes that a download file is already open on the server)
+/*
+ * saves filelen bytes from file at pathname
  */
-void download_to_local_disk(char *supplied_filename, long total_bytes)
+int save_buffer(void *file, size_t filelen, const char *pathname)
 {
-       char buf[SIZ];
-       char dbuf[4096];
-       long transmitted_bytes = 0L;
-       long aa, bb;
-       FILE *savefp;
-       int broken = 0;
-       int packet;
-       char filename[SIZ];
+       size_t block = 0;
+       size_t bytes_written = 0;
+       FILE *fp;
 
-       strcpy(filename, supplied_filename);
-       if (strlen(filename) == 0) {
-               newprompt("Filename: ", filename, 250);
+       fp = fopen(pathname, "w");
+       if (!fp) {
+               err_printf("Cannot open '%s': %s\n", pathname, strerror(errno));
+               return 0;
        }
+       do {
+               block = fwrite(file + bytes_written, 1,
+                               filelen - bytes_written, fp);
+               bytes_written += block;
+       } while (errno == EINTR && bytes_written < filelen);
+       fclose(fp);
 
-       scr_printf("Enter the name of the directory to save '%s'\n"
-               "to, or press return for the current directory.\n", filename);
-       newprompt("Directory: ", dbuf, sizeof dbuf);
-       if (strlen(dbuf) == 0)
-               strcpy(dbuf, ".");
-       strcat(dbuf, "/");
-       strcat(dbuf, filename);
-
-       savefp = fopen(dbuf, "w");
-       if (savefp == NULL) {
-               scr_printf("Cannot open '%s': %s\n", dbuf, strerror(errno));
-               /* close the download file at the server */
-               serv_puts("CLOS");
-               serv_gets(buf);
-               if (buf[0] != '2') {
-                       scr_printf("%s\n", &buf[4]);
-               }
-               return;
+       if (bytes_written < filelen) {
+               err_printf("Trouble saving '%s': %s\n", pathname,
+                               strerror(errno));
+               return 0;
        }
-       progress(0, total_bytes);
-       while ((transmitted_bytes < total_bytes) && (broken == 0)) {
-               bb = total_bytes - transmitted_bytes;
-               aa = ((bb < 4096) ? bb : 4096);
-               snprintf(buf, sizeof buf, "READ %ld|%ld", transmitted_bytes, aa);
-               serv_puts(buf);
-               serv_gets(buf);
-               if (buf[0] != '6') {
-                       scr_printf("%s\n", &buf[4]);
-                       return;
-               }
-               packet = extract_int(&buf[4], 0);
-               serv_read(dbuf, packet);
-               if (fwrite(dbuf, packet, 1, savefp) < 1)
-                       broken = 1;
-               transmitted_bytes = transmitted_bytes + (long) packet;
-               progress(transmitted_bytes, total_bytes);
-       }
-       fclose(savefp);
-       /* close the download file at the server */
-       serv_puts("CLOS");
-       serv_gets(buf);
-       if (buf[0] != '2') {
-               scr_printf("%s\n", &buf[4]);
-       }
-       return;
+       return 1;
+}
+
+
+/*
+ * Save supplied_filename in dest directory; gets the name only
+ */
+void destination_directory(char *dest, const char *supplied_filename)
+{
+       scr_printf("Enter the name of the directory to save '%s'\n"
+               "to, or press return for the current directory.\n",
+               supplied_filename);
+       newprompt("Directory: ", dest, PATH_MAX);
+       if (strlen(dest) == 0) {
+               dest[0] = '.';
+               dest[1] = 0;
+       }
+       strcat(dest, "/");
+       strcat(dest, supplied_filename);
 }
 
 
@@ -671,75 +625,59 @@ void download_to_local_disk(char *supplied_filename, long total_bytes)
  *                function determines which protocol to use.
  *  proto - 0 = paginate, 1 = xmodem, 2 = raw, 3 = ymodem, 4 = zmodem, 5 = save
  */
-void download(int proto)
+void download(CtdlIPC *ipc, int proto)
 {
        char buf[SIZ];
-       char filename[SIZ];
-       char tempname[SIZ];
+       char filename[PATH_MAX];
+       char tempname[PATH_MAX];
        char transmit_cmd[SIZ];
-       long total_bytes = 0L;
-       char dbuf[4096];
-       long transmitted_bytes = 0L;
-       long aa, bb;
-       int packet;
        FILE *tpipe = NULL;
        int broken = 0;
+       int r;
+       void *file = NULL;      /* The downloaded file */
+       size_t filelen = 0L;    /* The downloaded file length */
 
        if ((room_flags & QR_DOWNLOAD) == 0) {
                scr_printf("*** You cannot download from this room.\n");
                return;
        }
 
-       newprompt("Enter filename: ", filename, 255);
+       newprompt("Enter filename: ", filename, PATH_MAX);
 
-       snprintf(buf, sizeof buf, "OPEN %s", filename);
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0] != '2') {
-               scr_printf("%s\n", &buf[4]);
+       /* Save to local disk, for folks with their own copy of the client */
+       if (proto == 5) {
+               destination_directory(tempname, filename);
+               r = CtdlIPCFileDownload(ipc, filename, &file, 0, progress, buf);
+               if (r / 100 != 2) {
+                       scr_printf("%s\n", buf);
+                       return;
+               }
+               save_buffer(file, (size_t)extract_long(buf, 0), tempname);
+               free(file);
                return;
        }
-       total_bytes = extract_long(&buf[4], 0);
 
-       /* Save to local disk, for folks with their own copy of the client */
-       if (proto == 5) {
-               download_to_local_disk(filename, total_bytes);
+       r = CtdlIPCFileDownload(ipc, filename, &file, 0, progress, buf);
+       if (r / 100 != 2) {
+               scr_printf("%s\n", buf);
                return;
        }
+       filelen = extract_unsigned_long(buf, 0);
 
        /* Meta-download for public clients */
-       scr_printf("Fetching file from Citadel server...\n");
+       /* scr_printf("Fetching file from Citadel server...\n"); */
        mkdir(tempdir, 0700);
        snprintf(tempname, sizeof tempname, "%s/%s", tempdir, filename);
        tpipe = fopen(tempname, "wb");
-       while ((transmitted_bytes < total_bytes) && (broken == 0)) {
-               progress(transmitted_bytes, total_bytes);
-               bb = total_bytes - transmitted_bytes;
-               aa = ((bb < 4096) ? bb : 4096);
-               snprintf(buf, sizeof buf, "READ %ld|%ld", transmitted_bytes, aa);
-               serv_puts(buf);
-               serv_gets(buf);
-               if (buf[0] != '6') {
-                       scr_printf("%s\n", &buf[4]);
-               }
-               packet = extract_int(&buf[4], 0);
-               serv_read(dbuf, packet);
-               if (fwrite(dbuf, packet, 1, tpipe) < 1) {
-                       broken = 1;
-               }
-               transmitted_bytes = transmitted_bytes + (long) packet;
+       if (fwrite(file, filelen, 1, tpipe) < filelen) {
+               /* FIXME: restart syscall on EINTR */
+               broken = 1;
        }
        fclose(tpipe);
-       progress(transmitted_bytes, total_bytes);
-
-       /* close the download file at the server */
-       serv_puts("CLOS");
-       serv_gets(buf);
-       if (buf[0] != '2') {
-               scr_printf("%s\n", &buf[4]);
-       }
+       if (file) free(file);
 
        if (proto == 0) {
+               /* FIXME: display internally instead */
                snprintf(transmit_cmd, sizeof transmit_cmd,
                        "SHELL=/dev/null; export SHELL; TERM=dumb; export TERM; exec more -d <%s",
                        tempname);
@@ -751,6 +689,7 @@ void download(int proto)
        else if (proto == 4)
                snprintf(transmit_cmd, sizeof transmit_cmd, "exec sz %s", tempname);
        else
+               /* FIXME: display internally instead */
                snprintf(transmit_cmd, sizeof transmit_cmd, "exec cat %s", tempname);
 
        screen_reset();
@@ -761,22 +700,22 @@ void download(int proto)
 
        /* clean up the temporary directory */
        nukedir(tempdir);
-       scr_putc(7);
+       scr_putc(7);    /* Beep beep! */
 }
 
 
 /*
  * read directory of this room
  */
-void roomdir(void)
+void roomdir(CtdlIPC *ipc)
 {
        char flnm[SIZ];
        char flsz[32];
        char comment[SIZ];
        char buf[SIZ];
 
-       serv_puts("RDIR");
-       serv_gets(buf);
+       CtdlIPC_putline(ipc, "RDIR");
+       CtdlIPC_getline(ipc, buf);
        if (buf[0] != '1') {
                pprintf("%s\n", &buf[4]);
                return;
@@ -786,7 +725,7 @@ void roomdir(void)
        extract(flnm, &buf[4], 1);
        pprintf("\nDirectory of %s on %s\n", flnm, comment);
        pprintf("-----------------------\n");
-       while (serv_gets(buf), strcmp(buf, "000")) {
+       while (CtdlIPC_getline(ipc, buf), strcmp(buf, "000")) {
                extract(flnm, buf, 0);
                extract(flsz, buf, 1);
                extract(comment, buf, 2);
@@ -802,7 +741,7 @@ void roomdir(void)
 /*
  * add a user to a private room
  */
-void invite(void)
+void invite(CtdlIPC *ipc)
 {
        char username[USERNAME_SIZE];
        char buf[SIZ];
@@ -812,7 +751,7 @@ void invite(void)
        if (username[0] == 0)
                return;
 
-       r = CtdlIPCInviteUserToRoom(username, buf);
+       r = CtdlIPCInviteUserToRoom(ipc, username, buf);
        scr_printf("%s\n", buf);
 }
 
@@ -820,7 +759,7 @@ void invite(void)
 /*
  * kick a user out of a room
  */
-void kickout(void)
+void kickout(CtdlIPC *ipc)
 {
        char username[USERNAME_SIZE];
        char buf[SIZ];
@@ -830,7 +769,7 @@ void kickout(void)
        if (username[0] == 0)
                return;
 
-       r = CtdlIPCKickoutUserFromRoom(username, buf);
+       r = CtdlIPCKickoutUserFromRoom(ipc, username, buf);
        scr_printf("%s\n", buf);
 }
 
@@ -838,12 +777,12 @@ void kickout(void)
 /*
  * aide command: kill the current room
  */
-void killroom(void)
+void killroom(CtdlIPC *ipc)
 {
        char aaa[100];
        int r;
 
-       r = CtdlIPCDeleteRoom(0, aaa);
+       r = CtdlIPCDeleteRoom(ipc, 0, aaa);
        if (r / 100 != 2) {
                scr_printf("%s\n", aaa);
                return;
@@ -853,14 +792,14 @@ void killroom(void)
        if (yesno() == 0)
                return;
 
-       r = CtdlIPCDeleteRoom(1, aaa);
+       r = CtdlIPCDeleteRoom(ipc, 1, aaa);
        scr_printf("%s\n", aaa);
        if (r / 100 != 2)
                return;
-       dotgoto("_BASEROOM_", 0, 0);
+       dotgoto(ipc, "_BASEROOM_", 0, 0);
 }
 
-void forget(void)
+void forget(CtdlIPC *ipc)
 {                              /* forget the current room */
        char buf[SIZ];
 
@@ -868,20 +807,20 @@ void forget(void)
        if (yesno() == 0)
                return;
 
-       if (CtdlIPCForgetRoom(buf) / 100 != 2) {
+       if (CtdlIPCForgetRoom(ipc, buf) / 100 != 2) {
                scr_printf("%s\n", buf);
                return;
        }
 
        /* now return to the lobby */
-       dotgoto("_BASEROOM_", 0, 0);
+       dotgoto(ipc, "_BASEROOM_", 0, 0);
 }
 
 
 /*
  * create a new room
  */
-void entroom(void)
+void entroom(CtdlIPC *ipc)
 {
        char buf[SIZ];
        char new_room_name[ROOMNAMELEN];
@@ -892,7 +831,7 @@ void entroom(void)
        int r;                          /* IPC response code */
 
        /* Check permission to create room */
-       r = CtdlIPCCreateRoom(0, "", 1, "", 0, buf);
+       r = CtdlIPCCreateRoom(ipc, 0, "", 1, "", 0, buf);
        if (r / 100 != 2) {
                scr_printf("%s\n", buf);
                return;
@@ -908,9 +847,9 @@ void entroom(void)
                }
        }
 
-       new_room_floor = select_floor((int) curr_floor);
+       new_room_floor = select_floor(ipc, (int) curr_floor);
 
-       IFNEXPERT formout("roomaccess");
+       IFNEXPERT formout(ipc, "roomaccess");
        do {
                scr_printf("<?>Help\n<1>Public room\n<2>Guess-name room\n"
                       "<3>Passworded room\n<4>Invitation-only room\n"
@@ -921,7 +860,7 @@ void entroom(void)
                } while (((b < '1') || (b > '5')) && (b != '?'));
                if (b == '?') {
                        scr_printf("?\n");
-                       formout("roomaccess");
+                       formout(ipc, "roomaccess");
                }
        } while ((b < '1') || (b > '5'));
        b -= '0';                       /* Portable */
@@ -952,7 +891,7 @@ void entroom(void)
                return;
        }
 
-       r = CtdlIPCCreateRoom(1, new_room_name, new_room_type,
+       r = CtdlIPCCreateRoom(ipc, 1, new_room_name, new_room_type,
                              new_room_pass, new_room_floor, buf);
        if (r / 100 != 2) {
                scr_printf("%s\n", buf);
@@ -960,12 +899,12 @@ void entroom(void)
        }
 
        /* command succeeded... now GO to the new room! */
-       dotgoto(new_room_name, 0, 0);
+       dotgoto(ipc, new_room_name, 0, 0);
 }
 
 
 
-void readinfo(void)
+void readinfo(CtdlIPC *ipc)
 {                              /* read info file for current room */
        char buf[SIZ];
        char raide[64];
@@ -973,7 +912,7 @@ void readinfo(void)
        char *text = NULL;
 
        /* Name of currernt room aide */
-       r = CtdlIPCGetRoomAide(buf);
+       r = CtdlIPCGetRoomAide(ipc, buf);
        if (r / 100 == 2)
                safestrncpy(raide, buf, sizeof raide);
        else
@@ -982,7 +921,7 @@ void readinfo(void)
        if (strlen(raide) > 0)
                scr_printf("Room aide is %s.\n\n", raide);
 
-       r = CtdlIPCRoomInfo(&text, buf);
+       r = CtdlIPCRoomInfo(ipc, &text, buf);
        if (r / 100 != 1)
                return;
 
@@ -998,23 +937,24 @@ void readinfo(void)
 /*
  * <W>ho knows room...
  */
-void whoknows(void)
+void whoknows(CtdlIPC *ipc)
 {
        char buf[SIZ];
-       serv_puts("WHOK");
-       serv_gets(buf);
+       CtdlIPC_putline(ipc, "WHOK");
+       CtdlIPC_getline(ipc, buf);
        if (buf[0] != '1') {
                pprintf("%s\n", &buf[4]);
                return;
        }
-       while (serv_gets(buf), strncmp(buf, "000", 3)) {
+       while (CtdlIPC_getline(ipc, buf), strncmp(buf, "000", 3)) {
                if (sigcaught == 0)
                        pprintf("%s\n", buf);
        }
 }
 
 
-void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
+void do_edit(CtdlIPC *ipc,
+               char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
 {
        FILE *fp;
        char cmd[SIZ];
@@ -1030,19 +970,19 @@ void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
        fp = fopen(temp, "w");
        fclose(fp);
 
-       serv_puts(check_cmd);
-       serv_gets(cmd);
+       CtdlIPC_putline(ipc, check_cmd);
+       CtdlIPC_getline(ipc, cmd);
        if (cmd[0] != '2') {
                scr_printf("%s\n", &cmd[4]);
                return;
        }
 
        if (strlen(editor_path) > 0) {
-               serv_puts(read_cmd);
-               serv_gets(cmd);
+               CtdlIPC_putline(ipc, read_cmd);
+               CtdlIPC_getline(ipc, cmd);
                if (cmd[0] == '1') {
                        fp = fopen(temp, "w");
-                       while (serv_gets(cmd), strcmp(cmd, "000")) {
+                       while (CtdlIPC_getline(ipc, cmd), strcmp(cmd, "000")) {
                                fprintf(fp, "%s\n", cmd);
                        }
                        fclose(fp);
@@ -1077,7 +1017,7 @@ void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
                scr_printf("Entering %s.  "
                        "Press return twice when finished.\n", desc);
                fp = fopen(temp, "r+");
-               citedit(fp);
+               citedit(ipc, fp);
                fclose(fp);
        }
 
@@ -1086,8 +1026,8 @@ void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
        }
 
        else {
-               serv_puts(write_cmd);
-               serv_gets(cmd);
+               CtdlIPC_putline(ipc, write_cmd);
+               CtdlIPC_getline(ipc, cmd);
                if (cmd[0] != '4') {
                        scr_printf("%s\n", &cmd[4]);
                        return;
@@ -1096,84 +1036,82 @@ void do_edit(char *desc, char *read_cmd, char *check_cmd, char *write_cmd)
                fp = fopen(temp, "r");
                while (fgets(cmd, SIZ - 1, fp) != NULL) {
                        cmd[strlen(cmd) - 1] = 0;
-                       serv_puts(cmd);
+                       CtdlIPC_putline(ipc, cmd);
                }
                fclose(fp);
-               serv_puts("000");
+               CtdlIPC_putline(ipc, "000");
        }
 
        unlink(temp);
 }
 
 
-void enterinfo(void)
+void enterinfo(CtdlIPC *ipc)
 {                              /* edit info file for current room */
-       do_edit("the Info file for this room", "RINF", "EINF 0", "EINF 1");
+       do_edit(ipc, "the Info file for this room", "RINF", "EINF 0", "EINF 1");
 }
 
-void enter_bio(void)
+void enter_bio(CtdlIPC *ipc)
 {
        char cmd[SIZ];
        snprintf(cmd, sizeof cmd, "RBIO %s", fullname);
-       do_edit("your Bio", cmd, "NOOP", "EBIO");
+       do_edit(ipc, "your Bio", cmd, "NOOP", "EBIO");
 }
 
 /*
  * create a new floor
  */
-void create_floor(void)
+void create_floor(CtdlIPC *ipc)
 {
        char buf[SIZ];
        char newfloorname[SIZ];
        int r;                  /* IPC response code */
 
-       load_floorlist();
+       load_floorlist(ipc);
 
-       r = CtdlIPCCreateFloor(0, "", buf);
+       r = CtdlIPCCreateFloor(ipc, 0, "", buf);
        if (r / 100 != 2) {
                scr_printf("%s\n", buf);
                return;
        }
 
        newprompt("Name for new floor: ", newfloorname, 255);
-       r = CtdlIPCCreateFloor(1, newfloorname, buf);
+       r = CtdlIPCCreateFloor(ipc, 1, newfloorname, buf);
        if (r / 100 == 2) {
                scr_printf("Floor has been created.\n");
        } else {
                scr_printf("%s\n", buf);
        }
 
-       load_floorlist();
+       load_floorlist(ipc);
 }
 
 /*
  * edit the current floor
  */
-void edit_floor(void)
+void edit_floor(CtdlIPC *ipc)
 {
        char buf[SIZ];
-       int expire_mode = 0;
-       int expire_value = 0;
+       struct ExpirePolicy *ep = NULL;
+       int r;                          /* IPC response code */
 
-       load_floorlist();
+       load_floorlist(ipc);
 
        /* Fetch the expire policy (this will silently fail on old servers,
         * resulting in "default" policy)
         */
-       r = CtdlIPCGetMessageExpirationPolicy(1, buf);
-       if (r / 100 == 2) {
-               expire_mode = extract_int(buf, 0);
-               expire_value = extract_int(buf, 1);
-       }
+       r = CtdlIPCGetMessageExpirationPolicy(ipc, 1, &ep, buf);
 
        /* Interact with the user */
+       scr_printf("You are editing the floor called \"%s\"\n", 
+               &floorlist[(int) curr_floor][0] );
        strprompt("Floor name", &floorlist[(int) curr_floor][0], 255);
 
        /* Angels and demons dancing in my head... */
        do {
-               snprintf(buf, sizeof buf, "%d", expire_mode);
+               snprintf(buf, sizeof buf, "%d", ep->expire_mode);
                strprompt
-                   ("Floor default essage expire policy (? for list)",
+                   ("Floor default message expire policy (? for list)",
                     buf, 1);
                if (buf[0] == '?') {
                        scr_printf("\n"
@@ -1183,27 +1121,26 @@ void edit_floor(void)
                                "3. Expire by message age\n");
                }
        } while ((buf[0] < '0') || (buf[0] > '3'));
-       expire_mode = buf[0] - '0';
+       ep->expire_mode = buf[0] - '0';
 
        /* ...lunatics and monsters underneath my bed */
-       if (expire_mode == 2) {
-               snprintf(buf, sizeof buf, "%d", expire_value);
+       if (ep->expire_mode == 2) {
+               snprintf(buf, sizeof buf, "%d", ep->expire_value);
                strprompt("Keep how many messages online?", buf, 10);
-               expire_value = atol(buf);
+               ep->expire_value = atol(buf);
        }
 
-       if (expire_mode == 3) {
-               snprintf(buf, sizeof buf, "%d", expire_value);
+       if (ep->expire_mode == 3) {
+               snprintf(buf, sizeof buf, "%d", ep->expire_value);
                strprompt("Keep messages for how many days?", buf, 10);
-               expire_value = atol(buf);
+               ep->expire_value = atol(buf);
        }
 
        /* Save it */
-       r = CtdlIPCSetMessageExpirationPolicy(1, expire_mode,
-                                             expire_value, buf);
-       r = CtdlIPCEditFloor(curr_floor, &floorlist[(int)curr_floor][0]);
+       r = CtdlIPCSetMessageExpirationPolicy(ipc, 1, ep, buf);
+       r = CtdlIPCEditFloor(ipc, curr_floor, &floorlist[(int)curr_floor][0], buf);
        scr_printf("%s\n", buf);
-       load_floorlist();
+       load_floorlist(ipc);
 }
 
 
@@ -1212,12 +1149,12 @@ void edit_floor(void)
 /*
  * kill the current floor 
  */
-void kill_floor(void)
+void kill_floor(CtdlIPC *ipc)
 {
        int floornum_to_delete, a;
        char buf[SIZ];
 
-       load_floorlist();
+       load_floorlist(ipc);
        do {
                floornum_to_delete = (-1);
                scr_printf("(Press return to abort)\n");
@@ -1234,7 +1171,7 @@ void kill_floor(void)
                                        scr_printf("%s\n", &floorlist[a][0]);
                }
        } while (floornum_to_delete < 0);
-       CtdlIPCDeleteFloor(1, floornum_to_delete, buf);
+       CtdlIPCDeleteFloor(ipc, 1, floornum_to_delete, buf);
        scr_printf("%s\n", buf);
-       load_floorlist();
+       load_floorlist(ipc);
 }