/* PROTO */
void
getmessage(void *c, const char *who, const int automessage, const char *message)
{
const char *msgin = message;
char *msg = NULL, *tempmsg = NULL;
char *sname;
struct Waiting *wtemp, *wptr = NULL;
int offset, foundWaiting = 0;
int otr_message = 0;
if (conn->otr) {
struct BuddyList *buddy = NULL;
buddy = find_buddy(who);
if (buddy) {
if (buddy->otr != -1) {
char *newmsg;
int ret = otrl_message_receiving(userstate, &ui_ops, NULL, conn->username,
otr_proto, buddy->sn, msgin, &newmsg, NULL,
&buddy->otr_context, NULL, NULL);
if (ret) {
#ifdef DEBUG
b_echostr_s();
printf("[OTR] debug: internal msg %s\n", msgin);
#endif
return;
} else {
if (newmsg) {
msgin = strdup(newmsg);
otrl_message_free(newmsg);
if (buddy->otr_context->msgstate == OTRL_MSGSTATE_ENCRYPTED)
otr_message = 1;
}
}
}
}
}
tempmsg = strip_html(msgin);
if (tempmsg == NULL)
return;
if (strlen(tempmsg) == 0) {
free(tempmsg);
return;
}
if (conn->netspeak_filter) {
msg = undo_netspeak(tempmsg);
free(tempmsg);
} else {
msg = tempmsg;
}
if (msg == NULL)
return;
if (strlen(msg) == 0) {
free(msg);
return;
}
if (conn->istyping == 0) {
if (conn->lastsn != NULL)
free(conn->lastsn);
conn->lastsn = simplify_sn(who);
}
sname = simplify_sn(who);
if (waiting == NULL) {
waiting = malloc(sizeof(struct Waiting));
wptr = waiting;
} else {
for (wtemp = waiting; wtemp != NULL; wtemp = wtemp->next)
if (imcomm_compare_nicks(c, wtemp->sn, who)) {
foundWaiting = 1;
wptr = wtemp;
break;
}
if (!foundWaiting) {
for (wtemp = waiting; wtemp->next != NULL;
wtemp = wtemp->next);
wtemp->next = malloc(sizeof(struct Waiting));
wptr = wtemp->next;
}
}
if (!foundWaiting) {
wptr->sn = strdup(who);
wptr->next = NULL;
if (conn->isaway && !automessage) {
if ((conn->respond_idle_only && conn->isidle)
|| (!conn->respond_idle_only)) {
imcomm_im_send_message(c, who, conn->awaymsg, 1);
eraseline();
b_echostr_s();
if (conn->timestamps) {
addts();
putchar(' ');
}
printf("Sent auto-response to %s.\n", who);
show_prompt();
}
}
}
#ifdef MESSAGE_QUEUE
if (conn->isaway)
wptr->mqueue = addToMQueue(wptr->mqueue, msg, who);
#endif /* MESSAGE_QUEUE */
eraseline();
if (conn->bell_on_incoming)
putchar('\a');
if (conn->timestamps) {
addts();
putchar(' ');
offset = 11;
} else {
offset = 0;
}
offset += strlen(who) + 2;
if (automessage) {
set_color(COLOR_AUTORESPONSE);
printf("*AUTO RESPONSE* ");
set_color(0);
offset += 16;
}
set_color(COLOR_INCOMING_IM);
if (!otr_message)
printf("%s", who);
else {
offset += 5;
printf("(otr)%s", who);
}
set_color(0);
printf(": ");
wordwrap_print(msg, offset);
if (automessage)
log_event(EVENT_IM_AUTORESPONSE, sname, msg);
else
log_event(EVENT_IM, sname, msg);
free(msg);
free(sname);
show_prompt();
}
/* PROTO */
void
input_paste(char *arg)
{
char *sn, *sendbuf, *pbuf;
size_t sendbuflen;
ssize_t pbuflen;
uint16_t maxmsgsize = imcomm_get_max_message_size(conn->conn);
if (conn->conn == NULL)
return;
sn = arg;
if (sn[0] == 0) {
printf("\n");
b_echostr_s();
printf("No recipient specified.\n");
return;
}
printf("\n");
b_echostr_s();
printf("Pasting to %s.\n", sn);
b_echostr_s();
printf("Enter '.' on a line by itself to send," " Ctrl-X to cancel.");
pbuf = malloc(maxmsgsize + 1);
sendbuf = malloc(maxmsgsize + 1);
memset(sendbuf, 0, maxmsgsize + 1);
sendbuflen = 0;
/*
* using fgets() produced strange results. had to resort to writing
* my own input stuff.
*/
while (1) {
printf("\n-> ");
fflush(stdout);
pbuflen = bsf_getline(pbuf, maxmsgsize - 5);
if (pbuflen == -1) {
free(pbuf);
free(sendbuf);
printf("\n");
return;
}
if (pbuflen == 1 && pbuf[0] == '.') {
if (sendbuflen > 0) {
imcomm_im_send_message(conn->conn, sn, sendbuf, 0);
}
break;
}
/*
* +4 is for "<br>"
*/
if (sendbuflen + pbuflen + 4 > maxmsgsize) {
imcomm_im_send_message(conn->conn, sn, sendbuf, 0);
memset(sendbuf, 0, maxmsgsize + 1);
memcpy(sendbuf, pbuf, pbuflen);
sendbuflen = pbuflen;
} else {
#ifdef __OpenBSD__
if (sendbuflen != 0) {
strlcat(sendbuf, "<br>", maxmsgsize + 1);
pbuflen += 4;
}
strlcat(sendbuf, pbuf, maxmsgsize + 1);
#else
if (sendbuflen != 0) {
strcat(sendbuf, "<br>");
pbuflen += 4;
}
strcat(sendbuf, pbuf);
#endif
sendbuflen += pbuflen;
}
}
printf("\n");
free(sendbuf);
free(pbuf);
}
status_t
AIMProtocol::Process(BMessage* msg)
{
switch (msg->what) {
case IM_MESSAGE: {
int32 im_what = 0;
msg->FindInt32("im_what", &im_what);
switch (im_what) {
case IM_SET_OWN_STATUS: {
int32 status = msg->FindInt32("status");
BString status_msg("");
msg->FindString("message", &status_msg);
char* smsg = strdup(status_msg.String());
switch (status) {
case CAYA_ONLINE:
if (!fOnline)
A_LogOn();
else
imcomm_set_unaway(fIMCommHandle);
break;
case CAYA_AWAY:
imcomm_set_away(fIMCommHandle, smsg);
break;
case CAYA_CUSTOM_STATUS:
//imcomm_set_away(fIMCommHandle, smsg);
//UnsupportedOperation(); ?
break;
case CAYA_DO_NOT_DISTURB:
imcomm_set_away(fIMCommHandle, smsg);
//UnsupportedOperation(); ?
break;
case CAYA_OFFLINE:
LogOff();
break;
default:
break;
}
free(smsg);
BMessage msg(IM_MESSAGE);
msg.AddInt32("im_what", IM_STATUS_SET);
msg.AddString("protocol", kProtocolSignature);
msg.AddInt32("status", status);
gServerMsgr->SendMessage(&msg);
break;
}
case IM_SET_NICKNAME:
UnsupportedOperation();
break;
case IM_SEND_MESSAGE: {
const char* buddy = msg->FindString("id");
const char* sms = msg->FindString("body");
imcomm_im_send_message(fIMCommHandle, buddy, sms, 0);
// XXX send a message to let caya know we did it
BMessage msg(IM_MESSAGE);
msg.AddInt32("im_what", IM_MESSAGE_SENT);
msg.AddString("protocol", kProtocolSignature);
msg.AddString("id", buddy);
msg.AddString("body", sms);
gServerMsgr->SendMessage(&msg);
break;
}
case IM_REGISTER_CONTACTS: {
const char* buddy = NULL;
char *buddy_copy;
for (int32 i = 0; msg->FindString("id", i, &buddy) == B_OK; i++) {
buddy_copy = strdup(buddy);
imcomm_im_add_buddy(fIMCommHandle, buddy_copy);
free(buddy_copy);
}
break;
}
case IM_UNREGISTER_CONTACTS: {
const char* buddy = NULL;
for (int32 i = 0; msg->FindString("id", i, &buddy) == B_OK; i++)
imcomm_im_remove_buddy(fIMCommHandle, buddy);
break;
}
case IM_USER_STARTED_TYPING:
//UnsupportedOperation();
break;
case IM_USER_STOPPED_TYPING:
//UnsupportedOperation();
break;
case IM_GET_CONTACT_INFO:
UnsupportedOperation();
break;
case IM_ASK_AUTHORIZATION:
case IM_AUTHORIZATION_RECEIVED:
case IM_AUTHORIZATION_REQUEST:
case IM_AUTHORIZATION_RESPONSE:
case IM_CONTACT_AUTHORIZED:
UnsupportedOperation();
break;
case IM_SPECIAL_TO_PROTOCOL:
UnsupportedOperation();
break;
default:
return B_ERROR;
}
break;
}
default:
// We don't handle this what code
return B_ERROR;
}
return B_OK;
}
/* PROTO */
void
input_send_message(char *arg)
{
char *msg, *msg_strip, *temp, *sn;
char *fullmsg;
size_t fullmsg_len;
int offset;
if (conn->conn == NULL)
return;
temp = strchr(arg, ' ');
if (temp == NULL) {
printf("\n");
b_echostr_s();
printf("No message to send.\n");
return;
}
if (strlen(temp + 1) == 0) {
printf("\nNo message to send.\n");
return;
}
if (conn->netspeak_filter)
msg = undo_netspeak(temp + 1);
else
msg = temp + 1;
sn = malloc(temp - arg + 1);
sn[temp - arg] = 0;
strncpy(sn, arg, temp - arg);
fullmsg_len =
strlen(msg) + strlen(SEND_FORMAT_BEGIN) + strlen(SEND_FORMAT_END) +
1;
fullmsg = malloc(fullmsg_len + 1);
snprintf(fullmsg, fullmsg_len, "%s%s%s", SEND_FORMAT_BEGIN, msg,
SEND_FORMAT_END);
imcomm_im_send_message(conn->conn, sn, fullmsg, 0);
free(fullmsg);
eraseline();
if (conn->timestamps) {
addts();
putchar(' ');
offset = 13;
} else {
offset = 2;
}
offset += strlen(sn) + 2;
set_color(COLOR_OUTGOING_IM);
printf("->%s", sn);
set_color(0);
printf(": ");
msg_strip = strip_html(msg);
wordwrap_print(msg_strip, offset);
free(msg_strip);
if (conn->lastsn != NULL)
free(conn->lastsn);
conn->lastsn = strdup(sn);
log_event(EVENT_IMSEND, sn, msg);
free(sn);
if (conn->netspeak_filter)
free(msg);
}
/* PROTO */
void
getmessage(void *c, const char *who, const int automessage, const char *message)
{
char *msg, *tempmsg;
char *sname;
struct Waiting *wtemp, *wptr = NULL;
int offset, foundWaiting = 0;
tempmsg = strip_html(message);
if (tempmsg == NULL)
return;
if (strlen(tempmsg) == 0) {
free(tempmsg);
return;
}
if (conn->netspeak_filter) {
msg = undo_netspeak(tempmsg);
free(tempmsg);
} else {
msg = tempmsg;
}
if (msg == NULL)
return;
if (strlen(msg) == 0) {
free(msg);
return;
}
if (conn->istyping == 0) {
if (conn->lastsn != NULL)
free(conn->lastsn);
conn->lastsn = simplify_sn(who);
}
sname = simplify_sn(who);
if (waiting == NULL) {
waiting = malloc(sizeof(struct Waiting));
wptr = waiting;
} else {
for (wtemp = waiting; wtemp != NULL; wtemp = wtemp->next)
if (imcomm_compare_nicks(c, wtemp->sn, who)) {
foundWaiting = 1;
wptr = wtemp;
break;
}
if (!foundWaiting) {
for (wtemp = waiting; wtemp->next != NULL;
wtemp = wtemp->next);
wtemp->next = malloc(sizeof(struct Waiting));
wptr = wtemp->next;
}
}
if (!foundWaiting) {
wptr->sn = strdup(who);
wptr->next = NULL;
if (conn->isaway && !automessage) {
if ((conn->respond_idle_only && conn->isidle)
|| (!conn->respond_idle_only)) {
imcomm_im_send_message(c, who, conn->awaymsg, 1);
eraseline();
b_echostr_s();
if (conn->timestamps) {
addts();
putchar(' ');
}
printf("Sent auto-response to %s.\n", who);
show_prompt();
}
}
}
#ifdef MESSAGE_QUEUE
if (conn->isaway)
wptr->mqueue = addToMQueue(wptr->mqueue, msg, who);
#endif /* MESSAGE_QUEUE */
eraseline();
if (conn->bell_on_incoming)
putchar('\a');
if (conn->timestamps) {
addts();
putchar(' ');
offset = 11;
} else {
offset = 0;
}
offset += strlen(who) + 2;
if (automessage) {
set_color(COLOR_AUTORESPONSE);
printf("*AUTO RESPONSE* ");
set_color(0);
offset += 16;
}
set_color(COLOR_INCOMING_IM);
printf("%s", who);
set_color(0);
printf(": ");
wordwrap_print(msg, offset);
if (automessage)
log_event(EVENT_IM_AUTORESPONSE, sname, msg);
else
log_event(EVENT_IM, sname, msg);
free(msg);
free(sname);
show_prompt();
}
