Mercurial > pidgin.yaz
view libpurple/protocols/jabber/jabber.c @ 19637:5ee8869b5130
Ka-Hing reminded me that we should set the password to NULL when
it's wrong.
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Tue, 04 Sep 2007 06:45:32 +0000 |
parents | d470d42d2cb1 |
children | 44b4e8bd759b 1d2002a5735e 7f8cf35fc99b |
line wrap: on
line source
/* * purple - Jabber Protocol Plugin * * Copyright (C) 2003, Nathan Walp <faceprint@faceprint.com> * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * */ #include "internal.h" #include "account.h" #include "accountopt.h" #include "blist.h" #include "cmds.h" #include "connection.h" #include "conversation.h" #include "debug.h" #include "dnssrv.h" #include "message.h" #include "notify.h" #include "pluginpref.h" #include "proxy.h" #include "prpl.h" #include "request.h" #include "server.h" #include "util.h" #include "version.h" #include "xmlnode.h" #include "auth.h" #include "buddy.h" #include "chat.h" #include "disco.h" #include "google.h" #include "iq.h" #include "jutil.h" #include "message.h" #include "parser.h" #include "presence.h" #include "jabber.h" #include "roster.h" #include "si.h" #include "xdata.h" #define JABBER_CONNECT_STEPS (js->gsc ? 8 : 5) static PurplePlugin *my_protocol = NULL; static void jabber_stream_init(JabberStream *js) { char *open_stream; open_stream = g_strdup_printf("<stream:stream to='%s' " "xmlns='jabber:client' " "xmlns:stream='http://etherx.jabber.org/streams' " "version='1.0'>", js->user->domain); /* setup the parser fresh for each stream */ jabber_parser_setup(js); jabber_send_raw(js, open_stream, -1); js->reinit = FALSE; g_free(open_stream); } static void jabber_session_initialized_cb(JabberStream *js, xmlnode *packet, gpointer data) { const char *type = xmlnode_get_attrib(packet, "type"); if(type && !strcmp(type, "result")) { jabber_stream_set_state(js, JABBER_STREAM_CONNECTED); } else { purple_connection_error(js->gc, _("Error initializing session")); } } static void jabber_session_init(JabberStream *js) { JabberIq *iq = jabber_iq_new(js, JABBER_IQ_SET); xmlnode *session; jabber_iq_set_callback(iq, jabber_session_initialized_cb, NULL); session = xmlnode_new_child(iq->node, "session"); xmlnode_set_namespace(session, "urn:ietf:params:xml:ns:xmpp-session"); jabber_iq_send(iq); } static void jabber_bind_result_cb(JabberStream *js, xmlnode *packet, gpointer data) { const char *type = xmlnode_get_attrib(packet, "type"); xmlnode *bind; if(type && !strcmp(type, "result") && (bind = xmlnode_get_child_with_namespace(packet, "bind", "urn:ietf:params:xml:ns:xmpp-bind"))) { xmlnode *jid; char *full_jid; if((jid = xmlnode_get_child(bind, "jid")) && (full_jid = xmlnode_get_data(jid))) { JabberBuddy *my_jb = NULL; jabber_id_free(js->user); if(!(js->user = jabber_id_new(full_jid))) { purple_connection_error(js->gc, _("Invalid response from server.")); } if((my_jb = jabber_buddy_find(js, full_jid, TRUE))) my_jb->subscription |= JABBER_SUB_BOTH; g_free(full_jid); } } else { char *msg = jabber_parse_error(js, packet); purple_connection_error(js->gc, msg); g_free(msg); } jabber_session_init(js); } static void jabber_stream_features_parse(JabberStream *js, xmlnode *packet) { if(xmlnode_get_child(packet, "starttls")) { if(jabber_process_starttls(js, packet)) return; } if(js->registration) { jabber_register_start(js); } else if(xmlnode_get_child(packet, "mechanisms")) { jabber_auth_start(js, packet); } else if(xmlnode_get_child(packet, "bind")) { xmlnode *bind, *resource; JabberIq *iq = jabber_iq_new(js, JABBER_IQ_SET); bind = xmlnode_new_child(iq->node, "bind"); xmlnode_set_namespace(bind, "urn:ietf:params:xml:ns:xmpp-bind"); resource = xmlnode_new_child(bind, "resource"); xmlnode_insert_data(resource, js->user->resource, -1); jabber_iq_set_callback(iq, jabber_bind_result_cb, NULL); jabber_iq_send(iq); } else /* if(xmlnode_get_child_with_namespace(packet, "auth")) */ { /* If we get an empty stream:features packet, or we explicitly get * an auth feature with namespace http://jabber.org/features/iq-auth * we should revert back to iq:auth authentication, even though we're * connecting to an XMPP server. */ js->auth_type = JABBER_AUTH_IQ_AUTH; jabber_stream_set_state(js, JABBER_STREAM_AUTHENTICATING); } } static void jabber_stream_handle_error(JabberStream *js, xmlnode *packet) { char *msg = jabber_parse_error(js, packet); purple_connection_error(js->gc, msg); g_free(msg); } static void tls_init(JabberStream *js); void jabber_process_packet(JabberStream *js, xmlnode *packet) { const char *xmlns; purple_signal_emit(my_protocol, "jabber-receiving-xmlnode", js->gc, &packet); /* if the signal leaves us with a null packet, we're done */ if(NULL == packet) return; xmlns = xmlnode_get_namespace(packet); if(!strcmp(packet->name, "iq")) { jabber_iq_parse(js, packet); } else if(!strcmp(packet->name, "presence")) { jabber_presence_parse(js, packet); } else if(!strcmp(packet->name, "message")) { jabber_message_parse(js, packet); } else if(!strcmp(packet->name, "stream:features")) { jabber_stream_features_parse(js, packet); } else if (!strcmp(packet->name, "features") && !strcmp(xmlns, "http://etherx.jabber.org/streams")) { jabber_stream_features_parse(js, packet); } else if(!strcmp(packet->name, "stream:error") || (!strcmp(packet->name, "error") && !strcmp(xmlns, "http://etherx.jabber.org/streams"))) { jabber_stream_handle_error(js, packet); } else if(!strcmp(packet->name, "challenge")) { if(js->state == JABBER_STREAM_AUTHENTICATING) jabber_auth_handle_challenge(js, packet); } else if(!strcmp(packet->name, "success")) { if(js->state == JABBER_STREAM_AUTHENTICATING) jabber_auth_handle_success(js, packet); } else if(!strcmp(packet->name, "failure")) { if(js->state == JABBER_STREAM_AUTHENTICATING) jabber_auth_handle_failure(js, packet); } else if(!strcmp(packet->name, "proceed")) { if(js->state == JABBER_STREAM_AUTHENTICATING && !js->gsc) tls_init(js); } else { purple_debug(PURPLE_DEBUG_WARNING, "jabber", "Unknown packet: %s\n", packet->name); } } static int jabber_do_send(JabberStream *js, const char *data, int len) { int ret; if (js->gsc) ret = purple_ssl_write(js->gsc, data, len); else ret = write(js->fd, data, len); return ret; } static void jabber_send_cb(gpointer data, gint source, PurpleInputCondition cond) { JabberStream *js = data; int ret, writelen; writelen = purple_circ_buffer_get_max_read(js->write_buffer); if (writelen == 0) { purple_input_remove(js->writeh); js->writeh = 0; return; } ret = jabber_do_send(js, js->write_buffer->outptr, writelen); if (ret < 0 && errno == EAGAIN) return; else if (ret <= 0) { purple_connection_error(js->gc, _("Write error")); return; } purple_circ_buffer_mark_read(js->write_buffer, ret); } void jabber_send_raw(JabberStream *js, const char *data, int len) { int ret; /* because printing a tab to debug every minute gets old */ if(strcmp(data, "\t")) purple_debug(PURPLE_DEBUG_MISC, "jabber", "Sending%s: %s\n", js->gsc ? " (ssl)" : "", data); /* If we've got a security layer, we need to encode the data, * splitting it on the maximum buffer length negotiated */ purple_signal_emit(my_protocol, "jabber-sending-text", js->gc, &data); if (data == NULL) return; #ifdef HAVE_CYRUS_SASL if (js->sasl_maxbuf>0) { int pos; if (!js->gsc && js->fd<0) return; pos = 0; if (len == -1) len = strlen(data); while (pos < len) { int towrite; const char *out; unsigned olen; if ((len - pos) < js->sasl_maxbuf) towrite = len - pos; else towrite = js->sasl_maxbuf; sasl_encode(js->sasl, &data[pos], towrite, &out, &olen); pos += towrite; if (js->writeh == 0) ret = jabber_do_send(js, out, olen); else { ret = -1; errno = EAGAIN; } if (ret < 0 && errno != EAGAIN) purple_connection_error(js->gc, _("Write error")); else if (ret < olen) { if (ret < 0) ret = 0; if (js->writeh == 0) js->writeh = purple_input_add( js->gsc ? js->gsc->fd : js->fd, PURPLE_INPUT_WRITE, jabber_send_cb, js); purple_circ_buffer_append(js->write_buffer, out + ret, olen - ret); } } return; } #endif if (len == -1) len = strlen(data); if (js->writeh == 0) ret = jabber_do_send(js, data, len); else { ret = -1; errno = EAGAIN; } if (ret < 0 && errno != EAGAIN) purple_connection_error(js->gc, _("Write error")); else if (ret < len) { if (ret < 0) ret = 0; if (js->writeh == 0) js->writeh = purple_input_add( js->gsc ? js->gsc->fd : js->fd, PURPLE_INPUT_WRITE, jabber_send_cb, js); purple_circ_buffer_append(js->write_buffer, data + ret, len - ret); } return; } int jabber_prpl_send_raw(PurpleConnection *gc, const char *buf, int len) { JabberStream *js = (JabberStream*)gc->proto_data; jabber_send_raw(js, buf, len); return len; } void jabber_send(JabberStream *js, xmlnode *packet) { char *txt; int len; purple_signal_emit(my_protocol, "jabber-sending-xmlnode", js->gc, &packet); /* if we get NULL back, we're done processing */ if(NULL == packet) return; txt = xmlnode_to_str(packet, &len); jabber_send_raw(js, txt, len); g_free(txt); } void jabber_keepalive(PurpleConnection *gc) { jabber_send_raw(gc->proto_data, "\t", -1); } static void jabber_recv_cb_ssl(gpointer data, PurpleSslConnection *gsc, PurpleInputCondition cond) { PurpleConnection *gc = data; JabberStream *js = gc->proto_data; int len; static char buf[4096]; /* TODO: It should be possible to make this check unnecessary */ if(!PURPLE_CONNECTION_IS_VALID(gc)) { purple_ssl_close(gsc); return; } while((len = purple_ssl_read(gsc, buf, sizeof(buf) - 1)) > 0) { buf[len] = '\0'; purple_debug(PURPLE_DEBUG_INFO, "jabber", "Recv (ssl)(%d): %s\n", len, buf); jabber_parser_process(js, buf, len); if(js->reinit) jabber_stream_init(js); } if(errno == EAGAIN) return; else purple_connection_error(gc, _("Read Error")); } static void jabber_recv_cb(gpointer data, gint source, PurpleInputCondition condition) { PurpleConnection *gc = data; JabberStream *js = gc->proto_data; int len; static char buf[4096]; if(!PURPLE_CONNECTION_IS_VALID(gc)) return; if((len = read(js->fd, buf, sizeof(buf) - 1)) > 0) { #ifdef HAVE_CYRUS_SASL if (js->sasl_maxbuf>0) { const char *out; unsigned int olen; sasl_decode(js->sasl, buf, len, &out, &olen); if (olen>0) { purple_debug(PURPLE_DEBUG_INFO, "jabber", "RecvSASL (%u): %s\n", olen, out); jabber_parser_process(js,out,olen); if(js->reinit) jabber_stream_init(js); } return; } #endif buf[len] = '\0'; purple_debug(PURPLE_DEBUG_INFO, "jabber", "Recv (%d): %s\n", len, buf); jabber_parser_process(js, buf, len); if(js->reinit) jabber_stream_init(js); } else if(errno == EAGAIN) { return; } else { purple_connection_error(gc, _("Read Error")); } } static void jabber_login_callback_ssl(gpointer data, PurpleSslConnection *gsc, PurpleInputCondition cond) { PurpleConnection *gc = data; JabberStream *js; /* TODO: It should be possible to make this check unnecessary */ if(!PURPLE_CONNECTION_IS_VALID(gc)) { purple_ssl_close(gsc); return; } js = gc->proto_data; if(js->state == JABBER_STREAM_CONNECTING) jabber_send_raw(js, "<?xml version='1.0' ?>", -1); jabber_stream_set_state(js, JABBER_STREAM_INITIALIZING); purple_ssl_input_add(gsc, jabber_recv_cb_ssl, gc); } static void jabber_login_callback(gpointer data, gint source, const gchar *error) { PurpleConnection *gc = data; JabberStream *js = gc->proto_data; if (source < 0) { gchar *tmp; tmp = g_strdup_printf(_("Could not establish a connection with the server:\n%s"), error); purple_connection_error(gc, tmp); g_free(tmp); return; } js->fd = source; if(js->state == JABBER_STREAM_CONNECTING) jabber_send_raw(js, "<?xml version='1.0' ?>", -1); jabber_stream_set_state(js, JABBER_STREAM_INITIALIZING); gc->inpa = purple_input_add(js->fd, PURPLE_INPUT_READ, jabber_recv_cb, gc); } static void jabber_ssl_connect_failure(PurpleSslConnection *gsc, PurpleSslErrorType error, gpointer data) { PurpleConnection *gc = data; JabberStream *js; /* If the connection is already disconnected, we don't need to do anything else */ if(!PURPLE_CONNECTION_IS_VALID(gc)) return; js = gc->proto_data; js->gsc = NULL; purple_connection_error(gc, purple_ssl_strerror(error)); } static void tls_init(JabberStream *js) { purple_input_remove(js->gc->inpa); js->gc->inpa = 0; js->gsc = purple_ssl_connect_with_host_fd(js->gc->account, js->fd, jabber_login_callback_ssl, jabber_ssl_connect_failure, js->serverFQDN, js->gc); } static void jabber_login_connect(JabberStream *js, const char *fqdn, const char *host, int port) { js->serverFQDN = g_strdup(fqdn); if (purple_proxy_connect(js->gc, js->gc->account, host, port, jabber_login_callback, js->gc) == NULL) purple_connection_error(js->gc, _("Unable to create socket")); } static void srv_resolved_cb(PurpleSrvResponse *resp, int results, gpointer data) { JabberStream *js; js = data; js->srv_query_data = NULL; if(results) { jabber_login_connect(js, resp->hostname, resp->hostname, resp->port); g_free(resp); } else { jabber_login_connect(js, js->user->domain, js->user->domain, purple_account_get_int(js->gc->account, "port", 5222)); } } void jabber_login(PurpleAccount *account) { PurpleConnection *gc = purple_account_get_connection(account); const char *connect_server = purple_account_get_string(account, "connect_server", ""); JabberStream *js; JabberBuddy *my_jb = NULL; gc->flags |= PURPLE_CONNECTION_HTML; js = gc->proto_data = g_new0(JabberStream, 1); js->gc = gc; js->fd = -1; js->iq_callbacks = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); js->disco_callbacks = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); js->buddies = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, (GDestroyNotify)jabber_buddy_free); js->chats = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, (GDestroyNotify)jabber_chat_free); js->user = jabber_id_new(purple_account_get_username(account)); js->next_id = g_random_int(); js->write_buffer = purple_circ_buffer_new(512); if(!js->user) { purple_connection_error(gc, _("Invalid XMPP ID")); return; } if (!js->user->domain || *(js->user->domain) == '\0') { purple_connection_error(gc, _("Invalid XMPP ID. Domain must be set.")); return; } if(!js->user->resource) { char *me; js->user->resource = g_strdup("Home"); if(!js->user->node) { js->user->node = js->user->domain; js->user->domain = g_strdup("jabber.org"); } me = g_strdup_printf("%s@%s/%s", js->user->node, js->user->domain, js->user->resource); purple_account_set_username(account, me); g_free(me); } if((my_jb = jabber_buddy_find(js, purple_account_get_username(account), TRUE))) my_jb->subscription |= JABBER_SUB_BOTH; jabber_stream_set_state(js, JABBER_STREAM_CONNECTING); /* if they've got old-ssl mode going, we probably want to ignore SRV lookups */ if(purple_account_get_bool(js->gc->account, "old_ssl", FALSE)) { if(purple_ssl_is_supported()) { js->gsc = purple_ssl_connect(js->gc->account, connect_server[0] ? connect_server : js->user->domain, purple_account_get_int(account, "port", 5223), jabber_login_callback_ssl, jabber_ssl_connect_failure, js->gc); } else { purple_connection_error(js->gc, _("SSL support unavailable")); } } /* no old-ssl, so if they've specified a connect server, we'll use that, otherwise we'll * invoke the magic of SRV lookups, to figure out host and port */ if(!js->gsc) { if(connect_server[0]) { jabber_login_connect(js, js->user->domain, connect_server, purple_account_get_int(account, "port", 5222)); } else { js->srv_query_data = purple_srv_resolve("xmpp-client", "tcp", js->user->domain, srv_resolved_cb, js); } } } static gboolean conn_close_cb(gpointer data) { JabberStream *js = data; PurpleAccount *account = purple_connection_get_account(js->gc); purple_account_disconnect(account); return FALSE; } static void jabber_connection_schedule_close(JabberStream *js) { purple_timeout_add(0, conn_close_cb, js); } static void jabber_registration_result_cb(JabberStream *js, xmlnode *packet, gpointer data) { const char *type = xmlnode_get_attrib(packet, "type"); char *buf; if(!strcmp(type, "result")) { buf = g_strdup_printf(_("Registration of %s@%s successful"), js->user->node, js->user->domain); purple_notify_info(NULL, _("Registration Successful"), _("Registration Successful"), buf); g_free(buf); } else { char *msg = jabber_parse_error(js, packet); if(!msg) msg = g_strdup(_("Unknown Error")); purple_notify_error(NULL, _("Registration Failed"), _("Registration Failed"), msg); g_free(msg); } jabber_connection_schedule_close(js); } static void jabber_register_cb(JabberStream *js, PurpleRequestFields *fields) { GList *groups, *flds; xmlnode *query, *y; JabberIq *iq; char *username; iq = jabber_iq_new_query(js, JABBER_IQ_SET, "jabber:iq:register"); query = xmlnode_get_child(iq->node, "query"); for(groups = purple_request_fields_get_groups(fields); groups; groups = groups->next) { for(flds = purple_request_field_group_get_fields(groups->data); flds; flds = flds->next) { PurpleRequestField *field = flds->data; const char *id = purple_request_field_get_id(field); const char *value = purple_request_field_string_get_value(field); if(!strcmp(id, "username")) { y = xmlnode_new_child(query, "username"); } else if(!strcmp(id, "password")) { y = xmlnode_new_child(query, "password"); } else if(!strcmp(id, "name")) { y = xmlnode_new_child(query, "name"); } else if(!strcmp(id, "email")) { y = xmlnode_new_child(query, "email"); } else if(!strcmp(id, "nick")) { y = xmlnode_new_child(query, "nick"); } else if(!strcmp(id, "first")) { y = xmlnode_new_child(query, "first"); } else if(!strcmp(id, "last")) { y = xmlnode_new_child(query, "last"); } else if(!strcmp(id, "address")) { y = xmlnode_new_child(query, "address"); } else if(!strcmp(id, "city")) { y = xmlnode_new_child(query, "city"); } else if(!strcmp(id, "state")) { y = xmlnode_new_child(query, "state"); } else if(!strcmp(id, "zip")) { y = xmlnode_new_child(query, "zip"); } else if(!strcmp(id, "phone")) { y = xmlnode_new_child(query, "phone"); } else if(!strcmp(id, "url")) { y = xmlnode_new_child(query, "url"); } else if(!strcmp(id, "date")) { y = xmlnode_new_child(query, "date"); } else { continue; } xmlnode_insert_data(y, value, -1); if(!strcmp(id, "username")) { if(js->user->node) g_free(js->user->node); js->user->node = g_strdup(value); } } } username = g_strdup_printf("%s@%s/%s", js->user->node, js->user->domain, js->user->resource); purple_account_set_username(js->gc->account, username); g_free(username); jabber_iq_set_callback(iq, jabber_registration_result_cb, NULL); jabber_iq_send(iq); } static void jabber_register_cancel_cb(JabberStream *js, PurpleRequestFields *fields) { jabber_connection_schedule_close(js); } static void jabber_register_x_data_cb(JabberStream *js, xmlnode *result, gpointer data) { xmlnode *query; JabberIq *iq; iq = jabber_iq_new_query(js, JABBER_IQ_SET, "jabber:iq:register"); query = xmlnode_get_child(iq->node, "query"); xmlnode_insert_child(query, result); jabber_iq_set_callback(iq, jabber_registration_result_cb, NULL); jabber_iq_send(iq); } void jabber_register_parse(JabberStream *js, xmlnode *packet) { const char *type; if(!(type = xmlnode_get_attrib(packet, "type")) || strcmp(type, "result")) return; if(js->registration) { PurpleRequestFields *fields; PurpleRequestFieldGroup *group; PurpleRequestField *field; xmlnode *query, *x, *y; char *instructions; /* get rid of the login thingy */ purple_connection_set_state(js->gc, PURPLE_CONNECTED); query = xmlnode_get_child(packet, "query"); if(xmlnode_get_child(query, "registered")) { purple_notify_error(NULL, _("Already Registered"), _("Already Registered"), NULL); jabber_connection_schedule_close(js); return; } if((x = xmlnode_get_child_with_namespace(packet, "x", "jabber:x:data"))) { jabber_x_data_request(js, x, jabber_register_x_data_cb, NULL); return; } else if((x = xmlnode_get_child_with_namespace(packet, "x", "jabber:x:oob"))) { xmlnode *url; if((url = xmlnode_get_child(x, "url"))) { char *href; if((href = xmlnode_get_data(url))) { purple_notify_uri(NULL, href); g_free(href); js->gc->wants_to_die = TRUE; jabber_connection_schedule_close(js); return; } } } /* as a last resort, use the old jabber:iq:register syntax */ fields = purple_request_fields_new(); group = purple_request_field_group_new(NULL); purple_request_fields_add_group(fields, group); field = purple_request_field_string_new("username", _("Username"), js->user->node, FALSE); purple_request_field_group_add_field(group, field); field = purple_request_field_string_new("password", _("Password"), purple_connection_get_password(js->gc), FALSE); purple_request_field_string_set_masked(field, TRUE); purple_request_field_group_add_field(group, field); if(xmlnode_get_child(query, "name")) { field = purple_request_field_string_new("name", _("Name"), purple_account_get_alias(js->gc->account), FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "email")) { field = purple_request_field_string_new("email", _("E-mail"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "nick")) { field = purple_request_field_string_new("nick", _("Nickname"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "first")) { field = purple_request_field_string_new("first", _("First name"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "last")) { field = purple_request_field_string_new("last", _("Last name"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "address")) { field = purple_request_field_string_new("address", _("Address"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "city")) { field = purple_request_field_string_new("city", _("City"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "state")) { field = purple_request_field_string_new("state", _("State"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "zip")) { field = purple_request_field_string_new("zip", _("Postal code"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "phone")) { field = purple_request_field_string_new("phone", _("Phone"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "url")) { field = purple_request_field_string_new("url", _("URL"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if(xmlnode_get_child(query, "date")) { field = purple_request_field_string_new("date", _("Date"), NULL, FALSE); purple_request_field_group_add_field(group, field); } if((y = xmlnode_get_child(query, "instructions"))) instructions = xmlnode_get_data(y); else instructions = g_strdup(_("Please fill out the information below " "to register your new account.")); purple_request_fields(js->gc, _("Register New XMPP Account"), _("Register New XMPP Account"), instructions, fields, _("Register"), G_CALLBACK(jabber_register_cb), _("Cancel"), G_CALLBACK(jabber_register_cancel_cb), purple_connection_get_account(js->gc), NULL, NULL, js); g_free(instructions); } } void jabber_register_start(JabberStream *js) { JabberIq *iq; iq = jabber_iq_new_query(js, JABBER_IQ_GET, "jabber:iq:register"); jabber_iq_send(iq); } void jabber_register_account(PurpleAccount *account) { PurpleConnection *gc = purple_account_get_connection(account); JabberStream *js; JabberBuddy *my_jb = NULL; const char *connect_server = purple_account_get_string(account, "connect_server", ""); const char *server; js = gc->proto_data = g_new0(JabberStream, 1); js->gc = gc; js->registration = TRUE; js->iq_callbacks = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); js->disco_callbacks = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); js->user = jabber_id_new(purple_account_get_username(account)); js->next_id = g_random_int(); if(!js->user) { purple_connection_error(gc, _("Invalid XMPP ID")); return; } js->write_buffer = purple_circ_buffer_new(512); if(!js->user->resource) { char *me; js->user->resource = g_strdup("Home"); if(!js->user->node) { js->user->node = js->user->domain; js->user->domain = g_strdup("jabber.org"); } me = g_strdup_printf("%s@%s/%s", js->user->node, js->user->domain, js->user->resource); purple_account_set_username(account, me); g_free(me); } if((my_jb = jabber_buddy_find(js, purple_account_get_username(account), TRUE))) my_jb->subscription |= JABBER_SUB_BOTH; server = connect_server[0] ? connect_server : js->user->domain; jabber_stream_set_state(js, JABBER_STREAM_CONNECTING); if(purple_account_get_bool(account, "old_ssl", FALSE)) { if(purple_ssl_is_supported()) { js->gsc = purple_ssl_connect(account, server, purple_account_get_int(account, "port", 5222), jabber_login_callback_ssl, jabber_ssl_connect_failure, gc); } else { purple_connection_error(gc, _("SSL support unavailable")); } } if(!js->gsc) { if (connect_server[0]) { jabber_login_connect(js, js->user->domain, server, purple_account_get_int(account, "port", 5222)); } else { js->srv_query_data = purple_srv_resolve("xmpp-client", "tcp", js->user->domain, srv_resolved_cb, js); } } } void jabber_close(PurpleConnection *gc) { JabberStream *js = gc->proto_data; /* Don't perform any actions on the ssl connection * if we were forcibly disconnected because it will crash * on some SSL backends. */ if (!gc->disconnect_timeout) jabber_send_raw(js, "</stream:stream>", -1); if (js->srv_query_data) purple_srv_cancel(js->srv_query_data); if(js->gsc) { #ifdef HAVE_OPENSSL if (!gc->disconnect_timeout) #endif purple_ssl_close(js->gsc); } else if (js->fd > 0) { if(js->gc->inpa) purple_input_remove(js->gc->inpa); close(js->fd); } jabber_buddy_remove_all_pending_buddy_info_requests(js); if(js->iq_callbacks) g_hash_table_destroy(js->iq_callbacks); if(js->disco_callbacks) g_hash_table_destroy(js->disco_callbacks); if(js->buddies) g_hash_table_destroy(js->buddies); if(js->chats) g_hash_table_destroy(js->chats); while(js->chat_servers) { g_free(js->chat_servers->data); js->chat_servers = g_list_delete_link(js->chat_servers, js->chat_servers); } while(js->user_directories) { g_free(js->user_directories->data); js->user_directories = g_list_delete_link(js->user_directories, js->user_directories); } if(js->stream_id) g_free(js->stream_id); if(js->user) jabber_id_free(js->user); if(js->avatar_hash) g_free(js->avatar_hash); purple_circ_buffer_destroy(js->write_buffer); if(js->writeh) purple_input_remove(js->writeh); #ifdef HAVE_CYRUS_SASL if(js->sasl) sasl_dispose(&js->sasl); if(js->sasl_mechs) g_string_free(js->sasl_mechs, TRUE); if(js->sasl_cb) g_free(js->sasl_cb); #endif if(js->serverFQDN) g_free(js->serverFQDN); g_free(js->server_name); g_free(js->gmail_last_time); g_free(js->gmail_last_tid); g_free(js); gc->proto_data = NULL; } void jabber_stream_set_state(JabberStream *js, JabberStreamState state) { js->state = state; switch(state) { case JABBER_STREAM_OFFLINE: break; case JABBER_STREAM_CONNECTING: purple_connection_update_progress(js->gc, _("Connecting"), 1, JABBER_CONNECT_STEPS); break; case JABBER_STREAM_INITIALIZING: purple_connection_update_progress(js->gc, _("Initializing Stream"), js->gsc ? 5 : 2, JABBER_CONNECT_STEPS); jabber_stream_init(js); break; case JABBER_STREAM_AUTHENTICATING: purple_connection_update_progress(js->gc, _("Authenticating"), js->gsc ? 6 : 3, JABBER_CONNECT_STEPS); if(js->protocol_version == JABBER_PROTO_0_9 && js->registration) { jabber_register_start(js); } else if(js->auth_type == JABBER_AUTH_IQ_AUTH) { jabber_auth_start_old(js); } break; case JABBER_STREAM_REINITIALIZING: purple_connection_update_progress(js->gc, _("Re-initializing Stream"), (js->gsc ? 7 : 4), JABBER_CONNECT_STEPS); /* The stream will be reinitialized later, in jabber_recv_cb_ssl() */ js->reinit = TRUE; break; case JABBER_STREAM_CONNECTED: /* now we can alert the core that we're ready to send status */ purple_connection_set_state(js->gc, PURPLE_CONNECTED); jabber_disco_items_server(js); break; } } char *jabber_get_next_id(JabberStream *js) { return g_strdup_printf("purple%x", js->next_id++); } void jabber_idle_set(PurpleConnection *gc, int idle) { JabberStream *js = gc->proto_data; js->idle = idle ? time(NULL) - idle : idle; } const char *jabber_list_icon(PurpleAccount *a, PurpleBuddy *b) { return "jabber"; } const char* jabber_list_emblem(PurpleBuddy *b) { JabberStream *js; JabberBuddy *jb = NULL; if(!b->account->gc) return NULL; js = b->account->gc->proto_data; if(js) jb = jabber_buddy_find(js, b->name, FALSE); if(!PURPLE_BUDDY_IS_ONLINE(b)) { if(jb && (jb->subscription & JABBER_SUB_PENDING || !(jb->subscription & JABBER_SUB_TO))) return "not-authorized"; } return NULL; } char *jabber_status_text(PurpleBuddy *b) { char *ret = NULL; JabberBuddy *jb = NULL; if (b->account->gc && b->account->gc->proto_data) jb = jabber_buddy_find(b->account->gc->proto_data, b->name, FALSE); if(jb && !PURPLE_BUDDY_IS_ONLINE(b) && (jb->subscription & JABBER_SUB_PENDING || !(jb->subscription & JABBER_SUB_TO))) { ret = g_strdup(_("Not Authorized")); } else if(jb && !PURPLE_BUDDY_IS_ONLINE(b) && jb->error_msg) { ret = g_strdup(jb->error_msg); } else { char *stripped; if(!(stripped = purple_markup_strip_html(jabber_buddy_get_status_msg(jb)))) { PurpleStatus *status = purple_presence_get_active_status(purple_buddy_get_presence(b)); if(!purple_status_is_available(status)) stripped = g_strdup(purple_status_get_name(status)); } if(stripped) { ret = g_markup_escape_text(stripped, -1); g_free(stripped); } } return ret; } void jabber_tooltip_text(PurpleBuddy *b, PurpleNotifyUserInfo *user_info, gboolean full) { JabberBuddy *jb; g_return_if_fail(b != NULL); g_return_if_fail(b->account != NULL); g_return_if_fail(b->account->gc != NULL); g_return_if_fail(b->account->gc->proto_data != NULL); jb = jabber_buddy_find(b->account->gc->proto_data, b->name, FALSE); if(jb) { JabberBuddyResource *jbr = NULL; const char *sub; GList *l; if (full) { if(jb->subscription & JABBER_SUB_FROM) { if(jb->subscription & JABBER_SUB_TO) sub = _("Both"); else if(jb->subscription & JABBER_SUB_PENDING) sub = _("From (To pending)"); else sub = _("From"); } else { if(jb->subscription & JABBER_SUB_TO) sub = _("To"); else if(jb->subscription & JABBER_SUB_PENDING) sub = _("None (To pending)"); else sub = _("None"); } purple_notify_user_info_add_pair(user_info, _("Subscription"), sub); } for(l=jb->resources; l; l = l->next) { char *text = NULL; char *res = NULL; char *label, *value; const char *state; jbr = l->data; if(jbr->status) { char *tmp; text = purple_strreplace(jbr->status, "\n", "<br />\n"); tmp = purple_markup_strip_html(text); g_free(text); text = g_markup_escape_text(tmp, -1); g_free(tmp); } if(jbr->name) res = g_strdup_printf(" (%s)", jbr->name); state = jabber_buddy_state_get_name(jbr->state); if (text != NULL && !purple_utf8_strcasecmp(state, text)) { g_free(text); text = NULL; } label = g_strdup_printf("%s%s", _("Status"), (res ? res : "")); value = g_strdup_printf("%s%s%s", state, (text ? ": " : ""), (text ? text : "")); purple_notify_user_info_add_pair(user_info, label, value); g_free(label); g_free(value); g_free(text); g_free(res); } if(!PURPLE_BUDDY_IS_ONLINE(b) && jb->error_msg) { purple_notify_user_info_add_pair(user_info, _("Error"), jb->error_msg); } } } GList *jabber_status_types(PurpleAccount *account) { PurpleStatusType *type; GList *types = NULL; PurpleValue *priority_value; priority_value = purple_value_new(PURPLE_TYPE_INT); purple_value_set_int(priority_value, 1); type = purple_status_type_new_with_attrs(PURPLE_STATUS_AVAILABLE, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_ONLINE), NULL, TRUE, TRUE, FALSE, "priority", _("Priority"), priority_value, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); priority_value = purple_value_new(PURPLE_TYPE_INT); purple_value_set_int(priority_value, 1); type = purple_status_type_new_with_attrs(PURPLE_STATUS_AVAILABLE, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_CHAT), _("Chatty"), TRUE, TRUE, FALSE, "priority", _("Priority"), priority_value, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); priority_value = purple_value_new(PURPLE_TYPE_INT); purple_value_set_int(priority_value, 0); type = purple_status_type_new_with_attrs(PURPLE_STATUS_AWAY, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_AWAY), NULL, TRUE, TRUE, FALSE, "priority", _("Priority"), priority_value, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); priority_value = purple_value_new(PURPLE_TYPE_INT); purple_value_set_int(priority_value, 0); type = purple_status_type_new_with_attrs(PURPLE_STATUS_EXTENDED_AWAY, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_XA), NULL, TRUE, TRUE, FALSE, "priority", _("Priority"), priority_value, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); priority_value = purple_value_new(PURPLE_TYPE_INT); purple_value_set_int(priority_value, 0); type = purple_status_type_new_with_attrs(PURPLE_STATUS_UNAVAILABLE, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_DND), _("Do Not Disturb"), TRUE, TRUE, FALSE, "priority", _("Priority"), priority_value, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); /* if(js->protocol_version == JABBER_PROTO_0_9) m = g_list_append(m, _("Invisible")); */ type = purple_status_type_new_with_attrs(PURPLE_STATUS_OFFLINE, jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_UNAVAILABLE), NULL, FALSE, TRUE, FALSE, "message", _("Message"), purple_value_new(PURPLE_TYPE_STRING), NULL); types = g_list_append(types, type); return types; } static void jabber_password_change_result_cb(JabberStream *js, xmlnode *packet, gpointer data) { const char *type; type = xmlnode_get_attrib(packet, "type"); if(type && !strcmp(type, "result")) { purple_notify_info(js->gc, _("Password Changed"), _("Password Changed"), _("Your password has been changed.")); } else { char *msg = jabber_parse_error(js, packet); purple_notify_error(js->gc, _("Error changing password"), _("Error changing password"), msg); g_free(msg); } } static void jabber_password_change_cb(JabberStream *js, PurpleRequestFields *fields) { const char *p1, *p2; JabberIq *iq; xmlnode *query, *y; p1 = purple_request_fields_get_string(fields, "password1"); p2 = purple_request_fields_get_string(fields, "password2"); if(strcmp(p1, p2)) { purple_notify_error(js->gc, NULL, _("New passwords do not match."), NULL); return; } iq = jabber_iq_new_query(js, JABBER_IQ_SET, "jabber:iq:register"); xmlnode_set_attrib(iq->node, "to", js->user->domain); query = xmlnode_get_child(iq->node, "query"); y = xmlnode_new_child(query, "username"); xmlnode_insert_data(y, js->user->node, -1); y = xmlnode_new_child(query, "password"); xmlnode_insert_data(y, p1, -1); jabber_iq_set_callback(iq, jabber_password_change_result_cb, NULL); jabber_iq_send(iq); purple_account_set_password(js->gc->account, p1); } static void jabber_password_change(PurplePluginAction *action) { PurpleConnection *gc = (PurpleConnection *) action->context; JabberStream *js = gc->proto_data; PurpleRequestFields *fields; PurpleRequestFieldGroup *group; PurpleRequestField *field; fields = purple_request_fields_new(); group = purple_request_field_group_new(NULL); purple_request_fields_add_group(fields, group); field = purple_request_field_string_new("password1", _("Password"), "", FALSE); purple_request_field_string_set_masked(field, TRUE); purple_request_field_set_required(field, TRUE); purple_request_field_group_add_field(group, field); field = purple_request_field_string_new("password2", _("Password (again)"), "", FALSE); purple_request_field_string_set_masked(field, TRUE); purple_request_field_set_required(field, TRUE); purple_request_field_group_add_field(group, field); purple_request_fields(js->gc, _("Change XMPP Password"), _("Change XMPP Password"), _("Please enter your new password"), fields, _("OK"), G_CALLBACK(jabber_password_change_cb), _("Cancel"), NULL, purple_connection_get_account(gc), NULL, NULL, js); } GList *jabber_actions(PurplePlugin *plugin, gpointer context) { GList *m = NULL; PurplePluginAction *act; act = purple_plugin_action_new(_("Set User Info..."), jabber_setup_set_info); m = g_list_append(m, act); /* if (js->protocol_options & CHANGE_PASSWORD) { */ act = purple_plugin_action_new(_("Change Password..."), jabber_password_change); m = g_list_append(m, act); /* } */ act = purple_plugin_action_new(_("Search for Users..."), jabber_user_search_begin); m = g_list_append(m, act); return m; } PurpleChat *jabber_find_blist_chat(PurpleAccount *account, const char *name) { PurpleBlistNode *gnode, *cnode; JabberID *jid; if(!(jid = jabber_id_new(name))) return NULL; for(gnode = purple_get_blist()->root; gnode; gnode = gnode->next) { for(cnode = gnode->child; cnode; cnode = cnode->next) { PurpleChat *chat = (PurpleChat*)cnode; const char *room, *server; if(!PURPLE_BLIST_NODE_IS_CHAT(cnode)) continue; if(chat->account != account) continue; if(!(room = g_hash_table_lookup(chat->components, "room"))) continue; if(!(server = g_hash_table_lookup(chat->components, "server"))) continue; if(jid->node && jid->domain && !g_utf8_collate(room, jid->node) && !g_utf8_collate(server, jid->domain)) { jabber_id_free(jid); return chat; } } } jabber_id_free(jid); return NULL; } void jabber_convo_closed(PurpleConnection *gc, const char *who) { JabberStream *js = gc->proto_data; JabberID *jid; JabberBuddy *jb; JabberBuddyResource *jbr; if(!(jid = jabber_id_new(who))) return; if((jb = jabber_buddy_find(js, who, TRUE)) && (jbr = jabber_buddy_find_resource(jb, jid->resource))) { if(jbr->thread_id) { g_free(jbr->thread_id); jbr->thread_id = NULL; } if(jbr->chat_states == JABBER_CHAT_STATES_SUPPORTED) jabber_message_conv_closed(js, who); } jabber_id_free(jid); } char *jabber_parse_error(JabberStream *js, xmlnode *packet) { xmlnode *error; const char *code = NULL, *text = NULL; const char *xmlns = xmlnode_get_namespace(packet); char *cdata = NULL; if((error = xmlnode_get_child(packet, "error"))) { cdata = xmlnode_get_data(error); code = xmlnode_get_attrib(error, "code"); /* Stanza errors */ if(xmlnode_get_child(error, "bad-request")) { text = _("Bad Request"); } else if(xmlnode_get_child(error, "conflict")) { text = _("Conflict"); } else if(xmlnode_get_child(error, "feature-not-implemented")) { text = _("Feature Not Implemented"); } else if(xmlnode_get_child(error, "forbidden")) { text = _("Forbidden"); } else if(xmlnode_get_child(error, "gone")) { text = _("Gone"); } else if(xmlnode_get_child(error, "internal-server-error")) { text = _("Internal Server Error"); } else if(xmlnode_get_child(error, "item-not-found")) { text = _("Item Not Found"); } else if(xmlnode_get_child(error, "jid-malformed")) { text = _("Malformed XMPP ID"); } else if(xmlnode_get_child(error, "not-acceptable")) { text = _("Not Acceptable"); } else if(xmlnode_get_child(error, "not-allowed")) { text = _("Not Allowed"); } else if(xmlnode_get_child(error, "not-authorized")) { text = _("Not Authorized"); } else if(xmlnode_get_child(error, "payment-required")) { text = _("Payment Required"); } else if(xmlnode_get_child(error, "recipient-unavailable")) { text = _("Recipient Unavailable"); } else if(xmlnode_get_child(error, "redirect")) { /* XXX */ } else if(xmlnode_get_child(error, "registration-required")) { text = _("Registration Required"); } else if(xmlnode_get_child(error, "remote-server-not-found")) { text = _("Remote Server Not Found"); } else if(xmlnode_get_child(error, "remote-server-timeout")) { text = _("Remote Server Timeout"); } else if(xmlnode_get_child(error, "resource-constraint")) { text = _("Server Overloaded"); } else if(xmlnode_get_child(error, "service-unavailable")) { text = _("Service Unavailable"); } else if(xmlnode_get_child(error, "subscription-required")) { text = _("Subscription Required"); } else if(xmlnode_get_child(error, "unexpected-request")) { text = _("Unexpected Request"); } else if(xmlnode_get_child(error, "undefined-condition")) { text = _("Unknown Error"); } } else if(xmlns && !strcmp(xmlns, "urn:ietf:params:xml:ns:xmpp-sasl")) { if(xmlnode_get_child(packet, "aborted")) { js->gc->wants_to_die = TRUE; text = _("Authorization Aborted"); } else if(xmlnode_get_child(packet, "incorrect-encoding")) { text = _("Incorrect encoding in authorization"); } else if(xmlnode_get_child(packet, "invalid-authzid")) { js->gc->wants_to_die = TRUE; text = _("Invalid authzid"); } else if(xmlnode_get_child(packet, "invalid-mechanism")) { js->gc->wants_to_die = TRUE; text = _("Invalid Authorization Mechanism"); } else if(xmlnode_get_child(packet, "mechanism-too-weak")) { js->gc->wants_to_die = TRUE; text = _("Authorization mechanism too weak"); } else if(xmlnode_get_child(packet, "not-authorized")) { js->gc->wants_to_die = TRUE; text = _("Not Authorized"); } else if(xmlnode_get_child(packet, "temporary-auth-failure")) { text = _("Temporary Authentication Failure"); } else { js->gc->wants_to_die = TRUE; text = _("Authentication Failure"); } } else if(!strcmp(packet->name, "stream:error") || (!strcmp(packet->name, "error") && !strcmp(xmlns, "http://etherx.jabber.org/streams"))) { if(xmlnode_get_child(packet, "bad-format")) { text = _("Bad Format"); } else if(xmlnode_get_child(packet, "bad-namespace-prefix")) { text = _("Bad Namespace Prefix"); } else if(xmlnode_get_child(packet, "conflict")) { js->gc->wants_to_die = TRUE; text = _("Resource Conflict"); } else if(xmlnode_get_child(packet, "connection-timeout")) { text = _("Connection Timeout"); } else if(xmlnode_get_child(packet, "host-gone")) { text = _("Host Gone"); } else if(xmlnode_get_child(packet, "host-unknown")) { text = _("Host Unknown"); } else if(xmlnode_get_child(packet, "improper-addressing")) { text = _("Improper Addressing"); } else if(xmlnode_get_child(packet, "internal-server-error")) { text = _("Internal Server Error"); } else if(xmlnode_get_child(packet, "invalid-id")) { text = _("Invalid ID"); } else if(xmlnode_get_child(packet, "invalid-namespace")) { text = _("Invalid Namespace"); } else if(xmlnode_get_child(packet, "invalid-xml")) { text = _("Invalid XML"); } else if(xmlnode_get_child(packet, "nonmatching-hosts")) { text = _("Non-matching Hosts"); } else if(xmlnode_get_child(packet, "not-authorized")) { text = _("Not Authorized"); } else if(xmlnode_get_child(packet, "policy-violation")) { text = _("Policy Violation"); } else if(xmlnode_get_child(packet, "remote-connection-failed")) { text = _("Remote Connection Failed"); } else if(xmlnode_get_child(packet, "resource-constraint")) { text = _("Resource Constraint"); } else if(xmlnode_get_child(packet, "restricted-xml")) { text = _("Restricted XML"); } else if(xmlnode_get_child(packet, "see-other-host")) { text = _("See Other Host"); } else if(xmlnode_get_child(packet, "system-shutdown")) { text = _("System Shutdown"); } else if(xmlnode_get_child(packet, "undefined-condition")) { text = _("Undefined Condition"); } else if(xmlnode_get_child(packet, "unsupported-encoding")) { text = _("Unsupported Encoding"); } else if(xmlnode_get_child(packet, "unsupported-stanza-type")) { text = _("Unsupported Stanza Type"); } else if(xmlnode_get_child(packet, "unsupported-version")) { text = _("Unsupported Version"); } else if(xmlnode_get_child(packet, "xml-not-well-formed")) { text = _("XML Not Well Formed"); } else { text = _("Stream Error"); } } if(text || cdata) { char *ret = g_strdup_printf("%s%s%s", code ? code : "", code ? ": " : "", text ? text : cdata); g_free(cdata); return ret; } else { return NULL; } } static PurpleCmdRet jabber_cmd_chat_config(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat) return PURPLE_CMD_RET_FAILED; jabber_chat_request_room_configure(chat); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_register(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat) return PURPLE_CMD_RET_FAILED; jabber_chat_register(chat); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_topic(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat) return PURPLE_CMD_RET_FAILED; jabber_chat_change_topic(chat, args ? args[0] : NULL); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_nick(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if(!chat || !args || !args[0]) return PURPLE_CMD_RET_FAILED; jabber_chat_change_nick(chat, args[0]); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_part(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat) return PURPLE_CMD_RET_FAILED; jabber_chat_part(chat, args ? args[0] : NULL); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_ban(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if(!chat || !args || !args[0]) return PURPLE_CMD_RET_FAILED; if(!jabber_chat_ban_user(chat, args[0], args[1])) { *error = g_strdup_printf(_("Unable to ban user %s"), args[0]); return PURPLE_CMD_RET_FAILED; } return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_affiliate(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat || !args || !args[0] || !args[1]) return PURPLE_CMD_RET_FAILED; if (strcmp(args[1], "owner") != 0 && strcmp(args[1], "admin") != 0 && strcmp(args[1], "member") != 0 && strcmp(args[1], "outcast") != 0 && strcmp(args[1], "none") != 0) { *error = g_strdup_printf(_("Unknown affiliation: \"%s\""), args[1]); return PURPLE_CMD_RET_FAILED; } if (!jabber_chat_affiliate_user(chat, args[0], args[1])) { *error = g_strdup_printf(_("Unable to affiliate user %s as \"%s\""), args[0], args[1]); return PURPLE_CMD_RET_FAILED; } return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_role(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if (!chat || !args || !args[0] || !args[1]) return PURPLE_CMD_RET_FAILED; if (strcmp(args[1], "moderator") != 0 && strcmp(args[1], "participant") != 0 && strcmp(args[1], "visitor") != 0 && strcmp(args[1], "none") != 0) { *error = g_strdup_printf(_("Unknown role: \"%s\""), args[1]); return PURPLE_CMD_RET_FAILED; } if (!jabber_chat_role_user(chat, args[0], args[1])) { *error = g_strdup_printf(_("Unable to set role \"%s\" for user: %s"), args[1], args[0]); return PURPLE_CMD_RET_FAILED; } return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_invite(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { if(!args || !args[0]) return PURPLE_CMD_RET_FAILED; jabber_chat_invite(purple_conversation_get_gc(conv), purple_conv_chat_get_id(PURPLE_CONV_CHAT(conv)), args[1] ? args[1] : "", args[0]); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_join(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); GHashTable *components; if(!chat || !args || !args[0]) return PURPLE_CMD_RET_FAILED; components = g_hash_table_new_full(g_str_hash, g_str_equal, NULL, NULL); g_hash_table_replace(components, "room", args[0]); g_hash_table_replace(components, "server", chat->server); g_hash_table_replace(components, "handle", chat->handle); if(args[1]) g_hash_table_replace(components, "password", args[1]); jabber_chat_join(purple_conversation_get_gc(conv), components); g_hash_table_destroy(components); return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_kick(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); if(!chat || !args || !args[0]) return PURPLE_CMD_RET_FAILED; if(!jabber_chat_kick_user(chat, args[0], args[1])) { *error = g_strdup_printf(_("Unable to kick user %s"), args[0]); return PURPLE_CMD_RET_FAILED; } return PURPLE_CMD_RET_OK; } static PurpleCmdRet jabber_cmd_chat_msg(PurpleConversation *conv, const char *cmd, char **args, char **error, void *data) { JabberChat *chat = jabber_chat_find_by_conv(conv); char *who; if (!chat) return PURPLE_CMD_RET_FAILED; who = g_strdup_printf("%s@%s/%s", chat->room, chat->server, args[0]); jabber_message_send_im(purple_conversation_get_gc(conv), who, args[1], 0); g_free(who); return PURPLE_CMD_RET_OK; } gboolean jabber_offline_message(const PurpleBuddy *buddy) { return TRUE; } void jabber_register_commands(void) { purple_cmd_register("config", "", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY, "prpl-jabber", jabber_cmd_chat_config, _("config: Configure a chat room."), NULL); purple_cmd_register("configure", "", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY, "prpl-jabber", jabber_cmd_chat_config, _("configure: Configure a chat room."), NULL); purple_cmd_register("nick", "s", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY, "prpl-jabber", jabber_cmd_chat_nick, _("nick <new nickname>: Change your nickname."), NULL); purple_cmd_register("part", "s", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_part, _("part [room]: Leave the room."), NULL); purple_cmd_register("register", "", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY, "prpl-jabber", jabber_cmd_chat_register, _("register: Register with a chat room."), NULL); /* XXX: there needs to be a core /topic cmd, methinks */ purple_cmd_register("topic", "s", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_topic, _("topic [new topic]: View or change the topic."), NULL); purple_cmd_register("ban", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_ban, _("ban <user> [room]: Ban a user from the room."), NULL); purple_cmd_register("affiliate", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_affiliate, _("affiliate <user> <owner|admin|member|outcast|none>: Set a user's affiliation with the room."), NULL); purple_cmd_register("role", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_role, _("role <user> <moderator|participant|visitor|none>: Set a user's role in the room."), NULL); purple_cmd_register("invite", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_invite, _("invite <user> [message]: Invite a user to the room."), NULL); purple_cmd_register("join", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_join, _("join: <room> [server]: Join a chat on this server."), NULL); purple_cmd_register("kick", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY | PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", jabber_cmd_chat_kick, _("kick <user> [room]: Kick a user from the room."), NULL); purple_cmd_register("msg", "ws", PURPLE_CMD_P_PRPL, PURPLE_CMD_FLAG_CHAT | PURPLE_CMD_FLAG_PRPL_ONLY, "prpl-jabber", jabber_cmd_chat_msg, _("msg <user> <message>: Send a private message to another user."), NULL); } void jabber_init_plugin(PurplePlugin *plugin) { my_protocol = plugin; }