2 ** Copyright (C) 2006 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
4 ** This program is free software; you can redistribute it and/or modify
5 ** it under the terms of the GNU General Public License as published by
6 ** the Free Software Foundation; either version 2 of the License, or
7 ** (at your option) any later version.
9 ** This program is distributed in the hope that it will be useful,
10 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
11 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 ** GNU General Public License for more details.
14 ** You should have received a copy of the GNU General Public License
15 ** along with this program; if not, write to the Free Software
16 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
23 #include "iksemel_extra.h"
26 static void jabber_connect (net_hook_t* hook)
30 static void jabber_close (net_hook_t* hook)
34 hook->peer->peer = NULL;
35 gnet_conn_disconnect (hook->peer->conn);
37 gnet_conn_delete (hook->conn);
38 iks_parser_delete (hook->data);
39 g_slice_free (net_hook_t, hook);
42 static void jabber_write (net_hook_t* hook)
46 static void jabber_read (net_hook_t* hook, gchar* buffer, size_t len)
48 iks_parse (hook->data, buffer, len, FALSE);
51 void jabber_error (net_hook_t* hook)
53 g_message ("Error in jabber client connection.");
56 GString* jabber_new_start (iks* node)
59 buffer = g_string_sized_new (256);
60 g_string_append (buffer, iks_string (iks_stack (node), node));
61 g_string_erase (buffer, buffer->len - 2, 1);
65 void jabber_connect_server (net_hook_t* hook, char* server, iks* node)
67 net_hook_t* server_hook;
69 g_message ("Received new stream.");
70 if (hook->peer == NULL)
72 server_hook = jabber_server_hook_new (hook, server);
73 hook->peer = server_hook;
74 g_message ("Trying to connect to server %s.", server);
75 gnet_conn_connect (hook->peer->conn);
76 gnet_conn_read (hook->peer->conn);
78 buffer = jabber_new_start (node);
79 gnet_conn_write (hook->peer->conn, buffer->str, buffer->len);
80 g_string_free (buffer, TRUE);
84 jabber_sasl_plain_filter (iks *node)
86 if (g_str_equal (iks_name (node), "auth") &&
87 g_str_equal (iks_find_attrib (node, "xmlns"),
88 "urn:ietf:params:xml:ns:xmpp-sasl"))
93 b64 = iks_cdata (iks_child (node));
94 uname = g_base64_decode (b64, &uname_len);
95 g_message ("User trying authentication as %s", uname);
100 void jabber_send (net_hook_t* hook, iks* node)
103 jabber_sasl_plain_filter (node);
104 buffer = g_string_new (iks_string (iks_stack (node), node));
105 gnet_conn_write (hook->peer->conn, buffer->str, buffer->len);
106 g_string_free (buffer, TRUE);
109 int jabber_parser (gpointer data, int type, iks* node)
113 hook = (net_hook_t*) data;
117 server = iks_find_attrib (node, "to");
122 jabber_connect_server (hook, server, node);
125 case IKS_NODE_NORMAL:
126 jabber_send (hook, node);
130 gnet_conn_write (hook->peer->conn, "</stream:stream>", 16);
138 net_hook_t* jabber_hook_new (GConn* conn)
141 hook = g_slice_new (net_hook_t);
144 hook->server = FALSE;
145 hook->connect = jabber_connect;
146 hook->close = jabber_close;
147 hook->write = jabber_write;
148 hook->read = jabber_read;
149 hook->data = iks_extra_stream_new (hook, jabber_parser);
150 gnet_conn_set_callback (hook->conn, nethook_event, hook);
154 void jabber_destroy (net_hook_t* hook)
156 g_slice_free (net_hook_t, hook);