4 * Citadel setup utility
14 #include <sys/types.h>
16 #include <sys/utsname.h>
36 #define MAXSETUP 4 /* How many setup questions to ask */
38 #define UI_TEXT 0 /* Default setup type -- text only */
39 #define UI_DIALOG 2 /* Use the 'dialog' program */
40 #define UI_SILENT 3 /* Silent running, for use in scripts */
41 #define UI_NEWT 4 /* Use the "newt" window library */
43 #define SERVICE_NAME "citadel"
44 #define PROTO_NAME "tcp"
47 char setup_directory[SIZ];
48 char citserver_init_entry[SIZ];
49 int using_web_installer = 0;
52 void contemplate_ldap(void);
55 char *setup_titles[] =
57 "Citadel Home Directory",
58 "System Administrator",
65 char *setup_text[] = {
66 "Enter the full pathname of the directory in which the Citadel\n"
67 "installation you are creating or updating resides. If you\n"
68 "specify a directory other than the default, you will need to\n"
69 "specify the -h flag to the server when you start it up.\n",
71 "Enter the name of the system administrator (which is probably\n"
72 "you). When an account is created with this name, it will\n"
73 "automatically be given administrator-level access.\n",
75 "Citadel needs to run under its own user ID. This would\n"
76 "typically be called \"citadel\", but if you are running Citadel\n"
77 "as a public BBS, you might also call it \"bbs\" or \"guest\".\n"
78 "The server will run under this user ID. Please specify that\n"
79 "user ID here. You may specify either a user name or a numeric\n"
82 "Specify the IP address on which your server will run. If you\n"
83 "leave this blank, or if you specify 0.0.0.0, Citadel will listen\n"
84 "on all addresses. You can usually skip this unless you are\n"
85 "running multiple instances of Citadel on the same computer.\n",
87 "Specify the TCP port number on which your server will run.\n"
88 "Normally, this will be port 504, which is the official port\n"
89 "assigned by the IANA for Citadel servers. You will only need\n"
90 "to specify a different port number if you run multiple instances\n"
91 "of Citadel on the same computer and there is something else\n"
92 "already using port 504.\n",
100 * Set an entry in inittab to the desired state
102 void set_init_entry(char *which_entry, char *new_state) {
103 char *inittab = NULL;
111 if (which_entry == NULL) return;
112 if (strlen(which_entry) == 0) return;
114 inittab = strdup("");
115 if (inittab == NULL) return;
117 fp = fopen("/etc/inittab", "r");
118 if (fp == NULL) return;
120 while(fgets(buf, sizeof buf, fp) != NULL) {
122 if (num_tokens(buf, ':') == 4) {
123 extract_token(entry, buf, 0, ':', sizeof entry);
124 extract_token(levels, buf, 1, ':', sizeof levels);
125 extract_token(state, buf, 2, ':', sizeof state);
126 extract_token(prog, buf, 3, ':', sizeof prog); /* includes 0x0a LF */
128 if (!strcmp(entry, which_entry)) {
129 strcpy(state, new_state);
130 sprintf(buf, "%s:%s:%s:%s",
131 entry, levels, state, prog);
135 inittab = realloc(inittab, strlen(inittab) + strlen(buf) + 2);
136 if (inittab == NULL) {
141 strcat(inittab, buf);
144 fp = fopen("/etc/inittab", "w");
146 fwrite(inittab, strlen(inittab), 1, fp);
148 kill(1, SIGHUP); /* Tell init to re-read /etc/inittab */
155 * Locate the name of an inittab entry for a specific program
157 void locate_init_entry(char *init_entry, char *looking_for) {
165 strcpy(init_entry, "");
167 /* Pound through /etc/inittab line by line. Set have_entry to 1 if
168 * an entry is found which we believe starts the specified program.
170 infp = fopen("/etc/inittab", "r");
174 while (fgets(buf, sizeof buf, infp) != NULL) {
175 buf[strlen(buf) - 1] = 0;
176 extract_token(entry, buf, 0, ':', sizeof entry);
177 extract_token(prog, buf, 3, ':', sizeof prog);
178 if (!strncasecmp(prog, looking_for,
179 strlen(looking_for))) {
181 strcpy(init_entry, entry);
191 * Shut down the Citadel service if necessary, during setup.
193 void shutdown_citserver(void) {
194 char looking_for[SIZ];
196 snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
197 locate_init_entry(citserver_init_entry, looking_for);
198 if (strlen(citserver_init_entry) > 0) {
199 set_init_entry(citserver_init_entry, "off");
205 * Start the Citadel service.
207 void start_citserver(void) {
208 if (strlen(citserver_init_entry) > 0) {
209 set_init_entry(citserver_init_entry, "respawn");
215 void cleanup(int exitcode)
227 void title(char *text)
229 if (setup_type == UI_TEXT) {
230 printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n<%s>\n", text);
236 int yesno(char *question)
239 newtComponent form = NULL;
240 newtComponent yesbutton = NULL;
241 newtComponent nobutton = NULL;
242 int prompt_window_height = 0;
248 switch (setup_type) {
252 printf("%s\nYes/No --> ", question);
253 fgets(buf, sizeof buf, stdin);
254 answer = tolower(buf[0]);
257 else if (answer == 'n')
259 } while ((answer < 0) || (answer > 1));
263 sprintf(buf, "exec %s --yesno '%s' 10 72",
264 getenv("CTDL_DIALOG"),
277 prompt_window_height = num_tokens(question, '\n') + 5;
278 newtCenteredWindow(76, prompt_window_height, "Question");
279 form = newtForm(NULL, NULL, 0);
280 for (i=0; i<num_tokens(question, '\n'); ++i) {
281 extract_token(buf, question, i, '\n', sizeof buf);
282 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
284 yesbutton = newtButton(10, (prompt_window_height - 4), "Yes");
285 nobutton = newtButton(60, (prompt_window_height - 4), "No");
286 newtFormAddComponent(form, yesbutton);
287 newtFormAddComponent(form, nobutton);
288 if (newtRunForm(form) == yesbutton) {
295 newtFormDestroy(form);
305 void important_message(char *title, char *msgtext)
308 newtComponent form = NULL;
313 switch (setup_type) {
316 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");
317 printf(" %s \n\n%s\n\n", title, msgtext);
318 printf("Press return to continue...");
319 fgets(buf, sizeof buf, stdin);
323 sprintf(buf, "exec %s --backtitle '%s' --msgbox '%s' 19 72",
324 getenv("CTDL_DIALOG"),
332 newtCenteredWindow(76, 10, title);
333 form = newtForm(NULL, NULL, 0);
334 for (i=0; i<num_tokens(msgtext, '\n'); ++i) {
335 extract_token(buf, msgtext, i, '\n', sizeof buf);
336 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
338 newtFormAddComponent(form, newtButton(35, 5, "OK"));
341 newtFormDestroy(form);
348 void important_msgnum(int msgnum)
350 important_message("Important Message", setup_text[msgnum]);
353 void display_error(char *error_message)
355 important_message("Error", error_message);
358 void progress(char *text, long int curr, long int cmax)
362 /* These variables are static because progress() gets called
363 * multiple times during the course of whatever operation is
364 * being performed. This makes setup non-threadsafe, but who
367 static newtComponent form = NULL;
368 static newtComponent scale = NULL;
370 static long dots_printed = 0L;
372 static FILE *fp = NULL;
375 switch (setup_type) {
379 printf("%s\n", text);
380 printf("..........................");
381 printf("..........................");
382 printf("..........................\r");
385 } else if (curr == cmax) {
386 printf("\r%79s\n", "");
388 a = (curr * 100) / cmax;
391 while (dots_printed < a) {
401 sprintf(buf, "exec %s --gauge '%s' 7 72 0",
402 getenv("CTDL_DIALOG"),
404 fp = popen(buf, "w");
410 else if (curr == cmax) {
412 fprintf(fp, "100\n");
418 a = (curr * 100) / cmax;
420 fprintf(fp, "%ld\n", a);
429 newtCenteredWindow(76, 8, text);
430 form = newtForm(NULL, NULL, 0);
431 scale = newtScale(1, 3, 74, cmax);
432 newtFormAddComponent(form, scale);
436 if ((curr > 0) && (curr <= cmax)) {
437 newtScaleSet(scale, curr);
441 newtFormDestroy(form);
454 * check_services_entry() -- Make sure "citadel" is in /etc/services
457 void check_services_entry(void)
462 if (getservbyname(SERVICE_NAME, PROTO_NAME) == NULL) {
463 for (i=0; i<=3; ++i) {
464 progress("Adding service entry...", i, 3);
466 sfp = fopen("/etc/services", "a");
468 display_error(strerror(errno));
470 fprintf(sfp, "%s 504/tcp\n",
482 * Generate a unique entry name for a new inittab entry
484 void generate_entry_name(char *entryname) {
487 snprintf(entryname, sizeof entryname, "c0");
490 if (entryname[1] > '9') {
493 if (entryname[0] > 'z') {
495 "Can't generate a unique entry name");
499 snprintf(buf, sizeof buf,
500 "grep %s: /etc/inittab >/dev/null 2>&1", entryname);
501 } while (system(buf) == 0);
507 * check_inittab_entry() -- Make sure "citadel" is in /etc/inittab
510 void check_inittab_entry(void)
513 char looking_for[SIZ];
517 /* Determine the fully qualified path name of citserver */
518 snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
519 locate_init_entry(citserver_init_entry, looking_for);
521 /* If there's already an entry, then we have nothing left to do. */
522 if (strlen(citserver_init_entry) > 0) {
526 /* Otherwise, prompt the user to create an entry. */
527 snprintf(question, sizeof question,
528 "Do you want this computer configured to start the Citadel\n"
529 "service automatically? (If you answer yes, an entry in\n"
530 "/etc/inittab pointing to %s will be added.)\n",
532 if (yesno(question) == 0)
535 /* Generate a unique entry name for /etc/inittab */
536 generate_entry_name(entryname);
538 /* Now write it out to /etc/inittab */
539 infp = fopen("/etc/inittab", "a");
541 display_error(strerror(errno));
543 fprintf(infp, "# Start the Citadel server...\n");
544 fprintf(infp, "%s:2345:respawn:%s -h%s -x3 -llocal4\n",
545 entryname, looking_for, setup_directory);
547 strcpy(citserver_init_entry, entryname);
553 * On systems which use xinetd, see if we can offer to install Citadel as
554 * the default telnet target.
556 void check_xinetd_entry(void) {
557 char *filename = "/etc/xinetd.d/telnet";
560 int already_citadel = 0;
562 fp = fopen(filename, "r+");
563 if (fp == NULL) return; /* Not there. Oh well... */
565 while (fgets(buf, sizeof buf, fp) != NULL) {
566 if (strstr(buf, setup_directory) != NULL) already_citadel = 1;
569 if (already_citadel) return; /* Already set up this way. */
571 /* Otherwise, prompt the user to create an entry. */
572 snprintf(buf, sizeof buf,
573 "Setup can configure the \"xinetd\" service to automatically\n"
574 "connect incoming telnet sessions to Citadel, bypassing the\n"
575 "host system login: prompt. Would you like to do this?\n"
580 fp = fopen(filename, "w");
582 "# description: telnet service for Citadel users\n"
587 " socket_type = stream\n"
590 " server = /usr/sbin/in.telnetd\n"
591 " server_args = -h -L %s/citadel\n"
592 " log_on_failure += USERID\n"
598 /* Now try to restart the service */
599 system("/etc/init.d/xinetd restart >/dev/null 2>&1");
605 * Offer to disable other MTA's
607 void disable_other_mta(char *mta) {
612 sprintf(buf, "/bin/ls -l /etc/rc*.d/S*%s 2>/dev/null; "
613 "/bin/ls -l /etc/rc.d/rc*.d/S*%s 2>/dev/null",
615 fp = popen(buf, "r");
616 if (fp == NULL) return;
618 while (fgets(buf, sizeof buf, fp) != NULL) {
622 if (lines == 0) return; /* Nothing to do. */
624 /* Offer to replace other MTA with the vastly superior Citadel :) */
625 snprintf(buf, sizeof buf,
626 "You appear to have the \"%s\" email program\n"
627 "running on your system. If you want Citadel mail\n"
628 "connected with %s, you will have to manually integrate\n"
629 "them. It is preferable to disable %s, and use Citadel's\n"
630 "SMTP, POP3, and IMAP services.\n\n"
631 "May we disable %s so that Citadel has access to ports\n"
632 "25, 110, and 143?\n",
638 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);
640 sprintf(buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta);
648 * Check to see if our server really works. Returns 0 on success.
650 int test_server(void) {
657 /* Generate a silly little cookie. We're going to write it out
658 * to the server and try to get it back. The cookie does not
659 * have to be secret ... just unique.
661 sprintf(cookie, "--test--%d--", getpid());
663 sprintf(cmd, "%s/sendcommand -h%s ECHO %s 2>&1",
668 fp = popen(cmd, "r");
669 if (fp == NULL) return(errno);
671 while (fgets(buf, sizeof buf, fp) != NULL) {
673 && (strstr(buf, cookie) != NULL) ) {
685 void strprompt(char *prompt_title, char *prompt_text, char *str)
691 int prompt_window_height = 0;
698 strcpy(setupmsg, "");
700 switch (setup_type) {
703 printf("\n%s\n", prompt_text);
704 printf("This is currently set to:\n%s\n", str);
705 printf("Enter new value or press return to leave unchanged:\n");
706 fgets(buf, sizeof buf, stdin);
707 buf[strlen(buf) - 1] = 0;
708 if (strlen(buf) != 0)
713 dialog_result = tmpnam(NULL);
714 sprintf(buf, "exec %s --backtitle '%s' --inputbox '%s' 19 72 '%s' 2>%s",
715 getenv("CTDL_DIALOG"),
721 fp = fopen(dialog_result, "r");
723 fgets(str, sizeof buf, fp);
724 if (str[strlen(str)-1] == 10) {
725 str[strlen(str)-1] = 0;
728 unlink(dialog_result);
735 prompt_window_height = num_tokens(prompt_text, '\n') + 5 ;
736 newtCenteredWindow(76,
737 prompt_window_height,
739 form = newtForm(NULL, NULL, 0);
740 for (i=0; i<num_tokens(prompt_text, '\n'); ++i) {
741 extract_token(buf, prompt_text, i, '\n', sizeof buf);
742 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
744 newtFormAddComponent(form,
746 (prompt_window_height - 2),
750 NEWT_FLAG_RETURNEXIT)
756 newtFormDestroy(form);
762 void set_str_val(int msgpos, char *str) {
763 strprompt(setup_titles[msgpos], setup_text[msgpos], str);
768 void set_int_val(int msgpos, int *ip)
771 snprintf(buf, sizeof buf, "%d", (int) *ip);
772 set_str_val(msgpos, buf);
777 void set_char_val(int msgpos, char *ip)
780 snprintf(buf, sizeof buf, "%d", (int) *ip);
781 set_str_val(msgpos, buf);
782 *ip = (char) atoi(buf);
786 void set_long_val(int msgpos, long int *ip)
789 snprintf(buf, sizeof buf, "%ld", *ip);
790 set_str_val(msgpos, buf);
795 void edit_value(int curr)
799 char ctdluidname[SIZ];
804 set_str_val(curr, config.c_sysadm);
809 config.c_ctdluid = 0; /* XXX Windows hack, prob. insecure */
811 i = config.c_ctdluid;
814 set_int_val(curr, &i);
815 config.c_ctdluid = i;
818 strcpy(ctdluidname, pw->pw_name);
819 set_str_val(curr, ctdluidname);
820 pw = getpwnam(ctdluidname);
822 config.c_ctdluid = pw->pw_uid;
824 else if (atoi(ctdluidname) > 0) {
825 config.c_ctdluid = atoi(ctdluidname);
832 set_str_val(curr, config.c_ip_addr);
836 set_int_val(curr, &config.c_port_number);
844 * (re-)write the config data to disk
846 void write_config_to_disk(void)
851 if ((fd = creat("citadel.config", S_IRUSR | S_IWUSR)) == -1) {
852 display_error("setup: cannot open citadel.config");
855 fp = fdopen(fd, "wb");
857 display_error("setup: cannot open citadel.config");
860 fwrite((char *) &config, sizeof(struct config), 1, fp);
868 * Figure out what type of user interface we're going to use
870 int discover_ui(void)
873 /* Use "dialog" if we have it */
874 if (getenv("CTDL_DIALOG") != NULL) {
882 newtDrawRootText(0, 0, "Citadel Setup");
892 int main(int argc, char *argv[])
898 int old_setup_level = 0;
900 struct utsname my_utsname;
905 /* set an invalid setup type */
908 /* Check to see if we're running the web installer */
909 if (getenv("CITADEL_INSTALLER") != NULL) {
910 using_web_installer = 1;
913 /* parse command line args */
914 for (a = 0; a < argc; ++a) {
915 if (!strncmp(argv[a], "-u", 2)) {
916 strcpy(aaa, argv[a]);
917 strcpy(aaa, &aaa[2]);
918 setup_type = atoi(aaa);
920 if (!strcmp(argv[a], "-i")) {
923 if (!strcmp(argv[a], "-q")) {
924 setup_type = UI_SILENT;
929 /* If a setup type was not specified, try to determine automatically
930 * the best one to use out of all available types.
932 if (setup_type < 0) {
933 setup_type = discover_ui();
935 if (info_only == 1) {
936 important_message("Citadel Setup", CITADEL);
940 /* Get started in a valid setup directory. */
941 strcpy(setup_directory, CTDLDIR);
942 if ( (using_web_installer) && (getenv("CITADEL") != NULL) ) {
943 strcpy(setup_directory, getenv("CITADEL"));
946 set_str_val(0, setup_directory);
949 if (chdir(setup_directory) != 0) {
950 important_message("Citadel Setup",
951 "The directory you specified does not exist.");
955 /* Determine our host name, in case we need to use it as a default */
958 /* See if we need to shut down the Citadel service. */
959 for (a=0; a<=3; ++a) {
960 progress("Shutting down the Citadel service...", a, 3);
961 if (a == 0) shutdown_citserver();
965 /* Make sure it's stopped. */
966 if (test_server() == 0) {
967 important_message("Citadel Setup",
968 "The Citadel service is still running.\n"
969 "Please stop the service manually and run "
975 switch (setup_type) {
979 " *** Citadel setup program ***\n\n");
985 * What we're going to try to do here is append a whole bunch of
986 * nulls to the citadel.config file, so we can keep the old config
987 * values if they exist, but if the file is missing or from an
988 * earlier version with a shorter config structure, when setup tries
989 * to read the old config parameters, they'll all come up zero.
990 * The length of the config file will be set to what it's supposed
991 * to be when we rewrite it, because we replace the old file with a
992 * completely new copy.
995 if ((a = open("citadel.config", O_WRONLY | O_CREAT | O_APPEND,
996 S_IRUSR | S_IWUSR)) == -1) {
997 display_error("setup: cannot append citadel.config");
1000 fp = fdopen(a, "ab");
1002 display_error("setup: cannot append citadel.config");
1005 for (a = 0; a < sizeof(struct config); ++a)
1009 /* now we re-open it, and read the old or blank configuration */
1010 fp = fopen("citadel.config", "rb");
1012 display_error("setup: cannot open citadel.config");
1015 fread((char *) &config, sizeof(struct config), 1, fp);
1018 /* set some sample/default values in place of blanks... */
1019 if (strlen(config.c_nodename) == 0)
1020 safestrncpy(config.c_nodename, my_utsname.nodename,
1021 sizeof config.c_nodename);
1022 strtok(config.c_nodename, ".");
1023 if (strlen(config.c_fqdn) == 0) {
1024 if ((he = gethostbyname(my_utsname.nodename)) != NULL)
1025 safestrncpy(config.c_fqdn, he->h_name,
1026 sizeof config.c_fqdn);
1028 safestrncpy(config.c_fqdn, my_utsname.nodename,
1029 sizeof config.c_fqdn);
1031 if (strlen(config.c_humannode) == 0)
1032 strcpy(config.c_humannode, "My System");
1033 if (strlen(config.c_phonenum) == 0)
1034 strcpy(config.c_phonenum, "US 800 555 1212");
1035 if (config.c_initax == 0) {
1036 config.c_initax = 4;
1038 if (strlen(config.c_moreprompt) == 0)
1039 strcpy(config.c_moreprompt, "<more>");
1040 if (strlen(config.c_twitroom) == 0)
1041 strcpy(config.c_twitroom, "Trashcan");
1042 if (strlen(config.c_baseroom) == 0)
1043 strcpy(config.c_baseroom, "Lobby");
1044 if (strlen(config.c_aideroom) == 0)
1045 strcpy(config.c_aideroom, "Aide");
1046 if (config.c_port_number == 0) {
1047 config.c_port_number = 504;
1049 if (config.c_sleeping == 0) {
1050 config.c_sleeping = 900;
1052 if (config.c_ctdluid == 0) {
1053 pw = getpwnam("citadel");
1055 config.c_ctdluid = pw->pw_uid;
1057 if (config.c_ctdluid == 0) {
1058 pw = getpwnam("bbs");
1060 config.c_ctdluid = pw->pw_uid;
1062 if (config.c_ctdluid == 0) {
1063 pw = getpwnam("guest");
1065 config.c_ctdluid = pw->pw_uid;
1067 if (config.c_createax == 0) {
1068 config.c_createax = 3;
1071 * Negative values for maxsessions are not allowed.
1073 if (config.c_maxsessions < 0) {
1074 config.c_maxsessions = 0;
1076 /* We need a system default message expiry policy, because this is
1077 * the top level and there's no 'higher' policy to fall back on.
1078 * By default, do not expire messages at all.
1080 if (config.c_ep.expire_mode == 0) {
1081 config.c_ep.expire_mode = EXPIRE_MANUAL;
1082 config.c_ep.expire_value = 0;
1086 * Default port numbers for various services
1088 if (config.c_smtp_port == 0) config.c_smtp_port = 25;
1089 if (config.c_pop3_port == 0) config.c_pop3_port = 110;
1090 if (config.c_imap_port == 0) config.c_imap_port = 143;
1091 if (config.c_msa_port == 0) config.c_msa_port = 587;
1092 if (config.c_smtps_port == 0) config.c_smtps_port = 465;
1093 if (config.c_pop3s_port == 0) config.c_pop3s_port = 995;
1094 if (config.c_imaps_port == 0) config.c_imaps_port = 993;
1096 /* Go through a series of dialogs prompting for config info */
1097 if (setup_type != UI_SILENT) {
1098 for (curr = 1; curr <= MAXSETUP; ++curr) {
1104 if (setuid(config.c_ctdluid) != 0) {
1105 important_message("Citadel Setup",
1106 "Failed to change the user ID to your Citadel user.");
1111 /***** begin version update section ***** */
1112 /* take care of any updating that is necessary */
1114 old_setup_level = config.c_setup_level;
1116 if (old_setup_level == 0) {
1120 if (old_setup_level < 555) {
1121 important_message("Citadel Setup",
1122 "This Citadel installation is too old "
1126 write_config_to_disk();
1128 old_setup_level = config.c_setup_level;
1130 /* end of version update section */
1133 config.c_setup_level = REV_LEVEL;
1135 /******************************************/
1137 write_config_to_disk();
1139 mkdir("info", 0700);
1140 chmod("info", 0700);
1143 mkdir("userpics", 0700);
1144 chmod("userpics", 0700);
1145 mkdir("messages", 0700);
1146 chmod("messages", 0700);
1147 mkdir("help", 0700);
1148 chmod("help", 0700);
1149 mkdir("images", 0700);
1150 chmod("images", 0700);
1151 mkdir("netconfigs", 0700);
1152 chmod("netconfigs", 0700);
1154 /* Delete files and directories used by older Citadel versions */
1155 system("exec /bin/rm -fr ./rooms ./chatpipes ./expressmsgs ./sessions 2>/dev/null");
1156 unlink("citadel.log");
1159 check_services_entry(); /* Check /etc/services */
1161 check_inittab_entry(); /* Check /etc/inittab */
1162 check_xinetd_entry(); /* Check /etc/xinetd.d/telnet */
1164 /* Offer to disable other MTA's on the system. */
1165 disable_other_mta("sendmail");
1166 disable_other_mta("postfix");
1167 disable_other_mta("qmail");
1168 disable_other_mta("cyrus");
1169 disable_other_mta("cyrmaster");
1170 disable_other_mta("saslauthd");
1171 disable_other_mta("mta");
1172 disable_other_mta("courier-imap");
1173 disable_other_mta("courier-imap-ssl");
1174 disable_other_mta("courier-authdaemon");
1175 disable_other_mta("courier-pop3");
1176 disable_other_mta("courier-pop3d");
1177 disable_other_mta("courier-pop");
1178 disable_other_mta("vmailmgrd");
1179 disable_other_mta("imapd");
1180 disable_other_mta("popd");
1181 disable_other_mta("pop3d");
1182 disable_other_mta("exim");
1183 disable_other_mta("dovecot");
1184 disable_other_mta("hula");
1187 if ((pw = getpwuid(config.c_ctdluid)) == NULL)
1192 progress("Setting file permissions", 0, 4);
1193 chown(".", config.c_ctdluid, gid);
1195 progress("Setting file permissions", 1, 4);
1196 chown("citadel.config", config.c_ctdluid, gid);
1198 progress("Setting file permissions", 2, 4);
1199 snprintf(aaa, sizeof aaa,
1200 "find . | grep -v chkpwd | xargs chown %ld:%ld 2>/dev/null",
1201 (long)config.c_ctdluid, (long)gid);
1204 progress("Setting file permissions", 3, 4);
1205 chmod("citadel.config", S_IRUSR | S_IWUSR);
1207 progress("Setting file permissions", 4, 4);
1210 /* Contemplate the possibility of auto-configuring OpenLDAP */
1214 /* See if we can start the Citadel service. */
1215 if (strlen(citserver_init_entry) > 0) {
1216 for (a=0; a<=3; ++a) {
1217 progress("Starting the Citadel service...", a, 3);
1218 if (a == 0) start_citserver();
1221 if (test_server() == 0) {
1222 important_message("Setup finished",
1223 "Setup of the Citadel server is complete.\n"
1224 "If you will be using WebCit, please run its\n"
1225 "setup program now; otherwise, run './citadel'\n"
1229 important_message("Setup finished",
1230 "Setup is finished, but the Citadel service "
1231 "failed to start.\n"
1232 "Go back and check your configuration.");
1236 important_message("Setup finished",
1237 "Setup is finished. You may now start the server.");
1247 * If we're in the middle of an Easy Install, we might just be able to
1248 * auto-configure a standalone OpenLDAP server.
1250 void contemplate_ldap(void) {
1252 char slapd_init_entry[SIZ];
1255 /* If conditions are not ideal, give up on this idea... */
1256 if (using_web_installer == 0) return;
1257 if (getenv("LDAP_CONFIG") == NULL) return;
1258 if (getenv("SUPPORT") == NULL) return;
1259 if (getenv("SLAPD_BINARY") == NULL) return;
1260 if (getenv("CITADEL") == NULL) return;
1262 /* And if inittab is already starting slapd, bail out... */
1263 locate_init_entry(slapd_init_entry, getenv("SLAPD_BINARY"));
1264 if (strlen(slapd_init_entry) > 0) {
1265 important_message("Citadel Setup",
1266 "You appear to already have a standalone LDAP "
1267 "service\nconfigured for use with Citadel. No "
1268 "changes will be made.\n");
1269 /* set_init_entry(slapd_init_entry, "off"); */
1273 /* Generate a unique entry name for slapd if we don't have one. */
1275 generate_entry_name(slapd_init_entry);
1278 /* Ask the user if it's ok to set up slapd automatically. */
1279 snprintf(question, sizeof question,
1281 "Do you want this computer configured to start a standalone\n"
1282 "LDAP service automatically? (If you answer yes, a new\n"
1283 "slapd.conf will be written, and an /etc/inittab entry\n"
1284 "pointing to %s will be added.)\n"
1286 getenv("SLAPD_BINARY")
1288 if (yesno(question) == 0)
1291 strcpy(config.c_ldap_base_dn, "dc=example,dc=com");
1292 strprompt("Base DN",
1294 "Please enter the Base DN for your directory. This will\n"
1295 "generally be something based on the primary DNS domain in\n"
1296 "which you receive mail, but it does not have to be. Your\n"
1297 "LDAP tree will be built using this Distinguished Name.\n"
1299 config.c_ldap_base_dn
1302 strcpy(config.c_ldap_host, "localhost");
1303 config.c_ldap_port = 389;
1304 sprintf(config.c_ldap_bind_dn, "cn=manager,%s", config.c_ldap_base_dn);
1307 * Generate a bind password. If you're some grey hat hacker who
1308 * is just dying to get some street cred on Bugtraq, and you think
1309 * this password generation scheme is too weak, please submit a patch
1310 * instead of just whining about it, ok?
1312 sprintf(config.c_ldap_bind_pw, "%d%ld", getpid(), (long)time(NULL));
1314 write_config_to_disk();
1316 fp = fopen(getenv("LDAP_CONFIG"), "w");
1318 sprintf(question, "\nCannot create %s:\n%s\n\n"
1319 "Citadel will still function, but you will "
1320 "not have an LDAP service.\n\n",
1321 getenv("LDAP_CONFIG"),
1324 important_message("Error", question);
1328 fprintf(fp, "include %s/citadel-openldap.schema\n",
1330 fprintf(fp, "pidfile %s/openldap-data/slapd.pid\n",
1332 fprintf(fp, "argsfile %s/openldap-data/slapd.args\n",
1334 fprintf(fp, "allow bind_v2\n"
1338 fprintf(fp, "suffix \"%s\"\n", config.c_ldap_base_dn);
1339 fprintf(fp, "rootdn \"%s\"\n", config.c_ldap_bind_dn);
1340 fprintf(fp, "rootpw %s\n", config.c_ldap_bind_pw);
1341 fprintf(fp, "directory %s/openldap-data\n",
1343 fprintf(fp, "index objectClass eq\n");
1347 /* This is where our OpenLDAP server will keep its data. */
1348 mkdir("openldap-data", 0700);
1350 /* Now write it out to /etc/inittab.
1351 * FIXME make it run as some non-root user.
1352 * The "-d 0" seems superfluous, but it's actually a way to make
1353 * slapd run in the foreground without spewing messages to the console.
1355 fp = fopen("/etc/inittab", "a");
1357 display_error(strerror(errno));
1359 fprintf(fp, "# Start the OpenLDAP server for Citadel...\n");
1360 fprintf(fp, "%s:2345:respawn:%s -d 0 -f %s\n",
1362 getenv("SLAPD_BINARY"),
1363 getenv("LDAP_CONFIG")
1369 #endif /* HAVE_LDAP */