2 * citserver's main() function lives here.
4 * Copyright (c) 1987-2017 by the citadel.org team
6 * This program is open source software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 3.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
17 #include <sys/types.h>
21 #include <libcitadel.h>
23 #include "citserver.h"
24 #include "svn_revision.h"
25 #include "modules_init.h"
28 #include "serv_extensions.h"
29 #include "citadel_dirs.h"
34 const char *CitadelServiceUDS="citadel-UDS";
35 const char *CitadelServiceTCP="citadel-TCP";
36 void go_threading(void);
40 * Create or remove a lock file, so we only have one Citadel Server running at a time.
42 void ctdl_lockfile(int yo) {
43 static char lockfilename[SIZ];
47 syslog(LOG_DEBUG, "main: creating lockfile");
48 snprintf(lockfilename, sizeof lockfilename, "%s/citadel.lock", ctdl_run_dir);
49 fp = fopen(lockfilename, "w");
51 syslog(LOG_ERR, "%s: %s", lockfilename, strerror(errno));
54 if (flock(fileno(fp), (LOCK_EX|LOCK_NB)) != 0) {
55 syslog(LOG_ERR, "main: cannot lock %s , is another citserver running?", lockfilename);
61 syslog(LOG_DEBUG, "main: removing lockfile");
63 flock(fileno(fp), LOCK_UN);
69 * Here's where it all begins.
71 int main(int argc, char **argv)
75 int a; /* General-purpose variables */
76 struct passwd pw, *pwp = NULL;
78 int drop_root_perms = 1;
82 char relhome[PATH_MAX]="";
83 char ctdldir[PATH_MAX]=CTDLDIR;
84 int syslog_facility = LOG_DAEMON;
86 struct passwd *p = NULL;
88 struct stat filestats;
91 eCrashParameters params;
92 // eCrashSymbolTable symbol_table;
95 /* initialize the master context */
97 InitializeMasterTSD();
99 /* parse command-line arguments */
100 while ((a=getopt(argc, argv, "l:dh:x:t:B:Dru:")) != EOF) switch(a) {
103 safestrncpy(facility, optarg, sizeof(facility));
104 syslog_facility = SyslogFacility(facility);
107 /* run in the background if -d was specified */
109 running_as_daemon = 1;
113 relh = optarg[0] != '/';
115 safestrncpy(ctdl_home_directory, optarg, sizeof ctdl_home_directory);
118 safestrncpy(relhome, optarg, sizeof relhome);
127 case 't': /* deprecated */
129 case 'B': /* Basesize */
130 basesize = atoi(optarg);
137 /* -r tells the server not to drop root permissions.
138 * Don't use this unless you know what you're doing.
144 /* -u tells the server what uid to run under... */
151 p = getpwnam(optarg);
162 /* any other parameter makes it crash and burn */
163 fprintf(stderr, "citserver: usage: "
173 /* Last ditch effort to determine the user name ... if there's a user called "citadel" then use that */
175 p = getpwnam("citadel");
180 p = getpwnam("guest");
190 if ((ctdluid == 0) && (drop_root_perms == 0)) {
191 fprintf(stderr, "citserver: cannot determine user to run as; please specify -r or -u options\n");
192 exit(CTDLEXIT_UNUSER);
195 StartLibCitadel(basesize);
197 ( running_as_daemon ? (LOG_PID) : (LOG_PID | LOG_PERROR) ),
201 calc_dirs_n_files(relh, home, relhome, ctdldir, dbg);
202 /* daemonize, if we were asked to */
203 if (running_as_daemon) {
208 /* Tell 'em who's in da house */
209 syslog(LOG_INFO, " ");
210 syslog(LOG_INFO, " ");
211 syslog(LOG_INFO, "*** Citadel server engine ***\n");
212 syslog(LOG_INFO, "Version %d (build %s) ***", REV_LEVEL, svn_revision());
213 syslog(LOG_INFO, "Copyright (C) 1987-2017 by the Citadel development team.");
214 syslog(LOG_INFO, "This program is distributed under the terms of the GNU General Public License.");
215 syslog(LOG_INFO, " ");
216 syslog(LOG_INFO, "%s", libcitadel_version_string());
219 /* on some dists rundir gets purged on startup. so we need to recreate it. */
221 if (stat(ctdl_run_dir, &filestats)==-1){
222 #ifdef HAVE_GETPWUID_R
223 #ifdef SOLARIS_GETPWUID
224 pwp = getpwuid_r(ctdluid, &pw, pwbuf, sizeof(pwbuf));
225 #else // SOLARIS_GETPWUID
226 getpwuid_r(ctdluid, &pw, pwbuf, sizeof(pwbuf), &pwp);
227 #endif // SOLARIS_GETPWUID
228 #else // HAVE_GETPWUID_R
230 #endif // HAVE_GETPWUID_R
232 if ((mkdir(ctdl_run_dir, 0755) != 0) && (errno != EEXIST)) {
233 syslog(LOG_ERR, "main: unable to create run directory [%s]: %s", ctdl_run_dir, strerror(errno));
236 if (chown(ctdl_run_dir, ctdluid, (pwp==NULL)?-1:pw.pw_gid) != 0) {
237 syslog(LOG_ERR, "main: unable to set the access rights for [%s]: %s", ctdl_run_dir, strerror(errno));
248 * Do non system dependent startup functions.
253 * Check that the control record is correct and place sensible values if it isn't
258 * Run any upgrade entry points
260 syslog(LOG_INFO, "main: upgrading modules");
264 * Load the user for the masterCC or create them if they don't exist
266 if (CtdlGetUser(&masterCC.user, "SYS_Citadel"))
268 /* User doesn't exist. We can't use create user here as the user number needs to be 0 */
269 strcpy (masterCC.user.fullname, "SYS_Citadel") ;
270 CtdlPutUser(&masterCC.user);
271 CtdlGetUser(&masterCC.user, "SYS_Citadel"); /* Just to be safe */
275 * Bind the server to a Unix-domain socket (user client access)
277 CtdlRegisterServiceHook(0,
279 citproto_begin_session,
285 * Bind the server to a Unix-domain socket (admin client access)
287 CtdlRegisterServiceHook(0,
288 file_citadel_admin_socket,
289 citproto_begin_admin_session,
293 chmod(file_citadel_admin_socket, S_IRWXU); /* for your eyes only */
296 * Bind the server to our favorite TCP port (usually 504).
298 CtdlRegisterServiceHook(CtdlGetConfigInt("c_port_number"),
300 citproto_begin_session,
309 * Load any server-side extensions available here.
311 syslog(LOG_INFO, "main: initializing server extensions");
313 initialise_modules(0);
316 * If we need host auth, start our chkpwd daemon.
318 if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_HOST) {
319 start_chkpwd_daemon();
324 * check, whether we're fired up another time after a crash.
325 * if, post an aide message, so the admin has a chance to react.
331 * Now that we've bound the sockets, change to the Citadel user id and its
332 * corresponding group ids
334 if (drop_root_perms) {
335 cdb_chmod_data(); /* make sure we own our data files */
337 #ifdef HAVE_GETPWUID_R
338 #ifdef SOLARIS_GETPWUID
339 pwp = getpwuid_r(ctdluid, &pw, pwbuf, sizeof(pwbuf));
340 #else // SOLARIS_GETPWUID
341 getpwuid_r(ctdluid, &pw, pwbuf, sizeof(pwbuf), &pwp);
342 #endif // SOLARIS_GETPWUID
343 #else // HAVE_GETPWUID_R
345 #endif // HAVE_GETPWUID_R
348 syslog(LOG_ERR, "main: WARNING, getpwuid(%ld): %s" "Group IDs will be incorrect.", (long)CTDLUID, strerror(errno));
350 initgroups(pw.pw_name, pw.pw_gid);
351 if (setgid(pw.pw_gid))
352 syslog(LOG_ERR, "main: setgid(%ld): %s", (long)pw.pw_gid, strerror(errno));
354 syslog(LOG_INFO, "main: changing uid to %ld", (long)CTDLUID);
355 if (setuid(CTDLUID) != 0) {
356 syslog(LOG_ERR, "main: setuid() failed: %s", strerror(errno));
358 #if defined (HAVE_SYS_PRCTL_H) && defined (PR_SET_DUMPABLE)
359 prctl(PR_SET_DUMPABLE, 1);
363 /* We want to check for idle sessions once per minute */
364 CtdlRegisterSessionHook(terminate_idle_sessions, EVT_TIMER, PRIO_CLEANUP + 1);
368 int exit_code = master_cleanup(exit_signal);