* Renamed "struct user" to "struct ctdluser"
[citadel.git] / citadel / routines.c
index 2ccd89f48d436859a0641ce09660f5139afa8129..cbeaddaf7076db12693cee376d89928524169e5e 100644 (file)
@@ -38,6 +38,8 @@
 #ifdef HAVE_UTMPX_H
 #include <utmpx.h>
 #endif
+#include "citadel.h"
+#include "citadel_ipc.h"
 #include "screen.h"
 
 #ifndef HAVE_GETUTLINE
@@ -74,7 +76,7 @@ void back(int spaces) {
        }
 }
 
-void hit_any_key(void) {               /* hit any key to continue */
+void hit_any_key(CtdlIPC *ipc) {       /* hit any key to continue */
        int a,b;
 
        color(COLOR_PUSH);
@@ -101,78 +103,60 @@ void hit_any_key(void) {          /* hit any key to continue */
 /*
  * change a user's access level
  */
-void edituser(void)
+void edituser(CtdlIPC *ipc)
 {
        char buf[SIZ];
-       char who[SIZ];
-       char pass[SIZ];
-       int flags;
-       int timescalled;
-       int posted;
-       int axlevel;
-       long usernum;
-       time_t lastcall;
-       int userpurge;
+       char who[USERNAME_SIZE];
+       struct ctdluser *user = NULL;
        int newnow = 0;
+       int r;                          /* IPC response code */
 
-       newprompt("User name: ",who,25);
-AGUP:  snprintf(buf, sizeof buf, "AGUP %s",who);
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0]!='2') {
-               scr_printf("%s\n",&buf[4]);
+       newprompt("User name: ", who, 25);
+       while ((r = CtdlIPCAideGetUserParameters(ipc, who, &user, buf)) / 100 != 2) {
+               scr_printf("%s\n", buf);
                scr_printf("Do you want to create this user? ");
                if (yesno()) {
-                       snprintf(buf, sizeof buf, "CREU %s", who);
-                       serv_puts(buf);
-                       serv_gets(buf);
-                       if (buf[0] == '2') {
+                       r = CtdlIPCCreateUser(ipc, who, 0, buf);
+                       if (r / 100 == 2) {
                                newnow = 1;
-                               goto AGUP;
+                               continue;
                        }
                        scr_printf("%s\n",&buf[4]);
-                       return;
                }
+               free(user);
                return;
        }
-       extract(who, &buf[4], 0);
-       extract(pass, &buf[4], 1);
-       flags = extract_int(&buf[4], 2);
-       timescalled = extract_int(&buf[4], 3);
-       posted = extract_int(&buf[4], 4);
-       axlevel = extract_int(&buf[4], 5);
-       usernum = extract_long(&buf[4], 6);
-       lastcall = extract_long(&buf[4], 7);
-       userpurge = extract_int(&buf[4], 8);
-
-       val_user(who, 0); /* Display registration */
-
-       if (newnow) {
-               newprompt("Password: ", pass, -19);
-       }
-       else if (boolprompt("Change password", 0)) {
-               strprompt("Password", pass, -19);
+
+       val_user(ipc, user->fullname, 0); /* Display registration */
+
+       if (newnow || boolprompt("Change password", 0)) {       /* I'm lazy */
+               strprompt("Password", user->password, -19);
        }
 
-       axlevel = intprompt("Access level", axlevel, 0, 6);
-       if (boolprompt("Ask user to register again", !(flags & US_REGIS)))
-               flags &= ~US_REGIS;
+       user->axlevel = intprompt("Access level", user->axlevel, 0, 6);
+
+       user->flags = set_attr(ipc, user->flags,
+               "Permission to send/receive Internet mail",
+               US_INTERNET, 0);
+
+       if (boolprompt("Ask user to register again", !(user->flags & US_REGIS)))
+               user->flags &= ~US_REGIS;
        else
-               flags |= US_REGIS;
-       timescalled = intprompt("Times called", timescalled, 0, INT_MAX);
-       posted = intprompt("Messages posted", posted, 0, INT_MAX);
-       lastcall = (boolprompt("Set last call to now", 0)?time(NULL):lastcall);
-       userpurge = intprompt("Purge time (in days, 0 for system default",
-                               userpurge, 0, INT_MAX);
-
-       snprintf(buf, sizeof buf, "ASUP %s|%s|%d|%d|%d|%d|%ld|%ld|%d",
-               who, pass, flags, timescalled, posted, axlevel, usernum,
-               (long)lastcall, userpurge);
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0]!='2') {
-               scr_printf("%s\n",&buf[4]);
+               user->flags |= US_REGIS;
+       user->timescalled = intprompt("Times called",
+                                     user->timescalled, 0, INT_MAX);
+       user->posted = intprompt("Messages posted",
+                                user->posted, 0, INT_MAX);
+       user->lastcall = boolprompt("Set last call to now", 0) ?
+                                               time(NULL) : user->lastcall;
+       user->USuserpurge = intprompt("Purge time (in days, 0 for system default",
+                                     user->USuserpurge, 0, INT_MAX);
+
+       r = CtdlIPCAideSetUserParameters(ipc, user, buf);
+       if (r / 100 != 2) {
+               scr_printf("%s\n", buf);
        }
+       free(user);
 }
 
 
@@ -180,7 +164,7 @@ AGUP:       snprintf(buf, sizeof buf, "AGUP %s",who);
  * yes or no.  Yes=1 and No=0, unless 'backwards' is set to a nonzero value
  * in which case No=1 and Yes=0.
  */
-int set_attr(int sval, char *prompt, unsigned int sbit, int backwards)
+int set_attr(CtdlIPC *ipc, unsigned int sval, char *prompt, unsigned int sbit, int backwards)
 {
        int a;
        int temp;
@@ -217,113 +201,98 @@ int set_attr(int sval, char *prompt, unsigned int sbit, int backwards)
  * modes are:  0 - .EC command, 1 - .EC for new user,
  *             2 - toggle Xpert mode  3 - toggle floor mode
  */
-void enter_config(int mode)
+void enter_config(CtdlIPC *ipc, int mode)
 {
-       int width, height, flags, filter;
-       char buf[128];
-
-       snprintf(buf, sizeof buf, "GETU");
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0]!='2') {
-               scr_printf("%s\n",&buf[4]);
+       char buf[SIZ];
+       struct ctdluser *user = NULL;
+       int r;                          /* IPC response code */
+
+       r = CtdlIPCGetConfig(ipc, &user, buf);
+       if (r / 100 != 2) {
+               scr_printf("%s\n", buf);
+               free(user);
                return;
        }
 
-       width = extract_int(&buf[4],0);
-       height = extract_int(&buf[4],1);
-       flags = extract_int(&buf[4],2);
-       filter = extract_int(&buf[4],3);
-
-       if ((mode==0)||(mode==1)) {
+       if (mode == 0 || mode == 1) {
 
-        width = intprompt("Enter your screen width",width,20,255);
-        height = intprompt("Enter your screen height",height,3,255);
+               user->USscreenwidth = intprompt("Enter your screen width",
+                                               user->USscreenwidth, 20, 255);
+               user->USscreenheight = intprompt("Enter your screen height",
+                                                user->USscreenheight, 3, 255);
  
-        flags = set_attr(flags,
-               "Are you an experienced Citadel user",
-               US_EXPERT,
-               0);
-        if ( ((flags&US_EXPERT)==0) && (mode==1)) {
-               return;
-        }
-        flags = set_attr(flags,
-               "Print last old message on New message request",
-               US_LASTOLD,
-               0);
-
-        flags = set_attr(flags,
-               "Prompt after each message",
-               US_NOPROMPT,
-               1);
-
-        if ((flags & US_NOPROMPT)==0)
-           flags = set_attr(flags,
-               "Use 'disappearing' prompts",
-               US_DISAPPEAR,
-               0);
-
-        flags = set_attr(flags,
-               "Pause after each screenful of text",
-               US_PAGINATOR,
-               0);
-
-        if ( (rc_prompt_control == 3) && (flags & US_PAGINATOR) ) {
-               flags = set_attr(flags,
-                       "<N>ext and <S>top work at paginator prompt",
-                       US_PROMPTCTL,
-                       0);
-        }
-
-        if (rc_floor_mode == RC_DEFAULT) {
-         flags = set_attr(flags,
-               "View rooms by floor",
-               US_FLOORS,
-               0);
-         }
-
-        if (rc_ansi_color == 3) {
-         flags = set_attr(flags,
-               "Enable color support",
-               US_COLOR,
-               0);
-         }
-       
-        }
-
-        if ((flags&US_EXPERT)==0) formout("unlisted");
-        flags = set_attr(flags,
-               "Be unlisted in userlog",
-               US_UNLISTED,
-               0);
-
-       if (mode==2) {
-        if (flags & US_EXPERT) {
-               flags = (flags ^ US_EXPERT);
-               scr_printf("Expert mode now OFF\n");
-               }
-        else {
-               flags = (flags | US_EXPERT);
-               scr_printf("Expert mode now ON\n");
+               user->flags = set_attr(ipc, user->flags,
+                                      "Are you an experienced Citadel user",
+                                      US_EXPERT, 0);
+               if ((user->flags & US_EXPERT) == 0 && mode == 1) {
+                       free(user);
+                       return;
                }
-        }
 
-       if (mode==3) {
-        if (flags & US_FLOORS) {
-               flags = (flags ^ US_FLOORS);
-               scr_printf("Floor mode now OFF\n");
+               user->flags = set_attr(ipc, user->flags,
+                       "Print last old message on New message request",
+                       US_LASTOLD, 0);
+
+               user->flags = set_attr(ipc, user->flags,
+                                      "Prompt after each message",
+                                      US_NOPROMPT, 1);
+
+               if ((user->flags & US_NOPROMPT) == 0)
+                       user->flags = set_attr(ipc, user->flags,
+                                              "Use 'disappearing' prompts",
+                                              US_DISAPPEAR, 0);
+
+               user->flags = set_attr(ipc, user->flags,
+                                      "Pause after each screenful of text",
+                                      US_PAGINATOR, 0);
+
+               if (rc_prompt_control == 3 && (user->flags & US_PAGINATOR))
+                       user->flags = set_attr(ipc, user->flags,
+                               "<N>ext and <S>top work at paginator prompt",
+                               US_PROMPTCTL, 0);
+
+               if (rc_floor_mode == RC_DEFAULT)
+                       user->flags = set_attr(ipc, user->flags,
+                                              "View rooms by floor",
+                                              US_FLOORS, 0);
+
+               if (rc_ansi_color == 3)
+                       user->flags = set_attr(ipc, user->flags,
+                                              "Enable color support",
+                                              US_COLOR, 0);
+
+               if ((user->flags & US_EXPERT) == 0)
+                       formout(ipc, "unlisted");
+
+               user->flags = set_attr(ipc, user->flags,
+                                      "Be unlisted in userlog",
+                                      US_UNLISTED, 0);
+       }
+
+       if (mode == 2) {
+               if (user->flags & US_EXPERT) {
+                       user->flags ^= US_EXPERT;
+                       scr_printf("Expert mode now OFF\n");
+               } else {
+                       user->flags |= US_EXPERT;
+                       scr_printf("Expert mode now ON\n");
                }
-        else {
-               flags = (flags | US_FLOORS);
-               scr_printf("Floor mode now ON\n");
+       }
+
+       if (mode == 3) {
+               if (user->flags & US_FLOORS) {
+                       user->flags ^= US_FLOORS;
+                       scr_printf("Floor mode now OFF\n");
+               } else {
+                       user->flags |= US_FLOORS;
+                       scr_printf("Floor mode now ON\n");
                }
-        }
+       }
 
-       snprintf(buf, sizeof buf, "SETU %d|%d|%d|%d",width,height,flags,filter);
-       serv_puts(buf);
-       serv_gets(buf);
-       if (buf[0]!='2') scr_printf("%s\n",&buf[4]);
-       userflags = flags;
+       r = CtdlIPCSetConfig(ipc, user, buf);
+       if (r / 100 != 2) scr_printf("%s\n", buf);
+       userflags = user->flags;
+       free(user);
 }
 
 /*
@@ -362,14 +331,6 @@ int pattern(char *search, char *patn) {
 }
 
 
-/* display internal error as defined in errmsgs */
-void interr(int errnum) {
-       scr_printf("*** INTERNAL ERROR %d\n"
-               "(Press any key to continue)\n", errnum);
-       inkey();
-       logoff(errnum);
-}
-
 void strproc(char *string)
 {
        int a;
@@ -421,28 +382,27 @@ char *strerror(int e)
 #endif
 
 
-void progress(long int curr, long int cmax)
+void progress(unsigned long curr, unsigned long cmax)
 {
-       static long dots_printed;
-       long a;
-
-       if (curr==0) {
-               scr_printf(".......................................");
-               scr_printf(".......................................\r");
-               scr_flush();
-               dots_printed = 0;
-       }
-       else if (curr==cmax) {
-               scr_printf("\r%79s\n","");
-       }
-       else {
-               a=(curr * 100) / cmax;
-               a=a*78; a=a/100;
-               while (dots_printed < a) {
-                       scr_printf("*");
-                       ++dots_printed;
-                       scr_flush();
-               }
+       static char dots[] =
+               "**************************************************";
+       char dots_printed[51];
+       char fmt[42];
+       unsigned long a;
+
+       if (curr >= cmax) {
+               sln_printf("\r%79s\r","");
+               status_line(serv_info.serv_humannode, serv_info.serv_bbs_city,
+                       room_name, secure, 0);
+       } else {
+               /* a will be range 0-50 rather than 0-100 */
+               a=(curr * 50) / cmax;
+               sprintf(fmt, "[%%s%%%lds] %%3ld%%%% %%10ld/%%10ld\r", 50 - a);
+               strncpy(dots_printed, dots, a);
+               dots_printed[a] = 0;
+               sln_printf(fmt, dots_printed, "",
+                               curr * 100 / cmax, curr, cmax);
+               sln_flush();
        }
 }
 
@@ -531,15 +491,15 @@ void locate_host(char *hbuf)
 /*
  * miscellaneous server commands (testing, etc.)
  */
-void misc_server_cmd(char *cmd) {
+void misc_server_cmd(CtdlIPC *ipc, char *cmd) {
        char buf[SIZ];
 
-       serv_puts(cmd);
-       serv_gets(buf);
+       CtdlIPC_putline(ipc, cmd);
+       CtdlIPC_getline(ipc, buf);
        scr_printf("%s\n",buf);
        if (buf[0]=='1') {
                set_keepalives(KA_HALF);
-               while (serv_gets(buf), strcmp(buf,"000")) {
+               while (CtdlIPC_getline(ipc, buf), strcmp(buf,"000")) {
                        scr_printf("%s\n",buf);
                }
                set_keepalives(KA_YES);
@@ -548,7 +508,7 @@ void misc_server_cmd(char *cmd) {
        if (buf[0]=='4') {
                do {
                        newprompt("> ",buf,255);
-                       serv_puts(buf);
+                       CtdlIPC_putline(ipc, buf);
                } while(strcmp(buf,"000"));
                return;
        }