1 | #include <stdlib.h> |
---|
2 | #include <glib.h> |
---|
3 | #include <gmodule.h> |
---|
4 | #include <check.h> |
---|
5 | #include <string.h> |
---|
6 | #include <stdio.h> |
---|
7 | #include "jabber/jabber.h" |
---|
8 | |
---|
9 | static struct im_connection *ic; |
---|
10 | |
---|
11 | static void check_buddy_add(int l) |
---|
12 | { |
---|
13 | struct jabber_buddy *budw1, *budw2, *budw3, *budn, *bud; |
---|
14 | |
---|
15 | budw1 = jabber_buddy_add( ic, "wilmer@gaast.net/BitlBee" ); |
---|
16 | budw1->last_msg = time( NULL ) - 100; |
---|
17 | budw2 = jabber_buddy_add( ic, "WILMER@gaast.net/Telepathy" ); |
---|
18 | budw2->priority = 2; |
---|
19 | budw2->last_msg = time( NULL ); |
---|
20 | budw3 = jabber_buddy_add( ic, "wilmer@GAAST.NET/bitlbee" ); |
---|
21 | budw3->last_msg = time( NULL ) - 200; |
---|
22 | budw3->priority = 4; |
---|
23 | /* TODO(wilmer): Shouldn't this just return budw3? */ |
---|
24 | fail_if( jabber_buddy_add( ic, "wilmer@gaast.net/Telepathy" ) != NULL ); |
---|
25 | |
---|
26 | budn = jabber_buddy_add( ic, "nekkid@lamejab.net" ); |
---|
27 | /* Shouldn't be allowed if there's already a bare JID. */ |
---|
28 | fail_if( jabber_buddy_add( ic, "nekkid@lamejab.net/Illegal" ) ); |
---|
29 | |
---|
30 | /* Case sensitivity: Case only matters after the / */ |
---|
31 | fail_if( jabber_buddy_by_jid( ic, "wilmer@gaast.net/BitlBee", 0 ) == |
---|
32 | jabber_buddy_by_jid( ic, "wilmer@gaast.net/bitlbee", 0 ) ); |
---|
33 | fail_if( jabber_buddy_by_jid( ic, "wilmer@gaast.net/telepathy", 0 ) ); |
---|
34 | |
---|
35 | fail_unless( jabber_buddy_by_jid( ic, "wilmer@gaast.net/BitlBee", 0 ) == budw1 ); |
---|
36 | fail_unless( jabber_buddy_by_jid( ic, "WILMER@GAAST.NET/BitlBee", GET_BUDDY_EXACT ) == budw1 ); |
---|
37 | fail_unless( jabber_buddy_by_jid( ic, "wilmer@GAAST.NET/BitlBee", GET_BUDDY_CREAT ) == budw1 ); |
---|
38 | |
---|
39 | fail_if( jabber_buddy_by_jid( ic, "wilmer@gaast.net", GET_BUDDY_EXACT ) ); |
---|
40 | fail_unless( jabber_buddy_by_jid( ic, "WILMER@gaast.net", 0 ) == budw3 ); |
---|
41 | |
---|
42 | /* Check O_FIRST and see if it's indeed the first item from the list. */ |
---|
43 | fail_unless( ( bud = jabber_buddy_by_jid( ic, "wilmer@gaast.net", GET_BUDDY_FIRST ) ) == budw1 ); |
---|
44 | fail_unless( bud->next == budw2 && bud->next->next == budw3 && bud->next->next->next == NULL ); |
---|
45 | |
---|
46 | /* Change the resource_select setting, now we should get a different resource. */ |
---|
47 | set_setstr( &ic->acc->set, "resource_select", "activity" ); |
---|
48 | fail_unless( jabber_buddy_by_jid( ic, "wilmer@GAAST.NET", 0 ) == budw2 ); |
---|
49 | |
---|
50 | /* Some testing of bare JID handling (which is horrible). */ |
---|
51 | fail_if( jabber_buddy_by_jid( ic, "nekkid@lamejab.net/Illegal", 0 ) ); |
---|
52 | fail_if( jabber_buddy_by_jid( ic, "NEKKID@LAMEJAB.NET/Illegal", GET_BUDDY_CREAT ) ); |
---|
53 | fail_unless( jabber_buddy_by_jid( ic, "nekkid@lamejab.net", 0 ) == budn ); |
---|
54 | fail_unless( jabber_buddy_by_jid( ic, "NEKKID@lamejab.net", GET_BUDDY_EXACT ) == budn ); |
---|
55 | fail_unless( jabber_buddy_by_jid( ic, "nekkid@LAMEJAB.NET", GET_BUDDY_CREAT ) == budn ); |
---|
56 | |
---|
57 | /* More case sensitivity testing, and see if remove works properly. */ |
---|
58 | fail_if( jabber_buddy_remove( ic, "wilmer@gaast.net/telepathy" ) ); |
---|
59 | fail_if( jabber_buddy_by_jid( ic, "wilmer@GAAST.NET/telepathy", GET_BUDDY_CREAT ) == budw2 ); |
---|
60 | fail_unless( jabber_buddy_remove( ic, "wilmer@gaast.net/Telepathy" ) ); |
---|
61 | fail_unless( jabber_buddy_remove( ic, "wilmer@gaast.net/telepathy" ) ); |
---|
62 | |
---|
63 | /* Test activity_timeout and GET_BUDDY_BARE_OK. */ |
---|
64 | fail_unless( jabber_buddy_by_jid( ic, "wilmer@gaast.net", GET_BUDDY_BARE_OK ) == budw1 ); |
---|
65 | budw1->last_msg -= 50; |
---|
66 | fail_unless( ( bud = jabber_buddy_by_jid( ic, "wilmer@gaast.net", GET_BUDDY_BARE_OK ) ) != NULL ); |
---|
67 | fail_unless( strcmp( bud->full_jid, "wilmer@gaast.net" ) == 0 ); |
---|
68 | |
---|
69 | fail_if( jabber_buddy_remove( ic, "wilmer@gaast.net" ) ); |
---|
70 | fail_unless( jabber_buddy_by_jid( ic, "wilmer@gaast.net", 0 ) == budw1 ); |
---|
71 | |
---|
72 | fail_if( jabber_buddy_remove( ic, "wilmer@gaast.net" ) ); |
---|
73 | fail_unless( jabber_buddy_remove( ic, "wilmer@gaast.net/bitlbee" ) ); |
---|
74 | fail_unless( jabber_buddy_remove( ic, "wilmer@gaast.net/BitlBee" ) ); |
---|
75 | fail_if( jabber_buddy_by_jid( ic, "wilmer@gaast.net", GET_BUDDY_BARE_OK ) ); |
---|
76 | |
---|
77 | /* Check if remove_bare() indeed gets rid of all. */ |
---|
78 | /* disable this one for now. |
---|
79 | fail_unless( jabber_buddy_remove_bare( ic, "wilmer@gaast.net" ) ); |
---|
80 | fail_if( jabber_buddy_by_jid( ic, "wilmer@gaast.net", 0 ) ); |
---|
81 | */ |
---|
82 | |
---|
83 | fail_if( jabber_buddy_remove( ic, "nekkid@lamejab.net/Illegal" ) ); |
---|
84 | fail_unless( jabber_buddy_remove( ic, "nekkid@lamejab.net" ) ); |
---|
85 | fail_if( jabber_buddy_by_jid( ic, "nekkid@lamejab.net", 0 ) ); |
---|
86 | |
---|
87 | /* Fixing a bug in this branch that caused information to get lost when |
---|
88 | removing the first full JID from a list. */ |
---|
89 | jabber_buddy_add( ic, "bugtest@google.com/A" ); |
---|
90 | jabber_buddy_add( ic, "bugtest@google.com/B" ); |
---|
91 | jabber_buddy_add( ic, "bugtest@google.com/C" ); |
---|
92 | fail_unless( jabber_buddy_remove( ic, "bugtest@google.com/A" ) ); |
---|
93 | fail_unless( jabber_buddy_remove( ic, "bugtest@google.com/B" ) ); |
---|
94 | fail_unless( jabber_buddy_remove( ic, "bugtest@google.com/C" ) ); |
---|
95 | } |
---|
96 | |
---|
97 | Suite *jabber_util_suite (void) |
---|
98 | { |
---|
99 | Suite *s = suite_create("jabber/util"); |
---|
100 | TCase *tc_core = tcase_create("Buddy"); |
---|
101 | struct jabber_data *jd; |
---|
102 | |
---|
103 | ic = g_new0( struct im_connection, 1 ); |
---|
104 | ic->acc = g_new0( account_t, 1 ); |
---|
105 | ic->proto_data = jd = g_new0( struct jabber_data, 1 ); |
---|
106 | jd->buddies = g_hash_table_new( g_str_hash, g_str_equal ); |
---|
107 | set_add( &ic->acc->set, "resource_select", "priority", NULL, ic->acc ); |
---|
108 | set_add( &ic->acc->set, "activity_timeout", "120", NULL, ic->acc ); |
---|
109 | |
---|
110 | suite_add_tcase (s, tc_core); |
---|
111 | tcase_add_test (tc_core, check_buddy_add); |
---|
112 | return s; |
---|
113 | } |
---|