/*
* Transmit a message into a room chat
*/
void roomchat_send(char *argbuf) {
char buf[1024];
if ((CC->cs_flags & CS_CHAT) == 0) {
cprintf("%d Session is not in chat mode.\n", ERROR);
return;
}
cprintf("%d send now\n", SEND_LISTING);
while (client_getln(buf, sizeof buf) >= 0 && strcmp(buf, "000")) {
add_to_chat_queue(buf);
}
}
/*
* Citadel protocol to manage sieve scripts.
* This is basically a simplified (read: doesn't resemble IMAP) version
* of the 'managesieve' protocol.
*/
void cmd_tspam(char *argbuf) {
char buf[SIZ];
long len;
long count;
stringlist *Messages;
stringlist *NextMsg;
Messages = NULL;
NextMsg = NULL;
count = 0;
if (CtdlAccessCheck(ac_room_aide)) return;
if (atoi(argbuf) == 0) {
cprintf("%d Ok.\n", CIT_OK);
return;
}
cprintf("%d Send info...\n", SEND_LISTING);
do {
len = client_getln(buf, sizeof buf);
if (strcmp(buf, "000")) {
if (Messages == NULL) {
Messages = malloc (sizeof (stringlist));
NextMsg = Messages;
}
else {
Messages->Next = malloc (sizeof (stringlist));
NextMsg = NextMsg->Next;
}
NextMsg->Next = NULL;
NextMsg->Str = malloc (len+1);
NextMsg->len = len;
memcpy (NextMsg->Str, buf, len + 1);/// maybe split spam /ham per line?
count++;
}
} while (strcmp(buf, "000"));
/// is there a way to filter foreachmessage by a list?
/* tag mails as spam or Ham */
/* probably do: dspam_init(ctdl_dspam_dir); dspam_process dspam_addattribute; dspam_destroy*/
// extract DSS_ERROR or DSS_CORPUS from the commandline. error->ham; corpus -> spam?
/// todo: send answer listing...
}
void cmd_einf(char *ok)
{ /* enter info file for current room */
FILE *fp;
char infofilename[SIZ];
char buf[SIZ];
unbuffer_output();
if (CtdlAccessCheck(ac_room_aide)) return;
if (atoi(ok) == 0) {
cprintf("%d Ok.\n", CIT_OK);
return;
}
assoc_file_name(infofilename, sizeof infofilename, &CC->room, ctdl_info_dir);
syslog(LOG_DEBUG, "opening\n");
fp = fopen(infofilename, "w");
syslog(LOG_DEBUG, "checking\n");
if (fp == NULL) {
cprintf("%d Cannot open %s: %s\n",
ERROR + INTERNAL_ERROR, infofilename, strerror(errno));
return;
}
cprintf("%d Send info...\n", SEND_LISTING);
do {
client_getln(buf, sizeof buf);
if (strcmp(buf, "000"))
fprintf(fp, "%s\n", buf);
} while (strcmp(buf, "000"));
fclose(fp);
/* now update the room index so people will see our new info */
CtdlGetRoomLock(&CC->room, CC->room.QRname); /* lock so no one steps on us */
CC->room.QRinfo = CC->room.QRhighest + 1L;
CtdlPutRoomLock(&CC->room);
}
/*
* Finalize an OpenID authentication
*/
void cmd_oidf(char *argbuf) {
long len;
char buf[2048];
char thiskey[1024];
char thisdata[1024];
HashList *keys = NULL;
const char *Key;
void *Value;
ctdl_openid *oiddata = (ctdl_openid *) CC->openid_data;
if (CtdlGetConfigInt("c_disable_newu"))
{
cprintf("%d this system does not support openid.\n",
ERROR + CMD_NOT_SUPPORTED);
return;
}
if (oiddata == NULL) {
cprintf("%d run OIDS first.\n", ERROR + INTERNAL_ERROR);
return;
}
if (StrLength(oiddata->op_url) == 0){
cprintf("%d No OpenID Endpoint URL has been obtained.\n", ERROR + ILLEGAL_VALUE);
return;
}
keys = NewHash(1, NULL);
if (!keys) {
cprintf("%d NewHash() failed\n", ERROR + INTERNAL_ERROR);
return;
}
cprintf("%d Transmit OpenID data now\n", START_CHAT_MODE);
while (client_getln(buf, sizeof buf), strcmp(buf, "000")) {
len = extract_token(thiskey, buf, 0, '|', sizeof thiskey);
if (len < 0) {
len = sizeof(thiskey) - 1;
}
extract_token(thisdata, buf, 1, '|', sizeof thisdata);
Put(keys, thiskey, len, strdup(thisdata), NULL);
}
/* Check to see if this is a correct response.
* Start with verified=1 but then set it to 0 if anything looks wrong.
*/
oiddata->verified = 1;
char *openid_ns = NULL;
if ( (!GetHash(keys, "ns", 2, (void *) &openid_ns))
|| (strcasecmp(openid_ns, "http://specs.openid.net/auth/2.0"))
) {
syslog(LOG_DEBUG, "This is not an an OpenID assertion");
oiddata->verified = 0;
}
char *openid_mode = NULL;
if ( (!GetHash(keys, "mode", 4, (void *) &openid_mode))
|| (strcasecmp(openid_mode, "id_res"))
) {
oiddata->verified = 0;
}
char *openid_claimed_id = NULL;
if (GetHash(keys, "claimed_id", 10, (void *) &openid_claimed_id)) {
FreeStrBuf(&oiddata->claimed_id);
oiddata->claimed_id = NewStrBufPlain(openid_claimed_id, -1);
syslog(LOG_DEBUG, "Provider is asserting the Claimed ID '%s'", ChrPtr(oiddata->claimed_id));
}
/* Validate the assertion against the server */
syslog(LOG_DEBUG, "Validating...");
CURL *curl;
CURLcode res;
struct curl_httppost *formpost = NULL;
struct curl_httppost *lastptr = NULL;
char errmsg[1024] = "";
StrBuf *ReplyBuf = NewStrBuf();
curl_formadd(&formpost, &lastptr,
CURLFORM_COPYNAME, "openid.mode",
CURLFORM_COPYCONTENTS, "check_authentication",
CURLFORM_END
);
HashPos *HashPos = GetNewHashPos(keys, 0);
while (GetNextHashPos(keys, HashPos, &len, &Key, &Value) != 0) {
if (strcasecmp(Key, "mode")) {
char k_o_keyname[1024];
snprintf(k_o_keyname, sizeof k_o_keyname, "openid.%s", (const char *)Key);
curl_formadd(&formpost, &lastptr,
CURLFORM_COPYNAME, k_o_keyname,
CURLFORM_COPYCONTENTS, (char *)Value,
CURLFORM_END
);
}
}
DeleteHashPos(&HashPos);
curl = ctdl_openid_curl_easy_init(errmsg);
curl_easy_setopt(curl, CURLOPT_URL, ChrPtr(oiddata->op_url));
curl_easy_setopt(curl, CURLOPT_WRITEDATA, ReplyBuf);
curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, CurlFillStrBuf_callback);
curl_easy_setopt(curl, CURLOPT_HTTPPOST, formpost);
res = curl_easy_perform(curl);
if (res) {
syslog(LOG_DEBUG, "cmd_oidf() libcurl error %d: %s", res, errmsg);
oiddata->verified = 0;
}
curl_easy_cleanup(curl);
curl_formfree(formpost);
/* syslog(LOG_DEBUG, "Validation reply: \n%s", ChrPtr(ReplyBuf)); */
if (cbmstrcasestr(ChrPtr(ReplyBuf), "is_valid:true") == NULL) {
oiddata->verified = 0;
}
FreeStrBuf(&ReplyBuf);
syslog(LOG_DEBUG, "OpenID authentication %s", (oiddata->verified ? "succeeded" : "failed") );
/* Respond to the client */
if (oiddata->verified) {
/* If we were already logged in, attach the OpenID to the user's account */
if (CC->logged_in) {
if (attach_openid(&CC->user, oiddata->claimed_id) == 0) {
cprintf("attach\n");
syslog(LOG_DEBUG, "OpenID attach succeeded");
}
else {
cprintf("fail\n");
syslog(LOG_DEBUG, "OpenID attach failed");
}
}
/* Otherwise, a user is attempting to log in using the verified OpenID */
else {
/*
* Existing user who has claimed this OpenID?
*
* Note: if you think that sending the password back over the wire is insecure,
* check your assumptions. If someone has successfully asserted an OpenID that
* is associated with the account, they already have password equivalency and can
* login, so they could just as easily change the password, etc.
*/
if (login_via_openid(oiddata->claimed_id) == 0) {
cprintf("authenticate\n%s\n%s\n", CC->user.fullname, CC->user.password);
logged_in_response();
syslog(LOG_DEBUG, "Logged in using previously claimed OpenID");
}
/*
* If this system does not allow self-service new user registration, the
* remaining modes do not apply, so fail here and now.
*/
else if (CtdlGetConfigInt("c_disable_newu")) {
cprintf("fail\n");
syslog(LOG_DEBUG, "Creating user failed due to local policy");
}
/*
* New user whose OpenID is verified and Attribute Exchange gave us a name?
*/
else if (openid_create_user_via_ax(oiddata->claimed_id, keys) == 0) {
cprintf("authenticate\n%s\n%s\n", CC->user.fullname, CC->user.password);
logged_in_response();
syslog(LOG_DEBUG, "Successfully auto-created new user");
}
/*
* OpenID is verified, but the desired username either was not specified or
* conflicts with an existing user. Manual account creation is required.
*/
else {
char *desired_name = NULL;
cprintf("verify_only\n");
cprintf("%s\n", ChrPtr(oiddata->claimed_id));
if (GetHash(keys, "sreg.nickname", 13, (void *) &desired_name)) {
cprintf("%s\n", desired_name);
}
else {
cprintf("\n");
}
syslog(LOG_DEBUG, "The desired display name is already taken.");
}
}
}
else {
cprintf("fail\n");
}
cprintf("000\n");
if (oiddata->sreg_keys != NULL) {
DeleteHash(&oiddata->sreg_keys);
oiddata->sreg_keys = NULL;
}
oiddata->sreg_keys = keys;
}
/*
* Get or set global configuration options
*
* IF YOU ADD OR CHANGE FIELDS HERE, YOU *MUST* DOCUMENT YOUR CHANGES AT:
* http://www.citadel.org/doku.php?id=documentation:applicationprotocol
*
*/
void cmd_conf(char *argbuf)
{
char cmd[16];
char buf[256];
int a;
char *confptr;
char confname[128];
if (CtdlAccessCheck(ac_aide)) return;
extract_token(cmd, argbuf, 0, '|', sizeof cmd);
if (!strcasecmp(cmd, "GET")) {
cprintf("%d Configuration...\n", LISTING_FOLLOWS);
cprintf("%s\n", config.c_nodename);
cprintf("%s\n", config.c_fqdn);
cprintf("%s\n", config.c_humannode);
cprintf("%s\n", config.c_phonenum);
cprintf("%d\n", config.c_creataide);
cprintf("%d\n", config.c_sleeping);
cprintf("%d\n", config.c_initax);
cprintf("%d\n", config.c_regiscall);
cprintf("%d\n", config.c_twitdetect);
cprintf("%s\n", config.c_twitroom);
cprintf("%s\n", config.c_moreprompt);
cprintf("%d\n", config.c_restrict);
cprintf("%s\n", config.c_site_location);
cprintf("%s\n", config.c_sysadm);
cprintf("%d\n", config.c_maxsessions);
cprintf("xxx\n"); /* placeholder -- field no longer in use */
cprintf("%d\n", config.c_userpurge);
cprintf("%d\n", config.c_roompurge);
cprintf("%s\n", config.c_logpages);
cprintf("%d\n", config.c_createax);
cprintf("%ld\n", config.c_maxmsglen);
cprintf("%d\n", config.c_min_workers);
cprintf("%d\n", config.c_max_workers);
cprintf("%d\n", config.c_pop3_port);
cprintf("%d\n", config.c_smtp_port);
cprintf("%d\n", config.c_rfc822_strict_from);
cprintf("%d\n", config.c_aide_zap);
cprintf("%d\n", config.c_imap_port);
cprintf("%ld\n", config.c_net_freq);
cprintf("%d\n", config.c_disable_newu);
cprintf("1\n"); /* niu */
cprintf("%d\n", config.c_purge_hour);
#ifdef HAVE_LDAP
cprintf("%s\n", config.c_ldap_host);
cprintf("%d\n", config.c_ldap_port);
cprintf("%s\n", config.c_ldap_base_dn);
cprintf("%s\n", config.c_ldap_bind_dn);
cprintf("%s\n", config.c_ldap_bind_pw);
#else
cprintf("\n");
cprintf("0\n");
cprintf("\n");
cprintf("\n");
cprintf("\n");
#endif
cprintf("%s\n", config.c_ip_addr);
cprintf("%d\n", config.c_msa_port);
cprintf("%d\n", config.c_imaps_port);
cprintf("%d\n", config.c_pop3s_port);
cprintf("%d\n", config.c_smtps_port);
cprintf("%d\n", config.c_enable_fulltext);
cprintf("%d\n", config.c_auto_cull);
cprintf("1\n");
cprintf("%d\n", config.c_allow_spoofing);
cprintf("%d\n", config.c_journal_email);
cprintf("%d\n", config.c_journal_pubmsgs);
cprintf("%s\n", config.c_journal_dest);
cprintf("%s\n", config.c_default_cal_zone);
cprintf("%d\n", config.c_pftcpdict_port);
cprintf("%d\n", config.c_managesieve_port);
cprintf("%d\n", config.c_auth_mode);
cprintf("%s\n", config.c_funambol_host);
cprintf("%d\n", config.c_funambol_port);
cprintf("%s\n", config.c_funambol_source);
cprintf("%s\n", config.c_funambol_auth);
cprintf("%d\n", config.c_rbl_at_greeting);
cprintf("%s\n", config.c_master_user);
cprintf("%s\n", config.c_master_pass);
cprintf("%s\n", config.c_pager_program);
cprintf("%d\n", config.c_imap_keep_from);
cprintf("%d\n", config.c_xmpp_c2s_port);
cprintf("%d\n", config.c_xmpp_s2s_port);
cprintf("%ld\n", config.c_pop3_fetch);
cprintf("%ld\n", config.c_pop3_fastest);
cprintf("%d\n", config.c_spam_flag_only);
cprintf("%d\n", config.c_guest_logins);
cprintf("%d\n", config.c_port_number);
cprintf("%d\n", config.c_ctdluid);
cprintf("%d\n", config.c_nntp_port);
cprintf("%d\n", config.c_nntps_port);
cprintf("000\n");
}
else if (!strcasecmp(cmd, "SET")) {
unbuffer_output();
cprintf("%d Send configuration...\n", SEND_LISTING);
a = 0;
while (client_getln(buf, sizeof buf) >= 0 && strcmp(buf, "000")) {
switch (a) {
case 0:
configlen.c_nodename = safestrncpy(config.c_nodename, buf,
sizeof config.c_nodename);
break;
case 1:
configlen.c_fqdn = safestrncpy(config.c_fqdn, buf,
sizeof config.c_fqdn);
break;
case 2:
configlen.c_humannode = safestrncpy(config.c_humannode, buf,
sizeof config.c_humannode);
break;
case 3:
configlen.c_phonenum = safestrncpy(config.c_phonenum, buf,
sizeof config.c_phonenum);
break;
case 4:
config.c_creataide = atoi(buf);
break;
case 5:
config.c_sleeping = atoi(buf);
break;
case 6:
config.c_initax = atoi(buf);
if (config.c_initax < 1)
config.c_initax = 1;
if (config.c_initax > 6)
config.c_initax = 6;
break;
case 7:
config.c_regiscall = atoi(buf);
if (config.c_regiscall != 0)
config.c_regiscall = 1;
break;
case 8:
config.c_twitdetect = atoi(buf);
if (config.c_twitdetect != 0)
config.c_twitdetect = 1;
break;
case 9:
configlen.c_twitroom = safestrncpy(config.c_twitroom, buf,
sizeof config.c_twitroom);
break;
case 10:
configlen.c_moreprompt = safestrncpy(config.c_moreprompt, buf,
sizeof config.c_moreprompt);
break;
case 11:
config.c_restrict = atoi(buf);
if (config.c_restrict != 0)
config.c_restrict = 1;
break;
case 12:
configlen.c_site_location = safestrncpy(
config.c_site_location, buf,
sizeof config.c_site_location);
break;
case 13:
configlen.c_sysadm = safestrncpy(config.c_sysadm, buf,
sizeof config.c_sysadm);
break;
case 14:
config.c_maxsessions = atoi(buf);
if (config.c_maxsessions < 0)
config.c_maxsessions = 0;
break;
case 15:
/* placeholder -- field no longer in use */
break;
case 16:
config.c_userpurge = atoi(buf);
break;
case 17:
config.c_roompurge = atoi(buf);
break;
case 18:
configlen.c_logpages = safestrncpy(config.c_logpages, buf,
sizeof config.c_logpages);
break;
case 19:
config.c_createax = atoi(buf);
if (config.c_createax < 1)
config.c_createax = 1;
if (config.c_createax > 6)
config.c_createax = 6;
break;
case 20:
if (atoi(buf) >= 8192)
config.c_maxmsglen = atoi(buf);
break;
case 21:
if (atoi(buf) >= 2)
config.c_min_workers = atoi(buf);
case 22:
if (atoi(buf) >= config.c_min_workers)
config.c_max_workers = atoi(buf);
case 23:
config.c_pop3_port = atoi(buf);
break;
case 24:
config.c_smtp_port = atoi(buf);
break;
case 25:
config.c_rfc822_strict_from = atoi(buf);
break;
case 26:
config.c_aide_zap = atoi(buf);
if (config.c_aide_zap != 0)
config.c_aide_zap = 1;
break;
case 27:
config.c_imap_port = atoi(buf);
break;
case 28:
config.c_net_freq = atol(buf);
break;
case 29:
config.c_disable_newu = atoi(buf);
if (config.c_disable_newu != 0)
config.c_disable_newu = 1;
break;
case 30:
/* niu */
break;
case 31:
if ((config.c_purge_hour >= 0)
&& (config.c_purge_hour <= 23)) {
config.c_purge_hour = atoi(buf);
}
break;
#ifdef HAVE_LDAP
case 32:
configlen.c_ldap_host = safestrncpy(config.c_ldap_host, buf,
sizeof config.c_ldap_host);
break;
case 33:
config.c_ldap_port = atoi(buf);
break;
case 34:
configlen.c_ldap_base_dn = safestrncpy(config.c_ldap_base_dn, buf,
sizeof config.c_ldap_base_dn);
break;
case 35:
configlen.c_ldap_bind_dn = safestrncpy(config.c_ldap_bind_dn, buf,
sizeof config.c_ldap_bind_dn);
break;
case 36:
configlen.c_ldap_bind_pw = safestrncpy(config.c_ldap_bind_pw, buf,
sizeof config.c_ldap_bind_pw);
break;
#endif
case 37:
configlen.c_ip_addr = safestrncpy(config.c_ip_addr, buf,
sizeof config.c_ip_addr);
case 38:
config.c_msa_port = atoi(buf);
break;
case 39:
config.c_imaps_port = atoi(buf);
break;
case 40:
config.c_pop3s_port = atoi(buf);
break;
case 41:
config.c_smtps_port = atoi(buf);
break;
case 42:
config.c_enable_fulltext = atoi(buf);
break;
case 43:
config.c_auto_cull = atoi(buf);
break;
case 44:
/* niu */
break;
case 45:
config.c_allow_spoofing = atoi(buf);
break;
case 46:
config.c_journal_email = atoi(buf);
break;
case 47:
config.c_journal_pubmsgs = atoi(buf);
break;
case 48:
configlen.c_journal_dest = safestrncpy(config.c_journal_dest, buf,
sizeof config.c_journal_dest);
case 49:
configlen.c_default_cal_zone = safestrncpy(
config.c_default_cal_zone, buf,
sizeof config.c_default_cal_zone);
break;
case 50:
config.c_pftcpdict_port = atoi(buf);
break;
case 51:
config.c_managesieve_port = atoi(buf);
break;
case 52:
config.c_auth_mode = atoi(buf);
case 53:
configlen.c_funambol_host = safestrncpy(
config.c_funambol_host, buf,
sizeof config.c_funambol_host);
break;
case 54:
config.c_funambol_port = atoi(buf);
break;
case 55:
configlen.c_funambol_source = safestrncpy(
config.c_funambol_source, buf,
sizeof config.c_funambol_source);
break;
case 56:
configlen.c_funambol_auth = safestrncpy(
config.c_funambol_auth, buf,
sizeof config.c_funambol_auth);
break;
case 57:
config.c_rbl_at_greeting = atoi(buf);
break;
case 58:
configlen.c_master_user = safestrncpy(
config.c_master_user,
buf, sizeof config.c_master_user);
break;
case 59:
configlen.c_master_pass = safestrncpy(
config.c_master_pass, buf, sizeof config.c_master_pass);
break;
case 60:
configlen.c_pager_program = safestrncpy(
config.c_pager_program, buf, sizeof config.c_pager_program);
break;
case 61:
config.c_imap_keep_from = atoi(buf);
break;
case 62:
config.c_xmpp_c2s_port = atoi(buf);
break;
case 63:
config.c_xmpp_s2s_port = atoi(buf);
break;
case 64:
config.c_pop3_fetch = atol(buf);
break;
case 65:
config.c_pop3_fastest = atol(buf);
break;
case 66:
config.c_spam_flag_only = atoi(buf);
break;
case 67:
config.c_guest_logins = atoi(buf);
break;
case 68:
config.c_port_number = atoi(buf);
break;
case 69:
config.c_ctdluid = atoi(buf);
break;
case 70:
config.c_nntp_port = atoi(buf);
break;
case 71:
config.c_nntps_port = atoi(buf);
break;
}
++a;
}
put_config();
snprintf(buf, sizeof buf,
"The global system configuration has been edited by %s.\n",
(CC->logged_in ? CC->curr_user : "******")
);
CtdlAideMessage(buf,"Citadel Configuration Manager Message");
if (!IsEmptyStr(config.c_logpages))
CtdlCreateRoom(config.c_logpages, 3, "", 0, 1, 1, VIEW_BBS);
/* If full text indexing has been disabled, invalidate the
* index so it doesn't try to use it later.
*/
if (config.c_enable_fulltext == 0) {
CitControl.fulltext_wordbreaker = 0;
put_control();
}
}
else if (!strcasecmp(cmd, "GETSYS")) {
extract_token(confname, argbuf, 1, '|', sizeof confname);
confptr = CtdlGetSysConfig(confname);
if (confptr != NULL) {
long len;
len = strlen(confptr);
cprintf("%d %s\n", LISTING_FOLLOWS, confname);
client_write(confptr, len);
if ((len > 0) && (confptr[len - 1] != 10))
client_write("\n", 1);
cprintf("000\n");
free(confptr);
} else {
cprintf("%d No such configuration.\n",
ERROR + ILLEGAL_VALUE);
}
}
else if (!strcasecmp(cmd, "PUTSYS")) {
extract_token(confname, argbuf, 1, '|', sizeof confname);
unbuffer_output();
cprintf("%d %s\n", SEND_LISTING, confname);
confptr = CtdlReadMessageBody(HKEY("000"), config.c_maxmsglen, NULL, 0, 0);
CtdlPutSysConfig(confname, confptr);
free(confptr);
}
else {
cprintf("%d Illegal option(s) specified.\n",
ERROR + ILLEGAL_VALUE);
}
}
/*
* send instant messages
*/
void cmd_sexp(char *argbuf)
{
int message_sent = 0;
char x_user[USERNAME_SIZE];
char x_msg[1024];
char *lun;
char *lem;
char *x_big_msgbuf = NULL;
if ((!(CC->logged_in)) && (!(CC->internal_pgm))) {
cprintf("%d Not logged in.\n", ERROR + NOT_LOGGED_IN);
return;
}
if (CC->fake_username[0])
lun = CC->fake_username;
else
lun = CC->user.fullname;
lem = CC->cs_inet_email;
extract_token(x_user, argbuf, 0, '|', sizeof x_user);
extract_token(x_msg, argbuf, 1, '|', sizeof x_msg);
if (!x_user[0]) {
cprintf("%d You were not previously paged.\n", ERROR + NO_SUCH_USER);
return;
}
if ((!strcasecmp(x_user, "broadcast")) && (CC->user.axlevel < AxAideU)) {
cprintf("%d Higher access required to send a broadcast.\n",
ERROR + HIGHER_ACCESS_REQUIRED);
return;
}
/* This loop handles text-transfer pages */
if (!strcmp(x_msg, "-")) {
message_sent = PerformXmsgHooks(lun, lem, x_user, "");
if (message_sent == 0) {
if (CtdlGetUser(NULL, x_user))
cprintf("%d '%s' does not exist.\n",
ERROR + NO_SUCH_USER, x_user);
else
cprintf("%d '%s' is not logged in "
"or is not accepting pages.\n",
ERROR + RESOURCE_NOT_OPEN, x_user);
return;
}
unbuffer_output();
cprintf("%d Transmit message (will deliver to %d users)\n",
SEND_LISTING, message_sent);
x_big_msgbuf = malloc(SIZ);
memset(x_big_msgbuf, 0, SIZ);
while (client_getln(x_msg, sizeof x_msg) >= 0 && strcmp(x_msg, "000")) {
x_big_msgbuf = realloc(x_big_msgbuf,
strlen(x_big_msgbuf) + strlen(x_msg) + 4);
if (!IsEmptyStr(x_big_msgbuf))
if (x_big_msgbuf[strlen(x_big_msgbuf)] != '\n')
strcat(x_big_msgbuf, "\n");
strcat(x_big_msgbuf, x_msg);
}
PerformXmsgHooks(lun, lem, x_user, x_big_msgbuf);
free(x_big_msgbuf);
/* This loop handles inline pages */
} else {
message_sent = PerformXmsgHooks(lun, lem, x_user, x_msg);
if (message_sent > 0) {
if (!IsEmptyStr(x_msg))
cprintf("%d Message sent", CIT_OK);
else
cprintf("%d Ok to send message", CIT_OK);
if (message_sent > 1)
cprintf(" to %d users", message_sent);
cprintf(".\n");
} else {
if (CtdlGetUser(NULL, x_user))
cprintf("%d '%s' does not exist.\n",
ERROR + NO_SUCH_USER, x_user);
else
cprintf("%d '%s' is not logged in "
"or is not accepting pages.\n",
ERROR + RESOURCE_NOT_OPEN, x_user);
}
}
}
