]> code.citadel.org Git - citadel.git/blobdiff - citadel/citserver.c
* Got bounce messages working (mostly ... testers, please beat this up!)
[citadel.git] / citadel / citserver.c
index cd791e3583587ba67191f4aca0f9e7ca6cad04c3..5e508ec5672d67739758feb4802fd814b6da02b6 100644 (file)
 #include <string.h>
 #include <errno.h>
 #include <limits.h>
-#ifdef HAVE_PTHREAD_H
-#include <pthread.h>
-#endif
 #include <syslog.h>
 #include <dlfcn.h>
 #include <netdb.h>
+#include <sys/types.h>
 #include <sys/socket.h>
 #include <netinet/in.h>
 #include <arpa/inet.h>
@@ -39,6 +37,7 @@
 #include "tools.h"
 
 struct CitContext *ContextList = NULL;
+char *unique_session_numbers;
 int ScheduledShutdown = 0;
 int do_defrag = 0;
 
@@ -56,9 +55,10 @@ void master_startup(void) {
        check_ref_counts();
 
        lprintf(7, "Creating base rooms (if necessary)\n");
-       create_room(BASEROOM, 0, "", 0);
-       create_room(AIDEROOM, 4, "", 0);
-       create_room(config.c_twitroom, 0, "", 0);
+       create_room(BASEROOM,           0, "", 0);
+       create_room(AIDEROOM,           3, "", 0);
+       create_room(SYSCONFIGROOM,      3, "", 0);
+       create_room(config.c_twitroom,  0, "", 0);
        }
 
 /*
@@ -69,9 +69,11 @@ void master_cleanup(void) {
 
        /* Cancel all running sessions */
        lprintf(7, "Cancelling running sessions...\n");
+
+/* FIXME do something here
        while (ContextList != NULL) {
-               kill_session(ContextList->cs_pid);
                }
+ */
 
        /* Run any cleanup routines registered by loadable modules */
        for (fcn = CleanupHookTable; fcn != NULL; fcn = fcn->next) {
@@ -116,34 +118,85 @@ void deallocate_user_data(struct CitContext *con)
 
 
 /*
- * Gracefully terminate the session and thread.
- * (This is called as a cleanup handler by the thread library.)
- *
- * All NON-system-dependent stuff is done in this function.
- * System-dependent session/thread cleanup is in cleanup() in sysdep.c
+ * Terminate a session and remove its context data structure.
  */
-void cleanup(int exit_code)
+void RemoveContext (struct CitContext *con)
 {
-       lprintf(9, "cleanup(%d) called\n", exit_code);
+       struct CitContext *ptr = NULL;
+       struct CitContext *ToFree = NULL;
 
-       lprintf(7, "Calling logout(%d)\n", CC->cs_pid);
-       logout(CC);
+       lprintf(9, "RemoveContext() called\n");
+       if (con==NULL) {
+               lprintf(5, "WARNING: RemoveContext() called with NULL!\n");
+               return;
+               }
 
-       rec_log(CL_TERMINATE,CC->curr_user);
-       unlink(CC->temp);
-       lprintf(3, "citserver[%3d]: ended.\n",CC->cs_pid);
-       
-       /* Run any cleanup routines registered by loadable modules */
+       /* Remove the context from the global context list.  This needs
+        * to get done FIRST to avoid concurrency problems.  It is *vitally*
+        * important to keep num_sessions accurate!!
+        */
+       lprintf(7, "Removing context for session %d\n", con->cs_pid);
+       begin_critical_section(S_SESSION_TABLE);
+       if (ContextList == con) {
+               ToFree = ContextList;
+               ContextList = ContextList->next;
+               --num_sessions;
+               }
+       else {
+               for (ptr = ContextList; ptr != NULL; ptr = ptr->next) {
+                       if (ptr->next == con) {
+                               ToFree = ptr->next;
+                               ptr->next = ptr->next->next;
+                               --num_sessions;
+                               }
+                       }
+               }
+       end_critical_section(S_SESSION_TABLE);
+
+       if (ToFree == NULL) {
+               lprintf(9, "RemoveContext() found nothing to remove\n");
+               return;
+       }
+
+       /* Run any cleanup routines registered by loadable modules.
+        * Note 1: This must occur *before* deallocate_user_data() because the
+        *         cleanup functions might touch dynamic session data.
+        * Note 2: We have to "become_session()" because the cleanup functions
+        *         might make references to "CC" assuming it's the right one.
+        */
+       become_session(con);
        PerformSessionHooks(EVT_STOP);
+       become_session(NULL);
 
-       syslog(LOG_NOTICE,"session %d ended", CC->cs_pid);
+       /* Now handle all of the administrivia. */
+       lprintf(7, "Calling logout(%d)\n", con->cs_pid);
+       logout(con);
+
+       rec_log(CL_TERMINATE, con->curr_user);
+       unlink(con->temp);
+       lprintf(3, "citserver[%3d]: ended.\n", con->cs_pid);
+       
+
+       syslog(LOG_NOTICE,"session %d ended", con->cs_pid);
        
        /* Deallocate any user-data attached to this session */
-       deallocate_user_data(CC);
+       deallocate_user_data(con);
+
+       /* If the client is still connected, blow 'em away. */
+       lprintf(7, "Closing socket %d\n", con->client_socket);
+       close(con->client_socket);
+
+        /* Tell the housekeeping thread to check to see if this is the time
+         * to initiate a scheduled shutdown event.
+         */
+        enter_housekeeping_cmd("SCHED_SHUTDOWN");
+
+       /* Free up the memory used by this context */
+       phree(con);
+
+       lprintf(7, "Done with RemoveContext()\n");
+}
 
-       /* And flag the context as in need of being killed */
-       CC->state = CON_DYING;
-       }
 
 
 /*
@@ -199,6 +252,7 @@ void CtdlAllocUserData(unsigned long requested_sym, size_t num_bytes)
        ptr = mallok(sizeof(struct CtdlSessData));
        ptr->sym_id = requested_sym;
        ptr->sym_data = mallok(num_bytes);
+       memset(ptr->sym_data, 0, num_bytes);
 
        begin_critical_section(S_SESSION_TABLE);
        ptr->next = CC->FirstSessData;
@@ -209,6 +263,25 @@ void CtdlAllocUserData(unsigned long requested_sym, size_t num_bytes)
 }
 
 
+/* 
+ * Change the size of a buffer allocated with CtdlAllocUserData()
+ */
+void CtdlReallocUserData(unsigned long requested_sym, size_t num_bytes)
+{
+       struct CtdlSessData *ptr;
+
+       for (ptr = CC->FirstSessData; ptr != NULL; ptr = ptr->next)  {
+               if (ptr->sym_id == requested_sym) {
+                       ptr->sym_data = reallok(ptr->sym_data, num_bytes);
+                       return;
+               }
+       }
+
+       lprintf(2, "CtdlReallocUserData() ERROR: symbol %ld not found!\n",
+               requested_sym);
+}
+
+
 
 
 
@@ -235,14 +308,13 @@ void cmd_info(void) {
 
 void cmd_rchg(char *argbuf)
 {
-       char newroomname[ROOMNAMELEN];
+       char newroomname[256];
 
        extract(newroomname, argbuf, 0);
-       newroomname[ROOMNAMELEN] = 0;
+       newroomname[ROOMNAMELEN-1] = 0;
        if (strlen(newroomname) > 0) {
-               safestrncpy(CC->fake_roomname, newroomname, 
+               safestrncpy(CC->fake_roomname, newroomname,
                        sizeof(CC->fake_roomname) );
-               CC->fake_roomname[ROOMNAMELEN - 1] = 0;
                }
        else {
                strcpy(CC->fake_roomname, "");
@@ -250,41 +322,51 @@ void cmd_rchg(char *argbuf)
        cprintf("%d OK\n", OK);
 }
 
-void cmd_hchg(char *newhostname)
+void cmd_hchg(char *argbuf)
 {
-   if ((newhostname) && (newhostname[0]))
-   {
-      memset(CC->fake_hostname, 0, 25);
-      safestrncpy(CC->fake_hostname, newhostname, sizeof(CC->fake_hostname));
-   }
-   else
-      strcpy(CC->fake_hostname, "");
-   cprintf("%d OK\n",OK);
+       char newhostname[256];
+
+       extract(newhostname, argbuf, 0);
+       if (strlen(newhostname) > 0) {
+               safestrncpy(CC->fake_hostname, newhostname,
+                       sizeof(CC->fake_hostname) );
+               }
+       else {
+               strcpy(CC->fake_hostname, "");
+               }
+       cprintf("%d OK\n", OK);
 }
 
-void cmd_uchg(char *newusername)
+void cmd_uchg(char *argbuf)
 {
-   if (CC->usersupp.axlevel < 6) 
-   {
-      cprintf("%d You must be an Aide to use UCHG.\n",
-               ERROR+HIGHER_ACCESS_REQUIRED);
-      return;
-   }
-   if ((newusername) && (newusername[0]))
-   {
-      CC->cs_flags &= ~CS_STEALTH;
-      memset(CC->fake_username, 0, 32);
-      if (strncasecmp(newusername, CC->curr_user, strlen(CC->curr_user)))
-         safestrncpy(CC->fake_username, newusername, sizeof(CC->fake_username));
-   }
-   else
-   {
-      CC->fake_username[0] = '\0';
-      CC->cs_flags |= CS_STEALTH;
-   }
-   cprintf("%d\n",OK);
+
+       char newusername[256];
+
+       extract(newusername, argbuf, 0);
+
+       if (CC->usersupp.axlevel < 6) {
+               cprintf("%d You must be an Aide to masquerade your name.\n",
+                       ERROR+HIGHER_ACCESS_REQUIRED);
+               return;
+       }
+
+       if (strlen(newusername) > 0) {
+               CC->cs_flags &= ~CS_STEALTH;
+               memset(CC->fake_username, 0, 32);
+               if (strncasecmp(newusername, CC->curr_user,
+                               strlen(CC->curr_user)))
+                       safestrncpy(CC->fake_username, newusername,
+                               sizeof(CC->fake_username));
+       }
+       else {
+               CC->fake_username[0] = '\0';
+               CC->cs_flags |= CS_STEALTH;
+       }
+       cprintf("%d\n",OK);
 }
 
+
+
 /*
  * returns an asterisk if there are any express messages waiting,
  * space otherwise.
@@ -396,10 +478,10 @@ void cmd_iden(char *argbuf)
        safestrncpy(CC->cs_clientname, desc, sizeof CC->cs_clientname);
        CC->cs_clientname[31] = 0;
 
-       lprintf(9, "Looking up hostname\n");
+       lprintf(9, "Looking up hostname '%s'\n", from_host);
        if ((strlen(from_host)>0) && 
           (is_public_client(CC->cs_host))) {
-               if (inet_aton(from_host, &addr))
+               if ((addr.s_addr = inet_addr(from_host)) != INADDR_NONE)
                        locate_host(CC->cs_host, &addr);
                else {
                        safestrncpy(CC->cs_host, from_host, sizeof CC->cs_host);
@@ -669,7 +751,7 @@ void cmd_term(char *cmdbuf)
 {
        int session_num;
        struct CitContext *ccptr;
-       int session_to_kill = 0;
+       int found_it = 0;
 
        if (!CC->logged_in) {
                cprintf("%d Not logged in.\n",ERROR+NOT_LOGGED_IN);
@@ -692,15 +774,13 @@ void cmd_term(char *cmdbuf)
        begin_critical_section(S_SESSION_TABLE);
        for (ccptr = ContextList; ccptr != NULL; ccptr = ccptr->next) {
                if (session_num == ccptr->cs_pid) {
-                       session_to_kill = ccptr->cs_pid;
+                       ccptr->kill_me = 1;
+                       found_it = 1;
                        }
                }
        end_critical_section(S_SESSION_TABLE);
-       lprintf(9, "session_to_kill == %d\n", session_to_kill);
 
-       if (session_to_kill > 0) {
-               lprintf(9, "calling kill_session()\n");
-               kill_session(session_to_kill);
+       if (found_it) {
                cprintf("%d Session terminated.\n", OK);
                }
        else {
@@ -796,11 +876,11 @@ void cmd_scdn(char *argbuf)
 
 
 /*
- * 
+ * Back-end function for starting a session
  */
 void begin_session(struct CitContext *con)
 {
-       int num_sessions, len;
+       int len;
        struct sockaddr_in sin;
 
        /* 
@@ -810,13 +890,12 @@ void begin_session(struct CitContext *con)
        con->internal_pgm = 0;
        con->download_fp = NULL;
        con->upload_fp = NULL;
-       con->cs_pid = con->client_socket;       /* not necessarily portable */
        con->FirstExpressMessage = NULL;
        time(&con->lastcmd);
        time(&con->lastidle);
        strcpy(con->lastcmdname, "    ");
        strcpy(con->cs_clientname, "(unknown)");
-       strcpy(con->curr_user,"(not logged in)");
+       strcpy(con->curr_user, NLI);
        strcpy(con->net_node,"");
        snprintf(con->temp, sizeof con->temp, tmpnam(NULL));
        safestrncpy(con->cs_host, config.c_fqdn, sizeof con->cs_host);
@@ -829,12 +908,21 @@ void begin_session(struct CitContext *con)
        con->dl_is_net = 0;
        con->FirstSessData = NULL;
 
-       num_sessions = session_count();
        con->nologin = 0;
        if ((config.c_maxsessions > 0)&&(num_sessions > config.c_maxsessions))
                con->nologin = 1;
 
-       if (con->nologin==1) {
+       lprintf(3, "citserver[%3d]: started.\n", con->cs_pid);
+
+       /* Run any session startup routines registered by loadable modules */
+       PerformSessionHooks(EVT_START);
+
+       rec_log(CL_CONNECT, "");
+}
+
+
+void citproto_begin_session() {
+       if (CC->nologin==1) {
                cprintf("%d %s: Too many users are already online "
                        "(maximum is %d)\n",
                        ERROR+MAX_SESSIONS_EXCEEDED,
@@ -844,13 +932,6 @@ void begin_session(struct CitContext *con)
                cprintf("%d %s Citadel/UX server ready.\n",
                        OK, config.c_nodename);
                }
-
-       lprintf(3, "citserver[%3d]: started.\n", con->cs_pid);
-
-       /* Run any session startup routines registered by loadable modules */
-       PerformSessionHooks(EVT_START);
-
-       rec_log(CL_CONNECT, "");
 }
 
 
@@ -862,14 +943,12 @@ void begin_session(struct CitContext *con)
 void do_command_loop(void) {
        char cmdbuf[256];
 
-       lprintf(9, "Hi, I'm do_command_loop() and I have client socket %d\n",
-               CC->client_socket);
-
        time(&CC->lastcmd);
        memset(cmdbuf, 0, sizeof cmdbuf); /* Clear it, just in case */
        if (client_gets(cmdbuf) < 1) {
-               lprintf(3, "Socket is broken, I think.\n");
-               cleanup(EXIT_NULL);
+               lprintf(3, "Client socket is broken.  Ending session.\n");
+               CC->kill_me = 1;
+               return;
        }
        lprintf(5, "citserver[%3d]: %s\n", CC->cs_pid, cmdbuf);
 
@@ -899,6 +978,7 @@ void do_command_loop(void) {
 
        else if (!strncasecmp(cmdbuf,"QUIT",4)) {
                cprintf("%d Goodbye.\n",OK);
+               CC->kill_me = 1;
                }
 
        else if (!strncasecmp(cmdbuf,"LOUT",4)) {