source: protocols/jabber/presence.c @ 718e05f

Last change on this file since 718e05f was 8c1eb80, checked in by Wilmer van der Gaast <wilmer@…>, at 2008-02-03T16:59:39Z

Implemented XEP-0115. This adds some info to the <presence/> tags so
clients interested in capabilities can cache discovery info, so they don't
have to ask about it every time you/they log in.

  • Property mode set to 100644
File size: 8.7 KB
Line 
1/***************************************************************************\
2*                                                                           *
3*  BitlBee - An IRC to IM gateway                                           *
4*  Jabber module - Handling of presence (tags), etc                         *
5*                                                                           *
6*  Copyright 2006 Wilmer van der Gaast <wilmer@gaast.net>                   *
7*                                                                           *
8*  This program is free software; you can redistribute it and/or modify     *
9*  it under the terms of the GNU General Public License as published by     *
10*  the Free Software Foundation; either version 2 of the License, or        *
11*  (at your option) any later version.                                      *
12*                                                                           *
13*  This program is distributed in the hope that it will be useful,          *
14*  but WITHOUT ANY WARRANTY; without even the implied warranty of           *
15*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the            *
16*  GNU General Public License for more details.                             *
17*                                                                           *
18*  You should have received a copy of the GNU General Public License along  *
19*  with this program; if not, write to the Free Software Foundation, Inc.,  *
20*  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.              *
21*                                                                           *
22\***************************************************************************/
23
24#include "jabber.h"
25
26xt_status jabber_pkt_presence( struct xt_node *node, gpointer data )
27{
28        struct im_connection *ic = data;
29        char *from = xt_find_attr( node, "from" );
30        char *type = xt_find_attr( node, "type" );      /* NULL should mean the person is online. */
31        struct xt_node *c, *cap;
32        struct jabber_buddy *bud, *send_presence = NULL;
33        int is_chat = 0;
34        char *s;
35       
36        if( !from )
37                return XT_HANDLED;
38       
39        if( ( s = strchr( from, '/' ) ) )
40        {
41                *s = 0;
42                if( jabber_chat_by_jid( ic, from ) )
43                        is_chat = 1;
44                *s = '/';
45        }
46       
47        if( type == NULL )
48        {
49                if( !( bud = jabber_buddy_by_jid( ic, from, GET_BUDDY_EXACT | GET_BUDDY_CREAT ) ) )
50                {
51                        if( set_getbool( &ic->irc->set, "debug" ) )
52                                imcb_log( ic, "Warning: Could not handle presence information from JID: %s", from );
53                        return XT_HANDLED;
54                }
55               
56                g_free( bud->away_message );
57                if( ( c = xt_find_node( node->children, "status" ) ) && c->text_len > 0 )
58                        bud->away_message = g_strdup( c->text );
59                else
60                        bud->away_message = NULL;
61               
62                if( ( c = xt_find_node( node->children, "show" ) ) && c->text_len > 0 )
63                {
64                        bud->away_state = (void*) jabber_away_state_by_code( c->text );
65                }
66                else
67                {
68                        bud->away_state = NULL;
69                        /* Let's only set last_act if there's *no* away state,
70                           since it could be some auto-away thingy. */
71                        bud->last_act = time( NULL );
72                }
73               
74                if( ( c = xt_find_node( node->children, "priority" ) ) && c->text_len > 0 )
75                        bud->priority = atoi( c->text );
76                else
77                        bud->priority = 0;
78               
79                if( bud && ( cap = xt_find_node( node->children, "c" ) ) &&
80                    ( s = xt_find_attr( cap, "xmlns" ) ) && strcmp( s, XMLNS_CAPS ) == 0 )
81                {
82                        /* This <presence> stanza includes an XEP-0115
83                           capabilities part. Not too interesting, but we can
84                           see if it has an ext= attribute. */
85                        s = xt_find_attr( cap, "ext" );
86                        if( s && ( strstr( s, "cstates" ) || strstr( s, "chatstate" ) ) )
87                                bud->flags |= JBFLAG_DOES_XEP85;
88                       
89                        /* This field can contain more information like xhtml
90                           support, but we don't support that ourselves.
91                           Officially the ext= tag was deprecated, but enough
92                           clients do send it.
93                           
94                           (I'm aware that this is not the right way to use
95                           this field.) See for an explanation of ext=:
96                           http://www.xmpp.org/extensions/attic/xep-0115-1.3.html*/
97                }
98               
99                if( is_chat )
100                        jabber_chat_pkt_presence( ic, bud, node );
101                else
102                        send_presence = jabber_buddy_by_jid( ic, bud->bare_jid, 0 );
103        }
104        else if( strcmp( type, "unavailable" ) == 0 )
105        {
106                if( ( bud = jabber_buddy_by_jid( ic, from, 0 ) ) == NULL )
107                {
108                        if( set_getbool( &ic->irc->set, "debug" ) )
109                                imcb_log( ic, "Warning: Received presence information from unknown JID: %s", from );
110                        return XT_HANDLED;
111                }
112               
113                /* Handle this before we delete the JID. */
114                if( is_chat )
115                {
116                        jabber_chat_pkt_presence( ic, bud, node );
117                }
118               
119                if( strchr( from, '/' ) == NULL )
120                        /* Sometimes servers send a type="unavailable" from a
121                           bare JID, which should mean that suddenly all
122                           resources for this JID disappeared. */
123                        jabber_buddy_remove_bare( ic, from );
124                else
125                        jabber_buddy_remove( ic, from );
126               
127                if( is_chat )
128                {
129                        /* Nothing else to do for now? */
130                }
131                else if( ( s = strchr( from, '/' ) ) )
132                {
133                        *s = 0;
134               
135                        /* If another resource is still available, send its presence
136                           information. */
137                        if( ( send_presence = jabber_buddy_by_jid( ic, from, 0 ) ) == NULL )
138                        {
139                                /* Otherwise, count him/her as offline now. */
140                                imcb_buddy_status( ic, from, 0, NULL, NULL );
141                        }
142                       
143                        *s = '/';
144                }
145                else
146                {
147                        imcb_buddy_status( ic, from, 0, NULL, NULL );
148                }
149        }
150        else if( strcmp( type, "subscribe" ) == 0 )
151        {
152                jabber_buddy_ask( ic, from );
153        }
154        else if( strcmp( type, "subscribed" ) == 0 )
155        {
156                /* Not sure about this one, actually... */
157                imcb_log( ic, "%s just accepted your authorization request", from );
158        }
159        else if( strcmp( type, "unsubscribe" ) == 0 || strcmp( type, "unsubscribed" ) == 0 )
160        {
161                /* Do nothing here. Plenty of control freaks or over-curious
162                   souls get excited when they can see who still has them in
163                   their buddy list and who finally removed them. Somehow I
164                   got the impression that those are the people who get
165                   removed from many buddy lists for "some" reason...
166                   
167                   If you're one of those people, this is your chance to write
168                   your first line of code in C... */
169        }
170        else if( strcmp( type, "error" ) == 0 )
171        {
172                return jabber_cache_handle_packet( ic, node );
173               
174                /*
175                struct jabber_error *err;
176                if( ( c = xt_find_node( node->children, "error" ) ) )
177                {
178                        err = jabber_error_parse( c, XMLNS_STANZA_ERROR );
179                        imcb_error( ic, "Stanza (%s) error: %s%s%s", node->name,
180                                    err->code, err->text ? ": " : "",
181                                    err->text ? err->text : "" );
182                        jabber_error_free( err );
183                } */
184        }
185
186        if( send_presence )
187        {
188                int is_away = 0;
189
190                if( send_presence->away_state && !( *send_presence->away_state->code == 0 ||
191                    strcmp( send_presence->away_state->code, "chat" ) == 0 ) )
192                        is_away = OPT_AWAY;
193
194                imcb_buddy_status( ic, send_presence->bare_jid, OPT_LOGGED_IN | is_away,
195                                   ( is_away && send_presence->away_state ) ?
196                                   send_presence->away_state->full_name : NULL,
197                                   send_presence->away_message );
198        }
199       
200        return XT_HANDLED;
201}
202
203/* Whenever presence information is updated, call this function to inform the
204   server. */
205int presence_send_update( struct im_connection *ic )
206{
207        struct jabber_data *jd = ic->proto_data;
208        struct xt_node *node, *cap;
209        char *show = jd->away_state->code;
210        char *status = jd->away_message;
211        struct groupchat *c;
212        int st;
213       
214        node = jabber_make_packet( "presence", NULL, NULL, NULL );
215        xt_add_child( node, xt_new_node( "priority", set_getstr( &ic->acc->set, "priority" ), NULL ) );
216        if( show && *show )
217                xt_add_child( node, xt_new_node( "show", show, NULL ) );
218        if( status )
219                xt_add_child( node, xt_new_node( "status", status, NULL ) );
220       
221        /* This makes the packet slightly bigger, but clients interested in
222           capabilities can now cache the discovery info. This reduces the
223           usual post-login iq-flood. See XEP-0115. At least libpurple and
224           Trillian seem to do this right. */
225        cap = xt_new_node( "c", NULL, NULL );
226        xt_add_attr( cap, "xmlns", XMLNS_CAPS );
227        xt_add_attr( cap, "node", "http://bitlbee.org/xmpp/caps" );
228        xt_add_attr( cap, "ver", BITLBEE_VERSION ); /* The XEP wants this hashed, but nobody's doing that. */
229        xt_add_child( node, cap );
230       
231        st = jabber_write_packet( ic, node );
232       
233        /* Have to send this update to all groupchats too, the server won't
234           do this automatically. */
235        for( c = ic->groupchats; c && st; c = c->next )
236        {
237                struct jabber_chat *jc = c->data;
238               
239                xt_add_attr( node, "to", jc->my_full_jid );
240                st = jabber_write_packet( ic, node );
241        }
242       
243        xt_free_node( node );
244        return st;
245}
246
247/* Send a subscribe/unsubscribe request to a buddy. */
248int presence_send_request( struct im_connection *ic, char *handle, char *request )
249{
250        struct xt_node *node;
251        int st;
252       
253        node = jabber_make_packet( "presence", NULL, NULL, NULL );
254        xt_add_attr( node, "to", handle );
255        xt_add_attr( node, "type", request );
256       
257        st = jabber_write_packet( ic, node );
258       
259        xt_free_node( node );
260        return st;
261}
Note: See TracBrowser for help on using the repository browser.