4 * Citadel setup utility
14 #include <sys/types.h>
16 #include <sys/utsname.h>
35 #define MAXSETUP 4 /* How many setup questions to ask */
37 #define UI_TEXT 0 /* Default setup type -- text only */
38 #define UI_DIALOG 2 /* Use the 'dialog' program */
39 #define UI_SILENT 3 /* Silent running, for use in scripts */
40 #define UI_NEWT 4 /* Use the "newt" window library */
42 #define SERVICE_NAME "citadel"
43 #define PROTO_NAME "tcp"
46 char setup_directory[SIZ];
47 char citserver_init_entry[SIZ];
48 int using_web_installer = 0;
51 void contemplate_ldap(void);
54 char *setup_titles[] =
56 "Citadel Home Directory",
57 "System Administrator",
64 char *setup_text[] = {
65 "Enter the full pathname of the directory in which the Citadel\n"
66 "installation you are creating or updating resides. If you\n"
67 "specify a directory other than the default, you will need to\n"
68 "specify the -h flag to the server when you start it up.\n",
70 "Enter the name of the system administrator (which is probably\n"
71 "you). When an account is created with this name, it will\n"
72 "automatically be assigned the highest access level.\n",
74 "Citadel needs to run under its own user ID. This would\n"
75 "typically be called \"citadel\", but if you are running Citadel\n"
76 "as a public BBS, you might also call it \"bbs\" or \"guest\".\n"
77 "The server will run under this user ID. Please specify that\n"
78 "user ID here. You may specify either a user name or a numeric\n"
81 "Specify the IP address on which your server will run. If you\n"
82 "leave this blank, or if you specify 0.0.0.0, Citadel will listen\n"
83 "on all addresses. You can usually skip this unless you are\n"
84 "running multiple instances of Citadel on the same computer.\n",
86 "Specify the TCP port number on which your server will run.\n"
87 "Normally, this will be port 504, which is the official port\n"
88 "assigned by the IANA for Citadel servers. You will only need\n"
89 "to specify a different port number if you run multiple instances\n"
90 "of Citadel on the same computer and there is something else\n"
91 "already using port 504.\n",
99 * Set an entry in inittab to the desired state
101 void set_init_entry(char *which_entry, char *new_state) {
102 char *inittab = NULL;
110 if (which_entry == NULL) return;
111 if (strlen(which_entry) == 0) return;
113 inittab = strdup("");
114 if (inittab == NULL) return;
116 fp = fopen("/etc/inittab", "r");
117 if (fp == NULL) return;
119 while(fgets(buf, sizeof buf, fp) != NULL) {
121 if (num_tokens(buf, ':') == 4) {
122 extract_token(entry, buf, 0, ':');
123 extract_token(levels, buf, 1, ':');
124 extract_token(state, buf, 2, ':');
125 extract_token(prog, buf, 3, ':'); /* includes 0x0a LF */
127 if (!strcmp(entry, which_entry)) {
128 strcpy(state, new_state);
129 sprintf(buf, "%s:%s:%s:%s",
130 entry, levels, state, prog);
134 inittab = realloc(inittab, strlen(inittab) + strlen(buf) + 2);
135 if (inittab == NULL) {
140 strcat(inittab, buf);
143 fp = fopen("/etc/inittab", "w");
145 fwrite(inittab, strlen(inittab), 1, fp);
147 kill(1, SIGHUP); /* Tell init to re-read /etc/inittab */
154 * Locate the name of an inittab entry for a specific program
156 void locate_init_entry(char *init_entry, char *looking_for) {
164 strcpy(init_entry, "");
166 /* Pound through /etc/inittab line by line. Set have_entry to 1 if
167 * an entry is found which we believe starts the specified program.
169 infp = fopen("/etc/inittab", "r");
173 while (fgets(buf, sizeof buf, infp) != NULL) {
174 buf[strlen(buf) - 1] = 0;
175 extract_token(entry, buf, 0, ':');
176 extract_token(prog, buf, 3, ':');
177 if (!strncasecmp(prog, looking_for,
178 strlen(looking_for))) {
180 strcpy(init_entry, entry);
190 * Shut down the Citadel service if necessary, during setup.
192 void shutdown_citserver(void) {
193 char looking_for[SIZ];
195 snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
196 locate_init_entry(citserver_init_entry, looking_for);
197 if (strlen(citserver_init_entry) > 0) {
198 set_init_entry(citserver_init_entry, "off");
204 * Start the Citadel service.
206 void start_citserver(void) {
207 if (strlen(citserver_init_entry) > 0) {
208 set_init_entry(citserver_init_entry, "respawn");
214 void cleanup(int exitcode)
226 void title(char *text)
228 if (setup_type == UI_TEXT) {
229 printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n<%s>\n", text);
235 int yesno(char *question)
238 newtComponent form = NULL;
239 newtComponent yesbutton = NULL;
240 newtComponent nobutton = NULL;
241 int prompt_window_height = 0;
247 switch (setup_type) {
251 printf("%s\nYes/No --> ", question);
252 fgets(buf, sizeof buf, stdin);
253 answer = tolower(buf[0]);
256 else if (answer == 'n')
258 } while ((answer < 0) || (answer > 1));
262 sprintf(buf, "exec %s --yesno '%s' 10 72",
263 getenv("CTDL_DIALOG"),
276 prompt_window_height = num_tokens(question, '\n') + 5;
277 newtCenteredWindow(76, prompt_window_height, "Question");
278 form = newtForm(NULL, NULL, 0);
279 for (i=0; i<num_tokens(question, '\n'); ++i) {
280 extract_token(buf, question, i, '\n');
281 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
283 yesbutton = newtButton(10, (prompt_window_height - 4), "Yes");
284 nobutton = newtButton(60, (prompt_window_height - 4), "No");
285 newtFormAddComponent(form, yesbutton);
286 newtFormAddComponent(form, nobutton);
287 if (newtRunForm(form) == yesbutton) {
294 newtFormDestroy(form);
304 void important_message(char *title, char *msgtext)
307 newtComponent form = NULL;
312 switch (setup_type) {
315 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");
316 printf(" %s \n\n%s\n\n", title, msgtext);
317 printf("Press return to continue...");
318 fgets(buf, sizeof buf, stdin);
322 sprintf(buf, "exec %s --backtitle '%s' --msgbox '%s' 19 72",
323 getenv("CTDL_DIALOG"),
331 newtCenteredWindow(76, 10, title);
332 form = newtForm(NULL, NULL, 0);
333 for (i=0; i<num_tokens(msgtext, '\n'); ++i) {
334 extract_token(buf, msgtext, i, '\n');
335 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
337 newtFormAddComponent(form, newtButton(35, 5, "OK"));
340 newtFormDestroy(form);
347 void important_msgnum(int msgnum)
349 important_message("Important Message", setup_text[msgnum]);
352 void display_error(char *error_message)
354 important_message("Error", error_message);
357 void progress(char *text, long int curr, long int cmax)
361 /* These variables are static because progress() gets called
362 * multiple times during the course of whatever operation is
363 * being performed. This makes setup non-threadsafe, but who
366 static newtComponent form = NULL;
367 static newtComponent scale = NULL;
369 static long dots_printed = 0L;
371 static FILE *fp = NULL;
374 switch (setup_type) {
378 printf("%s\n", text);
379 printf("..........................");
380 printf("..........................");
381 printf("..........................\r");
384 } else if (curr == cmax) {
385 printf("\r%79s\n", "");
387 a = (curr * 100) / cmax;
390 while (dots_printed < a) {
400 sprintf(buf, "exec %s --gauge '%s' 7 72 0",
401 getenv("CTDL_DIALOG"),
403 fp = popen(buf, "w");
409 else if (curr == cmax) {
411 fprintf(fp, "100\n");
417 a = (curr * 100) / cmax;
419 fprintf(fp, "%ld\n", a);
428 newtCenteredWindow(76, 8, text);
429 form = newtForm(NULL, NULL, 0);
430 scale = newtScale(1, 3, 74, cmax);
431 newtFormAddComponent(form, scale);
435 if ((curr > 0) && (curr <= cmax)) {
436 newtScaleSet(scale, curr);
440 newtFormDestroy(form);
453 * check_services_entry() -- Make sure "citadel" is in /etc/services
456 void check_services_entry(void)
461 if (getservbyname(SERVICE_NAME, PROTO_NAME) == NULL) {
462 for (i=0; i<=3; ++i) {
463 progress("Adding service entry...", i, 3);
465 sfp = fopen("/etc/services", "a");
467 display_error(strerror(errno));
469 fprintf(sfp, "%s 504/tcp\n",
481 * Generate a unique entry name for a new inittab entry
483 void generate_entry_name(char *entryname) {
486 snprintf(entryname, sizeof entryname, "c0");
489 if (entryname[1] > '9') {
492 if (entryname[0] > 'z') {
494 "Can't generate a unique entry name");
498 snprintf(buf, sizeof buf,
499 "grep %s: /etc/inittab >/dev/null 2>&1", entryname);
500 } while (system(buf) == 0);
506 * check_inittab_entry() -- Make sure "citadel" is in /etc/inittab
509 void check_inittab_entry(void)
512 char looking_for[SIZ];
516 /* Determine the fully qualified path name of citserver */
517 snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
518 locate_init_entry(citserver_init_entry, looking_for);
520 /* If there's already an entry, then we have nothing left to do. */
521 if (strlen(citserver_init_entry) > 0) {
525 /* Otherwise, prompt the user to create an entry. */
526 snprintf(question, sizeof question,
527 "Do you want this computer configured to start the Citadel\n"
528 "service automatically? (If you answer yes, an entry in\n"
529 "/etc/inittab pointing to %s will be added.)\n",
531 if (yesno(question) == 0)
534 /* Generate a unique entry name for /etc/inittab */
535 generate_entry_name(entryname);
537 /* Now write it out to /etc/inittab */
538 infp = fopen("/etc/inittab", "a");
540 display_error(strerror(errno));
542 fprintf(infp, "# Start the Citadel server...\n");
543 fprintf(infp, "%s:2345:respawn:%s -h%s -x3 -llocal4\n",
544 entryname, looking_for, setup_directory);
546 strcpy(citserver_init_entry, entryname);
552 * On systems which use xinetd, see if we can offer to install Citadel as
553 * the default telnet target.
555 void check_xinetd_entry(void) {
556 char *filename = "/etc/xinetd.d/telnet";
559 int already_citadel = 0;
561 fp = fopen(filename, "r+");
562 if (fp == NULL) return; /* Not there. Oh well... */
564 while (fgets(buf, sizeof buf, fp) != NULL) {
565 if (strstr(buf, setup_directory) != NULL) already_citadel = 1;
568 if (already_citadel) return; /* Already set up this way. */
570 /* Otherwise, prompt the user to create an entry. */
571 snprintf(buf, sizeof buf,
572 "Setup can configure the \"xinetd\" service to automatically\n"
573 "connect incoming telnet sessions to Citadel, bypassing the\n"
574 "host system login: prompt. Would you like to do this?\n"
579 fp = fopen(filename, "w");
581 "# description: telnet service for Citadel users\n"
586 " socket_type = stream\n"
589 " server = /usr/sbin/in.telnetd\n"
590 " server_args = -h -L %s/citadel\n"
591 " log_on_failure += USERID\n"
597 /* Now try to restart the service */
598 system("/etc/init.d/xinetd restart >/dev/null 2>&1");
604 * Offer to disable other MTA's
606 void disable_other_mta(char *mta) {
611 sprintf(buf, "/bin/ls -l /etc/rc*.d/S*%s 2>/dev/null; "
612 "/bin/ls -l /etc/rc.d/rc*.d/S*%s 2>/dev/null",
614 fp = popen(buf, "r");
615 if (fp == NULL) return;
617 while (fgets(buf, sizeof buf, fp) != NULL) {
621 if (lines == 0) return; /* Nothing to do. */
623 /* Offer to replace other MTA with the vastly superior Citadel :) */
624 snprintf(buf, sizeof buf,
625 "You appear to have the \"%s\" email program\n"
626 "running on your system. Would you like to disable it,\n"
627 "allowing Citadel to handle your Internet mail instead?\n",
633 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);
635 sprintf(buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta);
643 * Check to see if our server really works. Returns 0 on success.
645 int test_server(void) {
652 /* Generate a silly little cookie. We're going to write it out
653 * to the server and try to get it back. The cookie does not
654 * have to be secret ... just unique.
656 sprintf(cookie, "%ld.%d", time(NULL), getpid());
658 sprintf(cmd, "%s/sendcommand -h%s ECHO %s 2>&1",
663 fp = popen(cmd, "r");
664 if (fp == NULL) return(errno);
666 while (fgets(buf, sizeof buf, fp) != NULL) {
668 && (strstr(buf, cookie) != NULL) ) {
680 void strprompt(char *prompt_title, char *prompt_text, char *str)
686 int prompt_window_height = 0;
693 strcpy(setupmsg, "");
695 switch (setup_type) {
698 printf("\n%s\n", prompt_text);
699 printf("This is currently set to:\n%s\n", str);
700 printf("Enter new value or press return to leave unchanged:\n");
701 fgets(buf, sizeof buf, stdin);
702 buf[strlen(buf) - 1] = 0;
703 if (strlen(buf) != 0)
708 dialog_result = tmpnam(NULL);
709 sprintf(buf, "exec %s --backtitle '%s' --inputbox '%s' 19 72 '%s' 2>%s",
710 getenv("CTDL_DIALOG"),
716 fp = fopen(dialog_result, "r");
718 fgets(str, sizeof buf, fp);
719 if (str[strlen(str)-1] == 10) {
720 str[strlen(str)-1] = 0;
723 unlink(dialog_result);
730 prompt_window_height = num_tokens(prompt_text, '\n') + 5 ;
731 newtCenteredWindow(76,
732 prompt_window_height,
734 form = newtForm(NULL, NULL, 0);
735 for (i=0; i<num_tokens(prompt_text, '\n'); ++i) {
736 extract_token(buf, prompt_text, i, '\n');
737 newtFormAddComponent(form, newtLabel(1, 1+i, buf));
739 newtFormAddComponent(form,
741 (prompt_window_height - 2),
745 NEWT_FLAG_RETURNEXIT)
751 newtFormDestroy(form);
757 void set_str_val(int msgpos, char *str) {
758 strprompt(setup_titles[msgpos], setup_text[msgpos], str);
763 void set_int_val(int msgpos, int *ip)
766 snprintf(buf, sizeof buf, "%d", (int) *ip);
767 set_str_val(msgpos, buf);
772 void set_char_val(int msgpos, char *ip)
775 snprintf(buf, sizeof buf, "%d", (int) *ip);
776 set_str_val(msgpos, buf);
777 *ip = (char) atoi(buf);
781 void set_long_val(int msgpos, long int *ip)
784 snprintf(buf, sizeof buf, "%ld", *ip);
785 set_str_val(msgpos, buf);
790 void edit_value(int curr)
794 char bbsuidname[SIZ];
799 set_str_val(curr, config.c_sysadm);
804 config.c_bbsuid = 0; /* XXX Windows hack, prob. insecure */
809 set_int_val(curr, &i);
813 strcpy(bbsuidname, pw->pw_name);
814 set_str_val(curr, bbsuidname);
815 pw = getpwnam(bbsuidname);
817 config.c_bbsuid = pw->pw_uid;
819 else if (atoi(bbsuidname) > 0) {
820 config.c_bbsuid = atoi(bbsuidname);
827 set_str_val(curr, config.c_ip_addr);
831 set_int_val(curr, &config.c_port_number);
839 * (re-)write the config data to disk
841 void write_config_to_disk(void)
846 if ((fd = creat("citadel.config", S_IRUSR | S_IWUSR)) == -1) {
847 display_error("setup: cannot open citadel.config");
850 fp = fdopen(fd, "wb");
852 display_error("setup: cannot open citadel.config");
855 fwrite((char *) &config, sizeof(struct config), 1, fp);
863 * Figure out what type of user interface we're going to use
865 int discover_ui(void)
868 /* Use "dialog" if we have it */
869 if (getenv("CTDL_DIALOG") != NULL) {
877 newtDrawRootText(0, 0, "Citadel Setup");
887 int main(int argc, char *argv[])
893 int old_setup_level = 0;
895 struct utsname my_utsname;
900 /* set an invalid setup type */
903 /* Check to see if we're running the web installer */
904 if (getenv("CITADEL_INSTALLER") != NULL) {
905 using_web_installer = 1;
908 /* parse command line args */
909 for (a = 0; a < argc; ++a) {
910 if (!strncmp(argv[a], "-u", 2)) {
911 strcpy(aaa, argv[a]);
912 strcpy(aaa, &aaa[2]);
913 setup_type = atoi(aaa);
915 if (!strcmp(argv[a], "-i")) {
918 if (!strcmp(argv[a], "-q")) {
919 setup_type = UI_SILENT;
924 /* If a setup type was not specified, try to determine automatically
925 * the best one to use out of all available types.
927 if (setup_type < 0) {
928 setup_type = discover_ui();
930 if (info_only == 1) {
931 important_message("Citadel Setup", CITADEL);
935 /* Get started in a valid setup directory. */
936 strcpy(setup_directory, BBSDIR);
937 if ( (using_web_installer) && (getenv("CITADEL") != NULL) ) {
938 strcpy(setup_directory, getenv("CITADEL"));
941 set_str_val(0, setup_directory);
944 if (chdir(setup_directory) != 0) {
945 important_message("Citadel Setup",
946 "The directory you specified does not exist.");
950 /* Determine our host name, in case we need to use it as a default */
953 /* See if we need to shut down the Citadel service. */
954 for (a=0; a<=3; ++a) {
955 progress("Shutting down the Citadel service...", a, 3);
956 if (a == 0) shutdown_citserver();
960 /* Make sure it's stopped. */
961 if (test_server() == 0) {
962 important_message("Citadel Setup",
963 "The Citadel service is still running.\n"
964 "Please stop the service manually and run "
970 switch (setup_type) {
974 " *** Citadel setup program ***\n\n");
980 * What we're going to try to do here is append a whole bunch of
981 * nulls to the citadel.config file, so we can keep the old config
982 * values if they exist, but if the file is missing or from an
983 * earlier version with a shorter config structure, when setup tries
984 * to read the old config parameters, they'll all come up zero.
985 * The length of the config file will be set to what it's supposed
986 * to be when we rewrite it, because we replace the old file with a
987 * completely new copy.
990 if ((a = open("citadel.config", O_WRONLY | O_CREAT | O_APPEND,
991 S_IRUSR | S_IWUSR)) == -1) {
992 display_error("setup: cannot append citadel.config");
995 fp = fdopen(a, "ab");
997 display_error("setup: cannot append citadel.config");
1000 for (a = 0; a < sizeof(struct config); ++a)
1004 /* now we re-open it, and read the old or blank configuration */
1005 fp = fopen("citadel.config", "rb");
1007 display_error("setup: cannot open citadel.config");
1010 fread((char *) &config, sizeof(struct config), 1, fp);
1013 /* set some sample/default values in place of blanks... */
1014 if (strlen(config.c_nodename) == 0)
1015 safestrncpy(config.c_nodename, my_utsname.nodename,
1016 sizeof config.c_nodename);
1017 strtok(config.c_nodename, ".");
1018 if (strlen(config.c_fqdn) == 0) {
1019 if ((he = gethostbyname(my_utsname.nodename)) != NULL)
1020 safestrncpy(config.c_fqdn, he->h_name,
1021 sizeof config.c_fqdn);
1023 safestrncpy(config.c_fqdn, my_utsname.nodename,
1024 sizeof config.c_fqdn);
1026 if (strlen(config.c_humannode) == 0)
1027 strcpy(config.c_humannode, "My System");
1028 if (strlen(config.c_phonenum) == 0)
1029 strcpy(config.c_phonenum, "US 800 555 1212");
1030 if (config.c_initax == 0) {
1031 config.c_initax = 4;
1033 if (strlen(config.c_moreprompt) == 0)
1034 strcpy(config.c_moreprompt, "<more>");
1035 if (strlen(config.c_twitroom) == 0)
1036 strcpy(config.c_twitroom, "Trashcan");
1037 if (strlen(config.c_baseroom) == 0)
1038 strcpy(config.c_baseroom, "Lobby");
1039 if (strlen(config.c_aideroom) == 0)
1040 strcpy(config.c_aideroom, "Aide");
1041 if (config.c_port_number == 0) {
1042 config.c_port_number = 504;
1044 if (config.c_sleeping == 0) {
1045 config.c_sleeping = 900;
1047 if (config.c_bbsuid == 0) {
1048 pw = getpwnam("citadel");
1050 config.c_bbsuid = pw->pw_uid;
1052 if (config.c_bbsuid == 0) {
1053 pw = getpwnam("bbs");
1055 config.c_bbsuid = pw->pw_uid;
1057 if (config.c_bbsuid == 0) {
1058 pw = getpwnam("guest");
1060 config.c_bbsuid = pw->pw_uid;
1062 if (config.c_createax == 0) {
1063 config.c_createax = 3;
1066 * Negative values for maxsessions are not allowed.
1068 if (config.c_maxsessions < 0) {
1069 config.c_maxsessions = 0;
1071 /* We need a system default message expiry policy, because this is
1072 * the top level and there's no 'higher' policy to fall back on.
1074 if (config.c_ep.expire_mode == 0) {
1075 config.c_ep.expire_mode = EXPIRE_NUMMSGS;
1076 config.c_ep.expire_value = 150;
1080 * Default port numbers for various services
1082 if (config.c_smtp_port == 0) config.c_smtp_port = 25;
1083 if (config.c_pop3_port == 0) config.c_pop3_port = 110;
1084 if (config.c_imap_port == 0) config.c_imap_port = 143;
1085 if (config.c_msa_port == 0) config.c_msa_port = 587;
1087 /* Go through a series of dialogs prompting for config info */
1088 if (setup_type != UI_SILENT) {
1089 for (curr = 1; curr <= MAXSETUP; ++curr) {
1095 if (setuid(config.c_bbsuid) != 0) {
1096 important_message("Citadel Setup",
1097 "Failed to change the user ID to your Citadel user.");
1102 /***** begin version update section ***** */
1103 /* take care of any updating that is necessary */
1105 old_setup_level = config.c_setup_level;
1107 if (old_setup_level == 0) {
1111 if (old_setup_level < 555) {
1112 important_message("Citadel Setup",
1113 "This Citadel installation is too old "
1117 write_config_to_disk();
1119 old_setup_level = config.c_setup_level;
1121 /* end of version update section */
1124 config.c_setup_level = REV_LEVEL;
1126 /******************************************/
1128 write_config_to_disk();
1130 mkdir("info", 0700);
1131 chmod("info", 0700);
1134 mkdir("userpics", 0700);
1135 chmod("userpics", 0700);
1136 mkdir("messages", 0700);
1137 chmod("messages", 0700);
1138 mkdir("help", 0700);
1139 chmod("help", 0700);
1140 mkdir("images", 0700);
1141 chmod("images", 0700);
1142 mkdir("netconfigs", 0700);
1143 chmod("netconfigs", 0700);
1145 /* Delete files and directories used by older Citadel versions */
1146 system("exec /bin/rm -fr ./rooms ./chatpipes ./expressmsgs ./sessions 2>/dev/null");
1147 unlink("citadel.log");
1150 check_services_entry(); /* Check /etc/services */
1152 check_inittab_entry(); /* Check /etc/inittab */
1153 check_xinetd_entry(); /* Check /etc/xinetd.d/telnet */
1155 /* Offer to disable other MTA's on the system. */
1156 disable_other_mta("sendmail");
1157 disable_other_mta("postfix");
1158 disable_other_mta("qmail");
1159 disable_other_mta("cyrus");
1160 disable_other_mta("cyrmaster");
1161 disable_other_mta("saslauthd");
1162 disable_other_mta("mta");
1163 disable_other_mta("courier-imap");
1164 disable_other_mta("courier-imap-ssl");
1165 disable_other_mta("courier-authdaemon");
1166 disable_other_mta("courier-pop3");
1167 disable_other_mta("courier-pop3d");
1168 disable_other_mta("courier-pop");
1169 disable_other_mta("vmailmgrd");
1170 disable_other_mta("imapd");
1171 disable_other_mta("popd");
1172 disable_other_mta("pop3d");
1173 disable_other_mta("exim");
1176 if ((pw = getpwuid(config.c_bbsuid)) == NULL)
1181 progress("Setting file permissions", 0, 4);
1182 chown(".", config.c_bbsuid, gid);
1184 progress("Setting file permissions", 1, 4);
1185 chown("citadel.config", config.c_bbsuid, gid);
1187 progress("Setting file permissions", 2, 4);
1188 snprintf(aaa, sizeof aaa,
1189 "find . | grep -v chkpwd | xargs chown %ld:%ld 2>/dev/null",
1190 (long)config.c_bbsuid, (long)gid);
1193 progress("Setting file permissions", 3, 4);
1194 chmod("citadel.config", S_IRUSR | S_IWUSR);
1196 progress("Setting file permissions", 4, 4);
1199 /* Contemplate the possibility of auto-configuring OpenLDAP */
1203 /* See if we can start the Citadel service. */
1204 if (strlen(citserver_init_entry) > 0) {
1205 for (a=0; a<=3; ++a) {
1206 progress("Starting the Citadel service...", a, 3);
1207 if (a == 0) start_citserver();
1210 if (test_server() == 0) {
1211 important_message("Setup finished",
1212 "Setup is finished. You may now log in.");
1215 important_message("Setup finished",
1216 "Setup is finished, but the Citadel service "
1217 "failed to start.\n"
1218 "Go back and check your configuration.");
1222 important_message("Setup finished",
1223 "Setup is finished. You may now start the server.");
1233 * If we're in the middle of an Easy Install, we might just be able to
1234 * auto-configure a standalone OpenLDAP server.
1236 void contemplate_ldap(void) {
1238 char slapd_init_entry[SIZ];
1241 /* If conditions are not ideal, give up on this idea. */
1242 if (using_web_installer == 0) return;
1243 if (getenv("LDAP_CONFIG") == NULL) return;
1244 if (getenv("SUPPORT") == NULL) return;
1245 if (getenv("SLAPD_BINARY") == NULL) return;
1246 if (getenv("CITADEL") == NULL) return;
1248 /* Otherwise, prompt the user to create an entry. */
1249 snprintf(question, sizeof question,
1251 "Do you want this computer configured to start a standalone\n"
1252 "LDAP service automatically? (If you answer yes, a custom\n"
1253 "slapd.conf will be written, and an /etc/inittab entry\n"
1254 "pointing to %s will be added.)\n"
1256 getenv("SLAPD_BINARY")
1258 if (yesno(question) == 0)
1261 strcpy(config.c_ldap_base_dn, "dc=example,dc=com");
1262 strprompt("Base DN",
1264 "Please enter the Base DN for your directory. This will\n"
1265 "generally be something based on the primary DNS domain in\n"
1266 "which you receive mail, but it does not have to be. Your\n"
1267 "LDAP tree will be built using this Distinguished Name.\n"
1269 config.c_ldap_base_dn
1272 strcpy(config.c_ldap_host, "localhost");
1273 config.c_ldap_port = 389;
1274 sprintf(config.c_ldap_bind_dn, "cn=manager,%s", config.c_ldap_base_dn);
1276 /* FIXME ... make the generated password harder to guess */
1277 sprintf(config.c_ldap_bind_pw, "%d%ld", getpid(), time(NULL));
1279 write_config_to_disk();
1281 fp = fopen(getenv("LDAP_CONFIG"), "w");
1283 sprintf(question, "\nCannot create %s:\n%s\n\n"
1284 "Citadel will still function, but you will "
1285 "not have an LDAP service.\n\n",
1286 getenv("LDAP_CONFIG"),
1289 important_message("Error", question);
1293 fprintf(fp, "include %s/citadel-openldap.schema\n",
1295 fprintf(fp, "pidfile %s/openldap-data/slapd.pid\n",
1297 fprintf(fp, "argsfile %s/openldap-data/slapd.args\n",
1299 fprintf(fp, "allow bind_v2\n"
1303 fprintf(fp, "suffix \"%s\"\n", config.c_ldap_base_dn);
1304 fprintf(fp, "rootdn \"%s\"\n", config.c_ldap_bind_dn);
1305 fprintf(fp, "rootpw %s\n", config.c_ldap_bind_pw);
1306 fprintf(fp, "directory %s/openldap-data\n",
1308 fprintf(fp, "index objectClass eq\n");
1312 /* This is where our OpenLDAP server will keep its data. */
1313 mkdir("openldap-data", 0700);
1315 /* If inittab is already starting slapd, disable the old entry. */
1316 locate_init_entry(slapd_init_entry, getenv("SLAPD_BINARY"));
1317 if (strlen(slapd_init_entry) > 0) {
1318 set_init_entry(slapd_init_entry, "off");
1321 /* Otherwise, generate a unique entry name for slapd */
1323 generate_entry_name(slapd_init_entry);
1326 /* Now write it out to /etc/inittab.
1327 * FIXME make it run as some non-root user.
1328 * The "-d 0" seems superfluous, but it's actually a way to make
1329 * slapd run in the foreground without spewing messages to the console.
1331 fp = fopen("/etc/inittab", "a");
1333 display_error(strerror(errno));
1335 fprintf(fp, "# Start the OpenLDAP server for Citadel...\n");
1336 fprintf(fp, "%s:2345:respawn:%s -d 0 -f %s\n",
1338 getenv("SLAPD_BINARY"),
1339 getenv("LDAP_CONFIG")
1345 #endif /* HAVE_LDAP */