/*
- * Citadel/UX
- *
- * client_chat.c -- front end for chat mode
- * (the "single process" version - no more fork() anymore)
- *
* $Id$
*
+ * front end for chat mode
+ * (the "single process" version - no more fork() anymore)
+ *
*/
#include "sysdep.h"
#include <string.h>
#include <signal.h>
#include <errno.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/types.h>
#ifdef HAVE_SYS_SELECT_H
#include <sys/select.h>
#endif
+#include <stdarg.h>
#include "citadel.h"
+#include "citadel_ipc.h"
#include "client_chat.h"
#include "commands.h"
#include "routines.h"
-#include "ipc.h"
#include "citadel_decls.h"
#include "tools.h"
+#include "rooms.h"
+#include "messages.h"
+#ifndef HAVE_SNPRINTF
+#include "snprintf.h"
+#endif
+#include "screen.h"
#define MIN(a, b) ((a) < (b) ? (a) : (b))
-extern struct CtdlServInfo serv_info;
extern char temp[];
-void citedit(FILE *fp, long int base_pos);
+void getline(char *, int);
+
+char last_paged[SIZ] = "";
-void chatmode(void) {
- char wbuf[256];
- char buf[256];
- char c_user[256];
- char c_text[256];
- char c_room[256];
- char last_user[256];
+void chatmode(CtdlIPC *ipc)
+{
+ char wbuf[SIZ];
+ char buf[SIZ];
+ char c_user[SIZ];
+ char c_text[SIZ];
+ char c_room[SIZ];
+ char last_user[SIZ];
int send_complete_line;
int recv_complete_line;
char ch;
- int a,pos;
-
+ int a, pos;
+ time_t last_transmit;
+
fd_set rfds;
struct timeval tv;
int retval;
- serv_puts("CHAT");
- serv_gets(buf);
- if (buf[0]!='8') {
- printf("%s\n",&buf[4]);
+ CtdlIPC_chat_send(ipc, "CHAT");
+ CtdlIPC_chat_recv(ipc, buf);
+ if (buf[0] != '8') {
+ scr_printf("%s\n", &buf[4]);
return;
- }
-
- printf("Entering chat mode (type /quit to exit, /help for other cmds)\n");
- set_keepalives(KA_CHAT);
+ }
+ scr_printf("Entering chat mode "
+ "(type /quit to exit, /help for other cmds)\n");
+ set_keepalives(KA_NO);
+ last_transmit = time(NULL);
- strcpy(buf,"");
- strcpy(wbuf,"");
- color(3);
- printf("> ");
+ strcpy(buf, "");
+ strcpy(wbuf, "");
+ color(BRIGHT_YELLOW);
+ sln_printf_if("\n");
+ sln_printf("> ");
send_complete_line = 0;
recv_complete_line = 0;
- while(1) {
- fflush(stdout);
- FD_ZERO(&rfds);
- FD_SET(0,&rfds);
- FD_SET(getsockfd(),&rfds);
- tv.tv_sec = S_KEEPALIVE;
- tv.tv_usec = 0;
- retval = select(getsockfd()+1, &rfds, NULL, NULL, &tv);
+ while (1) {
+ sln_flush();
+ FD_ZERO(&rfds);
+ FD_SET(0, &rfds);
+ FD_SET(CtdlIPC_getsockfd(ipc), &rfds);
+ tv.tv_sec = S_KEEPALIVE;
+ tv.tv_usec = 0;
+ retval = select(CtdlIPC_getsockfd(ipc) + 1, &rfds,
+ NULL, NULL, &tv);
- if (FD_ISSET(getsockfd(), &rfds)) {
- ch = serv_getc();
- if (ch == 10) {
+ /* If there's data from the server... */
+ if (FD_ISSET(CtdlIPC_getsockfd(ipc), &rfds)) {
+ CtdlIPC_chat_recv(ipc, buf);
recv_complete_line = 1;
- goto RCL; /* ugly, but we've gotta get out! */
- }
- else {
- buf[strlen(buf) + 1] = 0;
- buf[strlen(buf)] = ch;
- }
- goto RCL;
+ goto RCL; /* ugly, but we've gotta get out! */
}
- if (FD_ISSET(0, &rfds)) {
- ch = inkey();
- if ((ch == 10) || (ch == 13)) {
- send_complete_line = 1;
- }
- else if ((ch == 8) || (ch == 127)) {
- if (strlen(wbuf) > 0) {
- wbuf[strlen(wbuf)-1] = 0;
- printf("%c %c",8,8);
+ /* If there's data from the keyboard... */
+ if (FD_ISSET(0, &rfds)) {
+ ch = scr_getc(SCR_BLOCK);
+ if ((ch == 10) || (ch == 13)) {
+ send_complete_line = 1;
+ } else if ((ch == 8) || (ch == 127)) {
+ if (strlen(wbuf) > 0) {
+ wbuf[strlen(wbuf) - 1] = 0;
+ sln_printf("%c %c", 8, 8);
}
- }
- else {
- putc(ch,stdout);
- wbuf[strlen(wbuf) + 1] = 0;
- wbuf[strlen(wbuf)] = ch;
+ } else {
+ sln_putc(ch);
+ wbuf[strlen(wbuf) + 1] = 0;
+ wbuf[strlen(wbuf)] = ch;
}
}
-
- /* if the user hit return, send the line */
-RCL: if (send_complete_line) {
- serv_puts(wbuf);
- strcpy(wbuf,"");
- send_complete_line = 0;
- }
-
- /* if it's time to word wrap, send a partial line */
- if ( strlen(wbuf) >= (77-strlen(fullname)) ) {
- pos = 0;
- for (a=0; a<strlen(wbuf); ++a) {
- if (wbuf[a] == 32) pos = a;
- }
- if (pos == 0) {
- serv_puts(wbuf);
+ /* if the user hit return, send the line */
+RCL: if (send_complete_line) {
+ CtdlIPC_chat_send(ipc, wbuf);
+ last_transmit = time(NULL);
strcpy(wbuf, "");
send_complete_line = 0;
+ }
+
+ /* if it's time to word wrap, send a partial line */
+ if (strlen(wbuf) >= (77 - strlen(fullname))) {
+ pos = 0;
+ for (a = 0; a < strlen(wbuf); ++a) {
+ if (wbuf[a] == 32)
+ pos = a;
}
- else {
- wbuf[pos] = 0;
- serv_puts(wbuf);
- strcpy(wbuf,&wbuf[pos+1]);
+ if (pos == 0) {
+ CtdlIPC_chat_send(ipc, wbuf);
+ last_transmit = time(NULL);
+ strcpy(wbuf, "");
+ send_complete_line = 0;
+ } else {
+ wbuf[pos] = 0;
+ CtdlIPC_chat_send(ipc, wbuf);
+ last_transmit = time(NULL);
+ strcpy(wbuf, &wbuf[pos + 1]);
}
}
- if (recv_complete_line) {
- printf("\r%79s\r","");
- if (!strcmp(buf,"000")) {
- color(7);
- printf("Exiting chat mode\n");
+ if (recv_complete_line) {
+ sln_printf("\r%79s\r", "");
+ if (!strcmp(buf, "000")) {
+ color(BRIGHT_WHITE);
+ sln_printf("\rExiting chat mode\n");
+ sln_flush();
+ set_keepalives(KA_YES);
- fflush(stdout);
- set_keepalives(KA_YES);
- return;
+ /* Some users complained about the client and
+ * server losing protocol synchronization when
+ * exiting chat. This little dialog forces
+ * everything to be hunky-dory.
+ */
+ CtdlIPC_chat_send(ipc, "ECHO __ExitingChat__");
+ do {
+ CtdlIPC_chat_recv(ipc, buf);
+ } while (strcmp(buf, "200 __ExitingChat__"));
+ return;
}
- if (num_parms(buf)>=2) {
- extract(c_user,buf,0);
- extract(c_text,buf,1);
- if (num_parms(buf)>2)
- {
- extract(c_room,buf,2);
- printf("Got room %s\n", c_room);
- }
-
- if (strucmp(c_text,"NOOP")) {
- if (!strcmp(c_user, fullname)) {
- color(3);
- }
- else if (!strcmp(c_user,":")) {
- color(1);
- }
- else {
- color(2);
- }
- if (strcmp(c_user,last_user)) {
- snprintf(buf,sizeof buf,"%s: %s",c_user,c_text);
+ if (num_parms(buf) >= 2) {
+ extract_token(c_user, buf, 0, '|', sizeof c_user);
+ extract_token(c_text, buf, 1, '|', sizeof c_text);
+ if (num_parms(buf) > 2) {
+ extract_token(c_room, buf, 2, '|', sizeof c_room);
+ scr_printf("Got room %s\n", c_room);
+ }
+ if (strcasecmp(c_text, "NOOP")) {
+ if (!strcmp(c_user, fullname)) {
+ color(BRIGHT_YELLOW);
+ } else if (!strcmp(c_user, ":")) {
+ color(BRIGHT_RED);
+ } else {
+ color(BRIGHT_GREEN);
}
- else {
- size_t i = MIN(sizeof buf - 1,
- strlen(c_user) + 2);
+ if (strcmp(c_user, last_user)) {
+ snprintf(buf, sizeof buf, "%s: %s", c_user, c_text);
+ } else {
+ size_t i = MIN(sizeof buf - 1,
+ strlen(c_user) + 2);
- memset(buf, ' ', i);
- safestrncpy(&buf[i], c_text,
- sizeof buf - i);
+ memset(buf, ' ', i);
+ safestrncpy(&buf[i], c_text,
+ sizeof buf - i);
}
- while (strlen(buf)<79) strcat(buf," ");
- if (strcmp(c_user,last_user)) {
- printf("\r%79s\n","");
- strcpy(last_user,c_user);
+ while (strlen(buf) < 79)
+ strcat(buf, " ");
+ if (strcmp(c_user, last_user)) {
+ sln_printf("\r%79s\n", "");
+ strcpy(last_user, c_user);
}
- printf("\r%s\n",buf);
- fflush(stdout);
+ scr_printf("\r%s\n", buf);
+ scr_flush();
}
}
- color(3);
- printf("> %s",wbuf);
- recv_complete_line = 0;
- strcpy(buf,"");
+ color(BRIGHT_YELLOW);
+ sln_printf("\r> %s", wbuf);
+ sln_flush();
+ recv_complete_line = 0;
+ strcpy(buf, "");
+ }
+
+ /* If the user is sitting idle, send a half-keepalive to the
+ * server to prevent session timeout.
+ */
+ if ((time(NULL) - last_transmit) >= S_KEEPALIVE) {
+ CtdlIPC_chat_send(ipc, "NOOP");
+ last_transmit = time(NULL);
}
- }
+
}
+}
/*
- * send an express message
+ * send an instant message
*/
-void page_user() {
- static char last_paged[32] = "";
- char buf[256], touser[256], msg[256];
- FILE *fp;
+void page_user(CtdlIPC *ipc)
+{
+ char buf[SIZ], touser[SIZ], msg[SIZ];
+ FILE *pagefp;
strcpy(touser, last_paged);
strprompt("Page who", touser, 30);
/* old server -- use inline paging */
- if (serv_info.serv_paging_level == 0) {
- newprompt("Message: ",msg,69);
- snprintf(buf,sizeof buf,"SEXP %s|%s",touser,msg);
- serv_puts(buf);
- serv_gets(buf);
+ if (ipc->ServInfo.paging_level == 0) {
+ newprompt("Message: ", msg, 69);
+ snprintf(buf, sizeof buf, "SEXP %s|%s", touser, msg);
+ CtdlIPC_chat_send(ipc, buf);
+ CtdlIPC_chat_recv(ipc, buf);
if (!strncmp(buf, "200", 3)) {
- strcpy(last_paged, touser);
- }
- printf("%s\n", &buf[4]);
+ strcpy(last_paged, touser);
+ }
+ scr_printf("%s\n", &buf[4]);
return;
}
-
- /* new server -- use extended paging */
- else if (serv_info.serv_paging_level >= 1) {
+ /* new server -- use extended paging */
+ else if (ipc->ServInfo.paging_level >= 1) {
snprintf(buf, sizeof buf, "SEXP %s||", touser);
- serv_puts(buf);
- serv_gets(buf);
+ CtdlIPC_chat_send(ipc, buf);
+ CtdlIPC_chat_recv(ipc, buf);
if (buf[0] != '2') {
- printf("%s\n", &buf[4]);
+ scr_printf("%s\n", &buf[4]);
return;
- }
- fp = fopen(temp, "w");
- fp = freopen(temp, "rb+", fp);
- if (fp==NULL) printf("Error: %s\n", strerror(errno));
+ }
+ if (client_make_message(ipc, temp, touser, 0, 0, 0, NULL) != 0) {
+ scr_printf("No message sent.\n");
+ return;
+ }
+ pagefp = fopen(temp, "r");
unlink(temp);
- printf("Type message to send. Enter a blank line when finished.\n");
- citedit(fp, 0);
snprintf(buf, sizeof buf, "SEXP %s|-", touser);
- serv_puts(buf);
- serv_gets(buf);
- if (buf[0]=='4') {
- strcpy(last_paged, touser);
- rewind(fp);
- while (fgets(buf, sizeof buf, fp) != NULL) {
- buf[strlen(buf)-1] = 0;
- if (strcmp(buf, "000")) serv_puts(buf);
- unlink(temp);
+ CtdlIPC_chat_send(ipc, buf);
+ CtdlIPC_chat_recv(ipc, buf);
+ if (buf[0] == '4') {
+ strcpy(last_paged, touser);
+ while (fgets(buf, sizeof buf, pagefp) != NULL) {
+ buf[strlen(buf) - 1] = 0;
+ CtdlIPC_chat_send(ipc, buf);
}
- serv_puts("000");
- printf("Message sent.\n");
+ fclose(pagefp);
+ CtdlIPC_chat_send(ipc, "000");
+ scr_printf("Message sent.\n");
+ } else {
+ scr_printf("%s\n", &buf[4]);
}
- else {
- printf("%s\n", &buf[4]);
- }
- fclose(fp);
}
}
+void quiet_mode(CtdlIPC *ipc)
+{
+ static int quiet = 0;
+ char cret[SIZ];
+ int r;
+ r = CtdlIPCEnableInstantMessageReceipt(ipc, !quiet, cret);
+ if (r / 100 == 2) {
+ quiet = !quiet;
+ scr_printf("Quiet mode %sabled (%sother users may page you)\n",
+ (quiet) ? "en" : "dis",
+ (quiet) ? "no " : "");
+ } else {
+ scr_printf("Unable to change quiet mode: %s\n", cret);
+ }
+}
+
+
+void stealth_mode(CtdlIPC *ipc)
+{
+ static int stealth = 0;
+ char cret[SIZ];
+ int r;
+
+ r = CtdlIPCStealthMode(ipc, !stealth, cret);
+ if (r / 100 == 2) {
+ stealth = !stealth;
+ scr_printf("Stealth mode %sabled (you are %s)\n",
+ (stealth) ? "en" : "dis",
+ (stealth) ? "invisible" : "listed as online");
+ } else {
+ scr_printf("Unable to change stealth mode: %s\n", cret);
+ }
+}