Remove ENABLE_NLS definition. Either we HAVE_USELOCALE or we don't translate at...
[citadel.git] / webcit / setup.c
index 34981e4c78a17ba0be249314efc4d91d58c90364..f4653dcac0563304ce5d32be7b594e13acce5627 100644 (file)
@@ -1,32 +1,40 @@
 /*
- * $Id$
- *
  * WebCit setup utility
  * 
  * (This is basically just an install wizard.  It's not required.)
- *
  */
 
-#include "config.h"
+#include "sysdep.h"
 #include "webcit.h"
 #include "webserver.h"
 
 
-#ifdef HAVE_NEWT
-#include <newt.h>
-#endif
-
-
 #define UI_TEXT                0       /* Default setup type -- text only */
 #define UI_DIALOG      2       /* Use the 'dialog' program */
 #define UI_SILENT      3       /* Silent running, for use in scripts */
-#define UI_NEWT                4       /* Use the "newt" window library */
 
 int setup_type;
 char setup_directory[SIZ];
 int using_web_installer = 0;
 char suggested_url[SIZ];
 
+/* some copies... 
+int syslog(int loglevel, const char *format, ...){return 0;} */
+void wc_printf(const char *format,...){}
+
+void RegisterNS(const char *NSName, long len, 
+               int nMinArgs, 
+               int nMaxArgs, 
+               WCHandlerFunc HandlerFunc,
+               WCPreevalFunc PreEvalFunc,
+               int ContextRequired){}
+void RegisterHeaderHandler(const char *Name, long Len, Header_Evaluator F){}
+pthread_key_t MyConKey;
+
+#ifdef HAVE_USELOCALE 
+int localeoffset = 1;
+#endif
+
 /*
  * Delete an entry from /etc/inittab
  */
@@ -55,7 +63,7 @@ void delete_init_entry(char *which_entry)
                        extract_token(prog, buf, 3, ':', sizeof prog); /* includes 0x0a LF */
 
                        if (!strcmp(entry, which_entry)) {
-                               buf[0] = 0;     /* delete it */
+                               strcpy(state, "off");   /* disable it */
                        }
                }
 
@@ -96,11 +104,11 @@ void delete_the_old_way(void) {
 
        strcpy(init_entry, "");
 
-       /* Determine the fully qualified path name of webserver */
-       snprintf(looking_for, sizeof looking_for, "%s/webserver ", setup_directory);
+       /* Determine the fully qualified path name of webcit */
+       snprintf(looking_for, sizeof looking_for, "%s/webcit ", setup_directory);
 
        /* Pound through /etc/inittab line by line.  Set have_entry to 1 if
-        * an entry is found which we believe starts webserver.
+        * an entry is found which we believe starts webcit.
         */
        infp = fopen("/etc/inittab", "r");
        if (infp == NULL) {
@@ -129,11 +137,6 @@ void delete_the_old_way(void) {
 
 void cleanup(int exitcode)
 {
-#ifdef HAVE_NEWT
-       newtCls();
-       newtRefresh();
-       newtFinished();
-#endif
        exit(exitcode);
 }
 
@@ -148,34 +151,39 @@ void title(char *text)
 
 
 
-int yesno(char *question)
+
+int yesno(char *question, int default_value)
 {
-#ifdef HAVE_NEWT
-       newtComponent form = NULL;
-       newtComponent yesbutton = NULL;
-       newtComponent nobutton = NULL;
-#endif
        int i = 0;
        int answer = 0;
-       char buf[SIZ];
+       char buf[SIZ] = "";
 
        switch (setup_type) {
 
        case UI_TEXT:
                do {
-                       printf("%s\nYes/No --> ", question);
-                       fgets(buf, sizeof buf, stdin);
-                       answer = tolower(buf[0]);
-                       if (answer == 'y')
-                               answer = 1;
-                       else if (answer == 'n')
-                               answer = 0;
+                       printf("%s\nYes/No [%s] --> ",
+                               question,
+                               ( default_value ? "Yes" : "No" )
+                       );
+                       if (fgets(buf, sizeof buf, stdin))
+                       {
+                               answer = tolower(buf[0]);
+                               if ((buf[0]==0) || (buf[0]==13) || (buf[0]==10))
+                                       answer = default_value;
+                               else if (answer == 'y')
+                                       answer = 1;
+                               else if (answer == 'n')
+                                       answer = 0;
+                       }
+
                } while ((answer < 0) || (answer > 1));
                break;
 
        case UI_DIALOG:
-               sprintf(buf, "exec %s --yesno '%s' 10 72",
+               sprintf(buf, "exec %s %s --yesno '%s' 15 75",
                        getenv("CTDL_DIALOG"),
+                       ( default_value ? "" : "--defaultno" ),
                        question);
                i = system(buf);
                if (i == 0) {
@@ -186,42 +194,16 @@ int yesno(char *question)
                }
                break;
 
-#ifdef HAVE_NEWT
-       case UI_NEWT:
-               newtCenteredWindow(76, 10, "Question");
-               form = newtForm(NULL, NULL, 0);
-               for (i=0; i<num_tokens(question, '\n'); ++i) {
-                       extract_token(buf, question, i, '\n', sizeof buf);
-                       newtFormAddComponent(form, newtLabel(1, 1+i, buf));
-               }
-               yesbutton = newtButton(10, 5, "Yes");
-               nobutton = newtButton(60, 5, "No");
-               newtFormAddComponent(form, yesbutton);
-               newtFormAddComponent(form, nobutton);
-               if (newtRunForm(form) == yesbutton) {
-                       answer = 1;
-               }
-               else {
-                       answer = 0;
-               }
-               newtPopWindow();
-               newtFormDestroy(form);  
-
-               break;
-#endif
-
        }
        return (answer);
 }
 
+
+
+
 void set_value(char *prompt, char str[])
 {
-#ifdef HAVE_NEWT
-       newtComponent form;
-       char *result;
-       int i;
-#endif
-       char buf[SIZ];
+       char buf[SIZ] = "";
        char dialog_result[PATH_MAX];
        char setupmsg[SIZ];
        FILE *fp;
@@ -234,12 +216,12 @@ void set_value(char *prompt, char str[])
                printf("\n%s\n", prompt);
                printf("This is currently set to:\n%s\n", str);
                printf("Enter new value or press return to leave unchanged:\n");
-               fgets(buf, sizeof buf, stdin);
-               buf[strlen(buf) - 1] = 0;
+               if (fgets(buf, sizeof buf, stdin)) {
+                       buf[strlen(buf) - 1] = 0;
+               }
                if (strlen(buf) != 0)
                        strcpy(str, buf);
                break;
-
        case UI_DIALOG:
                CtdlMakeTempFileName(dialog_result, sizeof dialog_result);
                sprintf(buf, "exec %s --inputbox '%s' 19 72 '%s' 2>%s",
@@ -250,43 +232,85 @@ void set_value(char *prompt, char str[])
                system(buf);
                fp = fopen(dialog_result, "r");
                if (fp != NULL) {
-                       fgets(str, sizeof buf, fp);
-                       if (str[strlen(str)-1] == 10) {
-                               str[strlen(str)-1] = 0;
+                       if (fgets(str, sizeof buf, fp)){
+                               if (str[strlen(str)-1] == 10) {
+                                       str[strlen(str)-1] = 0;
+                               }
                        }
                        fclose(fp);
                        unlink(dialog_result);
                }
                break;
 
-#ifdef HAVE_NEWT
-       case UI_NEWT:
+       }
+}
+
 
-               newtCenteredWindow(76, 10, "WebCit setup");
-               form = newtForm(NULL, NULL, 0);
-               for (i=0; i<num_tokens(prompt, '\n'); ++i) {
-                       extract_token(buf, prompt, i, '\n', sizeof buf);
-                       newtFormAddComponent(form, newtLabel(1, 1+i, buf));
-               }
-               newtFormAddComponent(form, newtEntry(1, 8, str, 74, (const char **) &result,
-                                       NEWT_FLAG_RETURNEXIT));
-               newtRunForm(form);
-               strcpy(str, result);
+extern const char *AvailLang[];
+int GetLocalePrefs(void)
+{
+       int nLocales;
+       StrBuf *Buf;
+       char buf[SIZ];
+       char dialog_result[PATH_MAX];
+       FILE *fp;
+       int i = 0;
+       int offs = 0;
 
-               newtPopWindow();
-               newtFormDestroy(form);  
+       nLocales = 0; 
+       while (!IsEmptyStr(AvailLang[nLocales]))
+               nLocales++;
 
+       Buf = NewStrBuf();
+
+       StrBufAppendBufPlain(Buf, HKEY("Select the locale webcit should use : \n"), 0);
+#ifdef HAVE_USELOCALE 
+       StrBufAppendBufPlain(Buf, HKEY(" 0 Let the user select it at the login prompt (default)\n"), 0);
+       offs ++;
 #endif
+       for (i = 0; i < nLocales; i++) {
+               StrBufAppendPrintf(Buf, " %ld: %s\n", i + offs, AvailLang[i]);
+
        }
-}
 
+       switch (setup_type) {
+       case UI_TEXT:
+               title("WebCit setup");
+               printf("\n%s\n", ChrPtr(Buf));
+               printf("This is currently set to:\n%ld\n", 0L);
+               printf("Enter new value or press return to leave unchanged:\n");
+               if (fgets(buf, sizeof buf, stdin))
+                       return atoi(buf);
+               break;
+
+       case UI_DIALOG:
+               CtdlMakeTempFileName(dialog_result, sizeof dialog_result);
+               sprintf(buf, "exec %s --inputbox '%s' 19 72 '%ld' 2>%s",
+                       getenv("CTDL_DIALOG"),
+                       ChrPtr(Buf),
+                       0L,
+                       dialog_result);
+               system(buf);
+               fp = fopen(dialog_result, "r");
+               if (fp != NULL) {
+                       char *str = &buf[0];
+                       if (fgets(str, sizeof buf, fp)){
+                               if (str[strlen(str)-1] == 10) {
+                                       str[strlen(str)-1] = 0;
+                               }
+                       }
+                       fclose(fp);
+                       unlink(dialog_result);
+                       return atoi(buf);
+               }
+               break;
+
+       }
+       return 0;
+}
 
 void important_message(char *title, char *msgtext)
 {
-#ifdef HAVE_NEWT
-       newtComponent form = NULL;
-       int i = 0;
-#endif
        char buf[SIZ];
 
        switch (setup_type) {
@@ -295,7 +319,7 @@ void important_message(char *title, char *msgtext)
                printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
                printf("       %s \n\n%s\n\n", title, msgtext);
                printf("Press return to continue...");
-               fgets(buf, sizeof buf, stdin);
+               if (fgets(buf, sizeof buf, stdin));
                break;
 
        case UI_DIALOG:
@@ -304,22 +328,6 @@ void important_message(char *title, char *msgtext)
                        msgtext);
                system(buf);
                break;
-
-#ifdef HAVE_NEWT
-       case UI_NEWT:
-               newtCenteredWindow(76, 10, title);
-               form = newtForm(NULL, NULL, 0);
-               for (i=0; i<num_tokens(msgtext, '\n'); ++i) {
-                       extract_token(buf, msgtext, i, '\n', sizeof buf);
-                       newtFormAddComponent(form, newtLabel(1, 1+i, buf));
-               }
-               newtFormAddComponent(form, newtButton(35, 5, "OK"));
-               newtRunForm(form);
-               newtPopWindow();
-               newtFormDestroy(form);  
-               break;
-#endif
-
        }
 }
 
@@ -331,16 +339,6 @@ void display_error(char *error_message)
 
 void progress(char *text, long int curr, long int cmax)
 {
-#ifdef HAVE_NEWT
-
-       /* These variables are static because progress() gets called
-        * multiple times during the course of whatever operation is
-        * being performed.  This makes setup non-threadsafe, but who
-        * cares?
-        */
-       static newtComponent form = NULL;
-       static newtComponent scale = NULL;
-#endif
        static long dots_printed = 0L;
        long a = 0;
        char buf[SIZ];
@@ -396,29 +394,6 @@ void progress(char *text, long int curr, long int cmax)
                        }
                }
                break;
-
-#ifdef HAVE_NEWT
-       case UI_NEWT:
-               if (curr == 0) {
-                       newtCenteredWindow(76, 8, text);
-                       form = newtForm(NULL, NULL, 0);
-                       scale = newtScale(1, 3, 74, cmax);
-                       newtFormAddComponent(form, scale);
-                       newtDrawForm(form);
-                       newtRefresh();
-               }
-               if ((curr > 0) && (curr <= cmax)) {
-                       newtScaleSet(scale, curr);
-                       newtRefresh();
-               }
-               if (curr == cmax) {
-                       newtFormDestroy(form);  
-                       newtPopWindow();
-                       newtRefresh();
-               }
-               break;
-#endif
-
        }
 }
 
@@ -426,46 +401,111 @@ void progress(char *text, long int curr, long int cmax)
 
 
 /*
- * install_init_scripts()  -- Make sure "webserver" is in /etc/inittab
+ * install_init_scripts()  -- Create and deploy SysV init scripts.
  *
  */
 void install_init_scripts(void)
 {
-       char question[SIZ];
+#ifdef HAVE_USELOCALE
+       int localechoice;
+#endif
+       char question[1024];
+       char buf[256];
        char http_port[128];
 #ifdef HAVE_OPENSSL
        char https_port[128];
 #endif
        char hostname[128];
        char portname[128];
+       char command[SIZ];
        struct utsname my_utsname;
-
+       struct stat etcinitd;
        FILE *fp;
+       char *initfile = "/etc/init.d/webcit";
+
+       fp = fopen(initfile, "r");
+       if (fp != NULL) {
+               if (yesno("WebCit already appears to be configured to start at boot.\n"
+                         "Would you like to keep your boot configuration as is?\n", 1) == 1) {
+                       return;
+               }
+               fclose(fp);
+               
+       }
 
        /* Otherwise, prompt the user to create an entry. */
        snprintf(question, sizeof question,
-               "Would you like to automatically start WebCit at boot?"
-       );
-       if (yesno(question) == 0)
+                "Would you like to automatically start WebCit at boot?"
+               );
+       if (yesno(question, 1) == 0)
                return;
 
+
+#ifdef HAVE_USELOCALE
+       localechoice = GetLocalePrefs();
+#endif
+       /* Defaults */
+       sprintf(http_port, "2000");
+#ifdef HAVE_OPENSSL
+       sprintf(https_port, "443");
+#endif
+       sprintf(hostname, "uds");
+       sprintf(portname, "/usr/local/citadel");
+
+       /* This is a very hackish way of learning the port numbers used
+        * in a previous install, if we are upgrading: read them out of
+        * the existing init script.
+        */
+       if ((stat("/etc/init.d/", &etcinitd) == -1) && 
+           (errno == ENOENT))
+       {
+               if ((stat("/etc/rc.d/init.d/", &etcinitd) == -1) &&
+                   (errno == ENOENT))
+                       initfile = WEBCITDIR"/webcit.init";
+               else
+                       initfile = "/etc/rc.d/init.d/webcit";
+       }
+
+       fp = fopen(initfile, "r");
+       if (fp != NULL) {
+               while (fgets(buf, sizeof buf, fp) != NULL) {
+                       if (strlen(buf) > 0) {
+                               buf[strlen(buf)-1] = 0; /* strip trailing cr */
+                       }
+                       if (!strncasecmp(buf, "HTTP_PORT=", 10)) {
+                               safestrncpy(http_port, &buf[10], sizeof http_port);
+                       }
+#ifdef HAVE_OPENSSL
+                       if (!strncasecmp(buf, "HTTPS_PORT=", 11)) {
+                               safestrncpy(https_port, &buf[11], sizeof https_port);
+                       }
+#endif
+                       if (!strncasecmp(buf, "CTDL_HOSTNAME=", 14)) {
+                               safestrncpy(hostname, &buf[14], sizeof hostname);
+                       }
+                       if (!strncasecmp(buf, "CTDL_PORTNAME=", 14)) {
+                               safestrncpy(portname, &buf[14], sizeof portname);
+                       }
+               }
+               fclose(fp);
+       }
+
+       /* Now ask for the port numbers */
        snprintf(question, sizeof question,
-               "On which port do you want WebCit to listen for HTTP "
-               "requests?\n\nYou can use the standard port (80) if you are "
-               "not running another\nweb server (such as Apache), otherwise "
-               "select another port.");
-       sprintf(http_port, "80");
+                "On which port do you want WebCit to listen for HTTP "
+                "requests?\n\nYou can use the standard port (80) if you are "
+                "not running another\nweb server (such as Apache), otherwise "
+                "select another port.");
        set_value(question, http_port);
        uname(&my_utsname);
        sprintf(suggested_url, "http://%s:%s/", my_utsname.nodename, http_port);
 
 #ifdef HAVE_OPENSSL
        snprintf(question, sizeof question,
-               "On which port do you want WebCit to listen for HTTPS "
-               "requests?\n\nYou can use the standard port (443) if you are "
-               "not running another\nweb server (such as Apache), otherwise "
-               "select another port.");
-       sprintf(https_port, "443");
+                "On which port do you want WebCit to listen for HTTPS "
+                "requests?\n\nYou can use the standard port (443) if you are "
+                "not running another\nweb server (such as Apache), otherwise "
+                "select another port.");
        set_value(question, https_port);
 #endif
 
@@ -476,31 +516,30 @@ void install_init_scripts(void)
        }
        else {
                snprintf(question, sizeof question,
-                       "Is the Citadel service running on the same host as WebCit?");
-               if (yesno(question)) {
-                       sprintf(hostname, "uds");
-                       sprintf(portname, "/usr/local/citadel");
+                        "Is the Citadel service running on the same host as WebCit?");
+               if (yesno(question, ((!strcasecmp(hostname, "uds")) ? 1 : 0))) {
+                       strcpy(hostname, "uds");
+                       if (atoi(portname) != 0) strcpy(portname, "/usr/local/citadel");
                        set_value("In what directory is Citadel installed?", portname);
                }
                else {
-                       sprintf(hostname, "127.0.0.1");
-                       sprintf(portname, "504");
+                       if (!strcasecmp(hostname, "uds")) strcpy(hostname, "127.0.0.1");
+                       if (atoi(portname) == 0) strcpy(portname, "504");
                        set_value("Enter the host name or IP address of your "
-                               "Citadel server.", hostname);
+                                 "Citadel server.", hostname);
                        set_value("Enter the port number on which Citadel is "
-                               "running (usually 504)", portname);
+                                 "running (usually 504)", portname);
                }
        }
 
 
-       fp = fopen("/etc/init.d/webcit", "w");
-       if (fp == NULL) {
-               display_error("Cannot create /etc/init.d/webcit");
-               return;
-       }
+       fp = fopen(initfile, "w");
 
        fprintf(fp,     "#!/bin/sh\n"
-                       "\n"
+               "\n"
+               "# uncomment this to create coredumps as described in\n"
+               "# http://www.citadel.org/doku.php/faq:mastering_your_os:gdb#how.do.i.make.my.system.produce.core-files\n"
+               "# ulimit -c unlimited\n"
                        "WEBCIT_DIR=%s\n", setup_directory);
        fprintf(fp,     "HTTP_PORT=%s\n", http_port);
 #ifdef HAVE_OPENSSL
@@ -508,16 +547,26 @@ void install_init_scripts(void)
 #endif
        fprintf(fp,     "CTDL_HOSTNAME=%s\n", hostname);
        fprintf(fp,     "CTDL_PORTNAME=%s\n", portname);
+
+#ifdef HAVE_USELOCALE 
+       if (localechoice == 0) {
+               fprintf(fp, "export WEBCIT_LANG=%s\n", AvailLang[localechoice - localeoffset]);
+       }
+#else
+       fprintf(fp,     "# your system doesn't support locales\n");
+#endif
+
+
+
+
+
        fprintf(fp,     "\n"
-                       "test -x $WEBCIT_DIR/ctdlsvc || exit 0\n"
-                       "test -d /var/run || exit 0\n"
                        "\n"
                        "case \"$1\" in\n"
                        "\n"
                        "start)         echo -n \"Starting WebCit... \"\n"
-                       "               if $WEBCIT_DIR/ctdlsvc /var/run/webcit.pid "
-                                                       "$WEBCIT_DIR/webserver "
-                                                       "-t/dev/null "
+                       "               if   $WEBCIT_DIR/webcit "
+                                                       "-D/var/run/webcit.pid "
                                                        "-p$HTTP_PORT $CTDL_HOSTNAME $CTDL_PORTNAME\n"
                        "               then\n"
                        "                       echo \"ok\"\n"
@@ -526,9 +575,8 @@ void install_init_scripts(void)
                        "               fi\n");
 #ifdef HAVE_OPENSSL
        fprintf(fp,     "               echo -n \"Starting WebCit SSL... \"\n"
-                       "               if $WEBCIT_DIR/ctdlsvc /var/run/webcit-ssl.pid "
-                                                       "$WEBCIT_DIR/webserver "
-                                                       "-t/dev/null "
+                       "               if  $WEBCIT_DIR/webcit "
+                                                       "-D/var/run/webcit-ssl.pid "
                                                        "-s -p$HTTPS_PORT $CTDL_HOSTNAME $CTDL_PORTNAME\n"
                        "               then\n"
                        "                       echo \"ok\"\n"
@@ -556,19 +604,24 @@ void install_init_scripts(void)
                        "               rm -f /var/run/webcit-ssl.pid 2>/dev/null\n");
 #endif
        fprintf(fp,     "               ;;\n"
-                       "*)             echo \"Usage: $0 {start|stop}\"\n"
+                       "restart)       $0 stop\n"
+                       "               $0 start\n"
+                       "               ;;\n"
+                       "*)             echo \"Usage: $0 {start|stop|restart}\"\n"
                        "               exit 1\n"
                        "               ;;\n"
                        "esac\n"
        );
 
        fclose(fp);
-       chmod("/etc/init.d/webcit", 0755);
+       chmod(initfile, 0755);
 
        /* Set up the run levels. */
        system("/bin/rm -f /etc/rc?.d/[SK]??webcit 2>/dev/null");
-       system("for x in 2 3 4 5 ; do [ -d /etc/rc$x.d ] && ln -s /etc/init.d/webcit /etc/rc$x.d/S84webcit ; done 2>/dev/null");
-       system("for x in 0 6 S; do [ -d /etc/rc$x.d ] && ln -s /etc/init.d/webcit /etc/rc$x.d/K15webcit ; done 2>/dev/null");
+       snprintf(command, sizeof(command), "for x in 2 3 4 5 ; do [ -d /etc/rc$x.d ] && ln -s %s /etc/rc$x.d/S84webcit ; done 2>/dev/null", initfile);
+       system(command);
+       snprintf(command, sizeof(command), "for x in 0 6 S; do [ -d /etc/rc$x.d ] && ln -s %s /etc/rc$x.d/K15webcit ; done 2>/dev/null", initfile);
+       system(command);
 
 }
 
@@ -586,12 +639,6 @@ int discover_ui(void)
                return UI_DIALOG;
        }
                
-#ifdef HAVE_NEWT
-       newtInit();
-       newtCls();
-       newtDrawRootText(0, 0, "WebCit Setup");
-       return UI_NEWT;
-#endif
        return UI_TEXT;
 }
 
@@ -604,6 +651,7 @@ int main(int argc, char *argv[])
        int a;
        char aaa[256];
        int info_only = 0;
+
        strcpy(suggested_url, "http://<your_host_name>:<port>/");
 
        /* set an invalid setup type */
@@ -642,7 +690,7 @@ int main(int argc, char *argv[])
        }
 
        /* Get started in a valid setup directory. */
-       strcpy(setup_directory, PREFIX);
+       strcpy(setup_directory, WEBCITDIR);
        if ( (using_web_installer) && (getenv("WEBCIT") != NULL) ) {
                strcpy(setup_directory, getenv("WEBCIT"));
        }
@@ -681,12 +729,8 @@ int main(int argc, char *argv[])
                install_init_scripts();
 
                if (!access("/etc/init.d/webcit", X_OK)) {
-                       for (a=0; a<=2; ++a) {
-                               progress("Restarting the WebCit service...", a, 3);
-                               if (a == 0) system("/etc/init.d/webcit stop >/dev/null 2>&1");
-                               if (a == 1) system("/etc/init.d/webcit start >/dev/null 2>&1");
-                               sleep(1);
-                       }
+                       system("/etc/init.d/webcit stop");
+                       system("/etc/init.d/webcit start");
                }
 
                sprintf(aaa,