jabber_server.c

   1 /*
   2 ** Copyright (C) 2006 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
   3 **
   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.
   8 **
   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.
  13 **
  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.
  17 **
  18 */
  19
  20 #include <gnet.h>
  21 #include <glib.h>
  22 #include <iksemel.h>
  23 #include "iksemel_extra.h"
  24 #include "jabber.h"
  25
  26 static void jabber_server_connect (net_hook_t* hook)
  27 {
  28   g_message ("Connected to jabber server.");
  29 }
  30
  31 static void jabber_server_close (net_hook_t* hook)
  32 {
  33   g_message ("Server disconnected.");
  34 }
  35
  36 static void jabber_server_write (net_hook_t* hook)
  37 {
  38 }
  39
  40 static void jabber_server_read (net_hook_t* hook, gchar* buffer, size_t len)
  41 {
  42   iks_parse (hook->data, buffer, len, FALSE);
  43 }
  44
  45 int jabber_server_parser (gpointer data, int type, iks* node)
  46 {
  47   net_hook_t* hook;
  48   GString* buffer;
  49   hook = (net_hook_t*) data;
  50   switch (type)
  51     {
  52     case IKS_NODE_START:
  53       buffer = jabber_new_start (node);
  54       gnet_conn_write (hook->peer, buffer->str, buffer->len);
  55       g_string_free (buffer, TRUE);
  56       iks_delete (node);
  57       break;
  58     case IKS_NODE_NORMAL:
  59       buffer = g_string_new (iks_string (iks_stack (node), node));
  60       gnet_conn_write (hook->peer, buffer->str, buffer->len);
  61       g_string_free (buffer, TRUE);
  62       iks_delete (node);
  63       break;
  64     case IKS_NODE_STOP:
  65       gnet_conn_write (hook->peer, "</stream:stream>", 16);
  66       break;
  67     case IKS_NODE_ERROR:
  68       g_debug ("Parse error!!");
  69       break;
  70     }
  71   return IKS_OK;
  72 }
  73
  74 net_hook_t* jabber_server_hook_new (net_hook_t* client_hook, char* server)
  75 {
  76   net_hook_t* hook;
  77   hook = g_slice_new (net_hook_t);
  78   hook->conn = gnet_conn_new (server, 5222, nethook_event, hook);
  79   hook->peer = client_hook->conn;
  80   hook->server = TRUE;
  81   hook->connect = jabber_server_connect;
  82   hook->close = jabber_server_close;
  83   hook->write = jabber_server_write;
  84   hook->read = jabber_server_read;
  85   hook->data = iks_extra_stream_new (hook, jabber_server_parser);
  86   return hook;
  87 }