Mercurial > pidgin
diff libgaim/protocols/jabber/jabber.c @ 14192:60b1bc8dbf37
[gaim-migrate @ 16863]
Renamed 'core' to 'libgaim'
committer: Tailor Script <tailor@pidgin.im>
author | Evan Schoenberg <evan.s@dreskin.net> |
---|---|
date | Sat, 19 Aug 2006 01:50:10 +0000 |
parents | |
children | 1f963d406bb4 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/libgaim/protocols/jabber/jabber.c Sat Aug 19 01:50:10 2006 +0000 @@ -0,0 +1,1969 @@ +/* + * gaim - 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 "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 "auth.h" +#include "buddy.h" +#include "chat.h" +#include "disco.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 GaimPlugin *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 { + gaim_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))) { + gaim_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); + gaim_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); + + gaim_connection_error(js->gc, msg); + g_free(msg); +} + +static void tls_init(JabberStream *js); + +void jabber_process_packet(JabberStream *js, xmlnode *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(xmlnode_get_namespace(packet), "http://etherx.jabber.org/streams")) { + jabber_stream_features_parse(js, packet); + } else if(!strcmp(packet->name, "stream:error")) { + jabber_stream_handle_error(js, packet); + } else if (!strcmp(packet->name, "error") && + !strcmp(xmlnode_get_namespace(packet), "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 { + gaim_debug(GAIM_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 = gaim_ssl_write(js->gsc, data, len); + else + ret = write(js->fd, data, len); + + return ret; +} + +static void jabber_send_cb(gpointer data, gint source, GaimInputCondition cond) +{ + JabberStream *js = data; + int ret, writelen; + writelen = gaim_circ_buffer_get_max_read(js->write_buffer); + + if (writelen == 0) { + gaim_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) { + gaim_connection_error(js->gc, _("Write error")); + return; + } + + gaim_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")) + gaim_debug(GAIM_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 */ + +#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) + gaim_connection_error(js->gc, _("Write error")); + else if (ret < olen) { + if (ret < 0) + ret = 0; + if (js->writeh == 0) + js->writeh = gaim_input_add( + js->gsc ? js->gsc->fd : js->fd, + GAIM_INPUT_WRITE, + jabber_send_cb, js); + gaim_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) + gaim_connection_error(js->gc, _("Write error")); + else if (ret < len) { + if (ret < 0) + ret = 0; + if (js->writeh == 0) + js->writeh = gaim_input_add( + js->gsc ? js->gsc->fd : js->fd, + GAIM_INPUT_WRITE, jabber_send_cb, js); + gaim_circ_buffer_append(js->write_buffer, + data + ret, len - ret); + } + +} + +void jabber_send(JabberStream *js, xmlnode *packet) +{ + char *txt; + int len; + + txt = xmlnode_to_str(packet, &len); + jabber_send_raw(js, txt, len); + g_free(txt); +} + +static void jabber_keepalive(GaimConnection *gc) +{ + jabber_send_raw(gc->proto_data, "\t", -1); +} + +static void +jabber_recv_cb_ssl(gpointer data, GaimSslConnection *gsc, + GaimInputCondition cond) +{ + GaimConnection *gc = data; + JabberStream *js = gc->proto_data; + int len; + static char buf[4096]; + + /* TODO: It should be possible to make this check unnecessary */ + if(!GAIM_CONNECTION_IS_VALID(gc)) { + gaim_ssl_close(gsc); + return; + } + + while((len = gaim_ssl_read(gsc, buf, sizeof(buf) - 1)) > 0) { + buf[len] = '\0'; + gaim_debug(GAIM_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 + gaim_connection_error(gc, _("Read Error")); +} + +static void +jabber_recv_cb(gpointer data, gint source, GaimInputCondition condition) +{ + GaimConnection *gc = data; + JabberStream *js = gc->proto_data; + int len; + static char buf[4096]; + + if(!GAIM_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; + int olen; + sasl_decode(js->sasl, buf, len, &out, &olen); + if (olen>0) { + gaim_debug(GAIM_DEBUG_INFO, "jabber", "RecvSASL (%d): %s\n", olen, out); + jabber_parser_process(js,out,olen); + } + return; + } +#endif + buf[len] = '\0'; + gaim_debug(GAIM_DEBUG_INFO, "jabber", "Recv (%d): %s\n", len, buf); + jabber_parser_process(js, buf, len); + } else if(errno == EAGAIN) { + return; + } else { + gaim_connection_error(gc, _("Read Error")); + } +} + +static void +jabber_login_callback_ssl(gpointer data, GaimSslConnection *gsc, + GaimInputCondition cond) +{ + GaimConnection *gc = data; + JabberStream *js = gc->proto_data; + + if(!g_list_find(gaim_connections_get_all(), gc)) { + gaim_ssl_close(gsc); + return; + } + + js->gsc = gsc; + + if(js->state == JABBER_STREAM_CONNECTING) + jabber_send_raw(js, "<?xml version='1.0' ?>", -1); + jabber_stream_set_state(js, JABBER_STREAM_INITIALIZING); + gaim_ssl_input_add(gsc, jabber_recv_cb_ssl, gc); +} + + +static void +jabber_login_callback(gpointer data, gint source, const gchar *error) +{ + GaimConnection *gc = data; + JabberStream *js = gc->proto_data; + + js->connect_info = NULL; + + if (source < 0) { + gaim_connection_error(gc, _("Couldn't connect to host")); + 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 = gaim_input_add(js->fd, GAIM_INPUT_READ, jabber_recv_cb, gc); +} + +static void +jabber_ssl_connect_failure(GaimSslConnection *gsc, GaimSslErrorType error, + gpointer data) +{ + GaimConnection *gc = data; + JabberStream *js = gc->proto_data; + + switch(error) { + case GAIM_SSL_CONNECT_FAILED: + gaim_connection_error(gc, _("Connection Failed")); + break; + case GAIM_SSL_HANDSHAKE_FAILED: + gaim_connection_error(gc, _("SSL Handshake Failed")); + break; + } + + js->gsc = NULL; +} + +static void tls_init(JabberStream *js) +{ + gaim_input_remove(js->gc->inpa); + js->gc->inpa = 0; + js->gsc = gaim_ssl_connect_fd(js->gc->account, js->fd, + jabber_login_callback_ssl, jabber_ssl_connect_failure, js->gc); +} + +static void jabber_login_connect(JabberStream *js, const char *server, int port) +{ + js->connect_info = gaim_proxy_connect(js->gc->account, server, + port, jabber_login_callback, js->gc); + + if (js->connect_info == NULL) + gaim_connection_error(js->gc, _("Unable to create socket")); +} + +static void srv_resolved_cb(GaimSrvResponse *resp, int results, gpointer data) +{ + GaimConnection *gc; + JabberStream *js; + + gc = data; + if (!GAIM_CONNECTION_IS_VALID(gc)) + { + /* This connection has been closed */ + g_free(resp); + return; + } + + js = (JabberStream*)gc->proto_data; + + if(results) { + jabber_login_connect(js, resp->hostname, resp->port); + g_free(resp); + } else { + jabber_login_connect(js, js->user->domain, + gaim_account_get_int(js->gc->account, "port", 5222)); + } +} + + + +static void +jabber_login(GaimAccount *account) +{ + GaimConnection *gc = gaim_account_get_connection(account); + const char *connect_server = gaim_account_get_string(account, + "connect_server", ""); + JabberStream *js; + JabberBuddy *my_jb = NULL; + + gc->flags |= GAIM_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->chat_servers = g_list_append(NULL, g_strdup("conference.jabber.org")); + js->user = jabber_id_new(gaim_account_get_username(account)); + js->next_id = g_random_int(); + js->write_buffer = gaim_circ_buffer_new(512); + + if(!js->user) { + gaim_connection_error(gc, _("Invalid Jabber ID")); + 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); + gaim_account_set_username(account, me); + g_free(me); + } + + if((my_jb = jabber_buddy_find(js, gaim_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(gaim_account_get_bool(js->gc->account, "old_ssl", FALSE)) { + if(gaim_ssl_is_supported()) { + js->gsc = gaim_ssl_connect(js->gc->account, + connect_server[0] ? connect_server : js->user->domain, + gaim_account_get_int(account, "port", 5223), jabber_login_callback_ssl, + jabber_ssl_connect_failure, js->gc); + } else { + gaim_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, connect_server, gaim_account_get_int(account, "port", 5222)); + } else { + gaim_srv_resolve("xmpp-client", "tcp", js->user->domain, srv_resolved_cb, gc); + } + } +} + + +static gboolean +conn_close_cb(gpointer data) +{ + JabberStream *js = data; + GaimAccount *account = gaim_connection_get_account(js->gc); + + gaim_account_disconnect(account); + + return FALSE; +} + +static void +jabber_connection_schedule_close(JabberStream *js) +{ + gaim_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); + gaim_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")); + + gaim_notify_error(NULL, _("Registration Failed"), + _("Registration Failed"), msg); + g_free(msg); + } + jabber_connection_schedule_close(js); +} + +static void +jabber_register_cb(JabberStream *js, GaimRequestFields *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 = gaim_request_fields_get_groups(fields); groups; + groups = groups->next) { + for(flds = gaim_request_field_group_get_fields(groups->data); + flds; flds = flds->next) { + GaimRequestField *field = flds->data; + const char *id = gaim_request_field_get_id(field); + const char *value = gaim_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); + gaim_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, GaimRequestFields *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) +{ + if(js->registration) { + GaimRequestFields *fields; + GaimRequestFieldGroup *group; + GaimRequestField *field; + xmlnode *query, *x, *y; + char *instructions; + + /* get rid of the login thingy */ + gaim_connection_set_state(js->gc, GAIM_CONNECTED); + + query = xmlnode_get_child(packet, "query"); + + if(xmlnode_get_child(query, "registered")) { + gaim_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))) { + gaim_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 = gaim_request_fields_new(); + group = gaim_request_field_group_new(NULL); + gaim_request_fields_add_group(fields, group); + + field = gaim_request_field_string_new("username", _("Username"), + js->user->node, FALSE); + gaim_request_field_group_add_field(group, field); + + field = gaim_request_field_string_new("password", _("Password"), + gaim_connection_get_password(js->gc), FALSE); + gaim_request_field_string_set_masked(field, TRUE); + gaim_request_field_group_add_field(group, field); + + if(xmlnode_get_child(query, "name")) { + field = gaim_request_field_string_new("name", _("Name"), + gaim_account_get_alias(js->gc->account), FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "email")) { + field = gaim_request_field_string_new("email", _("E-mail"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "nick")) { + field = gaim_request_field_string_new("nick", _("Nickname"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "first")) { + field = gaim_request_field_string_new("first", _("First name"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "last")) { + field = gaim_request_field_string_new("last", _("Last name"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "address")) { + field = gaim_request_field_string_new("address", _("Address"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "city")) { + field = gaim_request_field_string_new("city", _("City"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "state")) { + field = gaim_request_field_string_new("state", _("State"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "zip")) { + field = gaim_request_field_string_new("zip", _("Postal code"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "phone")) { + field = gaim_request_field_string_new("phone", _("Phone"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "url")) { + field = gaim_request_field_string_new("url", _("URL"), + NULL, FALSE); + gaim_request_field_group_add_field(group, field); + } + if(xmlnode_get_child(query, "date")) { + field = gaim_request_field_string_new("date", _("Date"), + NULL, FALSE); + gaim_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.")); + + gaim_request_fields(js->gc, _("Register New Jabber Account"), + _("Register New Jabber Account"), instructions, fields, + _("Register"), G_CALLBACK(jabber_register_cb), + _("Cancel"), G_CALLBACK(jabber_register_cancel_cb), 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); +} + +static void jabber_register_account(GaimAccount *account) +{ + GaimConnection *gc = gaim_account_get_connection(account); + JabberStream *js; + JabberBuddy *my_jb = NULL; + const char *connect_server = gaim_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(gaim_account_get_username(account)); + js->next_id = g_random_int(); + + if(!js->user) { + gaim_connection_error(gc, _("Invalid Jabber ID")); + return; + } + + js->write_buffer = gaim_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); + gaim_account_set_username(account, me); + g_free(me); + } + + if((my_jb = jabber_buddy_find(js, gaim_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(gaim_account_get_bool(account, "old_ssl", FALSE)) { + if(gaim_ssl_is_supported()) { + js->gsc = gaim_ssl_connect(account, server, + gaim_account_get_int(account, "port", 5222), + jabber_login_callback_ssl, jabber_ssl_connect_failure, gc); + } else { + gaim_connection_error(gc, _("SSL support unavailable")); + } + } + + if(!js->gsc) { + js->connect_info = gaim_proxy_connect(account, server, + gaim_account_get_int(account, "port", 5222), + jabber_login_callback, gc); + + if (js->connect_info == NULL) + gaim_connection_error(gc, _("Unable to create socket")); + } +} + +static void jabber_close(GaimConnection *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->connect_info) + gaim_proxy_connect_cancel(js->connect_info); + + if(js->gsc) { +#ifdef HAVE_OPENSSL + if (!gc->disconnect_timeout) +#endif + gaim_ssl_close(js->gsc); + } else if (js->fd > 0) { + if(js->gc->inpa) + gaim_input_remove(js->gc->inpa); + close(js->fd); + } +#ifndef HAVE_LIBXML + if(js->context) + g_markup_parse_context_free(js->context); +#endif + 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); + gaim_circ_buffer_destroy(js->write_buffer); + if(js->writeh) + gaim_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 + g_free(js); + + gc->proto_data = NULL; +} + +void jabber_stream_set_state(JabberStream *js, JabberStreamState state) +{ + GaimPresence *gpresence; + GaimStatus *status; + + js->state = state; + switch(state) { + case JABBER_STREAM_OFFLINE: + break; + case JABBER_STREAM_CONNECTING: + gaim_connection_update_progress(js->gc, _("Connecting"), 1, + JABBER_CONNECT_STEPS); + break; + case JABBER_STREAM_INITIALIZING: + gaim_connection_update_progress(js->gc, _("Initializing Stream"), + js->gsc ? 5 : 2, JABBER_CONNECT_STEPS); + jabber_stream_init(js); + break; + case JABBER_STREAM_AUTHENTICATING: + gaim_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: + gaim_connection_update_progress(js->gc, _("Re-initializing Stream"), + (js->gsc ? 7 : 4), JABBER_CONNECT_STEPS); + if (js->gsc) { + /* The stream will be reinitialized later, in jabber_recv_cb_ssl() */ + js->reinit = TRUE; + } else { + jabber_stream_init(js); + } + break; + case JABBER_STREAM_CONNECTED: + jabber_roster_request(js); + gpresence = gaim_account_get_presence(js->gc->account); + status = gaim_presence_get_active_status(gpresence); + jabber_presence_send(js->gc->account, status); + gaim_connection_set_state(js->gc, GAIM_CONNECTED); + jabber_disco_items_server(js); + break; + } +} + +char *jabber_get_next_id(JabberStream *js) +{ + return g_strdup_printf("gaim%x", js->next_id++); +} + + +static void jabber_idle_set(GaimConnection *gc, int idle) +{ + JabberStream *js = gc->proto_data; + + js->idle = idle ? time(NULL) - idle : idle; +} + +static const char *jabber_list_icon(GaimAccount *a, GaimBuddy *b) +{ + return "jabber"; +} + +static void jabber_list_emblems(GaimBuddy *b, const char **se, const char **sw, + const char **nw, const char **ne) +{ + JabberStream *js; + JabberBuddy *jb = NULL; + + if(!b->account->gc) + return; + js = b->account->gc->proto_data; + if(js) + jb = jabber_buddy_find(js, b->name, FALSE); + + if(!GAIM_BUDDY_IS_ONLINE(b)) { + if(jb && jb->error_msg) + *nw = "error"; + + if(jb && (jb->subscription & JABBER_SUB_PENDING || + !(jb->subscription & JABBER_SUB_TO))) + *se = "notauthorized"; + else + *se = "offline"; + } else { + GaimStatusType *status_type = gaim_status_get_type(gaim_presence_get_active_status(gaim_buddy_get_presence(b))); + GaimStatusPrimitive primitive = gaim_status_type_get_primitive(status_type); + + if(primitive > GAIM_STATUS_AVAILABLE) { + *se = gaim_status_type_get_id(status_type); + } + } +} + +static char *jabber_status_text(GaimBuddy *b) +{ + JabberBuddy *jb = jabber_buddy_find(b->account->gc->proto_data, b->name, + FALSE); + char *ret = NULL; + + if(jb && !GAIM_BUDDY_IS_ONLINE(b) && (jb->subscription & JABBER_SUB_PENDING || !(jb->subscription & JABBER_SUB_TO))) { + ret = g_strdup(_("Not Authorized")); + } else if(jb && !GAIM_BUDDY_IS_ONLINE(b) && jb->error_msg) { + ret = g_strdup(jb->error_msg); + } else { + char *stripped; + + if(!(stripped = gaim_markup_strip_html(jabber_buddy_get_status_msg(jb)))) { + GaimStatus *status = gaim_presence_get_active_status(gaim_buddy_get_presence(b)); + + if(!gaim_status_is_available(status)) + stripped = g_strdup(gaim_status_get_name(status)); + } + + if(stripped) { + ret = g_markup_escape_text(stripped, -1); + g_free(stripped); + } + } + + return ret; +} + +static void jabber_tooltip_text(GaimBuddy *b, GString *str, 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"); + } + g_string_append_printf(str, "\n<b>%s:</b> %s", _("Subscription"), sub); + } + + for(l=jb->resources; l; l = l->next) { + char *text = NULL; + char *res = NULL; + const char *state; + + jbr = l->data; + + if(jbr->status) { + char *tmp; + text = gaim_strreplace(jbr->status, "\n", "<br />\n"); + tmp = gaim_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 && !gaim_utf8_strcasecmp(state, text)) { + g_free(text); + text = NULL; + } + + g_string_append_printf(str, "\n<b>%s%s:</b> %s%s%s", + _("Status"), + res ? res : "", + state, + text ? ": " : "", + text ? text : ""); + + g_free(text); + g_free(res); + } + + if(!GAIM_BUDDY_IS_ONLINE(b) && jb->error_msg) { + g_string_append_printf(str, "\n<b>%s:</b> %s", + _("Error"), jb->error_msg); + } + } +} + +static GList *jabber_status_types(GaimAccount *account) +{ + GaimStatusType *type; + GList *types = NULL; + GaimValue *priority_value; + + priority_value = gaim_value_new(GAIM_TYPE_INT); + gaim_value_set_int(priority_value, 1); + type = gaim_status_type_new_with_attrs(GAIM_STATUS_AVAILABLE, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_ONLINE), + NULL, TRUE, TRUE, FALSE, + "priority", _("Priority"), priority_value, + "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), + NULL); + types = g_list_append(types, type); + + priority_value = gaim_value_new(GAIM_TYPE_INT); + gaim_value_set_int(priority_value, 1); + type = gaim_status_type_new_with_attrs(GAIM_STATUS_AVAILABLE, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_CHAT), + _("Chatty"), TRUE, TRUE, FALSE, + "priority", _("Priority"), priority_value, + "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), + NULL); + types = g_list_append(types, type); + + priority_value = gaim_value_new(GAIM_TYPE_INT); + gaim_value_set_int(priority_value, 0); + type = gaim_status_type_new_with_attrs(GAIM_STATUS_AWAY, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_AWAY), + NULL, TRUE, TRUE, FALSE, + "priority", _("Priority"), priority_value, + "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), + NULL); + types = g_list_append(types, type); + + priority_value = gaim_value_new(GAIM_TYPE_INT); + gaim_value_set_int(priority_value, 0); + type = gaim_status_type_new_with_attrs(GAIM_STATUS_EXTENDED_AWAY, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_XA), + NULL, TRUE, TRUE, FALSE, + "priority", _("Priority"), priority_value, + "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), + NULL); + types = g_list_append(types, type); + + priority_value = gaim_value_new(GAIM_TYPE_INT); + gaim_value_set_int(priority_value, 0); + type = gaim_status_type_new_with_attrs(GAIM_STATUS_UNAVAILABLE, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_DND), + _("Do Not Disturb"), TRUE, TRUE, FALSE, + "priority", _("Priority"), priority_value, + "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), + NULL); + types = g_list_append(types, type); + + /* + if(js->protocol_version == JABBER_PROTO_0_9) + m = g_list_append(m, _("Invisible")); + */ + + type = gaim_status_type_new_with_attrs(GAIM_STATUS_OFFLINE, + jabber_buddy_state_get_status_id(JABBER_BUDDY_STATE_UNAVAILABLE), + NULL, FALSE, TRUE, FALSE, + "message", _("Message"), gaim_value_new(GAIM_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")) { + gaim_notify_info(js->gc, _("Password Changed"), _("Password Changed"), + _("Your password has been changed.")); + } else { + char *msg = jabber_parse_error(js, packet); + + gaim_notify_error(js->gc, _("Error changing password"), + _("Error changing password"), msg); + g_free(msg); + } +} + +static void jabber_password_change_cb(JabberStream *js, + GaimRequestFields *fields) +{ + const char *p1, *p2; + JabberIq *iq; + xmlnode *query, *y; + + p1 = gaim_request_fields_get_string(fields, "password1"); + p2 = gaim_request_fields_get_string(fields, "password2"); + + if(strcmp(p1, p2)) { + gaim_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); + + gaim_account_set_password(js->gc->account, p1); +} + +static void jabber_password_change(GaimPluginAction *action) +{ + + GaimConnection *gc = (GaimConnection *) action->context; + JabberStream *js = gc->proto_data; + GaimRequestFields *fields; + GaimRequestFieldGroup *group; + GaimRequestField *field; + + fields = gaim_request_fields_new(); + group = gaim_request_field_group_new(NULL); + gaim_request_fields_add_group(fields, group); + + field = gaim_request_field_string_new("password1", _("Password"), + "", FALSE); + gaim_request_field_string_set_masked(field, TRUE); + gaim_request_field_group_add_field(group, field); + + field = gaim_request_field_string_new("password2", _("Password (again)"), + "", FALSE); + gaim_request_field_string_set_masked(field, TRUE); + gaim_request_field_group_add_field(group, field); + + gaim_request_fields(js->gc, _("Change Jabber Password"), + _("Change Jabber Password"), _("Please enter your new password"), + fields, _("OK"), G_CALLBACK(jabber_password_change_cb), + _("Cancel"), NULL, js); +} + +static GList *jabber_actions(GaimPlugin *plugin, gpointer context) +{ + GList *m = NULL; + GaimPluginAction *act; + + act = gaim_plugin_action_new(_("Set User Info..."), + jabber_setup_set_info); + m = g_list_append(m, act); + + /* if (js->protocol_options & CHANGE_PASSWORD) { */ + act = gaim_plugin_action_new(_("Change Password..."), + jabber_password_change); + m = g_list_append(m, act); + /* } */ + + act = gaim_plugin_action_new(_("Search for Users..."), + jabber_user_search_begin); + m = g_list_append(m, act); + + return m; +} + +static GaimChat *jabber_find_blist_chat(GaimAccount *account, const char *name) +{ + GaimBlistNode *gnode, *cnode; + JabberID *jid; + + if(!(jid = jabber_id_new(name))) + return NULL; + + for(gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { + for(cnode = gnode->child; cnode; cnode = cnode->next) { + GaimChat *chat = (GaimChat*)cnode; + const char *room, *server; + if(!GAIM_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; +} + +static void jabber_convo_closed(GaimConnection *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; + } + } + + 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 Jabber 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")) { + 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 GaimCmdRet jabber_cmd_chat_config(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + jabber_chat_request_room_configure(chat); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_register(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + jabber_chat_register(chat); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_topic(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + jabber_chat_change_topic(chat, args ? args[0] : NULL); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_nick(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + + if(!args || !args[0]) + return GAIM_CMD_RET_FAILED; + + jabber_chat_change_nick(chat, args[0]); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_part(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + jabber_chat_part(chat, args ? args[0] : NULL); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_ban(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + + if(!args || !args[0]) + return GAIM_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 GAIM_CMD_RET_FAILED; + } + + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_affiliate(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + + if (!args || !args[0] || !args[1]) + return GAIM_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 GAIM_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 GAIM_CMD_RET_FAILED; + } + + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_role(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat; + + if (!args || !args[0] || !args[1]) + return GAIM_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 GAIM_CMD_RET_FAILED; + } + + chat = jabber_chat_find_by_conv(conv); + + 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 GAIM_CMD_RET_FAILED; + } + + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_invite(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + if(!args || !args[0]) + return GAIM_CMD_RET_FAILED; + + jabber_chat_invite(gaim_conversation_get_gc(conv), + gaim_conv_chat_get_id(GAIM_CONV_CHAT(conv)), args[1] ? args[1] : "", + args[0]); + + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_join(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + GHashTable *components; + + if(!args || !args[0]) + return GAIM_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(gaim_conversation_get_gc(conv), components); + + g_hash_table_destroy(components); + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_kick(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + + if(!args || !args[0]) + return GAIM_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 GAIM_CMD_RET_FAILED; + } + + return GAIM_CMD_RET_OK; +} + +static GaimCmdRet jabber_cmd_chat_msg(GaimConversation *conv, + const char *cmd, char **args, char **error, void *data) +{ + JabberChat *chat = jabber_chat_find_by_conv(conv); + char *who; + + who = g_strdup_printf("%s@%s/%s", chat->room, chat->server, args[0]); + + jabber_message_send_im(gaim_conversation_get_gc(conv), who, args[1], 0); + + g_free(who); + return GAIM_CMD_RET_OK; +} + +static gboolean jabber_offline_message(const GaimBuddy *buddy) +{ + return TRUE; +} + +static void jabber_register_commands(void) +{ + gaim_cmd_register("config", "", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, + "prpl-jabber", jabber_cmd_chat_config, + _("config: Configure a chat room."), NULL); + gaim_cmd_register("configure", "", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, + "prpl-jabber", jabber_cmd_chat_config, + _("configure: Configure a chat room."), NULL); + gaim_cmd_register("nick", "s", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, + "prpl-jabber", jabber_cmd_chat_nick, + _("nick <new nickname>: Change your nickname."), + NULL); + gaim_cmd_register("part", "s", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_part, _("part [room]: Leave the room."), + NULL); + gaim_cmd_register("register", "", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_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 */ + gaim_cmd_register("topic", "s", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_topic, + _("topic [new topic]: View or change the topic."), + NULL); + gaim_cmd_register("ban", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_ban, + _("ban <user> [room]: Ban a user from the room."), + NULL); + gaim_cmd_register("affiliate", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_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); + gaim_cmd_register("role", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_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); + gaim_cmd_register("invite", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_invite, + _("invite <user> [message]: Invite a user to the room."), + NULL); + gaim_cmd_register("join", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_join, + _("join: <room> [server]: Join a chat on this server."), + NULL); + gaim_cmd_register("kick", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY | + GAIM_CMD_FLAG_ALLOW_WRONG_ARGS, "prpl-jabber", + jabber_cmd_chat_kick, + _("kick <user> [room]: Kick a user from the room."), + NULL); + gaim_cmd_register("msg", "ws", GAIM_CMD_P_PRPL, + GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, + "prpl-jabber", jabber_cmd_chat_msg, + _("msg <user> <message>: Send a private message to another user."), + NULL); +} + +static GaimPluginProtocolInfo prpl_info = +{ + OPT_PROTO_CHAT_TOPIC | OPT_PROTO_UNIQUE_CHATNAME, + NULL, /* user_splits */ + NULL, /* protocol_options */ + {"jpeg,gif,png", 0, 0, 96, 96, GAIM_ICON_SCALE_DISPLAY}, /* icon_spec */ + jabber_list_icon, /* list_icon */ + jabber_list_emblems, /* list_emblems */ + jabber_status_text, /* status_text */ + jabber_tooltip_text, /* tooltip_text */ + jabber_status_types, /* status_types */ + jabber_blist_node_menu, /* blist_node_menu */ + jabber_chat_info, /* chat_info */ + jabber_chat_info_defaults, /* chat_info_defaults */ + jabber_login, /* login */ + jabber_close, /* close */ + jabber_message_send_im, /* send_im */ + jabber_set_info, /* set_info */ + jabber_send_typing, /* send_typing */ + jabber_buddy_get_info, /* get_info */ + jabber_presence_send, /* set_away */ + jabber_idle_set, /* set_idle */ + NULL, /* change_passwd */ + jabber_roster_add_buddy, /* add_buddy */ + NULL, /* add_buddies */ + jabber_roster_remove_buddy, /* remove_buddy */ + NULL, /* remove_buddies */ + NULL, /* add_permit */ + NULL, /* add_deny */ + NULL, /* rem_permit */ + NULL, /* rem_deny */ + NULL, /* set_permit_deny */ + jabber_chat_join, /* join_chat */ + NULL, /* reject_chat */ + jabber_get_chat_name, /* get_chat_name */ + jabber_chat_invite, /* chat_invite */ + jabber_chat_leave, /* chat_leave */ + NULL, /* chat_whisper */ + jabber_message_send_chat, /* chat_send */ + jabber_keepalive, /* keepalive */ + jabber_register_account, /* register_user */ + jabber_buddy_get_info_chat, /* get_cb_info */ + NULL, /* get_cb_away */ + jabber_roster_alias_change, /* alias_buddy */ + jabber_roster_group_change, /* group_buddy */ + jabber_roster_group_rename, /* rename_group */ + NULL, /* buddy_free */ + jabber_convo_closed, /* convo_closed */ + jabber_normalize, /* normalize */ + jabber_set_buddy_icon, /* set_buddy_icon */ + NULL, /* remove_group */ + jabber_chat_buddy_real_name, /* get_cb_real_name */ + jabber_chat_set_topic, /* set_chat_topic */ + jabber_find_blist_chat, /* find_blist_chat */ + jabber_roomlist_get_list, /* roomlist_get_list */ + jabber_roomlist_cancel, /* roomlist_cancel */ + NULL, /* roomlist_expand_category */ + NULL, /* can_receive_file */ + jabber_si_xfer_send, /* send_file */ + jabber_si_new_xfer, /* new_xfer */ + jabber_offline_message, /* offline_message */ + NULL, /* whiteboard_prpl_ops */ +}; + +static GaimPluginInfo info = +{ + GAIM_PLUGIN_MAGIC, + GAIM_MAJOR_VERSION, + GAIM_MINOR_VERSION, + GAIM_PLUGIN_PROTOCOL, /**< type */ + NULL, /**< ui_requirement */ + 0, /**< flags */ + NULL, /**< dependencies */ + GAIM_PRIORITY_DEFAULT, /**< priority */ + + "prpl-jabber", /**< id */ + "Jabber", /**< name */ + VERSION, /**< version */ + /** summary */ + N_("Jabber Protocol Plugin"), + /** description */ + N_("Jabber Protocol Plugin"), + NULL, /**< author */ + GAIM_WEBSITE, /**< homepage */ + + NULL, /**< load */ + NULL, /**< unload */ + NULL, /**< destroy */ + + NULL, /**< ui_info */ + &prpl_info, /**< extra_info */ + NULL, /**< prefs_info */ + jabber_actions +}; + +static void +init_plugin(GaimPlugin *plugin) +{ + GaimAccountUserSplit *split; + GaimAccountOption *option; + + split = gaim_account_user_split_new(_("Server"), "jabber.org", '@'); + prpl_info.user_splits = g_list_append(prpl_info.user_splits, split); + + split = gaim_account_user_split_new(_("Resource"), "Home", '/'); + prpl_info.user_splits = g_list_append(prpl_info.user_splits, split); + + option = gaim_account_option_bool_new(_("Use TLS if available"), "use_tls", + TRUE); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, + option); + + option = gaim_account_option_bool_new(_("Require TLS"), "require_tls", TRUE); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); + + option = gaim_account_option_bool_new(_("Force old (port 5223) SSL"), "old_ssl", FALSE); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, + option); + + option = gaim_account_option_bool_new( + _("Allow plaintext auth over unencrypted streams"), + "auth_plain_in_clear", FALSE); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, + option); + + option = gaim_account_option_int_new(_("Connect port"), "port", 5222); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, + option); + + option = gaim_account_option_string_new(_("Connect server"), + "connect_server", NULL); + prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, + option); + + my_protocol = plugin; + + gaim_prefs_remove("/plugins/prpl/jabber"); + + /* XXX - If any other plugin wants SASL this won't be good ... */ +#ifdef HAVE_CYRUS_SASL + sasl_client_init(NULL); +#endif + jabber_register_commands(); +} + +GAIM_INIT_PLUGIN(jabber, init_plugin, info);