friend.c 58.3 KB
Newer Older
aymeric's avatar
aymeric committed
1 2 3 4
/***************************************************************************
 *            friend.c
 *
 *  Sat May 15 15:25:16 2004
5
 *  Copyright  2004-2009  Simon Morlat
aymeric's avatar
aymeric committed
6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
 *  Email
 ****************************************************************************/

/*
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU Library General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

25 26
#include "linphone/core.h"
#include "linphone/lpconfig.h"
aymeric's avatar
aymeric committed
27

28
#ifdef SQLITE_STORAGE_ENABLED
29 30 31 32 33 34
	#ifndef _WIN32
		#if !defined(__ANDROID__) && !defined(__QNXNTO__)
			#include <langinfo.h>
			#include <iconv.h>
			#include <string.h>
	#endif
35
#else
36
	#include <Windows.h>
37 38 39
#endif

#define MAX_PATH_SIZE 1024
40
	#include "sqlite3.h"
41 42
#endif

43 44
#include "c-wrapper/c-wrapper.h"

45
using namespace std;
46
using namespace LinphonePrivate;
47

aymeric's avatar
aymeric committed
48 49 50
const char *linphone_online_status_to_string(LinphoneOnlineStatus ss){
	const char *str=NULL;
	switch(ss){
51
		case LinphoneStatusOnline:
52
		str="Online";
aymeric's avatar
aymeric committed
53
		break;
54
		case LinphoneStatusBusy:
55
		str="Busy";
aymeric's avatar
aymeric committed
56
		break;
57
		case LinphoneStatusBeRightBack:
58
		str="Be right back";
aymeric's avatar
aymeric committed
59
		break;
60
		case LinphoneStatusAway:
61
		str="Away";
aymeric's avatar
aymeric committed
62
		break;
63
		case LinphoneStatusOnThePhone:
64
		str="On the phone";
aymeric's avatar
aymeric committed
65
		break;
66
		case LinphoneStatusOutToLunch:
67
		str="Out to lunch";
aymeric's avatar
aymeric committed
68
		break;
69
		case LinphoneStatusDoNotDisturb:
70
		str="Do not disturb";
aymeric's avatar
aymeric committed
71
		break;
72
		case LinphoneStatusMoved:
73
		str="Moved";
aymeric's avatar
aymeric committed
74
		break;
75
		case LinphoneStatusAltService:
76
		str="Using another messaging service";
aymeric's avatar
aymeric committed
77
		break;
78
		case LinphoneStatusOffline:
79
		str="Offline";
aymeric's avatar
aymeric committed
80
		break;
81
		case LinphoneStatusPending:
82
		str="Pending";
aymeric's avatar
aymeric committed
83
		break;
84
		case LinphoneStatusVacation:
85
		str="Vacation";
François Grisez's avatar
François Grisez committed
86
		break;
aymeric's avatar
aymeric committed
87
		default:
88
		str="Unknown status";
aymeric's avatar
aymeric committed
89 90 91 92
	}
	return str;
}

93 94 95
static int friend_compare(const void * a, const void * b) {
	LinphoneFriend *lfa = (LinphoneFriend *)a;
	LinphoneFriend *lfb = (LinphoneFriend *)b;
96 97 98 99
	const bctbx_list_t *addressesa = linphone_friend_get_addresses(lfa);
	const bctbx_list_t *addressesb = linphone_friend_get_addresses(lfb);
	bctbx_list_t *iteratora = (bctbx_list_t *)addressesa;
	bctbx_list_t *iteratorb = (bctbx_list_t *)addressesb;
100 101 102 103 104 105 106 107 108 109 110 111 112
	int ret = 1;

	while (iteratora && (ret == 1)) {
		LinphoneAddress *fa = (LinphoneAddress *)bctbx_list_get_data(iteratora);
		while (iteratorb && (ret == 1)) {
			LinphoneAddress *fb = (LinphoneAddress *)bctbx_list_get_data(iteratorb);
			if (linphone_address_weak_equal(fa, fb)) ret = 0;
			iteratorb = bctbx_list_next(iteratorb);
		}
		iteratora = bctbx_list_next(iteratora);
	}

	return ret;
aymeric's avatar
aymeric committed
113 114
}

115
static LinphoneFriendPresence * find_presence_model_for_uri_or_tel(const LinphoneFriend *lf, const char *uri_or_tel) {
116 117
	bctbx_list_t *iterator = NULL;
	LinphoneAddress *uri_or_tel_addr = NULL;
118
	LinphoneFriendPresence *result=NULL;
119 120 121 122
	if (!lf->lc) {
		ms_warning("Cannot find uri of tel [%s] from friend [%p] because not associated to any Linphone core object",uri_or_tel,lf);
		return NULL;
	}
123 124 125 126
	if ((iterator = lf->presence_models) == NULL) {
		/*no need to move forward, just reutn to avoid useless uri parsing*/
		return NULL;
	};
127

128 129
	uri_or_tel_addr = linphone_core_interpret_url(lf->lc, uri_or_tel);

130
	while (uri_or_tel_addr && iterator) {
131
		LinphoneFriendPresence *lfp = (LinphoneFriendPresence *)bctbx_list_get_data(iterator);
132 133 134 135 136 137 138 139 140
		LinphoneAddress *lfp_addr = linphone_core_interpret_url(lf->lc, lfp->uri_or_tel);
		if (lfp_addr && linphone_address_weak_equal(uri_or_tel_addr, lfp_addr)) {
			result = lfp;
		}
		if (lfp_addr) linphone_address_unref(lfp_addr);
		if (result == NULL)
			iterator = bctbx_list_next(iterator);
		else
			break;
141
	}
142 143
	if (uri_or_tel_addr) linphone_address_unref(uri_or_tel_addr);
	return result;
144 145 146
}

static void add_presence_model_for_uri_or_tel(LinphoneFriend *lf, const char *uri_or_tel, LinphonePresenceModel *presence) {
147
	LinphoneFriendPresence *lfp = ms_new0(LinphoneFriendPresence, 1);
148 149 150 151 152 153 154 155
	lfp->uri_or_tel = ms_strdup(uri_or_tel);
	lfp->presence = presence;
	lf->presence_models = bctbx_list_append(lf->presence_models, lfp);
}

static void free_friend_presence(LinphoneFriendPresence *lfp) {
	ms_free(lfp->uri_or_tel);
	if (lfp->presence) linphone_presence_model_unref(lfp->presence);
156
	ms_free(lfp);
157 158
}

159 160 161
static void free_phone_number_sip_uri(LinphoneFriendPhoneNumberSipUri *lfpnsu) {
	ms_free(lfpnsu->number);
	ms_free(lfpnsu->uri);
162
	ms_free(lfpnsu);
163 164
}

165

aymeric's avatar
aymeric committed
166

167 168
bctbx_list_t *linphone_find_friend_by_address(bctbx_list_t *fl, const LinphoneAddress *addr, LinphoneFriend **lf){
	bctbx_list_t *res=NULL;
aymeric's avatar
aymeric committed
169 170
	LinphoneFriend dummy;
	if (lf!=NULL) *lf=NULL;
171
	memset(&dummy, 0, sizeof(LinphoneFriend));
172
	dummy.uri=(LinphoneAddress*)addr;
173
	res=bctbx_list_find_custom(fl,friend_compare,&dummy);
174
	if (lf!=NULL && res!=NULL) *lf=(LinphoneFriend*)bctbx_list_get_data(res);
aymeric's avatar
aymeric committed
175 176 177 178
	return res;
}

void __linphone_friend_do_subscribe(LinphoneFriend *fr){
Simon Morlat's avatar
Simon Morlat committed
179
	LinphoneCore *lc=fr->lc;
180
	const LinphoneAddress *addr = linphone_friend_get_address(fr);
181

182 183 184 185 186 187 188 189 190
	if (addr != NULL) {
		if (fr->outsub==NULL){
			/* people for which we don't have yet an answer should appear as offline */
			fr->presence_models = bctbx_list_free_with_data(fr->presence_models, (bctbx_list_free_func)free_friend_presence);
			/*
			if (fr->lc->vtable.notify_recv)
				fr->lc->vtable.notify_recv(fr->lc,(LinphoneFriend*)fr);
			*/
		}else{
191
			fr->outsub->release();
192 193
			fr->outsub=NULL;
		}
194
		fr->outsub=new SalPresenceOp(lc->sal);
195
		linphone_configure_op(lc,fr->outsub,addr,NULL,TRUE);
196
		fr->outsub->subscribe(NULL,NULL,lp_config_get_int(lc->config,"sip","subscribe_expires",600));
197 198
		fr->subscribe_active=TRUE;
	}
aymeric's avatar
aymeric committed
199 200
}

201
LinphoneFriend * linphone_friend_new(void){
202 203 204
	LinphoneFriend *obj = belle_sip_object_new(LinphoneFriend);
	obj->pol = LinphoneSPAccept;
	obj->subscribe = TRUE;
205
	obj->vcard = NULL;
206
	obj->storage_id = 0;
207
	return obj;
aymeric's avatar
aymeric committed
208 209
}

210 211 212 213 214 215 216 217
#if __clang__ || ((__GNUC__ == 4 && __GNUC_MINOR__ >= 6) || __GNUC__ > 4)
#pragma GCC diagnostic push
#endif
#ifdef _MSC_VER
#pragma warning(disable : 4996)
#else
#pragma GCC diagnostic ignored "-Wdeprecated-declarations"
#endif
Ghislain MARY's avatar
Ghislain MARY committed
218
LinphoneFriend *linphone_friend_new_with_address(const char *addr){
jehan's avatar
jehan committed
219
	LinphoneAddress* linphone_address = linphone_address_new(addr);
Sylvain Berfini's avatar
Sylvain Berfini committed
220 221
	LinphoneFriend *fr;

jehan's avatar
jehan committed
222 223 224 225
	if (linphone_address == NULL) {
		ms_error("Cannot create friend for address [%s]",addr?addr:"null");
		return NULL;
	}
Sylvain Berfini's avatar
Sylvain Berfini committed
226
	fr=linphone_friend_new();
Ghislain MARY's avatar
Ghislain MARY committed
227
	linphone_friend_set_address(fr,linphone_address);
228
	linphone_address_unref(linphone_address);
aymeric's avatar
aymeric committed
229 230
	return fr;
}
231 232 233
#if __clang__ || ((__GNUC__ == 4 && __GNUC_MINOR__ >= 6) || __GNUC__ > 4)
#pragma GCC diagnostic pop
#endif
aymeric's avatar
aymeric committed
234

Simon Morlat's avatar
Simon Morlat committed
235
void linphone_friend_set_user_data(LinphoneFriend *lf, void *data){
236
	lf->user_data=data;
Simon Morlat's avatar
Simon Morlat committed
237 238 239
}

void* linphone_friend_get_user_data(const LinphoneFriend *lf){
240
	return lf->user_data;
Simon Morlat's avatar
Simon Morlat committed
241 242
}

243 244
bool_t linphone_friend_in_list(const LinphoneFriend *lf) {
	return lf->friend_list != NULL;
245 246
}

smorlat's avatar
smorlat committed
247
void linphone_core_interpret_friend_uri(LinphoneCore *lc, const char *uri, char **result){
248
	LinphoneAddress *fr=NULL;
249
	*result=NULL;
250
	fr=linphone_address_new(uri);
251
	if (fr==NULL){
smorlat's avatar
smorlat committed
252 253
		char *tmp=NULL;
		if (strchr(uri,'@')!=NULL){
254
			LinphoneAddress *u;
smorlat's avatar
smorlat committed
255 256
			/*try adding sip:*/
			tmp=ms_strdup_printf("sip:%s",uri);
257
			u=linphone_address_new(tmp);
258 259 260
			if (u!=NULL){
				*result=tmp;
			}
smorlat's avatar
smorlat committed
261 262
		}else if (lc->default_proxy!=NULL){
			/*try adding domain part from default current proxy*/
263
			LinphoneAddress * id=linphone_address_new(linphone_core_get_identity(lc));
264
			if ((id!=NULL) && (uri[0] != '\0')){
265
				linphone_address_set_display_name(id,NULL);
266 267
				linphone_address_set_username(id,uri);
				*result=linphone_address_as_string(id);
268
				linphone_address_unref(id);
smorlat's avatar
smorlat committed
269 270
			}
		}
271
		if (*result){
smorlat's avatar
smorlat committed
272
			/*looks good */
273 274 275 276
			ms_message("%s interpreted as %s",uri,*result);
		}else{
			ms_warning("Fail to interpret friend uri %s",uri);
		}
jehan's avatar
jehan committed
277 278
	}else {
		*result=linphone_address_as_string(fr);
279
		linphone_address_unref(fr);
jehan's avatar
jehan committed
280
	}
smorlat's avatar
smorlat committed
281
}
aymeric's avatar
aymeric committed
282

283
const LinphoneAddress * linphone_friend_get_address(const LinphoneFriend *lf) {
284 285
	if (linphone_core_vcard_supported()) {
		if (lf->vcard) {
286
			const bctbx_list_t *sip_addresses = linphone_vcard_get_sip_addresses(lf->vcard);
287
			if (sip_addresses) {
288
				LinphoneAddress *addr = (LinphoneAddress *)bctbx_list_nth_data(sip_addresses, 0);
Ghislain MARY's avatar
Ghislain MARY committed
289
				return addr;
290 291 292
			}
		}
		return NULL;
293
	}
294
	if (lf->uri) return lf->uri;
295
	return NULL;
296 297
}

298
LinphoneStatus linphone_friend_set_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
299
	LinphoneAddress *fr = linphone_address_clone(addr);
300
	char *address;
301
	const LinphoneAddress *mAddr = linphone_friend_get_address(lf);
302 303 304 305 306 307 308 309 310
	if(mAddr && lf->friend_list) {
		char *mainAddress = linphone_address_as_string_uri_only(mAddr);
		bctbx_iterator_t *it = bctbx_map_cchar_find_key(lf->friend_list->friends_map_uri, mainAddress);
		if (!bctbx_iterator_cchar_equals(it, bctbx_map_cchar_end(lf->friend_list->friends_map_uri))){
			linphone_friend_unref((LinphoneFriend*)bctbx_pair_cchar_get_second(bctbx_iterator_cchar_get_pair(it)));
			bctbx_map_cchar_erase(lf->friend_list->friends_map_uri, it);
		}
		bctbx_iterator_cchar_delete(it);
	}
311
	linphone_address_clean(fr);
312 313 314 315 316 317
	address = linphone_address_as_string_uri_only(fr);
	if(lf->friend_list) {
		bctbx_pair_t *pair = (bctbx_pair_t*) bctbx_pair_cchar_new(address, linphone_friend_ref(lf));
		bctbx_map_cchar_insert_and_delete(lf->friend_list->friends_map_uri, pair);
	}

318 319
	if (linphone_core_vcard_supported()) {
		if (!lf->vcard) {
Gautier Pelloux-Prayer's avatar
Gautier Pelloux-Prayer committed
320 321
			const char *dpname = linphone_address_get_display_name(fr) ? linphone_address_get_display_name(fr) : linphone_address_get_username(fr);
			linphone_friend_create_vcard(lf, dpname);
322 323 324 325 326 327
		}
		linphone_vcard_edit_main_sip_address(lf->vcard, address);
		linphone_address_unref(fr);
	} else {
		if (lf->uri != NULL) linphone_address_unref(lf->uri);
		lf->uri = fr;
328
	}
329

330
	ms_free(address);
aymeric's avatar
aymeric committed
331 332 333
	return 0;
}

334
void linphone_friend_add_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
335
	LinphoneAddress *fr;
336
	char *uri;
337 338 339 340
	if (!lf || !addr) return;

	fr = linphone_address_clone(addr);
	linphone_address_clean(fr);
341 342 343 344 345
	uri = linphone_address_as_string_uri_only(fr);
	if(lf->friend_list) {
		bctbx_pair_t *pair = (bctbx_pair_t*) bctbx_pair_cchar_new(uri, linphone_friend_ref(lf));
		bctbx_map_cchar_insert_and_delete(lf->friend_list->friends_map_uri, pair);
	}
346

347 348
	if (linphone_core_vcard_supported()) {
		if (lf->vcard) {
349
			linphone_vcard_add_sip_address(lf->vcard, uri);
350 351 352 353 354 355
			linphone_address_unref(fr);
		}
	} else {
		if (lf->uri == NULL) lf->uri = fr;
		else linphone_address_unref(fr);
	}
356
	ms_free(uri);
357 358
}

359
const bctbx_list_t* linphone_friend_get_addresses(const LinphoneFriend *lf) {
360
	if (!lf) return NULL;
361

362
	if (linphone_core_vcard_supported()) {
363
		const bctbx_list_t * addresses = linphone_vcard_get_sip_addresses(lf->vcard);
364
		return addresses;
365
	} else {
366
		bctbx_list_t *addresses = NULL;
367
		return lf->uri ? bctbx_list_append(addresses, lf->uri) : NULL;
368 369 370 371
	}
}

void linphone_friend_remove_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
372
	char *address ;
373
	if (!lf || !addr || !lf->vcard) return;
374

375 376 377 378 379 380 381 382 383 384
	address = linphone_address_as_string_uri_only(addr);
	if(lf->friend_list) {
		bctbx_iterator_t *it = bctbx_map_cchar_find_key(lf->friend_list->friends_map_uri, address);
		if (!bctbx_iterator_cchar_equals(it, bctbx_map_cchar_end(lf->friend_list->friends_map_uri))){
			linphone_friend_unref((LinphoneFriend*)bctbx_pair_cchar_get_second(bctbx_iterator_cchar_get_pair(it)));
			bctbx_map_cchar_erase(lf->friend_list->friends_map_uri, it);
		}
		bctbx_iterator_cchar_delete(it);
	}

385 386
	if (linphone_core_vcard_supported()) {
		linphone_vcard_remove_sip_address(lf->vcard, address);
387
	}
388
	ms_free(address);
389 390 391
}

void linphone_friend_add_phone_number(LinphoneFriend *lf, const char *phone) {
392
	if (!lf || !phone) return;
393

394 395 396 397 398 399 400 401
	if(lf->friend_list) {
		const char *uri = linphone_friend_phone_number_to_sip_uri(lf, phone);
		if(uri) {
			bctbx_pair_t *pair = (bctbx_pair_t*) bctbx_pair_cchar_new(uri, linphone_friend_ref(lf));
			bctbx_map_cchar_insert_and_delete(lf->friend_list->friends_map_uri, pair);
		}
	}

402 403 404 405 406
	if (linphone_core_vcard_supported()) {
		if (!lf->vcard) {
			linphone_friend_create_vcard(lf, phone);
		}
		linphone_vcard_add_phone_number(lf->vcard, phone);
407 408 409
	}
}

410
bctbx_list_t* linphone_friend_get_phone_numbers(LinphoneFriend *lf) {
411
	if (!lf || !lf->vcard) return NULL;
412

413 414
	if (linphone_core_vcard_supported()) {
		return linphone_vcard_get_phone_numbers(lf->vcard);
415
	}
416
	return NULL;
417 418 419
}

void linphone_friend_remove_phone_number(LinphoneFriend *lf, const char *phone) {
420
	if (!lf || !phone || !lf->vcard) return;
421

422 423 424 425 426 427 428 429 430 431 432 433
	if(lf->friend_list) {
		const char *uri = linphone_friend_phone_number_to_sip_uri(lf, phone);
		if(uri) {
			bctbx_iterator_t *it = bctbx_map_cchar_find_key(lf->friend_list->friends_map_uri, uri);
			if (!bctbx_iterator_cchar_equals(it, bctbx_map_cchar_end(lf->friend_list->friends_map_uri))){
				linphone_friend_unref((LinphoneFriend*)bctbx_pair_cchar_get_second(bctbx_iterator_cchar_get_pair(it)));
				bctbx_map_cchar_erase(lf->friend_list->friends_map_uri, it);
			}
			bctbx_iterator_cchar_delete(it);
		}
	}

434 435
	if (linphone_core_vcard_supported()) {
		linphone_vcard_remove_phone_number(lf->vcard, phone);
436 437 438
	}
}

439
LinphoneStatus linphone_friend_set_name(LinphoneFriend *lf, const char *name){
440 441 442 443 444 445 446
	if (linphone_core_vcard_supported()) {
		if (!lf->vcard) linphone_friend_create_vcard(lf, name);
		linphone_vcard_set_full_name(lf->vcard, name);
	} else {
		if (!lf->uri) {
			ms_warning("linphone_friend_set_address() must be called before linphone_friend_set_name() to be able to set display name.");
			return -1;
447
		}
448
		linphone_address_set_display_name(lf->uri, name);
449
	}
aymeric's avatar
aymeric committed
450 451 452
	return 0;
}

453
LinphoneStatus linphone_friend_enable_subscribes(LinphoneFriend *fr, bool_t val){
aymeric's avatar
aymeric committed
454 455 456 457
	fr->subscribe=val;
	return 0;
}

458
LinphoneStatus linphone_friend_set_inc_subscribe_policy(LinphoneFriend *fr, LinphoneSubscribePolicy pol) {
aymeric's avatar
aymeric committed
459 460 461 462
	fr->pol=pol;
	return 0;
}

463
void linphone_friend_notify(LinphoneFriend *lf, LinphonePresenceModel *presence){
464
	bctbx_list_t *elem;
465
	if (lf->insubs){
466
		const LinphoneAddress *addr = linphone_friend_get_address(lf);
467 468 469 470 471
		if (addr) {
			char *addr_str = linphone_address_as_string(addr);
			ms_message("Want to notify %s", addr_str);
			ms_free(addr_str);
		}
472
	}
473
	for(elem=lf->insubs; elem!=NULL; elem=bctbx_list_next(elem)){
474 475
		auto op = reinterpret_cast<SalPresenceOp *>(bctbx_list_get_data(elem));
		op->notify_presence((SalPresenceModel *)presence);
aymeric's avatar
aymeric committed
476 477 478
	}
}

479
void linphone_friend_add_incoming_subscription(LinphoneFriend *lf, SalOp *op){
480
	/*ownership of the op is transfered from sal to the LinphoneFriend*/
481
	lf->insubs = bctbx_list_append(lf->insubs, op);
482 483 484
}

void linphone_friend_remove_incoming_subscription(LinphoneFriend *lf, SalOp *op){
485
	if (bctbx_list_find(lf->insubs, op)){
486
		op->release();
487
		lf->insubs = bctbx_list_remove(lf->insubs, op);
488
	}
489 490
}

aymeric's avatar
aymeric committed
491
static void linphone_friend_unsubscribe(LinphoneFriend *lf){
492
	if (lf->outsub!=NULL) {
493
		lf->outsub->unsubscribe();
aymeric's avatar
aymeric committed
494
	}
495 496
	/* for friend list there is no necessary outsub*/
	lf->subscribe_active=FALSE;
aymeric's avatar
aymeric committed
497 498
}

499
void linphone_friend_invalidate_subscription(LinphoneFriend *lf){
500
	bctbx_list_t *iterator;
501 502
	LinphoneCore *lc=lf->lc;

Simon Morlat's avatar
Simon Morlat committed
503
	if (lf->outsub!=NULL) {
504
		lf->outsub->release();
Simon Morlat's avatar
Simon Morlat committed
505 506
		lf->outsub=NULL;
	}
507

508 509 510
	// To resend a subscribe on the next network_reachable(TRUE)
	lf->subscribe_active=FALSE;

511
	/* Notify application that we no longer know the presence activity */
512 513 514 515
	iterator = lf->presence_models;
	while (iterator) {
		LinphoneFriendPresence *lfp = (LinphoneFriendPresence *)bctbx_list_get_data(iterator);
		linphone_presence_model_unref(lfp->presence);
516 517
		lfp->presence = linphone_presence_model_new();
		linphone_presence_model_set_basic_status(lfp->presence, LinphonePresenceBasicStatusClosed);
518 519
		linphone_core_notify_notify_presence_received_for_uri_or_tel(lc, lf, lfp->uri_or_tel, lfp->presence);
		iterator = bctbx_list_next(iterator);
520
	}
521 522
	if (bctbx_list_size(lf->presence_models) > 0)
		linphone_core_notify_notify_presence_received(lc, lf);
523

524
	lf->initial_subscribes_sent=FALSE;
Simon Morlat's avatar
Simon Morlat committed
525 526
}

527 528 529 530 531 532 533 534
static void close_presence_notification(SalPresenceOp *op) {
    op->notify_presence_close();
}

static void release_sal_op(SalOp *op) {
    op->release();
}

535
static void linphone_friend_close_incoming_subscriptions(LinphoneFriend *lf) {
536 537
	bctbx_list_for_each(lf->insubs, (MSIterateFunc) close_presence_notification);
	lf->insubs = bctbx_list_free_with_data(lf->insubs, (MSIterateFunc)release_sal_op);
538 539
}

540 541 542 543 544
void linphone_friend_close_subscriptions(LinphoneFriend *lf){
	linphone_friend_unsubscribe(lf);
	linphone_friend_close_incoming_subscriptions(lf);
}

545
static void _linphone_friend_release_ops(LinphoneFriend *lf){
546
	lf->insubs = bctbx_list_free_with_data(lf->insubs, (MSIterateFunc) release_sal_op);
547
	if (lf->outsub){
548
		lf->outsub->release();
549 550
		lf->outsub=NULL;
	}
551 552 553 554
}

static void _linphone_friend_destroy(LinphoneFriend *lf){
	_linphone_friend_release_ops(lf);
555
	if (lf->presence_models) bctbx_list_free_with_data(lf->presence_models, (bctbx_list_free_func)free_friend_presence);
556
	if (lf->phone_number_sip_uri_map) bctbx_list_free_with_data(lf->phone_number_sip_uri_map, (bctbx_list_free_func)free_phone_number_sip_uri);
557
	if (lf->uri!=NULL) linphone_address_unref(lf->uri);
558
	if (lf->info!=NULL) buddy_info_free(lf->info);
559
	if (lf->vcard != NULL) linphone_vcard_unref(lf->vcard);
Sylvain Berfini's avatar
Sylvain Berfini committed
560
	if (lf->refkey != NULL) ms_free(lf->refkey);
aymeric's avatar
aymeric committed
561 562
}

563 564 565 566 567 568 569 570 571 572 573
static belle_sip_error_code _linphone_friend_marshall(belle_sip_object_t *obj, char* buff, size_t buff_size, size_t *offset) {
	LinphoneFriend *lf = (LinphoneFriend*)obj;
	belle_sip_error_code err = BELLE_SIP_OK;
	if (lf->uri){
		char *tmp = linphone_address_as_string(lf->uri);
		err = belle_sip_snprintf(buff, buff_size, offset, "%s", tmp);
		ms_free(tmp);
	}
	return err;
}

574
const char * linphone_friend_get_name(const LinphoneFriend *lf) {
575 576 577 578 579 580
	if (!lf) return NULL;

	if (linphone_core_vcard_supported()) {
		if (lf->vcard) return linphone_vcard_get_full_name(lf->vcard);
	} else if (lf->uri) {
		return linphone_address_get_display_name(lf->uri);
581 582
	}
	return NULL;
583 584
}

aymeric's avatar
aymeric committed
585 586 587 588 589 590 591 592 593
bool_t linphone_friend_get_send_subscribe(const LinphoneFriend *lf){
	return lf->subscribe;
}

LinphoneSubscribePolicy linphone_friend_get_inc_subscribe_policy(const LinphoneFriend *lf){
	return lf->pol;
}

LinphoneOnlineStatus linphone_friend_get_status(const LinphoneFriend *lf){
594
	const LinphonePresenceModel *presence = linphone_friend_get_presence_model(lf);
595 596
	LinphoneOnlineStatus online_status = LinphoneStatusOffline;
	LinphonePresenceBasicStatus basic_status = LinphonePresenceBasicStatusClosed;
597
	LinphonePresenceActivity *activity = NULL;
598
	const char *description = NULL;
599 600
	unsigned int nb_activities = 0;

601 602 603
	if (presence != NULL) {
		basic_status = linphone_presence_model_get_basic_status(presence);
		nb_activities = linphone_presence_model_get_nb_activities(presence);
604 605 606
		online_status = (basic_status == LinphonePresenceBasicStatusOpen) ? LinphoneStatusOnline : LinphoneStatusOffline;
		if (nb_activities > 1) {
			char *tmp = NULL;
607
			const LinphoneAddress *addr = linphone_friend_get_address(lf);
608 609
			if (addr) tmp = linphone_address_as_string(addr);
			ms_warning("Friend %s has several activities, get status from the first one", tmp ? tmp : "unknown");
610 611 612
			if (tmp) {
				ms_free(tmp);
			}
613 614 615
			nb_activities = 1;
		}
		if (nb_activities == 1) {
616
			activity = linphone_presence_model_get_activity(presence);
617
			description = linphone_presence_activity_get_description(activity);
618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643
			switch (linphone_presence_activity_get_type(activity)) {
				case LinphonePresenceActivityBreakfast:
				case LinphonePresenceActivityDinner:
				case LinphonePresenceActivityLunch:
				case LinphonePresenceActivityMeal:
					online_status = LinphoneStatusOutToLunch;
					break;
				case LinphonePresenceActivityAppointment:
				case LinphonePresenceActivityMeeting:
				case LinphonePresenceActivityPerformance:
				case LinphonePresenceActivityPresentation:
				case LinphonePresenceActivitySpectator:
				case LinphonePresenceActivityWorking:
				case LinphonePresenceActivityWorship:
					online_status = LinphoneStatusDoNotDisturb;
					break;
				case LinphonePresenceActivityAway:
				case LinphonePresenceActivitySleeping:
					online_status = LinphoneStatusAway;
					break;
				case LinphonePresenceActivityHoliday:
				case LinphonePresenceActivityTravel:
				case LinphonePresenceActivityVacation:
					online_status = LinphoneStatusVacation;
					break;
				case LinphonePresenceActivityBusy:
644 645 646 647 648 649
					if (description && strcmp(description, "Do not disturb") == 0) { // See linphonecore.c linphone_core_set_presence_info() method
						online_status = LinphoneStatusDoNotDisturb;
					} else {
						online_status = LinphoneStatusBusy;
					}
					break;
650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669
				case LinphonePresenceActivityLookingForWork:
				case LinphonePresenceActivityPlaying:
				case LinphonePresenceActivityShopping:
				case LinphonePresenceActivityTV:
					online_status = LinphoneStatusBusy;
					break;
				case LinphonePresenceActivityInTransit:
				case LinphonePresenceActivitySteering:
					online_status = LinphoneStatusBeRightBack;
					break;
				case LinphonePresenceActivityOnThePhone:
					online_status = LinphoneStatusOnThePhone;
					break;
				case LinphonePresenceActivityOther:
				case LinphonePresenceActivityPermanentAbsence:
					online_status = LinphoneStatusMoved;
					break;
				case LinphonePresenceActivityUnknown:
					/* Rely on the basic status information. */
					break;
670 671 672 673 674 675 676
			}
		}
	}

	return online_status;
}

677 678
const LinphonePresenceModel * linphone_friend_get_presence_model(const LinphoneFriend *lf) {
	const LinphonePresenceModel *presence = NULL;
679 680
	LinphoneFriend* const_lf = (LinphoneFriend*)lf;
	const bctbx_list_t* addrs = linphone_friend_get_addresses(const_lf);
681
	bctbx_list_t* phones = NULL;
682
	bctbx_list_t *it;
683

684
	for (it = (bctbx_list_t *)addrs; it!= NULL; it = it->next) {
685
		LinphoneAddress *addr = (LinphoneAddress*)it->data;
686
		char *uri = linphone_address_as_string_uri_only(addr);
687
		presence = linphone_friend_get_presence_model_for_uri_or_tel(const_lf, uri);
688
		ms_free(uri);
689
		if (presence) break;
690
	}
691
	if (presence) return presence;
692

693
	phones = linphone_friend_get_phone_numbers(const_lf);
694
	for (it = phones; it!= NULL; it = it->next) {
Ghislain MARY's avatar
Ghislain MARY committed
695
		presence = linphone_friend_get_presence_model_for_uri_or_tel(const_lf, reinterpret_cast<const char *>(it->data));
696
		if (presence) break;
697
	}
698 699
	bctbx_list_free(phones);
	return presence;
700 701
}

702 703 704 705 706 707
LinphoneConsolidatedPresence linphone_friend_get_consolidated_presence(const LinphoneFriend *lf) {
	const LinphonePresenceModel *model = linphone_friend_get_presence_model(lf);
	if (!model) return LinphoneConsolidatedPresenceOffline;
	return linphone_presence_model_get_consolidated_presence(model);
}

708 709 710 711
const LinphonePresenceModel * linphone_friend_get_presence_model_for_uri_or_tel(const LinphoneFriend *lf, const char *uri_or_tel) {
	LinphoneFriendPresence *lfp = find_presence_model_for_uri_or_tel(lf, uri_or_tel);
	if (lfp) return lfp->presence;
	return NULL;
712 713
}

714
void linphone_friend_set_presence_model(LinphoneFriend *lf, LinphonePresenceModel *presence) {
715
	const LinphoneAddress *addr = linphone_friend_get_address(lf);
716 717 718 719 720 721 722 723 724 725 726 727 728 729
	if (addr) {
		char *uri = linphone_address_as_string_uri_only(addr);
		linphone_friend_set_presence_model_for_uri_or_tel(lf, uri, presence);
		ms_free(uri);
	}
}

void linphone_friend_set_presence_model_for_uri_or_tel(LinphoneFriend *lf, const char *uri_or_tel, LinphonePresenceModel *presence) {
	LinphoneFriendPresence *lfp = find_presence_model_for_uri_or_tel(lf, uri_or_tel);
	if (lfp) {
		if (lfp->presence) linphone_presence_model_unref(lfp->presence);
		lfp->presence = presence;
	} else {
		add_presence_model_for_uri_or_tel(lf, uri_or_tel, presence);
730 731 732
	}
}

733 734 735 736
bool_t linphone_friend_is_presence_received(const LinphoneFriend *lf) {
	return lf->presence_received;
}

737 738 739
BuddyInfo * linphone_friend_get_info(const LinphoneFriend *lf){
	return lf->info;
}
aymeric's avatar
aymeric committed
740

741
/*
742
 * updates the p2p subscriptions.
743 744 745 746
 * If only_when_registered is TRUE, subscribe will be sent only if the friend's corresponding proxy config is in registered.
 * Otherwise if the proxy config goes to unregistered state, the subscription refresh will be suspended.
 * An optional proxy whose state has changed can be passed to optimize the processing.
**/
747
void linphone_friend_update_subscribes(LinphoneFriend *fr, bool_t only_when_registered){
748
	int can_subscribe=1;
749

750
	if (only_when_registered && (fr->subscribe || fr->subscribe_active)){
751
		const LinphoneAddress *addr = linphone_friend_get_address(fr);
752 753 754 755 756 757 758 759 760
		if (addr != NULL) {
			LinphoneProxyConfig *cfg=linphone_core_lookup_known_proxy(fr->lc, addr);
			if (cfg && cfg->state!=LinphoneRegistrationOk){
				char *tmp=linphone_address_as_string(addr);
				ms_message("Friend [%s] belongs to proxy config with identity [%s], but this one isn't registered. Subscription is suspended.",
					tmp,linphone_proxy_config_get_identity(cfg));
				ms_free(tmp);
				can_subscribe=0;
			}
761 762 763 764 765 766 767 768 769
		}
	}
	if (can_subscribe && fr->subscribe && fr->subscribe_active==FALSE){
		ms_message("Sending a new SUBSCRIBE");
		__linphone_friend_do_subscribe(fr);
	}else if (can_subscribe && fr->subscribe_active && !fr->subscribe){
		linphone_friend_unsubscribe(fr);
	}else if (!can_subscribe && fr->outsub){
		fr->subscribe_active=FALSE;
770
		fr->outsub->stop_refreshing();
771 772 773
	}
}

774
void linphone_friend_save(LinphoneFriend *fr, LinphoneCore *lc) {
775
	if (!lc) return;
776
#ifdef SQLITE_STORAGE_ENABLED
777 778 779 780 781
	if (lc->friends_db_file) {
		linphone_core_store_friend_in_db(lc, fr);
	} else {
		linphone_core_write_friends_config(lc);
	}
782
#else
783
	linphone_core_write_friends_config(lc);
784
#endif
785 786 787
}

void linphone_friend_apply(LinphoneFriend *fr, LinphoneCore *lc) {
788
	LinphonePresenceModel *model;
789
	const LinphoneAddress *addr = linphone_friend_get_address(fr);
790

791
	if (!addr) {
792
		ms_debug("No sip url defined in friend %s", linphone_friend_get_name(fr));
aymeric's avatar
aymeric committed
793 794
		return;
	}
795 796 797 798 799
	if (!linphone_core_ready(lc)) {
		/* lc not ready, deffering subscription */
		fr->commit=TRUE;
		return;
	}
jehan's avatar
jehan committed
800

801 802
	if (fr->inc_subscribe_pending) {
		switch(fr->pol) {
aymeric's avatar
aymeric committed
803
			case LinphoneSPWait:
804
				model = linphone_presence_model_new_with_activity(LinphonePresenceActivityOther, "Waiting for user acceptance");
805
				linphone_friend_notify(fr, model);
806
				linphone_presence_model_unref(model);
aymeric's avatar
aymeric committed
807 808
				break;
			case LinphoneSPAccept:
809 810
				if (fr->lc)
					linphone_friend_notify(fr, fr->lc->presence_model);
aymeric's avatar
aymeric committed
811 812
				break;
			case LinphoneSPDeny:
813
				linphone_friend_notify(fr, NULL);
aymeric's avatar
aymeric committed
814 815
				break;
		}
816 817
		fr->inc_subscribe_pending = FALSE;
	}
818

819 820 821
	if (fr->pol == LinphoneSPDeny && fr->insubs) {
		linphone_friend_close_incoming_subscriptions(fr);
	}
822

823 824
	linphone_friend_update_subscribes(fr, linphone_core_should_subscribe_friends_only_when_registered(lc));

825
	ms_debug("linphone_friend_apply() done.");
826
	lc->bl_refresh=TRUE;
827
	fr->commit=FALSE;
aymeric's avatar
aymeric committed
828 829
}

830
void linphone_friend_edit(LinphoneFriend *fr) {
831
	if (fr && linphone_core_vcard_supported() && fr->vcard) {
832 833
		linphone_vcard_compute_md5_hash(fr->vcard);
	}
aymeric's avatar
aymeric committed
834 835
}