friend.c 52.8 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 25 26 27 28
 *  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.
 */

#include "linphonecore.h"
#include "private.h"
#include "lpconfig.h"

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

#define MAX_PATH_SIZE 1024
#include "sqlite3.h"
#endif

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

88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114
static int friend_compare(const void * a, const void * b) {
	LinphoneFriend *lfa = (LinphoneFriend *)a;
	LinphoneFriend *lfb = (LinphoneFriend *)b;
	bctbx_list_t *addressesa = linphone_friend_get_addresses(lfa);
	bctbx_list_t *addressesb = linphone_friend_get_addresses(lfb);
	bctbx_list_t *iteratora = addressesa;
	bctbx_list_t *iteratorb = addressesb;
	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);
	}

	if (addressesa) {
		bctbx_list_free_with_data(addressesa, (bctbx_list_free_func)linphone_address_unref);
	}
	if (addressesb) {
		bctbx_list_free_with_data(addressesb, (bctbx_list_free_func)linphone_address_unref);
	}

	return ret;
aymeric's avatar
aymeric committed
115 116
}

117 118 119 120 121 122 123 124 125 126 127
static LinphoneFriendPresence * find_presence_model_for_uri_or_tel(const LinphoneFriend *lf, const char *uri_or_tel) {
	bctbx_list_t *iterator = lf->presence_models;
	while (iterator) {
		LinphoneFriendPresence *lfp = (LinphoneFriendPresence *)bctbx_list_get_data(iterator);
		if (strcmp(lfp->uri_or_tel, uri_or_tel) == 0) return lfp;
		iterator = bctbx_list_next(iterator);
	}
	return NULL;
}

static void add_presence_model_for_uri_or_tel(LinphoneFriend *lf, const char *uri_or_tel, LinphonePresenceModel *presence) {
128
	LinphoneFriendPresence *lfp = ms_new0(LinphoneFriendPresence, 1);
129 130 131 132 133 134 135 136
	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);
137
	ms_free(lfp);
138 139
}

140 141 142
static void free_phone_number_sip_uri(LinphoneFriendPhoneNumberSipUri *lfpnsu) {
	ms_free(lfpnsu->number);
	ms_free(lfpnsu->uri);
143
	ms_free(lfpnsu);
144 145
}

146

aymeric's avatar
aymeric committed
147

148 149
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
150 151
	LinphoneFriend dummy;
	if (lf!=NULL) *lf=NULL;
152
	memset(&dummy, 0, sizeof(LinphoneFriend));
153
	dummy.uri=(LinphoneAddress*)addr;
154
	res=bctbx_list_find_custom(fl,friend_compare,&dummy);
155
	if (lf!=NULL && res!=NULL) *lf=(LinphoneFriend*)bctbx_list_get_data(res);
aymeric's avatar
aymeric committed
156 157 158 159
	return res;
}

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

163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179
	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{
			sal_op_release(fr->outsub);
			fr->outsub=NULL;
		}
		fr->outsub=sal_op_new(lc->sal);
		linphone_configure_op(lc,fr->outsub,addr,NULL,TRUE);
		sal_subscribe_presence(fr->outsub,NULL,NULL,lp_config_get_int(lc->config,"sip","subscribe_expires",600));
		fr->subscribe_active=TRUE;
	}
aymeric's avatar
aymeric committed
180 181
}

182
LinphoneFriend * linphone_friend_new(void){
183 184 185
	LinphoneFriend *obj = belle_sip_object_new(LinphoneFriend);
	obj->pol = LinphoneSPAccept;
	obj->subscribe = TRUE;
186
	obj->vcard = NULL;
187
	obj->storage_id = 0;
188
	return obj;
aymeric's avatar
aymeric committed
189 190
}

191 192 193 194 195 196 197 198
#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
199
LinphoneFriend *linphone_friend_new_with_address(const char *addr){
jehan's avatar
jehan committed
200
	LinphoneAddress* linphone_address = linphone_address_new(addr);
Sylvain Berfini's avatar
Sylvain Berfini committed
201 202
	LinphoneFriend *fr;

jehan's avatar
jehan committed
203 204 205 206
	if (linphone_address == NULL) {
		ms_error("Cannot create friend for address [%s]",addr?addr:"null");
		return NULL;
	}
Sylvain Berfini's avatar
Sylvain Berfini committed
207
	fr=linphone_friend_new();
Ghislain MARY's avatar
Ghislain MARY committed
208
	linphone_friend_set_address(fr,linphone_address);
209
	linphone_address_unref(linphone_address);
aymeric's avatar
aymeric committed
210 211
	return fr;
}
212 213 214
#if __clang__ || ((__GNUC__ == 4 && __GNUC_MINOR__ >= 6) || __GNUC__ > 4)
#pragma GCC diagnostic pop
#endif
aymeric's avatar
aymeric committed
215

Simon Morlat's avatar
Simon Morlat committed
216
void linphone_friend_set_user_data(LinphoneFriend *lf, void *data){
217
	lf->user_data=data;
Simon Morlat's avatar
Simon Morlat committed
218 219 220
}

void* linphone_friend_get_user_data(const LinphoneFriend *lf){
221
	return lf->user_data;
Simon Morlat's avatar
Simon Morlat committed
222 223
}

224 225
bool_t linphone_friend_in_list(const LinphoneFriend *lf) {
	return lf->friend_list != NULL;
226 227
}

smorlat's avatar
smorlat committed
228
void linphone_core_interpret_friend_uri(LinphoneCore *lc, const char *uri, char **result){
229
	LinphoneAddress *fr=NULL;
230
	*result=NULL;
231
	fr=linphone_address_new(uri);
232
	if (fr==NULL){
smorlat's avatar
smorlat committed
233 234
		char *tmp=NULL;
		if (strchr(uri,'@')!=NULL){
235
			LinphoneAddress *u;
smorlat's avatar
smorlat committed
236 237
			/*try adding sip:*/
			tmp=ms_strdup_printf("sip:%s",uri);
238
			u=linphone_address_new(tmp);
239 240 241
			if (u!=NULL){
				*result=tmp;
			}
smorlat's avatar
smorlat committed
242 243
		}else if (lc->default_proxy!=NULL){
			/*try adding domain part from default current proxy*/
244
			LinphoneAddress * id=linphone_address_new(linphone_core_get_identity(lc));
245
			if ((id!=NULL) && (uri[0] != '\0')){
246
				linphone_address_set_display_name(id,NULL);
247 248
				linphone_address_set_username(id,uri);
				*result=linphone_address_as_string(id);
249
				linphone_address_unref(id);
smorlat's avatar
smorlat committed
250 251
			}
		}
252
		if (*result){
smorlat's avatar
smorlat committed
253
			/*looks good */
254 255 256 257
			ms_message("%s interpreted as %s",uri,*result);
		}else{
			ms_warning("Fail to interpret friend uri %s",uri);
		}
jehan's avatar
jehan committed
258 259
	}else {
		*result=linphone_address_as_string(fr);
260
		linphone_address_unref(fr);
jehan's avatar
jehan committed
261
	}
smorlat's avatar
smorlat committed
262
}
aymeric's avatar
aymeric committed
263

264
const LinphoneAddress * linphone_friend_get_address(const LinphoneFriend *lf) {
265 266 267 268 269
	if (linphone_core_vcard_supported()) {
		if (lf->vcard) {
			bctbx_list_t *sip_addresses = linphone_vcard_get_sip_addresses(lf->vcard);
			if (sip_addresses) {
				const char *uri = (const char *)bctbx_list_nth_data(sip_addresses, 0);
Ghislain MARY's avatar
Ghislain MARY committed
270 271 272
				LinphoneAddress *addr = NULL;
				if (uri) addr = linphone_address_new(uri);
				bctbx_list_free(sip_addresses);
273 274 275 276
				if (lf->uri){
					linphone_address_unref(lf->uri);
				}
				((LinphoneFriend*)lf)->uri = addr;
Ghislain MARY's avatar
Ghislain MARY committed
277
				return addr;
278 279 280
			}
		}
		return NULL;
281
	}
282
	if (lf->uri) return lf->uri;
283
	return NULL;
284 285
}

286
int linphone_friend_set_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
287
	LinphoneAddress *fr = linphone_address_clone(addr);
288

289
	linphone_address_clean(fr);
290 291 292
	if (linphone_core_vcard_supported()) {
		char *address;
		if (!lf->vcard) {
Gautier Pelloux-Prayer's avatar
Gautier Pelloux-Prayer committed
293 294
			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);
295 296 297
		}
		address = linphone_address_as_string_uri_only(fr);
		linphone_vcard_edit_main_sip_address(lf->vcard, address);
Sylvain Berfini's avatar
Sylvain Berfini committed
298
		ms_free(address);
299 300 301 302
		linphone_address_unref(fr);
	} else {
		if (lf->uri != NULL) linphone_address_unref(lf->uri);
		lf->uri = fr;
303
	}
304

aymeric's avatar
aymeric committed
305 306 307
	return 0;
}

308
void linphone_friend_add_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
309
	LinphoneAddress *fr;
310

311 312 313 314
	if (!lf || !addr) return;

	fr = linphone_address_clone(addr);
	linphone_address_clean(fr);
315

316 317 318 319 320 321 322 323 324 325 326
	if (linphone_core_vcard_supported()) {
		if (lf->vcard) {
			char *address = linphone_address_as_string_uri_only(fr);
			linphone_vcard_add_sip_address(lf->vcard, address);
			ms_free(address);
			linphone_address_unref(fr);
		}
	} else {
		if (lf->uri == NULL) lf->uri = fr;
		else linphone_address_unref(fr);
	}
327 328
}

329
bctbx_list_t* linphone_friend_get_addresses(const LinphoneFriend *lf) {
330
	bctbx_list_t *sip_addresses = NULL;
331 332
	bctbx_list_t *addresses = NULL;
	bctbx_list_t *iterator = NULL;
333

334
	if (!lf) return NULL;
335

336 337 338 339
	if (linphone_core_vcard_supported()) {
		sip_addresses = linphone_vcard_get_sip_addresses(lf->vcard);
		iterator = sip_addresses;
		while (iterator) {
340
			const char *sip_address = (const char *)bctbx_list_get_data(iterator);
341 342 343 344 345
			LinphoneAddress *addr = linphone_address_new(sip_address);
			if (addr) {
				addresses = bctbx_list_append(addresses, addr);
			}
			iterator = bctbx_list_next(iterator);
346
		}
347 348 349
		if (sip_addresses) bctbx_list_free(sip_addresses);
		return addresses;
	} else {
350
		return lf->uri ? bctbx_list_append(addresses, linphone_address_clone(lf->uri)) : NULL;
351 352 353 354
	}
}

void linphone_friend_remove_address(LinphoneFriend *lf, const LinphoneAddress *addr) {
355
	if (!lf || !addr || !lf->vcard) return;
356

357 358 359 360
	if (linphone_core_vcard_supported()) {
		char *address = linphone_address_as_string_uri_only(addr);
		linphone_vcard_remove_sip_address(lf->vcard, address);
		ms_free(address);
361 362 363 364
	}
}

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

367 368 369 370 371
	if (linphone_core_vcard_supported()) {
		if (!lf->vcard) {
			linphone_friend_create_vcard(lf, phone);
		}
		linphone_vcard_add_phone_number(lf->vcard, phone);
372 373 374
	}
}

375
bctbx_list_t* linphone_friend_get_phone_numbers(LinphoneFriend *lf) {
376
	if (!lf || !lf->vcard) return NULL;
377

378 379
	if (linphone_core_vcard_supported()) {
		return linphone_vcard_get_phone_numbers(lf->vcard);
380
	}
381
	return NULL;
382 383 384
}

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

387 388
	if (linphone_core_vcard_supported()) {
		linphone_vcard_remove_phone_number(lf->vcard, phone);
389 390 391
	}
}

aymeric's avatar
aymeric committed
392
int linphone_friend_set_name(LinphoneFriend *lf, const char *name){
393 394 395 396 397 398 399
	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;
400
		}
401
		linphone_address_set_display_name(lf->uri, name);
402
	}
aymeric's avatar
aymeric committed
403 404 405
	return 0;
}

jehan's avatar
jehan committed
406
int linphone_friend_enable_subscribes(LinphoneFriend *fr, bool_t val){
aymeric's avatar
aymeric committed
407 408 409 410
	fr->subscribe=val;
	return 0;
}

Sylvain Berfini's avatar
Sylvain Berfini committed
411
int linphone_friend_set_inc_subscribe_policy(LinphoneFriend *fr, LinphoneSubscribePolicy pol) {
aymeric's avatar
aymeric committed
412 413 414 415
	fr->pol=pol;
	return 0;
}

416
void linphone_friend_notify(LinphoneFriend *lf, LinphonePresenceModel *presence){
417
	bctbx_list_t *elem;
418
	if (lf->insubs){
419
		const LinphoneAddress *addr = linphone_friend_get_address(lf);
420 421 422 423 424
		if (addr) {
			char *addr_str = linphone_address_as_string(addr);
			ms_message("Want to notify %s", addr_str);
			ms_free(addr_str);
		}
425
	}
426 427
	for(elem=lf->insubs; elem!=NULL; elem=bctbx_list_next(elem)){
		SalOp *op = (SalOp*)bctbx_list_get_data(elem);
428
		sal_notify_presence(op,(SalPresenceModel *)presence);
aymeric's avatar
aymeric committed
429 430 431
	}
}

432
void linphone_friend_add_incoming_subscription(LinphoneFriend *lf, SalOp *op){
433
	/*ownership of the op is transfered from sal to the LinphoneFriend*/
434
	lf->insubs = bctbx_list_append(lf->insubs, op);
435 436 437
}

void linphone_friend_remove_incoming_subscription(LinphoneFriend *lf, SalOp *op){
438
	if (bctbx_list_find(lf->insubs, op)){
439
		sal_op_release(op);
440
		lf->insubs = bctbx_list_remove(lf->insubs, op);
441
	}
442 443
}

aymeric's avatar
aymeric committed
444
static void linphone_friend_unsubscribe(LinphoneFriend *lf){
445 446
	if (lf->outsub!=NULL) {
		sal_unsubscribe(lf->outsub);
aymeric's avatar
aymeric committed
447
	}
448 449
	/* for friend list there is no necessary outsub*/
	lf->subscribe_active=FALSE;
aymeric's avatar
aymeric committed
450 451
}

452
void linphone_friend_invalidate_subscription(LinphoneFriend *lf){
453
	bctbx_list_t *iterator;
454 455
	LinphoneCore *lc=lf->lc;

Simon Morlat's avatar
Simon Morlat committed
456 457 458 459 460
	if (lf->outsub!=NULL) {
		sal_op_release(lf->outsub);
		lf->outsub=NULL;
		lf->subscribe_active=FALSE;
	}
461 462

	/* Notify application that we no longer know the presence activity */
463 464 465 466 467 468 469
	iterator = lf->presence_models;
	while (iterator) {
		LinphoneFriendPresence *lfp = (LinphoneFriendPresence *)bctbx_list_get_data(iterator);
		linphone_presence_model_unref(lfp->presence);
		lfp->presence = linphone_presence_model_new_with_activity(LinphonePresenceActivityOffline, "unknown activity");
		linphone_core_notify_notify_presence_received_for_uri_or_tel(lc, lf, lfp->uri_or_tel, lfp->presence);
		iterator = bctbx_list_next(iterator);
470
	}
471 472
	if (bctbx_list_size(lf->presence_models) > 0)
		linphone_core_notify_notify_presence_received(lc, lf);
473

474
	lf->initial_subscribes_sent=FALSE;
Simon Morlat's avatar
Simon Morlat committed
475 476
}

477
void linphone_friend_close_subscriptions(LinphoneFriend *lf){
aymeric's avatar
aymeric committed
478
	linphone_friend_unsubscribe(lf);
479 480
	bctbx_list_for_each(lf->insubs, (MSIterateFunc) sal_notify_presence_close);
	lf->insubs = bctbx_list_free_with_data(lf->insubs, (MSIterateFunc)sal_op_release);
481 482
}

483
static void _linphone_friend_release_ops(LinphoneFriend *lf){
484
	lf->insubs = bctbx_list_free_with_data(lf->insubs, (MSIterateFunc) sal_op_release);
485 486 487 488
	if (lf->outsub){
		sal_op_release(lf->outsub);
		lf->outsub=NULL;
	}
489 490 491 492
}

static void _linphone_friend_destroy(LinphoneFriend *lf){
	_linphone_friend_release_ops(lf);
493
	if (lf->presence_models) bctbx_list_free_with_data(lf->presence_models, (bctbx_list_free_func)free_friend_presence);
494
	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);
495
	if (lf->uri!=NULL) linphone_address_unref(lf->uri);
496
	if (lf->info!=NULL) buddy_info_free(lf->info);
497
	if (lf->vcard != NULL) linphone_vcard_free(lf->vcard);
Sylvain Berfini's avatar
Sylvain Berfini committed
498
	if (lf->refkey != NULL) ms_free(lf->refkey);
aymeric's avatar
aymeric committed
499 500
}

501 502 503 504 505 506 507 508 509 510 511
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;
}

512
const char * linphone_friend_get_name(const LinphoneFriend *lf) {
513 514 515 516 517 518
	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);
519 520
	}
	return NULL;
521 522
}

aymeric's avatar
aymeric committed
523 524 525 526 527 528 529 530 531
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){
532
	const LinphonePresenceModel *presence = linphone_friend_get_presence_model(lf);
533 534
	LinphoneOnlineStatus online_status = LinphoneStatusOffline;
	LinphonePresenceBasicStatus basic_status = LinphonePresenceBasicStatusClosed;
535
	LinphonePresenceActivity *activity = NULL;
536
	const char *description = NULL;
537 538
	unsigned int nb_activities = 0;

539 540 541
	if (presence != NULL) {
		basic_status = linphone_presence_model_get_basic_status(presence);
		nb_activities = linphone_presence_model_get_nb_activities(presence);
542 543 544
		online_status = (basic_status == LinphonePresenceBasicStatusOpen) ? LinphoneStatusOnline : LinphoneStatusOffline;
		if (nb_activities > 1) {
			char *tmp = NULL;
545
			const LinphoneAddress *addr = linphone_friend_get_address(lf);
546 547
			if (addr) tmp = linphone_address_as_string(addr);
			ms_warning("Friend %s has several activities, get status from the first one", tmp ? tmp : "unknown");
548 549 550
			if (tmp) {
				ms_free(tmp);
			}
551 552 553
			nb_activities = 1;
		}
		if (nb_activities == 1) {
554
			activity = linphone_presence_model_get_activity(presence);
555
			description = linphone_presence_activity_get_description(activity);
556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581
			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:
582 583 584 585 586 587
					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;
588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609
				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;
				case LinphonePresenceActivityOnline:
					/* Should not happen! */
610
					/*ms_warning("LinphonePresenceActivityOnline should not happen here!");*/
611 612 613
					break;
				case LinphonePresenceActivityOffline:
					online_status = LinphoneStatusOffline;
614
					break;
615 616 617 618 619 620 621
			}
		}
	}

	return online_status;
}

622 623
const LinphonePresenceModel * linphone_friend_get_presence_model(const LinphoneFriend *lf) {
	const LinphonePresenceModel *presence = NULL;
624 625 626
	LinphoneFriend* fuckconst = (LinphoneFriend*)lf;
	bctbx_list_t* addrs = linphone_friend_get_addresses(fuckconst);
	bctbx_list_t* phones = NULL;
627
	bctbx_list_t *it;
628

629 630
	for (it = addrs; it!= NULL; it = it->next) {
		LinphoneAddress *addr = (LinphoneAddress*)it->data;
631
		char *uri = linphone_address_as_string_uri_only(addr);
632
		presence = linphone_friend_get_presence_model_for_uri_or_tel(fuckconst, uri);
633
		ms_free(uri);
634
		if (presence) break;
635
	}
636 637
	bctbx_list_free_with_data(addrs, (bctbx_list_free_func) linphone_address_unref);
	if (presence) return presence;
638 639

	phones = linphone_friend_get_phone_numbers(fuckconst);
640 641 642
	for (it = phones; it!= NULL; it = it->next) {
		presence = linphone_friend_get_presence_model_for_uri_or_tel(fuckconst, it->data);
		if (presence) break;
643
	}
644 645
	bctbx_list_free(phones);
	return presence;
646 647 648 649 650 651
}

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;
652 653
}

654
void linphone_friend_set_presence_model(LinphoneFriend *lf, LinphonePresenceModel *presence) {
655
	const LinphoneAddress *addr = linphone_friend_get_address(lf);
656 657 658 659 660 661 662 663 664 665 666 667 668 669
	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);
670 671 672
	}
}

673 674 675 676
bool_t linphone_friend_is_presence_received(const LinphoneFriend *lf) {
	return lf->presence_received;
}

677 678 679
BuddyInfo * linphone_friend_get_info(const LinphoneFriend *lf){
	return lf->info;
}
aymeric's avatar
aymeric committed
680

681 682 683 684 685 686
/*
 * updates the subscriptions.
 * 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.
**/
687
void linphone_friend_update_subscribes(LinphoneFriend *fr, bool_t only_when_registered){
688
	int can_subscribe=1;
689

690
	if (only_when_registered && (fr->subscribe || fr->subscribe_active)){
691
		const LinphoneAddress *addr = linphone_friend_get_address(fr);
692 693 694 695 696 697 698 699 700
		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;
			}
701 702 703 704 705 706 707 708 709 710 711 712 713
		}
	}
	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;
		sal_op_stop_refreshing(fr->outsub);
	}
}

714
void linphone_friend_save(LinphoneFriend *fr, LinphoneCore *lc) {
715
	if (!lc) return;
716
#ifdef SQLITE_STORAGE_ENABLED
717 718 719 720 721
	if (lc->friends_db_file) {
		linphone_core_store_friend_in_db(lc, fr);
	} else {
		linphone_core_write_friends_config(lc);
	}
722
#else
723
	linphone_core_write_friends_config(lc);
724
#endif
725 726 727
}

void linphone_friend_apply(LinphoneFriend *fr, LinphoneCore *lc) {
728
	LinphonePresenceModel *model;
729
	const LinphoneAddress *addr = linphone_friend_get_address(fr);
730

731
	if (!addr) {
732
		ms_debug("No sip url defined in friend %s", linphone_friend_get_name(fr));
aymeric's avatar
aymeric committed
733 734
		return;
	}
735 736 737 738 739
	if (!linphone_core_ready(lc)) {
		/* lc not ready, deffering subscription */
		fr->commit=TRUE;
		return;
	}
jehan's avatar
jehan committed
740

741 742
	if (fr->inc_subscribe_pending) {
		switch(fr->pol) {
aymeric's avatar
aymeric committed
743
			case LinphoneSPWait:
744
				model = linphone_presence_model_new_with_activity(LinphonePresenceActivityOther, "Waiting for user acceptance");
745
				linphone_friend_notify(fr, model);
746
				linphone_presence_model_unref(model);
aymeric's avatar
aymeric committed
747 748
				break;
			case LinphoneSPAccept:
749 750
				if (fr->lc)
					linphone_friend_notify(fr, fr->lc->presence_model);
aymeric's avatar
aymeric committed
751 752
				break;
			case LinphoneSPDeny:
753
				linphone_friend_notify(fr, NULL);
aymeric's avatar
aymeric committed
754 755
				break;
		}
756 757
		fr->inc_subscribe_pending = FALSE;
	}
758 759 760
	
	linphone_friend_update_subscribes(fr, linphone_core_should_subscribe_friends_only_when_registered(lc));

761
	ms_debug("linphone_friend_apply() done.");
762
	lc->bl_refresh=TRUE;
763
	fr->commit=FALSE;
aymeric's avatar
aymeric committed
764 765
}

766
void linphone_friend_edit(LinphoneFriend *fr) {
767
	if (fr && linphone_core_vcard_supported() && fr->vcard) {
768 769
		linphone_vcard_compute_md5_hash(fr->vcard);
	}
aymeric's avatar
aymeric committed
770 771
}

772
void linphone_friend_done(LinphoneFriend *fr) {
773
	ms_return_if_fail(fr);
774
	if (!fr->lc || !fr->friend_list) return;
775 776
	linphone_friend_apply(fr, fr->lc);
	linphone_friend_save(fr, fr->lc);
777

778
	if (fr && linphone_core_vcard_supported() && fr->vcard) {
779
		if (linphone_vcard_compare_md5_hash(fr->vcard) != 0) {
780
			ms_debug("vCard's md5 has changed, mark friend as dirty");
781
			fr->friend_list->dirty_friends_to_update = bctbx_list_append(fr->friend_list->dirty_friends_to_update, linphone_friend_ref(fr));
782 783
		}
	}
aymeric's avatar
aymeric committed
784 785
}

786 787 788
#if __clang__ || ((__GNUC__ == 4 && __GNUC_MINOR__ >= 6) || __GNUC__ > 4)
#pragma GCC diagnostic push
#endif
789 790 791
#ifdef _MSC_VER
#pragma warning(disable : 4996)
#else
792
#pragma GCC diagnostic ignored "-Wdeprecated-declarations"
793
#endif
794
LinphoneFriend * linphone_core_create_friend(LinphoneCore *lc) {
795 796 797
	LinphoneFriend * lf = linphone_friend_new();
	lf->lc = lc;
	return lf;
798 799 800
}

LinphoneFriend * linphone_core_create_friend_with_address(LinphoneCore *lc, const char *address) {
801 802 803 804
	LinphoneFriend * lf = linphone_friend_new_with_address(address);
	if (lf)
		lf->lc = lc;
	return lf;
805
}
806 807 808
#if __clang__ || ((__GNUC__ == 4 && __GNUC_MINOR__ >= 6) || __GNUC__ > 4)
#pragma GCC diagnostic pop
#endif
809

810
void linphone_core_add_friend(LinphoneCore *lc, LinphoneFriend *lf) {
811
	if (linphone_friend_list_add_friend(linphone_core_get_default_friend_list(lc), lf) != LinphoneFriendListOK) return;
812
	if (bctbx_list_find(lc->subscribers, lf)) {
813
		/*if this friend was in the pending subscriber list, now remove it from this list*/
814
		lc->subscribers = bctbx_list_remove(lc->subscribers, lf);
815 816
		linphone_friend_unref(lf);
	}
aymeric's avatar
aymeric committed
817 818
}

819
void linphone_core_remove_friend(LinphoneCore *lc, LinphoneFriend *lf) {
820 821 822 823
	if (lf && lf->friend_list) {
		if (linphone_friend_list_remove_friend(lf->friend_list, lf) == LinphoneFriendListNonExistentFriend) {
			ms_error("linphone_core_remove_friend(): friend [%p] is not part of core's list.", lf);
		}
aymeric's avatar
aymeric committed
824 825 826
	}
}

827
void linphone_core_update_friends_subscriptions(LinphoneCore *lc) {
828
	bctbx_list_t *lists = lc->friends_lists;
829
	while (lists) {
830
		LinphoneFriendList *list = (LinphoneFriendList *)bctbx_list_get_data(lists);
831
		linphone_friend_list_update_subscriptions(list);
832
		lists = bctbx_list_next(lists);
Simon Morlat's avatar
Simon Morlat committed
833
	}
834 835 836 837 838
}

bool_t linphone_core_should_subscribe_friends_only_when_registered(const LinphoneCore *lc){
	return lp_config_get_int(lc->config,"sip","subscribe_presence_only_when_registered",1);
}
839

840
void linphone_core_send_initial_subscribes(LinphoneCore *lc) {
Ghislain MARY's avatar
Ghislain MARY committed
841

842 843
	if (lc->initial_subscribes_sent) return;
	lc->initial_subscribes_sent=TRUE;
844 845
	
	linphone_core_update_friends_subscriptions(lc);
Simon Morlat's avatar
Simon Morlat committed
846 847
}

848
void linphone_core_invalidate_friend_subscriptions(LinphoneCore *lc) {
849
	bctbx_list_t *lists = lc->friends_lists;
850
	while (lists) {
851
		LinphoneFriendList *list = (LinphoneFriendList *)bctbx_list_get_data(lists);
852
		linphone_friend_list_invalidate_subscriptions(list);
853
		lists = bctbx_list_next(lists);
854
	}
Simon Morlat's avatar
Simon Morlat committed
855
	lc->initial_subscribes_sent=FALSE;
856 857
}

858
void linphone_friend_set_ref_key(LinphoneFriend *lf, const char *key){
859
	if (lf->refkey != NULL) {
860
		ms_free(lf->refkey);
861 862 863 864 865 866 867
		lf->refkey = NULL;
	}
	if (key) {
		lf->refkey = ms_strdup(key);
	}
	if (lf->lc) {
		linphone_friend_save(lf, lf->lc);
868 869 870 871 872 873 874
	}
}

const char *linphone_friend_get_ref_key(const LinphoneFriend *lf){
	return lf->refkey;
}

875
LinphoneFriend *linphone_core_find_friend(const LinphoneCore *lc, const LinphoneAddress *addr) {
876
	bctbx_list_t *lists = lc->friends_lists;
877 878
	LinphoneFriend *lf = NULL;
	while (lists && !lf) {
879
		LinphoneFriendList *list = (LinphoneFriendList *)bctbx_list_get_data(lists);
880
		lf