void prplcb_conv_del_users( PurpleConversation *conv, GList *cbuddies )
{
struct groupchat *gc = conv->ui_data;
GList *b;
for( b = cbuddies; b; b = b->next )
imcb_chat_remove_buddy( gc, b->data, "" );
}
static void skype_parse_chatmessage(struct im_connection *ic, char *line)
{
struct skype_data *sd = ic->proto_data;
char *id = strchr(line, ' ');
if (!++id)
return;
char *info = strchr(id, ' ');
if (!info)
return;
*info = '\0';
info++;
if (!strcmp(info, "STATUS RECEIVED") || !strncmp(info, "EDITED_TIMESTAMP", 16)) {
/* New message ID:
* (1) Request its from field
* (2) Request its body
* (3) Request its type
* (4) Query chatname
*/
skype_printf(ic, "GET CHATMESSAGE %s FROM_HANDLE\n", id);
if (!strcmp(info, "STATUS RECEIVED"))
skype_printf(ic, "GET CHATMESSAGE %s BODY\n", id);
else
sd->is_edit = 1;
skype_printf(ic, "GET CHATMESSAGE %s TYPE\n", id);
skype_printf(ic, "GET CHATMESSAGE %s CHATNAME\n", id);
} else if (!strncmp(info, "FROM_HANDLE ", 12)) {
info += 12;
/* New from field value. Store
* it, then we can later use it
* when we got the message's
* body. */
g_free(sd->handle);
sd->handle = g_strdup_printf("*****@*****.**", info);
} else if (!strncmp(info, "EDITED_BY ", 10)) {
info += 10;
/* This is the same as
* FROM_HANDLE, except that we
* never request these lines
* from Skype, we just get
* them. */
g_free(sd->handle);
sd->handle = g_strdup_printf("*****@*****.**", info);
} else if (!strncmp(info, "BODY ", 5)) {
info += 5;
sd->body = g_list_append(sd->body, g_strdup(info));
} else if (!strncmp(info, "TYPE ", 5)) {
info += 5;
g_free(sd->type);
sd->type = g_strdup(info);
} else if (!strncmp(info, "CHATNAME ", 9)) {
info += 9;
if (sd->handle && sd->body && sd->type) {
struct groupchat *gc = bee_chat_by_title(ic->bee, ic, info);
int i;
for (i = 0; i < g_list_length(sd->body); i++) {
char *body = g_list_nth_data(sd->body, i);
if (!strcmp(sd->type, "SAID") ||
!strcmp(sd->type, "EMOTED")) {
skype_parse_chatmessage_said_emoted(ic, gc, body);
} else if (!strcmp(sd->type, "SETTOPIC") && gc)
imcb_chat_topic(gc,
sd->handle, body, 0);
else if (!strcmp(sd->type, "LEFT") && gc)
imcb_chat_remove_buddy(gc,
sd->handle, NULL);
}
g_list_free(sd->body);
sd->body = NULL;
}
}
}
/* Not really the same syntax as the normal pkt_ functions, but this isn't
called by the xmltree parser directly and this way I can add some extra
parameters so we won't have to repeat too many things done by the caller
already. */
void jabber_chat_pkt_presence(struct im_connection *ic, struct jabber_buddy *bud, struct xt_node *node)
{
struct groupchat *chat;
struct xt_node *c;
char *type = xt_find_attr(node, "type");
struct jabber_data *jd = ic->proto_data;
struct jabber_chat *jc;
char *s;
if ((chat = jabber_chat_by_jid(ic, bud->bare_jid)) == NULL) {
/* How could this happen?? We could do kill( self, 11 )
now or just wait for the OS to do it. :-) */
return;
}
jc = chat->data;
if (type == NULL && !(bud->flags & JBFLAG_IS_CHATROOM)) {
bud->flags |= JBFLAG_IS_CHATROOM;
/* If this one wasn't set yet, this buddy just joined the chat.
Slightly hackish way of finding out eh? ;-) */
/* This is pretty messy... Here it sets ext_jid to the real
JID of the participant. Works for non-anonymized channels.
Might break if someone joins a chat twice, though. */
for (c = node->children; (c = xt_find_node(c, "x")); c = c->next) {
if ((s = xt_find_attr(c, "xmlns")) &&
(strcmp(s, XMLNS_MUC_USER) == 0)) {
struct xt_node *item;
item = xt_find_node(c->children, "item");
if ((s = xt_find_attr(item, "jid"))) {
/* Yay, found what we need. :-) */
bud->ext_jid = jabber_normalize(s);
break;
}
}
}
/* Make up some other handle, if necessary. */
if (bud->ext_jid == NULL) {
if (bud == jc->me) {
bud->ext_jid = g_strdup(jd->me);
} else {
int i;
/* Don't want the nick to be at the end, so let's
think of some slightly different notation to use
for anonymous groupchat participants in BitlBee. */
bud->ext_jid = g_strdup_printf("%s=%s", bud->resource, bud->bare_jid);
/* And strip any unwanted characters. */
for (i = 0; bud->resource[i]; i++) {
if (bud->ext_jid[i] == '=' || bud->ext_jid[i] == '@') {
bud->ext_jid[i] = '_';
}
}
/* Some program-specific restrictions. */
imcb_clean_handle(ic, bud->ext_jid);
}
bud->flags |= JBFLAG_IS_ANONYMOUS;
}
if (bud != jc->me && bud->flags & JBFLAG_IS_ANONYMOUS) {
/* If JIDs are anonymized, add them to the local
list for the duration of this chat. */
imcb_add_buddy(ic, bud->ext_jid, NULL);
imcb_buddy_nick_hint(ic, bud->ext_jid, bud->resource);
}
if (bud == jc->me && jc->invite != NULL) {
char *msg = g_strdup_printf("Please join me in room %s", jc->name);
jabber_chat_invite(chat, jc->invite, msg);
g_free(jc->invite);
g_free(msg);
jc->invite = NULL;
}
s = strchr(bud->ext_jid, '/');
if (s) {
*s = 0; /* Should NEVER be NULL, but who knows... */
}
imcb_chat_add_buddy(chat, bud->ext_jid);
if (s) {
*s = '/';
}
} else if (type) { /* type can only be NULL or "unavailable" in this function */
if ((bud->flags & JBFLAG_IS_CHATROOM) && bud->ext_jid) {
char *reason = NULL;
char *status = NULL;
char *status_text = NULL;
if ((c = xt_find_node_by_attr(node->children, "x", "xmlns", XMLNS_MUC_USER))) {
struct xt_node *c2 = c->children;
while ((c2 = xt_find_node(c2, "status"))) {
char *code = xt_find_attr(c2, "code");
if (g_strcmp0(code, "301") == 0) {
status = "Banned";
break;
} else if (g_strcmp0(code, "303") == 0) {
/* This could be handled in a cleverer way,
* but let's just show a literal part/join for now */
status = "Changing nicks";
break;
} else if (g_strcmp0(code, "307") == 0) {
status = "Kicked";
break;
}
c2 = c2->next;
}
/* Sometimes the status message is in presence/x/item/reason */
if ((c2 = xt_find_path(c, "item/reason")) && c2->text && c2->text_len) {
status_text = c2->text;
}
}
/* Sometimes the status message is right inside <presence> */
if ((c = xt_find_node(node->children, "status")) && c->text && c->text_len) {
status_text = c->text;
}
if (status_text && status) {
reason = g_strdup_printf("%s: %s", status, status_text);
} else {
reason = g_strdup(status_text ? : status);
}
s = strchr(bud->ext_jid, '/');
if (s) {
*s = 0;
}
imcb_chat_remove_buddy(chat, bud->ext_jid, reason);
if (bud != jc->me && bud->flags & JBFLAG_IS_ANONYMOUS) {
imcb_remove_buddy(ic, bud->ext_jid, reason);
}
if (s) {
*s = '/';
}
g_free(reason);
}
if (bud == jc->me) {
jabber_chat_free(chat);
}
}
