X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Futils%2Fsetup.c;h=bb7f542dec09c2fe53248fba5d6f65df9b64386d;hb=a1569587b8bb37d938d476ed6010e28b310a1f68;hp=7a38bc2f731e5205baba9190c59ef226b59f8e1e;hpb=ce11e75ecfefde8e018b2376348f77a5f6d893fe;p=citadel.git diff --git a/citadel/utils/setup.c b/citadel/utils/setup.c index 7a38bc2f7..bb7f542de 100644 --- a/citadel/utils/setup.c +++ b/citadel/utils/setup.c @@ -1,9 +1,18 @@ /* * Citadel setup utility + * + * Copyright (c) 1987-2014 by the citadel.org team + * + * This program is open source software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License version 3. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. */ #define SHOW_ME_VAPPEND_PRINTF -#include "ctdl_module.h" #include #include #include @@ -12,7 +21,6 @@ #include #include #include -#include #include #include #include @@ -20,11 +28,13 @@ #include #include #include +#include +#include +#include #include #include "citadel.h" #include "axdefs.h" #include "sysdep.h" -#include "config.h" #include "citadel_dirs.h" #if HAVE_BACKTRACE #include @@ -41,18 +51,14 @@ #define _(string) (string) #endif - -#define MAXSETUP 11 /* How many setup questions to ask */ - #define UI_TEXT 0 /* Default setup type -- text only */ -#define UI_DIALOG 2 /* Use the 'dialog' program */ +#define UI_DIALOG 2 /* Use the 'whiptail' or 'dialog' program */ #define UI_SILENT 3 /* Silent running, for use in scripts */ #define SERVICE_NAME "citadel" #define PROTO_NAME "tcp" #define NSSCONF "/etc/nsswitch.conf" - typedef enum _SetupStep { eCitadelHomeDir = 0, eSysAdminName = 1, @@ -86,19 +92,18 @@ const char *EnvNames [eMaxQuestions] = { "LDAP_BIND_PW" }; -int setup_type; +int setup_type = (-1); int using_web_installer = 0; int enable_home = 1; char admin_pass[SIZ]; char admin_cmd[SIZ]; +int serv_sock = (-1) ; +char configs[NUM_CONFIGS][1024]; const char *setup_titles[eMaxQuestions]; const char *setup_text[eMaxQuestions]; -/* calculate all our path on a central place */ -/* where to keep our config */ - - +char *program_title; void SetTitles(void) { @@ -108,6 +113,15 @@ void SetTitles(void) #else have_run_dir = 0; #endif + +#ifdef ENABLE_NLS + setlocale(LC_MESSAGES, getenv("LANG")); + + bindtextdomain("citadel-setup", LOCALEDIR"/locale"); + textdomain("citadel-setup"); + bind_textdomain_codeset("citadel-setup","UTF8"); +#endif + setup_titles[eCitadelHomeDir] = _("Citadel Home Directory"); if (have_run_dir) setup_text[eCitadelHomeDir] = _( @@ -124,13 +138,15 @@ void SetTitles(void) "note that it may not have a leading /"); - setup_titles[eSysAdminName] = _("Citadel administrator username:");//// + setup_titles[eSysAdminName] = _("Citadel administrator username:"); setup_text[eSysAdminName] = _( -"Enter the name of the system administrator (which is probably\n" -"you). When an account is created with this name, it will\n" -"automatically be given administrator-level access.\n"); +"Please enter the name of the Citadel user account that should be granted " +"administrative privileges once created. If using internal authentication " +"this user account will be created if it does not exist. For external " +"authentication this user account has to exist."); - setup_titles[eSysAdminPW] = _("Administrator password:");// + + setup_titles[eSysAdminPW] = _("Administrator password:"); setup_text[eSysAdminPW] = _( "Enter a password for the system administrator. When setup\n" "completes it will attempt to create the administrator user\n" @@ -140,19 +156,20 @@ void SetTitles(void) setup_text[eUID] = _( "Citadel needs to run under its own user ID. This would\n" "typically be called \"citadel\", but if you are running Citadel\n" -"as a public BBS, you might also call it \"bbs\" or \"guest\".\n" +"as a public site, you might also call it \"bbs\" or \"guest\".\n" "The server will run under this user ID. Please specify that\n" "user ID here. You may specify either a user name or a numeric\n" "UID.\n"); - setup_titles[eIP_ADDR] = _("Listening address for the Citadel server:");/// + setup_titles[eIP_ADDR] = _("Listening address for the Citadel server:"); setup_text[eIP_ADDR] = _( -"Specify the IP address on which your server will run.\n" +"Please specify the IP address which the server should be listening to. " "You can name a specific IPv4 or IPv6 address, or you can specify\n" -"'*' for 'any address', '::' for 'any IPv6 address', or '0.0.0.0'\n" -"for 'any IPv4 address'. If you leave this blank, Citadel will\n" -"listen on all addresses. You can usually skip this unless you are\n" -"running multiple instances of Citadel on the same computer.\n"); +"\"*\" for \"any address\", \"::\" for \"any IPv6 address\", or \"0.0.0.0\"\n" +"for \"any IPv4 address\". If you leave this blank, Citadel will\n" +"listen on all addresses. " +"This can usually be left to the default unless multiple instances of Citadel " +"are running on the same computer."); setup_titles[eCTDL_Port] = _("Server port number:"); setup_text[eCTDL_Port] = _( @@ -163,9 +180,16 @@ void SetTitles(void) "of Citadel on the same computer and there is something else\n" "already using port 504.\n"); - setup_titles[eAuthType] = _("Authentication method to use:");//// + setup_titles[eAuthType] = _("Authentication method to use:"); setup_text[eAuthType] = _( -"Specify which authentication mode you wish to use.\n" +"Please choose the user authentication mode. By default Citadel will use its " +"own internal user accounts database. If you choose Host, Citadel users will " +"have accounts on the host system, authenticated via /etc/passwd or a PAM " +"source. LDAP chooses an RFC 2307 compliant directory server, the last option " +"chooses the nonstandard MS Active Directory LDAP scheme." +"\n" +"Do not change this option unless you are sure it is required, since changing " +"back requires a full reinstall of Citadel." "\n" " 0. Self contained authentication\n" " 1. Host system integrated authentication\n" @@ -176,35 +200,47 @@ void SetTitles(void) "\n" "ANSWER \"0\" UNLESS YOU COMPLETELY UNDERSTAND THIS OPTION.\n"); - setup_titles[eLDAP_Host] = _("LDAP host:");/// + setup_titles[eLDAP_Host] = _("LDAP host:"); setup_text[eLDAP_Host] = _( "Please enter the host name or IP address of your LDAP server.\n"); - setup_titles[eLDAP_Port] = _("LDAP port number:");//// + setup_titles[eLDAP_Port] = _("LDAP port number:"); setup_text[eLDAP_Port] = _( "Please enter the port number of the LDAP service (usually 389).\n"); - setup_titles[eLDAP_Base_DN] = _("LDAP base DN:");/// + setup_titles[eLDAP_Base_DN] = _("LDAP base DN:"); setup_text[eLDAP_Base_DN] = _( "Please enter the Base DN to search for authentication\n" "(for example: dc=example,dc=com)\n"); - setup_titles[eLDAP_Bind_DN] = _("LDAP bind DN:");// + setup_titles[eLDAP_Bind_DN] = _("LDAP bind DN:"); setup_text[eLDAP_Bind_DN] = _( -"Please enter the DN of an account to use for binding to the LDAP server\n" -"for performing queries. The account does not require any other\n" -"privileges. If your LDAP server allows anonymous queries, you can.\n" -"leave this blank.\n"); +"Please enter the DN of an account to use for binding to the LDAP server for " +"performing queries. The account does not require any other privileges. If " +"your LDAP server allows anonymous queries, you can leave this blank.\n"); - setup_titles[eLDAP_Bind_PW] = _("LDAP bind password:");// + setup_titles[eLDAP_Bind_PW] = _("LDAP bind password:"); setup_text[eLDAP_Bind_PW] = _( "If you entered a Bind DN in the previous question, you must now enter\n" "the password associated with that account. Otherwise, you can leave this\n" "blank.\n"); + +#if 0 +// Debug loading of locales... Strace does a better job though. + printf("Message catalog directory: %s\n", bindtextdomain("citadel-setup", LOCALEDIR"/locale")); + printf("Text domain: %s\n", textdomain("citadel-setup")); + printf("Text domain Charset: %s\n", bind_textdomain_codeset("citadel-setup","UTF8")); + { + int i; + for (i = 0; i < eMaxQuestions; i++) + printf("%s - %s\n", setup_titles[i], _(setup_titles[i])); + exit(0); + } +#endif } /* - * print the actual stack frame. + * Print the stack frame for a backtrace */ void cit_backtrace(void) { @@ -225,20 +261,6 @@ void cit_backtrace(void) #endif } -struct config config; - - -struct config config; -int direction; - - -void cleanup(int exitcode) -{ -// printf("Exitcode: %d\n", exitcode); -// cit_backtrace(); - exit(exitcode); -} - void title(const char *text) @@ -260,26 +282,31 @@ int yesno(const char *question, int default_value) case UI_TEXT: do { - printf("%s\nYes/No [%s] --> ", - question, - ( default_value ? "Yes" : "No" ) + printf("%s\n%s [%s] --> ", + question, + _("Yes/No"), + ( default_value ? _("Yes") : _("No") ) ); if (fgets(buf, sizeof buf, stdin)) { answer = tolower(buf[0]); - if ((buf[0]==0) || (buf[0]==13) || (buf[0]==10)) + if ((buf[0]==0) || (buf[0]==13) || (buf[0]==10)) { answer = default_value; - else if (answer == 'y') + } + else if (answer == 'y') { answer = 1; - else if (answer == 'n') + } + else if (answer == 'n') { answer = 0; + } } } while ((answer < 0) || (answer > 1)); break; case UI_DIALOG: - sprintf(buf, "exec %s %s --yesno '%s' 15 75", + snprintf(buf, sizeof buf, "exec %s --backtitle '%s' %s --yesno '%s' 15 75", getenv("CTDL_DIALOG"), + program_title, ( default_value ? "" : "--defaultno" ), question); i = system(buf); @@ -292,7 +319,6 @@ int yesno(const char *question, int default_value) break; case UI_SILENT: break; - } return (answer); } @@ -301,22 +327,26 @@ int yesno(const char *question, int default_value) void important_message(const char *title, const char *msgtext) { char buf[SIZ]; - int rv; switch (setup_type) { case UI_TEXT: 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..."); - if (fgets(buf, sizeof buf, stdin)); + printf("%s", _("Press return to continue...")); + if (fgets(buf, sizeof buf, stdin)) + ; break; case UI_DIALOG: - sprintf(buf, "exec %s --msgbox '%s' 19 72", + snprintf(buf, sizeof buf, "exec %s --backtitle '%s' --msgbox '%s' 19 72", getenv("CTDL_DIALOG"), + program_title, msgtext); - rv = system(buf); + int rv = system(buf); + if (rv != 0) { + fprintf(stderr, _("failed to run the dialog command\n")); + } break; case UI_SILENT: fprintf(stderr, "%s\n", msgtext); @@ -326,12 +356,21 @@ void important_message(const char *title, const char *msgtext) void important_msgnum(int msgnum) { - important_message("Important Message", setup_text[msgnum]); + important_message(_("Important Message"), setup_text[msgnum]); } -void display_error(char *error_message) +void display_error(char *error_message_format, ...) { - important_message("Error", error_message); + StrBuf *Msg; + va_list arg_ptr; + + Msg = NewStrBuf(); + va_start(arg_ptr, error_message_format); + StrBufVAppendPrintf(Msg, error_message_format, arg_ptr); + va_end(arg_ptr); + + important_message(_("Error"), ChrPtr(Msg)); + FreeStrBuf(&Msg); } void progress(char *text, long int curr, long int cmax) @@ -348,7 +387,6 @@ void progress(char *text, long int curr, long int cmax) printf("%s\n", text); printf("...................................................."); printf("..........................\r"); - fflush(stdout); dots_printed = 0; } else if (curr == cmax) { printf("\r%79s\n", ""); @@ -359,15 +397,16 @@ void progress(char *text, long int curr, long int cmax) while (dots_printed < a) { printf("*"); ++dots_printed; - fflush(stdout); } } + fflush(stdout); break; case UI_DIALOG: if (curr == 0) { - sprintf(buf, "exec %s --gauge '%s' 7 72 0", + snprintf(buf, sizeof buf, "exec %s --backtitle '%s' --gauge '%s' 7 72 0", getenv("CTDL_DIALOG"), + program_title, text); fp = popen(buf, "w"); if (fp != NULL) { @@ -393,218 +432,111 @@ void progress(char *text, long int curr, long int cmax) case UI_SILENT: break; + default: + assert(1==0); /* If we got here then the developer is a moron */ } } -/* - * check_services_entry() -- Make sure "citadel" is in /etc/services - * - */ -void check_services_entry(void) +int uds_connectsock(char *sockpath) { - int i; - FILE *sfp; - char errmsg[256]; - - if (getservbyname(SERVICE_NAME, PROTO_NAME) == NULL) { - for (i=0; i<=2; ++i) { - progress("Adding service entry...", i, 2); - if (i == 0) { - sfp = fopen("/etc/services", "a"); - if (sfp == NULL) { - sprintf(errmsg, "Cannot open /etc/services: %s", strerror(errno)); - display_error(errmsg); - } else { - fprintf(sfp, "%s 504/tcp\n", SERVICE_NAME); - fclose(sfp); - } - } - } + int s; + struct sockaddr_un addr; + + memset(&addr, 0, sizeof(addr)); + addr.sun_family = AF_UNIX; + strncpy(addr.sun_path, sockpath, sizeof addr.sun_path); + + s = socket(AF_UNIX, SOCK_STREAM, 0); + if (s < 0) { + return(-1); } -} + if (connect(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + close(s); + return(-1); + } + return s; +} /* - * delete_inittab_entry() -- Remove obsolete /etc/inittab entry for Citadel + * input binary data from socket */ -void delete_inittab_entry(void) +void serv_read(char *buf, int bytes) { - FILE *infp; - FILE *outfp; - char looking_for[256]; - char buf[1024]; - char outfilename[32]; - int changes_made = 0; - int rv; - - /* Determine the fully qualified path name of citserver */ - snprintf(looking_for, - sizeof looking_for, - "%s/citserver", - ctdl_sbin_dir - ); - - /* Now tweak /etc/inittab */ - infp = fopen("/etc/inittab", "r"); - if (infp == NULL) { + int len, rlen; - /* If /etc/inittab does not exist, return quietly. - * Not all host platforms have it. - */ - if (errno == ENOENT) { + len = 0; + while (len < bytes) { + rlen = read(serv_sock, &buf[len], bytes - len); + if (rlen < 1) { return; } - - /* Other errors might mean something really did go wrong. - */ - sprintf(buf, "Cannot open /etc/inittab: %s", strerror(errno)); - display_error(buf); - return; + len = len + rlen; } +} - strcpy(outfilename, "/tmp/ctdlsetup.XXXXXX"); - outfp = fdopen(mkstemp(outfilename), "w+"); - if (outfp == NULL) { - sprintf(buf, "Cannot open %s: %s", outfilename, strerror(errno)); - display_error(buf); - fclose(infp); - return; - } - while (fgets(buf, sizeof buf, infp) != NULL) { - if (strstr(buf, looking_for) != NULL) { - rv = fwrite("#", 1, 1, outfp); - ++changes_made; +/* + * send binary to server + */ +void serv_write(char *buf, int nbytes) +{ + int bytes_written = 0; + int retval; + while (bytes_written < nbytes) { + retval = write(serv_sock, &buf[bytes_written], nbytes - bytes_written); + if (retval < 1) { + return; } - rv = fwrite(buf, strlen(buf), 1, outfp); - } - - fclose(infp); - fclose(outfp); - - if (changes_made) { - sprintf(buf, "/bin/mv -f %s /etc/inittab 2>/dev/null", outfilename); - rv = system(buf); - rv = system("/sbin/init q 2>/dev/null"); - } - else { - unlink(outfilename); + bytes_written = bytes_written + retval; } } + /* - * install_init_scripts() -- Try to configure to start Citadel at boot + * input string from socket - implemented in terms of serv_read() */ -void install_init_scripts(void) +void serv_gets(char *buf) { - struct stat etcinitd; - FILE *fp; - char *initfile = "/etc/init.d/citadel"; - char command[SIZ]; - int rv; + int i; - if ((stat("/etc/init.d/", &etcinitd) == -1) && - (errno == ENOENT)) - { - if ((stat("/etc/rc.d/init.d/", &etcinitd) == -1) && - (errno == ENOENT)) - initfile = CTDLDIR"/citadel.init"; - else - initfile = "/etc/rc.d/init.d/citadel"; + /* Read one character at a time. + */ + for (i = 0;; i++) { + serv_read(&buf[i], 1); + if (buf[i] == '\n' || i == (SIZ-1)) + break; } - fp = fopen(initfile, "r"); - if (fp != NULL) { - if (yesno("Citadel already appears to be configured to start at boot.\n" - "Would you like to keep your boot configuration as is?\n", 1) == 1) { - return; + /* If we got a long line, discard characters until the newline. + */ + if (i == (SIZ-1)) { + while (buf[i] != '\n') { + serv_read(&buf[i], 1); } - fclose(fp); - } - if (yesno("Would you like to automatically start Citadel at boot?\n", 1) == 0) { - return; - } - - fp = fopen(initfile, "w"); - if (fp == NULL) { - display_error("Cannot create /etc/init.d/citadel"); - return; - } - - fprintf(fp, "#!/bin/sh\n" - "#\n" - "# Init file for Citadel\n" - "#\n" - "# chkconfig: - 79 30\n" - "# description: Citadel service\n" - "# processname: citserver\n" - "# pidfile: %s/citadel.pid\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" - "\n" - "CITADEL_DIR=%s\n" - , - ctdl_run_dir, - ctdl_sbin_dir - ); - fprintf(fp, "\n" - "test -d /var/run || exit 0\n" - "\n" - "case \"$1\" in\n" - "\n" - "start) echo -n \"Starting Citadel... \"\n" - " if $CITADEL_DIR/citserver -lmail -d\n" - " then\n" - " echo \"ok\"\n" - " else\n" - " echo \"failed\"\n" - " fi\n"); - fprintf(fp, " ;;\n" - "stop) echo -n \"Stopping Citadel... \"\n" - " if $CITADEL_DIR/sendcommand DOWN >/dev/null 2>&1 ; then\n" - " echo \"ok\"\n" - " else\n" - " echo \"failed\"\n" - " fi\n" - " rm -f %s/citadel.pid 2>/dev/null\n" - , - ctdl_run_dir - ); - fprintf(fp, " ;;\n" - "restart) if $CITADEL_DIR/sendcommand DOWN 1 >/dev/null 2>&1 ; then\n" - " echo \"ok\"\n" - " else\n" - " echo \"failed\"\n" - " fi\n" - " ;;\n" - "*) echo \"Usage: $0 {start|stop|restart}\"\n" - " exit 1\n" - " ;;\n" - "esac\n" - ); - - fclose(fp); - chmod(initfile, 0755); + /* Strip all trailing nonprintables (crlf) + */ + buf[i] = 0; +} - /* Set up the run levels. */ - rv = system("/bin/rm -f /etc/rc?.d/[SK]??citadel 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/S79citadel ; done 2>/dev/null", initfile); - rv = 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/K30citadel ; done 2>/dev/null", initfile); - rv = system(command); +/* + * send line to server - implemented in terms of serv_write() + */ +void serv_puts(char *buf) +{ + serv_write(buf, strlen(buf)); + serv_write("\n", 1); } - /* * On systems which use xinetd, see if we can offer to install Citadel as * the default telnet target. @@ -620,7 +552,9 @@ void check_xinetd_entry(void) { if (fp == NULL) return; /* Not there. Oh well... */ while (fgets(buf, sizeof buf, fp) != NULL) { - if (strstr(buf, "/citadel") != NULL) already_citadel = 1; + if (strstr(buf, "/citadel") != NULL) { + already_citadel = 1; + } } fclose(fp); if (already_citadel) return; /* Already set up this way. */ @@ -633,10 +567,11 @@ void check_xinetd_entry(void) { } else { snprintf(buf, sizeof buf, - "Setup can configure the \"xinetd\" service to automatically\n" - "connect incoming telnet sessions to Citadel, bypassing the\n" - "host system login: prompt. Would you like to do this?\n" - ); + _("Setup can configure the \"xinetd\" service to automatically\n" + "connect incoming telnet sessions to Citadel, bypassing the\n" + "host system login: prompt. Would you like to do this?\n" + ) + ); if (yesno(buf, 1) == 0) { return; } @@ -661,6 +596,9 @@ void check_xinetd_entry(void) { /* Now try to restart the service */ rv = system("/etc/init.d/xinetd restart >/dev/null 2>&1"); + if (rv != 0) { + display_error(_("failed to restart xinetd.\n")); + } } @@ -674,9 +612,11 @@ void disable_other_mta(const char *mta) { int lines = 0; int rv; - sprintf(buf, "/bin/ls -l /etc/rc*.d/S*%s 2>/dev/null; " + snprintf(buf, sizeof buf, + "/bin/ls -l /etc/rc*.d/S*%s 2>/dev/null; " "/bin/ls -l /etc/rc.d/rc*.d/S*%s 2>/dev/null", - mta, mta); + mta, mta + ); fp = popen(buf, "r"); if (fp == NULL) return; @@ -686,28 +626,40 @@ void disable_other_mta(const char *mta) { fclose(fp); if (lines == 0) return; /* Nothing to do. */ - /* Offer to replace other MTA with the vastly superior Citadel :) */ snprintf(buf, sizeof buf, - "You appear to have the \"%s\" email program\n" - "running on your system. If you want Citadel mail\n" - "connected with %s, you will have to manually integrate\n" - "them. It is preferable to disable %s, and use Citadel's\n" - "SMTP, POP3, and IMAP services.\n\n" - "May we disable %s so that Citadel has access to ports\n" - "25, 110, and 143?\n", - mta, mta, mta, mta + "%s \"%s\" %s%s%s%s%s%s%s", + _("You appear to have the "), + mta, + _(" email program\n" + "running on your system. If you want Citadel mail\n" + "connected with "), + mta, + _(" you will have to manually integrate\n" + "them. It is preferable to disable "), + mta, + _(", and use Citadel's\n" + "SMTP, POP3, and IMAP services.\n\n" + "May we disable "), + mta, + _("so that Citadel has access to ports\n" + "25, 110, and 143?\n") ); if (yesno(buf, 1) == 0) { return; } - sprintf(buf, "for x in /etc/rc*.d/S*%s; do mv $x `echo $x |sed s/S/K/g`; done >/dev/null 2>&1", mta); + snprintf(buf, sizeof buf, "for x in /etc/rc*.d/S*%s; do mv $x `echo $x |sed s/S/K/g`; done >/dev/null 2>&1", mta); rv = system(buf); - sprintf(buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta); + if (rv != 0) + display_error("%s %s.\n", _("failed to disable other mta"), mta); + + snprintf(buf, sizeof buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta); rv = system(buf); + if (rv != 0) + display_error(" %s.\n", _("failed to disable other mta"), mta); } const char *other_mtas[] = { @@ -749,49 +701,6 @@ void disable_other_mtas(void) } } -/* - * Check to see if our server really works. Returns 0 on success. - */ -int test_server(char *relhomestr, int relhome) { - char cmd[256]; - char cookie[256]; - FILE *fp; - char buf[4096]; - int found_it = 0; - - /* Generate a silly little cookie. We're going to write it out - * to the server and try to get it back. The cookie does not - * have to be secret ... just unique. - */ - sprintf(cookie, "--test--%d--", getpid()); - - if (relhome) - sprintf(cmd, "%s/sendcommand -h%s ECHO %s 2>&1", - ctdl_sbin_dir, - relhomestr, - cookie); - else - sprintf(cmd, "%s/sendcommand ECHO %s 2>&1", - ctdl_sbin_dir, - cookie); - - fp = popen(cmd, "r"); - if (fp == NULL) return(errno); - - while (fgets(buf, sizeof buf, fp) != NULL) { - if ( (buf[0]=='2') - && (strstr(buf, cookie) != NULL) ) { - ++found_it; - } - } - pclose(fp); - - if (found_it) { - return(0); - } - return(-1); -} - void strprompt(const char *prompt_title, const char *prompt_text, char *Target, char *DefValue) { char buf[SIZ] = ""; @@ -806,8 +715,8 @@ void strprompt(const char *prompt_title, const char *prompt_text, char *Target, case UI_TEXT: title(prompt_title); printf("\n%s\n", prompt_text); - printf("This is currently set to:\n%s\n", Target); - printf("Enter new value or press return to leave unchanged:\n"); + printf("%s\n%s\n", _("This is currently set to:"), Target); + printf("%s\n", _("Enter new value or press return to leave unchanged:")); if (fgets(buf, sizeof buf, stdin)){ buf[strlen(buf) - 1] = 0; } @@ -817,12 +726,17 @@ void strprompt(const char *prompt_title, const char *prompt_text, char *Target, case UI_DIALOG: CtdlMakeTempFileName(dialog_result, sizeof dialog_result); - sprintf(buf, "exec %s --inputbox '%s' 19 72 '%s' 2>%s", + snprintf(buf, sizeof buf, "exec %s --backtitle '%s' --nocancel --inputbox '%s' 19 72 '%s' 2>%s", getenv("CTDL_DIALOG"), + program_title, prompt_text, Target, dialog_result); rv = system(buf); + if (rv != 0) { + fprintf(stderr, "failed to run whiptail or dialog\n"); + } + fp = fopen(dialog_result, "r"); if (fp != NULL) { if (fgets(Target, sizeof buf, fp)) { @@ -835,7 +749,8 @@ void strprompt(const char *prompt_title, const char *prompt_text, char *Target, } break; case UI_SILENT: - strcpy(Target, DefValue); + if (*DefValue != '\0') + strcpy(Target, DefValue); break; } } @@ -851,33 +766,18 @@ void set_str_val(int msgpos, char *Target, char *DefValue) strprompt(setup_titles[msgpos], setup_text[msgpos], Target, - DefValue); -} - -void set_int_val(int msgpos, int *ip, char *DefValue) -{ - char buf[16]; - snprintf(buf, sizeof buf, "%d", (int) *ip); - set_str_val(msgpos, buf, DefValue); - *ip = atoi(buf); -} - - -void set_char_val(int msgpos, char *ip, char *DefValue) -{ - char buf[16]; - snprintf(buf, sizeof buf, "%d", (int) *ip); - set_str_val(msgpos, buf, DefValue); - *ip = (char) atoi(buf); + DefValue + ); } - -void set_long_val(int msgpos, long int *ip, char *DefValue) +/* like set_str_val() but make sure we ended up with a numeric value */ +void set_int_val(int msgpos, char *target, char *DefValue) { - char buf[16]; - snprintf(buf, sizeof buf, "%ld", *ip); - set_str_val(msgpos, buf, DefValue); - *ip = atol(buf); + while(1) { + set_str_val(msgpos, target, DefValue); + if (!strcmp(target, "0")) return; + if (atoi(target) != 0) return; + } } @@ -892,14 +792,14 @@ void edit_value(int curr) { Value = getenv(EnvNames[curr]); } - if (Value == NULL) + if (Value == NULL) { Value = ""; - + } switch (curr) { case eSysAdminName: - set_str_val(curr, config.c_sysadm, Value); + set_str_val(curr, configs[13], Value); break; case eSysAdminPW: @@ -910,29 +810,29 @@ void edit_value(int curr) if (setup_type == UI_SILENT) { if (Value) { - config.c_ctdluid = atoi(Value); + sprintf(configs[69], "%d", atoi(Value)); } } else { #ifdef __CYGWIN__ - config.c_ctdluid = 0; /* XXX Windows hack, prob. insecure */ + strcpy(configs[69], "0"); /* work-around for Windows */ #else - i = config.c_ctdluid; + i = atoi(configs[69]); pw = getpwuid(i); if (pw == NULL) { - set_int_val(curr, &i, Value); - config.c_ctdluid = i; + set_int_val(curr, configs[69], Value); + sprintf(configs[69], "%d", i); } else { strcpy(ctdluidname, pw->pw_name); set_str_val(curr, ctdluidname, Value); pw = getpwnam(ctdluidname); if (pw != NULL) { - config.c_ctdluid = pw->pw_uid; + sprintf(configs[69], "%d", pw->pw_uid); } else if (atoi(ctdluidname) > 0) { - config.c_ctdluid = atoi(ctdluidname); + sprintf(configs[69], "%d", atoi(ctdluidname)); } } #endif @@ -940,89 +840,69 @@ void edit_value(int curr) break; case eIP_ADDR: - set_str_val(curr, config.c_ip_addr, Value); + set_str_val(curr, configs[37], Value); break; case eCTDL_Port: - set_int_val(curr, &config.c_port_number, Value); + set_int_val(curr, configs[68], Value); break; case eAuthType: if (setup_type == UI_SILENT) { const char *auth; - config.c_auth_mode = AUTHMODE_NATIVE; + //config.c_auth_mode = AUTHMODE_NATIVE; auth = Value; if (auth != NULL) { if ((strcasecmp(auth, "yes") == 0) || (strcasecmp(auth, "host") == 0)) { - config.c_auth_mode = AUTHMODE_HOST; + //config.c_auth_mode = AUTHMODE_HOST; } else if (strcasecmp(auth, "ldap") == 0){ - config.c_auth_mode = AUTHMODE_LDAP; + //config.c_auth_mode = AUTHMODE_LDAP; } else if ((strcasecmp(auth, "ldap_ad") == 0) || (strcasecmp(auth, "active directory") == 0)){ - config.c_auth_mode = AUTHMODE_LDAP_AD; + //config.c_auth_mode = AUTHMODE_LDAP_AD; } } } else { - set_int_val(curr, &config.c_auth_mode, Value); + set_int_val(curr, configs[52], Value); } break; case eLDAP_Host: - set_str_val(curr, config.c_ldap_host, Value); + if (IsEmptyStr(configs[32])) { + strcpy(configs[32], "localhost"); + } + set_str_val(curr, configs[32], Value); break; case eLDAP_Port: - if (config.c_ldap_port == 0) { - config.c_ldap_port = 389; + if (atoi(configs[33]) == 0) { + strcpy(configs[33], "389"); } - set_int_val(curr, &config.c_ldap_port, Value); + set_int_val(curr, configs[33], Value); break; case eLDAP_Base_DN: - set_str_val(curr, config.c_ldap_base_dn, Value); + set_str_val(curr, configs[34], Value); break; case eLDAP_Bind_DN: - set_str_val(curr, config.c_ldap_bind_dn, Value); + set_str_val(curr, configs[35], Value); break; case eLDAP_Bind_PW: - set_str_val(curr, config.c_ldap_bind_pw, Value); + set_str_val(curr, configs[36], Value); break; } } -/* - * (re-)write the config data to disk - */ -void write_config_to_disk(void) -{ - FILE *fp; - int fd; - int rv; - - if ((fd = creat(file_citadel_config, S_IRUSR | S_IWUSR)) == -1) { - display_error("setup: cannot open citadel.config"); - cleanup(1); - } - fp = fdopen(fd, "wb"); - if (fp == NULL) { - display_error("setup: cannot open citadel.config"); - cleanup(1); - } - rv = fwrite((char *) &config, sizeof(struct config), 1, fp); - fclose(fp); -} - - /* @@ -1031,7 +911,7 @@ void write_config_to_disk(void) int discover_ui(void) { - /* Use "dialog" if we have it */ + /* Use "whiptail" or "dialog" if we have it */ if (getenv("CTDL_DIALOG") != NULL) { return UI_DIALOG; } @@ -1041,15 +921,6 @@ int discover_ui(void) -void migrate_old_installs(void) -{ - int rv; - rv = system("exec /bin/rm -fr ./rooms ./chatpipes ./expressmsgs ./sessions 2>/dev/null"); - unlink("citadel.log"); - unlink("weekly"); -} - - /* * Strip "db" entries out of /etc/nsswitch.conf */ @@ -1060,7 +931,6 @@ void fixnss(void) { char buf_nc[256]; char question[512]; int i; - int changed = 0; int file_changed = 0; char new_filename[64]; int rv; @@ -1078,7 +948,6 @@ void fixnss(void) { } while (fgets(buf, sizeof buf, fp_read) != NULL) { - changed = 0; strcpy(buf_nc, buf); for (i=0; i 0) { if ((isspace(buf_nc[i+2])) || (buf_nc[i+2]==0)) { - changed = 1; file_changed = 1; strcpy(&buf_nc[i], &buf_nc[i+2]); strcpy(&buf[i], &buf[i+2]); @@ -1117,89 +985,88 @@ void fixnss(void) { } snprintf(question, sizeof question, - "\n" - "/etc/nsswitch.conf is configured to use the 'db' module for\n" - "one or more services. This is not necessary on most systems,\n" - "and it is known to crash the Citadel server when delivering\n" - "mail to the Internet.\n" - "\n" - "Do you want this module to be automatically disabled?\n" - "\n" + _( + "\n" + "/etc/nsswitch.conf is configured to use the 'db' module for\n" + "one or more services. This is not necessary on most systems,\n" + "and it is known to crash the Citadel server when delivering\n" + "mail to the Internet.\n" + "\n" + "Do you want this module to be automatically disabled?\n" + "\n" + ) ); if (yesno(question, 1)) { - sprintf(buf, "/bin/mv -f %s %s", new_filename, NSSCONF); + snprintf(buf, sizeof buf, "/bin/mv -f %s %s", new_filename, NSSCONF); rv = system(buf); + if (rv != 0) { + fprintf(stderr, "failed to edit %s.\n", NSSCONF); + } chmod(NSSCONF, 0644); } unlink(new_filename); } -void check_init_script (char *relhome) -{ - int rv; - FILE *fp; - /* - * If we're running on SysV, install init scripts. - */ - if (!access("/var/run", W_OK)) { - if (getenv("NO_INIT_SCRIPTS") == NULL) { - install_init_scripts(); - } +#if 0 + important_message(_("Setup finished"), + _("Setup of the Citadel server is complete.\n" + "If you will be using WebCit, please run its\n" + "setup program now; otherwise, run './citadel'\n" + "to log in.\n")); + important_message(_("Setup failed"), + _("Setup is finished, but the Citadel server failed to start.\n" + "Go back and check your configuration.\n") + important_message(_("Setup finished"), + _("Setup is finished. You may now start the server.")); +#endif - if (!access("/etc/init.d/citadel", X_OK)) { - rv = system("/etc/init.d/citadel start"); - sleep(3); - } - if (test_server(relhome, enable_home) == 0) { - char buf[SIZ]; - int found_it = 0; - - if (config.c_auth_mode == AUTHMODE_NATIVE) { - snprintf (admin_cmd, sizeof(admin_cmd), "%s/sendcommand \"CREU %s|%s\" 2>&1", - ctdl_sbin_dir, config.c_sysadm, admin_pass); - fp = popen(admin_cmd, "r"); - if (fp != NULL) { - while (fgets(buf, sizeof buf, fp) != NULL) - { - if ((atol(buf) == 574) || (atol(buf) == 200)) - ++found_it; - } - pclose(fp); - } - - if (found_it == 0) { - important_message("Error","Setup failed to create your admin user"); - } - } - if (setup_type != UI_SILENT) - important_message("Setup finished", - "Setup of the Citadel server is complete.\n" - "If you will be using WebCit, please run its\n" - "setup program now; otherwise, run './citadel'\n" - "to log in.\n"); - } - else { - important_message("Setup failed", - "Setup is finished, but the Citadel server failed to start.\n" - "Go back and check your configuration.\n" - ); - } +#define GetDefaultVALINT(CFGNAME, DEFL) GetDefaultValInt(&config.CFGNAME, "CITADEL_"#CFGNAME, DEFL) +void GetDefaultValInt(int *WhereTo, const char *VarName, int DefVal) +{ + const char *ch; + if (*WhereTo == 0) *WhereTo = DefVal; + if ((setup_type == UI_SILENT) && + (ch = getenv(VarName), ch != NULL)) + { + *WhereTo = atoi(ch); } +} +#define GetDefaultVALCHAR(CFGNAME, DEFL) GetDefaultValChar(&config.CFGNAME, "CITADEL_"#CFGNAME, DEFL) +void GetDefaultValChar(char *WhereTo, const char *VarName, char DefVal) +{ + const char *ch; + if (*WhereTo == 0) *WhereTo = DefVal; - else { - important_message("Setup finished", - "Setup is finished. You may now start the server."); + if ((setup_type == UI_SILENT) && + (ch = getenv(VarName), ch != NULL)) + { + *WhereTo = atoi(ch); } } +#define GetDefaultVALSTR(CFGNAME, DEFL) GetDefaultValStr(&config.CFGNAME[0], sizeof(config.CFGNAME), "CITADEL_"#CFGNAME, DEFL) +void GetDefaultValStr(char *WhereTo, size_t nMax, const char *VarName, const char *DefVal) +{ + const char *ch; + if (*WhereTo == '\0') + safestrncpy(WhereTo, DefVal, nMax); + + if ((setup_type == UI_SILENT) && + (ch = getenv(VarName), ch != NULL)) + { + safestrncpy(WhereTo, ch, nMax); + } +} + void set_default_values(void) { +#if 0 struct passwd *pw; struct utsname my_utsname; struct hostent *he; @@ -1208,9 +1075,7 @@ void set_default_values(void) uname(&my_utsname); /* set some sample/default values in place of blanks... */ - if (IsEmptyStr(config.c_nodename)) - safestrncpy(config.c_nodename, my_utsname.nodename, - sizeof config.c_nodename); + GetDefaultVALSTR(c_nodename, my_utsname.nodename); strtok(config.c_nodename, "."); if (IsEmptyStr(config.c_fqdn) ) { if ((he = gethostbyname(my_utsname.nodename)) != NULL) { @@ -1219,25 +1084,19 @@ void set_default_values(void) safestrncpy(config.c_fqdn, my_utsname.nodename, sizeof config.c_fqdn); } } - if (IsEmptyStr(config.c_humannode)) { - strcpy(config.c_humannode, "My System"); - } - if (IsEmptyStr(config.c_phonenum)) { - strcpy(config.c_phonenum, "US 800 555 1212"); - } - if (config.c_initax == 0) { - config.c_initax = 4; - } - if (IsEmptyStr(config.c_moreprompt)) strcpy(config.c_moreprompt, ""); - if (IsEmptyStr(config.c_twitroom)) strcpy(config.c_twitroom, "Trashcan"); - if (IsEmptyStr(config.c_baseroom)) strcpy(config.c_baseroom, BASEROOM); - if (IsEmptyStr(config.c_aideroom)) strcpy(config.c_aideroom, "Aide"); - if (config.c_port_number == 0) { - config.c_port_number = 504; - } - if (config.c_sleeping == 0) { - config.c_sleeping = 900; - } + GetDefaultVALSTR(c_humannode, _("My System")); + GetDefaultVALSTR(c_phonenum, _("US 800 555 1212")); + + GetDefaultVALCHAR(c_initax, 4); + + GetDefaultVALSTR(c_moreprompt, ""); + GetDefaultVALSTR(c_twitroom, "Trashcan"); + GetDefaultVALSTR(c_baseroom, BASEROOM); + GetDefaultVALSTR(c_aideroom, "Aide"); + GetDefaultVALINT(c_port_number, 504); + + GetDefaultVALINT(c_sleeping, 900); + if (config.c_ctdluid == 0) { pw = getpwnam("citadel"); if (pw != NULL) { @@ -1277,77 +1136,43 @@ void set_default_values(void) /* * Default port numbers for various services */ - if (config.c_smtp_port == 0) config.c_smtp_port = 25; - if (config.c_pop3_port == 0) config.c_pop3_port = 110; - if (config.c_imap_port == 0) config.c_imap_port = 143; - if (config.c_msa_port == 0) config.c_msa_port = 587; - if (config.c_smtps_port == 0) config.c_smtps_port = 465; - if (config.c_pop3s_port == 0) config.c_pop3s_port = 995; - if (config.c_imaps_port == 0) config.c_imaps_port = 993; - if (config.c_pftcpdict_port == 0) config.c_pftcpdict_port = -1; - if (config.c_managesieve_port == 0) config.c_managesieve_port = 2020; - if (config.c_xmpp_c2s_port == 0) config.c_xmpp_c2s_port = 5222; - if (config.c_xmpp_s2s_port == 0) config.c_xmpp_s2s_port = 5269; + GetDefaultVALINT(c_smtp_port, 25); + GetDefaultVALINT(c_pop3_port, 110); + GetDefaultVALINT(c_imap_port, 143); + GetDefaultVALINT(c_msa_port, 587); + GetDefaultVALINT(c_smtps_port, 465); + GetDefaultVALINT(c_pop3s_port, 995); + GetDefaultVALINT(c_imaps_port, 993); + GetDefaultVALINT(c_pftcpdict_port, -1); + GetDefaultVALINT(c_managesieve_port, 2020); + GetDefaultVALINT(c_xmpp_c2s_port, 5222); + GetDefaultVALINT(c_xmpp_s2s_port, 5269); + GetDefaultVALINT(c_nntp_port, 119); + GetDefaultVALINT(c_nntps_port, 563); +#endif } -void get_config (void) -{ - int a; - int rv; - FILE *fp; - - /* - * What we're going to try to do here is append a whole bunch of - * nulls to the citadel.config file, so we can keep the old config - * values if they exist, but if the file is missing or from an - * earlier version with a shorter config structure, when setup tries - * to read the old config parameters, they'll all come up zero. - * The length of the config file will be set to what it's supposed - * to be when we rewrite it, because we replace the old file with a - * completely new copy. - */ - if ((a = open(file_citadel_config, O_WRONLY | O_CREAT | O_APPEND, - S_IRUSR | S_IWUSR)) == -1) { - display_error("setup: cannot append citadel.config"); - cleanup(errno); - } - fp = fdopen(a, "ab"); - if (fp == NULL) { - display_error("setup: cannot append citadel.config"); - cleanup(errno); - } - for (a = 0; a < sizeof(struct config); ++a) { - putc(0, fp); - } - fclose(fp); - - /* now we re-open it, and read the old or blank configuration */ - fp = fopen(file_citadel_config, "rb"); - if (fp == NULL) { - display_error("setup: cannot open citadel.config"); - cleanup(errno); - } - rv = fread((char *) &config, sizeof(struct config), 1, fp); - fclose(fp); - -} int main(int argc, char *argv[]) { - int a; - int curr; + int a, i; + int curr; + char buf[1024]; char aaa[128]; - int old_setup_level = 0; int info_only = 0; - int relh=0; - int home=0; + int relh = 0; + int home = 0; + int nRetries = 0; char relhome[PATH_MAX]=""; char ctdldir[PATH_MAX]=CTDLDIR; - int rv; struct passwd *pw; gid_t gid; + char *activity = NULL; + /* Keep a mild groove on */ + program_title = _("Citadel setup program"); + /* set an invalid setup type */ setup_type = (-1); @@ -1391,116 +1216,245 @@ int main(int argc, char *argv[]) setup_type = discover_ui(); } if (info_only == 1) { - important_message("Citadel Setup", CITADEL); - cleanup(0); + important_message(_("Citadel Setup"), CITADEL); + exit(0); } enable_home = ( relh | home ); if (chdir(ctdl_run_dir) != 0) { - char errmsg[SIZ]; - sprintf(errmsg, "The directory you specified does not exist: [%s]\n", ctdl_run_dir); - - important_message("Citadel Setup", errmsg); - cleanup(errno); + display_error("%s: [%s]\n", + _("The directory you specified does not exist"), + ctdl_run_dir); + exit(errno); } - /* Try to stop Citadel if we can */ - if (!access("/etc/init.d/citadel", X_OK)) { - rv = system("/etc/init.d/citadel stop"); + /* + * Connect to the running Citadel server. + */ + while ((serv_sock < 0) && (nRetries < 10)) { + serv_sock = uds_connectsock(file_citadel_admin_socket); + nRetries ++; + if (serv_sock < 0) + sleep(1); + } + if (serv_sock < 0) { + display_error( + "%s: %s %s\n", + _("Setup could not connect to a running Citadel server."), + strerror(errno), file_citadel_admin_socket + ); + exit(1); } - /* Make sure Citadel is not running. */ - if (test_server(relhome, enable_home) == 0) { - important_message("Citadel Setup", - "The Citadel service is still running.\n" - "Please stop the service manually and run " - "setup again."); - cleanup(1); + /* + * read the server greeting + */ + serv_gets(buf); + if (buf[0] != '2') { + display_error("%s\n", buf); + exit(2); } - /* Now begin. */ - switch (setup_type) { - - case UI_TEXT: - printf("\n\n\n" - " *** Citadel setup program ***\n\n"); - break; - + /* + * Are we connected to the correct Citadel server? + */ + serv_puts("INFO"); + serv_gets(buf); + if (buf[0] != '1') { + display_error("%s\n", buf); + exit(3); + } + a = 0; + while (serv_gets(buf), strcmp(buf, "000")) { + if (a == 5) { + if (atoi(buf) != REV_LEVEL) { + display_error("%s\n", + _("Your setup program and Citadel server are from different versions.") + ); + exit(4); + } + } + ++a; } - get_config (); - - set_default_values(); - - /* Go through a series of dialogs prompting for config info */ - for (curr = 1; curr <= MAXSETUP; ++curr) { - edit_value(curr); - if ((curr == 6) && (config.c_auth_mode != AUTHMODE_LDAP) && (config.c_auth_mode != AUTHMODE_LDAP_AD)) { - curr += 5; /* skip LDAP questions if we're not authenticating against LDAP */ + /* + * Load the server's configuration + */ + serv_puts("CONF GET"); + serv_gets(buf); + if (buf[0] != '1') { + display_error("%s\n", buf); + exit(5); + } + memset(configs, 0, sizeof configs); + a = 0; + while (serv_gets(buf), strcmp(buf, "000")) { + if (a < NUM_CONFIGS) { + safestrncpy(configs[a], buf, sizeof(configs[a])); } + ++a; } - /***** begin version update section *****/ + /* + * Now begin. + */ - old_setup_level = config.c_setup_level; + /* _("Citadel Setup"), */ - if (old_setup_level == 0) { - goto NEW_INST; + if (setup_type == UI_TEXT) { + printf("\n\n\n *** %s ***\n\n", program_title); } - if (old_setup_level < 555) { - important_message( - "Citadel Setup", - "This Citadel installation is too old to be upgraded." - ); - cleanup(1); + if (setup_type == UI_DIALOG) { + system("clear 2>/dev/null"); } - write_config_to_disk(); - old_setup_level = config.c_setup_level; + set_default_values(); - /***** end of version update section *****/ + /* Go through a series of dialogs prompting for config info */ + for (curr = 1; curr < eMaxQuestions; ++curr) { + edit_value(curr); -NEW_INST: - config.c_setup_level = REV_LEVEL; + if ( (curr == 6) + && (atoi(configs[52]) != AUTHMODE_LDAP) + && (atoi(configs[52]) != AUTHMODE_LDAP_AD) + ) { + curr += 5; /* skip LDAP questions if we're not authenticating against LDAP */ + } - if ((pw = getpwuid(config.c_ctdluid)) == NULL) { + if (curr == eSysAdminName) { + if (atoi(configs[52]) == AUTHMODE_NATIVE) { + /* for native auth mode, fetch the admin's existing pw */ + snprintf(buf, sizeof buf, "AGUP %s", configs[13]); + serv_puts(buf); + serv_gets(buf); + if (buf[0] == '2') { + extract_token(admin_pass, &buf[4], 1, '|', sizeof admin_pass); + } + } + else { + ++curr; /* skip the password question for non-native auth modes */ + } + } + } + + if ((pw = getpwuid(atoi(configs[69]))) == NULL) { gid = getgid(); } else { gid = pw->pw_gid; } - create_run_directories(config.c_ctdluid, gid); + create_run_directories(atoi(configs[69]), gid); - write_config_to_disk(); + activity = _("Reconfiguring Citadel server"); + progress(activity, 0, NUM_CONFIGS+3); + sleep(1); /* Let the message appear briefly */ + serv_puts("CONF SET"); + serv_gets(buf); + if (buf[0] == '4') { + for (i=0; i