2 * Citadel setup utility
5 #define SHOW_ME_VAPPEND_PRINTF
6 #include "ctdl_module.h"
13 #include <sys/types.h>
15 #include <sys/utsname.h>
23 #include <libcitadel.h>
28 #include "citadel_dirs.h"
39 #define _(string) gettext(string)
41 #define _(string) (string)
45 #define MAXSETUP 11 /* How many setup questions to ask */
47 #define UI_TEXT 0 /* Default setup type -- text only */
48 #define UI_DIALOG 2 /* Use the 'dialog' program */
49 #define UI_SILENT 3 /* Silent running, for use in scripts */
51 #define SERVICE_NAME "citadel"
52 #define PROTO_NAME "tcp"
53 #define NSSCONF "/etc/nsswitch.conf"
56 typedef enum _SetupStep {
72 ///"CREATE_XINETD_ENTRY";
73 /* Environment variables, don't translate! */
74 const char *EnvNames [eMaxQuestions] = {
90 int using_web_installer = 0;
95 const char *setup_titles[eMaxQuestions];
96 const char *setup_text[eMaxQuestions];
98 /* calculate all our path on a central place */
99 /* where to keep our config */
112 setlocale(LC_MESSAGES, getenv("LANG"));
114 bindtextdomain("citadel-setup", LOCALEDIR"/locale");
115 textdomain("citadel-setup");
116 bind_textdomain_codeset("citadel-setup","UTF8");
118 setup_titles[eCitadelHomeDir] = _("Citadel Home Directory");
120 setup_text[eCitadelHomeDir] = _(
121 "Enter the full pathname of the directory in which the Citadel\n"
122 "installation you are creating or updating resides. If you\n"
123 "specify a directory other than the default, you will need to\n"
124 "specify the -h flag to the server when you start it up.\n");
126 setup_text[eCitadelHomeDir] = _(
127 "Enter the subdirectory name for an alternate installation of "
128 "Citadel. To do a default installation just leave it blank."
129 "If you specify a directory other than the default, you will need to\n"
130 "specify the -h flag to the server when you start it up.\n"
131 "note that it may not have a leading /");
134 setup_titles[eSysAdminName] = _("Citadel administrator username:");
135 setup_text[eSysAdminName] = _(
136 "Please enter the name of the Citadel user account that should be granted "
137 "administrative privileges once created. If using internal authentication "
138 "this user account will be created if it does not exist. For external "
139 "authentication this user account has to exist.");
142 setup_titles[eSysAdminPW] = _("Administrator password:");
143 setup_text[eSysAdminPW] = _(
144 "Enter a password for the system administrator. When setup\n"
145 "completes it will attempt to create the administrator user\n"
146 "and set the password specified here.\n");
148 setup_titles[eUID] = _("Citadel User ID:");
149 setup_text[eUID] = _(
150 "Citadel needs to run under its own user ID. This would\n"
151 "typically be called \"citadel\", but if you are running Citadel\n"
152 "as a public BBS, you might also call it \"bbs\" or \"guest\".\n"
153 "The server will run under this user ID. Please specify that\n"
154 "user ID here. You may specify either a user name or a numeric\n"
157 setup_titles[eIP_ADDR] = _("Listening address for the Citadel server:");
158 setup_text[eIP_ADDR] = _(
159 "Please specify the IP address which the server should be listening to. "
160 "You can name a specific IPv4 or IPv6 address, or you can specify\n"
161 "\"*\" for \"any address\", \"::\" for \"any IPv6 address\", or \"0.0.0.0\"\n"
162 "for \"any IPv4 address\". If you leave this blank, Citadel will\n"
163 "listen on all addresses. "
164 "This can usually be left to the default unless multiple instances of Citadel "
165 "are running on the same computer.");
167 setup_titles[eCTDL_Port] = _("Server port number:");
168 setup_text[eCTDL_Port] = _(
169 "Specify the TCP port number on which your server will run.\n"
170 "Normally, this will be port 504, which is the official port\n"
171 "assigned by the IANA for Citadel servers. You will only need\n"
172 "to specify a different port number if you run multiple instances\n"
173 "of Citadel on the same computer and there is something else\n"
174 "already using port 504.\n");
176 setup_titles[eAuthType] = _("Authentication method to use:");
177 setup_text[eAuthType] = _(
178 "Please choose the user authentication mode. By default Citadel will use its "
179 "own internal user accounts database. If you choose Host, Citadel users will "
180 "have accounts on the host system, authenticated via /etc/passwd or a PAM "
181 "source. LDAP chooses an RFC 2307 compliant directory server, the last option "
182 "chooses the nonstandard MS Active Directory LDAP scheme."
184 "Do not change this option unless you are sure it is required, since changing "
185 "back requires a full reinstall of Citadel."
187 " 0. Self contained authentication\n"
188 " 1. Host system integrated authentication\n"
189 " 2. External LDAP - RFC 2307 compliant directory\n"
190 " 3. External LDAP - nonstandard MS Active Directory\n"
192 "For help: http://www.citadel.org/doku.php/faq:installation:authmodes\n"
194 "ANSWER \"0\" UNLESS YOU COMPLETELY UNDERSTAND THIS OPTION.\n");
196 setup_titles[eLDAP_Host] = _("LDAP host:");
197 setup_text[eLDAP_Host] = _(
198 "Please enter the host name or IP address of your LDAP server.\n");
200 setup_titles[eLDAP_Port] = _("LDAP port number:");
201 setup_text[eLDAP_Port] = _(
202 "Please enter the port number of the LDAP service (usually 389).\n");
204 setup_titles[eLDAP_Base_DN] = _("LDAP base DN:");
205 setup_text[eLDAP_Base_DN] = _(
206 "Please enter the Base DN to search for authentication\n"
207 "(for example: dc=example,dc=com)\n");
209 setup_titles[eLDAP_Bind_DN] = _("LDAP bind DN:");
210 setup_text[eLDAP_Bind_DN] = _(
211 "Please enter the DN of an account to use for binding to the LDAP server for "
212 "performing queries. The account does not require any other privileges. If "
213 "your LDAP server allows anonymous queries, you can leave this blank."
214 "Please enter the DN of an account to use for binding to the LDAP server\n"
215 "for performing queries. The account does not require any other\n"
216 "privileges. If your LDAP server allows anonymous queries, you can\n"
217 "leave this blank.\n");
219 setup_titles[eLDAP_Bind_PW] = _("LDAP bind password:");
220 setup_text[eLDAP_Bind_PW] = _(
221 "If you entered a Bind DN in the previous question, you must now enter\n"
222 "the password associated with that account. Otherwise, you can leave this\n"
226 // Debug loading of locales... Strace does a better job though.
227 printf("Message catalog directory: %s\n", bindtextdomain("citadel-setup", LOCALEDIR"/locale"));
228 printf("Text domain: %s\n", textdomain("citadel-setup"));
229 printf("Text domain Charset: %s\n", bind_textdomain_codeset("citadel-setup","UTF8"));
232 for (i = 0; i < eMaxQuestions; i++)
233 printf("%s - %s\n", setup_titles[i], _(setup_titles[i]));
240 * print the actual stack frame.
242 void cit_backtrace(void)
244 #ifdef HAVE_BACKTRACE
245 void *stack_frames[50];
249 size = backtrace(stack_frames, sizeof(stack_frames) / sizeof(void*));
250 strings = backtrace_symbols(stack_frames, size);
251 for (i = 0; i < size; i++) {
253 fprintf(stderr, "%s\n", strings[i]);
255 fprintf(stderr, "%p\n", stack_frames[i]);
261 struct config config;
266 void cleanup(int exitcode)
268 // printf("Exitcode: %d\n", exitcode);
275 void title(const char *text)
277 if (setup_type == UI_TEXT) {
278 printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n<%s>\n", text);
284 int yesno(const char *question, int default_value)
290 switch (setup_type) {
294 printf("%s\n%s [%s] --> ",
297 ( default_value ? _("Yes") : _("No") )
299 if (fgets(buf, sizeof buf, stdin))
301 answer = tolower(buf[0]);
302 if ((buf[0]==0) || (buf[0]==13) || (buf[0]==10))
303 answer = default_value;
304 else if (answer == 'y')
306 else if (answer == 'n')
309 } while ((answer < 0) || (answer > 1));
313 sprintf(buf, "exec %s %s --yesno '%s' 15 75",
314 getenv("CTDL_DIALOG"),
315 ( default_value ? "" : "--defaultno" ),
333 void important_message(const char *title, const char *msgtext)
338 switch (setup_type) {
341 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");
342 printf(" %s \n\n%s\n\n", title, msgtext);
343 printf("%s", _("Press return to continue..."));
344 if (fgets(buf, sizeof buf, stdin));
348 sprintf(buf, "exec %s --msgbox '%s' 19 72",
349 getenv("CTDL_DIALOG"),
353 fprintf(stderr, _("failed to run the dialog command\n"));
356 fprintf(stderr, "%s\n", msgtext);
361 void important_msgnum(int msgnum)
363 important_message(_("Important Message"), setup_text[msgnum]);
366 void display_error(char *error_message_format, ...)
372 va_start(arg_ptr, error_message_format);
373 StrBufVAppendPrintf(Msg,
374 error_message_format,
378 important_message(_("Error"), ChrPtr(Msg));
382 void progress(char *text, long int curr, long int cmax)
384 static long dots_printed = 0L;
386 static FILE *fp = NULL;
389 switch (setup_type) {
393 printf("%s\n", text);
394 printf("....................................................");
395 printf("..........................\r");
398 } else if (curr == cmax) {
399 printf("\r%79s\n", "");
401 a = (curr * 100) / cmax;
404 while (dots_printed < a) {
414 sprintf(buf, "exec %s --gauge '%s' 7 72 0",
415 getenv("CTDL_DIALOG"),
417 fp = popen(buf, "w");
423 else if (curr == cmax) {
425 fprintf(fp, "100\n");
431 a = (curr * 100) / cmax;
433 fprintf(fp, "%ld\n", a);
447 * check_services_entry() -- Make sure "citadel" is in /etc/services
450 void check_services_entry(void)
456 if (getservbyname(SERVICE_NAME, PROTO_NAME) == NULL) {
457 for (i=0; i<=2; ++i) {
458 progress(_("Adding service entry..."), i, 2);
460 sfp = fopen("/etc/services", "a");
462 sprintf(errmsg, "%s /etc/services: %s", _("Cannot open"), strerror(errno));
463 display_error(errmsg);
465 fprintf(sfp, "%s 504/tcp\n", SERVICE_NAME);
477 * delete_inittab_entry() -- Remove obsolete /etc/inittab entry for Citadel
479 void delete_inittab_entry(void)
483 char looking_for[256];
485 char outfilename[32];
486 int changes_made = 0;
489 /* Determine the fully qualified path name of citserver */
490 snprintf(looking_for,
496 /* Now tweak /etc/inittab */
497 infp = fopen("/etc/inittab", "r");
500 /* If /etc/inittab does not exist, return quietly.
501 * Not all host platforms have it.
503 if (errno == ENOENT) {
507 /* Other errors might mean something really did go wrong.
509 sprintf(buf, "%s /etc/inittab: %s", _("Cannot open"), strerror(errno));
514 strcpy(outfilename, "/tmp/ctdlsetup.XXXXXX");
515 outfp = fdopen(mkstemp(outfilename), "w+");
517 sprintf(buf, "%s %s: %s", _("Cannot open"), outfilename, strerror(errno));
523 while (fgets(buf, sizeof buf, infp) != NULL) {
524 if (strstr(buf, looking_for) != NULL) {
525 rv = fwrite("#", 1, 1, outfp);
528 display_error("%s %s\n",
529 _("failed to modify inittab"),
534 rv = fwrite(buf, strlen(buf), 1, outfp);
537 display_error("%s %s\n",
538 _("failed to modify inittab"),
547 sprintf(buf, "/bin/mv -f %s /etc/inittab 2>/dev/null", outfilename);
549 rv = system("/sbin/init q 2>/dev/null");
558 * install_init_scripts() -- Try to configure to start Citadel at boot
560 void install_init_scripts(void)
562 struct stat etcinitd;
564 char *initfile = "/etc/init.d/citadel";
568 if ((stat("/etc/init.d/", &etcinitd) == -1) &&
571 if ((stat("/etc/rc.d/init.d/", &etcinitd) == -1) &&
573 initfile = CTDLDIR"/citadel.init";
575 initfile = "/etc/rc.d/init.d/citadel";
578 fp = fopen(initfile, "r");
580 if (yesno(_("Citadel already appears to be configured to start at boot.\n"
581 "Would you like to keep your boot configuration as is?\n"), 1) == 1) {
588 if (yesno(_("Would you like to automatically start Citadel at boot?\n"), 1) == 0) {
592 fp = fopen(initfile, "w");
594 display_error("%s /etc/init.d/citadel", _("Cannot create"));
598 fprintf(fp, "#!/bin/sh\n"
600 "# Init file for Citadel\n"
602 "# chkconfig: - 79 30\n"
603 "# description: Citadel service\n"
604 "# processname: citserver\n"
605 "# pidfile: %s/citadel.pid\n\n"
606 "# uncomment this to create coredumps as described in\n"
607 "# http://www.citadel.org/doku.php/faq:mastering_your_os:gdb#how.do.i.make.my.system.produce.core-files\n"
608 "# ulimit -c unlimited\n"
616 "test -d /var/run || exit 0\n"
620 "start) echo -n \"Starting Citadel... \"\n"
621 " if $CITADEL_DIR/citserver -lmail -d\n"
628 "stop) echo -n \"Stopping Citadel... \"\n"
629 " if $CITADEL_DIR/sendcommand DOWN >/dev/null 2>&1 ; then\n"
634 " rm -f %s/citadel.pid 2>/dev/null\n"
639 "restart) if $CITADEL_DIR/sendcommand DOWN 1 >/dev/null 2>&1 ; then\n"
645 "*) echo \"Usage: $0 {start|stop|restart}\"\n"
652 chmod(initfile, 0755);
654 /* Set up the run levels. */
655 rv = system("/bin/rm -f /etc/rc?.d/[SK]??citadel 2>/dev/null");
657 display_error(_("failed to remove system V init links \n"));
659 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);
660 rv = system(command);
662 display_error(_("failed to set system V init links \n"));
664 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);
665 rv = system(command);
667 display_error(_("failed to set system V init links \n"));
673 * On systems which use xinetd, see if we can offer to install Citadel as
674 * the default telnet target.
676 void check_xinetd_entry(void) {
677 char *filename = "/etc/xinetd.d/telnet";
680 int already_citadel = 0;
683 fp = fopen(filename, "r+");
684 if (fp == NULL) return; /* Not there. Oh well... */
686 while (fgets(buf, sizeof buf, fp) != NULL) {
687 if (strstr(buf, "/citadel") != NULL) already_citadel = 1;
690 if (already_citadel) return; /* Already set up this way. */
692 /* Otherwise, prompt the user to create an entry. */
693 if (getenv("CREATE_XINETD_ENTRY") != NULL) {
694 if (strcasecmp(getenv("CREATE_XINETD_ENTRY"), "yes")) {
699 snprintf(buf, sizeof buf,
700 _("Setup can configure the \"xinetd\" service to automatically\n"
701 "connect incoming telnet sessions to Citadel, bypassing the\n"
702 "host system login: prompt. Would you like to do this?\n"
704 if (yesno(buf, 1) == 0) {
709 fp = fopen(filename, "w");
711 "# description: telnet service for Citadel users\n"
716 " socket_type = stream\n"
719 " server = /usr/sbin/in.telnetd\n"
720 " server_args = -h -L %s/citadel\n"
721 " log_on_failure += USERID\n"
726 /* Now try to restart the service */
727 rv = system("/etc/init.d/xinetd restart >/dev/null 2>&1");
729 display_error(_("failed to restart xinetd.\n"));
735 * Offer to disable other MTA's
737 void disable_other_mta(const char *mta) {
743 sprintf(buf, "/bin/ls -l /etc/rc*.d/S*%s 2>/dev/null; "
744 "/bin/ls -l /etc/rc.d/rc*.d/S*%s 2>/dev/null",
746 fp = popen(buf, "r");
747 if (fp == NULL) return;
749 while (fgets(buf, sizeof buf, fp) != NULL) {
753 if (lines == 0) return; /* Nothing to do. */
756 /* Offer to replace other MTA with the vastly superior Citadel :) */
758 snprintf(buf, sizeof buf,
759 "%s \"%s\" %s%s%s%s%s%s%s",
760 _("You appear to have the "),
763 "running on your system. If you want Citadel mail\n"
766 _(" you will have to manually integrate\n"
767 "them. It is preferable to disable "),
769 _(", and use Citadel's\n"
770 "SMTP, POP3, and IMAP services.\n\n"
773 _("so that Citadel has access to ports\n"
774 "25, 110, and 143?\n")
776 if (yesno(buf, 1) == 0) {
781 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);
784 display_error("%s %s.\n", _("failed to disable other mta"), mta);
786 sprintf(buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta);
789 display_error(" %s.\n", _("failed to disable other mta"), mta);
792 const char *other_mtas[] = {
793 "courier-authdaemon",
816 void disable_other_mtas(void)
819 if ((getenv("ACT_AS_MTA") == NULL) ||
820 (getenv("ACT_AS_MTA") &&
821 strcasecmp(getenv("ACT_AS_MTA"), "yes") == 0)) {
822 /* Offer to disable other MTA's on the system. */
823 while (!IsEmptyStr(other_mtas[i]))
825 disable_other_mta(other_mtas[i]);
832 * Check to see if our server really works. Returns 0 on success.
834 int test_server(char *relhomestr, int relhome) {
841 /* Generate a silly little cookie. We're going to write it out
842 * to the server and try to get it back. The cookie does not
843 * have to be secret ... just unique.
845 sprintf(cookie, "--test--%d--", getpid());
848 sprintf(cmd, "%s/sendcommand -h%s ECHO %s 2>&1",
853 sprintf(cmd, "%s/sendcommand ECHO %s 2>&1",
857 fp = popen(cmd, "r");
858 if (fp == NULL) return(errno);
860 while (fgets(buf, sizeof buf, fp) != NULL) {
862 && (strstr(buf, cookie) != NULL) ) {
874 void strprompt(const char *prompt_title, const char *prompt_text, char *Target, char *DefValue)
878 char dialog_result[PATH_MAX];
882 strcpy(setupmsg, "");
884 switch (setup_type) {
887 printf("\n%s\n", prompt_text);
888 printf("%s\n%s\n", _("This is currently set to:"), Target);
889 printf("%s\n", _("Enter new value or press return to leave unchanged:"));
890 if (fgets(buf, sizeof buf, stdin)){
891 buf[strlen(buf) - 1] = 0;
893 if (!IsEmptyStr(buf))
898 CtdlMakeTempFileName(dialog_result, sizeof dialog_result);
899 sprintf(buf, "exec %s --inputbox '%s' 19 72 '%s' 2>%s",
900 getenv("CTDL_DIALOG"),
906 fprintf(stderr, "failed to run Dialog.\n");
908 fp = fopen(dialog_result, "r");
910 if (fgets(Target, sizeof buf, fp)) {
911 if (Target[strlen(Target)-1] == 10) {
912 Target[strlen(Target)-1] = 0;
916 unlink(dialog_result);
920 strcpy(Target, DefValue);
925 void set_bool_val(int msgpos, int *ip, char *DefValue)
927 title(setup_titles[msgpos]);
928 *ip = yesno(setup_text[msgpos], *ip);
931 void set_str_val(int msgpos, char *Target, char *DefValue)
933 strprompt(setup_titles[msgpos],
939 void set_int_val(int msgpos, int *ip, char *DefValue)
942 snprintf(buf, sizeof buf, "%d", (int) *ip);
943 set_str_val(msgpos, buf, DefValue);
948 void set_char_val(int msgpos, char *ip, char *DefValue)
951 snprintf(buf, sizeof buf, "%d", (int) *ip);
952 set_str_val(msgpos, buf, DefValue);
953 *ip = (char) atoi(buf);
957 void set_long_val(int msgpos, long int *ip, char *DefValue)
960 snprintf(buf, sizeof buf, "%ld", *ip);
961 set_str_val(msgpos, buf, DefValue);
966 void edit_value(int curr)
970 char ctdluidname[256];
973 if (setup_type == UI_SILENT)
975 Value = getenv(EnvNames[curr]);
984 set_str_val(curr, config.c_sysadm, Value);
988 set_str_val(curr, admin_pass, Value);
992 if (setup_type == UI_SILENT)
995 config.c_ctdluid = atoi(Value);
1001 config.c_ctdluid = 0; /* XXX Windows hack, prob. insecure */
1003 i = config.c_ctdluid;
1006 set_int_val(curr, &i, Value);
1007 config.c_ctdluid = i;
1010 strcpy(ctdluidname, pw->pw_name);
1011 set_str_val(curr, ctdluidname, Value);
1012 pw = getpwnam(ctdluidname);
1014 config.c_ctdluid = pw->pw_uid;
1016 else if (atoi(ctdluidname) > 0) {
1017 config.c_ctdluid = atoi(ctdluidname);
1025 set_str_val(curr, config.c_ip_addr, Value);
1029 set_int_val(curr, &config.c_port_number, Value);
1033 if (setup_type == UI_SILENT)
1036 config.c_auth_mode = AUTHMODE_NATIVE;
1040 if ((strcasecmp(auth, "yes") == 0) ||
1041 (strcasecmp(auth, "host") == 0))
1043 config.c_auth_mode = AUTHMODE_HOST;
1045 else if (strcasecmp(auth, "ldap") == 0){
1046 config.c_auth_mode = AUTHMODE_LDAP;
1048 else if ((strcasecmp(auth, "ldap_ad") == 0) ||
1049 (strcasecmp(auth, "active directory") == 0)){
1050 config.c_auth_mode = AUTHMODE_LDAP_AD;
1055 set_int_val(curr, &config.c_auth_mode, Value);
1060 set_str_val(curr, config.c_ldap_host, Value);
1064 if (config.c_ldap_port == 0) {
1065 config.c_ldap_port = 389;
1067 set_int_val(curr, &config.c_ldap_port, Value);
1071 set_str_val(curr, config.c_ldap_base_dn, Value);
1075 set_str_val(curr, config.c_ldap_bind_dn, Value);
1079 set_str_val(curr, config.c_ldap_bind_pw, Value);
1086 * (re-)write the config data to disk
1088 void write_config_to_disk(void)
1094 if ((fd = creat(file_citadel_config, S_IRUSR | S_IWUSR)) == -1) {
1095 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot open"), file_citadel_config, strerror(errno));
1098 fp = fdopen(fd, "wb");
1100 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot open"), file_citadel_config, strerror(errno));
1104 rv = fwrite((char *) &config, sizeof(struct config), 1, fp);
1107 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot write"), file_citadel_config, strerror(errno));
1116 * Figure out what type of user interface we're going to use
1118 int discover_ui(void)
1121 /* Use "dialog" if we have it */
1122 if (getenv("CTDL_DIALOG") != NULL) {
1131 void migrate_old_installs(void)
1134 rv = system("exec /bin/rm -fr ./rooms ./chatpipes ./expressmsgs ./sessions 2>/dev/null");
1136 fprintf(stderr, _("failed to remove old style directories.\n"));
1137 unlink("citadel.log");
1143 * Strip "db" entries out of /etc/nsswitch.conf
1152 int file_changed = 0;
1153 char new_filename[64];
1156 fp_read = fopen(NSSCONF, "r");
1157 if (fp_read == NULL) {
1161 strcpy(new_filename, "/tmp/ctdl_fixnss_XXXXXX");
1162 fd_write = mkstemp(new_filename);
1168 while (fgets(buf, sizeof buf, fp_read) != NULL) {
1169 strcpy(buf_nc, buf);
1170 for (i=0; i<strlen(buf_nc); ++i) {
1171 if (buf_nc[i] == '#') {
1175 for (i=0; i<strlen(buf_nc); ++i) {
1176 if (!strncasecmp(&buf_nc[i], "db", 2)) {
1178 if ((isspace(buf_nc[i+2])) || (buf_nc[i+2]==0)) {
1180 strcpy(&buf_nc[i], &buf_nc[i+2]);
1181 strcpy(&buf[i], &buf[i+2]);
1183 strcpy(&buf_nc[i], &buf_nc[i+1]);
1184 strcpy(&buf[i], &buf[i+1]);
1190 if (write(fd_write, buf, strlen(buf)) != strlen(buf)) {
1193 unlink(new_filename);
1200 if (!file_changed) {
1201 unlink(new_filename);
1205 snprintf(question, sizeof question,
1208 "/etc/nsswitch.conf is configured to use the 'db' module for\n"
1209 "one or more services. This is not necessary on most systems,\n"
1210 "and it is known to crash the Citadel server when delivering\n"
1211 "mail to the Internet.\n"
1213 "Do you want this module to be automatically disabled?\n"
1218 if (yesno(question, 1)) {
1219 sprintf(buf, "/bin/mv -f %s %s", new_filename, NSSCONF);
1222 fprintf(stderr, "failed to edit %s.\n", NSSCONF);
1224 chmod(NSSCONF, 0644);
1226 unlink(new_filename);
1229 void check_init_script (char *relhome)
1235 * If we're running on SysV, install init scripts.
1237 if (!access("/var/run", W_OK)) {
1239 if (getenv("NO_INIT_SCRIPTS") == NULL) {
1240 install_init_scripts();
1243 if (!access("/etc/init.d/citadel", X_OK)) {
1244 rv = system("/etc/init.d/citadel start");
1246 fprintf(stderr, "failed to call our initscript.");
1250 if (test_server(relhome, enable_home) == 0) {
1254 if (config.c_auth_mode == AUTHMODE_NATIVE) {
1255 snprintf (admin_cmd, sizeof(admin_cmd), "%s/sendcommand \"CREU %s|%s\" 2>&1",
1256 ctdl_sbin_dir, config.c_sysadm, admin_pass);
1257 fp = popen(admin_cmd, "r");
1259 while (fgets(buf, sizeof buf, fp) != NULL)
1261 if ((atol(buf) == 574) || (atol(buf) == 200))
1267 if (found_it == 0) {
1268 important_message("Error","Setup failed to create your admin user");
1272 if (setup_type != UI_SILENT)
1273 important_message(_("Setup finished"),
1274 _("Setup of the Citadel server is complete.\n"
1275 "If you will be using WebCit, please run its\n"
1276 "setup program now; otherwise, run './citadel'\n"
1280 important_message(_("Setup failed"),
1281 _("Setup is finished, but the Citadel server failed to start.\n"
1282 "Go back and check your configuration.\n")
1289 important_message(_("Setup finished"),
1290 _("Setup is finished. You may now start the server."));
1296 #define GetDefaultVALINT(CFGNAME, DEFL) GetDefaultValInt(&config.CFGNAME, "CITADEL_"#CFGNAME, DEFL)
1297 void GetDefaultValInt(int *WhereTo, const char *VarName, int DefVal)
1300 if (*WhereTo == 0) *WhereTo = DefVal;
1302 if ((setup_type == UI_SILENT) &&
1303 (ch = getenv(VarName), ch != NULL))
1305 *WhereTo = atoi(ch);
1308 #define GetDefaultVALCHAR(CFGNAME, DEFL) GetDefaultValChar(&config.CFGNAME, "CITADEL_"#CFGNAME, DEFL)
1309 void GetDefaultValChar(char *WhereTo, const char *VarName, char DefVal)
1312 if (*WhereTo == 0) *WhereTo = DefVal;
1314 if ((setup_type == UI_SILENT) &&
1315 (ch = getenv(VarName), ch != NULL))
1317 *WhereTo = atoi(ch);
1320 #define GetDefaultVALSTR(CFGNAME, DEFL) GetDefaultValStr(&config.CFGNAME[0], sizeof(config.CFGNAME), "CITADEL_"#CFGNAME, DEFL)
1321 void GetDefaultValStr(char *WhereTo, size_t nMax, const char *VarName, const char *DefVal)
1324 if (*WhereTo == '\0')
1325 safestrncpy(WhereTo, DefVal, nMax);
1327 if ((setup_type == UI_SILENT) &&
1328 (ch = getenv(VarName), ch != NULL))
1330 safestrncpy(WhereTo, ch, nMax);
1335 void set_default_values(void)
1338 struct utsname my_utsname;
1341 /* Determine our host name, in case we need to use it as a default */
1344 /* set some sample/default values in place of blanks... */
1345 GetDefaultVALSTR(c_nodename, my_utsname.nodename);
1346 strtok(config.c_nodename, ".");
1347 if (IsEmptyStr(config.c_fqdn) ) {
1348 if ((he = gethostbyname(my_utsname.nodename)) != NULL) {
1349 safestrncpy(config.c_fqdn, he->h_name, sizeof config.c_fqdn);
1351 safestrncpy(config.c_fqdn, my_utsname.nodename, sizeof config.c_fqdn);
1354 GetDefaultVALSTR(c_humannode, _("My System"));
1355 GetDefaultVALSTR(c_phonenum, _("US 800 555 1212"));
1357 GetDefaultVALCHAR(c_initax, 4);
1359 GetDefaultVALSTR(c_moreprompt, "<more>");
1360 GetDefaultVALSTR(c_twitroom, "Trashcan");
1361 GetDefaultVALSTR(c_baseroom, BASEROOM);
1362 GetDefaultVALSTR(c_aideroom, "Aide");
1363 GetDefaultVALINT(c_port_number, 504);
1365 GetDefaultVALINT(c_sleeping, 900);
1367 if (config.c_ctdluid == 0) {
1368 pw = getpwnam("citadel");
1370 config.c_ctdluid = pw->pw_uid;
1373 if (config.c_ctdluid == 0) {
1374 pw = getpwnam("bbs");
1376 config.c_ctdluid = pw->pw_uid;
1379 if (config.c_ctdluid == 0) {
1380 pw = getpwnam("guest");
1382 config.c_ctdluid = pw->pw_uid;
1385 if (config.c_createax == 0) {
1386 config.c_createax = 3;
1389 * Negative values for maxsessions are not allowed.
1391 if (config.c_maxsessions < 0) {
1392 config.c_maxsessions = 0;
1394 /* We need a system default message expiry policy, because this is
1395 * the top level and there's no 'higher' policy to fall back on.
1396 * By default, do not expire messages at all.
1398 if (config.c_ep.expire_mode == 0) {
1399 config.c_ep.expire_mode = EXPIRE_MANUAL;
1400 config.c_ep.expire_value = 0;
1404 * Default port numbers for various services
1406 GetDefaultVALINT(c_smtp_port, 25);
1407 GetDefaultVALINT(c_pop3_port, 110);
1408 GetDefaultVALINT(c_imap_port, 143);
1409 GetDefaultVALINT(c_msa_port, 587);
1410 GetDefaultVALINT(c_smtps_port, 465);
1411 GetDefaultVALINT(c_pop3s_port, 995);
1412 GetDefaultVALINT(c_imaps_port, 993);
1413 GetDefaultVALINT(c_pftcpdict_port, -1);
1414 GetDefaultVALINT(c_managesieve_port, 2020);
1415 GetDefaultVALINT(c_xmpp_c2s_port, 5222);
1416 GetDefaultVALINT(c_xmpp_s2s_port, 5269);
1420 void get_config (void)
1427 * What we're going to try to do here is append a whole bunch of
1428 * nulls to the citadel.config file, so we can keep the old config
1429 * values if they exist, but if the file is missing or from an
1430 * earlier version with a shorter config structure, when setup tries
1431 * to read the old config parameters, they'll all come up zero.
1432 * The length of the config file will be set to what it's supposed
1433 * to be when we rewrite it, because we replace the old file with a
1434 * completely new copy.
1436 if ((a = open(file_citadel_config, O_WRONLY | O_CREAT | O_APPEND,
1437 S_IRUSR | S_IWUSR)) == -1) {
1438 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot append"), file_citadel_config, strerror(errno));
1441 fp = fdopen(a, "ab");
1443 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot append"), file_citadel_config, strerror(errno));
1446 for (a = 0; a < sizeof(struct config); ++a) {
1451 /* now we re-open it, and read the old or blank configuration */
1452 fp = fopen(file_citadel_config, "rb");
1454 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot open"), file_citadel_config, strerror(errno));
1458 rv = fread((char *) &config, sizeof(struct config), 1, fp);
1460 display_error("%s citadel.config [%s][%s]\n", _("setup: cannot write"), file_citadel_config, strerror(errno));
1465 int main(int argc, char *argv[])
1470 int old_setup_level = 0;
1474 char relhome[PATH_MAX]="";
1475 char ctdldir[PATH_MAX]=CTDLDIR;
1480 /* set an invalid setup type */
1483 /* Check to see if we're running the web installer */
1484 if (getenv("CITADEL_INSTALLER") != NULL) {
1485 using_web_installer = 1;
1488 /* parse command line args */
1489 for (a = 0; a < argc; ++a) {
1490 if (!strncmp(argv[a], "-u", 2)) {
1491 strcpy(aaa, argv[a]);
1492 strcpy(aaa, &aaa[2]);
1493 setup_type = atoi(aaa);
1495 else if (!strcmp(argv[a], "-i")) {
1498 else if (!strcmp(argv[a], "-q")) {
1499 setup_type = UI_SILENT;
1501 else if (!strncmp(argv[a], "-h", 2)) {
1502 relh=argv[a][2]!='/';
1504 safestrncpy(ctdl_home_directory, &argv[a][2], sizeof ctdl_home_directory);
1506 safestrncpy(relhome, &argv[a][2], sizeof relhome);
1513 calc_dirs_n_files(relh, home, relhome, ctdldir, 0);
1516 /* If a setup type was not specified, try to determine automatically
1517 * the best one to use out of all available types.
1519 if (setup_type < 0) {
1520 setup_type = discover_ui();
1522 if (info_only == 1) {
1523 important_message(_("Citadel Setup"), CITADEL);
1527 enable_home = ( relh | home );
1529 if (chdir(ctdl_run_dir) != 0) {
1530 display_error(_("Citadel Setup"),
1532 _("The directory you specified does not exist"),
1538 /* Try to stop Citadel if we can */
1539 if (!access("/etc/init.d/citadel", X_OK)) {
1540 rv = system("/etc/init.d/citadel stop");
1542 fprintf(stderr, _("failed to stop us using the initscript.\n"));
1545 /* Make sure Citadel is not running. */
1546 if (test_server(relhome, enable_home) == 0) {
1547 important_message(_("Citadel Setup"),
1548 _("The Citadel service is still running.\n"
1549 "Please stop the service manually and run "
1555 switch (setup_type) {
1560 _("Citadel setup program"));
1567 set_default_values();
1569 /* Go through a series of dialogs prompting for config info */
1570 for (curr = 1; curr <= MAXSETUP; ++curr) {
1572 if ((curr == 6) && (config.c_auth_mode != AUTHMODE_LDAP) && (config.c_auth_mode != AUTHMODE_LDAP_AD)) {
1573 curr += 5; /* skip LDAP questions if we're not authenticating against LDAP */
1577 /***** begin version update section *****/
1579 old_setup_level = config.c_setup_level;
1581 if (old_setup_level == 0) {
1585 if (old_setup_level < 555) {
1588 _("This Citadel installation is too old to be upgraded.")
1592 write_config_to_disk();
1594 old_setup_level = config.c_setup_level;
1596 /***** end of version update section *****/
1599 config.c_setup_level = REV_LEVEL;
1601 if ((pw = getpwuid(config.c_ctdluid)) == NULL) {
1607 create_run_directories(config.c_ctdluid, gid);
1609 write_config_to_disk();
1611 migrate_old_installs(); /* Delete files and directories used by older Citadel versions */
1613 if ( ((setup_type == UI_SILENT)
1614 && (getenv("ALTER_ETC_SERVICES")!=NULL))
1615 || (setup_type != UI_SILENT)
1617 check_services_entry(); /* Check /etc/services */
1621 delete_inittab_entry(); /* Remove obsolete /etc/inittab entry */
1622 check_xinetd_entry(); /* Check /etc/xinetd.d/telnet */
1623 disable_other_mtas(); /* Offer to disable other MTAs */
1624 fixnss(); /* Check for the 'db' nss and offer to disable it */
1627 progress(_("Setting file permissions"), 1, 3);
1628 rv = chown(file_citadel_config, config.c_ctdluid, gid);
1629 progress(_("Setting file permissions"), 2, 3);
1630 rv = chmod(file_citadel_config, S_IRUSR | S_IWUSR);
1631 progress(_("Setting file permissions"), 3, 3);
1633 check_init_script(relhome);