?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Fix #277: Raised contact names
[siplcs.git] / src / core / sipe-buddy.c
blob94b906623dd594812efaf768d5f66f3e86868f4e
1 /**
2 * @file sipe-buddy.c
3 *
4 * pidgin-sipe
5 *
6 * Copyright (C) 2010-2015 SIPE Project <http://sipe.sourceforge.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
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 */
22
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include <stdlib.h>
28 #include <string.h>
29 #include <time.h>
30
31 #include <glib.h>
32
33 #include "sipe-common.h"
34 #include "sipmsg.h"
35 #include "sip-csta.h"
36 #include "sip-soap.h"
37 #include "sip-transport.h"
38 #include "sipe-backend.h"
39 #include "sipe-buddy.h"
40 #include "sipe-cal.h"
41 #include "sipe-chat.h"
42 #include "sipe-conf.h"
43 #include "sipe-core.h"
44 #include "sipe-core-private.h"
45 #include "sipe-group.h"
46 #include "sipe-http.h"
47 #include "sipe-im.h"
48 #include "sipe-nls.h"
49 #include "sipe-ocs2005.h"
50 #include "sipe-ocs2007.h"
51 #include "sipe-schedule.h"
52 #include "sipe-session.h"
53 #include "sipe-status.h"
54 #include "sipe-subscriptions.h"
55 #include "sipe-svc.h"
56 #include "sipe-ucs.h"
57 #include "sipe-utils.h"
58 #include "sipe-webticket.h"
59 #include "sipe-xml.h"
60
61 struct sipe_buddies {
62 GHashTable *uri;
63 GHashTable *exchange_key;
64
65 /* Pending photo download HTTP requests */
66 GSList *pending_photo_requests;
67 };
68
69 struct buddy_group_data {
70 const struct sipe_group *group;
71 gboolean is_obsolete;
72 };
73
74 struct photo_response_data {
75 gchar *who;
76 gchar *photo_hash;
77 struct sipe_http_request *request;
78 };
79
80 static void buddy_fetch_photo(struct sipe_core_private *sipe_private,
81 const gchar *uri);
82 static void photo_response_data_free(struct photo_response_data *data);
83
84 void sipe_buddy_add_keys(struct sipe_core_private *sipe_private,
85 struct sipe_buddy *buddy,
86 const gchar *exchange_key,
87 const gchar *change_key)
88 {
89 if (exchange_key) {
90 buddy->exchange_key = g_strdup(exchange_key);
91 g_hash_table_insert(sipe_private->buddies->exchange_key,
92 buddy->exchange_key,
93 buddy);
94 }
95 if (change_key)
96 buddy->change_key = g_strdup(change_key);
97 }
98
99 struct sipe_buddy *sipe_buddy_add(struct sipe_core_private *sipe_private,
100 const gchar *uri,
101 const gchar *exchange_key,
102 const gchar *change_key)
103 {
104 /* Buddy name must be lower case as we use purple_normalize_nocase() to compare */
105 gchar *normalized_uri = g_ascii_strdown(uri, -1);
106 struct sipe_buddy *buddy = sipe_buddy_find_by_uri(sipe_private,
107 normalized_uri);
108
109 if (!buddy) {
110 buddy = g_new0(struct sipe_buddy, 1);
111 buddy->name = normalized_uri;
112 g_hash_table_insert(sipe_private->buddies->uri,
113 buddy->name,
114 buddy);
115
116 sipe_buddy_add_keys(sipe_private,
117 buddy,
118 exchange_key,
119 change_key);
120
121 SIPE_DEBUG_INFO("sipe_buddy_add: Added buddy %s", normalized_uri);
122
123 if (SIPE_CORE_PRIVATE_FLAG_IS(SUBSCRIBED_BUDDIES)) {
124 buddy->just_added = TRUE;
125 sipe_subscribe_presence_single_cb(sipe_private,
126 buddy->name);
127 }
128
129 buddy_fetch_photo(sipe_private, normalized_uri);
130
131 normalized_uri = NULL; /* buddy takes ownership */
132 } else {
133 SIPE_DEBUG_INFO("sipe_buddy_add: Buddy %s already exists", normalized_uri);
134 buddy->is_obsolete = FALSE;
135 }
136 g_free(normalized_uri);
137
138 return(buddy);
139 }
140
141 static gboolean is_buddy_in_group(struct sipe_buddy *buddy,
142 const gchar *name)
143 {
144 if (buddy) {
145 GSList *entry = buddy->groups;
146
147 while (entry) {
148 struct buddy_group_data *bgd = entry->data;
149 if (sipe_strequal(bgd->group->name, name)) {
150 bgd->is_obsolete = FALSE;
151 return(TRUE);
152 }
153 entry = entry->next;
154 }
155 }
156
157 return(FALSE);
158 }
159
160 void sipe_buddy_add_to_group(struct sipe_core_private *sipe_private,
161 struct sipe_buddy *buddy,
162 struct sipe_group *group,
163 const gchar *alias)
164 {
165 const gchar *uri = buddy->name;
166 const gchar *group_name = group->name;
167 sipe_backend_buddy bb = sipe_backend_buddy_find(SIPE_CORE_PUBLIC,
168 uri,
169 group_name);
170
171 if (!bb) {
172 bb = sipe_backend_buddy_add(SIPE_CORE_PUBLIC,
173 uri,
174 alias,
175 group_name);
176 SIPE_DEBUG_INFO("sipe_buddy_add_to_group: created backend buddy '%s' with alias '%s'",
177 uri, alias ? alias : "<NONE>");
178 }
179
180
181 if (!is_empty(alias)) {
182 gchar *old_alias = sipe_backend_buddy_get_alias(SIPE_CORE_PUBLIC,
183 bb);
184
185 if (sipe_strcase_equal(sipe_get_no_sip_uri(uri),
186 old_alias)) {
187 sipe_backend_buddy_set_alias(SIPE_CORE_PUBLIC,
188 bb,
189 alias);
190 SIPE_DEBUG_INFO("sipe_buddy_add_to_group: replaced alias for buddy '%s': old '%s' new '%s'",
191 uri, old_alias, alias);
192 }
193 g_free(old_alias);
194 }
195
196 if (!is_buddy_in_group(buddy, group_name)) {
197 sipe_buddy_insert_group(buddy, group);
198 SIPE_DEBUG_INFO("sipe_buddy_add_to_group: added buddy %s to group %s",
199 uri, group_name);
200 }
201 }
202
203 static gint buddy_group_compare(gconstpointer a, gconstpointer b)
204 {
205 return(((const struct buddy_group_data *)a)->group->id -
206 ((const struct buddy_group_data *)b)->group->id);
207 }
208
209 void sipe_buddy_insert_group(struct sipe_buddy *buddy,
210 struct sipe_group *group)
211 {
212 struct buddy_group_data *bgd = g_new0(struct buddy_group_data, 1);
213
214 bgd->group = group;
215
216 buddy->groups = sipe_utils_slist_insert_unique_sorted(buddy->groups,
217 bgd,
218 buddy_group_compare,
219 NULL);
220 }
221
222 static void buddy_group_free(gpointer data)
223 {
224 g_free(data);
225 }
226
227 static void buddy_group_remove(struct sipe_buddy *buddy,
228 struct buddy_group_data *bgd)
229 {
230 buddy->groups = g_slist_remove(buddy->groups, bgd);
231 buddy_group_free(bgd);
232 }
233
234 static void sipe_buddy_remove_group(struct sipe_buddy *buddy,
235 const struct sipe_group *group)
236 {
237 GSList *entry = buddy->groups;
238 struct buddy_group_data *bgd = NULL;
239
240 while (entry) {
241 bgd = entry->data;
242 if (bgd->group == group)
243 break;
244 entry = entry->next;
245 }
246
247 buddy_group_remove(buddy, bgd);
248 }
249
250 void sipe_buddy_update_groups(struct sipe_core_private *sipe_private,
251 struct sipe_buddy *buddy,
252 GSList *new_groups)
253 {
254 const gchar *uri = buddy->name;
255 GSList *entry = buddy->groups;
256
257 while (entry) {
258 struct buddy_group_data *bgd = entry->data;
259 const struct sipe_group *group = bgd->group;
260
261 /* next buddy group */
262 entry = entry->next;
263
264 /* old group NOT found in new list? */
265 if (g_slist_find(new_groups, group) == NULL) {
266 sipe_backend_buddy oldb = sipe_backend_buddy_find(SIPE_CORE_PUBLIC,
267 uri,
268 group->name);
269 SIPE_DEBUG_INFO("sipe_buddy_update_groups: removing buddy %s from group '%s'",
270 uri, group->name);
271 /* this should never be NULL */
272 if (oldb)
273 sipe_backend_buddy_remove(SIPE_CORE_PUBLIC,
274 oldb);
275 buddy_group_remove(buddy, bgd);
276 }
277 }
278 }
279
280 gchar *sipe_buddy_groups_string(struct sipe_buddy *buddy)
281 {
282 guint i = 0;
283 gchar *string;
284 /* creating array from GList, converting guint to gchar * */
285 gchar **ids_arr = g_new(gchar *, g_slist_length(buddy->groups) + 1);
286 GSList *entry = buddy->groups;
287
288 if (!ids_arr)
289 return(NULL);
290
291 while (entry) {
292 const struct sipe_group *group = ((struct buddy_group_data *) entry->data)->group;
293 ids_arr[i] = g_strdup_printf("%u", group->id);
294 entry = entry->next;
295 i++;
296 }
297 ids_arr[i] = NULL;
298
299 string = g_strjoinv(" ", ids_arr);
300 g_strfreev(ids_arr);
301
302 return(string);
303 }
304
305 void sipe_buddy_cleanup_local_list(struct sipe_core_private *sipe_private)
306 {
307 GSList *buddies = sipe_backend_buddy_find_all(SIPE_CORE_PUBLIC,
308 NULL,
309 NULL);
310 GSList *entry = buddies;
311
312 SIPE_DEBUG_INFO("sipe_buddy_cleanup_local_list: overall %d backend buddies (including clones)",
313 g_slist_length(buddies));
314 SIPE_DEBUG_INFO("sipe_buddy_cleanup_local_list: %d sipe buddies (unique)",
315 sipe_buddy_count(sipe_private));
316 while (entry) {
317 sipe_backend_buddy bb = entry->data;
318 gchar *bname = sipe_backend_buddy_get_name(SIPE_CORE_PUBLIC,
319 bb);
320 gchar *gname = sipe_backend_buddy_get_group_name(SIPE_CORE_PUBLIC,
321 bb);
322 struct sipe_buddy *buddy = sipe_buddy_find_by_uri(sipe_private,
323 bname);
324
325 if (!is_buddy_in_group(buddy, gname)) {
326 SIPE_DEBUG_INFO("sipe_buddy_cleanup_local_list: REMOVING '%s' from local group '%s', as buddy is not in that group on remote contact list",
327 bname, gname);
328 sipe_backend_buddy_remove(SIPE_CORE_PUBLIC, bb);
329 }
330
331 g_free(gname);
332 g_free(bname);
333
334 entry = entry->next;
335 }
336
337 g_slist_free(buddies);
338 }
339
340 struct sipe_buddy *sipe_buddy_find_by_uri(struct sipe_core_private *sipe_private,
341 const gchar *uri)
342 {
343 return(g_hash_table_lookup(sipe_private->buddies->uri, uri));
344 }
345
346 struct sipe_buddy *sipe_buddy_find_by_exchange_key(struct sipe_core_private *sipe_private,
347 const gchar *exchange_key)
348 {
349 return(g_hash_table_lookup(sipe_private->buddies->exchange_key,
350 exchange_key));
351 }
352
353 void sipe_buddy_foreach(struct sipe_core_private *sipe_private,
354 GHFunc callback,
355 gpointer callback_data)
356 {
357 g_hash_table_foreach(sipe_private->buddies->uri,
358 callback,
359 callback_data);
360 }
361
362 static void buddy_free(struct sipe_buddy *buddy)
363 {
364 #ifndef _WIN32
365 /*
366 * We are calling g_hash_table_foreach_steal(). That means that no
367 * key/value deallocation functions are called. Therefore the glib
368 * hash code does not touch the key (buddy->name) or value (buddy)
369 * of the to-be-deleted hash node at all. It follows that we
370 *
371 * - MUST free the memory for the key ourselves and
372 * - ARE allowed to do it in this function
373 *
374 * Conclusion: glib must be broken on the Windows platform if sipe
375 * crashes with SIGTRAP when closing. You'll have to live
376 * with the memory leak until this is fixed.
377 */
378 g_free(buddy->name);
379 #endif
380 g_free(buddy->exchange_key);
381 g_free(buddy->change_key);
382 g_free(buddy->activity);
383 g_free(buddy->meeting_subject);
384 g_free(buddy->meeting_location);
385 g_free(buddy->note);
386
387 g_free(buddy->cal_start_time);
388 g_free(buddy->cal_free_busy_base64);
389 g_free(buddy->cal_free_busy);
390 g_free(buddy->last_non_cal_activity);
391
392 sipe_cal_free_working_hours(buddy->cal_working_hours);
393
394 g_free(buddy->device_name);
395 sipe_utils_slist_free_full(buddy->groups, buddy_group_free);
396 g_free(buddy);
397 }
398
399 static gboolean buddy_free_cb(SIPE_UNUSED_PARAMETER gpointer key,
400 gpointer buddy,
401 SIPE_UNUSED_PARAMETER gpointer user_data)
402 {
403 buddy_free(buddy);
404 /* We must return TRUE as the key/value have already been deleted */
405 return(TRUE);
406 }
407
408 void sipe_buddy_free(struct sipe_core_private *sipe_private)
409 {
410 struct sipe_buddies *buddies = sipe_private->buddies;
411
412 g_hash_table_foreach_steal(buddies->uri,
413 buddy_free_cb,
414 NULL);
415
416 /* core is being deallocated, remove all its pending photo requests */
417 while (buddies->pending_photo_requests) {
418 struct photo_response_data *data =
419 buddies->pending_photo_requests->data;
420 buddies->pending_photo_requests =
421 g_slist_remove(buddies->pending_photo_requests, data);
422 photo_response_data_free(data);
423 }
424
425 g_hash_table_destroy(buddies->uri);
426 g_hash_table_destroy(buddies->exchange_key);
427 g_free(buddies);
428 sipe_private->buddies = NULL;
429 }
430
431 static void buddy_set_obsolete_flag(SIPE_UNUSED_PARAMETER gpointer key,
432 gpointer value,
433 SIPE_UNUSED_PARAMETER gpointer user_data)
434 {
435 struct sipe_buddy *buddy = value;
436 GSList *entry = buddy->groups;
437
438 buddy->is_obsolete = TRUE;
439 while (entry) {
440 ((struct buddy_group_data *) entry->data)->is_obsolete = TRUE;
441 entry = entry->next;
442 }
443 }
444
445 void sipe_buddy_update_start(struct sipe_core_private *sipe_private)
446 {
447 g_hash_table_foreach(sipe_private->buddies->uri,
448 buddy_set_obsolete_flag,
449 NULL);
450 }
451
452 static gboolean buddy_check_obsolete_flag(SIPE_UNUSED_PARAMETER gpointer key,
453 gpointer value,
454 gpointer user_data)
455 {
456 struct sipe_core_private *sipe_private = user_data;
457 struct sipe_buddy *buddy = value;
458 const gchar *uri = buddy->name;
459
460 if (buddy->is_obsolete) {
461 /* all backend buddies in different groups */
462 GSList *buddies = sipe_backend_buddy_find_all(SIPE_CORE_PUBLIC,
463 uri,
464 NULL);
465 GSList *entry = buddies;
466
467 SIPE_DEBUG_INFO("buddy_check_obsolete_flag: REMOVING %d backend buddies for '%s'",
468 g_slist_length(buddies),
469 uri);
470
471 while (entry) {
472 sipe_backend_buddy_remove(SIPE_CORE_PUBLIC,
473 entry->data);
474 entry = entry->next;
475 }
476 g_slist_free(buddies);
477
478 buddy_free(buddy);
479 /* return TRUE as the key/value have already been deleted */
480 return(TRUE);
481
482 } else {
483 GSList *entry = buddy->groups;
484
485 while (entry) {
486 struct buddy_group_data *bgd = entry->data;
487
488 /* next buddy group */
489 entry = entry->next;
490
491 if (bgd->is_obsolete) {
492 const struct sipe_group *group = bgd->group;
493 sipe_backend_buddy oldb = sipe_backend_buddy_find(SIPE_CORE_PUBLIC,
494 uri,
495 group->name);
496 SIPE_DEBUG_INFO("buddy_check_obsolete_flag: removing buddy '%s' from group '%s'",
497 uri, group->name);
498 /* this should never be NULL */
499 if (oldb)
500 sipe_backend_buddy_remove(SIPE_CORE_PUBLIC,
501 oldb);
502 buddy_group_remove(buddy, bgd);
503 }
504 }
505 return(FALSE);
506 }
507 }
508
509 void sipe_buddy_update_finish(struct sipe_core_private *sipe_private)
510 {
511 g_hash_table_foreach_remove(sipe_private->buddies->uri,
512 buddy_check_obsolete_flag,
513 sipe_private);
514 }
515
516 gchar *sipe_core_buddy_status(struct sipe_core_public *sipe_public,
517 const gchar *uri,
518 guint activity,
519 const gchar *status_text)
520 {
521 struct sipe_buddy *sbuddy;
522 GString *status;
523
524 if (!sipe_public) return NULL; /* happens on pidgin exit */
525
526 sbuddy = sipe_buddy_find_by_uri(SIPE_CORE_PRIVATE, uri);
527 if (!sbuddy) return NULL;
528
529 status = g_string_new(sbuddy->activity ? sbuddy->activity :
530 (activity == SIPE_ACTIVITY_BUSY) || (activity == SIPE_ACTIVITY_BRB) ?
531 status_text : NULL);
532
533 if (sbuddy->is_mobile) {
534 if (status->len)
535 g_string_append(status, " - ");
536 g_string_append(status, _("Mobile"));
537 }
538
539 if (sbuddy->note) {
540 if (status->len)
541 g_string_append(status, " - ");
542 g_string_append(status, sbuddy->note);
543 }
544
545 /* return NULL instead of empty status text */
546 return(g_string_free(status, status->len ? FALSE : TRUE));
547 }
548
549 gchar *sipe_buddy_get_alias(struct sipe_core_private *sipe_private,
550 const gchar *with)
551 {
552 sipe_backend_buddy pbuddy;
553 gchar *alias = NULL;
554 if ((pbuddy = sipe_backend_buddy_find(SIPE_CORE_PUBLIC, with, NULL))) {
555 alias = sipe_backend_buddy_get_alias(SIPE_CORE_PUBLIC, pbuddy);
556 }
557 return alias;
558 }
559
560 void sipe_core_buddy_group(struct sipe_core_public *sipe_public,
561 const gchar *who,
562 const gchar *old_group_name,
563 const gchar *new_group_name)
564 {
565 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
566 struct sipe_buddy *buddy = sipe_buddy_find_by_uri(sipe_private,
567 who);
568 struct sipe_group *old_group = NULL;
569 struct sipe_group *new_group;
570 struct sipe_ucs_transaction *ucs_trans = NULL;
571
572 SIPE_DEBUG_INFO("sipe_core_buddy_group: buddy '%s' old group '%s' new group '%s'",
573 who ? who : "",
574 old_group_name ? old_group_name : "<UNDEFINED>",
575 new_group_name ? new_group_name : "<UNDEFINED>");
576
577 if (!buddy)
578 /* buddy not in roaming list */
579 return;
580
581 old_group = sipe_group_find_by_name(sipe_private, old_group_name);
582 if (old_group) {
583 sipe_buddy_remove_group(buddy, old_group);
584 SIPE_DEBUG_INFO("sipe_core_buddy_group: buddy '%s' removed from old group '%s'",
585 who, old_group_name);
586 }
587
588 new_group = sipe_group_find_by_name(sipe_private, new_group_name);
589 if (new_group) {
590 sipe_buddy_insert_group(buddy, new_group);
591 SIPE_DEBUG_INFO("sipe_core_buddy_group: buddy '%s' added to new group '%s'",
592 who, new_group_name);
593 }
594
595 if (sipe_ucs_is_migrated(sipe_private)) {
596
597 /* UCS handling */
598 ucs_trans = sipe_ucs_transaction(sipe_private);
599
600 if (new_group) {
601 /*
602 * 1. new buddy added to existing group
603 * 2. existing buddy moved from old to existing group
604 */
605 sipe_ucs_group_add_buddy(sipe_private,
606 ucs_trans,
607 new_group,
608 buddy,
609 buddy->name);
610 if (old_group)
611 sipe_ucs_group_remove_buddy(sipe_private,
612 ucs_trans,
613 old_group,
614 buddy);
615
616 } else if (old_group) {
617 /*
618 * 3. existing buddy removed from one of its groups
619 * 4. existing buddy removed from last group
620 */
621 sipe_ucs_group_remove_buddy(sipe_private,
622 ucs_trans,
623 old_group,
624 buddy);
625 if (g_slist_length(buddy->groups) < 1)
626 sipe_buddy_remove(sipe_private,
627 buddy);
628 /* buddy no longer valid */
629 }
630
631 /* non-UCS handling */
632 } else if (new_group)
633 sipe_group_update_buddy(sipe_private, buddy);
634
635 /* 5. buddy added to new group */
636 if (!new_group)
637 sipe_group_create(sipe_private,
638 ucs_trans,
639 new_group_name,
640 who);
641 }
642
643 void sipe_core_buddy_add(struct sipe_core_public *sipe_public,
644 const gchar *uri,
645 const gchar *group_name)
646 {
647 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
648
649 if (!sipe_buddy_find_by_uri(sipe_private, uri))
650 sipe_buddy_add(sipe_private,
651 uri,
652 NULL,
653 NULL);
654 else
655 SIPE_DEBUG_INFO("sipe_core_buddy_add: buddy %s already in internal list",
656 uri);
657
658 sipe_core_buddy_group(sipe_public,
659 uri,
660 NULL,
661 group_name);
662 }
663
664 void sipe_buddy_remove(struct sipe_core_private *sipe_private,
665 struct sipe_buddy *buddy)
666 {
667 struct sipe_buddies *buddies = sipe_private->buddies;
668 const gchar *uri = buddy->name;
669 GSList *entry = buddy->groups;
670 gchar *action_name = sipe_utils_presence_key(uri);
671
672 sipe_schedule_cancel(sipe_private, action_name);
673 g_free(action_name);
674
675 /* If the buddy still has groups, we need to delete backend buddies */
676 while (entry) {
677 const struct sipe_group *group = ((struct buddy_group_data *) entry->data)->group;
678 sipe_backend_buddy oldb = sipe_backend_buddy_find(SIPE_CORE_PUBLIC,
679 uri,
680 group->name);
681 /* this should never be NULL */
682 if (oldb)
683 sipe_backend_buddy_remove(SIPE_CORE_PUBLIC, oldb);
684
685 entry = entry->next;
686 }
687
688 g_hash_table_remove(buddies->uri, uri);
689 if (buddy->exchange_key)
690 g_hash_table_remove(buddies->exchange_key,
691 buddy->exchange_key);
692
693 buddy_free(buddy);
694 }
695
696 /**
697 * Unassociates buddy from group first.
698 * Then see if no groups left, removes buddy completely.
699 * Otherwise updates buddy groups on server.
700 */
701 void sipe_core_buddy_remove(struct sipe_core_public *sipe_public,
702 const gchar *uri,
703 const gchar *group_name)
704 {
705 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
706 struct sipe_buddy *buddy = sipe_buddy_find_by_uri(sipe_private,
707 uri);
708 struct sipe_group *group = NULL;
709
710 if (!buddy) return;
711
712 if (group_name) {
713 group = sipe_group_find_by_name(sipe_private, group_name);
714 if (group) {
715 sipe_buddy_remove_group(buddy, group);
716 SIPE_DEBUG_INFO("sipe_core_buddy_remove: buddy '%s' removed from group '%s'",
717 uri, group->name);
718 }
719 }
720
721 if (g_slist_length(buddy->groups) < 1) {
722
723 if (sipe_ucs_is_migrated(sipe_private)) {
724 sipe_ucs_group_remove_buddy(sipe_private,
725 NULL,
726 group,
727 buddy);
728 } else {
729 gchar *request = g_strdup_printf("<m:URI>%s</m:URI>",
730 buddy->name);
731 sip_soap_request(sipe_private,
732 "deleteContact",
733 request);
734 g_free(request);
735 }
736
737 sipe_buddy_remove(sipe_private, buddy);
738 } else {
739 if (sipe_ucs_is_migrated(sipe_private)) {
740 sipe_ucs_group_remove_buddy(sipe_private,
741 NULL,
742 group,
743 buddy);
744 } else
745 /* updates groups on server */
746 sipe_group_update_buddy(sipe_private, buddy);
747 }
748 }
749
750 void sipe_core_buddy_got_status(struct sipe_core_public *sipe_public,
751 const gchar *uri,
752 guint activity)
753 {
754 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
755 struct sipe_buddy *sbuddy = sipe_buddy_find_by_uri(sipe_private,
756 uri);
757
758 if (!sbuddy) return;
759
760 /* Check if on 2005 system contact's calendar,
761 * then set/preserve it.
762 */
763 if (SIPE_CORE_PRIVATE_FLAG_IS(OCS2007)) {
764 sipe_backend_buddy_set_status(sipe_public, uri, activity);
765 } else {
766 sipe_ocs2005_apply_calendar_status(sipe_private,
767 sbuddy,
768 sipe_status_activity_to_token(activity));
769 }
770 }
771
772 void sipe_core_buddy_tooltip_info(struct sipe_core_public *sipe_public,
773 const gchar *uri,
774 const gchar *status_name,
775 gboolean is_online,
776 struct sipe_backend_buddy_tooltip *tooltip)
777 {
778 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
779 gchar *note = NULL;
780 gboolean is_oof_note = FALSE;
781 const gchar *activity = NULL;
782 gchar *calendar = NULL;
783 const gchar *meeting_subject = NULL;
784 const gchar *meeting_location = NULL;
785 gchar *access_text = NULL;
786
787 #define SIPE_ADD_BUDDY_INFO(l, t) \
788 { \
789 gchar *tmp = g_markup_escape_text((t), -1); \
790 sipe_backend_buddy_tooltip_add(sipe_public, tooltip, (l), tmp); \
791 g_free(tmp); \
792 }
793 #define SIPE_ADD_BUDDY_INFO_NOESCAPE(l, t) \
794 sipe_backend_buddy_tooltip_add(sipe_public, tooltip, (l), (t))
795
796 if (sipe_public) { /* happens on pidgin exit */
797 struct sipe_buddy *sbuddy = sipe_buddy_find_by_uri(sipe_private,
798 uri);
799 if (sbuddy) {
800 note = sbuddy->note;
801 is_oof_note = sbuddy->is_oof_note;
802 activity = sbuddy->activity;
803 calendar = sipe_cal_get_description(sbuddy);
804 meeting_subject = sbuddy->meeting_subject;
805 meeting_location = sbuddy->meeting_location;
806 }
807 if (SIPE_CORE_PRIVATE_FLAG_IS(OCS2007)) {
808 gboolean is_group_access = FALSE;
809 const int container_id = sipe_ocs2007_find_access_level(sipe_private,
810 "user",
811 sipe_get_no_sip_uri(uri),
812 &is_group_access);
813 const char *access_level = sipe_ocs2007_access_level_name(container_id);
814 access_text = is_group_access ?
815 g_strdup(access_level) :
816 g_strdup_printf(SIPE_OCS2007_INDENT_MARKED_FMT,
817 access_level);
818 }
819 }
820
821 if (is_online) {
822 const gchar *status_str = activity ? activity : status_name;
823
824 SIPE_ADD_BUDDY_INFO(_("Status"), status_str);
825 }
826 if (is_online && !is_empty(calendar)) {
827 SIPE_ADD_BUDDY_INFO(_("Calendar"), calendar);
828 }
829 g_free(calendar);
830 if (!is_empty(meeting_location)) {
831 SIPE_DEBUG_INFO("sipe_tooltip_text: %s meeting location: '%s'", uri, meeting_location);
832 SIPE_ADD_BUDDY_INFO(_("Meeting in"), meeting_location);
833 }
834 if (!is_empty(meeting_subject)) {
835 SIPE_DEBUG_INFO("sipe_tooltip_text: %s meeting subject: '%s'", uri, meeting_subject);
836 SIPE_ADD_BUDDY_INFO(_("Meeting about"), meeting_subject);
837 }
838 if (note) {
839 gchar *note_italics = g_strdup_printf("<i>%s</i>", note);
840 SIPE_DEBUG_INFO("sipe_tooltip_text: %s note: '%s'", uri, note);
841 SIPE_ADD_BUDDY_INFO_NOESCAPE(is_oof_note ? _("Out of office note") : _("Note"),
842 note_italics);
843 g_free(note_italics);
844 }
845 if (access_text) {
846 SIPE_ADD_BUDDY_INFO(_("Access level"), access_text);
847 g_free(access_text);
848 }
849 }
850
851 void sipe_buddy_update_property(struct sipe_core_private *sipe_private,
852 const char *uri,
853 sipe_buddy_info_fields propkey,
854 char *property_value)
855 {
856 GSList *buddies, *entry;
857
858 if (property_value)
859 property_value = g_strstrip(property_value);
860
861 entry = buddies = sipe_backend_buddy_find_all(SIPE_CORE_PUBLIC, uri, NULL); /* all buddies in different groups */
862 while (entry) {
863 gchar *prop_str;
864 sipe_backend_buddy p_buddy = entry->data;
865
866 /* for Display Name */
867 if (propkey == SIPE_BUDDY_INFO_DISPLAY_NAME) {
868 gchar *alias;
869 alias = sipe_backend_buddy_get_alias(SIPE_CORE_PUBLIC, p_buddy);
870 if (property_value && sipe_is_bad_alias(uri, alias)) {
871 SIPE_DEBUG_INFO("Replacing alias for %s with %s", uri, property_value);
872 sipe_backend_buddy_set_alias(SIPE_CORE_PUBLIC, p_buddy, property_value);
873 }
874 g_free(alias);
875
876 alias = sipe_backend_buddy_get_server_alias(SIPE_CORE_PUBLIC, p_buddy);
877 if (!is_empty(property_value) &&
878 (!sipe_strequal(property_value, alias) || is_empty(alias)) )
879 {
880 SIPE_DEBUG_INFO("Replacing service alias for %s with %s", uri, property_value);
881 sipe_backend_buddy_set_server_alias(SIPE_CORE_PUBLIC, p_buddy, property_value);
882 }
883 g_free(alias);
884 }
885 /* for other properties */
886 else {
887 if (!is_empty(property_value)) {
888 prop_str = sipe_backend_buddy_get_string(SIPE_CORE_PUBLIC, p_buddy, propkey);
889 if (!prop_str || !sipe_strcase_equal(prop_str, property_value)) {
890 sipe_backend_buddy_set_string(SIPE_CORE_PUBLIC, p_buddy, propkey, property_value);
891 }
892 g_free(prop_str);
893 }
894 }
895
896 entry = entry->next;
897 }
898 g_slist_free(buddies);
899 }
900
901
902 struct ms_dlx_data;
903 struct ms_dlx_data {
904 GSList *search_rows;
905 gchar *other;
906 guint max_returns;
907 sipe_svc_callback *callback;
908 struct sipe_svc_session *session;
909 gchar *wsse_security;
910 struct sipe_backend_search_token *token;
911 /* must call ms_dlx_free() */
912 void (*failed_callback)(struct sipe_core_private *sipe_private,
913 struct ms_dlx_data *mdd);
914 };
915
916 static void free_search_rows(GSList *search_rows)
917 {
918 sipe_utils_slist_free_full(search_rows, g_free);
919 }
920
921 static void ms_dlx_free(struct ms_dlx_data *mdd)
922 {
923 free_search_rows(mdd->search_rows);
924 sipe_svc_session_close(mdd->session);
925 g_free(mdd->other);
926 g_free(mdd->wsse_security);
927 g_free(mdd);
928 }
929
930 #define SIPE_SOAP_SEARCH_ROW "<m:row m:attrib=\"%s\" m:value=\"%s\"/>"
931 #define DLX_SEARCH_ITEM \
932 "<AbEntryRequest.ChangeSearchQuery>" \
933 " <SearchOn>%s</SearchOn>" \
934 " <Value>%s</Value>" \
935 "</AbEntryRequest.ChangeSearchQuery>"
936
937 static gchar * prepare_buddy_search_query(GSList *query_rows, gboolean use_dlx) {
938 gchar **attrs = g_new(gchar *, (g_slist_length(query_rows) / 2) + 1);
939 guint i = 0;
940 gchar *query = NULL;
941
942 while (query_rows) {
943 gchar *attr;
944 gchar *value;
945 gchar *tmp = NULL;
946
947 attr = query_rows->data;
948 query_rows = g_slist_next(query_rows);
949 value = query_rows->data;
950 query_rows = g_slist_next(query_rows);
951
952 if (!value)
953 break;
954
955 /*
956 * Special value for SIP ID
957 *
958 * Active Directory seems only to be able to search for
959 * SIP URIs. Make sure search string starts with "sip:".
960 */
961 if (!attr) {
962 attr = "msRTCSIP-PrimaryUserAddress";
963 if (!use_dlx)
964 value = tmp = sip_uri(value);
965 }
966
967 attrs[i++] = g_markup_printf_escaped(use_dlx ? DLX_SEARCH_ITEM : SIPE_SOAP_SEARCH_ROW,
968 attr, value);
969 g_free(tmp);
970 }
971 attrs[i] = NULL;
972
973 if (i) {
974 query = g_strjoinv(NULL, attrs);
975 SIPE_DEBUG_INFO("prepare_buddy_search_query: rows:\n%s",
976 query ? query : "");
977 }
978
979 g_strfreev(attrs);
980
981 return query;
982 }
983
984 static void ms_dlx_webticket(struct sipe_core_private *sipe_private,
985 const gchar *base_uri,
986 const gchar *auth_uri,
987 const gchar *wsse_security,
988 SIPE_UNUSED_PARAMETER const gchar *failure_msg,
989 gpointer callback_data)
990 {
991 struct ms_dlx_data *mdd = callback_data;
992
993 if (wsse_security) {
994 guint length = g_slist_length(mdd->search_rows);
995 gchar *search;
996
997 SIPE_DEBUG_INFO("ms_dlx_webticket: got ticket for %s",
998 base_uri);
999
1000 if (length > 0) {
1001 /* complex search */
1002 gchar *query = prepare_buddy_search_query(mdd->search_rows, TRUE);
1003 search = g_strdup_printf("<ChangeSearch xmlns:q1=\"DistributionListExpander\" soapenc:arrayType=\"q1:AbEntryRequest.ChangeSearchQuery[%d]\">"
1004 " %s"
1005 "</ChangeSearch>",
1006 length / 2,
1007 query);
1008 g_free(query);
1009 } else {
1010 /* simple search */
1011 search = g_strdup_printf("<BasicSearch>"
1012 " <SearchList>c,company,displayName,givenName,mail,mailNickname,msRTCSIP-PrimaryUserAddress,sn</SearchList>"
1013 " <Value>%s</Value>"
1014 " <Verb>BeginsWith</Verb>"
1015 "</BasicSearch>",
1016 mdd->other);
1017 }
1018
1019 if (sipe_svc_ab_entry_request(sipe_private,
1020 mdd->session,
1021 auth_uri,
1022 wsse_security,
1023 search,
1024 mdd->max_returns,
1025 mdd->callback,
1026 mdd)) {
1027
1028 /* keep webticket security token for potential further use */
1029 g_free(mdd->wsse_security);
1030 mdd->wsse_security = g_strdup(wsse_security);
1031
1032 /* callback data passed down the line */
1033 mdd = NULL;
1034 }
1035 g_free(search);
1036
1037 } else {
1038 /* no ticket: this will show the minmum information */
1039 SIPE_DEBUG_ERROR("ms_dlx_webticket: no web ticket for %s",
1040 base_uri);
1041 }
1042
1043 if (mdd)
1044 mdd->failed_callback(sipe_private, mdd);
1045 }
1046
1047 static void ms_dlx_webticket_request(struct sipe_core_private *sipe_private,
1048 struct ms_dlx_data *mdd)
1049 {
1050 if (!sipe_webticket_request(sipe_private,
1051 mdd->session,
1052 sipe_private->dlx_uri,
1053 "AddressBookWebTicketBearer",
1054 ms_dlx_webticket,
1055 mdd)) {
1056 SIPE_DEBUG_ERROR("ms_dlx_webticket_request: couldn't request webticket for %s",
1057 sipe_private->dlx_uri);
1058 mdd->failed_callback(sipe_private, mdd);
1059 }
1060 }
1061
1062 void sipe_buddy_search_contacts_finalize(struct sipe_core_private *sipe_private,
1063 struct sipe_backend_search_results *results,
1064 guint match_count,
1065 gboolean more)
1066 {
1067 gchar *secondary = g_strdup_printf(
1068 dngettext(PACKAGE_NAME,
1069 "Found %d contact%s:",
1070 "Found %d contacts%s:", match_count),
1071 match_count, more ? _(" (more matched your query)") : "");
1072
1073 sipe_backend_search_results_finalize(SIPE_CORE_PUBLIC,
1074 results,
1075 secondary,
1076 more);
1077 g_free(secondary);
1078 }
1079
1080 static void search_ab_entry_response(struct sipe_core_private *sipe_private,
1081 const gchar *uri,
1082 SIPE_UNUSED_PARAMETER const gchar *raw,
1083 sipe_xml *soap_body,
1084 gpointer callback_data)
1085 {
1086 struct ms_dlx_data *mdd = callback_data;
1087
1088 if (soap_body) {
1089 const sipe_xml *node;
1090 struct sipe_backend_search_results *results;
1091 GHashTable *found;
1092
1093 SIPE_DEBUG_INFO("search_ab_entry_response: received valid SOAP message from service %s",
1094 uri);
1095
1096 /* any matches? */
1097 node = sipe_xml_child(soap_body, "Body/SearchAbEntryResponse/SearchAbEntryResult/Items/AbEntry");
1098 if (!node) {
1099 /* try again with simple search, if possible */
1100 if (mdd->other && mdd->search_rows) {
1101 SIPE_DEBUG_INFO_NOFORMAT("search_ab_entry_response: no matches, retrying with simple search");
1102
1103 /* throw away original search query */
1104 free_search_rows(mdd->search_rows);
1105 mdd->search_rows = NULL;
1106
1107 ms_dlx_webticket_request(sipe_private, mdd);
1108
1109 /* callback data passed down the line */
1110 return;
1111
1112 } else {
1113 SIPE_DEBUG_ERROR_NOFORMAT("search_ab_entry_response: no matches");
1114
1115 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1116 mdd->token,
1117 _("No contacts found"));
1118 ms_dlx_free(mdd);
1119 return;
1120 }
1121 }
1122
1123 /* OK, we found something - show the results to the user */
1124 results = sipe_backend_search_results_start(SIPE_CORE_PUBLIC,
1125 mdd->token);
1126 if (!results) {
1127 SIPE_DEBUG_ERROR_NOFORMAT("search_ab_entry_response: Unable to display the search results.");
1128 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1129 mdd->token,
1130 _("Unable to display the search results"));
1131 ms_dlx_free(mdd);
1132 return;
1133 }
1134
1135 /* SearchAbEntryResult can contain duplicates */
1136 found = g_hash_table_new_full(g_str_hash, g_str_equal,
1137 g_free, NULL);
1138
1139 for (/* initialized above */ ; node; node = sipe_xml_twin(node)) {
1140 const sipe_xml *attrs;
1141 gchar *sip_uri = NULL;
1142 gchar *displayname = NULL;
1143 gchar *company = NULL;
1144 gchar *country = NULL;
1145 gchar *email = NULL;
1146
1147 for (attrs = sipe_xml_child(node, "Attributes/Attribute");
1148 attrs;
1149 attrs = sipe_xml_twin(attrs)) {
1150 gchar *name = sipe_xml_data(sipe_xml_child(attrs,
1151 "Name"));
1152 gchar *value = sipe_xml_data(sipe_xml_child(attrs,
1153 "Value"));
1154
1155 if (!is_empty(value)) {
1156 if (sipe_strcase_equal(name, "msrtcsip-primaryuseraddress")) {
1157 g_free(sip_uri);
1158 sip_uri = value;
1159 value = NULL;
1160 } else if (sipe_strcase_equal(name, "displayname")) {
1161 g_free(displayname);
1162 displayname = value;
1163 value = NULL;
1164 } else if (sipe_strcase_equal(name, "mail")) {
1165 g_free(email);
1166 email = value;
1167 value = NULL;
1168 } else if (sipe_strcase_equal(name, "company")) {
1169 g_free(company);
1170 company = value;
1171 value = NULL;
1172 } else if (sipe_strcase_equal(name, "country")) {
1173 g_free(country);
1174 country = value;
1175 value = NULL;
1176 }
1177 }
1178
1179 g_free(value);
1180 g_free(name);
1181 }
1182
1183 if (sip_uri && !g_hash_table_lookup(found, sip_uri)) {
1184 gchar **uri_parts = g_strsplit(sip_uri, ":", 2);
1185 sipe_backend_search_results_add(SIPE_CORE_PUBLIC,
1186 results,
1187 uri_parts[1],
1188 displayname,
1189 company,
1190 country,
1191 email);
1192 g_strfreev(uri_parts);
1193
1194 g_hash_table_insert(found, sip_uri, (gpointer) TRUE);
1195 sip_uri = NULL;
1196 }
1197
1198 g_free(email);
1199 g_free(country);
1200 g_free(company);
1201 g_free(displayname);
1202 g_free(sip_uri);
1203 }
1204
1205 sipe_buddy_search_contacts_finalize(sipe_private, results,
1206 g_hash_table_size(found),
1207 FALSE);
1208 g_hash_table_destroy(found);
1209 ms_dlx_free(mdd);
1210
1211 } else {
1212 mdd->failed_callback(sipe_private, mdd);
1213 }
1214 }
1215
1216 static gboolean process_search_contact_response(struct sipe_core_private *sipe_private,
1217 struct sipmsg *msg,
1218 struct transaction *trans)
1219 {
1220 struct sipe_backend_search_token *token = trans->payload->data;
1221 struct sipe_backend_search_results *results;
1222 sipe_xml *searchResults;
1223 const sipe_xml *mrow;
1224 guint match_count = 0;
1225 gboolean more = FALSE;
1226
1227 /* valid response? */
1228 if (msg->response != 200) {
1229 SIPE_DEBUG_ERROR("process_search_contact_response: request failed (%d)",
1230 msg->response);
1231 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1232 token,
1233 _("Contact search failed"));
1234 return(FALSE);
1235 }
1236
1237 SIPE_DEBUG_INFO("process_search_contact_response: body:\n%s", msg->body ? msg->body : "");
1238
1239 /* valid XML? */
1240 searchResults = sipe_xml_parse(msg->body, msg->bodylen);
1241 if (!searchResults) {
1242 SIPE_DEBUG_INFO_NOFORMAT("process_search_contact_response: no parseable searchResults");
1243 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1244 token,
1245 _("Contact search failed"));
1246 return(FALSE);
1247 }
1248
1249 /* any matches? */
1250 mrow = sipe_xml_child(searchResults, "Body/Array/row");
1251 if (!mrow) {
1252 SIPE_DEBUG_ERROR_NOFORMAT("process_search_contact_response: no matches");
1253 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1254 token,
1255 _("No contacts found"));
1256
1257 sipe_xml_free(searchResults);
1258 return(FALSE);
1259 }
1260
1261 /* OK, we found something - show the results to the user */
1262 results = sipe_backend_search_results_start(SIPE_CORE_PUBLIC,
1263 trans->payload->data);
1264 if (!results) {
1265 SIPE_DEBUG_ERROR_NOFORMAT("process_search_contact_response: Unable to display the search results.");
1266 sipe_backend_search_failed(SIPE_CORE_PUBLIC,
1267 token,
1268 _("Unable to display the search results"));
1269
1270 sipe_xml_free(searchResults);
1271 return FALSE;
1272 }
1273
1274 for (/* initialized above */ ; mrow; mrow = sipe_xml_twin(mrow)) {
1275 gchar **uri_parts = g_strsplit(sipe_xml_attribute(mrow, "uri"), ":", 2);
1276 sipe_backend_search_results_add(SIPE_CORE_PUBLIC,
1277 results,
1278 uri_parts[1],
1279 sipe_xml_attribute(mrow, "displayName"),
1280 sipe_xml_attribute(mrow, "company"),
1281 sipe_xml_attribute(mrow, "country"),
1282 sipe_xml_attribute(mrow, "email"));
1283 g_strfreev(uri_parts);
1284 match_count++;
1285 }
1286
1287 if ((mrow = sipe_xml_child(searchResults, "Body/directorySearch/moreAvailable")) != NULL) {
1288 char *data = sipe_xml_data(mrow);
1289 more = (g_ascii_strcasecmp(data, "true") == 0);
1290 g_free(data);
1291 }
1292
1293 sipe_buddy_search_contacts_finalize(sipe_private, results, match_count, more);
1294 sipe_xml_free(searchResults);
1295
1296 return(TRUE);
1297 }
1298
1299 static void search_soap_request(struct sipe_core_private *sipe_private,
1300 GDestroyNotify destroy,
1301 void *data,
1302 guint max,
1303 SoapTransCallback callback,
1304 GSList *search_rows)
1305 {
1306 gchar *query = prepare_buddy_search_query(search_rows, FALSE);
1307 struct transaction_payload *payload = g_new0(struct transaction_payload, 1);
1308
1309 payload->destroy = destroy;
1310 payload->data = data;
1311
1312 sip_soap_directory_search(sipe_private,
1313 max,
1314 query,
1315 callback,
1316 payload);
1317 g_free(query);
1318 }
1319
1320 static void search_ab_entry_failed(struct sipe_core_private *sipe_private,
1321 struct ms_dlx_data *mdd)
1322 {
1323 /* error using [MS-DLX] server, retry using Active Directory */
1324 if (mdd->search_rows)
1325 search_soap_request(sipe_private,
1326 NULL,
1327 mdd->token,
1328 100,
1329 process_search_contact_response,
1330 mdd->search_rows);
1331 ms_dlx_free(mdd);
1332 }
1333
1334 void sipe_core_buddy_search(struct sipe_core_public *sipe_public,
1335 struct sipe_backend_search_token *token,
1336 const gchar *given_name,
1337 const gchar *surname,
1338 const gchar *email,
1339 const gchar *sipid,
1340 const gchar *company,
1341 const gchar *country)
1342 {
1343 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
1344
1345 /* Lync 2013 or newer: use UCS if contacts are migrated */
1346 if (SIPE_CORE_PRIVATE_FLAG_IS(LYNC2013) &&
1347 sipe_ucs_is_migrated(sipe_private)) {
1348
1349 sipe_ucs_search(sipe_private,
1350 token,
1351 given_name,
1352 surname,
1353 email,
1354 sipid,
1355 company,
1356 country);
1357
1358 } else {
1359 GSList *query_rows = NULL;
1360 guint count = 0;
1361 const gchar *simple = NULL;
1362
1363 #define ADD_QUERY_ROW(attr, val) \
1364 if (val) { \
1365 query_rows = g_slist_append(query_rows, g_strdup(attr)); \
1366 query_rows = g_slist_append(query_rows, g_strdup(val)); \
1367 simple = val; \
1368 count++; \
1369 }
1370
1371 ADD_QUERY_ROW("givenName", given_name);
1372 ADD_QUERY_ROW("sn", surname);
1373 ADD_QUERY_ROW("mail", email);
1374 /* prepare_buddy_search_query() interprets NULL as SIP ID */
1375 ADD_QUERY_ROW(NULL, sipid);
1376 ADD_QUERY_ROW("company", company);
1377 ADD_QUERY_ROW("c", country);
1378
1379 if (query_rows) {
1380 if (sipe_private->dlx_uri != NULL) {
1381 struct ms_dlx_data *mdd = g_new0(struct ms_dlx_data, 1);
1382
1383 mdd->search_rows = query_rows;
1384 /* user entered only one search string, remember that one */
1385 if (count == 1)
1386 mdd->other = g_strdup(simple);
1387 mdd->max_returns = 100;
1388 mdd->callback = search_ab_entry_response;
1389 mdd->failed_callback = search_ab_entry_failed;
1390 mdd->session = sipe_svc_session_start();
1391 mdd->token = token;
1392
1393 ms_dlx_webticket_request(sipe_private, mdd);
1394
1395 } else {
1396 /* no [MS-DLX] server, use Active Directory search instead */
1397 search_soap_request(sipe_private,
1398 NULL,
1399 token,
1400 100,
1401 process_search_contact_response,
1402 query_rows);
1403 free_search_rows(query_rows);
1404 }
1405 } else
1406 sipe_backend_search_failed(sipe_public,
1407 token,
1408 _("Invalid contact search query"));
1409 }
1410 }
1411
1412 static void get_info_finalize(struct sipe_core_private *sipe_private,
1413 struct sipe_backend_buddy_info *info,
1414 const gchar *uri,
1415 const gchar *server_alias,
1416 const gchar *email)
1417 {
1418 sipe_backend_buddy bbuddy;
1419 struct sipe_buddy *sbuddy;
1420 gchar *alias;
1421 gchar *value;
1422
1423 if (!info) {
1424 info = sipe_backend_buddy_info_start(SIPE_CORE_PUBLIC);
1425 } else {
1426 sipe_backend_buddy_info_break(SIPE_CORE_PUBLIC, info);
1427 }
1428 if (!info)
1429 return;
1430
1431 bbuddy = sipe_backend_buddy_find(SIPE_CORE_PUBLIC, uri, NULL);
1432
1433 if (is_empty(server_alias)) {
1434 value = sipe_backend_buddy_get_server_alias(SIPE_CORE_PUBLIC,
1435 bbuddy);
1436 if (value) {
1437 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1438 info,
1439 SIPE_BUDDY_INFO_DISPLAY_NAME,
1440 value);
1441 }
1442 } else {
1443 value = g_strdup(server_alias);
1444 }
1445
1446 /* present alias if it differs from server alias */
1447 alias = sipe_backend_buddy_get_local_alias(SIPE_CORE_PUBLIC, bbuddy);
1448 if (alias && !sipe_strequal(alias, value))
1449 {
1450 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1451 info,
1452 SIPE_BUDDY_INFO_ALIAS,
1453 alias);
1454 }
1455 g_free(alias);
1456 g_free(value);
1457
1458 if (is_empty(email)) {
1459 value = sipe_backend_buddy_get_string(SIPE_CORE_PUBLIC,
1460 bbuddy,
1461 SIPE_BUDDY_INFO_EMAIL);
1462 if (value) {
1463 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1464 info,
1465 SIPE_BUDDY_INFO_EMAIL,
1466 value);
1467 g_free(value);
1468 }
1469 }
1470
1471 value = sipe_backend_buddy_get_string(SIPE_CORE_PUBLIC,
1472 bbuddy,
1473 SIPE_BUDDY_INFO_SITE);
1474 if (value) {
1475 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1476 info,
1477 SIPE_BUDDY_INFO_SITE,
1478 value);
1479 g_free(value);
1480 }
1481
1482 sbuddy = sipe_buddy_find_by_uri(sipe_private, uri);
1483 if (sbuddy && sbuddy->device_name) {
1484 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1485 info,
1486 SIPE_BUDDY_INFO_DEVICE,
1487 sbuddy->device_name);
1488 }
1489
1490 sipe_backend_buddy_info_finalize(SIPE_CORE_PUBLIC, info, uri);
1491 }
1492
1493
1494 static void get_info_ab_entry_response(struct sipe_core_private *sipe_private,
1495 const gchar *uri,
1496 SIPE_UNUSED_PARAMETER const gchar *raw,
1497 sipe_xml *soap_body,
1498 gpointer callback_data)
1499 {
1500 struct ms_dlx_data *mdd = callback_data;
1501 struct sipe_backend_buddy_info *info = NULL;
1502 gchar *server_alias = NULL;
1503 gchar *email = NULL;
1504
1505 if (soap_body) {
1506 const sipe_xml *node;
1507
1508 SIPE_DEBUG_INFO("get_info_ab_entry_response: received valid SOAP message from service %s",
1509 uri);
1510
1511 info = sipe_backend_buddy_info_start(SIPE_CORE_PUBLIC);
1512
1513 for (node = sipe_xml_child(soap_body, "Body/SearchAbEntryResponse/SearchAbEntryResult/Items/AbEntry/Attributes/Attribute");
1514 node;
1515 node = sipe_xml_twin(node)) {
1516 gchar *name = sipe_xml_data(sipe_xml_child(node,
1517 "Name"));
1518 gchar *value = sipe_xml_data(sipe_xml_child(node,
1519 "Value"));
1520 const sipe_xml *values = sipe_xml_child(node,
1521 "Values");
1522
1523 /* Single value entries */
1524 if (!is_empty(value)) {
1525
1526 if (sipe_strcase_equal(name, "displayname")) {
1527 g_free(server_alias);
1528 server_alias = value;
1529 value = NULL;
1530 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1531 info,
1532 SIPE_BUDDY_INFO_DISPLAY_NAME,
1533 server_alias);
1534 } else if (sipe_strcase_equal(name, "mail")) {
1535 g_free(email);
1536 email = value;
1537 value = NULL;
1538 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1539 info,
1540 SIPE_BUDDY_INFO_EMAIL,
1541 email);
1542 } else if (sipe_strcase_equal(name, "title")) {
1543 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1544 info,
1545 SIPE_BUDDY_INFO_JOB_TITLE,
1546 value);
1547 } else if (sipe_strcase_equal(name, "company")) {
1548 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1549 info,
1550 SIPE_BUDDY_INFO_COMPANY,
1551 value);
1552 } else if (sipe_strcase_equal(name, "country")) {
1553 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1554 info,
1555 SIPE_BUDDY_INFO_COUNTRY,
1556 value);
1557 }
1558
1559 } else if (values) {
1560 gchar *first = sipe_xml_data(sipe_xml_child(values,
1561 "string"));
1562
1563 if (sipe_strcase_equal(name, "telephonenumber")) {
1564 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1565 info,
1566 SIPE_BUDDY_INFO_WORK_PHONE,
1567 first);
1568 }
1569
1570 g_free(first);
1571 }
1572
1573 g_free(value);
1574 g_free(name);
1575 }
1576 }
1577
1578 /* this will show the minmum information */
1579 get_info_finalize(sipe_private,
1580 info,
1581 mdd->other,
1582 server_alias,
1583 email);
1584
1585 g_free(email);
1586 g_free(server_alias);
1587 ms_dlx_free(mdd);
1588 }
1589
1590 static gboolean process_get_info_response(struct sipe_core_private *sipe_private,
1591 struct sipmsg *msg,
1592 struct transaction *trans)
1593 {
1594 const gchar *uri = trans->payload->data;
1595 struct sipe_backend_buddy_info *info = NULL;
1596 gchar *server_alias = NULL;
1597 gchar *email = NULL;
1598
1599 SIPE_DEBUG_INFO("Fetching %s's user info for %s",
1600 uri, sipe_private->username);
1601
1602 if (msg->response != 200) {
1603 SIPE_DEBUG_INFO("process_get_info_response: SERVICE response is %d", msg->response);
1604 } else {
1605 sipe_xml *searchResults;
1606 const sipe_xml *mrow;
1607
1608 SIPE_DEBUG_INFO("process_get_info_response: body:\n%s",
1609 msg->body ? msg->body : "");
1610
1611 searchResults = sipe_xml_parse(msg->body, msg->bodylen);
1612 if (!searchResults) {
1613
1614 SIPE_DEBUG_INFO_NOFORMAT("process_get_info_response: no parseable searchResults");
1615
1616 } else if ((mrow = sipe_xml_child(searchResults, "Body/Array/row"))) {
1617 const gchar *value;
1618 gchar *phone_number;
1619
1620 info = sipe_backend_buddy_info_start(SIPE_CORE_PUBLIC);
1621
1622 server_alias = g_strdup(sipe_xml_attribute(mrow, "displayName"));
1623 email = g_strdup(sipe_xml_attribute(mrow, "email"));
1624 phone_number = g_strdup(sipe_xml_attribute(mrow, "phone"));
1625
1626 /*
1627 * For 2007 system we will take this from ContactCard -
1628 * it has cleaner tel: URIs at least
1629 */
1630 if (!SIPE_CORE_PRIVATE_FLAG_IS(OCS2007)) {
1631 char *tel_uri = sip_to_tel_uri(phone_number);
1632 /* trims its parameters, so call first */
1633 sipe_buddy_update_property(sipe_private, uri, SIPE_BUDDY_INFO_DISPLAY_NAME, server_alias);
1634 sipe_buddy_update_property(sipe_private, uri, SIPE_BUDDY_INFO_EMAIL, email);
1635 sipe_buddy_update_property(sipe_private, uri, SIPE_BUDDY_INFO_WORK_PHONE, tel_uri);
1636 sipe_buddy_update_property(sipe_private, uri, SIPE_BUDDY_INFO_WORK_PHONE_DISPLAY, phone_number);
1637 g_free(tel_uri);
1638
1639 sipe_backend_buddy_refresh_properties(SIPE_CORE_PUBLIC,
1640 uri);
1641 }
1642
1643 if (!is_empty(server_alias)) {
1644 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1645 info,
1646 SIPE_BUDDY_INFO_DISPLAY_NAME,
1647 server_alias);
1648 }
1649 if ((value = sipe_xml_attribute(mrow, "title")) && strlen(value) > 0) {
1650 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1651 info,
1652 SIPE_BUDDY_INFO_JOB_TITLE,
1653 value);
1654 }
1655 if ((value = sipe_xml_attribute(mrow, "office")) && strlen(value) > 0) {
1656 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1657 info,
1658 SIPE_BUDDY_INFO_OFFICE,
1659 value);
1660 }
1661 if (!is_empty(phone_number)) {
1662 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1663 info,
1664 SIPE_BUDDY_INFO_WORK_PHONE,
1665 phone_number);
1666 }
1667 g_free(phone_number);
1668 if ((value = sipe_xml_attribute(mrow, "company")) && strlen(value) > 0) {
1669 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1670 info,
1671 SIPE_BUDDY_INFO_COMPANY,
1672 value);
1673 }
1674 if ((value = sipe_xml_attribute(mrow, "city")) && strlen(value) > 0) {
1675 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1676 info,
1677 SIPE_BUDDY_INFO_CITY,
1678 value);
1679 }
1680 if ((value = sipe_xml_attribute(mrow, "state")) && strlen(value) > 0) {
1681 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1682 info,
1683 SIPE_BUDDY_INFO_STATE,
1684 value);
1685 }
1686 if ((value = sipe_xml_attribute(mrow, "country")) && strlen(value) > 0) {
1687 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1688 info,
1689 SIPE_BUDDY_INFO_COUNTRY,
1690 value);
1691 }
1692 if (!is_empty(email)) {
1693 sipe_backend_buddy_info_add(SIPE_CORE_PUBLIC,
1694 info,
1695 SIPE_BUDDY_INFO_EMAIL,
1696 email);
1697 }
1698 }
1699 sipe_xml_free(searchResults);
1700 }
1701
1702 /* this will show the minmum information */
1703 get_info_finalize(sipe_private,
1704 info,
1705 uri,
1706 server_alias,
1707 email);
1708
1709 g_free(server_alias);
1710 g_free(email);
1711
1712 return TRUE;
1713 }
1714
1715 static void get_info_ab_entry_failed(struct sipe_core_private *sipe_private,
1716 struct ms_dlx_data *mdd)
1717 {
1718 /* error using [MS-DLX] server, retry using Active Directory */
1719 search_soap_request(sipe_private,
1720 g_free,
1721 mdd->other,
1722 1,
1723 process_get_info_response,
1724 mdd->search_rows);
1725 mdd->other = NULL;
1726 ms_dlx_free(mdd);
1727 }
1728
1729 static GSList *search_rows_for_uri(const gchar *uri)
1730 {
1731 /* prepare_buddy_search_query() interprets NULL as SIP ID */
1732 GSList *l = g_slist_append(NULL, NULL);
1733 return(g_slist_append(l, g_strdup(uri)));
1734 }
1735
1736 void sipe_core_buddy_get_info(struct sipe_core_public *sipe_public,
1737 const gchar *who)
1738 {
1739 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
1740 GSList *search_rows = search_rows_for_uri(who);
1741
1742 if (sipe_private->dlx_uri) {
1743 struct ms_dlx_data *mdd = g_new0(struct ms_dlx_data, 1);
1744
1745 mdd->search_rows = search_rows;
1746 mdd->other = g_strdup(who);
1747 mdd->max_returns = 1;
1748 mdd->callback = get_info_ab_entry_response;
1749 mdd->failed_callback = get_info_ab_entry_failed;
1750 mdd->session = sipe_svc_session_start();
1751
1752 ms_dlx_webticket_request(sipe_private, mdd);
1753
1754 } else {
1755 /* no [MS-DLX] server, use Active Directory search instead */
1756 search_soap_request(sipe_private,
1757 g_free,
1758 g_strdup(who),
1759 1,
1760 process_get_info_response,
1761 search_rows);
1762 free_search_rows(search_rows);
1763 }
1764 }
1765
1766 static void photo_response_data_free(struct photo_response_data *data)
1767 {
1768 g_free(data->who);
1769 g_free(data->photo_hash);
1770 if (data->request) {
1771 sipe_http_request_cancel(data->request);
1772 }
1773 g_free(data);
1774 }
1775
1776 static void process_buddy_photo_response(struct sipe_core_private *sipe_private,
1777 guint status,
1778 GSList *headers,
1779 const char *body,
1780 gpointer data)
1781 {
1782 struct photo_response_data *rdata = (struct photo_response_data *) data;
1783
1784 rdata->request = NULL;
1785
1786 if (status == SIPE_HTTP_STATUS_OK) {
1787 const gchar *len_str = sipe_utils_nameval_find(headers,
1788 "Content-Length");
1789 if (len_str) {
1790 gsize photo_size = atoi(len_str);
1791 gpointer photo = g_new(char, photo_size);
1792
1793 if (photo) {
1794 memcpy(photo, body, photo_size);
1795
1796 sipe_backend_buddy_set_photo(SIPE_CORE_PUBLIC,
1797 rdata->who,
1798 photo,
1799 photo_size,
1800 rdata->photo_hash);
1801 }
1802 }
1803 }
1804
1805 sipe_private->buddies->pending_photo_requests =
1806 g_slist_remove(sipe_private->buddies->pending_photo_requests, rdata);
1807
1808 photo_response_data_free(rdata);
1809 }
1810
1811 static gchar *create_x_ms_webticket_header(const gchar *wsse_security)
1812 {
1813 gchar *assertion = sipe_xml_extract_raw(wsse_security, "saml:Assertion", TRUE);
1814 gchar *wsse_security_base64;
1815 gchar *x_ms_webticket_header;
1816
1817 if (!assertion) {
1818 return NULL;
1819 }
1820
1821 wsse_security_base64 = g_base64_encode((const guchar *)assertion,
1822 strlen(assertion));
1823 x_ms_webticket_header = g_strdup_printf("X-MS-WebTicket: opaque=%s\r\n",
1824 wsse_security_base64);
1825
1826 g_free(assertion);
1827 g_free(wsse_security_base64);
1828
1829 return x_ms_webticket_header;
1830 }
1831
1832 void sipe_buddy_update_photo(struct sipe_core_private *sipe_private,
1833 const gchar *uri,
1834 const gchar *photo_hash,
1835 const gchar *photo_url,
1836 const gchar *headers)
1837 {
1838 const gchar *photo_hash_old =
1839 sipe_backend_buddy_get_photo_hash(SIPE_CORE_PUBLIC, uri);
1840
1841 if (!sipe_strequal(photo_hash, photo_hash_old)) {
1842 struct photo_response_data *data = g_new(struct photo_response_data, 1);
1843
1844 SIPE_DEBUG_INFO("sipe_buddy_update_photo: who '%s' url '%s' hash '%s'",
1845 uri, photo_url, photo_hash);
1846
1847 data->who = g_strdup(uri);
1848 data->photo_hash = g_strdup(photo_hash);
1849
1850 data->request = sipe_http_request_get(sipe_private,
1851 photo_url,
1852 headers,
1853 process_buddy_photo_response,
1854 data);
1855
1856 if (data->request) {
1857 sipe_private->buddies->pending_photo_requests =
1858 g_slist_append(sipe_private->buddies->pending_photo_requests, data);
1859 sipe_http_request_ready(data->request);
1860 } else {
1861 photo_response_data_free(data);
1862 }
1863 }
1864 }
1865
1866 static void get_photo_ab_entry_response(struct sipe_core_private *sipe_private,
1867 const gchar *uri,
1868 SIPE_UNUSED_PARAMETER const gchar *raw,
1869 sipe_xml *soap_body,
1870 gpointer callback_data)
1871 {
1872 struct ms_dlx_data *mdd = callback_data;
1873 gchar *photo_rel_path = NULL;
1874 gchar *photo_hash = NULL;
1875
1876 if (soap_body) {
1877 const sipe_xml *node;
1878
1879 SIPE_DEBUG_INFO("get_photo_ab_entry_response: received valid SOAP message from service %s",
1880 uri);
1881
1882 for (node = sipe_xml_child(soap_body, "Body/SearchAbEntryResponse/SearchAbEntryResult/Items/AbEntry/Attributes/Attribute");
1883 node;
1884 node = sipe_xml_twin(node)) {
1885 gchar *name = sipe_xml_data(sipe_xml_child(node, "Name"));
1886 gchar *value = sipe_xml_data(sipe_xml_child(node, "Value"));
1887
1888 if (!is_empty(value)) {
1889 if (sipe_strcase_equal(name, "PhotoRelPath")) {
1890 g_free(photo_rel_path);
1891 photo_rel_path = value;
1892 value = NULL;
1893 } else if (sipe_strcase_equal(name, "PhotoHash")) {
1894 g_free(photo_hash);
1895 photo_hash = value;
1896 value = NULL;
1897 }
1898 }
1899
1900 g_free(value);
1901 g_free(name);
1902 }
1903 }
1904
1905 if (sipe_private->addressbook_uri && photo_rel_path && photo_hash) {
1906 gchar *photo_url = g_strdup_printf("%s/%s",
1907 sipe_private->addressbook_uri, photo_rel_path);
1908 gchar *x_ms_webticket_header = create_x_ms_webticket_header(mdd->wsse_security);
1909
1910 sipe_buddy_update_photo(sipe_private,
1911 mdd->other,
1912 photo_hash,
1913 photo_url,
1914 x_ms_webticket_header);
1915
1916 g_free(x_ms_webticket_header);
1917 g_free(photo_url);
1918 }
1919
1920 g_free(photo_rel_path);
1921 g_free(photo_hash);
1922 ms_dlx_free(mdd);
1923 }
1924
1925 static void get_photo_ab_entry_failed(SIPE_UNUSED_PARAMETER struct sipe_core_private *sipe_private,
1926 struct ms_dlx_data *mdd)
1927 {
1928 ms_dlx_free(mdd);
1929 }
1930
1931 static void buddy_fetch_photo(struct sipe_core_private *sipe_private,
1932 const gchar *uri)
1933 {
1934 if (sipe_backend_uses_photo()) {
1935
1936 /* Lync 2013 or newer: use UCS if contacts are migrated */
1937 if (SIPE_CORE_PRIVATE_FLAG_IS(LYNC2013) &&
1938 sipe_ucs_is_migrated(sipe_private)) {
1939
1940 sipe_ucs_get_photo(sipe_private, uri);
1941
1942 /* Lync 2010: use [MS-DLX] */
1943 } else if (sipe_private->dlx_uri &&
1944 sipe_private->addressbook_uri) {
1945 struct ms_dlx_data *mdd = g_new0(struct ms_dlx_data, 1);
1946
1947 mdd->search_rows = search_rows_for_uri(uri);
1948 mdd->other = g_strdup(uri);
1949 mdd->max_returns = 1;
1950 mdd->callback = get_photo_ab_entry_response;
1951 mdd->failed_callback = get_photo_ab_entry_failed;
1952 mdd->session = sipe_svc_session_start();
1953
1954 ms_dlx_webticket_request(sipe_private, mdd);
1955 }
1956 }
1957 }
1958
1959 static void buddy_refresh_photos_cb(gpointer uri,
1960 SIPE_UNUSED_PARAMETER gpointer value,
1961 gpointer sipe_private)
1962 {
1963 buddy_fetch_photo(sipe_private, uri);
1964 }
1965
1966 void sipe_buddy_refresh_photos(struct sipe_core_private *sipe_private)
1967 {
1968 g_hash_table_foreach(sipe_private->buddies->uri,
1969 buddy_refresh_photos_cb,
1970 sipe_private);
1971 }
1972
1973 /* Buddy menu callbacks*/
1974
1975 void sipe_core_buddy_new_chat(struct sipe_core_public *sipe_public,
1976 const gchar *who)
1977 {
1978 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
1979
1980 /* 2007+ conference */
1981 if (SIPE_CORE_PRIVATE_FLAG_IS(OCS2007)) {
1982 sipe_conf_add(sipe_private, who);
1983
1984 /* 2005- multiparty chat */
1985 } else {
1986 gchar *self = sip_uri_self(sipe_private);
1987 struct sip_session *session;
1988
1989 session = sipe_session_add_chat(sipe_private,
1990 NULL,
1991 TRUE,
1992 self);
1993 session->chat_session->backend = sipe_backend_chat_create(SIPE_CORE_PUBLIC,
1994 session->chat_session,
1995 session->chat_session->title,
1996 self);
1997 g_free(self);
1998
1999 sipe_im_invite(sipe_private, session, who,
2000 NULL, NULL, NULL, FALSE);
2001 }
2002 }
2003
2004 void sipe_core_buddy_send_email(struct sipe_core_public *sipe_public,
2005 const gchar *who)
2006 {
2007 sipe_backend_buddy buddy = sipe_backend_buddy_find(sipe_public,
2008 who,
2009 NULL);
2010 gchar *email = sipe_backend_buddy_get_string(sipe_public,
2011 buddy,
2012 SIPE_BUDDY_INFO_EMAIL);
2013
2014 if (email) {
2015 gchar *command_line = g_strdup_printf(
2016 #ifdef _WIN32
2017 "cmd /c start"
2018 #else
2019 "xdg-email"
2020 #endif
2021 " mailto:%s", email);
2022 g_free(email);
2023
2024 SIPE_DEBUG_INFO("sipe_core_buddy_send_email: going to call email client: %s",
2025 command_line);
2026 g_spawn_command_line_async(command_line, NULL);
2027 g_free(command_line);
2028
2029 } else {
2030 SIPE_DEBUG_INFO("sipe_core_buddy_send_email: no email address stored for buddy=%s",
2031 who);
2032 }
2033 }
2034
2035 /* Buddy menu */
2036
2037 static struct sipe_backend_buddy_menu *buddy_menu_phone(struct sipe_core_public *sipe_public,
2038 struct sipe_backend_buddy_menu *menu,
2039 sipe_backend_buddy buddy,
2040 sipe_buddy_info_fields id_phone,
2041 sipe_buddy_info_fields id_display,
2042 const gchar *type)
2043 {
2044 gchar *phone = sipe_backend_buddy_get_string(sipe_public,
2045 buddy,
2046 id_phone);
2047 if (phone) {
2048 gchar *display = sipe_backend_buddy_get_string(sipe_public,
2049 buddy,
2050 id_display);
2051 gchar *tmp = NULL;
2052 gchar *label = g_strdup_printf("%s %s",
2053 type,
2054 display ? display :
2055 (tmp = sip_tel_uri_denormalize(phone)));
2056 menu = sipe_backend_buddy_menu_add(sipe_public,
2057 menu,
2058 label,
2059 SIPE_BUDDY_MENU_MAKE_CALL,
2060 phone);
2061 g_free(tmp);
2062 g_free(label);
2063 g_free(display);
2064 g_free(phone);
2065 }
2066
2067 return(menu);
2068 }
2069
2070 struct sipe_backend_buddy_menu *sipe_core_buddy_create_menu(struct sipe_core_public *sipe_public,
2071 const gchar *buddy_name,
2072 struct sipe_backend_buddy_menu *menu)
2073 {
2074 struct sipe_core_private *sipe_private = SIPE_CORE_PRIVATE;
2075 sipe_backend_buddy buddy = sipe_backend_buddy_find(sipe_public,
2076 buddy_name,
2077 NULL);
2078 gchar *self = sip_uri_self(sipe_private);
2079
2080 SIPE_SESSION_FOREACH {
2081 if (!sipe_strcase_equal(self, buddy_name) && session->chat_session)
2082 {
2083 struct sipe_chat_session *chat_session = session->chat_session;
2084 gboolean is_conf = (chat_session->type == SIPE_CHAT_TYPE_CONFERENCE);
2085
2086 if (sipe_backend_chat_find(chat_session->backend, buddy_name))
2087 {
2088 gboolean conf_op = sipe_backend_chat_is_operator(chat_session->backend, self);
2089
2090 if (is_conf &&
2091 /* Not conf OP */
2092 !sipe_backend_chat_is_operator(chat_session->backend, buddy_name) &&
2093 /* We are a conf OP */
2094 conf_op) {
2095 gchar *label = g_strdup_printf(_("Make leader of '%s'"),
2096 chat_session->title);
2097 menu = sipe_backend_buddy_menu_add(sipe_public,
2098 menu,
2099 label,
2100 SIPE_BUDDY_MENU_MAKE_CHAT_LEADER,
2101 chat_session);
2102 g_free(label);
2103 }
2104
2105 if (is_conf &&
2106 /* We are a conf OP */
2107 conf_op) {
2108 gchar *label = g_strdup_printf(_("Remove from '%s'"),
2109 chat_session->title);
2110 menu = sipe_backend_buddy_menu_add(sipe_public,
2111 menu,
2112 label,
2113 SIPE_BUDDY_MENU_REMOVE_FROM_CHAT,
2114 chat_session);
2115 g_free(label);
2116 }
2117 }
2118 else
2119 {
2120 if (!is_conf ||
2121 (is_conf && !session->locked)) {
2122 gchar *label = g_strdup_printf(_("Invite to '%s'"),
2123 chat_session->title);
2124 menu = sipe_backend_buddy_menu_add(sipe_public,
2125 menu,
2126 label,
2127 SIPE_BUDDY_MENU_INVITE_TO_CHAT,
2128 chat_session);
2129 g_free(label);
2130 }
2131 }
2132 }
2133 } SIPE_SESSION_FOREACH_END;
2134 g_free(self);
2135
2136 menu = sipe_backend_buddy_menu_add(sipe_public,
2137 menu,
2138 _("New chat"),
2139 SIPE_BUDDY_MENU_NEW_CHAT,
2140 NULL);
2141
2142 /* add buddy's phone numbers if we have call control */
2143 if (sip_csta_is_idle(sipe_private)) {
2144
2145 /* work phone */
2146 menu = buddy_menu_phone(sipe_public,
2147 menu,
2148 buddy,
2149 SIPE_BUDDY_INFO_WORK_PHONE,
2150 SIPE_BUDDY_INFO_WORK_PHONE_DISPLAY,
2151 _("Work"));
2152 /* mobile phone */
2153 menu = buddy_menu_phone(sipe_public,
2154 menu,
2155 buddy,
2156 SIPE_BUDDY_INFO_MOBILE_PHONE,
2157 SIPE_BUDDY_INFO_MOBILE_PHONE_DISPLAY,
2158 _("Mobile"));
2159
2160 /* home phone */
2161 menu = buddy_menu_phone(sipe_public,
2162 menu,
2163 buddy,
2164 SIPE_BUDDY_INFO_HOME_PHONE,
2165 SIPE_BUDDY_INFO_HOME_PHONE_DISPLAY,
2166 _("Home"));
2167
2168 /* other phone */
2169 menu = buddy_menu_phone(sipe_public,
2170 menu,
2171 buddy,
2172 SIPE_BUDDY_INFO_OTHER_PHONE,
2173 SIPE_BUDDY_INFO_OTHER_PHONE_DISPLAY,
2174 _("Other"));
2175
2176 /* custom1 phone */
2177 menu = buddy_menu_phone(sipe_public,
2178 menu,
2179 buddy,
2180 SIPE_BUDDY_INFO_CUSTOM1_PHONE,
2181 SIPE_BUDDY_INFO_CUSTOM1_PHONE_DISPLAY,
2182 _("Custom1"));
2183 }
2184
2185 {
2186 gchar *email = sipe_backend_buddy_get_string(sipe_public,
2187 buddy,
2188 SIPE_BUDDY_INFO_EMAIL);
2189 if (email) {
2190 menu = sipe_backend_buddy_menu_add(sipe_public,
2191 menu,
2192 _("Send email..."),
2193 SIPE_BUDDY_MENU_SEND_EMAIL,
2194 NULL);
2195 g_free(email);
2196 }
2197 }
2198
2199 /* access level control */
2200 if (SIPE_CORE_PRIVATE_FLAG_IS(OCS2007))
2201 menu = sipe_backend_buddy_sub_menu_add(sipe_public,
2202 menu,
2203 _("Access level"),
2204 sipe_ocs2007_access_control_menu(sipe_private,
2205 buddy_name));
2206
2207 return(menu);
2208 }
2209
2210 guint sipe_buddy_count(struct sipe_core_private *sipe_private)
2211 {
2212 return(g_hash_table_size(sipe_private->buddies->uri));
2213 }
2214
2215 static guint sipe_ht_hash_nick(const char *nick)
2216 {
2217 char *lc = g_utf8_strdown(nick, -1);
2218 guint bucket = g_str_hash(lc);
2219 g_free(lc);
2220
2221 return bucket;
2222 }
2223
2224 static gboolean sipe_ht_equals_nick(const char *nick1, const char *nick2)
2225 {
2226 char *nick1_norm = NULL;
2227 char *nick2_norm = NULL;
2228 gboolean equal;
2229
2230 if (nick1 == NULL && nick2 == NULL) return TRUE;
2231 if (nick1 == NULL || nick2 == NULL ||
2232 !g_utf8_validate(nick1, -1, NULL) ||
2233 !g_utf8_validate(nick2, -1, NULL)) return FALSE;
2234
2235 nick1_norm = g_utf8_casefold(nick1, -1);
2236 nick2_norm = g_utf8_casefold(nick2, -1);
2237 equal = g_utf8_collate(nick1_norm, nick2_norm) == 0;
2238 g_free(nick2_norm);
2239 g_free(nick1_norm);
2240
2241 return equal;
2242 }
2243
2244 void sipe_buddy_init(struct sipe_core_private *sipe_private)
2245 {
2246 struct sipe_buddies *buddies = g_new0(struct sipe_buddies, 1);
2247 buddies->uri = g_hash_table_new((GHashFunc) sipe_ht_hash_nick,
2248 (GEqualFunc) sipe_ht_equals_nick);
2249 buddies->exchange_key = g_hash_table_new(g_str_hash,
2250 g_str_equal);
2251 sipe_private->buddies = buddies;
2252 }
2253
2254 /*
2255 Local Variables:
2256 mode: c
2257 c-file-style: "bsd"
2258 indent-tabs-mode: t
2259 tab-width: 8
2260 End:
2261 */
A third-party Pidgin plugin for Microsoft LCS/OCS