/*
- * Citadel/UX setup program
- * v4.1 / by Art Cancro
- * see copyright.txt for copyright information
+ * $Id$
+ *
+ * Citadel setup utility
*
- * *** YOU MUST EDIT sysconfig.h >BEFORE< COMPILING SETUP ***
*/
#include <stdlib.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/stat.h>
+#include <sys/utsname.h>
+#include <sys/wait.h>
+#include <signal.h>
#include <netdb.h>
#include <errno.h>
+#include <limits.h>
+#include <pwd.h>
+#include <time.h>
#include "citadel.h"
#include "axdefs.h"
#include "sysdep.h"
+#include "config.h"
+#include "tools.h"
-#ifdef CURSES_INC
-# ifdef OK
-# undef OK
-# endif
-#include CURSES_INC
+#ifdef HAVE_NEWT
+#include <newt.h>
#endif
-#define MAXSETUP 20
+
+#define MAXSETUP 4 /* How many setup questions to ask */
#define UI_TEXT 0 /* Default setup type -- text only */
-#define UI_DIALOG 1 /* Use the 'dialog' program */
-#define UI_CURSES 2 /* Use curses */
+#define UI_DIALOG 2 /* Use the 'dialog' program */
+#define UI_SILENT 3 /* Silent running, for use in scripts */
+#define UI_NEWT 4 /* Use the "newt" window library */
#define SERVICE_NAME "citadel"
#define PROTO_NAME "tcp"
int setup_type;
-char setup_directory[128];
-int need_init_q = 0;
-
-char *setup_titles[] = {
- "BBS Home Directory",
- "Citadel node name",
- "Fully Qualified Domain Name (FQDN)",
- "Human-readable node name",
- "Phone number",
- "BBS City and State",
+char setup_directory[SIZ];
+char citserver_init_entry[SIZ];
+int using_web_installer = 0;
+
+#ifdef HAVE_LDAP
+void contemplate_ldap(void);
+#endif
+
+char *setup_titles[] =
+{
+ "Citadel Home Directory",
"System Administrator",
- "BBS User ID",
- "Password encryption seed",
- "'Room Creator = Room Aide' flag",
- "Server timeout period",
- "Initial access level",
- "Registration requirements",
- "Twit Detect!",
- "Twit Detect target room",
- "Maximum concurrent sessions",
- "Paginator prompt",
- "Restrict Internet mail flag",
- "Name of bit bucket subdirectory",
- "System net password",
+ "Citadel User ID",
+ "Server IP address",
"Server port number",
- };
+};
char *setup_text[] = {
-
-"0",
-"Enter the full pathname of the directory in which the BBS you are",
-"creating or updating resides. If you specify a directory other than the",
-"default, you will need to specify the -h flag to the server when you start",
-"it up.",
-
-"1",
-"This is the name your system is known by on a Citadel/UX network. It",
-"should be 8 characters or less, and should generally be comprised only of",
-"letters. You can also use numbers and hyphens if necessary.",
-
-"2",
-"This is the name your system is known by on the Internet.",
-"If you're not on the Internet, simply set this to your",
-"node name followed by '.UUCP'.",
-
-"3",
-"This is a longer description of your system, readable by",
-"us mere humans. It can be up to 20 characters long and it",
-"can have spaces in it. Note that if you are part of a",
-"Cit86Net, this is the name your system will be known by on",
-"that network.",
-
-"4",
-"This is the main dialup number for your system. If yours",
-"can not be dialed into, then make one up! It should be in",
-"the format 'US 000 000 0000' - the US is your country code",
-"(look it up if you're not in the United States) and the",
-"rest is, of course, your area code and phone number.",
-"This doesn't have any use in Citadel/UX, but gateways to",
-"other networks may require it, and someday we may use this",
-"to have the networker automatically build a BBS list.",
-
-"5",
-"Enter the geographical location of your system (city and",
-"state/province/country etc.)",
-
-"6",
-"Enter the name of the system administrator (which is probably you).",
-"When an account is created with this name, it will automatically be",
-"assigned the highest access level.",
-
-"7",
-"You should create a user called 'bbs', 'guest', 'citadel', or something",
-"similar, that will allow users a way into your BBS. The server will run",
-"under this user ID. Please specify that (numeric) user ID here.",
-
-"8",
-"Citadel uses a (very) simple password encryption scheme",
-"to thwart breakins that could occur if someone snatched",
-"a copy of your userlog. This parameter is part of the",
-"algorithm, so that the code can be different on each",
-"system. Once it has been set, DO NOT change it --",
-"otherwise no one will be able to log in!",
-
-"9",
-"This is a boolean value. If you set it to 1, anyone who",
-"creates a class 3 (passworded) or class 4 (invitation",
-"only) room will automatically become the Room Aide for",
-"that room, allowing them to edit it, delete/move messages,",
-"etc. This is an administrative decision: it works well on",
-"some systems, and not so well on others. Set this to 0 to",
-"disable this function.",
-
-"10",
-"This setting specifies how long a server session may sit idle before it is",
-"automatically terminated. The recommended value is 900 seconds (15",
-"minutes). Note that this has *nothing* to do with any watchdog timer that",
-"is presented to the user. The server's timeout is intended to kill idle or",
-"zombie sessions running on a network, etc. ",
-"You MUST set this to a reasonable value. Setting it to zero will cause",
-"the server to malfunction.",
-
-"11",
-"This is the access level new users are assigned.",
-"",
-"The most common settings for this will be either 1, for",
-"systems which require new user validation by the system",
-"administrator ('sysop' is a word for people who run DOS",
-"boards!), or 4, for systems which give instant access.",
-"The current access levels available are:",
-
-"12",
-"'Registration' refers to the boring part of logging into a BBS for the first",
-"time: typing your name, address, and telephone number. Set this value to 1",
-"to automatically do registration for new users, or 0 to not auto-register.",
-"Optionally, you could set it to, say, 2, to auto-register on a user's second",
-"call, but there really isn't much point to doing this. The recommended",
-"value is 1 if you've set your inital access level to 1, or 0 if you've set",
-"your initial access level to something higher.",
-
-"13",
-"Every BBS has its share of problem users. This is one",
-"good way to deal with them: if you enable this option,",
-"anyone you flag as a 'problem user' (access level 2) can",
-"post anywhere they want, but their messages will all be",
-"automatically moved to a room of your choosing. Set this",
-"value to 1 to enable Twit Detect, or 0 to disable it.",
-
-"14",
-"This is the name of the room that problem user messages",
-"get moved to if you have Twit Detect enabled.",
-"(Note: don't forget to *create* this room!)",
-
-"15",
-"This is the maximum number of concurrent Citadel sessions which may be",
-"running at any given time. Use this to keep very busy systems from being",
-"overloaded.",
-" Set this value to 0 to allow an unlimited number of sessions.",
-
-"16",
-"This is the prompt that appears after each screenful of",
-"text - for users that have chosen that option. Usually",
-"a simple '<more>' will do, but some folks like to be",
-"creative...",
-
-"17",
-"If you have a gateway set up to allow Citadel users to",
-"send Internet mail, with sendmail, qmail, or whatever, and",
-"you wish to restrict this to only users to whom you have",
-"given this privilege, set this flag to 1. Otherwise, set",
-"it to 0 to allow everyone to send Internet mail.",
-"(Obviously, if your system doesn't have the ability to",
-"send mail to the outside world, this is all irrelevant.)",
-
-"18",
-"Select the name of a subdirectory (relative to the main",
-"Citadel directory - do not type an absolute pathname!) in",
-"which to place arriving file transfers that otherwise",
-"don't have a home.",
-
-"19",
-"If you use Citadel client/server sessions to transport network spool data",
-"between systems, this is the password other systems will use to authenticate",
-"themselves as network nodes rather than regular callers.",
-
-"20",
-"Specify the TCP port number on which your server will run. Normally, this",
-"will be port 504, which is the official port assigned by the IANA for",
-"Citadel servers. You'll only need to specify a different port number if",
-"you run multiple BBS's on the same computer and there's something else",
-"already using port 504.",
-
-"21",
-"22",
-"23",
-"24",
-"25",
-"26",
-"27",
-"28",
-"29",
-"30",
-
-"31",
-"Setup has detected that you currently have data files from a Citadel/UX",
-"version 3.2x installation. The program 'conv_32_40' can upgrade your",
-"files to version 4.0x format.",
-" Setup will now exit. Please either run 'conv_32_40' or delete your data",
-"files, and run setup again.",
-
-"32",
+"Enter the full pathname of the directory in which the Citadel\n"
+"installation you are creating or updating resides. If you\n"
+"specify a directory other than the default, you will need to\n"
+"specify the -h flag to the server when you start it up.\n",
+
+"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",
+
+"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"
+"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",
+
+"Specify the IP address on which your server will run. If you\n"
+"leave this blank, or if you specify 0.0.0.0, Citadel will listen\n"
+"on all addresses. You can usually skip this unless you are\n"
+"running multiple instances of Citadel on the same computer.\n",
+
+"Specify the TCP port number on which your server will run.\n"
+"Normally, this will be port 504, which is the official port\n"
+"assigned by the IANA for Citadel servers. You will only need\n"
+"to specify a different port number if you run multiple instances\n"
+"of Citadel on the same computer and there is something else\n"
+"already using port 504.\n",
};
-
-long atol();
-void get_config();
struct config config;
int direction;
-void cleanup(int exitcode) {
-#ifdef CURSES_INC
- if (setup_type == UI_CURSES) {
- clear();
- refresh();
- endwin();
- }
-#endif
+/*
+ * Set an entry in inittab to the desired state
+ */
+void set_init_entry(char *which_entry, char *new_state) {
+ char *inittab = NULL;
+ FILE *fp;
+ char buf[SIZ];
+ char entry[SIZ];
+ char levels[SIZ];
+ char state[SIZ];
+ char prog[SIZ];
- /* Do an 'init q' if we need to. When we hit the right one, init
- * will take over and setup won't come back because we didn't do a
- * fork(). If init isn't found, we fall through the bottom of the
- * loop and setup exits quietly.
- */
- if (need_init_q) {
- execlp("/sbin/init", "init", "q", NULL);
- execlp("/usr/sbin/init", "init", "q", NULL);
- execlp("/bin/init", "init", "q", NULL);
- execlp("/usr/bin/init", "init", "q", NULL);
- execlp("init", "init", "q", NULL);
- }
+ if (which_entry == NULL) return;
+ if (strlen(which_entry) == 0) return;
- exit(exitcode);
- }
+ inittab = strdup("");
+ if (inittab == NULL) return;
+ fp = fopen("/etc/inittab", "r");
+ if (fp == NULL) return;
-#ifdef CURSES_INC
-void getlin(yp,xp,string,lim) /* Gets a line from the terminal */
-int yp,xp; /* Where on the screen to start */
-char string[]; /* Pointer to string buffer */
-int lim; /* Maximum length - if negative, no-show */
-{
-int a,b; char flag;
-
- flag=0;
- if (lim<0) { lim=(0-lim); flag=1; }
- move(yp,xp);
- standout();
- for (a=0; a<lim; ++a) addch('-');
- refresh();
- move(yp,xp);
- for (a=0; a<lim; ++a) addch(' ');
- move(yp,xp);
- printw("%s", string);
-GLA: move(yp,xp+strlen(string));
- refresh();
- a=getch();
- if (a==127) a=8;
- a=(a&127);
- if (a==10) a=13;
- if ((a==8)&&(strlen(string)==0)) goto GLA;
- if ((a!=13)&&(a!=8)&&(strlen(string)==lim)) goto GLA;
- if ((a==8)&&(string[0]!=0)) {
- string[strlen(string)-1]=0;
- move(yp,xp+strlen(string));
- addch(' ');
- goto GLA;
- }
- if ((a==13)||(a==10)) {
- standend();
- move(yp,xp);
- for (a=0; a<lim; ++a) addch(' ');
- mvprintw(yp,xp,"%s",string);
- refresh();
- return;
- }
- b=strlen(string);
- string[b]=a;
- string[b+1]=0;
- if (flag==0) addch(a);
- if (flag==1) addch('*');
- goto GLA;
-}
-#endif
+ while(fgets(buf, sizeof buf, fp) != NULL) {
+ if (num_tokens(buf, ':') == 4) {
+ extract_token(entry, buf, 0, ':', sizeof entry);
+ extract_token(levels, buf, 1, ':', sizeof levels);
+ extract_token(state, buf, 2, ':', sizeof state);
+ extract_token(prog, buf, 3, ':', sizeof prog); /* includes 0x0a LF */
+ if (!strcmp(entry, which_entry)) {
+ strcpy(state, new_state);
+ sprintf(buf, "%s:%s:%s:%s",
+ entry, levels, state, prog);
+ }
+ }
-void title(text)
-char *text; {
- if (setup_type == UI_TEXT) {
- printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n<%s>\n",text);
+ inittab = realloc(inittab, strlen(inittab) + strlen(buf) + 2);
+ if (inittab == NULL) {
+ fclose(fp);
+ return;
}
+
+ strcat(inittab, buf);
}
+ fclose(fp);
+ fp = fopen("/etc/inittab", "w");
+ if (fp != NULL) {
+ fwrite(inittab, strlen(inittab), 1, fp);
+ fclose(fp);
+ kill(1, SIGHUP); /* Tell init to re-read /etc/inittab */
+ }
+ free(inittab);
+}
-void hit_any_key() {
- char junk[5];
+/*
+ * Locate the name of an inittab entry for a specific program
+ */
+void locate_init_entry(char *init_entry, char *looking_for) {
+
+ FILE *infp;
+ char buf[SIZ];
+ int have_entry = 0;
+ char entry[SIZ];
+ char prog[SIZ];
+
+ strcpy(init_entry, "");
-#ifdef CURSES_INC
- if (setup_type == UI_CURSES) {
- mvprintw(20, 0, "Press any key to continue... ");
- refresh();
- getch();
+ /* Pound through /etc/inittab line by line. Set have_entry to 1 if
+ * an entry is found which we believe starts the specified program.
+ */
+ infp = fopen("/etc/inittab", "r");
+ if (infp == NULL) {
return;
+ } else {
+ while (fgets(buf, sizeof buf, infp) != NULL) {
+ buf[strlen(buf) - 1] = 0;
+ extract_token(entry, buf, 0, ':', sizeof entry);
+ extract_token(prog, buf, 3, ':', sizeof prog);
+ if (!strncasecmp(prog, looking_for,
+ strlen(looking_for))) {
+ ++have_entry;
+ strcpy(init_entry, entry);
+ }
}
-#endif
- printf("Press return to continue...");
- fgets(junk, 5, stdin);
+ fclose(infp);
}
-int yesno(question)
-char *question; {
- int answer = 0;
- char buf[4096];
+}
- switch(setup_type) {
-
- case UI_TEXT:
- do {
- printf("%s\nYes/No --> ",question);
- fgets(buf, 4096, stdin);
- answer=tolower(buf[0]);
- if (answer=='y') answer=1;
- else if (answer=='n') answer=0;
- } while ((answer<0)||(answer>1));
- break;
-
- case UI_DIALOG:
- sprintf(buf, "dialog --yesno \"%s\" 7 80", question);
- answer = ( (system(buf)==0) ? 1 : 0);
- break;
-#ifdef CURSES_INC
- case UI_CURSES:
- do {
- clear();
- standout();
- mvprintw(1, 20, "Question");
- standend();
- mvprintw(10, 0, "%-80s", question);
- mvprintw(20, 0, "%80s", "");
- mvprintw(20, 0, "Yes/No -> ");
- refresh();
- answer = getch();
- answer=tolower(answer);
- if (answer=='y') answer=1;
- else if (answer=='n') answer=0;
- } while ((answer<0)||(answer>1));
- break;
-#endif
- }
- return(answer);
- }
+/*
+ * Shut down the Citadel service if necessary, during setup.
+ */
+void shutdown_citserver(void) {
+ char looking_for[SIZ];
+ snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
+ locate_init_entry(citserver_init_entry, looking_for);
+ if (strlen(citserver_init_entry) > 0) {
+ set_init_entry(citserver_init_entry, "off");
+ }
+}
-void dump_access_levels() {
- int a;
- for (a=0; a<=6; ++a) printf("%d %s\n",a,axdefs[a]);
+/*
+ * Start the Citadel service.
+ */
+void start_citserver(void) {
+ if (strlen(citserver_init_entry) > 0) {
+ set_init_entry(citserver_init_entry, "respawn");
}
+}
-void get_setup_msg(char *dispbuf, int msgnum) {
- int a,b;
- a=0;
- b=0;
- while (atol(setup_text[a]) != msgnum) ++a;
- ++a;
- strcpy(dispbuf, "");
- do {
- strcat(dispbuf, setup_text[a++]);
- strcat(dispbuf, "\n");
- } while(atol(setup_text[a])!=(msgnum+1));
- }
-void print_setup(msgnum) {
- char dispbuf[4096];
+void cleanup(int exitcode)
+{
+#ifdef HAVE_NEWT
+ newtCls();
+ newtRefresh();
+ newtFinished();
+#endif
+ exit(exitcode);
+}
+
+
- get_setup_msg(dispbuf, msgnum);
- printf("\n\n%s\n\n", dispbuf);
+void title(char *text)
+{
+ if (setup_type == UI_TEXT) {
+ printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n<%s>\n", text);
}
+}
-void important_message(char *title, char *msgtext) {
- char buf[4096];
- 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);
- hit_any_key();
- break;
-
- case UI_DIALOG:
- sprintf(buf, "dialog --title \"%s\" --msgbox \"\n%s\" 20 80",
- title, msgtext);
- system(buf);
- break;
-#ifdef CURSES_INC
- case UI_CURSES:
- clear();
- move(1, 20);
- standout();
- printw(" Important Message ");
- standend();
- move(3, 0);
- printw("%s", msgtext);
- refresh();
- hit_any_key();
- break;
+int yesno(char *question)
+{
+#ifdef HAVE_NEWT
+ newtComponent form = NULL;
+ newtComponent yesbutton = NULL;
+ newtComponent nobutton = NULL;
+ int prompt_window_height = 0;
#endif
+ int i = 0;
+ int answer = 0;
+ char buf[SIZ];
+
+ switch (setup_type) {
+ case UI_TEXT:
+ do {
+ printf("%s\nYes/No --> ", question);
+ fgets(buf, sizeof buf, stdin);
+ answer = tolower(buf[0]);
+ if (answer == 'y')
+ answer = 1;
+ else if (answer == 'n')
+ answer = 0;
+ } while ((answer < 0) || (answer > 1));
+ break;
+
+ case UI_DIALOG:
+ sprintf(buf, "exec %s --yesno '%s' 10 72",
+ getenv("CTDL_DIALOG"),
+ question);
+ i = system(buf);
+ if (i == 0) {
+ answer = 1;
}
+ else {
+ answer = 0;
+ }
+ break;
+
+#ifdef HAVE_NEWT
+ case UI_NEWT:
+ prompt_window_height = num_tokens(question, '\n') + 5;
+ newtCenteredWindow(76, prompt_window_height, "Question");
+ form = newtForm(NULL, NULL, 0);
+ for (i=0; i<num_tokens(question, '\n'); ++i) {
+ extract_token(buf, question, i, '\n', sizeof buf);
+ newtFormAddComponent(form, newtLabel(1, 1+i, buf));
+ }
+ yesbutton = newtButton(10, (prompt_window_height - 4), "Yes");
+ nobutton = newtButton(60, (prompt_window_height - 4), "No");
+ newtFormAddComponent(form, yesbutton);
+ newtFormAddComponent(form, nobutton);
+ if (newtRunForm(form) == yesbutton) {
+ answer = 1;
+ }
+ else {
+ answer = 0;
+ }
+ newtPopWindow();
+ newtFormDestroy(form);
+
+ break;
+#endif
+
}
+ return (answer);
+}
+
+
+void important_message(char *title, char *msgtext)
+{
+#ifdef HAVE_NEWT
+ newtComponent form = NULL;
+ int i = 0;
+#endif
+ char buf[SIZ];
+
+ 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...");
+ fgets(buf, sizeof buf, stdin);
+ break;
+
+ case UI_DIALOG:
+ sprintf(buf, "exec %s --backtitle '%s' --msgbox '%s' 19 72",
+ getenv("CTDL_DIALOG"),
+ title,
+ msgtext);
+ system(buf);
+ break;
+
+#ifdef HAVE_NEWT
+ case UI_NEWT:
+ newtCenteredWindow(76, 10, title);
+ form = newtForm(NULL, NULL, 0);
+ for (i=0; i<num_tokens(msgtext, '\n'); ++i) {
+ extract_token(buf, msgtext, i, '\n', sizeof buf);
+ newtFormAddComponent(form, newtLabel(1, 1+i, buf));
+ }
+ newtFormAddComponent(form, newtButton(35, 5, "OK"));
+ newtRunForm(form);
+ newtPopWindow();
+ newtFormDestroy(form);
+ break;
+#endif
-void important_msgnum(int msgnum) {
- char dispbuf[4096];
-
- get_setup_msg(dispbuf, msgnum);
- important_message("Important Message", dispbuf);
}
+}
+
+void important_msgnum(int msgnum)
+{
+ important_message("Important Message", setup_text[msgnum]);
+}
-void display_error(char *error_message) {
+void display_error(char *error_message)
+{
important_message("Error", error_message);
- }
+}
-void progress(text,curr,cmax)
-char *text;
-long curr;
-long cmax; {
- static long dots_printed;
- long a;
- static long prev;
- static FILE *gauge = NULL;
- char gcmd[256];
-
- switch(setup_type) {
-
- case UI_TEXT:
- if (curr==0) {
- printf("%s\n",text);
- printf("..........................");
- printf("..........................");
- printf("..........................\r");
- fflush(stdout);
- dots_printed = 0;
- }
- else if (curr==cmax) {
- printf("\r%79s\n","");
- }
- else {
- a=(curr * 100) / cmax;
- a=a*78; a=a/100;
- while (dots_printed < a) {
- printf("*");
- ++dots_printed;
- fflush(stdout);
- }
- }
- break;
-
-#ifdef CURSES_INC
- case UI_CURSES:
- if (curr==0) {
- clear();
- move(5, 20);
- printw("%s\n",text);
- move(10, 1);
- printf("..........................");
- printf("..........................");
- printf("..........................\r");
- refresh();
- dots_printed = 0;
- }
- else if (curr==cmax) {
- clear();
- refresh();
- }
- else {
- a=(curr * 100) / cmax;
- a=a*78; a=a/100;
- move(10,1);
- dots_printed = 0;
- while (dots_printed < a) {
- printw("*");
- ++dots_printed;
- }
- refresh();
- }
- break;
+void progress(char *text, long int curr, long int cmax)
+{
+#ifdef HAVE_NEWT
+
+ /* These variables are static because progress() gets called
+ * multiple times during the course of whatever operation is
+ * being performed. This makes setup non-threadsafe, but who
+ * cares?
+ */
+ static newtComponent form = NULL;
+ static newtComponent scale = NULL;
#endif
-
- case UI_DIALOG:
- if ( (curr == 0) && (gauge == NULL) ) {
- sprintf(gcmd, "dialog --guage \"%s\" 7 80 0",
- text);
- gauge = (FILE *) popen(gcmd, "w");
- prev = 0;
- }
- else if (curr==cmax) {
- fprintf(gauge, "100\n");
- pclose(gauge);
- gauge = NULL;
- }
- else {
- a=(curr * 100) / cmax;
- if (a != prev) {
- fprintf(gauge, "%ld\n", a);
- fflush(gauge);
- }
- prev = a;
- }
- break;
+ static long dots_printed = 0L;
+ long a = 0;
+ static FILE *fp = NULL;
+ char buf[SIZ];
+
+ switch (setup_type) {
+
+ case UI_TEXT:
+ if (curr == 0) {
+ printf("%s\n", text);
+ printf("..........................");
+ printf("..........................");
+ printf("..........................\r");
+ fflush(stdout);
+ dots_printed = 0;
+ } else if (curr == cmax) {
+ printf("\r%79s\n", "");
+ } else {
+ a = (curr * 100) / cmax;
+ a = a * 78;
+ a = a / 100;
+ while (dots_printed < a) {
+ printf("*");
+ ++dots_printed;
+ fflush(stdout);
+ }
+ }
+ break;
+
+ case UI_DIALOG:
+ if (curr == 0) {
+ sprintf(buf, "exec %s --gauge '%s' 7 72 0",
+ getenv("CTDL_DIALOG"),
+ text);
+ fp = popen(buf, "w");
+ if (fp != NULL) {
+ fprintf(fp, "0\n");
+ fflush(fp);
+ }
+ }
+ else if (curr == cmax) {
+ if (fp != NULL) {
+ fprintf(fp, "100\n");
+ pclose(fp);
+ fp = NULL;
+ }
}
+ else {
+ a = (curr * 100) / cmax;
+ if (fp != NULL) {
+ fprintf(fp, "%ld\n", a);
+ fflush(fp);
+ }
+ }
+ break;
+
+#ifdef HAVE_NEWT
+ case UI_NEWT:
+ if (curr == 0) {
+ newtCenteredWindow(76, 8, text);
+ form = newtForm(NULL, NULL, 0);
+ scale = newtScale(1, 3, 74, cmax);
+ newtFormAddComponent(form, scale);
+ newtDrawForm(form);
+ newtRefresh();
+ }
+ if ((curr > 0) && (curr <= cmax)) {
+ newtScaleSet(scale, curr);
+ newtRefresh();
+ }
+ if (curr == cmax) {
+ newtFormDestroy(form);
+ newtPopWindow();
+ newtRefresh();
+ }
+ break;
+#endif
+
}
+}
* check_services_entry() -- Make sure "citadel" is in /etc/services
*
*/
-void check_services_entry() {
- char question[128];
+void check_services_entry(void)
+{
+ int i;
FILE *sfp;
- sprintf(question,
-"There is no '%s' entry in /etc/services. Would you like to add one?",
- SERVICE_NAME);
-
if (getservbyname(SERVICE_NAME, PROTO_NAME) == NULL) {
- if (yesno(question)==1) {
- sfp = fopen("/etc/services", "a");
- if (sfp == NULL) {
- display_error(strerror(errno));
- }
- else {
- fprintf(sfp, "%s 504/tcp\n",
- SERVICE_NAME);
- fclose(sfp);
+ for (i=0; i<=3; ++i) {
+ progress("Adding service entry...", i, 3);
+ if (i == 0) {
+ sfp = fopen("/etc/services", "a");
+ if (sfp == NULL) {
+ display_error(strerror(errno));
+ } else {
+ fprintf(sfp, "%s 504/tcp\n",
+ SERVICE_NAME);
+ fclose(sfp);
}
}
+ sleep(1);
}
-
}
+}
+
+
+/*
+ * Generate a unique entry name for a new inittab entry
+ */
+void generate_entry_name(char *entryname) {
+ char buf[SIZ];
+
+ snprintf(entryname, sizeof entryname, "c0");
+ do {
+ ++entryname[1];
+ if (entryname[1] > '9') {
+ entryname[1] = 0;
+ ++entryname[0];
+ if (entryname[0] > 'z') {
+ display_error(
+ "Can't generate a unique entry name");
+ return;
+ }
+ }
+ snprintf(buf, sizeof buf,
+ "grep %s: /etc/inittab >/dev/null 2>&1", entryname);
+ } while (system(buf) == 0);
+}
+
/*
* check_inittab_entry() -- Make sure "citadel" is in /etc/inittab
*
*/
-void check_inittab_entry() {
+void check_inittab_entry(void)
+{
FILE *infp;
- char buf[256];
- char looking_for[256];
- char question[128];
- char *ptr;
- int have_entry = 0;
- char entryname[3];
+ char looking_for[SIZ];
+ char question[SIZ];
+ char entryname[5];
/* Determine the fully qualified path name of citserver */
- sprintf(looking_for, "%s/citserver ", BBSDIR);
-
- /* Pound through /etc/inittab line by line. Set have_entry to 1 if
- * an entry is found which we believe starts citserver.
- */
- infp = fopen("/etc/inittab", "r");
- if (infp == NULL) {
- display_error(strerror(errno));
- }
- else {
- while (fgets(buf, 256, infp) != NULL) {
- buf[strlen(buf) - 1] = 0;
- ptr = strtok(buf, ":");
- ptr = strtok(NULL, ":");
- ptr = strtok(NULL, ":");
- ptr = strtok(NULL, ":");
- if (ptr != NULL) {
- if (!strncmp(ptr, looking_for, strlen(looking_for))) {
- ++have_entry;
- }
- }
- }
- fclose(infp);
- }
+ snprintf(looking_for, sizeof looking_for, "%s/citserver", setup_directory);
+ locate_init_entry(citserver_init_entry, looking_for);
/* If there's already an entry, then we have nothing left to do. */
- if (have_entry > 0) return;
+ if (strlen(citserver_init_entry) > 0) {
+ return;
+ }
/* Otherwise, prompt the user to create an entry. */
- sprintf(question,
-"There is no '%s' entry in /etc/inittab.\nWould you like to add one?",
+ snprintf(question, sizeof question,
+ "Do you want this computer configured to start the Citadel\n"
+ "service automatically? (If you answer yes, an entry in\n"
+ "/etc/inittab pointing to %s will be added.)\n",
looking_for);
- if (yesno(question)==0) return;
+ if (yesno(question) == 0)
+ return;
/* Generate a unique entry name for /etc/inittab */
- sprintf(entryname, "c0");
- do {
- ++entryname[1];
- if (entryname[1] > '9') {
- entryname[1] = 0;
- ++entryname[0];
- if (entryname[0] > 'z') {
- display_error(
- "Can't generate a unique entry name");
- return;
- }
- }
- sprintf(buf,
- "grep %s: /etc/inittab >/dev/null 2>&1", entryname);
- } while(system(buf)==0);
+ generate_entry_name(entryname);
/* Now write it out to /etc/inittab */
infp = fopen("/etc/inittab", "a");
if (infp == NULL) {
display_error(strerror(errno));
- }
- else {
- fprintf(infp, "# Start the Citadel/UX server...\n");
- fprintf(infp,"%s:2345:respawn:%s -h%s\n",
+ } else {
+ fprintf(infp, "# Start the Citadel server...\n");
+ fprintf(infp, "%s:2345:respawn:%s -h%s -x3 -llocal4\n",
entryname, looking_for, setup_directory);
fclose(infp);
- need_init_q = 1;
- }
+ strcpy(citserver_init_entry, entryname);
}
+}
-
-void set_str_val(int msgpos, char str[]) {
- char buf[4096];
- char setupmsg[4096];
- char tempfile[64];
+/*
+ * On systems which use xinetd, see if we can offer to install Citadel as
+ * the default telnet target.
+ */
+void check_xinetd_entry(void) {
+ char *filename = "/etc/xinetd.d/telnet";
FILE *fp;
+ char buf[SIZ];
+ int already_citadel = 0;
- sprintf(tempfile, "/tmp/setup.%d", getpid());
+ fp = fopen(filename, "r+");
+ if (fp == NULL) return; /* Not there. Oh well... */
- switch (setup_type) {
- case UI_TEXT:
- title(setup_titles[msgpos]);
- print_setup(msgpos);
- if (msgpos==11) dump_access_levels();
- printf("This is currently set to:\n%s\n",str);
- printf("Enter new value or press return to leave unchanged:\n");
- fgets(buf, 4096, stdin);
- buf[strlen(buf)-1] = 0;
- if (strlen(buf)!=0) strcpy(str,buf);
- break;
- case UI_DIALOG:
- get_setup_msg(setupmsg, msgpos);
- sprintf(buf,
- "dialog --title \"%s\" --inputbox \"\n%s\n\" 20 80 \"%s\" 2>%s",
- setup_titles[msgpos],
- setupmsg,
- str, tempfile);
- if (system(buf)==0) {
- fp = fopen(tempfile, "rb");
- fgets(str, 4095, fp);
- fclose(fp);
- if (strlen(str)>0)
- if (str[strlen(str)-1]==10)
- str[strlen(str)-1]=0;
- }
- break;
-#ifdef CURSES_INC
- case UI_CURSES:
- clear();
- move(1, ((80-strlen(setup_titles[msgpos]))/2) );
- standout();
- printw("%s", setup_titles[msgpos]);
- standend();
- move(3, 0);
- get_setup_msg(setupmsg, msgpos);
- printw("%s", setupmsg);
- refresh();
- getlin(20, 0, str, 80);
- break;
-#endif
- }
+ while (fgets(buf, sizeof buf, fp) != NULL) {
+ if (strstr(buf, setup_directory) != NULL) already_citadel = 1;
}
+ fclose(fp);
+ if (already_citadel) return; /* Already set up this way. */
-void set_int_val(msgpos, ip)
-int msgpos;
-int *ip; {
- char buf[16];
- sprintf(buf,"%d",(int)*ip);
- set_str_val(msgpos, buf);
- *ip = atoi(buf);
- }
+ /* Otherwise, prompt the user to create an entry. */
+ 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"
+ );
+ if (yesno(buf) == 0)
+ return;
+ fp = fopen(filename, "w");
+ fprintf(fp,
+ "# description: telnet service for Citadel users\n"
+ "service telnet\n"
+ "{\n"
+ " disable = no\n"
+ " flags = REUSE\n"
+ " socket_type = stream\n"
+ " wait = no\n"
+ " user = root\n"
+ " server = /usr/sbin/in.telnetd\n"
+ " server_args = -h -L %s/citadel\n"
+ " log_on_failure += USERID\n"
+ "}\n",
+ setup_directory
+ );
+ fclose(fp);
-void set_char_val(msgpos, ip)
-int msgpos;
-char *ip; {
- char buf[16];
- sprintf(buf,"%d",(int)*ip);
- set_str_val(msgpos, buf);
- *ip = (char)atoi(buf);
- }
+ /* Now try to restart the service */
+ system("/etc/init.d/xinetd restart >/dev/null 2>&1");
+}
-void set_long_val(msgpos, ip)
-int msgpos;
-long *ip; {
- char buf[16];
- sprintf(buf,"%ld",*ip);
- set_str_val(msgpos, buf);
- *ip = atol(buf);
+
+/*
+ * Offer to disable other MTA's
+ */
+void disable_other_mta(char *mta) {
+ char buf[SIZ];
+ FILE *fp;
+ int lines = 0;
+
+ sprintf(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);
+ fp = popen(buf, "r");
+ if (fp == NULL) return;
+
+ while (fgets(buf, sizeof buf, fp) != NULL) {
+ ++lines;
}
+ 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
+ );
+ if (yesno(buf) == 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);
+ system(buf);
+ sprintf(buf, "/etc/init.d/%s stop >/dev/null 2>&1", mta);
+ system(buf);
+}
-int yesno_s(question) {
- int a;
- char buf[4096];
- char tempfile[64];
+
+
+/*
+ * Check to see if our server really works. Returns 0 on success.
+ */
+int test_server(void) {
+ 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());
+
+ sprintf(cmd, "%s/sendcommand -h%s ECHO %s 2>&1",
+ setup_directory,
+ setup_directory,
+ 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(char *prompt_title, char *prompt_text, char *str)
+{
+#ifdef HAVE_NEWT
+ newtComponent form;
+ char *result;
+ int i;
+ int prompt_window_height = 0;
+#endif
+ char buf[SIZ];
+ char setupmsg[SIZ];
+ char *dialog_result;
+ FILE *fp = NULL;
+
+ strcpy(setupmsg, "");
- sprintf(tempfile, "/tmp/setup.%d", getpid());
switch (setup_type) {
-
- case UI_TEXT:
- a=yesno(question);
- if (a==1) a=yesno("Are you SURE you want to reinitialize this file? ");
- return(a);
- break;
-
- case UI_CURSES:
- a=yesno(question);
- if (a==1) a=yesno("Are you SURE you want to reinitialize this file? ");
- return(a);
- break;
-
- case UI_DIALOG:
- a = yesno(question);
- if (a==0) return(a);
- sprintf(buf, "dialog --title \"Confirm file overwrite\" --menu \"\nAre you SURE you want to reinitialize this file?\n\" 13 80 2 NO \"No, don't overwrite\" YES \"Yes, overwrite the existing file\" 2>%s", tempfile);
- a = system(buf);
- if (a != 0) return(0);
- fp = fopen(tempfile, "rb");
- fgets(buf, 4095, fp);
+ case UI_TEXT:
+ title(prompt_title);
+ printf("\n%s\n", prompt_text);
+ printf("This is currently set to:\n%s\n", str);
+ printf("Enter new value or press return to leave unchanged:\n");
+ fgets(buf, sizeof buf, stdin);
+ buf[strlen(buf) - 1] = 0;
+ if (strlen(buf) != 0)
+ strcpy(str, buf);
+ break;
+
+ case UI_DIALOG:
+ dialog_result = tmpnam(NULL);
+ sprintf(buf, "exec %s --backtitle '%s' --inputbox '%s' 19 72 '%s' 2>%s",
+ getenv("CTDL_DIALOG"),
+ prompt_title,
+ prompt_text,
+ str,
+ dialog_result);
+ system(buf);
+ fp = fopen(dialog_result, "r");
+ if (fp != NULL) {
+ fgets(str, sizeof buf, fp);
+ if (str[strlen(str)-1] == 10) {
+ str[strlen(str)-1] = 0;
+ }
fclose(fp);
- if (strlen(buf)>0)
- if (buf[strlen(buf)-1]==10)
- buf[strlen(buf)-1]=0;
- return( (!strcmp(buf, "YES")) ? 1 : 0 );
- break;
-
+ unlink(dialog_result);
}
+ break;
+
+#ifdef HAVE_NEWT
+ case UI_NEWT:
+
+ prompt_window_height = num_tokens(prompt_text, '\n') + 5 ;
+ newtCenteredWindow(76,
+ prompt_window_height,
+ prompt_title);
+ form = newtForm(NULL, NULL, 0);
+ for (i=0; i<num_tokens(prompt_text, '\n'); ++i) {
+ extract_token(buf, prompt_text, i, '\n', sizeof buf);
+ newtFormAddComponent(form, newtLabel(1, 1+i, buf));
+ }
+ newtFormAddComponent(form,
+ newtEntry(1,
+ (prompt_window_height - 2),
+ str,
+ 74,
+ &result,
+ NEWT_FLAG_RETURNEXIT)
+ );
+ newtRunForm(form);
+ strcpy(str, result);
+
+ newtPopWindow();
+ newtFormDestroy(form);
- return(0); /* just in case */
+#endif
}
+}
+void set_str_val(int msgpos, char *str) {
+ strprompt(setup_titles[msgpos], setup_text[msgpos], str);
+}
-void edit_value(curr)
-int curr; {
- int a;
-
- switch(curr) {
-case 1:
- set_str_val(curr, config.c_nodename);
- break;
-case 2:
- set_str_val(curr, config.c_fqdn);
- break;
+void set_int_val(int msgpos, int *ip)
+{
+ char buf[16];
+ snprintf(buf, sizeof buf, "%d", (int) *ip);
+ set_str_val(msgpos, buf);
+ *ip = atoi(buf);
+}
-case 3:
- set_str_val(curr, config.c_humannode);
- break;
-case 4:
- set_str_val(curr, config.c_phonenum);
- break;
+void set_char_val(int msgpos, char *ip)
+{
+ char buf[16];
+ snprintf(buf, sizeof buf, "%d", (int) *ip);
+ set_str_val(msgpos, buf);
+ *ip = (char) atoi(buf);
+}
-case 5:
- set_str_val(curr, config.c_bbs_city);
- break;
-case 6:
- set_str_val(curr, config.c_sysadm);
- break;
+void set_long_val(int msgpos, long int *ip)
+{
+ char buf[16];
+ snprintf(buf, sizeof buf, "%ld", *ip);
+ set_str_val(msgpos, buf);
+ *ip = atol(buf);
+}
-case 7:
- set_int_val(curr, &config.c_bbsuid);
- break;
-/*
-case 8:
- set_int_val(curr, &config.c_pwcrypt);
- break;
-*/
-
-case 9:
- set_char_val(curr, &config.c_creataide);
- break;
-
-case 10:
- set_int_val(curr, &config.c_sleeping);
- break;
-
-case 11:
- set_char_val(curr, &config.c_initax);
- break;
-
-case 12:
- set_char_val(curr, &config.c_regiscall);
- break;
-
-case 13:
- set_char_val(curr, &config.c_twitdetect);
- break;
-
-case 14:
- set_str_val(curr, config.c_twitroom);
- break;
-
-case 15:
- set_int_val(curr, &config.c_maxsessions);
- break;
-
-case 16:
- set_str_val(curr, config.c_moreprompt);
- break;
-
-case 17:
- set_char_val(curr, &config.c_restrict);
- break;
-
-case 18:
- set_str_val(curr, config.c_bucket_dir);
- config.c_bucket_dir[14] = 0;
- for (a=0; a<strlen(config.c_bucket_dir); ++a)
- if (!isalpha(config.c_bucket_dir[a]))
- strcpy(&config.c_bucket_dir[a],
- &config.c_bucket_dir[a+1]);
- break;
-
-case 19:
- set_str_val(curr, config.c_net_password);
- break;
-
-case 20:
- set_int_val(curr, &config.c_port_number);
- break;
-
-
- }
+void edit_value(int curr)
+{
+ int i;
+ struct passwd *pw;
+ char ctdluidname[SIZ];
+
+ switch (curr) {
+
+ case 1:
+ set_str_val(curr, config.c_sysadm);
+ break;
+
+ case 2:
+#ifdef __CYGWIN__
+ config.c_ctdluid = 0; /* XXX Windows hack, prob. insecure */
+#else
+ i = config.c_ctdluid;
+ pw = getpwuid(i);
+ if (pw == NULL) {
+ set_int_val(curr, &i);
+ config.c_ctdluid = i;
+ }
+ else {
+ strcpy(ctdluidname, pw->pw_name);
+ set_str_val(curr, ctdluidname);
+ pw = getpwnam(ctdluidname);
+ if (pw != NULL) {
+ config.c_ctdluid = pw->pw_uid;
+ }
+ else if (atoi(ctdluidname) > 0) {
+ config.c_ctdluid = atoi(ctdluidname);
+ }
+ }
+#endif
+ break;
+
+ case 3:
+ set_str_val(curr, config.c_ip_addr);
+ break;
+
+ case 4:
+ set_int_val(curr, &config.c_port_number);
+ break;
+
+
+ }
}
/*
* (re-)write the config data to disk
*/
-void write_config_to_disk() {
+void write_config_to_disk(void)
+{
FILE *fp;
+ int fd;
- fp=fopen("citadel.config","wb");
- if (fp==NULL) {
+ if ((fd = creat("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);
- }
- fwrite((char *)&config,sizeof(struct config),1,fp);
- fclose(fp);
}
+ fwrite((char *) &config, sizeof(struct config), 1, fp);
+ fclose(fp);
+}
/*
* Figure out what type of user interface we're going to use
*/
-int discover_ui() {
-
-#ifdef CURSES_INC
- return UI_CURSES;
-#endif
+int discover_ui(void)
+{
- if (system("dialog -h </dev/null 2>&1 |grep Savio")==0) {
+ /* Use "dialog" if we have it */
+ if (getenv("CTDL_DIALOG") != NULL) {
return UI_DIALOG;
- }
+ }
+
+#ifdef HAVE_NEWT
+ newtInit();
+ newtCls();
+ newtDrawRootText(0, 0, "Citadel Setup");
+ return UI_NEWT;
+#endif
return UI_TEXT;
- }
+}
-void main(int argc, char *argv[]) {
+int main(int argc, char *argv[])
+{
int a;
int curr;
char aaa[128];
FILE *fp;
int old_setup_level = 0;
int info_only = 0;
+ struct utsname my_utsname;
+ struct passwd *pw;
+ struct hostent *he;
+ gid_t gid;
/* set an invalid setup type */
setup_type = (-1);
+ /* Check to see if we're running the web installer */
+ if (getenv("CITADEL_INSTALLER") != NULL) {
+ using_web_installer = 1;
+ }
+
/* parse command line args */
- for (a=0; a<argc; ++a) {
+ for (a = 0; a < argc; ++a) {
if (!strncmp(argv[a], "-u", 2)) {
strcpy(aaa, argv[a]);
strcpy(aaa, &aaa[2]);
setup_type = atoi(aaa);
- }
+ }
if (!strcmp(argv[a], "-i")) {
info_only = 1;
- }
}
+ if (!strcmp(argv[a], "-q")) {
+ setup_type = UI_SILENT;
+ }
+ }
/* If a setup type was not specified, try to determine automatically
*/
if (setup_type < 0) {
setup_type = discover_ui();
- }
-
-#ifdef CURSES_INC
- if (setup_type == UI_CURSES) {
- initscr();
- raw();
- noecho();
- }
-#endif
-
+ }
if (info_only == 1) {
- important_message("Citadel/UX Setup", CITADEL);
+ important_message("Citadel Setup", CITADEL);
cleanup(0);
- }
+ }
+
+ /* Get started in a valid setup directory. */
+ strcpy(setup_directory, CTDLDIR);
+ if ( (using_web_installer) && (getenv("CITADEL") != NULL) ) {
+ strcpy(setup_directory, getenv("CITADEL"));
+ }
+ else {
+ set_str_val(0, setup_directory);
+ }
- strcpy(setup_directory, BBSDIR);
- set_str_val(0, setup_directory);
if (chdir(setup_directory) != 0) {
- important_message("Citadel/UX Setup",
- "The directory you specified does not exist.");
+ important_message("Citadel Setup",
+ "The directory you specified does not exist.");
cleanup(errno);
- }
+ }
+ /* Determine our host name, in case we need to use it as a default */
+ uname(&my_utsname);
- switch(setup_type) {
-
- case UI_TEXT:
- printf("\n\n\n *** Citadel/UX setup program ***\n\n");
- break;
-
- case UI_DIALOG:
- system("exec clear");
- break;
-
- }
+ /* See if we need to shut down the Citadel service. */
+ for (a=0; a<=3; ++a) {
+ progress("Shutting down the Citadel service...", a, 3);
+ if (a == 0) shutdown_citserver();
+ sleep(1);
+ }
+
+ /* Make sure it's stopped. */
+ if (test_server() == 0) {
+ important_message("Citadel Setup",
+ "The Citadel service is still running.\n"
+ "Please stop the service manually and run "
+ "setup again.");
+ cleanup(1);
+ }
+
+ /* Now begin. */
+ switch (setup_type) {
+
+ case UI_TEXT:
+ printf("\n\n\n"
+ " *** Citadel setup program ***\n\n");
+ break;
+
+ }
/*
- * What we're going to try to do here is append a whole bunch of
+ * 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. (Neat, eh?)
+ * completely new copy.
*/
- fp=fopen("citadel.config","ab");
- if (fp==NULL) {
+ if ((a = open("citadel.config", O_WRONLY | O_CREAT | O_APPEND,
+ S_IRUSR | S_IWUSR)) == -1) {
display_error("setup: cannot append citadel.config");
cleanup(errno);
- }
- for (a=0; a<sizeof(struct config); ++a) putc(0,fp);
+ }
+ 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("citadel.config","rb");
- if (fp==NULL) {
+ fp = fopen("citadel.config", "rb");
+ if (fp == NULL) {
display_error("setup: cannot open citadel.config");
cleanup(errno);
- }
- fread((char *)&config,sizeof(struct config),1,fp);
+ }
+ fread((char *) &config, sizeof(struct config), 1, fp);
fclose(fp);
-
/* set some sample/default values in place of blanks... */
- if (strlen(config.c_nodename)==0)
- strcpy(config.c_nodename,"mysystem");
- if (strlen(config.c_fqdn)==0)
- sprintf(config.c_fqdn,"%s.UUCP",config.c_nodename);
- if (strlen(config.c_humannode)==0)
- strcpy(config.c_humannode,"My System");
- if (strlen(config.c_phonenum)==0)
- strcpy(config.c_phonenum,"US 800 555 1212");
- if (config.c_initax == 0)
- config.c_initax = 1;
- if (strlen(config.c_moreprompt)==0)
- strcpy(config.c_moreprompt,"<more>");
- if (strlen(config.c_twitroom)==0)
- strcpy(config.c_twitroom,"Trashcan");
- if (strlen(config.c_bucket_dir)==0)
- strcpy(config.c_bucket_dir,"bitbucket");
- if (strlen(config.c_net_password)==0)
- strcpy(config.c_net_password,"netpassword");
+ if (strlen(config.c_nodename) == 0)
+ safestrncpy(config.c_nodename, my_utsname.nodename,
+ sizeof config.c_nodename);
+ strtok(config.c_nodename, ".");
+ if (strlen(config.c_fqdn) == 0) {
+ if ((he = gethostbyname(my_utsname.nodename)) != NULL)
+ safestrncpy(config.c_fqdn, he->h_name,
+ sizeof config.c_fqdn);
+ else
+ safestrncpy(config.c_fqdn, my_utsname.nodename,
+ sizeof config.c_fqdn);
+ }
+ if (strlen(config.c_humannode) == 0)
+ strcpy(config.c_humannode, "My System");
+ if (strlen(config.c_phonenum) == 0)
+ strcpy(config.c_phonenum, "US 800 555 1212");
+ if (config.c_initax == 0) {
+ config.c_initax = 4;
+ }
+ if (strlen(config.c_moreprompt) == 0)
+ strcpy(config.c_moreprompt, "<more>");
+ if (strlen(config.c_twitroom) == 0)
+ strcpy(config.c_twitroom, "Trashcan");
+ if (strlen(config.c_baseroom) == 0)
+ strcpy(config.c_baseroom, "Lobby");
+ if (strlen(config.c_aideroom) == 0)
+ strcpy(config.c_aideroom, "Aide");
if (config.c_port_number == 0) {
config.c_port_number = 504;
- }
- if (config.c_ipgm_secret == 0) {
- srand(getpid());
- config.c_ipgm_secret = rand();
- }
+ }
if (config.c_sleeping == 0) {
config.c_sleeping = 900;
- }
+ }
+ if (config.c_ctdluid == 0) {
+ pw = getpwnam("citadel");
+ if (pw != NULL)
+ config.c_ctdluid = pw->pw_uid;
+ }
+ if (config.c_ctdluid == 0) {
+ pw = getpwnam("bbs");
+ if (pw != NULL)
+ config.c_ctdluid = pw->pw_uid;
+ }
+ if (config.c_ctdluid == 0) {
+ pw = getpwnam("guest");
+ if (pw != NULL)
+ config.c_ctdluid = pw->pw_uid;
+ }
+ if (config.c_createax == 0) {
+ config.c_createax = 3;
+ }
+ /*
+ * Negative values for maxsessions are not allowed.
+ */
+ if (config.c_maxsessions < 0) {
+ config.c_maxsessions = 0;
+ }
+ /* We need a system default message expiry policy, because this is
+ * the top level and there's no 'higher' policy to fall back on.
+ */
+ if (config.c_ep.expire_mode == 0) {
+ config.c_ep.expire_mode = EXPIRE_NUMMSGS;
+ config.c_ep.expire_value = 150;
+ }
+
+ /*
+ * 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;
/* Go through a series of dialogs prompting for config info */
- for (curr = 1; curr <= MAXSETUP; ++curr) {
- edit_value(curr);
+ if (setup_type != UI_SILENT) {
+ for (curr = 1; curr <= MAXSETUP; ++curr) {
+ edit_value(curr);
}
+ }
/*
- if (setuid(config.c_bbsuid) != 0) {
- important_message("Citadel/UX Setup",
- "Failed to change the user ID to your BBS user.");
- cleanup(errno);
- }
- */
+ if (setuid(config.c_ctdluid) != 0) {
+ important_message("Citadel Setup",
+ "Failed to change the user ID to your Citadel user.");
+ cleanup(errno);
+ }
+ */
- /***** begin version update section ***** */
+/***** begin version update section ***** */
/* take care of any updating that is necessary */
old_setup_level = config.c_setup_level;
- if (old_setup_level == 0) goto NEW_INST;
-
- if (old_setup_level < 323) {
- important_message("Citadel/UX Setup",
- "This Citadel/UX installation is too old to be upgraded.");
- cleanup(1);
- }
+ if (old_setup_level == 0) {
+ goto NEW_INST;
+ }
+ if (old_setup_level < 555) {
+ important_message("Citadel Setup",
+ "This Citadel installation is too old "
+ "to be upgraded.");
+ cleanup(1);
+ }
write_config_to_disk();
- if ((config.c_setup_level / 10) == 32) {
- important_msgnum(31);
- cleanup(0);
- }
-
- if (config.c_setup_level < 400) {
- config.c_setup_level = 400;
- }
-
- /* end of 3.23 -> 4.00 update section */
-
- /* end of 4.00 -> 4.02 update section */
-
old_setup_level = config.c_setup_level;
/* end of version update section */
NEW_INST:
config.c_setup_level = REV_LEVEL;
+
+/******************************************/
+
write_config_to_disk();
- system("mkdir info 2>/dev/null"); /* Create these */
- system("mkdir bio 2>/dev/null");
- system("mkdir userpics 2>/dev/null");
- system("mkdir messages 2>/dev/null");
- system("mkdir help 2>/dev/null");
- system("mkdir images 2>/dev/null");
- sprintf(aaa,"mkdir %s 2>/dev/null",config.c_bucket_dir);
+ mkdir("info", 0700);
+ chmod("info", 0700);
+ mkdir("bio", 0700);
+ chmod("bio", 0700);
+ mkdir("userpics", 0700);
+ chmod("userpics", 0700);
+ mkdir("messages", 0700);
+ chmod("messages", 0700);
+ mkdir("help", 0700);
+ chmod("help", 0700);
+ mkdir("images", 0700);
+ chmod("images", 0700);
+ mkdir("netconfigs", 0700);
+ chmod("netconfigs", 0700);
+
+ /* Delete files and directories used by older Citadel versions */
+ system("exec /bin/rm -fr ./rooms ./chatpipes ./expressmsgs ./sessions 2>/dev/null");
+ unlink("citadel.log");
+ unlink("weekly");
+
+ check_services_entry(); /* Check /etc/services */
+#ifndef __CYGWIN__
+ check_inittab_entry(); /* Check /etc/inittab */
+ check_xinetd_entry(); /* Check /etc/xinetd.d/telnet */
+
+ /* Offer to disable other MTA's on the system. */
+ disable_other_mta("sendmail");
+ disable_other_mta("postfix");
+ disable_other_mta("qmail");
+ disable_other_mta("cyrus");
+ disable_other_mta("cyrmaster");
+ disable_other_mta("saslauthd");
+ disable_other_mta("mta");
+ disable_other_mta("courier-imap");
+ disable_other_mta("courier-imap-ssl");
+ disable_other_mta("courier-authdaemon");
+ disable_other_mta("courier-pop3");
+ disable_other_mta("courier-pop3d");
+ disable_other_mta("courier-pop");
+ disable_other_mta("vmailmgrd");
+ disable_other_mta("imapd");
+ disable_other_mta("popd");
+ disable_other_mta("pop3d");
+ disable_other_mta("exim");
+ disable_other_mta("dovecot");
+ disable_other_mta("hula");
+#endif
+
+ if ((pw = getpwuid(config.c_ctdluid)) == NULL)
+ gid = getgid();
+ else
+ gid = pw->pw_gid;
+
+ progress("Setting file permissions", 0, 4);
+ chown(".", config.c_ctdluid, gid);
+ sleep(1);
+ progress("Setting file permissions", 1, 4);
+ chown("citadel.config", config.c_ctdluid, gid);
+ sleep(1);
+ progress("Setting file permissions", 2, 4);
+ snprintf(aaa, sizeof aaa,
+ "find . | grep -v chkpwd | xargs chown %ld:%ld 2>/dev/null",
+ (long)config.c_ctdluid, (long)gid);
system(aaa);
+ sleep(1);
+ progress("Setting file permissions", 3, 4);
+ chmod("citadel.config", S_IRUSR | S_IWUSR);
+ sleep(1);
+ progress("Setting file permissions", 4, 4);
+
+#ifdef HAVE_LDAP
+ /* Contemplate the possibility of auto-configuring OpenLDAP */
+ contemplate_ldap();
+#endif
+ /* See if we can start the Citadel service. */
+ if (strlen(citserver_init_entry) > 0) {
+ for (a=0; a<=3; ++a) {
+ progress("Starting the Citadel service...", a, 3);
+ if (a == 0) start_citserver();
+ sleep(1);
+ }
+ if (test_server() == 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");
+ }
+ else {
+ important_message("Setup finished",
+ "Setup is finished, but the Citadel service "
+ "failed to start.\n"
+ "Go back and check your configuration.");
+ }
+ }
+ else {
+ important_message("Setup finished",
+ "Setup is finished. You may now start the server.");
+ }
- system("rm -fr ./chatpipes 2>/dev/null"); /* Don't need these */
- system("rm -fr ./expressmsgs 2>/dev/null");
- unlink("sessions");
+ cleanup(0);
+ return 0;
+}
- check_services_entry(); /* Check /etc/services */
- check_inittab_entry(); /* Check /etc/inittab */
- progress("Setting file permissions", 0, 3);
- chown(".", config.c_bbsuid, getgid());
- progress("Setting file permissions", 1, 3);
- chown("citadel.config", config.c_bbsuid, getgid());
- progress("Setting file permissions", 2, 3);
- sprintf(aaa, "find . -exec chown %d {} \\; 2>/dev/null",
- config.c_bbsuid);
- system(aaa);
- progress("Setting file permissions", 3, 3);
+#ifdef HAVE_LDAP
+/*
+ * If we're in the middle of an Easy Install, we might just be able to
+ * auto-configure a standalone OpenLDAP server.
+ */
+void contemplate_ldap(void) {
+ char question[SIZ];
+ char slapd_init_entry[SIZ];
+ FILE *fp;
- important_message("Setup finished",
- "Setup is finished. You may now start the Citadel server.");
+ /* If conditions are not ideal, give up on this idea... */
+ if (using_web_installer == 0) return;
+ if (getenv("LDAP_CONFIG") == NULL) return;
+ if (getenv("SUPPORT") == NULL) return;
+ if (getenv("SLAPD_BINARY") == NULL) return;
+ if (getenv("CITADEL") == NULL) return;
+
+ /* And if inittab is already starting slapd, bail out... */
+ locate_init_entry(slapd_init_entry, getenv("SLAPD_BINARY"));
+ if (strlen(slapd_init_entry) > 0) {
+ important_message("Citadel Setup",
+ "You appear to already have a standalone LDAP "
+ "service\nconfigured for use with Citadel. No "
+ "changes will be made.\n");
+ /* set_init_entry(slapd_init_entry, "off"); */
+ return;
+ }
+ /* Generate a unique entry name for slapd if we don't have one. */
+ else {
+ generate_entry_name(slapd_init_entry);
+ }
+
+ /* Ask the user if it's ok to set up slapd automatically. */
+ snprintf(question, sizeof question,
+ "\n"
+ "Do you want this computer configured to start a standalone\n"
+ "LDAP service automatically? (If you answer yes, a new\n"
+ "slapd.conf will be written, and an /etc/inittab entry\n"
+ "pointing to %s will be added.)\n"
+ "\n",
+ getenv("SLAPD_BINARY")
+ );
+ if (yesno(question) == 0)
+ return;
+
+ strcpy(config.c_ldap_base_dn, "dc=example,dc=com");
+ strprompt("Base DN",
+ "\n"
+ "Please enter the Base DN for your directory. This will\n"
+ "generally be something based on the primary DNS domain in\n"
+ "which you receive mail, but it does not have to be. Your\n"
+ "LDAP tree will be built using this Distinguished Name.\n"
+ "\n",
+ config.c_ldap_base_dn
+ );
+
+ strcpy(config.c_ldap_host, "localhost");
+ config.c_ldap_port = 389;
+ sprintf(config.c_ldap_bind_dn, "cn=manager,%s", config.c_ldap_base_dn);
+
+ /*
+ * Generate a bind password. If you're some grey hat hacker who
+ * is just dying to get some street cred on Bugtraq, and you think
+ * this password generation scheme is too weak, please submit a patch
+ * instead of just whining about it, ok?
+ */
+ sprintf(config.c_ldap_bind_pw, "%d%ld", getpid(), (long)time(NULL));
+
+ write_config_to_disk();
+
+ fp = fopen(getenv("LDAP_CONFIG"), "w");
+ if (fp == NULL) {
+ sprintf(question, "\nCannot create %s:\n%s\n\n"
+ "Citadel will still function, but you will "
+ "not have an LDAP service.\n\n",
+ getenv("LDAP_CONFIG"),
+ strerror(errno)
+ );
+ important_message("Error", question);
+ return;
+ }
+
+ fprintf(fp, "include %s/citadel-openldap.schema\n",
+ getenv("CITADEL"));
+ fprintf(fp, "pidfile %s/openldap-data/slapd.pid\n",
+ getenv("CITADEL"));
+ fprintf(fp, "argsfile %s/openldap-data/slapd.args\n",
+ getenv("CITADEL"));
+ fprintf(fp, "allow bind_v2\n"
+ "database bdb\n"
+ "schemacheck off\n"
+ );
+ fprintf(fp, "suffix \"%s\"\n", config.c_ldap_base_dn);
+ fprintf(fp, "rootdn \"%s\"\n", config.c_ldap_bind_dn);
+ fprintf(fp, "rootpw %s\n", config.c_ldap_bind_pw);
+ fprintf(fp, "directory %s/openldap-data\n",
+ getenv("CITADEL"));
+ fprintf(fp, "index objectClass eq\n");
+
+ fclose(fp);
+
+ /* This is where our OpenLDAP server will keep its data. */
+ mkdir("openldap-data", 0700);
+
+ /* Now write it out to /etc/inittab.
+ * FIXME make it run as some non-root user.
+ * The "-d 0" seems superfluous, but it's actually a way to make
+ * slapd run in the foreground without spewing messages to the console.
+ */
+ fp = fopen("/etc/inittab", "a");
+ if (fp == NULL) {
+ display_error(strerror(errno));
+ } else {
+ fprintf(fp, "# Start the OpenLDAP server for Citadel...\n");
+ fprintf(fp, "%s:2345:respawn:%s -d 0 -f %s\n",
+ slapd_init_entry,
+ getenv("SLAPD_BINARY"),
+ getenv("LDAP_CONFIG")
+ );
+ fclose(fp);
+ }
- cleanup(0);
}
+#endif /* HAVE_LDAP */
projects / citadel.git / blobdiff