/*
- * serv_chat.c
+ * $Id$
*
* This module handles all "real time" communication between users. The
* modes of communication currently supported are Chat and Paging.
*
- * $Id$
*/
#include "sysdep.h"
#include <stdlib.h>
#include <pwd.h>
#include <errno.h>
#include <sys/types.h>
-#include <sys/time.h>
+
+#if TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# if HAVE_SYS_TIME_H
+# include <sys/time.h>
+# else
+# include <time.h>
+# endif
+#endif
+
#include <sys/wait.h>
#include <string.h>
#include <limits.h>
#include "citadel.h"
#include "server.h"
+#include "dynloader.h"
#include <syslog.h>
#include "serv_chat.h"
#include "sysdep_decls.h"
#include "citserver.h"
#include "support.h"
#include "config.h"
-#include "dynloader.h"
#include "tools.h"
#include "msgbase.h"
+#include "user_ops.h"
+#include "room_ops.h"
+
+#ifndef HAVE_SNPRINTF
+#include "snprintf.h"
+#endif
struct ChatLine *ChatQueue = NULL;
int ChatLastMsg = 0;
-extern struct CitContext *ContextList;
void allwrite(char *cmdbuf, int flag, char *username)
{
FILE *fp;
- char bcast[256];
+ char bcast[SIZ];
char *un;
struct ChatLine *clptr, *clnew;
time_t now;
}
if ((strcasecmp(cmdbuf, "NOOP")) && (flag != 2)) {
fp = fopen(CHATLOG, "a");
- fprintf(fp, "%s\n", bcast);
+ if (fp != NULL)
+ fprintf(fp, "%s\n", bcast);
fclose(fp);
}
clnew = (struct ChatLine *) mallok(sizeof(struct ChatLine));
}
/* Then, before releasing the lock, free the expired messages */
- while (1) {
- if (ChatQueue == NULL)
- goto DONE_FREEING;
- if ((now - ChatQueue->chat_time) < 120L)
- goto DONE_FREEING;
+ while ((ChatQueue != NULL) && (now - ChatQueue->chat_time >= 120L)) {
clptr = ChatQueue;
ChatQueue = ChatQueue->next;
phree(clptr);
}
-DONE_FREEING:
end_critical_section(S_CHATQUEUE);
}
cprintf(":|\n:| Users not in chat:\n");
for (ccptr = ContextList; ccptr != NULL; ccptr = ccptr->next) {
+ GenerateRoomDisplay(roomname, ccptr, CC);
+ if ((CC->usersupp.axlevel < 6)
+ && (strlen(ccptr->fake_roomname)>0)) {
+ strcpy(roomname, ccptr->fake_roomname);
+ }
+
if (((ccptr->cs_flags & CS_CHAT) == 0)
&& ((ccptr->cs_flags & CS_STEALTH) == 0)) {
cprintf(":| %-25s <%s>:\n",
void cmd_chat(char *argbuf)
{
- char cmdbuf[256];
+ char cmdbuf[SIZ];
char *un;
char *strptr1;
int MyLastMsg, ThisLastMsg;
retval = client_read_to(&cmdbuf[linelen], 1, 2);
- if (retval < 0) { /* socket broken? */
+ if (retval < 0 || CC->kill_me) { /* socket broken? */
if ((CC->cs_flags & CS_STEALTH) == 0) {
allwrite("<disconnected>", 0, NULL);
}
if (strcasecmp(CC->curr_user, t_context->curr_user))
allwrite(strptr1, 2, t_context->curr_user);
} else
- cprintf(":|User not found.\n", cmdbuf);
+ cprintf(":|User not found.\n");
cprintf("\n");
}
if ((cmdbuf[0] != '/') && (strlen(cmdbuf) > 0)) {
cprintf("%d %d|%ld|%d|%s|%s\n",
LISTING_FOLLOWS,
((ptr->next != NULL) ? 1 : 0), /* more msgs? */
- ptr->timestamp, /* time sent */
+ (long)ptr->timestamp, /* time sent */
ptr->flags, /* flags */
ptr->sender, /* sender of msg */
config.c_nodename); /* static for now */
phree(ptr);
}
+/*
+ * Asynchronously deliver express messages'
+ */
+void cmd_gexp_async(void) {
+
+ /* Only do this if the session can handle asynchronous protocol */
+ if (CC->is_async == 0) return;
+
+ /* And don't do it if there's nothing to send. */
+ if (CC->FirstExpressMessage == NULL) return;
+
+ cprintf("%d express msg\n", ASYNC_MSG + ASYNC_GEXP);
+ cmd_gexp("");
+}
+
+/*
+ * Back end support function for send_express_message() and company
+ */
+void add_xmsg_to_context(struct CitContext *ccptr,
+ struct ExpressMessage *newmsg)
+{
+ struct ExpressMessage *findend;
+
+ if (ccptr->FirstExpressMessage == NULL) {
+ ccptr->FirstExpressMessage = newmsg;
+ }
+ else {
+ findend = ccptr->FirstExpressMessage;
+ while (findend->next != NULL) {
+ findend = findend->next;
+ }
+ findend->next = newmsg;
+ }
+}
+
+
/*
*/
int send_express_message(char *lun, char *x_user, char *x_msg)
{
- int message_sent = 0;
+ int message_sent = 0; /* number of successful sends */
+
struct CitContext *ccptr;
- struct ExpressMessage *newmsg, *findend;
+ struct ExpressMessage *newmsg;
char *un;
size_t msglen = 0;
- int do_send = 0;
+ int do_send = 0; /* set to 1 to actually page, not
+ * just check to see if we can.
+ */
+ struct savelist *sl = NULL; /* list of rooms to save this page */
+ struct savelist *sptr;
+ struct CtdlMessage *logmsg;
+ long msgnum;
if (strlen(x_msg) > 0) {
msglen = strlen(x_msg) + 4;
mallok(sizeof (struct ExpressMessage));
memset(newmsg, 0,
sizeof (struct ExpressMessage));
+ time(&(newmsg->timestamp));
safestrncpy(newmsg->sender, lun,
sizeof newmsg->sender);
if (!strcasecmp(x_user, "broadcast"))
newmsg->flags |= EM_BROADCAST;
- newmsg->text = mallok(msglen);
- safestrncpy(newmsg->text, x_msg, msglen);
-
- if (ccptr->FirstExpressMessage == NULL)
- ccptr->FirstExpressMessage = newmsg;
- else {
- findend = ccptr->FirstExpressMessage;
- while (findend->next != NULL)
- findend = findend->next;
- findend->next = newmsg;
+ newmsg->text = strdoop(x_msg);
+
+ add_xmsg_to_context(ccptr, newmsg);
+
+ /* and log it ... */
+ if (ccptr != CC) {
+ sptr = (struct savelist *)
+ malloc(sizeof(struct savelist));
+ sptr->next = sl;
+ MailboxName(sptr->roomname,
+ sizeof sptr->roomname,
+ &ccptr->usersupp, PAGELOGROOM);
+ sl = sptr;
}
}
++message_sent;
end_critical_section(S_SESSION_TABLE);
/* Log the page to disk if configured to do so */
- if ((strlen(config.c_logpages) > 0) && (do_send) ) {
- quickie_message(lun, x_user, config.c_logpages, x_msg);
+ if ( (do_send) && (message_sent) ) {
+
+ logmsg = mallok(sizeof(struct CtdlMessage));
+ memset(logmsg, 0, sizeof(struct CtdlMessage));
+ logmsg->cm_magic = CTDLMESSAGE_MAGIC;
+ logmsg->cm_anon_type = MES_NORMAL;
+ logmsg->cm_format_type = 0;
+ logmsg->cm_fields['A'] = strdoop(lun);
+ logmsg->cm_fields['N'] = strdoop(NODENAME);
+ logmsg->cm_fields['O'] = strdoop(PAGELOGROOM);
+ logmsg->cm_fields['R'] = strdoop(x_user);
+ logmsg->cm_fields['M'] = strdoop(x_msg);
+
+
+ /* Save a copy of the message in the sender's log room,
+ * creating the room if necessary.
+ */
+ create_room(PAGELOGROOM, 4, "", 0, 1);
+ msgnum = CtdlSubmitMsg(logmsg, NULL, PAGELOGROOM);
+
+ /* Now save a copy in the global log room, if configured */
+ if (strlen(config.c_logpages) > 0) {
+ create_room(config.c_logpages, 3, "", 0, 1);
+ CtdlSaveMsgPointerInRoom(config.c_logpages, msgnum, 0);
+ }
+
+ /* Save a copy in each recipient's log room, creating those
+ * rooms if necessary. Note that we create as a type 5 room
+ * rather than 4, which indicates that it's a personal room
+ * but we've already supplied the namespace prefix.
+ */
+ while (sl != NULL) {
+ create_room(sl->roomname, 5, "", 0, 1);
+ CtdlSaveMsgPointerInRoom(sl->roomname, msgnum, 0);
+ sptr = sl->next;
+ phree(sl);
+ sl = sptr;
+ }
+
+ CtdlFreeMessage(logmsg);
}
return (message_sent);
void cmd_sexp(char *argbuf)
{
int message_sent = 0;
- char x_user[256];
- char x_msg[256];
+ char x_user[SIZ];
+ char x_msg[SIZ];
char *lun; /* <bc> */
char *x_big_msgbuf = NULL;
}
cprintf("%d Transmit message (will deliver to %d users)\n",
SEND_LISTING, message_sent);
- x_big_msgbuf = mallok(256);
- memset(x_big_msgbuf, 0, 256);
+ x_big_msgbuf = mallok(SIZ);
+ memset(x_big_msgbuf, 0, SIZ);
while (client_gets(x_msg), strcmp(x_msg, "000")) {
x_big_msgbuf = reallok(x_big_msgbuf,
strlen(x_big_msgbuf) + strlen(x_msg) + 4);
if (message_sent > 0) {
if (strlen(x_msg) > 0)
- cprintf("%d Message sent", OK);
+ cprintf("%d Message sent", CIT_OK);
else
- cprintf("%d Ok to send message", OK);
+ cprintf("%d Ok to send message", CIT_OK);
if (message_sent > 1)
cprintf(" to %d users", message_sent);
cprintf(".\n");
if ((new_state == 0) || (new_state == 1)) {
CC->disable_exp = new_state;
}
- cprintf("%d %d\n", OK, CC->disable_exp);
+ cprintf("%d %d\n", CIT_OK, CC->disable_exp);
}
+/*
+ * Request client termination
+ */
+void cmd_reqt(char *argbuf) {
+ struct CitContext *ccptr;
+ int sessions = 0;
+ int which_session;
+ struct ExpressMessage *newmsg;
+
+ if (CtdlAccessCheck(ac_aide)) return;
+ which_session = extract_int(argbuf, 0);
+
+ begin_critical_section(S_SESSION_TABLE);
+ for (ccptr = ContextList; ccptr != NULL; ccptr = ccptr->next) {
+ if ((ccptr->cs_pid == which_session) || (which_session == 0)) {
+
+ newmsg = (struct ExpressMessage *)
+ mallok(sizeof (struct ExpressMessage));
+ memset(newmsg, 0,
+ sizeof (struct ExpressMessage));
+ time(&(newmsg->timestamp));
+ safestrncpy(newmsg->sender, CC->usersupp.fullname,
+ sizeof newmsg->sender);
+ newmsg->flags |= EM_GO_AWAY;
+ newmsg->text = strdoop("Automatic logoff requested.");
+
+ add_xmsg_to_context(ccptr, newmsg);
+ ++sessions;
+
+ }
+ }
+ end_critical_section(S_SESSION_TABLE);
+ cprintf("%d Sent termination request to %d sessions.\n", CIT_OK, sessions);
+}
CtdlRegisterProtoHook(cmd_gexp, "GEXP", "Get express messages");
CtdlRegisterProtoHook(cmd_sexp, "SEXP", "Send an express message");
CtdlRegisterProtoHook(cmd_dexp, "DEXP", "Disable express messages");
+ CtdlRegisterProtoHook(cmd_reqt, "REQT", "Request client termination");
+ CtdlRegisterSessionHook(cmd_gexp_async, EVT_CMD);
CtdlRegisterSessionHook(delete_express_messages, EVT_STOP);
CtdlRegisterXmsgHook(send_express_message, XMSG_PRI_LOCAL);
return "$Id$";