+/* $Id$ */
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <errno.h>
+#include <limits.h>
#include <pthread.h>
#include <syslog.h>
+#include <dlfcn.h>
#include "citadel.h"
#include "server.h"
#include "sysdep_decls.h"
#include "config.h"
#include "database.h"
#include "housekeeping.h"
-#include "hooks.h"
#include "user_ops.h"
#include "logging.h"
#include "support.h"
#include "msgbase.h"
#include "locate_host.h"
-#include "serv_chat.h"
#include "room_ops.h"
#include "file_ops.h"
+#include "dynloader.h"
+#include "policy.h"
+#include "control.h"
struct CitContext *ContextList = NULL;
int ScheduledShutdown = 0;
lprintf(7, "Checking floor reference counts\n");
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);
}
/*
* Cleanup routine to be called when the server is shutting down.
*/
void master_cleanup(void) {
+ struct CleanupFunctionHook *fcn;
/* Cancel all running sessions */
lprintf(7, "Cancelling running sessions...\n");
kill_session(ContextList->cs_pid);
}
+ /* Run any cleanup routines registered by loadable modules */
+ for (fcn = CleanupHookTable; fcn != NULL; fcn = fcn->next) {
+ (*fcn->h_function_pointer)();
+ }
+
/* Close databases */
lprintf(7, "Closing databases\n");
close_databases();
sysdep_master_cleanup();
/* Now go away. */
- hook_cleanup();
lprintf(3, "citserver: exiting.\n");
+ fflush(stdout); fflush(stderr);
exit(0);
}
rec_log(CL_TERMINATE,CC->curr_user);
unlink(CC->temp);
lprintf(3, "citserver[%3d]: ended.\n",CC->cs_pid);
- hook_end_session(CC->cs_pid);
+
+ /* Run any cleanup routines registered by loadable modules */
+ PerformSessionHooks(EVT_STOP);
+
syslog(LOG_NOTICE,"session %d ended", CC->cs_pid);
/* Deallocate any unsent express messages */
/* Deallocate any message list we might have in memory */
if (CC->msglist != NULL) free(CC->msglist);
+ /* Purge any stale user/room relationships */
+ PurgeStaleRelationships();
+
/* Now get rid of the session and context */
- lprintf(7, "cleanup_stuff() is calling RemoveContext(%d)\n", CC->cs_pid);
+ lprintf(7, "cleanup_stuff() calling RemoveContext(%d)\n", CC->cs_pid);
RemoveContext(CC);
/* While we still have an extra thread with no user attached to it,
*/
void set_wtmpsupp(char *newtext)
{
- strncpy(CC->cs_room,newtext,19);
- CC->cs_room[19] = 0;
+ strncpy(CC->cs_room,newtext,sizeof CC->cs_room);
+ CC->cs_room[sizeof CC->cs_room - 1] = 0;
time(&CC->cs_lastupdt);
- hook_room_name(CC->cs_pid, CC->cs_room);
+
+ /* Run any routines registered by loadable modules */
+ PerformSessionHooks(EVT_NEWROOM);
+ }
+
+
+/*
+ * call set_wtmpsupp() with the name of the current room, modified a bit...
+ */
+void set_wtmpsupp_to_current_room() {
+ if (CC->quickroom.QRflags & QR_PRIVATE) {
+ set_wtmpsupp("<private room>");
+ }
+ else if (CC->quickroom.QRflags & QR_MAILBOX) {
+ set_wtmpsupp(&CC->quickroom.QRname[11]);
+ }
+ else {
+ set_wtmpsupp(CC->quickroom.QRname);
+ }
}
+
/*
* cmd_info() - tell the client about this server
*/
{
if ((newroomname) && (newroomname[0]))
{
- bzero(CC->fake_roomname, 20);
- strncpy(CC->fake_roomname, newroomname, 19);
+ bzero(CC->fake_roomname, ROOMNAMELEN);
+ strncpy(CC->fake_roomname, newroomname, ROOMNAMELEN-1);
}
else
- CC->fake_roomname[0] = '\0';
- cprintf("%d\n",OK);
+ strcpy(CC->fake_roomname, "");
+ cprintf("%d OK\n",OK);
}
void cmd_hchg(char *newhostname)
strncpy(CC->fake_hostname, newhostname, 24);
}
else
- CC->fake_hostname[0] = '\0';
- cprintf("%d\n",OK);
+ strcpy(CC->fake_hostname, "");
+ cprintf("%d OK\n",OK);
}
void cmd_uchg(char *newusername)
cprintf("%d\n",OK);
}
+/*
+ * returns an asterisk if there are any express messages waiting,
+ * space otherwise.
+ */
+char check_express(void) {
+ if (CC->FirstExpressMessage == NULL) {
+ return(' ');
+ }
+ else {
+ return('*');
+ }
+ }
+
void cmd_time(void)
{
time_t tv;
rev_level = extract_int(argbuf,2);
extract(desc,argbuf,3);
- strcpy(from_host,config.c_fqdn);
+ strncpy(from_host,config.c_fqdn,sizeof from_host);
+ from_host[sizeof from_host - 1] = 0;
if (num_parms(argbuf)>=5) extract(from_host,argbuf,4);
CC->cs_clientdev = dev_code;
strncpy(CC->cs_host,from_host,24);
CC->cs_host[24] = 0;
}
- set_wtmpsupp(CC->quickroom.QRname);
+ set_wtmpsupp_to_current_room();
syslog(LOG_NOTICE,"client %d/%d/%01d.%02d (%s)\n",
dev_code,
CC->cs_flags = CC->cs_flags|CS_STEALTH;
}
- set_wtmpsupp(CC->quickroom.QRname);
+ set_wtmpsupp_to_current_room();
cprintf("%d Ok\n",OK);
}
free(dirs[1]);
if (strlen(targ)==0) {
- sprintf(targ, "./help/%s", buf);
+ snprintf(targ, sizeof targ, "./help/%s", buf);
}
mfp = fopen(targ,"w");
}
-/*
- * Run a server extension (FIX FIX FIX initial hack; polish this up)
- */
-void cmd_extn(char *argbuf) {
- char ExtensionName[256];
- int is_ipgm;
- int pid;
- char portstr[16];
- char ipgm[32];
- char sess[16];
-
-
- extract(ExtensionName, argbuf, 0);
- is_ipgm = extract_int(argbuf, 1);
-
- pid = fork();
- lprintf(9, "fork() returned %d\n", pid);
- if (pid < 0) {
- cprintf("%d fork failed: %s\n",
- ERROR + INTERNAL_ERROR,
- strerror(errno));
- return;
- }
- else if (pid == 0) {
-
- sprintf(portstr, "%d", config.c_port_number);
-
- if (is_ipgm)
- sprintf(ipgm, "%d", config.c_ipgm_secret);
- else
- strcpy(ipgm, "");
-
- sprintf(sess, "%d", CC->cs_pid);
-
- execlp(ExtensionName, ExtensionName,
- "localhost", /* server address */
- portstr, /* port number */
- ipgm, /* ipgm secret */
- CC->usersupp.fullname, /* user name */
- CC->usersupp.password, /* password */
- CC->quickroom.QRname, /* current room */
- sess, /* assoc session id */
- NULL);
-
- lprintf(9, "exec() failed: %s\n", strerror(errno));
- exit(1);
- }
- else {
- cprintf("%d Ok\n", OK);
- }
- }
-
-
-
-
/*
* main context loop
*/
/*
* Initialize some variables specific to our context.
*/
- CC->curr_rm = (-1);
CC->logged_in = 0;
CC->internal_pgm = 0;
CC->download_fp = NULL;
strcpy(CC->cs_clientname, "(unknown)");
strcpy(CC->curr_user,"");
strcpy(CC->net_node,"");
- sprintf(CC->temp,"/tmp/CitServer.%d.%d", getpid(), CC->cs_pid);
+ snprintf(CC->temp, sizeof CC->temp, "/tmp/CitServer.%d.%d", getpid(), CC->cs_pid);
strcpy(CC->cs_room, "");
- strcpy(CC->cs_host, config.c_fqdn);
+ strncpy(CC->cs_host, config.c_fqdn, sizeof CC->cs_host);
+ CC->cs_host[sizeof CC->cs_host - 1] = 0;
locate_host(CC->cs_host);
CC->cs_flags = 0;
CC->upload_type = UPL_FILE;
}
lprintf(3, "citserver[%3d]: started.\n", CC->cs_pid);
- hook_start_session(CC->cs_pid);
+
+ /* Run any session startup routines registered by loadable modules */
+ PerformSessionHooks(EVT_START);
+
rec_log(CL_CONNECT, "");
do {
time(&CC->lastcmd);
+ bzero(cmdbuf, sizeof cmdbuf); /* Clear it, just in case */
if (client_gets(cmdbuf) < 1) cleanup(EXIT_NULL);
lprintf(5, "citserver[%3d]: %s\n", CC->cs_pid, cmdbuf);
- hook_command_received(CC->cs_pid, cmdbuf);
/*
* Let other clients see the last command we executed, but
cmd_ipgm(&cmdbuf[5]);
}
- else if (!strncasecmp(cmdbuf,"CHAT",4)) {
- cmd_chat(&cmdbuf[5]);
- }
-
- else if (!strncasecmp(cmdbuf,"PEXP",4)) {
- cmd_pexp();
- }
-
- else if (!strncasecmp(cmdbuf,"SEXP",4)) {
- cmd_sexp(&cmdbuf[5]);
- }
-
else if (!strncasecmp(cmdbuf,"EBIO",4)) {
cmd_ebio();
}
cmd_rchg(&cmdbuf[5]);
}
- else if (!strncasecmp(cmdbuf, "EXTN", 4)) {
- cmd_extn(&cmdbuf[5]);
- }
-
else if (!strncasecmp(cmdbuf, "AGUP", 4)) {
cmd_agup(&cmdbuf[5]);
}
cmd_asup(&cmdbuf[5]);
}
- else {
- cprintf("%d Unrecognized or unsupported command.\n",
- ERROR);
+ else if (!strncasecmp(cmdbuf, "GPEX", 4)) {
+ cmd_gpex(&cmdbuf[5]);
+ }
+
+ else if (!strncasecmp(cmdbuf, "SPEX", 4)) {
+ cmd_spex(&cmdbuf[5]);
}
+ else if (!strncasecmp(cmdbuf, "CONF", 4)) {
+ cmd_conf(&cmdbuf[5]);
+ }
+
+ else if (!DLoader_Exec_Cmd(cmdbuf))
+ {
+ cprintf("%d Unrecognized or unsupported command.\n",
+ ERROR);
+ }
+
} while(strncasecmp(cmdbuf, "QUIT", 4));
cleanup(EXIT_NORMAL);