← Back to branch summary

~ubuntu-branches/ubuntu/trusty/irssi-plugin-xmpp/trusty

« back to all changes in this revision

Viewing changes to src/core/xmpp-rosters.c

  • Committer: Bazaar Package Importer
  • Author(s): David Ammouial
  • Date: 2009-05-12 12:14:44 UTC
  • mfrom: (1.1.3 upstream) (2.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090512121444-5jeho5h3zsy4oij7
Tags: 0.13+cvs20090406-1
http://bugs.debian.org/521227
http://bugs.debian.org/527697
* New CVS snapshot, built against irssi-dev 0.8.13:
  - New features and bugfixes.
  - Fix segfault when successfully identified (Closes: #521227).
  - Fix build error (Closes: #527697)
* Depend on irssi >=0.8.13, build-depend on irssi-dev >=0.8.13.
* Bump Standards-Version to 3.8.1 (no changes needed).
* Add INTERNAL to documentation files.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/core/xmpp-rosters.c
1
 
/*
2
 
 * $Id: xmpp-rosters.c,v 1.22 2008/04/05 20:50:45 errtu Exp $
3
 
 *
4
 
 * Copyright (C) 2007 Colin DIDIER
5
 
 *
6
 
 * This program is free software; you can redistribute it and/or modify
7
 
 * it under the terms of the GNU General Public License version 2 as
8
 
 * published by the Free Software Foundation.
9
 
 *
10
 
 * This program is distributed in the hope that it will be useful,
11
 
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12
 
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
 
 * GNU General Public License for more details.
14
 
 *
15
 
 * You should have received a copy of the GNU General Public License along
16
 
 * with this program; if not, write to the Free Software Foundation, Inc.,
17
 
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
 
 */
19
 
 
20
 
#include <stdlib.h>
21
 
#include <string.h>
22
 
 
23
 
#include "module.h"
24
 
#include "settings.h"
25
 
#include "signals.h"
26
 
 
27
 
#include "xmpp-servers.h"
28
 
#include "xmpp-rosters.h"
29
 
#include "xmpp-rosters-tools.h"
30
 
#include "xmpp-tools.h"
31
 
 
32
 
const char *xmpp_presence_show[] = {
33
 
        "X",
34
 
        "-",
35
 
        "xa",
36
 
        "dnd",
37
 
        "away",
38
 
        "+",
39
 
        "chat",
40
 
        "online",
41
 
        NULL
42
 
};
43
 
 
44
 
const char *xmpp_subscription[] = {
45
 
        "remove",
46
 
        "none",
47
 
        "to",
48
 
        "from",
49
 
        "both",
50
 
        NULL
51
 
};
52
 
 
53
 
static int
54
 
func_find_group(gconstpointer group, gconstpointer name)
55
 
{
56
 
        char *group_name = ((XMPP_ROSTER_GROUP_REC *)group)->name;
57
 
 
58
 
        if (group_name == name)
59
 
                return 0;
60
 
        if (group_name == NULL || name == NULL)
61
 
                return -1;
62
 
        return strcmp(group_name, name);
63
 
}
64
 
 
65
 
static int
66
 
func_sort_group(gconstpointer group1, gconstpointer group2)
67
 
{
68
 
        char *group1_name, *group2_name;
69
 
 
70
 
        group1_name = ((XMPP_ROSTER_GROUP_REC *)group1)->name;
71
 
        group2_name = ((XMPP_ROSTER_GROUP_REC *)group2)->name;
72
 
        if (group1_name == NULL || (group2_name != NULL
73
 
            && strcmp(group2_name,
74
 
            settings_get_str("roster_service_name")) == 0))
75
 
                return -1;
76
 
        if (group1_name != NULL || (group2_name == NULL
77
 
            && strcmp(group1_name,
78
 
            settings_get_str("roster_service_name")) == 0))
79
 
                 return 1;
80
 
        return strcmp(group1_name, group2_name);
81
 
}
82
 
 
83
 
static int
84
 
func_sort_resource(gconstpointer resource1, gconstpointer resource2)
85
 
{
86
 
        return ((XMPP_ROSTER_RESOURCE_REC *)resource2)->priority
87
 
                - ((XMPP_ROSTER_RESOURCE_REC *)resource1)->priority;
88
 
}
89
 
 
90
 
static XMPP_ROSTER_RESOURCE_REC *
91
 
create_resource(const char *name)
92
 
{
93
 
        XMPP_ROSTER_RESOURCE_REC *resource;
94
 
 
95
 
        resource = g_new(XMPP_ROSTER_RESOURCE_REC, 1);
96
 
 
97
 
        resource->name = g_strdup(name);
98
 
        resource->priority = 0;
99
 
        resource->show= XMPP_PRESENCE_UNAVAILABLE;
100
 
        resource->status = NULL;
101
 
        resource->composing_id = NULL;
102
 
 
103
 
        return resource;
104
 
}
105
 
 
106
 
static void
107
 
cleanup_resource(gpointer data, gpointer user_data)
108
 
{
109
 
        XMPP_ROSTER_RESOURCE_REC *resource;
110
 
        
111
 
        if (data == NULL)
112
 
                return;
113
 
        resource = (XMPP_ROSTER_RESOURCE_REC *)data;
114
 
 
115
 
        g_free(resource->name);
116
 
        g_free(resource->status);
117
 
        g_free(resource->composing_id);
118
 
        g_free(resource);
119
 
}
120
 
 
121
 
static XMPP_ROSTER_USER_REC *
122
 
create_user(const char *jid, const char *name)
123
 
{
124
 
        XMPP_ROSTER_USER_REC *user;
125
 
 
126
 
        g_return_val_if_fail(jid != NULL, NULL);
127
 
 
128
 
        user = g_new(XMPP_ROSTER_USER_REC, 1);
129
 
 
130
 
        user->jid = g_strdup(jid);
131
 
        user->name = g_strdup(name);
132
 
        user->subscription = XMPP_SUBSCRIPTION_NONE;
133
 
        user->error = FALSE;
134
 
        user->resources = NULL;
135
 
 
136
 
        return user;
137
 
}
138
 
 
139
 
static void
140
 
cleanup_user(gpointer data, gpointer user_data)
141
 
{
142
 
        XMPP_ROSTER_USER_REC *user;
143
 
   
144
 
        if (data == NULL)
145
 
                return;
146
 
        user = (XMPP_ROSTER_USER_REC *)data;
147
 
 
148
 
        g_slist_foreach(user->resources, (GFunc)cleanup_resource, NULL);
149
 
        g_slist_free(user->resources);
150
 
 
151
 
        g_free(user->name);
152
 
        g_free(user->jid);
153
 
        g_free(user);
154
 
}
155
 
 
156
 
static XMPP_ROSTER_GROUP_REC *
157
 
create_group(const char *name)
158
 
{
159
 
        XMPP_ROSTER_GROUP_REC *group = g_new(XMPP_ROSTER_GROUP_REC, 1);
160
 
 
161
 
        group->name = g_strdup(name);
162
 
        group->users = NULL;
163
 
 
164
 
        return group;
165
 
}
166
 
 
167
 
static void
168
 
cleanup_group(gpointer data, gpointer user_data)
169
 
{
170
 
        XMPP_ROSTER_GROUP_REC *group;
171
 
 
172
 
        if (data == NULL)
173
 
                return;
174
 
        group = (XMPP_ROSTER_GROUP_REC *)data;
175
 
 
176
 
        g_slist_foreach(group->users, (GFunc)cleanup_user, group);
177
 
        g_slist_free(group->users);
178
 
 
179
 
        g_free(group->name);
180
 
        g_free(group);
181
 
}
182
 
 
183
 
static void
184
 
sig_cleanup(XMPP_SERVER_REC *server)
185
 
{
186
 
        if (!IS_XMPP_SERVER(server))
187
 
                return;
188
 
 
189
 
        if (server->roster == NULL)
190
 
                return;
191
 
 
192
 
        g_slist_foreach(server->roster, (GFunc)cleanup_group, server);
193
 
        g_slist_free(server->roster);
194
 
        server->roster = NULL;
195
 
 
196
 
        g_slist_foreach(server->resources, (GFunc)cleanup_resource, NULL);
197
 
        g_slist_free(server->resources);
198
 
        server->resources  = NULL;
199
 
}
200
 
 
201
 
static XMPP_ROSTER_GROUP_REC *
202
 
find_or_add_group(XMPP_SERVER_REC *server, const char *group_name)
203
 
{
204
 
        GSList *group_list;
205
 
        XMPP_ROSTER_GROUP_REC *group;
206
 
 
207
 
        g_return_val_if_fail(IS_XMPP_SERVER(server), NULL);
208
 
 
209
 
        group_list = g_slist_find_custom(server->roster, group_name,
210
 
            (GCompareFunc)func_find_group);
211
 
 
212
 
        /* group doesn't exist */
213
 
        if (group_list == NULL) {
214
 
                group = create_group(group_name);
215
 
                server->roster = g_slist_insert_sorted(server->roster, group,
216
 
                    (GCompareFunc)func_sort_group);
217
 
        } else 
218
 
                group = group_list->data;
219
 
 
220
 
        return group;
221
 
}
222
 
 
223
 
static XMPP_ROSTER_USER_REC *
224
 
add_user(XMPP_SERVER_REC *server, const char *jid, const char *name,
225
 
    const char *group_name, XMPP_ROSTER_GROUP_REC **group)
226
 
{
227
 
        XMPP_ROSTER_USER_REC *user;
228
 
 
229
 
        g_return_val_if_fail(IS_XMPP_SERVER(server), NULL);
230
 
        g_return_val_if_fail(jid != NULL, NULL);
231
 
 
232
 
        *group = find_or_add_group(server, group_name);
233
 
        
234
 
        user = create_user(jid, name);
235
 
        (*group)->users = g_slist_append((*group)->users, user);
236
 
 
237
 
        return user;
238
 
}
239
 
 
240
 
static XMPP_ROSTER_GROUP_REC *
241
 
move_user(XMPP_SERVER_REC *server, XMPP_ROSTER_USER_REC *user,
242
 
    XMPP_ROSTER_GROUP_REC *group, const char *group_name)
243
 
{
244
 
        XMPP_ROSTER_GROUP_REC *new_group;
245
 
 
246
 
        g_return_val_if_fail(IS_XMPP_SERVER(server), group);
247
 
        g_return_val_if_fail(user != NULL, group);
248
 
 
249
 
        new_group = find_or_add_group(server, group_name);
250
 
 
251
 
        group->users = g_slist_remove(group->users, user);
252
 
        new_group->users = g_slist_append(new_group->users, user);
253
 
 
254
 
        return new_group;
255
 
}
256
 
 
257
 
static void
258
 
update_subscription(XMPP_SERVER_REC *server, XMPP_ROSTER_USER_REC *user,
259
 
    XMPP_ROSTER_GROUP_REC *group, const char *subscription)
260
 
{
261
 
        g_return_if_fail(IS_XMPP_SERVER(server));
262
 
        g_return_if_fail(user != NULL);
263
 
        g_return_if_fail(group != NULL);
264
 
        g_return_if_fail(subscription != NULL);
265
 
 
266
 
        if (g_ascii_strcasecmp(subscription,
267
 
            xmpp_subscription[XMPP_SUBSCRIPTION_NONE]) == 0)
268
 
                user->subscription = XMPP_SUBSCRIPTION_NONE;
269
 
 
270
 
        else if (g_ascii_strcasecmp(subscription,
271
 
            xmpp_subscription[XMPP_SUBSCRIPTION_FROM]) == 0)
272
 
                user->subscription = XMPP_SUBSCRIPTION_FROM;
273
 
 
274
 
        else if (g_ascii_strcasecmp(subscription,
275
 
            xmpp_subscription[XMPP_SUBSCRIPTION_TO]) == 0)
276
 
                user->subscription = XMPP_SUBSCRIPTION_TO;
277
 
 
278
 
        else if (g_ascii_strcasecmp(subscription,
279
 
            xmpp_subscription[XMPP_SUBSCRIPTION_BOTH]) == 0)
280
 
                user->subscription = XMPP_SUBSCRIPTION_BOTH;
281
 
 
282
 
        else if (g_ascii_strcasecmp(subscription,
283
 
            xmpp_subscription[XMPP_SUBSCRIPTION_REMOVE]) == 0) {
284
 
                group->users = g_slist_remove(group->users, user);
285
 
                cleanup_user(user, server);
286
 
 
287
 
                /* remove empty group */
288
 
                if (group->users == NULL) {
289
 
                        server->roster = g_slist_remove(server->roster, group);
290
 
                        cleanup_group(group, server);
291
 
                }
292
 
        }
293
 
}
294
 
 
295
 
static void
296
 
update_user(XMPP_SERVER_REC *server, const char *jid, const char *subscription,
297
 
    const char *name, const char *group_name)
298
 
{
299
 
        XMPP_ROSTER_GROUP_REC *group;
300
 
        XMPP_ROSTER_USER_REC *user;
301
 
 
302
 
        g_return_if_fail(IS_XMPP_SERVER(server));
303
 
        g_return_if_fail(jid != NULL);
304
 
 
305
 
        user = xmpp_rosters_find_user(server->roster, jid, &group, NULL);
306
 
        if (user == NULL)
307
 
                user = add_user(server, jid, name, group_name, &group);
308
 
        else {
309
 
 
310
 
                /* move to another group */
311
 
                if ((group->name == NULL && group_name != NULL)
312
 
                    || (group->name != NULL && group_name == NULL)
313
 
                    || (group->name != NULL && group_name != NULL
314
 
                    && strcmp(group->name, group_name) != 0))
315
 
                        group = move_user(server, user, group, group_name);
316
 
 
317
 
                /* change name */
318
 
                if ((user->name == NULL && name != NULL)
319
 
                    || (user->name != NULL && name == NULL)
320
 
                    || (user->name != NULL && name != NULL
321
 
                    && strcmp(user->name, name) != 0)) {
322
 
                        g_free(user->name);
323
 
                        user->name = g_strdup(name);
324
 
                }
325
 
        }
326
 
 
327
 
        update_subscription(server, user, group, subscription);
328
 
}
329
 
 
330
 
static void
331
 
sig_update(XMPP_SERVER_REC *server, LmMessageNode *query)
332
 
{
333
 
        LmMessageNode *item, *group_node;
334
 
        const char *subscription, *jid, *name;
335
 
        char *jid_recoded, *name_recoded, *group_recoded;
336
 
 
337
 
        g_return_if_fail(IS_XMPP_SERVER(server));
338
 
        g_return_if_fail(query != NULL);
339
 
 
340
 
        name_recoded = NULL;
341
 
        group_recoded = NULL;
342
 
 
343
 
        item = query->children;
344
 
        while(item != NULL) {
345
 
 
346
 
                if (g_ascii_strcasecmp(item->name, "item") != 0)
347
 
                        goto next;
348
 
                
349
 
                jid = lm_message_node_get_attribute(item, "jid");
350
 
                if (jid == NULL)
351
 
                        goto next;
352
 
                jid_recoded = xmpp_recode_in(jid);
353
 
 
354
 
                subscription = lm_message_node_get_attribute(item,
355
 
                    "subscription");
356
 
 
357
 
                name = lm_message_node_get_attribute(item, "name");
358
 
                if (name != NULL)
359
 
                        name_recoded = xmpp_recode_in(name);
360
 
 
361
 
                group_node = lm_message_node_get_child(item, "group");
362
 
                if (group_node != NULL)
363
 
                        group_recoded = xmpp_recode_in(group_node->value);
364
 
 
365
 
                update_user(server, jid_recoded, subscription, name_recoded,
366
 
                    group_recoded);
367
 
 
368
 
                g_free_and_null(jid_recoded);
369
 
                g_free_and_null(name_recoded);
370
 
                g_free_and_null(group_recoded);
371
 
        
372
 
next:
373
 
                item = item->next;
374
 
        }
375
 
}
376
 
 
377
 
static void
378
 
sig_presence_update(XMPP_SERVER_REC *server, const char *full_jid,
379
 
    const char *show_str, const char *status, const char *priority_str)
380
 
{
381
 
        XMPP_ROSTER_USER_REC *user;
382
 
        XMPP_ROSTER_RESOURCE_REC *resource;
383
 
        char *jid, *res;
384
 
        int show, priority;
385
 
        gboolean new, own;
386
 
 
387
 
        g_return_if_fail(IS_XMPP_SERVER(server));
388
 
        g_return_if_fail(full_jid != NULL);
389
 
 
390
 
        new = own = FALSE;
391
 
        jid = xmpp_strip_resource(full_jid);
392
 
        res = xmpp_extract_resource(full_jid);
393
 
        
394
 
        user = xmpp_rosters_find_user(server->roster, jid, NULL, NULL);
395
 
        if (user != NULL)
396
 
                user->error = FALSE;
397
 
        else if (strcmp(jid, server->jid) == 0)
398
 
                own = TRUE;
399
 
        else
400
 
                goto out;
401
 
 
402
 
        /* find resource or create it if it doesn't exist */    
403
 
        resource = !own ? xmpp_rosters_find_resource(user, res) :
404
 
            xmpp_rosters_find_own_resource(server, res);
405
 
        if (resource == NULL) {
406
 
                resource = create_resource(res);
407
 
                new = TRUE;
408
 
                if (!own)
409
 
                        user->resources =
410
 
                            g_slist_prepend(user->resources, resource);
411
 
                else
412
 
                        server->resources =
413
 
                            g_slist_prepend(server->resources, resource);
414
 
        }
415
 
 
416
 
        show = xmpp_presence_get_show(show_str);
417
 
 
418
 
        priority = (priority_str != NULL) ?
419
 
            atoi(priority_str) : resource->priority;
420
 
 
421
 
        if (new || xmpp_presence_changed(show, resource->show, status,
422
 
            resource->status, priority, resource->priority)) {
423
 
 
424
 
                resource->show = show;
425
 
 
426
 
                g_free_and_null(resource->status);
427
 
                if (status != NULL)
428
 
                        resource->status = g_strdup(status);
429
 
 
430
 
                if (resource->priority != priority) {
431
 
                        resource->priority = priority;
432
 
 
433
 
                        /* the resource has changed, sort the resources */
434
 
                        if (!own)
435
 
                                user->resources = g_slist_sort(
436
 
                                    user->resources,
437
 
                                    (GCompareFunc)func_sort_resource);
438
 
                        else
439
 
                                server->resources = g_slist_sort(
440
 
                                    server->resources,
441
 
                                    (GCompareFunc)func_sort_resource);
442
 
                }
443
 
 
444
 
                signal_emit("xmpp presence changed", 5, server, full_jid,
445
 
                    resource->show, resource->status, resource->priority);
446
 
        }
447
 
 
448
 
out:
449
 
        g_free(jid);
450
 
        g_free(res);
451
 
}
452
 
 
453
 
static void
454
 
sig_presence_error(XMPP_SERVER_REC *server, const char *full_jid)
455
 
{
456
 
        XMPP_ROSTER_USER_REC *user;
457
 
        char *jid;
458
 
 
459
 
        g_return_if_fail(IS_XMPP_SERVER(server));
460
 
        g_return_if_fail(full_jid != NULL);
461
 
 
462
 
        jid = xmpp_strip_resource(full_jid);
463
 
 
464
 
        user = xmpp_rosters_find_user(server->roster, jid, NULL, NULL);
465
 
        if (user == NULL) {
466
 
                g_free(jid);
467
 
                return;
468
 
        }
469
 
 
470
 
        user->error = TRUE;
471
 
}
472
 
 
473
 
static void
474
 
sig_presence_unavailable(XMPP_SERVER_REC *server, const char *full_jid,
475
 
    const char *status)
476
 
{
477
 
        XMPP_ROSTER_USER_REC *user;
478
 
        XMPP_ROSTER_RESOURCE_REC *resource;
479
 
        char *jid, *res;
480
 
        gboolean own;
481
 
 
482
 
        g_return_if_fail(IS_XMPP_SERVER(server));
483
 
        g_return_if_fail(full_jid != NULL);
484
 
 
485
 
        own = FALSE;
486
 
        jid = xmpp_strip_resource(full_jid);
487
 
        res = xmpp_extract_resource(full_jid);
488
 
 
489
 
        user = xmpp_rosters_find_user(server->roster, jid, NULL, NULL);
490
 
        if (user == NULL) {
491
 
                if (strcmp(jid, server->jid) == 0)
492
 
                        own = TRUE;
493
 
                else
494
 
                        goto out;
495
 
        }
496
 
 
497
 
        resource = !own ? xmpp_rosters_find_resource(user, res) :
498
 
            xmpp_rosters_find_own_resource(server, res);
499
 
        if (resource == NULL)
500
 
                goto out;
501
 
 
502
 
        signal_emit("xmpp presence changed", 4, server, full_jid,
503
 
            XMPP_PRESENCE_UNAVAILABLE, status);
504
 
 
505
 
        if (!own)
506
 
                user->resources = g_slist_remove(user->resources, resource);
507
 
        else
508
 
                server->resources = g_slist_remove(server->resources,
509
 
                    resource);
510
 
 
511
 
        cleanup_resource(resource, NULL);
512
 
 
513
 
out:
514
 
        g_free(jid);
515
 
        g_free(res);
516
 
}
517
 
 
518
 
void
519
 
xmpp_rosters_init(void)
520
 
{
521
 
        signal_add_last("server disconnected", (SIGNAL_FUNC)sig_cleanup);
522
 
        signal_add_first("xmpp roster update", (SIGNAL_FUNC)sig_update);
523
 
        signal_add_first("xmpp presence update",
524
 
            (SIGNAL_FUNC)sig_presence_update);
525
 
        signal_add_first("xmpp presence error",
526
 
            (SIGNAL_FUNC)sig_presence_error);
527
 
        signal_add_first("xmpp presence unavailable",
528
 
            (SIGNAL_FUNC)sig_presence_unavailable);
529
 
 
530
 
        settings_add_str("xmpp_roster", "roster_default_group", "General");
531
 
        settings_add_str("xmpp_roster", "roster_service_name", "Agents/Transports");
532
 
        settings_add_bool("xmpp_roster", "roster_show_offline", TRUE);
533
 
        settings_add_bool("xmpp_roster", "roster_show_offline_unsuscribed", TRUE);
534
 
}
535
 
 
536
 
void
537
 
xmpp_rosters_deinit(void)
538
 
{
539
 
        signal_remove("server disconnected", (SIGNAL_FUNC)sig_cleanup);
540
 
        signal_remove("xmpp roster update", (SIGNAL_FUNC)sig_update);
541
 
        signal_remove("xmpp presence update", (SIGNAL_FUNC)sig_presence_update);
542
 
        signal_remove("xmpp presence error", (SIGNAL_FUNC)sig_presence_error);
543
 
        signal_remove("xmpp presence unavailable",
544
 
            (SIGNAL_FUNC)sig_presence_unavailable);
545
 
}