* merge in much of the dav_rework branch: (the drift was becoming to big, no function...
[citadel.git] / webcit / webserver.c
index c70419b3be0d405c982abfbf537168a50109ca49..e05dffddfa8764e1012a0407306d349f18ba3099 100644 (file)
 #include "webcit.h"
 #include "webserver.h"
 
-#if HAVE_BACKTRACE
-#include <execinfo.h>
-#endif
 #include "modules_init.h"
 #ifndef HAVE_SNPRINTF
 int vsnprintf(char *buf, size_t max, const char *fmt, va_list argp);
 #endif
 
-int verbosity = 9;             /* Logging level */
-int msock;                     /* master listening socket */
+
+extern int msock;                      /* master listening socket */
+extern int verbosity;          /* Logging level */
+extern char static_icon_dir[PATH_MAX];          /* where should we find our mime icons */
+
 int is_https = 0;              /* Nonzero if I am an HTTPS service */
 int follow_xff = 0;            /* Follow X-Forwarded-For: header */
 int home_specified = 0;                /* did the user specify a homedir? */
-int time_to_die = 0;            /* Nonzero if server is shutting down */
 int DisableGzip = 0;
-extern void *context_loop(ParsedHttpHdrs *Hdr);
-extern void *housekeeping_loop(void);
 extern pthread_mutex_t SessionListMutex;
 extern pthread_key_t MyConKey;
 
+extern void *housekeeping_loop(void);
 extern int ig_tcp_server(char *ip_addr, int port_number, int queue_len);
 extern int ig_uds_server(char *sockpath, int queue_len);
+extern void graceful_shutdown_watcher(int signum);
+extern void graceful_shutdown(int signum);
+extern void start_daemon(char *pid_file);
+extern void webcit_calc_dirs_n_files(int relh, const char *basedir, int home, char *webcitdir, char *relhome);
 
 extern void drop_root(uid_t UID);
 
-char ctdl_key_dir[PATH_MAX]=SSL_DIR;
-char file_crpt_file_key[PATH_MAX]="";
-char file_crpt_file_csr[PATH_MAX]="";
-char file_crpt_file_cer[PATH_MAX]="";
-
 char socket_dir[PATH_MAX];                     /* where to talk to our citadel server */
-const char editor_absolut_dir[PATH_MAX]=EDITORDIR;     /* nailed to what configure gives us. */
-char static_dir[PATH_MAX];             /* calculated on startup */
-char static_local_dir[PATH_MAX];               /* calculated on startup */
-char static_icon_dir[PATH_MAX];          /* where should we find our mime icons? */
-char  *static_dirs[]={                         /* needs same sort order as the web mapping */
-       (char*)static_dir,                      /* our templates on disk */
-       (char*)static_local_dir,                /* user provided templates disk */
-       (char*)editor_absolut_dir,              /* the editor on disk */
-       (char*)static_icon_dir                  /* our icons... */
-};
-
-/*
- * Subdirectories from which the client may request static content
- *
- * (If you add more, remember to increment 'ndirs' below)
- */
-char *static_content_dirs[] = {
-       "static",                     /* static templates */
-       "static.local",               /* site local static templates */
-       "tiny_mce"                    /* rich text editor */
-};
-
-int ndirs=3;
-
 
 char *server_cookie = NULL;    /* our Cookie connection to the client */
 int http_port = PORT_NUM;      /* Port to listen on */
@@ -79,177 +52,9 @@ int running_as_daemon = 0;  /* should we deamonize on startup? */
 
 
 
-/*
- * Shut us down the regular way.
- * signum is the signal we want to forward
- */
-pid_t current_child;
-void graceful_shutdown_watcher(int signum) {
-       lprintf (1, "bye; shutting down watcher.");
-       kill(current_child, signum);
-       if (signum != SIGHUP)
-               exit(0);
-}
-
-
-
-
-/*
- * Shut us down the regular way.
- * signum is the signal we want to forward
- */
-pid_t current_child;
-void graceful_shutdown(int signum) {
-       FILE *FD;
-       int fd;
-
-       lprintf (1, "WebCit is being shut down on signal %d.\n", signum);
-       fd = msock;
-       msock = -1;
-       time_to_die = 1;
-       FD=fdopen(fd, "a+");
-       fflush (FD);
-       fclose (FD);
-       close(fd);
-}
-
-
-/*
- * Start running as a daemon.
- */
-void start_daemon(char *pid_file) 
-{
-       int status = 0;
-       pid_t child = 0;
-       FILE *fp;
-       int do_restart = 0;
-       int rv;
-       FILE *rvfp = NULL;
-
-       current_child = 0;
-
-       /* Close stdin/stdout/stderr and replace them with /dev/null.
-        * We don't just call close() because we don't want these fd's
-        * to be reused for other files.
-        */
-       rv = chdir("/");
-
-       signal(SIGHUP, SIG_IGN);
-       signal(SIGINT, SIG_IGN);
-       signal(SIGQUIT, SIG_IGN);
-
-       child = fork();
-       if (child != 0) {
-               exit(0);
-       }
-
-       setsid();
-       umask(0);
-       rvfp = freopen("/dev/null", "r", stdin);
-       rvfp = freopen("/dev/null", "w", stdout);
-       rvfp = freopen("/dev/null", "w", stderr);
-       signal(SIGTERM, graceful_shutdown_watcher);
-       signal(SIGHUP, graceful_shutdown_watcher);
-
-       do {
-               current_child = fork();
-
-       
-               if (current_child < 0) {
-                       perror("fork");
-                       ShutDownLibCitadel ();
-                       exit(errno);
-               }
-       
-               else if (current_child == 0) {  /* child process */
-                       signal(SIGHUP, graceful_shutdown);
-
-                       return; /* continue starting webcit. */
-               }
-               else { /* watcher process */
-                       if (pid_file) {
-                               fp = fopen(pid_file, "w");
-                               if (fp != NULL) {
-                                       fprintf(fp, "%d\n", getpid());
-                                       fclose(fp);
-                               }
-                       }
-                       waitpid(current_child, &status, 0);
-               }
-
-               do_restart = 0;
-
-               /* Did the main process exit with an actual exit code? */
-               if (WIFEXITED(status)) {
-
-                       /* Exit code 0 means the watcher should exit */
-                       if (WEXITSTATUS(status) == 0) {
-                               do_restart = 0;
-                       }
-
-                       /* Exit code 101-109 means the watcher should exit */
-                       else if ( (WEXITSTATUS(status) >= 101) && (WEXITSTATUS(status) <= 109) ) {
-                               do_restart = 0;
-                       }
-
-                       /* Any other exit code means we should restart. */
-                       else {
-                               do_restart = 1;
-                       }
-               }
-
-               /* Any other type of termination (signals, etc.) should also restart. */
-               else {
-                       do_restart = 1;
-               }
-
-       } while (do_restart);
-
-       if (pid_file) {
-               unlink(pid_file);
-       }
-       ShutDownLibCitadel ();
-       exit(WEXITSTATUS(status));
-}
-
-/*
- * Spawn an additional worker thread into the pool.
- */
-void spawn_another_worker_thread()
-{
-       pthread_t SessThread;   /* Thread descriptor */
-       pthread_attr_t attr;    /* Thread attributes */
-       int ret;
-
-       lprintf(3, "Creating a new thread.  Pool size is now %d\n", ++num_threads);
-
-       /* set attributes for the new thread */
-       pthread_attr_init(&attr);
-       pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
-
-       /*
-        * Our per-thread stacks need to be bigger than the default size,
-        * otherwise the MIME parser crashes on FreeBSD.
-        */
-       if ((ret = pthread_attr_setstacksize(&attr, 1024 * 1024))) {
-               lprintf(1, "pthread_attr_setstacksize: %s\n",
-                       strerror(ret));
-               pthread_attr_destroy(&attr);
-       }
-
-       /* now create the thread */
-       if (pthread_create(&SessThread, &attr,
-                          (void *(*)(void *)) worker_entry, NULL)
-           != 0) {
-               lprintf(1, "Can't create thread: %s\n", strerror(errno));
-       }
-
-       /* free up the attributes */
-       pthread_attr_destroy(&attr);
-}
-
 /* #define DBG_PRINNT_HOOKS_AT_START */
 #ifdef DBG_PRINNT_HOOKS_AT_START
+extern HashList *HandlerHash;
 const char foobuf[32];
 const char *nix(void *vptr) {snprintf(foobuf, 32, "%0x", (long) vptr); return foobuf;}
 #endif 
@@ -260,57 +65,9 @@ extern StrBuf *I18nDump;
 void InitTemplateCache(void);
 extern int LoadTemplates;
 
-extern HashList *HandlerHash;
 
 
 
-void
-webcit_calc_dirs_n_files(int relh, const char *basedir, int home, char *webcitdir, char *relhome)
-{
-       char dirbuffer[PATH_MAX]="";
-       /* calculate all our path on a central place */
-    /* where to keep our config */
-       
-#define COMPUTE_DIRECTORY(SUBDIR) memcpy(dirbuffer,SUBDIR, sizeof dirbuffer);\
-       snprintf(SUBDIR,sizeof SUBDIR,  "%s%s%s%s%s%s%s", \
-                        (home&!relh)?webcitdir:basedir, \
-             ((basedir!=webcitdir)&(home&!relh))?basedir:"/", \
-             ((basedir!=webcitdir)&(home&!relh))?"/":"", \
-                        relhome, \
-             (relhome[0]!='\0')?"/":"",\
-                        dirbuffer,\
-                        (dirbuffer[0]!='\0')?"/":"");
-       basedir=RUNDIR;
-       COMPUTE_DIRECTORY(socket_dir);
-       basedir=WWWDIR "/static";
-       COMPUTE_DIRECTORY(static_dir);
-       basedir=WWWDIR "/static/icons";
-       COMPUTE_DIRECTORY(static_icon_dir);
-       basedir=WWWDIR "/static.local";
-       COMPUTE_DIRECTORY(static_local_dir);
-       StripSlashes(static_dir, 1);
-       StripSlashes(static_icon_dir, 1);
-       StripSlashes(static_local_dir, 1);
-
-       snprintf(file_crpt_file_key,
-                sizeof file_crpt_file_key, 
-                "%s/citadel.key",
-                ctdl_key_dir);
-       snprintf(file_crpt_file_csr,
-                sizeof file_crpt_file_csr, 
-                "%s/citadel.csr",
-                ctdl_key_dir);
-       snprintf(file_crpt_file_cer,
-                sizeof file_crpt_file_cer, 
-                "%s/citadel.cer",
-                ctdl_key_dir);
-
-       /* we should go somewhere we can leave our coredump, if enabled... */
-       lprintf(9, "Changing directory to %s\n", socket_dir);
-       if (chdir(webcitdir) != 0) {
-               perror("chdir");
-       }
-}
 /*
  * Here's where it all begins.
  */
@@ -599,207 +356,7 @@ int main(int argc, char **argv)
 }
 
 
-void ShutDownWebcit(void)
-{
-       free_zone_directory ();
-       icaltimezone_release_zone_tab ();
-       icalmemory_free_ring ();
-       ShutDownLibCitadel ();
-       shutdown_modules ();
-#ifdef HAVE_OPENSSL
-       if (is_https) {
-               shutdown_ssl();
-       }
-#endif
-}
-
-/*
- * Entry point for worker threads
- */
-void worker_entry(void)
-{
-       int ssock;
-       int i = 0;
-       int fail_this_transaction = 0;
-       int ret;
-       struct timeval tv;
-       fd_set readset, tempset;
-       ParsedHttpHdrs Hdr;
-
-       memset(&Hdr, 0, sizeof(ParsedHttpHdrs));
-       Hdr.HR.eReqType = eGET;
-       http_new_modules(&Hdr); 
-       tv.tv_sec = 0;
-       tv.tv_usec = 10000;
-       FD_ZERO(&readset);
-       FD_SET(msock, &readset);
-
-       do {
-               /* Only one thread can accept at a time */
-               fail_this_transaction = 0;
-               ssock = -1; 
-               errno = EAGAIN;
-               do {
-                       ret = -1; /* just one at once should select... */
-                       begin_critical_section(S_SELECT);
-
-                       FD_ZERO(&tempset);
-                       if (msock > 0) FD_SET(msock, &tempset);
-                       tv.tv_sec = 0;
-                       tv.tv_usec = 10000;
-                       if (msock > 0)  ret = select(msock+1, &tempset, NULL, NULL,  &tv);
-                       end_critical_section(S_SELECT);
-                       if ((ret < 0) && (errno != EINTR) && (errno != EAGAIN))
-                       {/* EINTR and EAGAIN are thrown but not of interest. */
-                               lprintf(2, "accept() failed:%d %s\n",
-                                       errno, strerror(errno));
-                       }
-                       else if ((ret > 0) && (msock > 0) && FD_ISSET(msock, &tempset))
-                       {/* Successfully selected, and still not shutting down? Accept! */
-                               ssock = accept(msock, NULL, 0);
-                       }
-                       
-               } while ((msock > 0) && (ssock < 0)  && (time_to_die == 0));
-
-               if ((msock == -1)||(time_to_die))
-               {/* ok, we're going down. */
-                       int shutdown = 0;
-
-                       /* the first to come here will have to do the cleanup.
-                        * make shure its realy just one.
-                        */
-                       begin_critical_section(S_SHUTDOWN);
-                       if (msock == -1)
-                       {
-                               msock = -2;
-                               shutdown = 1;
-                       }
-                       end_critical_section(S_SHUTDOWN);
-                       if (shutdown == 1)
-                       {/* we're the one to cleanup the mess. */
-                               http_destroy_modules(&Hdr);
-                               lprintf(2, "I'm master shutdown: tagging sessions to be killed.\n");
-                               shutdown_sessions();
-                               lprintf(2, "master shutdown: waiting for others\n");
-                               sleeeeeeeeeep(1); /* wait so some others might finish... */
-                               lprintf(2, "master shutdown: cleaning up sessions\n");
-                               do_housekeeping();
-                               lprintf(2, "master shutdown: cleaning up libical\n");
-
-                               ShutDownWebcit();
-
-                               lprintf(2, "master shutdown exiting!.\n");                              
-                               exit(0);
-                       }
-                       break;
-               }
-               if (ssock < 0 ) continue;
-
-               if (msock < 0) {
-                       if (ssock > 0) close (ssock);
-                       lprintf(2, "inbetween.");
-                       pthread_exit(NULL);
-               } else { /* Got it? do some real work! */
-                       /* Set the SO_REUSEADDR socket option */
-                       i = 1;
-                       setsockopt(ssock, SOL_SOCKET, SO_REUSEADDR,
-                                  &i, sizeof(i));
-
-                       /* If we are an HTTPS server, go crypto now. */
-#ifdef HAVE_OPENSSL
-                       if (is_https) {
-                               if (starttls(ssock) != 0) {
-                                       fail_this_transaction = 1;
-                                       close(ssock);
-                               }
-                       }
-                       else 
-#endif
-                       {
-                               int fdflags; 
-                               fdflags = fcntl(ssock, F_GETFL);
-                               if (fdflags < 0)
-                                       lprintf(1, "unable to get server socket flags! %s \n",
-                                               strerror(errno));
-                               fdflags = fdflags | O_NONBLOCK;
-                               if (fcntl(ssock, F_SETFL, fdflags) < 0)
-                                       lprintf(1, "unable to set server socket nonblocking flags! %s \n",
-                                               strerror(errno));
-                       }
-
-                       if (fail_this_transaction == 0) {
-                               Hdr.http_sock = ssock;
-
-                               /* Perform an HTTP transaction... */
-                               context_loop(&Hdr);
-
-                               /* Shut down SSL/TLS if required... */
-#ifdef HAVE_OPENSSL
-                               if (is_https) {
-                                       endtls();
-                               }
-#endif
-
-                               /* ...and close the socket. */
-                               if (Hdr.http_sock > 0)
-                                       lingering_close(ssock);
-                               http_detach_modules(&Hdr);
-
-                       }
-
-               }
-
-       } while (!time_to_die);
-
-       http_destroy_modules(&Hdr);
-       lprintf (1, "bye\n");
-       pthread_exit(NULL);
-}
-
-/*
- * print log messages 
- * logs to stderr if loglevel is lower than the verbosity set at startup
- *
- * loglevel    level of the message
- * format      the printf like format string
- * ...         the strings to put into format
- */
-int lprintf(int loglevel, const char *format, ...)
-{
-       va_list ap;
-
-       if (loglevel <= verbosity) {
-               va_start(ap, format);
-               vfprintf(stderr, format, ap);
-               va_end(ap);
-               fflush(stderr);
-       }
-       return 1;
-}
-
 
-/*
- * print the actual stack frame.
- */
-void wc_backtrace(void)
-{
-#ifdef HAVE_BACKTRACE
-       void *stack_frames[50];
-       size_t size, i;
-       char **strings;
-
-
-       size = backtrace(stack_frames, sizeof(stack_frames) / sizeof(void*));
-       strings = backtrace_symbols(stack_frames, size);
-       for (i = 0; i < size; i++) {
-               if (strings != NULL)
-                       lprintf(1, "%s\n", strings[i]);
-               else
-                       lprintf(1, "%p\n", stack_frames[i]);
-       }
-       free(strings);
-#endif
-}