sjero.net Git - linphone/blob - coreapi/linphonecore.c

   1 /*
   2 linphone
   3 Copyright (C) 2000  Simon MORLAT (simon.morlat@linphone.org)
   4
   5 This program is free software; you can redistribute it and/or
   6 modify it under the terms of the GNU General Public License
   7 as published by the Free Software Foundation; either version 2
   8 of the License, or (at your option) any later version.
   9
  10 This program is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18 */
  19
  20 #define _GNU_SOURCE
  21
  22 #include "linphonecore.h"
  23 #include "sipsetup.h"
  24 #include "lpconfig.h"
  25 #include "private.h"
  26
  27 #include <ortp/telephonyevents.h>
  28 #include <ortp/zrtp.h>
  29 #include "mediastreamer2/mediastream.h"
  30 #include "mediastreamer2/mseventqueue.h"
  31 #include "mediastreamer2/msvolume.h"
  32 #include "mediastreamer2/msequalizer.h"
  33 #include "mediastreamer2/dtmfgen.h"
  34
  35 #ifdef INET6
  36 #ifndef WIN32
  37 #include <netdb.h>
  38 #endif
  39 #endif
  40
  41 #ifdef HAVE_CONFIG_H
  42 #include "config.h"
  43 #endif
  44
  45 /*#define UNSTANDART_GSM_11K 1*/
  46
  47 #define ROOT_CA_FILE PACKAGE_DATA_DIR "/linphone/rootca.pem"
  48
  49 static const char *liblinphone_version=LIBLINPHONE_VERSION;
  50 static void set_network_reachable(LinphoneCore* lc,bool_t isReachable, time_t curtime);
  51 static void linphone_core_run_hooks(LinphoneCore *lc);
  52 static void linphone_core_free_hooks(LinphoneCore *lc);
  53
  54 #include "enum.h"
  55 const char *linphone_core_get_nat_address_resolved(LinphoneCore *lc);
  56 void linphone_core_get_local_ip(LinphoneCore *lc, const char *dest, char *result);
  57 static void toggle_video_preview(LinphoneCore *lc, bool_t val);
  58
  59 /* relative path where is stored local ring*/
  60 #define LOCAL_RING "rings/oldphone.wav"
  61 /* same for remote ring (ringback)*/
  62 #define REMOTE_RING "ringback.wav"
  63 #define HOLD_MUSIC "rings/toy-mono.wav"
  64
  65
  66 extern SalCallbacks linphone_sal_callbacks;
  67
  68 void lc_callback_obj_init(LCCallbackObj *obj,LinphoneCoreCbFunc func,void* ud)
  69 {
  70   obj->_func=func;
  71   obj->_user_data=ud;
  72 }
  73
  74 int lc_callback_obj_invoke(LCCallbackObj *obj, LinphoneCore *lc){
  75         if (obj->_func!=NULL) obj->_func(lc,obj->_user_data);
  76         return 0;
  77 }
  78
  79
  80 /*prevent a gcc bug with %c*/
  81 static size_t my_strftime(char *s, size_t max, const char  *fmt,  const struct tm *tm){
  82 #if !defined(_WIN32_WCE)
  83         return strftime(s, max, fmt, tm);
  84 #else
  85         return 0;
  86         /*FIXME*/
  87 #endif /*_WIN32_WCE*/
  88 }
  89
  90 static void set_call_log_date(LinphoneCallLog *cl, time_t start_time){
  91         struct tm loctime;
  92 #ifdef WIN32
  93 #if !defined(_WIN32_WCE)
  94         loctime=*localtime(&start_time);
  95         /*FIXME*/
  96 #endif /*_WIN32_WCE*/
  97 #else
  98         localtime_r(&start_time,&loctime);
  99 #endif
 100         my_strftime(cl->start_date,sizeof(cl->start_date),"%c",&loctime);
 101 }
 102
 103 LinphoneCallLog * linphone_call_log_new(LinphoneCall *call, LinphoneAddress *from, LinphoneAddress *to){
 104         LinphoneCallLog *cl=ms_new0(LinphoneCallLog,1);
 105         cl->dir=call->dir;
 106         cl->start_date_time=call->start_time;
 107         set_call_log_date(cl,cl->start_date_time);
 108         cl->from=from;
 109         cl->to=to;
 110     cl->status=LinphoneCallAborted; /*default status*/
 111         return cl;
 112 }
 113
 114 void call_logs_write_to_config_file(LinphoneCore *lc){
 115         MSList *elem;
 116         char logsection[32];
 117         int i;
 118         char *tmp;
 119         LpConfig *cfg=lc->config;
 120
 121         if (linphone_core_get_global_state (lc)==LinphoneGlobalStartup) return;
 122
 123         for(i=0,elem=lc->call_logs;elem!=NULL;elem=elem->next,++i){
 124                 LinphoneCallLog *cl=(LinphoneCallLog*)elem->data;
 125                 snprintf(logsection,sizeof(logsection),"call_log_%i",i);
 126                 lp_config_clean_section(cfg,logsection);
 127                 lp_config_set_int(cfg,logsection,"dir",cl->dir);
 128                 lp_config_set_int(cfg,logsection,"status",cl->status);
 129                 tmp=linphone_address_as_string(cl->from);
 130                 lp_config_set_string(cfg,logsection,"from",tmp);
 131                 ms_free(tmp);
 132                 tmp=linphone_address_as_string(cl->to);
 133                 lp_config_set_string(cfg,logsection,"to",tmp);
 134                 ms_free(tmp);
 135                 if (cl->start_date_time)
 136                         lp_config_set_int64(cfg,logsection,"start_date_time",(int64_t)cl->start_date_time);
 137                 else lp_config_set_string(cfg,logsection,"start_date",cl->start_date);
 138                 lp_config_set_int(cfg,logsection,"duration",cl->duration);
 139                 if (cl->refkey) lp_config_set_string(cfg,logsection,"refkey",cl->refkey);
 140                 lp_config_set_float(cfg,logsection,"quality",cl->quality);
 141                 lp_config_set_int(cfg,logsection,"video_enabled", cl->video_enabled);
 142         }
 143         for(;i<lc->max_call_logs;++i){
 144                 snprintf(logsection,sizeof(logsection),"call_log_%i",i);
 145                 lp_config_clean_section(cfg,logsection);
 146         }
 147 }
 148
 149 static time_t string_to_time(const char *date){
 150 #ifndef WIN32
 151         struct tm tmtime={0};
 152         strptime(date,"%c",&tmtime);
 153         return mktime(&tmtime);
 154 #else
 155         return 0;
 156 #endif
 157 }
 158
 159 static void call_logs_read_from_config_file(LinphoneCore *lc){
 160         char logsection[32];
 161         int i;
 162         const char *tmp;
 163         uint64_t sec;
 164         LpConfig *cfg=lc->config;
 165         for(i=0;;++i){
 166                 snprintf(logsection,sizeof(logsection),"call_log_%i",i);
 167                 if (lp_config_has_section(cfg,logsection)){
 168                         LinphoneCallLog *cl=ms_new0(LinphoneCallLog,1);
 169                         cl->dir=lp_config_get_int(cfg,logsection,"dir",0);
 170                         cl->status=lp_config_get_int(cfg,logsection,"status",0);
 171                         tmp=lp_config_get_string(cfg,logsection,"from",NULL);
 172                         if (tmp) cl->from=linphone_address_new(tmp);
 173                         tmp=lp_config_get_string(cfg,logsection,"to",NULL);
 174                         if (tmp) cl->to=linphone_address_new(tmp);
 175                         sec=lp_config_get_int64(cfg,logsection,"start_date_time",0);
 176                         if (sec) {
 177                                 /*new call log format with date expressed in seconds */
 178                                 cl->start_date_time=(time_t)sec;
 179                                 set_call_log_date(cl,cl->start_date_time);
 180                         }else{
 181                                 tmp=lp_config_get_string(cfg,logsection,"start_date",NULL);
 182                                 if (tmp) {
 183                                         strncpy(cl->start_date,tmp,sizeof(cl->start_date));
 184                                         cl->start_date_time=string_to_time(cl->start_date);
 185                                 }
 186                         }
 187                         cl->duration=lp_config_get_int(cfg,logsection,"duration",0);
 188                         tmp=lp_config_get_string(cfg,logsection,"refkey",NULL);
 189                         if (tmp) cl->refkey=ms_strdup(tmp);
 190                         cl->quality=lp_config_get_float(cfg,logsection,"quality",-1);
 191                         cl->video_enabled=lp_config_get_int(cfg,logsection,"video_enabled",0);
 192                         lc->call_logs=ms_list_append(lc->call_logs,cl);
 193                 }else break;
 194         }
 195 }
 196
 197
 198
 199 /**
 200  * @addtogroup call_logs
 201  * @{
 202 **/
 203
 204 /**
 205  * Returns a human readable string describing the call.
 206  *
 207  * @note: the returned char* must be freed by the application (use ms_free()).
 208 **/
 209 char * linphone_call_log_to_str(LinphoneCallLog *cl){
 210         char *status;
 211         char *tmp;
 212         char *from=linphone_address_as_string (cl->from);
 213         char *to=linphone_address_as_string (cl->to);
 214         switch(cl->status){
 215                 case LinphoneCallAborted:
 216                         status=_("aborted");
 217                         break;
 218                 case LinphoneCallSuccess:
 219                         status=_("completed");
 220                         break;
 221                 case LinphoneCallMissed:
 222                         status=_("missed");
 223                         break;
 224                 default:
 225                         status="unknown";
 226         }
 227         tmp=ortp_strdup_printf(_("%s at %s\nFrom: %s\nTo: %s\nStatus: %s\nDuration: %i mn %i sec\n"),
 228                         (cl->dir==LinphoneCallIncoming) ? _("Incoming call") : _("Outgoing call"),
 229                         cl->start_date,
 230                         from,
 231                         to,
 232                         status,
 233                         cl->duration/60,
 234                         cl->duration%60);
 235         ms_free(from);
 236         ms_free(to);
 237         return tmp;
 238 }
 239
 240 /**
 241  * Returns RTP statistics computed locally regarding the call.
 242  *
 243 **/
 244 const rtp_stats_t *linphone_call_log_get_local_stats(const LinphoneCallLog *cl){
 245         return &cl->local_stats;
 246 }
 247
 248 /**
 249  * Returns RTP statistics computed by remote end and sent back via RTCP.
 250  *
 251  * @note Not implemented yet.
 252 **/
 253 const rtp_stats_t *linphone_call_log_get_remote_stats(const LinphoneCallLog *cl){
 254         return &cl->remote_stats;
 255 }
 256
 257 void linphone_call_log_set_user_pointer(LinphoneCallLog *cl, void *up){
 258         cl->user_pointer=up;
 259 }
 260
 261 void *linphone_call_log_get_user_pointer(const LinphoneCallLog *cl){
 262         return cl->user_pointer;
 263 }
 264
 265
 266
 267 /**
 268  * Associate a persistent reference key to the call log.
 269  *
 270  * The reference key can be for example an id to an external database.
 271  * It is stored in the config file, thus can survive to process exits/restarts.
 272  *
 273 **/
 274 void linphone_call_log_set_ref_key(LinphoneCallLog *cl, const char *refkey){
 275         if (cl->refkey!=NULL){
 276                 ms_free(cl->refkey);
 277                 cl->refkey=NULL;
 278         }
 279         if (refkey) cl->refkey=ms_strdup(refkey);
 280 }
 281
 282 /**
 283  * Get the persistent reference key associated to the call log.
 284  *
 285  * The reference key can be for example an id to an external database.
 286  * It is stored in the config file, thus can survive to process exits/restarts.
 287  *
 288 **/
 289 const char *linphone_call_log_get_ref_key(const LinphoneCallLog *cl){
 290         return cl->refkey;
 291 }
 292
 293 /** @} */
 294
 295 void linphone_call_log_destroy(LinphoneCallLog *cl){
 296         if (cl->from!=NULL) linphone_address_destroy(cl->from);
 297         if (cl->to!=NULL) linphone_address_destroy(cl->to);
 298         if (cl->refkey!=NULL) ms_free(cl->refkey);
 299         ms_free(cl);
 300 }
 301
 302 /**
 303  * Returns TRUE if the LinphoneCall asked to autoanswer
 304  *
 305 **/
 306 bool_t linphone_call_asked_to_autoanswer(LinphoneCall *call){
 307         //return TRUE if the unique(for the moment) incoming call asked to be autoanswered
 308         if(call)
 309                 return sal_call_autoanswer_asked(call->op);
 310         else
 311                 return FALSE;
 312 }
 313
 314 int linphone_core_get_current_call_duration(const LinphoneCore *lc){
 315         LinphoneCall *call=linphone_core_get_current_call((LinphoneCore *)lc);
 316         if (call)  return linphone_call_get_duration(call);
 317         return -1;
 318 }
 319
 320 const LinphoneAddress *linphone_core_get_current_call_remote_address(struct _LinphoneCore *lc){
 321         LinphoneCall *call=linphone_core_get_current_call(lc);
 322         if (call==NULL) return NULL;
 323         return linphone_call_get_remote_address(call);
 324 }
 325
 326 /**
 327  * Enable logs in supplied FILE*.
 328  *
 329  * @ingroup misc
 330  *
 331  * @param file a C FILE* where to fprintf logs. If null stdout is used.
 332  *
 333 **/
 334 void linphone_core_enable_logs(FILE *file){
 335         if (file==NULL) file=stdout;
 336         ortp_set_log_file(file);
 337         ortp_set_log_level_mask(ORTP_MESSAGE|ORTP_WARNING|ORTP_ERROR|ORTP_FATAL);
 338 }
 339
 340 /**
 341  * Enable logs through the user's supplied log callback.
 342  *
 343  * @ingroup misc
 344  *
 345  * @param logfunc The address of a OrtpLogFunc callback whose protoype is
 346  *                typedef void (*OrtpLogFunc)(OrtpLogLevel lev, const char *fmt, va_list args);
 347  *
 348 **/
 349 void linphone_core_enable_logs_with_cb(OrtpLogFunc logfunc){
 350         ortp_set_log_level_mask(ORTP_MESSAGE|ORTP_WARNING|ORTP_ERROR|ORTP_FATAL);
 351         ortp_set_log_handler(logfunc);
 352 }
 353
 354 /**
 355  * Entirely disable logging.
 356  *
 357  * @ingroup misc
 358 **/
 359 void linphone_core_disable_logs(){
 360         ortp_set_log_level_mask(ORTP_ERROR|ORTP_FATAL);
 361 }
 362
 363
 364 static void net_config_read (LinphoneCore *lc)
 365 {
 366         int tmp;
 367         const char *tmpstr;
 368         LpConfig *config=lc->config;
 369
 370         lc->net_conf.nat_address_ip = NULL;
 371         tmp=lp_config_get_int(config,"net","download_bw",0);
 372         linphone_core_set_download_bandwidth(lc,tmp);
 373         tmp=lp_config_get_int(config,"net","upload_bw",0);
 374         linphone_core_set_upload_bandwidth(lc,tmp);
 375         linphone_core_set_stun_server(lc,lp_config_get_string(config,"net","stun_server",NULL));
 376         tmpstr=lp_config_get_string(lc->config,"net","nat_address",NULL);
 377         if (tmpstr!=NULL && (strlen(tmpstr)<1)) tmpstr=NULL;
 378         linphone_core_set_nat_address(lc,tmpstr);
 379         tmp=lp_config_get_int(lc->config,"net","firewall_policy",0);
 380         linphone_core_set_firewall_policy(lc,tmp);
 381         tmp=lp_config_get_int(lc->config,"net","nat_sdp_only",0);
 382         lc->net_conf.nat_sdp_only=tmp;
 383         tmp=lp_config_get_int(lc->config,"net","mtu",0);
 384         linphone_core_set_mtu(lc,tmp);
 385         tmp=lp_config_get_int(lc->config,"net","download_ptime",0);
 386         linphone_core_set_download_ptime(lc,tmp);
 387
 388 }
 389
 390 static void build_sound_devices_table(LinphoneCore *lc){
 391         const char **devices;
 392         const char **old;
 393         int ndev;
 394         int i;
 395         const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
 396         ndev=ms_list_size(elem);
 397         devices=ms_malloc((ndev+1)*sizeof(const char *));
 398         for (i=0;elem!=NULL;elem=elem->next,i++){
 399                 devices[i]=ms_snd_card_get_string_id((MSSndCard *)elem->data);
 400         }
 401         devices[ndev]=NULL;
 402         old=lc->sound_conf.cards;
 403         lc->sound_conf.cards=devices;
 404         if (old!=NULL) ms_free(old);
 405 }
 406
 407 static void sound_config_read(LinphoneCore *lc)
 408 {
 409         int tmp;
 410         const char *tmpbuf;
 411         const char *devid;
 412         float gain=0;
 413 #ifdef __linux
 414         /*alsadev let the user use custom alsa device within linphone*/
 415         devid=lp_config_get_string(lc->config,"sound","alsadev",NULL);
 416         if (devid){
 417                 MSSndCard *card=ms_alsa_card_new_custom(devid,devid);
 418                 ms_snd_card_manager_add_card(ms_snd_card_manager_get(),card);
 419         }
 420         tmp=lp_config_get_int(lc->config,"sound","alsa_forced_rate",-1);
 421         if (tmp>0) ms_alsa_card_set_forced_sample_rate(tmp);
 422 #endif
 423         /* retrieve all sound devices */
 424         build_sound_devices_table(lc);
 425
 426         devid=lp_config_get_string(lc->config,"sound","playback_dev_id",NULL);
 427         linphone_core_set_playback_device(lc,devid);
 428
 429         devid=lp_config_get_string(lc->config,"sound","ringer_dev_id",NULL);
 430         linphone_core_set_ringer_device(lc,devid);
 431
 432         devid=lp_config_get_string(lc->config,"sound","capture_dev_id",NULL);
 433         linphone_core_set_capture_device(lc,devid);
 434
 435 /*
 436         tmp=lp_config_get_int(lc->config,"sound","play_lev",80);
 437         linphone_core_set_play_level(lc,tmp);
 438         tmp=lp_config_get_int(lc->config,"sound","ring_lev",80);
 439         linphone_core_set_ring_level(lc,tmp);
 440         tmp=lp_config_get_int(lc->config,"sound","rec_lev",80);
 441         linphone_core_set_rec_level(lc,tmp);
 442         tmpbuf=lp_config_get_string(lc->config,"sound","source","m");
 443         linphone_core_set_sound_source(lc,tmpbuf[0]);
 444 */
 445
 446         tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
 447         tmpbuf=lp_config_get_string(lc->config,"sound","local_ring",tmpbuf);
 448         if (ortp_file_exist(tmpbuf)==-1) {
 449                 ms_warning("%s does not exist",tmpbuf);
 450                 tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
 451         }
 452         if (strstr(tmpbuf,".wav")==NULL){
 453                 /* it currently uses old sound files, so replace them */
 454                 tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
 455         }
 456         linphone_core_set_ring(lc,tmpbuf);
 457
 458         tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
 459         tmpbuf=lp_config_get_string(lc->config,"sound","remote_ring",tmpbuf);
 460         if (ortp_file_exist(tmpbuf)==-1){
 461                 tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
 462         }
 463         if (strstr(tmpbuf,".wav")==NULL){
 464                 /* it currently uses old sound files, so replace them */
 465                 tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
 466         }
 467         linphone_core_set_ringback(lc,tmpbuf);
 468
 469         linphone_core_set_play_file(lc,lp_config_get_string(lc->config,"sound","hold_music",PACKAGE_SOUND_DIR "/" HOLD_MUSIC));
 470         check_sound_device(lc);
 471         lc->sound_conf.latency=0;
 472 #ifndef __ios
 473     tmp=TRUE;
 474 #else
 475     tmp=FALSE; /* on iOS we have builtin echo cancellation.*/
 476 #endif
 477     tmp=lp_config_get_int(lc->config,"sound","echocancellation",tmp);
 478         linphone_core_enable_echo_cancellation(lc,tmp);
 479         linphone_core_enable_echo_limiter(lc,
 480                 lp_config_get_int(lc->config,"sound","echolimiter",0));
 481         linphone_core_enable_agc(lc,
 482                 lp_config_get_int(lc->config,"sound","agc",0));
 483
 484         gain=lp_config_get_float(lc->config,"sound","playback_gain_db",0);
 485         linphone_core_set_playback_gain_db (lc,gain);
 486
 487         linphone_core_set_remote_ringback_tone (lc,lp_config_get_string(lc->config,"sound","ringback_tone",NULL));
 488
 489         /*just parse requested stream feature once at start to print out eventual errors*/
 490         linphone_core_get_audio_features(lc);
 491 }
 492
 493 static void sip_config_read(LinphoneCore *lc)
 494 {
 495         char *contact;
 496         const char *tmpstr;
 497         LCSipTransports tr;
 498         int i,tmp;
 499         int ipv6;
 500         int random_port;
 501
 502         tmp=lp_config_get_int(lc->config,"sip","use_info",0);
 503         linphone_core_set_use_info_for_dtmf(lc,tmp);
 504
 505         if (lp_config_get_int(lc->config,"sip","use_session_timers",0)==1){
 506                 sal_use_session_timers(lc->sal,200);
 507         }
 508
 509         sal_use_rport(lc->sal,lp_config_get_int(lc->config,"sip","use_rport",1));
 510         sal_use_101(lc->sal,lp_config_get_int(lc->config,"sip","use_101",1));
 511         sal_reuse_authorization(lc->sal, lp_config_get_int(lc->config,"sip","reuse_authorization",0));
 512         sal_expire_old_registration_contacts(lc->sal,lp_config_get_int(lc->config,"sip","expire_old_registration_contacts",0));
 513
 514         tmp=lp_config_get_int(lc->config,"sip","use_rfc2833",0);
 515         linphone_core_set_use_rfc2833_for_dtmf(lc,tmp);
 516
 517         ipv6=lp_config_get_int(lc->config,"sip","use_ipv6",-1);
 518         if (ipv6==-1){
 519                 ipv6=0;
 520         }
 521         linphone_core_enable_ipv6(lc,ipv6);
 522         memset(&tr,0,sizeof(tr));
 523
 524         tr.udp_port=lp_config_get_int(lc->config,"sip","sip_port",0);
 525         tr.tcp_port=lp_config_get_int(lc->config,"sip","sip_tcp_port",0);
 526         tr.tls_port=lp_config_get_int(lc->config,"sip","sip_tls_port",0);
 527
 528         if (lp_config_get_int(lc->config,"sip","sip_random_port",0)==1)
 529                 random_port=(0xDFFF&random())+1024;
 530         else random_port=0;
 531
 532         if (!sal_is_transport_enabled(lc->sal, SalTransportTLS)) {
 533                 tr.tls_port=0;
 534         }
 535
 536         if (tr.udp_port==0 && tr.tcp_port==0 && tr.tls_port==0){
 537                 tr.udp_port=5060;
 538         }
 539
 540         if (tr.udp_port>0 && random_port){
 541                 tr.udp_port=random_port;
 542                 tr.tls_port=tr.tcp_port=0; /*make sure only one transport is active at a time*/
 543         }else if (tr.tcp_port>0 && random_port){
 544                 tr.tcp_port=random_port;
 545                 tr.tls_port=tr.udp_port=0; /*make sure only one transport is active at a time*/
 546         }else if (tr.tls_port>0 && random_port){
 547                 tr.tls_port=random_port;
 548                 tr.udp_port=tr.tcp_port=0; /*make sure only one transport is active at a time*/
 549         }
 550
 551 #ifdef __linux
 552         sal_set_root_ca(lc->sal, lp_config_get_string(lc->config,"sip","root_ca", "/etc/ssl/certs"));
 553 #else
 554         sal_set_root_ca(lc->sal, lp_config_get_string(lc->config,"sip","root_ca", ROOT_CA_FILE));
 555 #endif
 556         linphone_core_verify_server_certificates(lc,lp_config_get_int(lc->config,"sip","verify_server_certs",TRUE));
 557         /*start listening on ports*/
 558         linphone_core_set_sip_transports(lc,&tr);
 559
 560         tmpstr=lp_config_get_string(lc->config,"sip","contact",NULL);
 561         if (tmpstr==NULL || linphone_core_set_primary_contact(lc,tmpstr)==-1) {
 562                 const char *hostname=NULL;
 563                 const char *username=NULL;
 564 #ifdef HAVE_GETENV
 565                 hostname=getenv("HOST");
 566                 username=getenv("USER");
 567                 if (hostname==NULL) hostname=getenv("HOSTNAME");
 568 #endif /*HAVE_GETENV*/
 569                 if (hostname==NULL)
 570                         hostname="unknown-host";
 571                 if (username==NULL){
 572                         username="toto";
 573                 }
 574                 contact=ortp_strdup_printf("sip:%s@%s",username,hostname);
 575                 linphone_core_set_primary_contact(lc,contact);
 576                 ms_free(contact);
 577         }
 578
 579         tmp=lp_config_get_int(lc->config,"sip","guess_hostname",1);
 580         linphone_core_set_guess_hostname(lc,tmp);
 581
 582
 583         tmp=lp_config_get_int(lc->config,"sip","inc_timeout",30);
 584         linphone_core_set_inc_timeout(lc,tmp);
 585
 586         /* get proxies config */
 587         for(i=0;; i++){
 588                 LinphoneProxyConfig *cfg=linphone_proxy_config_new_from_config_file(lc->config,i);
 589                 if (cfg!=NULL){
 590                         linphone_core_add_proxy_config(lc,cfg);
 591                 }else{
 592                         break;
 593                 }
 594         }
 595         /* get the default proxy */
 596         tmp=lp_config_get_int(lc->config,"sip","default_proxy",-1);
 597         linphone_core_set_default_proxy_index(lc,tmp);
 598
 599         /* read authentication information */
 600         for(i=0;; i++){
 601                 LinphoneAuthInfo *ai=linphone_auth_info_new_from_config_file(lc->config,i);
 602                 if (ai!=NULL){
 603                         linphone_core_add_auth_info(lc,ai);
 604                         linphone_auth_info_destroy(ai);
 605                 }else{
 606                         break;
 607                 }
 608         }
 609         /*this is to filter out unsupported encryption schemes*/
 610         linphone_core_set_media_encryption(lc,linphone_core_get_media_encryption(lc));
 611
 612         /*for tuning or test*/
 613         lc->sip_conf.sdp_200_ack=lp_config_get_int(lc->config,"sip","sdp_200_ack",0);
 614         lc->sip_conf.register_only_when_network_is_up=
 615                 lp_config_get_int(lc->config,"sip","register_only_when_network_is_up",1);
 616         lc->sip_conf.ping_with_options=lp_config_get_int(lc->config,"sip","ping_with_options",1);
 617         lc->sip_conf.auto_net_state_mon=lp_config_get_int(lc->config,"sip","auto_net_state_mon",1);
 618         lc->sip_conf.keepalive_period=lp_config_get_int(lc->config,"sip","keepalive_period",10000);
 619         sal_set_keepalive_period(lc->sal,lc->sip_conf.keepalive_period);
 620         sal_use_one_matching_codec_policy(lc->sal,lp_config_get_int(lc->config,"sip","only_one_codec",0));
 621         sal_use_double_registrations(lc->sal,lp_config_get_int(lc->config,"sip","use_double_registrations",1));
 622         sal_set_dscp(lc->sal,linphone_core_get_sip_dscp(lc));
 623 }
 624
 625 static void rtp_config_read(LinphoneCore *lc)
 626 {
 627         int port;
 628         int jitt_comp;
 629         int nortp_timeout;
 630         bool_t rtp_no_xmit_on_audio_mute;
 631         bool_t adaptive_jitt_comp_enabled;
 632
 633         port=lp_config_get_int(lc->config,"rtp","audio_rtp_port",7078);
 634         linphone_core_set_audio_port(lc,port);
 635
 636         port=lp_config_get_int(lc->config,"rtp","video_rtp_port",9078);
 637         if (port==0) port=9078;
 638         linphone_core_set_video_port(lc,port);
 639
 640         jitt_comp=lp_config_get_int(lc->config,"rtp","audio_jitt_comp",60);
 641         linphone_core_set_audio_jittcomp(lc,jitt_comp);
 642         jitt_comp=lp_config_get_int(lc->config,"rtp","video_jitt_comp",60);
 643         if (jitt_comp==0) jitt_comp=60;
 644         linphone_core_set_video_jittcomp(lc,jitt_comp);
 645         nortp_timeout=lp_config_get_int(lc->config,"rtp","nortp_timeout",30);
 646         linphone_core_set_nortp_timeout(lc,nortp_timeout);
 647         rtp_no_xmit_on_audio_mute=lp_config_get_int(lc->config,"rtp","rtp_no_xmit_on_audio_mute",FALSE);
 648         linphone_core_set_rtp_no_xmit_on_audio_mute(lc,rtp_no_xmit_on_audio_mute);
 649         adaptive_jitt_comp_enabled = lp_config_get_int(lc->config, "rtp", "audio_adaptive_jitt_comp_enabled", TRUE);
 650         linphone_core_enable_audio_adaptive_jittcomp(lc, adaptive_jitt_comp_enabled);
 651         adaptive_jitt_comp_enabled = lp_config_get_int(lc->config, "rtp", "video_adaptive_jitt_comp_enabled", TRUE);
 652         linphone_core_enable_video_adaptive_jittcomp(lc, adaptive_jitt_comp_enabled);
 653 }
 654
 655 static PayloadType * find_payload(RtpProfile *prof, const char *mime_type, int clock_rate, int channels, const char *recv_fmtp){
 656         PayloadType *candidate=NULL;
 657         int i;
 658         PayloadType *it;
 659         for(i=0;i<RTP_PROFILE_MAX_PAYLOADS;++i){
 660                 it=rtp_profile_get_payload(prof,i);
 661                 if (it!=NULL && strcasecmp(mime_type,it->mime_type)==0
 662                         && (clock_rate==it->clock_rate || clock_rate<=0)
 663                         && (channels==it->channels || channels<=0) ){
 664                         if ( (recv_fmtp && it->recv_fmtp && strstr(recv_fmtp,it->recv_fmtp)!=NULL) ||
 665                                 (recv_fmtp==NULL && it->recv_fmtp==NULL) ){
 666                                 /*exact match*/
 667                                 if (recv_fmtp) payload_type_set_recv_fmtp(it,recv_fmtp);
 668                                 return it;
 669                         }else {
 670                                 if (candidate){
 671                                         if (it->recv_fmtp==NULL) candidate=it;
 672                                 }else candidate=it;
 673                         }
 674                 }
 675         }
 676         if (candidate && recv_fmtp){
 677                 payload_type_set_recv_fmtp(candidate,recv_fmtp);
 678         }
 679         return candidate;
 680 }
 681
 682 static bool_t get_codec(LpConfig *config, const char* type, int index, PayloadType **ret){
 683         char codeckey[50];
 684         const char *mime,*fmtp;
 685         int rate,channels,enabled;
 686         PayloadType *pt;
 687
 688         *ret=NULL;
 689         snprintf(codeckey,50,"%s_%i",type,index);
 690         mime=lp_config_get_string(config,codeckey,"mime",NULL);
 691         if (mime==NULL || strlen(mime)==0 ) return FALSE;
 692
 693         rate=lp_config_get_int(config,codeckey,"rate",8000);
 694         fmtp=lp_config_get_string(config,codeckey,"recv_fmtp",NULL);
 695         channels=lp_config_get_int(config,codeckey,"channels",0);
 696         enabled=lp_config_get_int(config,codeckey,"enabled",1);
 697         pt=find_payload(&av_profile,mime,rate,channels,fmtp);
 698         if (pt && enabled ) pt->flags|=PAYLOAD_TYPE_ENABLED;
 699         //ms_message("Found codec %s/%i",pt->mime_type,pt->clock_rate);
 700         if (pt==NULL) ms_warning("Ignoring codec config %s/%i with fmtp=%s because unsupported",
 701                         mime,rate,fmtp ? fmtp : "");
 702         *ret=pt;
 703         return TRUE;
 704 }
 705
 706 #define RANK_END 10000
 707 static const char *codec_pref_order[]={
 708         "SILK",
 709         "speex",
 710         "iLBC",
 711         "amr",
 712         "gsm",
 713         "pcmu",
 714         "pcma",
 715         "VP8",
 716         "H264",
 717         "MP4V-ES",
 718         "H263-1998",
 719         NULL,
 720 };
 721
 722 static int find_codec_rank(const char *mime){
 723         int i;
 724         for(i=0;codec_pref_order[i]!=NULL;++i){
 725                 if (strcasecmp(codec_pref_order[i],mime)==0)
 726                         return i;
 727         }
 728         return RANK_END;
 729 }
 730
 731 static int codec_compare(const PayloadType *a, const PayloadType *b){
 732         int ra,rb;
 733         ra=find_codec_rank(a->mime_type);
 734         rb=find_codec_rank(b->mime_type);
 735         if (ra>rb) return 1;
 736         if (ra<rb) return -1;
 737         return 0;
 738 }
 739
 740 static MSList *add_missing_codecs(SalStreamType mtype, MSList *l){
 741         int i;
 742         for(i=0;i<RTP_PROFILE_MAX_PAYLOADS;++i){
 743                 PayloadType *pt=rtp_profile_get_payload(&av_profile,i);
 744                 if (pt){
 745                         if (mtype==SalVideo && pt->type!=PAYLOAD_VIDEO)
 746                                 pt=NULL;
 747                         else if (mtype==SalAudio && (pt->type!=PAYLOAD_AUDIO_PACKETIZED
 748                             && pt->type!=PAYLOAD_AUDIO_CONTINUOUS)){
 749                                 pt=NULL;
 750                         }
 751                         if (pt && ms_filter_codec_supported(pt->mime_type)){
 752                                 if (ms_list_find(l,pt)==NULL){
 753                                         /*unranked codecs are disabled by default*/
 754                                         if (find_codec_rank(pt->mime_type)!=RANK_END){
 755                                                 payload_type_set_flag(pt,PAYLOAD_TYPE_ENABLED);
 756                                         }
 757                                         ms_message("Adding new codec %s/%i with fmtp %s",
 758                                             pt->mime_type,pt->clock_rate,pt->recv_fmtp ? pt->recv_fmtp : "");
 759                                         l=ms_list_insert_sorted(l,pt,(int (*)(const void *, const void *))codec_compare);
 760                                 }
 761                         }
 762                 }
 763         }
 764         return l;
 765 }
 766
 767 static MSList *codec_append_if_new(MSList *l, PayloadType *pt){
 768         MSList *elem;
 769         for (elem=l;elem!=NULL;elem=elem->next){
 770                 PayloadType *ept=(PayloadType*)elem->data;
 771                 if (pt==ept)
 772                         return l;
 773         }
 774         l=ms_list_append(l,pt);
 775         return l;
 776 }
 777
 778 static void codecs_config_read(LinphoneCore *lc)
 779 {
 780         int i;
 781         PayloadType *pt;
 782         MSList *audio_codecs=NULL;
 783         MSList *video_codecs=NULL;
 784         for (i=0;get_codec(lc->config,"audio_codec",i,&pt);i++){
 785                 if (pt){
 786                         if (!ms_filter_codec_supported(pt->mime_type)){
 787                                 ms_warning("Codec %s is not supported by mediastreamer2, removed.",pt->mime_type);
 788                         }else audio_codecs=codec_append_if_new(audio_codecs,pt);
 789                 }
 790         }
 791         audio_codecs=add_missing_codecs(SalAudio,audio_codecs);
 792         for (i=0;get_codec(lc->config,"video_codec",i,&pt);i++){
 793                 if (pt){
 794                         if (!ms_filter_codec_supported(pt->mime_type)){
 795                                 ms_warning("Codec %s is not supported by mediastreamer2, removed.",pt->mime_type);
 796                         }else video_codecs=codec_append_if_new(video_codecs,(void *)pt);
 797                 }
 798         }
 799         video_codecs=add_missing_codecs(SalVideo,video_codecs);
 800         linphone_core_set_audio_codecs(lc,audio_codecs);
 801         linphone_core_set_video_codecs(lc,video_codecs);
 802         linphone_core_update_allocated_audio_bandwidth(lc);
 803 }
 804
 805 static void build_video_devices_table(LinphoneCore *lc){
 806         const MSList *elem;
 807         int i;
 808         int ndev;
 809         const char **devices;
 810         if (lc->video_conf.cams)
 811                 ms_free(lc->video_conf.cams);
 812         /* retrieve all video devices */
 813         elem=ms_web_cam_manager_get_list(ms_web_cam_manager_get());
 814         ndev=ms_list_size(elem);
 815         devices=ms_malloc((ndev+1)*sizeof(const char *));
 816         for (i=0;elem!=NULL;elem=elem->next,i++){
 817                 devices[i]=ms_web_cam_get_string_id((MSWebCam *)elem->data);
 818         }
 819         devices[ndev]=NULL;
 820         lc->video_conf.cams=devices;
 821 }
 822
 823 static void video_config_read(LinphoneCore *lc){
 824 #ifdef VIDEO_ENABLED
 825         int capture, display, self_view;
 826 #endif
 827         const char *str;
 828 #ifdef VIDEO_ENABLED
 829         LinphoneVideoPolicy vpol;
 830 #endif
 831         build_video_devices_table(lc);
 832
 833         str=lp_config_get_string(lc->config,"video","device",NULL);
 834         if (str && str[0]==0) str=NULL;
 835         linphone_core_set_video_device(lc,str);
 836
 837         linphone_core_set_preferred_video_size_by_name(lc,
 838                 lp_config_get_string(lc->config,"video","size","cif"));
 839
 840 #ifdef VIDEO_ENABLED
 841         capture=lp_config_get_int(lc->config,"video","capture",1);
 842         display=lp_config_get_int(lc->config,"video","display",1);
 843         self_view=lp_config_get_int(lc->config,"video","self_view",1);
 844         vpol.automatically_initiate=lp_config_get_int(lc->config,"video","automatically_initiate",1);
 845         vpol.automatically_accept=lp_config_get_int(lc->config,"video","automatically_accept",1);
 846         lc->video_conf.displaytype=lp_config_get_string(lc->config,"video","displaytype",NULL);
 847         if(lc->video_conf.displaytype)
 848                 ms_message("we are using a specific display:%s\n",lc->video_conf.displaytype);
 849
 850         linphone_core_enable_video(lc,capture,display);
 851         linphone_core_enable_video_preview(lc,lp_config_get_int(lc->config,"video","show_local",0));
 852         linphone_core_enable_self_view(lc,self_view);
 853         linphone_core_set_video_policy(lc,&vpol);
 854 #endif
 855 }
 856
 857 static void ui_config_read(LinphoneCore *lc)
 858 {
 859         LinphoneFriend *lf;
 860         int i;
 861         for (i=0;(lf=linphone_friend_new_from_config_file(lc,i))!=NULL;i++){
 862                 linphone_core_add_friend(lc,lf);
 863         }
 864         call_logs_read_from_config_file(lc);
 865 }
 866
 867 /*
 868 static void autoreplier_config_init(LinphoneCore *lc)
 869 {
 870         autoreplier_config_t *config=&lc->autoreplier_conf;
 871         config->enabled=lp_config_get_int(lc->config,"autoreplier","enabled",0);
 872         config->after_seconds=lp_config_get_int(lc->config,"autoreplier","after_seconds",6);
 873         config->max_users=lp_config_get_int(lc->config,"autoreplier","max_users",1);
 874         config->max_rec_time=lp_config_get_int(lc->config,"autoreplier","max_rec_time",60);
 875         config->max_rec_msg=lp_config_get_int(lc->config,"autoreplier","max_rec_msg",10);
 876         config->message=lp_config_get_string(lc->config,"autoreplier","message",NULL);
 877 }
 878 */
 879
 880 bool_t linphone_core_tunnel_available(void){
 881 #ifdef TUNNEL_ENABLED
 882         return TRUE;
 883 #else
 884         return FALSE;
 885 #endif
 886 }
 887
 888 /**
 889  * Enable adaptive rate control (experimental feature, audio-only).
 890  *
 891  * Adaptive rate control consists in using RTCP feedback provided information to dynamically
 892  * control the output bitrate of the encoders, so that we can adapt to the network conditions and
 893  * available bandwidth.
 894 **/
 895 void linphone_core_enable_adaptive_rate_control(LinphoneCore *lc, bool_t enabled){
 896         lp_config_set_int(lc->config,"net","adaptive_rate_control",(int)enabled);
 897 }
 898
 899 /**
 900  * Returns whether adaptive rate control is enabled.
 901  *
 902  * See linphone_core_enable_adaptive_rate_control().
 903 **/
 904 bool_t linphone_core_adaptive_rate_control_enabled(const LinphoneCore *lc){
 905         return lp_config_get_int(lc->config,"net","adaptive_rate_control",TRUE);
 906 }
 907
 908 bool_t linphone_core_rtcp_enabled(const LinphoneCore *lc){
 909         return lp_config_get_int(lc->config,"rtp","rtcp_enabled",TRUE);
 910 }
 911
 912 /**
 913  * Sets maximum available download bandwidth
 914  *
 915  * @ingroup media_parameters
 916  *
 917  * This is IP bandwidth, in kbit/s.
 918  * This information is used signaled to other parties during
 919  * calls (within SDP messages) so that the remote end can have
 920  * sufficient knowledge to properly configure its audio & video
 921  * codec output bitrate to not overflow available bandwidth.
 922  *
 923  * @param lc the LinphoneCore object
 924  * @param bw the bandwidth in kbits/s, 0 for infinite
 925  */
 926 void linphone_core_set_download_bandwidth(LinphoneCore *lc, int bw){
 927         lc->net_conf.download_bw=bw;
 928         if (linphone_core_ready(lc)) lp_config_set_int(lc->config,"net","download_bw",bw);
 929 }
 930
 931 /**
 932  * Sets maximum available upload bandwidth
 933  *
 934  * @ingroup media_parameters
 935  *
 936  * This is IP bandwidth, in kbit/s.
 937  * This information is used by liblinphone together with remote
 938  * side available bandwidth signaled in SDP messages to properly
 939  * configure audio & video codec's output bitrate.
 940  *
 941  * @param lc the LinphoneCore object
 942  * @param bw the bandwidth in kbits/s, 0 for infinite
 943  */
 944 void linphone_core_set_upload_bandwidth(LinphoneCore *lc, int bw){
 945         lc->net_conf.upload_bw=bw;
 946         if (linphone_core_ready(lc)) lp_config_set_int(lc->config,"net","upload_bw",bw);
 947 }
 948
 949 /**
 950  * Retrieve the maximum available download bandwidth.
 951  *
 952  * @ingroup media_parameters
 953  *
 954  * This value was set by linphone_core_set_download_bandwidth().
 955  *
 956 **/
 957 int linphone_core_get_download_bandwidth(const LinphoneCore *lc){
 958         return lc->net_conf.download_bw;
 959 }
 960
 961 /**
 962  * Retrieve the maximum available upload bandwidth.
 963  *
 964  * @ingroup media_parameters
 965  *
 966  * This value was set by linphone_core_set_upload_bandwidth().
 967  *
 968 **/
 969 int linphone_core_get_upload_bandwidth(const LinphoneCore *lc){
 970         return lc->net_conf.upload_bw;
 971 }
 972 /**
 973  * Set audio packetization time linphone expects to receive from peer
 974  */
 975 void linphone_core_set_download_ptime(LinphoneCore *lc, int ptime) {
 976         lp_config_set_int(lc->config,"rtp","download_ptime",ptime);
 977 }
 978
 979 /**
 980  * Get audio packetization time linphone expects to receive from peer
 981  */
 982 int linphone_core_get_download_ptime(LinphoneCore *lc) {
 983         return lp_config_get_int(lc->config,"rtp","download_ptime",0);
 984 }
 985
 986 /**
 987  * Set audio packetization time linphone will send (in absence of requirement from peer)
 988  * A value of 0 stands for the current codec default packetization time.
 989  *
 990 **/
 991 void linphone_core_set_upload_ptime(LinphoneCore *lc, int ptime){
 992         lp_config_set_int(lc->config,"rtp","upload_ptime",ptime);
 993 }
 994
 995 /**
 996  * Set audio packetization time linphone will send (in absence of requirement from peer)
 997  * A value of 0 stands for the current codec default packetization time.
 998  *
 999 **/
1000 int linphone_core_get_upload_ptime(LinphoneCore *lc){
1001         return lp_config_get_int(lc->config,"rtp","upload_ptime",0);
1002 }
1003
1004
1005
1006 /**
1007  * Returns liblinphone's version as a string.
1008  *
1009  * @ingroup misc
1010  *
1011 **/
1012 const char * linphone_core_get_version(void){
1013         return liblinphone_version;
1014 }
1015
1016 static void linphone_core_assign_payload_type(LinphoneCore *lc, PayloadType *const_pt, int number, const char *recv_fmtp){
1017         PayloadType *pt;
1018         pt=payload_type_clone(const_pt);
1019         if (number==-1){
1020                 /*look for a free number */
1021                 MSList *elem;
1022                 int i;
1023                 for(i=lc->dyn_pt;i<RTP_PROFILE_MAX_PAYLOADS;++i){
1024                         bool_t already_assigned=FALSE;
1025                         for(elem=lc->payload_types;elem!=NULL;elem=elem->next){
1026                                 PayloadType *it=(PayloadType*)elem->data;
1027                                 if (payload_type_get_number(it)==i){
1028                                         already_assigned=TRUE;
1029                                         break;
1030                                 }
1031                         }
1032                         if (!already_assigned){
1033                                 number=i;
1034                                 lc->dyn_pt=i+1;
1035                                 break;
1036                         }
1037                 }
1038                 if (number==-1){
1039                         ms_fatal("FIXME: too many codecs, no more free numbers.");
1040                 }
1041         }
1042         ms_message("assigning %s/%i payload type number %i",pt->mime_type,pt->clock_rate,number);
1043         payload_type_set_number(pt,number);
1044         if (recv_fmtp!=NULL) payload_type_set_recv_fmtp(pt,recv_fmtp);
1045         rtp_profile_set_payload(&av_profile,number,pt);
1046         lc->payload_types=ms_list_append(lc->payload_types,pt);
1047 }
1048
1049 static void linphone_core_handle_static_payloads(LinphoneCore *lc){
1050         RtpProfile *prof=&av_profile;
1051         int i;
1052         for(i=0;i<RTP_PROFILE_MAX_PAYLOADS;++i){
1053                 PayloadType *pt=rtp_profile_get_payload(prof,i);
1054                 if (pt){
1055                         if (payload_type_get_number(pt)!=i){
1056                                 linphone_core_assign_payload_type(lc,pt,i,NULL);
1057                         }
1058                 }
1059         }
1060 }
1061
1062 static void linphone_core_free_payload_types(LinphoneCore *lc){
1063         ms_list_for_each(lc->payload_types,(void (*)(void*))payload_type_destroy);
1064         ms_list_free(lc->payload_types);
1065         lc->payload_types=NULL;
1066 }
1067
1068 void linphone_core_set_state(LinphoneCore *lc, LinphoneGlobalState gstate, const char *message){
1069         lc->state=gstate;
1070         if (lc->vtable.global_state_changed){
1071                 lc->vtable.global_state_changed(lc,gstate,message);
1072         }
1073 }
1074 static void misc_config_read (LinphoneCore *lc) {
1075         LpConfig *config=lc->config;
1076     lc->max_call_logs=lp_config_get_int(config,"misc","history_max_size",15);
1077     lc->max_calls=lp_config_get_int(config,"misc","max_calls",NB_MAX_CALLS);
1078 }
1079
1080
1081
1082
1083 static void linphone_core_init (LinphoneCore * lc, const LinphoneCoreVTable *vtable, const char *config_path,
1084     const char *factory_config_path, void * userdata)
1085 {
1086         memset (lc, 0, sizeof (LinphoneCore));
1087         lc->data=userdata;
1088         lc->ringstream_autorelease=TRUE;
1089
1090         memcpy(&lc->vtable,vtable,sizeof(LinphoneCoreVTable));
1091
1092         linphone_core_set_state(lc,LinphoneGlobalStartup,"Starting up");
1093         ortp_init();
1094         lc->dyn_pt=96;
1095         linphone_core_assign_payload_type(lc,&payload_type_pcmu8000,0,NULL);
1096         linphone_core_assign_payload_type(lc,&payload_type_gsm,3,NULL);
1097         linphone_core_assign_payload_type(lc,&payload_type_pcma8000,8,NULL);
1098         linphone_core_assign_payload_type(lc,&payload_type_speex_nb,110,"vbr=on");
1099         linphone_core_assign_payload_type(lc,&payload_type_speex_wb,111,"vbr=on");
1100         linphone_core_assign_payload_type(lc,&payload_type_speex_uwb,112,"vbr=on");
1101         linphone_core_assign_payload_type(lc,&payload_type_telephone_event,101,"0-11");
1102         linphone_core_assign_payload_type(lc,&payload_type_g722,9,NULL);
1103
1104 #if defined(ANDROID) || defined (__IPHONE_OS_VERSION_MIN_REQUIRED)
1105         /*shorten the DNS lookup time and send more retransmissions on mobiles:
1106          - to workaround potential packet losses
1107          - to avoid hanging for 30 seconds when the network doesn't work despite the phone thinks it does.
1108          */
1109         _linphone_core_configure_resolver();
1110 #endif
1111
1112 #ifdef ENABLE_NONSTANDARD_GSM
1113         {
1114                 PayloadType *pt;
1115                 pt=payload_type_clone(&payload_type_gsm);
1116                 pt->clock_rate=11025;
1117                 linphone_core_assign_payload_type(lc,pt,-1,NULL);
1118                 pt->clock_rate=22050;
1119                 linphone_core_assign_payload_type(lc,pt,-1,NULL);
1120                 payload_type_destroy(pt);
1121         }
1122 #endif
1123
1124 #ifdef VIDEO_ENABLED
1125         linphone_core_assign_payload_type(lc,&payload_type_h263,34,NULL);
1126         linphone_core_assign_payload_type(lc,&payload_type_theora,97,NULL);
1127         linphone_core_assign_payload_type(lc,&payload_type_h263_1998,98,"CIF=1;QCIF=1");
1128         linphone_core_assign_payload_type(lc,&payload_type_mp4v,99,"profile-level-id=3");
1129         linphone_core_assign_payload_type(lc,&payload_type_h264,102,"profile-level-id=428014");
1130         linphone_core_assign_payload_type(lc,&payload_type_vp8,103,NULL);
1131         linphone_core_assign_payload_type(lc,&payload_type_x_snow,-1,NULL);
1132         /* due to limited space in SDP, we have to disable this h264 line which is normally no more necessary */
1133         /* linphone_core_assign_payload_type(&payload_type_h264,-1,"packetization-mode=1;profile-level-id=428014");*/
1134 #endif
1135
1136         /*add all payload type for which we don't care about the number */
1137         linphone_core_assign_payload_type(lc,&payload_type_ilbc,-1,"mode=30");
1138         linphone_core_assign_payload_type(lc,&payload_type_amr,-1,"octet-align=1");
1139         linphone_core_assign_payload_type(lc,&payload_type_amrwb,-1,"octet-align=1");
1140         linphone_core_assign_payload_type(lc,&payload_type_lpc1015,-1,NULL);
1141         linphone_core_assign_payload_type(lc,&payload_type_g726_16,-1,NULL);
1142         linphone_core_assign_payload_type(lc,&payload_type_g726_24,-1,NULL);
1143         linphone_core_assign_payload_type(lc,&payload_type_g726_32,-1,NULL);
1144         linphone_core_assign_payload_type(lc,&payload_type_g726_40,-1,NULL);
1145         linphone_core_assign_payload_type(lc,&payload_type_aal2_g726_16,-1,NULL);
1146         linphone_core_assign_payload_type(lc,&payload_type_aal2_g726_24,-1,NULL);
1147         linphone_core_assign_payload_type(lc,&payload_type_aal2_g726_32,-1,NULL);
1148         linphone_core_assign_payload_type(lc,&payload_type_aal2_g726_40,-1,NULL);
1149         linphone_core_assign_payload_type(lc,&payload_type_silk_nb,-1,NULL);
1150         linphone_core_assign_payload_type(lc,&payload_type_silk_mb,-1,NULL);
1151         linphone_core_assign_payload_type(lc,&payload_type_silk_wb,-1,NULL);
1152         linphone_core_assign_payload_type(lc,&payload_type_silk_swb,-1,NULL);
1153         linphone_core_assign_payload_type(lc,&payload_type_g729,18,"annexb=no");
1154         linphone_core_handle_static_payloads(lc);
1155
1156         ms_init();
1157         /* create a mediastreamer2 event queue and set it as global */
1158         /* This allows to run event's callback in linphone_core_iterate() */
1159         lc->msevq=ms_event_queue_new();
1160         ms_set_global_event_queue(lc->msevq);
1161
1162         lc->config=lp_config_new(config_path);
1163         if (factory_config_path)
1164                 lp_config_read_file(lc->config,factory_config_path);
1165
1166         lc->sal=sal_init();
1167         sal_set_user_pointer(lc->sal,lc);
1168         sal_set_callbacks(lc->sal,&linphone_sal_callbacks);
1169
1170         sip_setup_register_all();
1171         sound_config_read(lc);
1172         net_config_read(lc);
1173         rtp_config_read(lc);
1174         codecs_config_read(lc);
1175         sip_config_read(lc); /* this will start eXosip*/
1176         video_config_read(lc);
1177         //autoreplier_config_init(&lc->autoreplier_conf);
1178         lc->presence_mode=LinphoneStatusOnline;
1179         misc_config_read(lc);
1180         ui_config_read(lc);
1181 #ifdef TUNNEL_ENABLED
1182         lc->tunnel=linphone_core_tunnel_new(lc);
1183         if (lc->tunnel) linphone_tunnel_configure(lc->tunnel);
1184 #endif
1185         if (lc->vtable.display_status)
1186                 lc->vtable.display_status(lc,_("Ready"));
1187         lc->auto_net_state_mon=lc->sip_conf.auto_net_state_mon;
1188         linphone_core_set_state(lc,LinphoneGlobalOn,"Ready");
1189 }
1190
1191 /**
1192  * Instanciates a LinphoneCore object.
1193  * @ingroup initializing
1194  *
1195  * The LinphoneCore object is the primary handle for doing all phone actions.
1196  * It should be unique within your application.
1197  * @param vtable a LinphoneCoreVTable structure holding your application callbacks
1198  * @param config_path a path to a config file. If it does not exists it will be created.
1199  *        The config file is used to store all settings, call logs, friends, proxies... so that all these settings
1200  *             become persistent over the life of the LinphoneCore object.
1201  *             It is allowed to set a NULL config file. In that case LinphoneCore will not store any settings.
1202  * @param factory_config_path a path to a read-only config file that can be used to
1203  *        to store hard-coded preference such as proxy settings or internal preferences.
1204  *        The settings in this factory file always override the one in the normal config file.
1205  *        It is OPTIONAL, use NULL if unneeded.
1206  * @param userdata an opaque user pointer that can be retrieved at any time (for example in
1207  *        callbacks) using linphone_core_get_user_data().
1208  *
1209 **/
1210 LinphoneCore *linphone_core_new(const LinphoneCoreVTable *vtable,
1211                                                 const char *config_path, const char *factory_config_path, void * userdata)
1212 {
1213         LinphoneCore *core=ms_new(LinphoneCore,1);
1214         linphone_core_init(core,vtable,config_path, factory_config_path, userdata);
1215         return core;
1216 }
1217
1218 /**
1219  * Returns the list of available audio codecs.
1220  *
1221  * This list is unmodifiable. The ->data field of the MSList points a PayloadType
1222  * structure holding the codec information.
1223  * It is possible to make copy of the list with ms_list_copy() in order to modify it
1224  * (such as the order of codecs).
1225 **/
1226 const MSList *linphone_core_get_audio_codecs(const LinphoneCore *lc)
1227 {
1228         return lc->codecs_conf.audio_codecs;
1229 }
1230
1231 /**
1232  * Returns the list of available video codecs.
1233  *
1234  * This list is unmodifiable. The ->data field of the MSList points a PayloadType
1235  * structure holding the codec information.
1236  * It is possible to make copy of the list with ms_list_copy() in order to modify it
1237  * (such as the order of codecs).
1238 **/
1239 const MSList *linphone_core_get_video_codecs(const LinphoneCore *lc)
1240 {
1241         return lc->codecs_conf.video_codecs;
1242 }
1243
1244 /**
1245  * Sets the local "from" identity.
1246  *
1247  * @ingroup proxies
1248  * This data is used in absence of any proxy configuration or when no
1249  * default proxy configuration is set. See LinphoneProxyConfig
1250 **/
1251 int linphone_core_set_primary_contact(LinphoneCore *lc, const char *contact)
1252 {
1253         LinphoneAddress *ctt;
1254
1255         if ((ctt=linphone_address_new(contact))==0) {
1256                 ms_error("Bad contact url: %s",contact);
1257                 return -1;
1258         }
1259         if (lc->sip_conf.contact!=NULL) ms_free(lc->sip_conf.contact);
1260         lc->sip_conf.contact=ms_strdup(contact);
1261         if (lc->sip_conf.guessed_contact!=NULL){
1262                 ms_free(lc->sip_conf.guessed_contact);
1263                 lc->sip_conf.guessed_contact=NULL;
1264         }
1265         linphone_address_destroy(ctt);
1266         return 0;
1267 }
1268
1269
1270 /*result must be an array of chars at least LINPHONE_IPADDR_SIZE */
1271 void linphone_core_get_local_ip(LinphoneCore *lc, const char *dest, char *result){
1272         const char *ip;
1273         if (linphone_core_get_firewall_policy(lc)==LinphonePolicyUseNatAddress
1274             && (ip=linphone_core_get_nat_address_resolved(lc))!=NULL){
1275                 strncpy(result,ip,LINPHONE_IPADDR_SIZE);
1276                 return;
1277         }
1278         if (linphone_core_get_local_ip_for(lc->sip_conf.ipv6_enabled ? AF_INET6 : AF_INET,dest,result)==0)
1279                 return;
1280         /*else fallback to SAL routine that will attempt to find the most realistic interface */
1281         sal_get_default_local_ip(lc->sal,lc->sip_conf.ipv6_enabled ? AF_INET6 : AF_INET,result,LINPHONE_IPADDR_SIZE);
1282 }
1283
1284 static void update_primary_contact(LinphoneCore *lc){
1285         char *guessed=NULL;
1286         char tmp[LINPHONE_IPADDR_SIZE];
1287
1288         LinphoneAddress *url;
1289         if (lc->sip_conf.guessed_contact!=NULL){
1290                 ms_free(lc->sip_conf.guessed_contact);
1291                 lc->sip_conf.guessed_contact=NULL;
1292         }
1293         url=linphone_address_new(lc->sip_conf.contact);
1294         if (!url){
1295                 ms_error("Could not parse identity contact !");
1296                 url=linphone_address_new("sip:unknown@unkwownhost");
1297         }
1298         linphone_core_get_local_ip(lc, NULL, tmp);
1299         if (strcmp(tmp,"127.0.0.1")==0 || strcmp(tmp,"::1")==0 ){
1300                 ms_warning("Local loopback network only !");
1301                 lc->sip_conf.loopback_only=TRUE;
1302         }else lc->sip_conf.loopback_only=FALSE;
1303         linphone_address_set_domain(url,tmp);
1304         linphone_address_set_port_int(url,linphone_core_get_sip_port (lc));
1305         guessed=linphone_address_as_string(url);
1306         lc->sip_conf.guessed_contact=guessed;
1307         linphone_address_destroy(url);
1308 }
1309
1310 /**
1311  * Returns the default identity when no proxy configuration is used.
1312  *
1313  * @ingroup proxies
1314 **/
1315 const char *linphone_core_get_primary_contact(LinphoneCore *lc){
1316         char *identity;
1317
1318         if (lc->sip_conf.guess_hostname){
1319                 if (lc->sip_conf.guessed_contact==NULL || lc->sip_conf.loopback_only){
1320                         update_primary_contact(lc);
1321                 }
1322                 identity=lc->sip_conf.guessed_contact;
1323         }else{
1324                 identity=lc->sip_conf.contact;
1325         }
1326         return identity;
1327 }
1328
1329 /**
1330  * Tells LinphoneCore to guess local hostname automatically in primary contact.
1331  *
1332  * @ingroup proxies
1333 **/
1334 void linphone_core_set_guess_hostname(LinphoneCore *lc, bool_t val){
1335         lc->sip_conf.guess_hostname=val;
1336 }
1337
1338 /**
1339  * Returns TRUE if hostname part of primary contact is guessed automatically.
1340  *
1341  * @ingroup proxies
1342 **/
1343 bool_t linphone_core_get_guess_hostname(LinphoneCore *lc){
1344         return lc->sip_conf.guess_hostname;
1345 }
1346
1347 /**
1348  * Same as linphone_core_get_primary_contact() but the result is a LinphoneAddress object
1349  * instead of const char*
1350  *
1351  * @ingroup proxies
1352 **/
1353 LinphoneAddress *linphone_core_get_primary_contact_parsed(LinphoneCore *lc){
1354         return linphone_address_new(linphone_core_get_primary_contact(lc));
1355 }
1356
1357 /**
1358  * Sets the list of audio codecs.
1359  *
1360  * @ingroup media_parameters
1361  * The list is taken by the LinphoneCore thus the application should not free it.
1362  * This list is made of struct PayloadType describing the codec parameters.
1363 **/
1364 int linphone_core_set_audio_codecs(LinphoneCore *lc, MSList *codecs)
1365 {
1366         if (lc->codecs_conf.audio_codecs!=NULL) ms_list_free(lc->codecs_conf.audio_codecs);
1367         lc->codecs_conf.audio_codecs=codecs;
1368         _linphone_core_codec_config_write(lc);
1369         return 0;
1370 }
1371
1372 /**
1373  * Sets the list of video codecs.
1374  *
1375  * @ingroup media_parameters
1376  * The list is taken by the LinphoneCore thus the application should not free it.
1377  * This list is made of struct PayloadType describing the codec parameters.
1378 **/
1379 int linphone_core_set_video_codecs(LinphoneCore *lc, MSList *codecs)
1380 {
1381         if (lc->codecs_conf.video_codecs!=NULL) ms_list_free(lc->codecs_conf.video_codecs);
1382         lc->codecs_conf.video_codecs=codecs;
1383         _linphone_core_codec_config_write(lc);
1384         return 0;
1385 }
1386
1387 const MSList * linphone_core_get_friend_list(const LinphoneCore *lc)
1388 {
1389         return lc->friends;
1390 }
1391
1392 void linphone_core_enable_audio_adaptive_jittcomp(LinphoneCore* lc, bool_t val)
1393 {
1394         lc->rtp_conf.audio_adaptive_jitt_comp_enabled = val;
1395 }
1396
1397 bool_t linphone_core_audio_adaptive_jittcomp_enabled(LinphoneCore* lc)
1398 {
1399         return lc->rtp_conf.audio_adaptive_jitt_comp_enabled;
1400 }
1401
1402 /**
1403  * Returns the nominal audio jitter buffer size in milliseconds.
1404  *
1405  * @ingroup media_parameters
1406 **/
1407 int linphone_core_get_audio_jittcomp(LinphoneCore *lc)
1408 {
1409         return lc->rtp_conf.audio_jitt_comp;
1410 }
1411
1412 void linphone_core_enable_video_adaptive_jittcomp(LinphoneCore* lc, bool_t val)
1413 {
1414         lc->rtp_conf.video_adaptive_jitt_comp_enabled = val;
1415 }
1416
1417 bool_t linphone_core_video_adaptive_jittcomp_enabled(LinphoneCore* lc)
1418 {
1419         return lc->rtp_conf.video_adaptive_jitt_comp_enabled;
1420 }
1421
1422 /**
1423  * Returns the nominal video jitter buffer size in milliseconds.
1424  *
1425  * @ingroup media_parameters
1426 **/
1427 int linphone_core_get_video_jittcomp(LinphoneCore *lc)
1428 {
1429         return lc->rtp_conf.video_jitt_comp;
1430 }
1431
1432 /**
1433  * Returns the UDP port used for audio streaming.
1434  *
1435  * @ingroup network_parameters
1436 **/
1437 int linphone_core_get_audio_port(const LinphoneCore *lc)
1438 {
1439         return lc->rtp_conf.audio_rtp_port;
1440 }
1441
1442 /**
1443  * Returns the UDP port used for video streaming.
1444  *
1445  * @ingroup network_parameters
1446 **/
1447 int linphone_core_get_video_port(const LinphoneCore *lc){
1448         return lc->rtp_conf.video_rtp_port;
1449 }
1450
1451
1452 /**
1453  * Returns the value in seconds of the no-rtp timeout.
1454  *
1455  * @ingroup media_parameters
1456  * When no RTP or RTCP packets have been received for a while
1457  * LinphoneCore will consider the call is broken (remote end crashed or
1458  * disconnected from the network), and thus will terminate the call.
1459  * The no-rtp timeout is the duration above which the call is considered broken.
1460 **/
1461 int linphone_core_get_nortp_timeout(const LinphoneCore *lc){
1462         return lc->rtp_conf.nortp_timeout;
1463 }
1464
1465 bool_t linphone_core_get_rtp_no_xmit_on_audio_mute(const LinphoneCore *lc){
1466         return lc->rtp_conf.rtp_no_xmit_on_audio_mute;
1467 }
1468
1469 /**
1470  * Sets the nominal audio jitter buffer size in milliseconds.
1471  *
1472  * @ingroup media_parameters
1473 **/
1474 void linphone_core_set_audio_jittcomp(LinphoneCore *lc, int value)
1475 {
1476         lc->rtp_conf.audio_jitt_comp=value;
1477 }
1478
1479 /**
1480  * Sets the nominal video jitter buffer size in milliseconds.
1481  *
1482  * @ingroup media_parameters
1483 **/
1484 void linphone_core_set_video_jittcomp(LinphoneCore *lc, int value)
1485 {
1486         lc->rtp_conf.video_jitt_comp=value;
1487 }
1488
1489 void linphone_core_set_rtp_no_xmit_on_audio_mute(LinphoneCore *lc,bool_t rtp_no_xmit_on_audio_mute){
1490         lc->rtp_conf.rtp_no_xmit_on_audio_mute=rtp_no_xmit_on_audio_mute;
1491 }
1492
1493 /**
1494  * Sets the UDP port used for audio streaming.
1495  *
1496  * @ingroup network_parameters
1497 **/
1498 void linphone_core_set_audio_port(LinphoneCore *lc, int port)
1499 {
1500         lc->rtp_conf.audio_rtp_port=port;
1501 }
1502
1503 /**
1504  * Sets the UDP port used for video streaming.
1505  *
1506  * @ingroup network_parameters
1507 **/
1508 void linphone_core_set_video_port(LinphoneCore *lc, int port){
1509         lc->rtp_conf.video_rtp_port=port;
1510 }
1511
1512 /**
1513  * Sets the no-rtp timeout value in seconds.
1514  *
1515  * @ingroup media_parameters
1516  * See linphone_core_get_nortp_timeout() for details.
1517 **/
1518 void linphone_core_set_nortp_timeout(LinphoneCore *lc, int nortp_timeout){
1519         lc->rtp_conf.nortp_timeout=nortp_timeout;
1520 }
1521
1522 /**
1523  * Indicates whether SIP INFO is used for sending digits.
1524  *
1525  * @ingroup media_parameters
1526 **/
1527 bool_t linphone_core_get_use_info_for_dtmf(LinphoneCore *lc)
1528 {
1529         return lc->sip_conf.use_info;
1530 }
1531
1532 /**
1533  * Sets whether SIP INFO is to be used for sending digits.
1534  *
1535  * @ingroup media_parameters
1536 **/
1537 void linphone_core_set_use_info_for_dtmf(LinphoneCore *lc,bool_t use_info)
1538 {
1539         lc->sip_conf.use_info=use_info;
1540 }
1541
1542 /**
1543  * Indicates whether RFC2833 is used for sending digits.
1544  *
1545  * @ingroup media_parameters
1546 **/
1547 bool_t linphone_core_get_use_rfc2833_for_dtmf(LinphoneCore *lc)
1548 {
1549         return lc->sip_conf.use_rfc2833;
1550 }
1551
1552 /**
1553  * Sets whether RFC2833 is to be used for sending digits.
1554  *
1555  * @ingroup media_parameters
1556 **/
1557 void linphone_core_set_use_rfc2833_for_dtmf(LinphoneCore *lc,bool_t use_rfc2833)
1558 {
1559         lc->sip_conf.use_rfc2833=use_rfc2833;
1560 }
1561
1562 /**
1563  * Returns the UDP port used by SIP.
1564  *
1565  * Deprecated: use linphone_core_get_sip_transports() instead.
1566  * @ingroup network_parameters
1567 **/
1568 int linphone_core_get_sip_port(LinphoneCore *lc)
1569 {
1570         LCSipTransports *tr=&lc->sip_conf.transports;
1571         return tr->udp_port>0 ? tr->udp_port : (tr->tcp_port > 0 ? tr->tcp_port : tr->tls_port);
1572 }
1573
1574 static char _ua_name[64]="Linphone";
1575 static char _ua_version[64]=LINPHONE_VERSION;
1576
1577 #ifdef HAVE_EXOSIP_GET_VERSION
1578 extern const char *eXosip_get_version();
1579 #endif
1580
1581 static void apply_user_agent(LinphoneCore *lc){
1582         char ua_string[256];
1583         snprintf(ua_string,sizeof(ua_string)-1,"%s/%s (eXosip2/%s)",_ua_name,_ua_version,
1584 #ifdef HAVE_EXOSIP_GET_VERSION
1585                  eXosip_get_version()
1586 #else
1587                  "unknown"
1588 #endif
1589         );
1590         if (lc->sal) sal_set_user_agent(lc->sal,ua_string);
1591 }
1592
1593 /**
1594  * Sets the user agent string used in SIP messages.
1595  *
1596  * @ingroup misc
1597 **/
1598 void linphone_core_set_user_agent(const char *name, const char *ver){
1599         strncpy(_ua_name,name,sizeof(_ua_name)-1);
1600         strncpy(_ua_version,ver,sizeof(_ua_version));
1601 }
1602
1603 const char *linphone_core_get_user_agent_name(void){
1604         return _ua_name;
1605 }
1606
1607 const char *linphone_core_get_user_agent_version(void){
1608         return _ua_version;
1609 }
1610
1611 static void transport_error(LinphoneCore *lc, const char* transport, int port){
1612         char *msg=ortp_strdup_printf("Could not start %s transport on port %i, maybe this port is already used.",transport,port);
1613         ms_warning("%s",msg);
1614         if (lc->vtable.display_warning)
1615                 lc->vtable.display_warning(lc,msg);
1616         ms_free(msg);
1617 }
1618
1619 static bool_t transports_unchanged(const LCSipTransports * tr1, const LCSipTransports * tr2){
1620         return
1621                 tr2->udp_port==tr1->udp_port &&
1622                 tr2->tcp_port==tr1->tcp_port &&
1623                 tr2->dtls_port==tr1->dtls_port &&
1624                 tr2->tls_port==tr1->tls_port;
1625 }
1626
1627 static int apply_transports(LinphoneCore *lc){
1628         Sal *sal=lc->sal;
1629         const char *anyaddr;
1630         LCSipTransports *tr=&lc->sip_conf.transports;
1631
1632         /*first of all invalidate all current registrations so that we can register again with new transports*/
1633         __linphone_core_invalidate_registers(lc);
1634
1635         if (lc->sip_conf.ipv6_enabled)
1636                 anyaddr="::0";
1637         else
1638                 anyaddr="0.0.0.0";
1639
1640         sal_unlisten_ports(sal);
1641         if (tr->udp_port>0){
1642                 if (sal_listen_port (sal,anyaddr,tr->udp_port,SalTransportUDP,FALSE)!=0){
1643                         transport_error(lc,"udp",tr->udp_port);
1644                         return -1;
1645                 }
1646         }
1647         if (tr->tcp_port>0){
1648                 if (sal_listen_port (sal,anyaddr,tr->tcp_port,SalTransportTCP,FALSE)!=0){
1649                         transport_error(lc,"tcp",tr->tcp_port);
1650                 }
1651         }
1652         if (tr->tls_port>0){
1653                 if (sal_listen_port (sal,anyaddr,tr->tls_port,SalTransportTLS,TRUE)!=0){
1654                         transport_error(lc,"tls",tr->tls_port);
1655                 }
1656         }
1657         apply_user_agent(lc);
1658         return 0;
1659 }
1660
1661 /**
1662  * Sets the ports to be used for each of transport (UDP or TCP)
1663  *
1664  * A zero value port for a given transport means the transport
1665  * is not used.
1666  *
1667  * @ingroup network_parameters
1668 **/
1669 int linphone_core_set_sip_transports(LinphoneCore *lc, const LCSipTransports * tr){
1670
1671         if (transports_unchanged(tr,&lc->sip_conf.transports))
1672                 return 0;
1673         memcpy(&lc->sip_conf.transports,tr,sizeof(*tr));
1674
1675         if (linphone_core_ready(lc)){
1676                 lp_config_set_int(lc->config,"sip","sip_port",tr->udp_port);
1677                 lp_config_set_int(lc->config,"sip","sip_tcp_port",tr->tcp_port);
1678                 lp_config_set_int(lc->config,"sip","sip_tls_port",tr->tls_port);
1679         }
1680
1681         if (lc->sal==NULL) return 0;
1682         return apply_transports(lc);
1683 }
1684
1685 /**
1686  * Retrieves the ports used for each transport (udp, tcp).
1687  * A zero value port for a given transport means the transport
1688  * is not used.
1689  * @ingroup network_parameters
1690 **/
1691 int linphone_core_get_sip_transports(LinphoneCore *lc, LCSipTransports *tr){
1692         memcpy(tr,&lc->sip_conf.transports,sizeof(*tr));
1693         return 0;
1694 }
1695
1696 /**
1697  * Set a non null value to the enabled transports.
1698 **/
1699 int linphone_core_get_transports_supported(LinphoneCore *lc, LCSipTransports *transports) {
1700         transports->udp_port=sal_is_transport_enabled(lc->sal, SalTransportUDP);
1701         transports->tcp_port=sal_is_transport_enabled(lc->sal, SalTransportTCP);
1702         transports->tls_port=sal_is_transport_enabled(lc->sal, SalTransportTLS);
1703         transports->dtls_port=sal_is_transport_enabled(lc->sal, SalTransportDTLS);
1704         return 0;
1705 }
1706
1707 /**
1708  * Sets the UDP port to be used by SIP.
1709  *
1710  * Deprecated: use linphone_core_set_sip_transports() instead.
1711  * @ingroup network_parameters
1712 **/
1713 void linphone_core_set_sip_port(LinphoneCore *lc,int port)
1714 {
1715         LCSipTransports tr;
1716         memset(&tr,0,sizeof(tr));
1717         tr.udp_port=port;
1718         linphone_core_set_sip_transports (lc,&tr);
1719 }
1720
1721 /**
1722  * Returns TRUE if IPv6 is enabled.
1723  *
1724  * @ingroup network_parameters
1725  * See linphone_core_enable_ipv6() for more details on how IPv6 is supported in liblinphone.
1726 **/
1727 bool_t linphone_core_ipv6_enabled(LinphoneCore *lc){
1728         return lc->sip_conf.ipv6_enabled;
1729 }
1730
1731 /**
1732  * Turns IPv6 support on or off.
1733  *
1734  * @ingroup network_parameters
1735  *
1736  * @note IPv6 support is exclusive with IPv4 in liblinphone:
1737  * when IPv6 is turned on, IPv4 calls won't be possible anymore.
1738  * By default IPv6 support is off.
1739 **/
1740 void linphone_core_enable_ipv6(LinphoneCore *lc, bool_t val){
1741         if (lc->sip_conf.ipv6_enabled!=val){
1742                 lc->sip_conf.ipv6_enabled=val;
1743                 if (lc->sal){
1744                         /* we need to restart eXosip */
1745                         apply_transports(lc);
1746                 }
1747         }
1748 }
1749
1750
1751 static void monitor_network_state(LinphoneCore *lc, time_t curtime){
1752         static time_t last_check=0;
1753         static bool_t last_status=FALSE;
1754         char result[LINPHONE_IPADDR_SIZE];
1755         bool_t new_status=last_status;
1756
1757         /* only do the network up checking every five seconds */
1758         if (last_check==0 || (curtime-last_check)>=5){
1759                 linphone_core_get_local_ip_for(lc->sip_conf.ipv6_enabled ? AF_INET6 : AF_INET,NULL,result);
1760                 if (strcmp(result,"::1")!=0 && strcmp(result,"127.0.0.1")!=0){
1761                         new_status=TRUE;
1762                 }else new_status=FALSE;
1763                 last_check=curtime;
1764                 if (new_status!=last_status) {
1765                         if (new_status){
1766                                 ms_message("New local ip address is %s",result);
1767                         }
1768                         set_network_reachable(lc,new_status, curtime);
1769                         last_status=new_status;
1770                 }
1771         }
1772 }
1773
1774 static void proxy_update(LinphoneCore *lc){
1775         MSList *elem,*next;
1776         ms_list_for_each(lc->sip_conf.proxies,(void (*)(void*))&linphone_proxy_config_update);
1777         for(elem=lc->sip_conf.deleted_proxies;elem!=NULL;elem=next){
1778                 LinphoneProxyConfig* cfg = (LinphoneProxyConfig*)elem->data;
1779                 next=elem->next;
1780                 if (ms_time(NULL) - cfg->deletion_date > 5) {
1781                         lc->sip_conf.deleted_proxies =ms_list_remove_link(lc->sip_conf.deleted_proxies,elem);
1782                         ms_message("clearing proxy config for [%s]",linphone_proxy_config_get_addr(cfg));
1783                         linphone_proxy_config_destroy(cfg);
1784                 }
1785         }
1786 }
1787
1788 static void assign_buddy_info(LinphoneCore *lc, BuddyInfo *info){
1789         LinphoneFriend *lf=linphone_core_get_friend_by_address(lc,info->sip_uri);
1790         if (lf!=NULL){
1791                 lf->info=info;
1792                 ms_message("%s has a BuddyInfo assigned with image %p",info->sip_uri, info->image_data);
1793                 if (lc->vtable.buddy_info_updated)
1794                         lc->vtable.buddy_info_updated(lc,lf);
1795         }else{
1796                 ms_warning("Could not any friend with uri %s",info->sip_uri);
1797         }
1798 }
1799
1800 static void analyze_buddy_lookup_results(LinphoneCore *lc, LinphoneProxyConfig *cfg){
1801         MSList *elem;
1802         SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
1803         for (elem=lc->bl_reqs;elem!=NULL;elem=ms_list_next(elem)){
1804                 BuddyLookupRequest *req=(BuddyLookupRequest *)elem->data;
1805                 if (req->status==BuddyLookupDone || req->status==BuddyLookupFailure){
1806                         if (req->results!=NULL){
1807                                 BuddyInfo *i=(BuddyInfo*)req->results->data;
1808                                 ms_list_free(req->results);
1809                                 req->results=NULL;
1810                                 assign_buddy_info(lc,i);
1811                         }
1812                         sip_setup_context_buddy_lookup_free(ctx,req);
1813                         elem->data=NULL;
1814                 }
1815         }
1816         /*purge completed requests */
1817         while((elem=ms_list_find(lc->bl_reqs,NULL))!=NULL){
1818                 lc->bl_reqs=ms_list_remove_link(lc->bl_reqs,elem);
1819         }
1820 }
1821
1822 static void linphone_core_grab_buddy_infos(LinphoneCore *lc, LinphoneProxyConfig *cfg){
1823         const MSList *elem;
1824         SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
1825         for(elem=linphone_core_get_friend_list(lc);elem!=NULL;elem=elem->next){
1826                 LinphoneFriend *lf=(LinphoneFriend*)elem->data;
1827                 if (lf->info==NULL){
1828                         if (linphone_core_lookup_known_proxy(lc,lf->uri)==cfg){
1829                                 if (linphone_address_get_username(lf->uri)!=NULL){
1830                                         BuddyLookupRequest *req;
1831                                         char *tmp=linphone_address_as_string_uri_only(lf->uri);
1832                                         req=sip_setup_context_create_buddy_lookup_request(ctx);
1833                                         buddy_lookup_request_set_key(req,tmp);
1834                                         buddy_lookup_request_set_max_results(req,1);
1835                                         sip_setup_context_buddy_lookup_submit(ctx,req);
1836                                         lc->bl_reqs=ms_list_append(lc->bl_reqs,req);
1837                                         ms_free(tmp);
1838                                 }
1839                         }
1840                 }
1841         }
1842 }
1843
1844 static void linphone_core_do_plugin_tasks(LinphoneCore *lc){
1845         LinphoneProxyConfig *cfg=NULL;
1846         linphone_core_get_default_proxy(lc,&cfg);
1847         if (cfg){
1848                 if (lc->bl_refresh){
1849                         SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
1850                         if (ctx && (sip_setup_context_get_capabilities(ctx) & SIP_SETUP_CAP_BUDDY_LOOKUP)){
1851                                 linphone_core_grab_buddy_infos(lc,cfg);
1852                                 lc->bl_refresh=FALSE;
1853                         }
1854                 }
1855                 if (lc->bl_reqs) analyze_buddy_lookup_results(lc,cfg);
1856         }
1857 }
1858
1859 /**
1860  * Main loop function. It is crucial that your application call it periodically.
1861  *
1862  * @ingroup initializing
1863  * linphone_core_iterate() performs various backgrounds tasks:
1864  * - receiving of SIP messages
1865  * - handles timers and timeout
1866  * - performs registration to proxies
1867  * - authentication retries
1868  * The application MUST call this function periodically, in its main loop.
1869  * Be careful that this function must be called from the same thread as
1870  * other liblinphone methods. If it is not the case make sure all liblinphone calls are
1871  * serialized with a mutex.
1872 **/
1873 void linphone_core_iterate(LinphoneCore *lc){
1874         MSList *calls;
1875         LinphoneCall *call;
1876         time_t curtime=time(NULL);
1877         int elapsed;
1878         bool_t one_second_elapsed=FALSE;
1879
1880         if (curtime-lc->prevtime>=1){
1881                 lc->prevtime=curtime;
1882                 one_second_elapsed=TRUE;
1883         }
1884
1885         if (lc->ecc!=NULL){
1886                 LinphoneEcCalibratorStatus ecs=ec_calibrator_get_status(lc->ecc);
1887                 if (ecs!=LinphoneEcCalibratorInProgress){
1888                         if (lc->ecc->cb)
1889                                 lc->ecc->cb(lc,ecs,lc->ecc->delay,lc->ecc->cb_data);
1890                         if (ecs==LinphoneEcCalibratorDone){
1891                                 int len=lp_config_get_int(lc->config,"sound","ec_tail_len",0);
1892                                 lp_config_set_int(lc->config, "sound", "ec_delay",MAX(lc->ecc->delay-(len/2),0));
1893                         }
1894                         ec_calibrator_destroy(lc->ecc);
1895                         lc->ecc=NULL;
1896                 }
1897         }
1898
1899         if (lc->preview_finished){
1900                 lc->preview_finished=0;
1901                 ring_stop(lc->ringstream);
1902                 lc->ringstream=NULL;
1903                 lc_callback_obj_invoke(&lc->preview_finished_cb,lc);
1904         }
1905
1906         if (lc->ringstream && lc->ringstream_autorelease && lc->dmfs_playing_start_time!=0
1907             && (curtime-lc->dmfs_playing_start_time)>5){
1908                 ring_stop(lc->ringstream);
1909                 lc->ringstream=NULL;
1910                 lc->dmfs_playing_start_time=0;
1911         }
1912
1913         sal_iterate(lc->sal);
1914         if (lc->msevq) ms_event_queue_pump(lc->msevq);
1915         if (lc->auto_net_state_mon) monitor_network_state(lc,curtime);
1916
1917         proxy_update(lc);
1918
1919         //we have to iterate for each call
1920         calls= lc->calls;
1921         while(calls!= NULL){
1922                 call = (LinphoneCall *)calls->data;
1923                  /* get immediately a reference to next one in case the one
1924                  we are going to examine is destroy and removed during
1925                  linphone_core_start_invite() */
1926                 calls=calls->next;
1927                 linphone_call_background_tasks(call,one_second_elapsed);
1928                 if (call->state==LinphoneCallOutgoingInit && (curtime-call->start_time>=2)){
1929                         /*start the call even if the OPTIONS reply did not arrive*/
1930                         if (call->ice_session != NULL) {
1931                                 ms_warning("ICE candidates gathering from [%s] has not finished yet, proceed with the call without ICE anyway."
1932                                                 ,linphone_core_get_stun_server(lc));
1933                                 linphone_call_delete_ice_session(call);
1934                                 linphone_call_stop_media_streams(call);
1935                         }
1936                         linphone_core_start_invite(lc,call);
1937                 }
1938                 if (call->state==LinphoneCallIncomingReceived){
1939                         elapsed=curtime-call->start_time;
1940                         ms_message("incoming call ringing for %i seconds",elapsed);
1941                         if (elapsed>lc->sip_conf.inc_timeout){
1942                                 ms_message("incoming call timeout (%i)",lc->sip_conf.inc_timeout);
1943                                 call->log->status=LinphoneCallMissed;
1944                                 call->reason=LinphoneReasonNotAnswered;
1945                                 linphone_core_terminate_call(lc,call);
1946                         }
1947                 }
1948         }
1949
1950         if (linphone_core_video_preview_enabled(lc)){
1951                 if (lc->previewstream==NULL && lc->calls==NULL)
1952                         toggle_video_preview(lc,TRUE);
1953 #ifdef VIDEO_ENABLED
1954                 if (lc->previewstream) video_stream_iterate(lc->previewstream);
1955 #endif
1956         }else{
1957                 if (lc->previewstream!=NULL)
1958                         toggle_video_preview(lc,FALSE);
1959         }
1960
1961         linphone_core_run_hooks(lc);
1962         linphone_core_do_plugin_tasks(lc);
1963
1964         if (lc->initial_subscribes_sent==FALSE && lc->netup_time!=0 &&
1965             (curtime-lc->netup_time)>3){
1966                 linphone_core_send_initial_subscribes(lc);
1967                 lc->initial_subscribes_sent=TRUE;
1968         }
1969
1970         if (one_second_elapsed && lp_config_needs_commit(lc->config)){
1971                 lp_config_sync(lc->config);
1972         }
1973 }
1974
1975 /**
1976  * Interpret a call destination as supplied by the user, and returns a fully qualified
1977  * LinphoneAddress.
1978  *
1979  * A sip address should look like DisplayName <sip:username@domain:port> .
1980  * Basically this function performs the following tasks
1981  * - if a phone number is entered, prepend country prefix of the default proxy
1982  *   configuration, eventually escape the '+' by 00.
1983  * - if no domain part is supplied, append the domain name of the default proxy
1984  * - if no sip: is present, prepend it
1985  *
1986  * The result is a syntaxically correct SIP address.
1987 **/
1988
1989 LinphoneAddress * linphone_core_interpret_url(LinphoneCore *lc, const char *url){
1990         enum_lookup_res_t *enumres=NULL;
1991         char *enum_domain=NULL;
1992         LinphoneProxyConfig *proxy=lc->default_proxy;;
1993         char *tmpurl;
1994         LinphoneAddress *uri;
1995
1996         if (is_enum(url,&enum_domain)){
1997                 if (lc->vtable.display_status!=NULL)
1998                         lc->vtable.display_status(lc,_("Looking for telephone number destination..."));
1999                 if (enum_lookup(enum_domain,&enumres)<0){
2000                         if (lc->vtable.display_status!=NULL)
2001                                 lc->vtable.display_status(lc,_("Could not resolve this number."));
2002                         ms_free(enum_domain);
2003                         return NULL;
2004                 }
2005                 ms_free(enum_domain);
2006                 tmpurl=enumres->sip_address[0];
2007                 uri=linphone_address_new(tmpurl);
2008                 enum_lookup_res_free(enumres);
2009                 return uri;
2010         }
2011         /* check if we have a "sip:" */
2012         if (strstr(url,"sip:")==NULL){
2013                 /* this doesn't look like a true sip uri */
2014                 if (strchr(url,'@')!=NULL){
2015                         /* seems like sip: is missing !*/
2016                         tmpurl=ms_strdup_printf("sip:%s",url);
2017                         uri=linphone_address_new(tmpurl);
2018                         ms_free(tmpurl);
2019                         if (uri){
2020                                 return uri;
2021                         }
2022                 }
2023
2024                 if (proxy!=NULL){
2025                         /* append the proxy domain suffix */
2026                         const char *identity=linphone_proxy_config_get_identity(proxy);
2027                         char normalized_username[128];
2028                         uri=linphone_address_new(identity);
2029                         if (uri==NULL){
2030                                 return NULL;
2031                         }
2032                         linphone_address_set_display_name(uri,NULL);
2033                         linphone_proxy_config_normalize_number(proxy,url,normalized_username,
2034                                                                 sizeof(normalized_username));
2035                         linphone_address_set_username(uri,normalized_username);
2036                         return uri;
2037                 }else return NULL;
2038         }
2039         uri=linphone_address_new(url);
2040         if (uri!=NULL){
2041                 return uri;
2042         }
2043         /* else we could not do anything with url given by user, so display an error */
2044         if (lc->vtable.display_warning!=NULL){
2045                 lc->vtable.display_warning(lc,_("Could not parse given sip address. A sip url usually looks like sip:user@domain"));
2046         }
2047         return NULL;
2048 }
2049
2050 /**
2051  * Returns the default identity SIP address.
2052  *
2053  * @ingroup proxies
2054  * This is an helper function:
2055  *
2056  * If no default proxy is set, this will return the primary contact (
2057  * see linphone_core_get_primary_contact() ). If a default proxy is set
2058  * it returns the registered identity on the proxy.
2059 **/
2060 const char * linphone_core_get_identity(LinphoneCore *lc){
2061         LinphoneProxyConfig *proxy=NULL;
2062         const char *from;
2063         linphone_core_get_default_proxy(lc,&proxy);
2064         if (proxy!=NULL) {
2065                 from=linphone_proxy_config_get_identity(proxy);
2066         }else from=linphone_core_get_primary_contact(lc);
2067         return from;
2068 }
2069
2070 const char * linphone_core_get_route(LinphoneCore *lc){
2071         LinphoneProxyConfig *proxy=NULL;
2072         const char *route=NULL;
2073         linphone_core_get_default_proxy(lc,&proxy);
2074         if (proxy!=NULL) {
2075                 route=linphone_proxy_config_get_route(proxy);
2076         }
2077         return route;
2078 }
2079
2080 void linphone_core_start_refered_call(LinphoneCore *lc, LinphoneCall *call){
2081         if (call->refer_pending){
2082                 LinphoneCallParams *cp=linphone_core_create_default_call_parameters(lc);
2083                 LinphoneCall *newcall;
2084                 cp->has_video &= !!lc->video_policy.automatically_initiate;
2085                 cp->referer=call;
2086                 ms_message("Starting new call to refered address %s",call->refer_to);
2087                 call->refer_pending=FALSE;
2088                 newcall=linphone_core_invite_with_params(lc,call->refer_to,cp);
2089                 linphone_call_params_destroy(cp);
2090                 if (newcall) linphone_core_notify_refer_state(lc,call,newcall);
2091         }
2092 }
2093
2094 void linphone_core_notify_refer_state(LinphoneCore *lc, LinphoneCall *referer, LinphoneCall *newcall){
2095         if (referer->op!=NULL){
2096                 sal_call_notify_refer_state(referer->op,newcall ? newcall->op : NULL);
2097         }
2098 }
2099
2100 LinphoneProxyConfig * linphone_core_lookup_known_proxy(LinphoneCore *lc, const LinphoneAddress *uri){
2101         const MSList *elem;
2102         LinphoneProxyConfig *found_cfg=NULL;
2103         LinphoneProxyConfig *default_cfg=lc->default_proxy;
2104
2105         /*always prefer the default proxy if it is matching the destination uri*/
2106         if (default_cfg){
2107                 const char *domain=linphone_proxy_config_get_domain(default_cfg);
2108                 if (strcmp(domain,linphone_address_get_domain(uri))==0)
2109                         return default_cfg;
2110         }
2111
2112         /*otherwise iterate through the other proxy config and return the first matching*/
2113         for (elem=linphone_core_get_proxy_config_list(lc);elem!=NULL;elem=elem->next){
2114                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
2115                 const char *domain=linphone_proxy_config_get_domain(cfg);
2116                 if (domain!=NULL && strcmp(domain,linphone_address_get_domain(uri))==0){
2117                         found_cfg=cfg;
2118                         break;
2119                 }
2120         }
2121         return found_cfg;
2122 }
2123
2124 const char *linphone_core_find_best_identity(LinphoneCore *lc, const LinphoneAddress *to, const char **route){
2125         LinphoneProxyConfig *cfg=linphone_core_lookup_known_proxy(lc,to);
2126         if (cfg==NULL)
2127                 linphone_core_get_default_proxy (lc,&cfg);
2128         if (cfg!=NULL){
2129                 if (route) *route=linphone_proxy_config_get_route(cfg);
2130                 return linphone_proxy_config_get_identity (cfg);
2131         }
2132         return linphone_core_get_primary_contact (lc);
2133 }
2134
2135 static char *get_fixed_contact(LinphoneCore *lc, LinphoneCall *call , LinphoneProxyConfig *dest_proxy){
2136         LinphoneAddress *ctt;
2137         const char *localip=call->localip;
2138
2139         /* first use user's supplied ip address if asked*/
2140         if (linphone_core_get_firewall_policy(lc)==LinphonePolicyUseNatAddress){
2141                 ctt=linphone_core_get_primary_contact_parsed(lc);
2142                 return ms_strdup_printf("sip:%s@%s",linphone_address_get_username(ctt),
2143                         linphone_core_get_nat_address_resolved(lc));
2144         }
2145
2146         /* if already choosed, don't change it */
2147         if (call->op && sal_op_get_contact(call->op)!=NULL){
2148                 return NULL;
2149         }
2150         /* if the ping OPTIONS request succeeded use the contact guessed from the
2151          received, rport*/
2152         if (call->ping_op){
2153                 const char *guessed=sal_op_get_contact(call->ping_op);
2154                 if (guessed){
2155                         ms_message("Contact has been fixed using OPTIONS to %s",guessed);
2156                         return ms_strdup(guessed);
2157                 }
2158         }
2159
2160         /*if using a proxy, use the contact address as guessed with the REGISTERs*/
2161         if (dest_proxy && dest_proxy->op){
2162                 const char *fixed_contact=sal_op_get_contact(dest_proxy->op);
2163                 if (fixed_contact) {
2164                         ms_message("Contact has been fixed using proxy to %s",fixed_contact);
2165                         return ms_strdup(fixed_contact);
2166                 }
2167         }
2168
2169         ctt=linphone_core_get_primary_contact_parsed(lc);
2170
2171         if (ctt!=NULL){
2172                 char *ret;
2173                 /*otherwise use supllied localip*/
2174                 linphone_address_set_domain(ctt,localip);
2175                 linphone_address_set_port_int(ctt,linphone_core_get_sip_port(lc));
2176                 ret=linphone_address_as_string_uri_only(ctt);
2177                 linphone_address_destroy(ctt);
2178                 ms_message("Contact has been fixed using local ip to %s",ret);
2179                 return ret;
2180         }
2181         return NULL;
2182 }
2183
2184 int linphone_core_proceed_with_invite_if_ready(LinphoneCore *lc, LinphoneCall *call, LinphoneProxyConfig *dest_proxy){
2185         bool_t ice_ready = FALSE;
2186         bool_t ping_ready = FALSE;
2187
2188         if (call->ice_session != NULL) {
2189                 if (ice_session_candidates_gathered(call->ice_session)) ice_ready = TRUE;
2190         } else {
2191                 ice_ready = TRUE;
2192         }
2193         if (call->ping_op != NULL) {
2194                 if (call->ping_replied == TRUE) ping_ready = TRUE;
2195         } else {
2196                 ping_ready = TRUE;
2197         }
2198
2199         if ((ice_ready == TRUE) && (ping_ready == TRUE)) {
2200                 return linphone_core_start_invite(lc, call);
2201         }
2202         return 0;
2203 }
2204
2205 int linphone_core_start_invite(LinphoneCore *lc, LinphoneCall *call){
2206         int err;
2207         char *contact;
2208         char *real_url,*barmsg;
2209         char *from;
2210         LinphoneProxyConfig *dest_proxy=call->dest_proxy;
2211
2212         /*try to be best-effort in giving real local or routable contact address */
2213         contact=get_fixed_contact(lc,call,dest_proxy);
2214         if (contact){
2215                 sal_op_set_contact(call->op, contact);
2216                 ms_free(contact);
2217         }
2218         linphone_core_stop_dtmf_stream(lc);
2219         linphone_call_init_media_streams(call);
2220         if (lc->ringstream==NULL)
2221                 audio_stream_prepare_sound(call->audiostream,lc->sound_conf.play_sndcard,lc->sound_conf.capt_sndcard);
2222         call->localdesc=create_local_media_description(lc,call);
2223         if (!lc->sip_conf.sdp_200_ack){
2224                 call->media_pending=TRUE;
2225                 sal_call_set_local_media_description(call->op,call->localdesc);
2226         }
2227         real_url=linphone_address_as_string(call->log->to);
2228         from=linphone_address_as_string(call->log->from);
2229         err=sal_call(call->op,from,real_url);
2230
2231         if (lc->sip_conf.sdp_200_ack){
2232                 call->media_pending=TRUE;
2233                 sal_call_set_local_media_description(call->op,call->localdesc);
2234         }
2235         barmsg=ortp_strdup_printf("%s %s", _("Contacting"), real_url);
2236         if (lc->vtable.display_status!=NULL)
2237                 lc->vtable.display_status(lc,barmsg);
2238         ms_free(barmsg);
2239
2240         if (err<0){
2241                 if (lc->vtable.display_status!=NULL)
2242                         lc->vtable.display_status(lc,_("Could not call"));
2243                 linphone_call_stop_media_streams(call);
2244                 linphone_call_set_state(call,LinphoneCallError,"Call failed");
2245         }else {
2246                 linphone_call_set_state(call,LinphoneCallOutgoingProgress,"Outgoing call in progress");
2247         }
2248         ms_free(real_url);
2249         ms_free(from);
2250         return err;
2251 }
2252
2253 /**
2254  * Initiates an outgoing call
2255  *
2256  * @ingroup call_control
2257  * @param lc the LinphoneCore object
2258  * @param url the destination of the call (sip address, or phone number).
2259  *
2260  * The application doesn't own a reference to the returned LinphoneCall object.
2261  * Use linphone_call_ref() to safely keep the LinphoneCall pointer valid within your application.
2262  *
2263  * @return a LinphoneCall object or NULL in case of failure
2264 **/
2265 LinphoneCall * linphone_core_invite(LinphoneCore *lc, const char *url){
2266         LinphoneCall *call;
2267         LinphoneCallParams *p=linphone_core_create_default_call_parameters (lc);
2268         p->has_video &= !!lc->video_policy.automatically_initiate;
2269         call=linphone_core_invite_with_params(lc,url,p);
2270         linphone_call_params_destroy(p);
2271         return call;
2272 }
2273
2274
2275 /**
2276  * Initiates an outgoing call according to supplied call parameters
2277  *
2278  * @ingroup call_control
2279  * @param lc the LinphoneCore object
2280  * @param url the destination of the call (sip address, or phone number).
2281  * @param p call parameters
2282  *
2283  * The application doesn't own a reference to the returned LinphoneCall object.
2284  * Use linphone_call_ref() to safely keep the LinphoneCall pointer valid within your application.
2285  *
2286  * @return a LinphoneCall object or NULL in case of failure
2287 **/
2288 LinphoneCall * linphone_core_invite_with_params(LinphoneCore *lc, const char *url, const LinphoneCallParams *p){
2289         LinphoneAddress *addr=linphone_core_interpret_url(lc,url);
2290         if (addr){
2291                 LinphoneCall *call;
2292                 call=linphone_core_invite_address_with_params(lc,addr,p);
2293                 linphone_address_destroy(addr);
2294                 return call;
2295         }
2296         return NULL;
2297 }
2298
2299 /**
2300  * Initiates an outgoing call given a destination LinphoneAddress
2301  *
2302  * @ingroup call_control
2303  * @param lc the LinphoneCore object
2304  * @param addr the destination of the call (sip address).
2305  *
2306  * The LinphoneAddress can be constructed directly using linphone_address_new(), or
2307  * created by linphone_core_interpret_url().
2308  * The application doesn't own a reference to the returned LinphoneCall object.
2309  * Use linphone_call_ref() to safely keep the LinphoneCall pointer valid within your application.
2310  *
2311  * @return a LinphoneCall object or NULL in case of failure
2312 **/
2313 LinphoneCall * linphone_core_invite_address(LinphoneCore *lc, const LinphoneAddress *addr){
2314         LinphoneCall *call;
2315         LinphoneCallParams *p=linphone_core_create_default_call_parameters(lc);
2316         p->has_video &= !!lc->video_policy.automatically_initiate;
2317         call=linphone_core_invite_address_with_params (lc,addr,p);
2318         linphone_call_params_destroy(p);
2319         return call;
2320 }
2321
2322
2323 /**
2324  * Initiates an outgoing call given a destination LinphoneAddress
2325  *
2326  * @ingroup call_control
2327  * @param lc the LinphoneCore object
2328  * @param addr the destination of the call (sip address).
2329         @param params call parameters
2330  *
2331  * The LinphoneAddress can be constructed directly using linphone_address_new(), or
2332  * created by linphone_core_interpret_url().
2333  * The application doesn't own a reference to the returned LinphoneCall object.
2334  * Use linphone_call_ref() to safely keep the LinphoneCall pointer valid within your application.
2335  *
2336  * @return a LinphoneCall object or NULL in case of failure
2337 **/
2338 LinphoneCall * linphone_core_invite_address_with_params(LinphoneCore *lc, const LinphoneAddress *addr, const LinphoneCallParams *params)
2339 {
2340         const char *route=NULL;
2341         const char *from=NULL;
2342         LinphoneProxyConfig *proxy=NULL,*dest_proxy=NULL;
2343         LinphoneAddress *parsed_url2=NULL;
2344         char *real_url=NULL;
2345         LinphoneCall *call;
2346         bool_t use_ice = FALSE;
2347
2348         linphone_core_preempt_sound_resources(lc);
2349
2350         if(!linphone_core_can_we_add_call(lc)){
2351                 if (lc->vtable.display_warning)
2352                         lc->vtable.display_warning(lc,_("Sorry, we have reached the maximum number of simultaneous calls"));
2353                 return NULL;
2354         }
2355         linphone_core_get_default_proxy(lc,&proxy);
2356         route=linphone_core_get_route(lc);
2357
2358         real_url=linphone_address_as_string(addr);
2359         dest_proxy=linphone_core_lookup_known_proxy(lc,addr);
2360
2361         if (proxy!=dest_proxy && dest_proxy!=NULL) {
2362                 ms_message("Overriding default proxy setting for this call:");
2363                 ms_message("The used identity will be %s",linphone_proxy_config_get_identity(dest_proxy));
2364         }
2365
2366         if (dest_proxy!=NULL)
2367                 from=linphone_proxy_config_get_identity(dest_proxy);
2368         else if (proxy!=NULL)
2369                 from=linphone_proxy_config_get_identity(proxy);
2370
2371         /* if no proxy or no identity defined for this proxy, default to primary contact*/
2372         if (from==NULL) from=linphone_core_get_primary_contact(lc);
2373
2374         parsed_url2=linphone_address_new(from);
2375
2376         call=linphone_call_new_outgoing(lc,parsed_url2,linphone_address_clone(addr),params);
2377         call->dest_proxy=dest_proxy;
2378         sal_op_set_route(call->op,route);
2379
2380         if(linphone_core_add_call(lc,call)!= 0)
2381         {
2382                 ms_warning("we had a problem in adding the call into the invite ... weird");
2383                 linphone_call_unref(call);
2384                 return NULL;
2385         }
2386         /* this call becomes now the current one*/
2387         lc->current_call=call;
2388         linphone_call_set_state (call,LinphoneCallOutgoingInit,"Starting outgoing call");
2389         if (linphone_core_get_firewall_policy(call->core) == LinphonePolicyUseIce) {
2390                 /* Defer the start of the call after the ICE gathering process. */
2391                 linphone_call_init_media_streams(call);
2392                 linphone_call_start_media_streams_for_ice_gathering(call);
2393                 call->start_time=time(NULL);
2394                 if (linphone_core_gather_ice_candidates(lc,call)<0) {
2395                         /* Ice candidates gathering failed, proceed with the call anyway. */
2396                         linphone_call_delete_ice_session(call);
2397                         linphone_call_stop_media_streams(call);
2398                 } else {
2399                         use_ice = TRUE;
2400                 }
2401         }
2402
2403         if (call->dest_proxy==NULL && lc->sip_conf.ping_with_options==TRUE){
2404                 /*defer the start of the call after the OPTIONS ping*/
2405                 call->ping_replied=FALSE;
2406                 call->ping_op=sal_op_new(lc->sal);
2407                 sal_ping(call->ping_op,from,real_url);
2408                 sal_op_set_user_pointer(call->ping_op,call);
2409                 call->start_time=time(NULL);
2410         }else{
2411                 if (use_ice==FALSE) linphone_core_start_invite(lc,call);
2412         }
2413
2414         if (real_url!=NULL) ms_free(real_url);
2415         return call;
2416 }
2417
2418 /**
2419  * Performs a simple call transfer to the specified destination.
2420  *
2421  * The remote endpoint is expected to issue a new call to the specified destination.
2422  * The current call remains active and thus can be later paused or terminated.
2423 **/
2424 int linphone_core_transfer_call(LinphoneCore *lc, LinphoneCall *call, const char *url)
2425 {
2426         char *real_url=NULL;
2427         LinphoneAddress *real_parsed_url=linphone_core_interpret_url(lc,url);
2428
2429         if (!real_parsed_url){
2430                 /* bad url */
2431                 return -1;
2432         }
2433         if (call==NULL){
2434                 ms_warning("No established call to refer.");
2435                 return -1;
2436         }
2437         //lc->call=NULL; //Do not do that you will lose the call afterward . . .
2438         real_url=linphone_address_as_string (real_parsed_url);
2439         sal_call_refer(call->op,real_url);
2440         ms_free(real_url);
2441         linphone_address_destroy(real_parsed_url);
2442         linphone_call_set_transfer_state(call, LinphoneCallOutgoingInit);
2443         return 0;
2444 }
2445
2446 /**
2447  * Transfer a call to destination of another running call. This is used for "attended transfer" scenarios.
2448  * @param lc linphone core object
2449  * @param call a running call you want to transfer
2450  * @param dest a running call whose remote person will receive the transfer
2451  *
2452  * The transfered call is supposed to be in paused state, so that it is able to accept the transfer immediately.
2453  * The destination call is a call previously established to introduce the transfered person.
2454  * This method will send a transfer request to the transfered person. The phone of the transfered is then
2455  * expected to automatically call to the destination of the transfer. The receiver of the transfer will then automatically
2456  * close the call with us (the 'dest' call).
2457 **/
2458 int linphone_core_transfer_call_to_another(LinphoneCore *lc, LinphoneCall *call, LinphoneCall *dest){
2459         int result = sal_call_refer_with_replaces (call->op,dest->op);
2460         linphone_call_set_transfer_state(call, LinphoneCallOutgoingInit);
2461         return result;
2462 }
2463
2464 bool_t linphone_core_inc_invite_pending(LinphoneCore*lc){
2465         LinphoneCall *call = linphone_core_get_current_call(lc);
2466         if(call != NULL)
2467         {
2468                 if(call->dir==LinphoneCallIncoming
2469                         && (call->state == LinphoneCallIncomingReceived || call->state ==  LinphoneCallIncomingEarlyMedia))
2470                         return TRUE;
2471         }
2472         return FALSE;
2473 }
2474
2475 void linphone_core_notify_incoming_call(LinphoneCore *lc, LinphoneCall *call){
2476         char *barmesg;
2477         char *tmp;
2478         LinphoneAddress *from_parsed;
2479         SalMediaDescription *md;
2480         bool_t propose_early_media=lp_config_get_int(lc->config,"sip","incoming_calls_early_media",FALSE);
2481         const char *ringback_tone=linphone_core_get_remote_ringback_tone (lc);
2482
2483         call->localdesc=create_local_media_description(lc,call);
2484         sal_call_set_local_media_description(call->op,call->localdesc);
2485         md=sal_call_get_final_media_description(call->op);
2486         if (md && sal_media_description_empty(md)){
2487                 sal_call_decline(call->op,SalReasonMedia,NULL);
2488                 linphone_call_unref(call);
2489                 return;
2490         }
2491
2492         from_parsed=linphone_address_new(sal_op_get_from(call->op));
2493         linphone_address_clean(from_parsed);
2494         tmp=linphone_address_as_string(from_parsed);
2495         linphone_address_destroy(from_parsed);
2496         barmesg=ortp_strdup_printf("%s %s%s",tmp,_("is contacting you"),
2497             (sal_call_autoanswer_asked(call->op)) ?_(" and asked autoanswer."):_("."));
2498         if (lc->vtable.show) lc->vtable.show(lc);
2499         if (lc->vtable.display_status)
2500             lc->vtable.display_status(lc,barmesg);
2501
2502         /* play the ring if this is the only call*/
2503         if (ms_list_size(lc->calls)==1){
2504                 lc->current_call=call;
2505                 if (lc->ringstream && lc->dmfs_playing_start_time!=0){
2506                         ring_stop(lc->ringstream);
2507                         lc->ringstream=NULL;
2508                         lc->dmfs_playing_start_time=0;
2509                 }
2510                 if (lc->sound_conf.ring_sndcard!=NULL){
2511                         if(lc->ringstream==NULL && lc->sound_conf.local_ring){
2512                                 MSSndCard *ringcard=lc->sound_conf.lsd_card ?lc->sound_conf.lsd_card : lc->sound_conf.ring_sndcard;
2513                                 ms_message("Starting local ring...");
2514                                 lc->ringstream=ring_start(lc->sound_conf.local_ring,2000,ringcard);
2515                         }
2516                         else
2517                         {
2518                                 ms_message("the local ring is already started");
2519                         }
2520                 }
2521         }else{
2522                 /* else play a tone within the context of the current call */
2523                 call->ringing_beep=TRUE;
2524                 linphone_core_play_tone(lc);
2525         }
2526
2527         linphone_call_set_state(call,LinphoneCallIncomingReceived,"Incoming call");
2528
2529         if (call->state==LinphoneCallIncomingReceived){
2530                 sal_call_notify_ringing(call->op,propose_early_media || ringback_tone!=NULL);
2531
2532                 if (propose_early_media || ringback_tone!=NULL){
2533                         linphone_call_set_state(call,LinphoneCallIncomingEarlyMedia,"Incoming call early media");
2534                         md=sal_call_get_final_media_description(call->op);
2535                         linphone_core_update_streams(lc,call,md);
2536                 }
2537                 if (sal_call_get_replaces(call->op)!=NULL && lp_config_get_int(lc->config,"sip","auto_answer_replacing_calls",1)){
2538                         linphone_core_accept_call(lc,call);
2539                 }
2540         }
2541         linphone_call_unref(call);
2542
2543         ms_free(barmesg);
2544         ms_free(tmp);
2545 }
2546
2547 int linphone_core_start_update_call(LinphoneCore *lc, LinphoneCall *call){
2548         const char *subject;
2549         call->camera_active=call->params.has_video;
2550         update_local_media_description(lc,call);
2551         if (call->ice_session != NULL)
2552                 linphone_core_update_local_media_description_from_ice(call->localdesc, call->ice_session);
2553
2554         if (call->params.in_conference){
2555                 subject="Conference";
2556         }else{
2557                 subject="Media change";
2558         }
2559         if (lc->vtable.display_status)
2560                 lc->vtable.display_status(lc,_("Modifying call parameters..."));
2561         sal_call_set_local_media_description (call->op,call->localdesc);
2562         return sal_call_update(call->op,subject);
2563 }
2564
2565 /**
2566  * @ingroup call_control
2567  * Updates a running call according to supplied call parameters or parameters changed in the LinphoneCore.
2568  *
2569  * In this version this is limited to the following use cases:
2570  * - setting up/down the video stream according to the video parameter of the LinphoneCallParams (see linphone_call_params_enable_video() ).
2571  * - changing the size of the transmitted video after calling linphone_core_set_preferred_video_size()
2572  *
2573  * In case no changes are requested through the LinphoneCallParams argument, then this argument can be omitted and set to NULL.
2574  * @param lc the core
2575  * @param call the call to be updated
2576  * @param params the new call parameters to use. (may be NULL)
2577  * @return 0 if successful, -1 otherwise.
2578 **/
2579 int linphone_core_update_call(LinphoneCore *lc, LinphoneCall *call, const LinphoneCallParams *params){
2580         int err=0;
2581         if (params!=NULL){
2582 #ifdef VIDEO_ENABLED
2583                 bool_t has_video = call->params.has_video;
2584                 if ((call->ice_session != NULL) && (call->videostream != NULL) && !params->has_video) {
2585                         ice_session_remove_check_list(call->ice_session, call->videostream->ice_check_list);
2586                         call->videostream->ice_check_list = NULL;
2587                 }
2588                 call->params = *params;
2589                 if ((call->ice_session != NULL) && (ice_session_state(call->ice_session) != IS_Completed) && !has_video && params->has_video) {
2590                         /* Defer call update until the ICE candidates gathering process has finished. */
2591                         ms_message("Defer call update to gather ICE candidates");
2592                         update_local_media_description(lc, call);
2593                         linphone_call_init_video_stream(call);
2594                         video_stream_prepare_video(call->videostream);
2595                         if (linphone_core_gather_ice_candidates(lc,call)<0) {
2596                                 /* Ice candidates gathering failed, proceed with the call anyway. */
2597                                 linphone_call_delete_ice_session(call);
2598                         } else return err;
2599                 }
2600 #endif
2601                 err = linphone_core_start_update_call(lc, call);
2602         }else{
2603 #ifdef VIDEO_ENABLED
2604                 if (call->videostream!=NULL){
2605                         video_stream_set_sent_video_size(call->videostream,linphone_core_get_preferred_video_size(lc));
2606                         if (call->camera_active && call->videostream->cam!=lc->video_conf.device){
2607                                 video_stream_change_camera(call->videostream,lc->video_conf.device);
2608                         }else video_stream_update_video_params(call->videostream);
2609                 }
2610 #endif
2611         }
2612
2613         return err;
2614 }
2615
2616 /**
2617  * @ingroup call_control
2618  * When receiving a #LinphoneCallUpdatedByRemote state notification, prevent LinphoneCore from performing an automatic answer.
2619  *
2620  * When receiving a #LinphoneCallUpdatedByRemote state notification (ie an incoming reINVITE), the default behaviour of
2621  * LinphoneCore is to automatically answer the reINIVTE with call parameters unchanged.
2622  * However when for example when the remote party updated the call to propose a video stream, it can be useful
2623  * to prompt the user before answering. This can be achieved by calling linphone_core_defer_call_update() during
2624  * the call state notifiacation, to deactivate the automatic answer that would just confirm the audio but reject the video.
2625  * Then, when the user responds to dialog prompt, it becomes possible to call linphone_core_accept_call_update() to answer
2626  * the reINVITE, with eventually video enabled in the LinphoneCallParams argument.
2627  *
2628  * @return 0 if successful, -1 if the linphone_core_defer_call_update() was done outside a #LinphoneCallUpdatedByRemote notification, which is illegal.
2629 **/
2630 int linphone_core_defer_call_update(LinphoneCore *lc, LinphoneCall *call){
2631         if (call->state==LinphoneCallUpdatedByRemote){
2632                 call->defer_update=TRUE;
2633                 return 0;
2634         }
2635         ms_error("linphone_core_defer_call_update() not done in state LinphoneCallUpdatedByRemote");
2636         return -1;
2637 }
2638
2639 int linphone_core_start_accept_call_update(LinphoneCore *lc, LinphoneCall *call){
2640         SalMediaDescription *md;
2641         if (call->ice_session != NULL) {
2642                 if (ice_session_nb_losing_pairs(call->ice_session) > 0) {
2643                         /* Defer the sending of the answer until there are no losing pairs left. */
2644                         return 0;
2645                 }
2646                 linphone_core_update_local_media_description_from_ice(call->localdesc, call->ice_session);
2647         }
2648         sal_call_set_local_media_description(call->op,call->localdesc);
2649         sal_call_accept(call->op);
2650         md=sal_call_get_final_media_description(call->op);
2651         if (md && !sal_media_description_empty(md))
2652                 linphone_core_update_streams (lc,call,md);
2653         linphone_call_set_state(call,LinphoneCallStreamsRunning,"Connected (streams running)");
2654         return 0;
2655 }
2656
2657 /**
2658  * @ingroup call_control
2659  * Accept call modifications initiated by other end.
2660  *
2661  * This call may be performed in response to a #LinphoneCallUpdatedByRemote state notification.
2662  * When such notification arrives, the application can decide to call linphone_core_defer_update_call() so that it can
2663  * have the time to prompt the user. linphone_call_get_remote_params() can be used to get information about the call parameters
2664  * requested by the other party, such as whether a video stream is requested.
2665  *
2666  * When the user accepts or refuse the change, linphone_core_accept_call_update() can be done to answer to the other party.
2667  * If params is NULL, then the same call parameters established before the update request will continue to be used (no change).
2668  * If params is not NULL, then the update will be accepted according to the parameters passed.
2669  * Typical example is when a user accepts to start video, then params should indicate that video stream should be used
2670  * (see linphone_call_params_enable_video()).
2671  * @param lc the linphone core object.
2672  * @param call the LinphoneCall object
2673  * @param params a LinphoneCallParams object describing the call parameters to accept.
2674  * @return 0 if sucessful, -1 otherwise (actually when this function call is performed outside ot #LinphoneCallUpdatedByRemote state).
2675 **/
2676 int linphone_core_accept_call_update(LinphoneCore *lc, LinphoneCall *call, const LinphoneCallParams *params){
2677         bool_t old_has_video = call->params.has_video;
2678         if (call->state!=LinphoneCallUpdatedByRemote){
2679                 ms_error("linphone_core_accept_update(): invalid state %s to call this function.",
2680                          linphone_call_state_to_string(call->state));
2681                 return -1;
2682         }
2683         if (params==NULL){
2684                 call->params.has_video=lc->video_policy.automatically_accept || call->current_params.has_video;
2685         }else
2686                 call->params=*params;
2687
2688         if (call->params.has_video && !linphone_core_video_enabled(lc)){
2689                 ms_warning("linphone_core_accept_call_update(): requested video but video support is globally disabled. Refusing video.");
2690                 call->params.has_video=FALSE;
2691         }
2692         if (call->current_params.in_conference) {
2693                 ms_warning("Video isn't supported in conference");
2694                 call->params.has_video = FALSE;
2695         }
2696         call->camera_active=call->params.has_video;
2697         update_local_media_description(lc,call);
2698         if (call->ice_session != NULL) {
2699                 linphone_core_update_ice_from_remote_media_description(call, sal_call_get_remote_media_description(call->op));
2700 #ifdef VIDEO_ENABLED
2701                 if ((call->ice_session != NULL) &&!ice_session_candidates_gathered(call->ice_session)) {
2702                         if ((call->params.has_video) && (call->params.has_video != old_has_video)) {
2703                                 linphone_call_init_video_stream(call);
2704                                 video_stream_prepare_video(call->videostream);
2705                                 if (linphone_core_gather_ice_candidates(lc,call)<0) {
2706                                         /* Ice candidates gathering failed, proceed with the call anyway. */
2707                                         linphone_call_delete_ice_session(call);
2708                                 } else return 0;
2709                         }
2710                 }
2711 #endif
2712         }
2713         linphone_core_start_accept_call_update(lc, call);
2714         return 0;
2715 }
2716
2717 /**
2718  * Accept an incoming call.
2719  *
2720  * @ingroup call_control
2721  * Basically the application is notified of incoming calls within the
2722  * call_state_changed callback of the #LinphoneCoreVTable structure, where it will receive
2723  * a LinphoneCallIncoming event with the associated LinphoneCall object.
2724  * The application can later accept the call using this method.
2725  * @param lc the LinphoneCore object
2726  * @param call the LinphoneCall object representing the call to be answered.
2727  *
2728 **/
2729 int linphone_core_accept_call(LinphoneCore *lc, LinphoneCall *call){
2730         return linphone_core_accept_call_with_params(lc,call,NULL);
2731 }
2732
2733 /**
2734  * Accept an incoming call, with parameters.
2735  *
2736  * @ingroup call_control
2737  * Basically the application is notified of incoming calls within the
2738  * call_state_changed callback of the #LinphoneCoreVTable structure, where it will receive
2739  * a LinphoneCallIncoming event with the associated LinphoneCall object.
2740  * The application can later accept the call using
2741  * this method.
2742  * @param lc the LinphoneCore object
2743  * @param call the LinphoneCall object representing the call to be answered.
2744  * @param params the specific parameters for this call, for example whether video is accepted or not. Use NULL to use default parameters.
2745  *
2746 **/
2747 int linphone_core_accept_call_with_params(LinphoneCore *lc, LinphoneCall *call, const LinphoneCallParams *params)
2748 {
2749         LinphoneProxyConfig *cfg=NULL;
2750         const char *contact=NULL;
2751         SalOp *replaced;
2752         SalMediaDescription *new_md;
2753         bool_t was_ringing=FALSE;
2754
2755         if (call==NULL){
2756                 //if just one call is present answer the only one ...
2757                 if(linphone_core_get_calls_nb (lc) != 1)
2758                         return -1;
2759                 else
2760                         call = (LinphoneCall*)linphone_core_get_calls(lc)->data;
2761         }
2762
2763         if (call->state==LinphoneCallConnected){
2764                 /*call already accepted*/
2765                 return -1;
2766         }
2767
2768         /* check if this call is supposed to replace an already running one*/
2769         replaced=sal_call_get_replaces(call->op);
2770         if (replaced){
2771                 LinphoneCall *rc=(LinphoneCall*)sal_op_get_user_pointer (replaced);
2772                 if (rc){
2773                         ms_message("Call %p replaces call %p. This last one is going to be terminated automatically.",
2774                                    call,rc);
2775                         linphone_core_terminate_call(lc,rc);
2776                 }
2777         }
2778
2779         if (lc->current_call!=call){
2780                 linphone_core_preempt_sound_resources(lc);
2781         }
2782
2783         /*stop ringing */
2784         if (lc->ringstream!=NULL) {
2785                 ms_message("stop ringing");
2786                 ring_stop(lc->ringstream);
2787                 ms_message("ring stopped");
2788                 lc->ringstream=NULL;
2789                 was_ringing=TRUE;
2790         }
2791         if (call->ringing_beep){
2792                 linphone_core_stop_dtmf(lc);
2793                 call->ringing_beep=FALSE;
2794         }
2795
2796         linphone_core_get_default_proxy(lc,&cfg);
2797         call->dest_proxy=cfg;
2798         call->dest_proxy=linphone_core_lookup_known_proxy(lc,call->log->to);
2799
2800         if (cfg!=call->dest_proxy && call->dest_proxy!=NULL) {
2801                 ms_message("Overriding default proxy setting for this call:");
2802                 ms_message("The used identity will be %s",linphone_proxy_config_get_identity(call->dest_proxy));
2803         }
2804         /*try to be best-effort in giving real local or routable contact address*/
2805         contact=get_fixed_contact(lc,call,call->dest_proxy);
2806         if (contact)
2807                 sal_op_set_contact(call->op,contact);
2808
2809         if (call->audiostream==NULL)
2810                 linphone_call_init_media_streams(call);
2811         if (!was_ringing && call->audiostream->ticker==NULL){
2812                 audio_stream_prepare_sound(call->audiostream,lc->sound_conf.play_sndcard,lc->sound_conf.capt_sndcard);
2813         }
2814
2815         if (params){
2816                 call->params=*params;
2817                 call->camera_active=call->params.has_video;
2818                 update_local_media_description(lc,call);
2819                 sal_call_set_local_media_description(call->op,call->localdesc);
2820         }
2821
2822         sal_call_accept(call->op);
2823         if (lc->vtable.display_status!=NULL)
2824                 lc->vtable.display_status(lc,_("Connected."));
2825         lc->current_call=call;
2826         linphone_call_set_state(call,LinphoneCallConnected,"Connected");
2827         new_md=sal_call_get_final_media_description(call->op);
2828         linphone_core_update_streams(lc, call, new_md);
2829         if (new_md){
2830                 linphone_call_set_state(call,LinphoneCallStreamsRunning,"Connected (streams running)");
2831         }else call->media_pending=TRUE;
2832
2833         ms_message("call answered.");
2834         return 0;
2835 }
2836
2837 int linphone_core_abort_call(LinphoneCore *lc, LinphoneCall *call, const char *error){
2838         sal_call_terminate(call->op);
2839
2840         /*stop ringing*/
2841         if (lc->ringstream!=NULL) {
2842                 ring_stop(lc->ringstream);
2843                 lc->ringstream=NULL;
2844         }
2845         linphone_call_stop_media_streams(call);
2846         if (lc->vtable.display_status!=NULL)
2847                 lc->vtable.display_status(lc,_("Call aborted") );
2848         linphone_call_set_state(call,LinphoneCallError,error);
2849         return 0;
2850 }
2851
2852 static void terminate_call(LinphoneCore *lc, LinphoneCall *call){
2853         if (call->state==LinphoneCallIncomingReceived){
2854                 if (call->reason!=LinphoneReasonNotAnswered)
2855                         call->reason=LinphoneReasonDeclined;
2856         }
2857         /*stop ringing*/
2858         if (lc->ringstream!=NULL) {
2859                 ring_stop(lc->ringstream);
2860                 lc->ringstream=NULL;
2861         }
2862
2863         linphone_call_stop_media_streams(call);
2864         if (lc->vtable.display_status!=NULL)
2865                 lc->vtable.display_status(lc,_("Call ended") );
2866 }
2867
2868 int linphone_core_redirect_call(LinphoneCore *lc, LinphoneCall *call, const char *redirect_uri){
2869         if (call->state==LinphoneCallIncomingReceived){
2870                 sal_call_decline(call->op,SalReasonRedirect,redirect_uri);
2871                 call->reason=LinphoneReasonDeclined;
2872                 terminate_call(lc,call);
2873                 linphone_call_set_state(call,LinphoneCallEnd,"Call terminated");
2874         }else{
2875                 ms_error("Bad state for call redirection.");
2876                 return -1;
2877     }
2878         return 0;
2879 }
2880
2881
2882 /**
2883  * Terminates a call.
2884  *
2885  * @ingroup call_control
2886  * @param lc the LinphoneCore
2887  * @param the_call the LinphoneCall object representing the call to be terminated.
2888 **/
2889 int linphone_core_terminate_call(LinphoneCore *lc, LinphoneCall *the_call)
2890 {
2891         LinphoneCall *call;
2892         if (the_call == NULL){
2893                 call = linphone_core_get_current_call(lc);
2894                 if (ms_list_size(lc->calls)==1){
2895                         call=(LinphoneCall*)lc->calls->data;
2896                 }else{
2897                         ms_warning("No unique call to terminate !");
2898                         return -1;
2899                 }
2900         }
2901         else
2902         {
2903                 call = the_call;
2904         }
2905         sal_call_terminate(call->op);
2906         terminate_call(lc,call);
2907
2908         linphone_call_set_state(call,LinphoneCallEnd,"Call terminated");
2909         return 0;
2910 }
2911
2912 /**
2913  * Terminates all the calls.
2914  *
2915  * @ingroup call_control
2916  * @param lc The LinphoneCore
2917 **/
2918 int linphone_core_terminate_all_calls(LinphoneCore *lc){
2919         MSList *calls=lc->calls;
2920         while(calls) {
2921                 LinphoneCall *c=(LinphoneCall*)calls->data;
2922                 calls=calls->next;
2923                 linphone_core_terminate_call(lc,c);
2924         }
2925         return 0;
2926 }
2927
2928 /**
2929  * Returns the current list of calls.
2930  *
2931  * Note that this list is read-only and might be changed by the core after a function call to linphone_core_iterate().
2932  * Similarly the LinphoneCall objects inside it might be destroyed without prior notice.
2933  * To hold references to LinphoneCall object into your program, you must use linphone_call_ref().
2934  *
2935  * @ingroup call_control
2936 **/
2937 const MSList *linphone_core_get_calls(LinphoneCore *lc)
2938 {
2939         return lc->calls;
2940 }
2941
2942 /**
2943  * Returns TRUE if there is a call running.
2944  *
2945  * @ingroup call_control
2946 **/
2947 bool_t linphone_core_in_call(const LinphoneCore *lc){
2948         return linphone_core_get_current_call((LinphoneCore *)lc)!=NULL || linphone_core_is_in_conference(lc);
2949 }
2950
2951 /**
2952  * Returns The _LinphoneCall struct of the current call if one is in call
2953  *
2954  * @ingroup call_control
2955 **/
2956 LinphoneCall *linphone_core_get_current_call(const LinphoneCore *lc)
2957 {
2958         return lc->current_call;
2959 }
2960
2961 /**
2962  * Pauses the call. If a music file has been setup using linphone_core_set_play_file(),
2963  * this file will be played to the remote user.
2964  *
2965  * @ingroup call_control
2966 **/
2967 int linphone_core_pause_call(LinphoneCore *lc, LinphoneCall *call)
2968 {
2969         const char *subject=NULL;
2970
2971         if (call->state!=LinphoneCallStreamsRunning && call->state!=LinphoneCallPausedByRemote){
2972                 ms_warning("Cannot pause this call, it is not active.");
2973                 return -1;
2974         }
2975         update_local_media_description(lc,call);
2976         if (call->ice_session != NULL)
2977                 linphone_core_update_local_media_description_from_ice(call->localdesc, call->ice_session);
2978         if (sal_media_description_has_dir(call->resultdesc,SalStreamSendRecv)){
2979                 sal_media_description_set_dir(call->localdesc,SalStreamSendOnly);
2980                 subject="Call on hold";
2981         }else if (sal_media_description_has_dir(call->resultdesc,SalStreamRecvOnly)){
2982                 sal_media_description_set_dir(call->localdesc,SalStreamSendOnly);
2983                 subject="Call on hold for me too";
2984         }else{
2985                 ms_error("No reason to pause this call, it is already paused or inactive.");
2986                 return -1;
2987         }
2988         sal_call_set_local_media_description(call->op,call->localdesc);
2989         if (sal_call_update(call->op,subject) != 0){
2990                 if (lc->vtable.display_warning)
2991                         lc->vtable.display_warning(lc,_("Could not pause the call"));
2992         }
2993         lc->current_call=NULL;
2994         linphone_call_set_state(call,LinphoneCallPausing,"Pausing call");
2995         if (lc->vtable.display_status)
2996                 lc->vtable.display_status(lc,_("Pausing the current call..."));
2997         if (call->audiostream || call->videostream)
2998                 linphone_call_stop_media_streams (call);
2999         return 0;
3000 }
3001
3002 /**
3003  * Pause all currently running calls.
3004 **/
3005 int linphone_core_pause_all_calls(LinphoneCore *lc){
3006         const MSList *elem;
3007         for(elem=lc->calls;elem!=NULL;elem=elem->next){
3008                 LinphoneCall *call=(LinphoneCall *)elem->data;
3009                 LinphoneCallState cs=linphone_call_get_state(call);
3010                 if (cs==LinphoneCallStreamsRunning || cs==LinphoneCallPausedByRemote){
3011                         linphone_core_pause_call(lc,call);
3012                 }
3013         }
3014         return 0;
3015 }
3016
3017 void linphone_core_preempt_sound_resources(LinphoneCore *lc){
3018         LinphoneCall *current_call;
3019         if (linphone_core_is_in_conference(lc)){
3020                 linphone_core_leave_conference(lc);
3021                 return;
3022         }
3023         current_call=linphone_core_get_current_call(lc);
3024         if(current_call != NULL){
3025                 ms_message("Pausing automatically the current call.");
3026                 linphone_core_pause_call(lc,current_call);
3027         }
3028 }
3029
3030 /**
3031  * Resumes the call.
3032  *
3033  * @ingroup call_control
3034 **/
3035 int linphone_core_resume_call(LinphoneCore *lc, LinphoneCall *the_call)
3036 {
3037         char temp[255]={0};
3038         LinphoneCall *call = the_call;
3039         const char *subject="Call resuming";
3040
3041         if(call->state!=LinphoneCallPaused ){
3042                 ms_warning("we cannot resume a call that has not been established and paused before");
3043                 return -1;
3044         }
3045         if (call->params.in_conference==FALSE){
3046                 linphone_core_preempt_sound_resources(lc);
3047                 ms_message("Resuming call %p",call);
3048         }
3049
3050         /* Stop playing music immediately. If remote side is a conference it
3051          prevents the participants to hear it while the 200OK comes back.*/
3052         if (call->audiostream) audio_stream_play(call->audiostream, NULL);
3053
3054         update_local_media_description(lc,the_call);
3055         if (call->ice_session != NULL)
3056                 linphone_core_update_local_media_description_from_ice(call->localdesc, call->ice_session);
3057         sal_call_set_local_media_description(call->op,call->localdesc);
3058         sal_media_description_set_dir(call->localdesc,SalStreamSendRecv);
3059         if (call->params.in_conference && !call->current_params.in_conference) subject="Conference";
3060         if(sal_call_update(call->op,subject) != 0){
3061                 return -1;
3062         }
3063         linphone_call_set_state (call,LinphoneCallResuming,"Resuming");
3064         snprintf(temp,sizeof(temp)-1,"Resuming the call with %s",linphone_call_get_remote_address_as_string(call));
3065         if (lc->vtable.display_status)
3066                 lc->vtable.display_status(lc,temp);
3067         return 0;
3068 }
3069
3070 static int remote_address_compare(LinphoneCall *call, const LinphoneAddress *raddr){
3071         const LinphoneAddress *addr=linphone_call_get_remote_address (call);
3072         return !linphone_address_weak_equal (addr,raddr);
3073 }
3074
3075 /**
3076  * Get the call with the remote_address specified
3077  * @param lc
3078  * @param remote_address
3079  * @return the LinphoneCall of the call if found
3080  */
3081 LinphoneCall *linphone_core_get_call_by_remote_address(LinphoneCore *lc, const char *remote_address){
3082         LinphoneAddress *raddr=linphone_address_new(remote_address);
3083         MSList *elem=ms_list_find_custom(lc->calls,(int (*)(const void*,const void *))remote_address_compare,raddr);
3084         if (elem) return (LinphoneCall*) elem->data;
3085         return NULL;
3086 }
3087
3088 int linphone_core_send_publish(LinphoneCore *lc,
3089                                LinphoneOnlineStatus presence_mode)
3090 {
3091         const MSList *elem;
3092         for (elem=linphone_core_get_proxy_config_list(lc);elem!=NULL;elem=ms_list_next(elem)){
3093                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
3094                 if (cfg->publish) linphone_proxy_config_send_publish(cfg,presence_mode);
3095         }
3096         return 0;
3097 }
3098
3099 /**
3100  * Set the incoming call timeout in seconds.
3101  *
3102  * @ingroup call_control
3103  * If an incoming call isn't answered for this timeout period, it is
3104  * automatically declined.
3105 **/
3106 void linphone_core_set_inc_timeout(LinphoneCore *lc, int seconds){
3107         lc->sip_conf.inc_timeout=seconds;
3108 }
3109
3110 /**
3111  * Returns the incoming call timeout
3112  *
3113  * @ingroup call_control
3114  * See linphone_core_set_inc_timeout() for details.
3115 **/
3116 int linphone_core_get_inc_timeout(LinphoneCore *lc){
3117         return lc->sip_conf.inc_timeout;
3118 }
3119
3120 void linphone_core_set_presence_info(LinphoneCore *lc,int minutes_away,
3121                                                                                                         const char *contact,
3122                                                                                                         LinphoneOnlineStatus presence_mode)
3123 {
3124         if (minutes_away>0) lc->minutes_away=minutes_away;
3125
3126         if (lc->alt_contact!=NULL) {
3127                 ms_free(lc->alt_contact);
3128                 lc->alt_contact=NULL;
3129         }
3130         if (contact) lc->alt_contact=ms_strdup(contact);
3131         if (lc->presence_mode!=presence_mode){
3132                 linphone_core_notify_all_friends(lc,presence_mode);
3133                 /*
3134                    Improve the use of all LINPHONE_STATUS available.
3135                    !TODO Do not mix "presence status" with "answer status code"..
3136                    Use correct parameter to follow sip_if_match/sip_etag.
3137                  */
3138                 linphone_core_send_publish(lc,presence_mode);
3139         }
3140         lc->presence_mode=presence_mode;
3141 }
3142
3143 LinphoneOnlineStatus linphone_core_get_presence_info(const LinphoneCore *lc){
3144         return lc->presence_mode;
3145 }
3146
3147 /**
3148  * Get playback sound level in 0-100 scale.
3149  *
3150  * @ingroup media_parameters
3151 **/
3152 int linphone_core_get_play_level(LinphoneCore *lc)
3153 {
3154         return lc->sound_conf.play_lev;
3155 }
3156
3157 /**
3158  * Get ring sound level in 0-100 scale
3159  *
3160  * @ingroup media_parameters
3161 **/
3162 int linphone_core_get_ring_level(LinphoneCore *lc)
3163 {
3164         return lc->sound_conf.ring_lev;
3165 }
3166
3167 /**
3168  * Get sound capture level in 0-100 scale
3169  *
3170  * @ingroup media_parameters
3171 **/
3172 int linphone_core_get_rec_level(LinphoneCore *lc){
3173         return lc->sound_conf.rec_lev;
3174 }
3175
3176 /**
3177  * Set sound ring level in 0-100 scale
3178  *
3179  * @ingroup media_parameters
3180 **/
3181 void linphone_core_set_ring_level(LinphoneCore *lc, int level){
3182         MSSndCard *sndcard;
3183         lc->sound_conf.ring_lev=level;
3184         sndcard=lc->sound_conf.ring_sndcard;
3185         if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_PLAYBACK,level);
3186 }
3187
3188 /**
3189  * Allow to control play level before entering sound card:  gain in db
3190  *
3191  * @ingroup media_parameters
3192 **/
3193 void linphone_core_set_playback_gain_db (LinphoneCore *lc, float gaindb){
3194         float gain=gaindb;
3195         LinphoneCall *call=linphone_core_get_current_call (lc);
3196         AudioStream *st;
3197
3198         lc->sound_conf.soft_play_lev=gaindb;
3199
3200         if (call==NULL || (st=call->audiostream)==NULL){
3201                 ms_message("linphone_core_set_playback_gain_db(): no active call.");
3202                 return;
3203         }
3204         if (st->volrecv){
3205                 ms_filter_call_method(st->volrecv,MS_VOLUME_SET_DB_GAIN,&gain);
3206         }else ms_warning("Could not apply gain: gain control wasn't activated.");
3207 }
3208
3209 /**
3210  * Get playback gain in db before entering  sound card.
3211  *
3212  * @ingroup media_parameters
3213 **/
3214 float linphone_core_get_playback_gain_db(LinphoneCore *lc) {
3215         return lc->sound_conf.soft_play_lev;
3216 }
3217
3218 /**
3219  * Set sound playback level in 0-100 scale
3220  *
3221  * @ingroup media_parameters
3222 **/
3223 void linphone_core_set_play_level(LinphoneCore *lc, int level){
3224         MSSndCard *sndcard;
3225         lc->sound_conf.play_lev=level;
3226         sndcard=lc->sound_conf.play_sndcard;
3227         if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_PLAYBACK,level);
3228 }
3229
3230 /**
3231  * Set sound capture level in 0-100 scale
3232  *
3233  * @ingroup media_parameters
3234 **/
3235 void linphone_core_set_rec_level(LinphoneCore *lc, int level)
3236 {
3237         MSSndCard *sndcard;
3238         lc->sound_conf.rec_lev=level;
3239         sndcard=lc->sound_conf.capt_sndcard;
3240         if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_CAPTURE,level);
3241 }
3242
3243 static MSSndCard *get_card_from_string_id(const char *devid, unsigned int cap){
3244         MSSndCard *sndcard=NULL;
3245         if (devid!=NULL){
3246                 sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
3247                 if (sndcard!=NULL &&
3248                         (ms_snd_card_get_capabilities(sndcard) & cap)==0 ){
3249                         ms_warning("%s card does not have the %s capability, ignoring.",
3250                                 devid,
3251                                 cap==MS_SND_CARD_CAP_CAPTURE ? "capture" : "playback");
3252                         sndcard=NULL;
3253                 }
3254         }
3255         if (sndcard==NULL) {
3256                 /* get a card that has read+write capabilities */
3257                 sndcard=ms_snd_card_manager_get_default_card(ms_snd_card_manager_get());
3258                 /* otherwise refine to the first card having the right capability*/
3259                 if (sndcard==NULL){
3260                         const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
3261                         for(;elem!=NULL;elem=elem->next){
3262                                 sndcard=(MSSndCard*)elem->data;
3263                                 if (ms_snd_card_get_capabilities(sndcard) & cap) break;
3264                         }
3265                 }
3266                 if (sndcard==NULL){/*looks like a bug! take the first one !*/
3267                         const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
3268                         if (elem) sndcard=(MSSndCard*)elem->data;
3269         }
3270         }
3271         if (sndcard==NULL) ms_error("Could not find a suitable soundcard !");
3272         return sndcard;
3273 }
3274
3275 /**
3276  * Returns true if the specified sound device can capture sound.
3277  *
3278  * @ingroup media_parameters
3279  * @param lc The LinphoneCore object
3280  * @param devid the device name as returned by linphone_core_get_sound_devices()
3281 **/
3282 bool_t linphone_core_sound_device_can_capture(LinphoneCore *lc, const char *devid){
3283         MSSndCard *sndcard;
3284         sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
3285         if (sndcard!=NULL && (ms_snd_card_get_capabilities(sndcard) & MS_SND_CARD_CAP_CAPTURE)) return TRUE;
3286         return FALSE;
3287 }
3288
3289 /**
3290  * Returns true if the specified sound device can play sound.
3291  *
3292  * @ingroup media_parameters
3293  * @param lc The LinphoneCore object
3294  * @param devid the device name as returned by linphone_core_get_sound_devices()
3295 **/
3296 bool_t linphone_core_sound_device_can_playback(LinphoneCore *lc, const char *devid){
3297         MSSndCard *sndcard;
3298         sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
3299         if (sndcard!=NULL && (ms_snd_card_get_capabilities(sndcard) & MS_SND_CARD_CAP_PLAYBACK)) return TRUE;
3300         return FALSE;
3301 }
3302
3303 /**
3304  * Sets the sound device used for ringing.
3305  *
3306  * @ingroup media_parameters
3307  * @param lc The LinphoneCore object
3308  * @param devid the device name as returned by linphone_core_get_sound_devices()
3309 **/
3310 int linphone_core_set_ringer_device(LinphoneCore *lc, const char * devid){
3311         MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_PLAYBACK);
3312         lc->sound_conf.ring_sndcard=card;
3313         if (card && linphone_core_ready(lc))
3314                 lp_config_set_string(lc->config,"sound","ringer_dev_id",ms_snd_card_get_string_id(card));
3315         return 0;
3316 }
3317
3318 /**
3319  * Sets the sound device used for playback.
3320  *
3321  * @ingroup media_parameters
3322  * @param lc The LinphoneCore object
3323  * @param devid the device name as returned by linphone_core_get_sound_devices()
3324 **/
3325 int linphone_core_set_playback_device(LinphoneCore *lc, const char * devid){
3326         MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_PLAYBACK);
3327         lc->sound_conf.play_sndcard=card;
3328         if (card &&  linphone_core_ready(lc))
3329                 lp_config_set_string(lc->config,"sound","playback_dev_id",ms_snd_card_get_string_id(card));
3330         return 0;
3331 }
3332
3333 /**
3334  * Sets the sound device used for capture.
3335  *
3336  * @ingroup media_parameters
3337  * @param lc The LinphoneCore object
3338  * @param devid the device name as returned by linphone_core_get_sound_devices()
3339 **/
3340 int linphone_core_set_capture_device(LinphoneCore *lc, const char * devid){
3341         MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_CAPTURE);
3342         lc->sound_conf.capt_sndcard=card;
3343         if (card &&  linphone_core_ready(lc))
3344                 lp_config_set_string(lc->config,"sound","capture_dev_id",ms_snd_card_get_string_id(card));
3345         return 0;
3346 }
3347
3348 /**
3349  * Returns the name of the currently assigned sound device for ringing.
3350  *
3351  * @ingroup media_parameters
3352  * @param lc The LinphoneCore object
3353 **/
3354 const char * linphone_core_get_ringer_device(LinphoneCore *lc)
3355 {
3356         if (lc->sound_conf.ring_sndcard) return ms_snd_card_get_string_id(lc->sound_conf.ring_sndcard);
3357         return NULL;
3358 }
3359
3360 /**
3361  * Returns the name of the currently assigned sound device for playback.
3362  *
3363  * @ingroup media_parameters
3364  * @param lc The LinphoneCore object
3365 **/
3366 const char * linphone_core_get_playback_device(LinphoneCore *lc)
3367 {
3368         return lc->sound_conf.play_sndcard ? ms_snd_card_get_string_id(lc->sound_conf.play_sndcard) : NULL;
3369 }
3370
3371 /**
3372  * Returns the name of the currently assigned sound device for capture.
3373  *
3374  * @ingroup media_parameters
3375  * @param lc The LinphoneCore object
3376 **/
3377 const char * linphone_core_get_capture_device(LinphoneCore *lc)
3378 {
3379         return lc->sound_conf.capt_sndcard ? ms_snd_card_get_string_id(lc->sound_conf.capt_sndcard) : NULL;
3380 }
3381
3382 /**
3383  * Returns an unmodifiable array of available sound devices.
3384  *
3385  * The array is NULL terminated.
3386  *
3387  * @ingroup media_parameters
3388  * @param lc The LinphoneCore object
3389 **/
3390 const char**  linphone_core_get_sound_devices(LinphoneCore *lc){
3391         return lc->sound_conf.cards;
3392 }
3393
3394 /**
3395  * Returns an unmodifiable array of available video capture devices.
3396  *
3397  * @ingroup media_parameters
3398  * The array is NULL terminated.
3399 **/
3400 const char**  linphone_core_get_video_devices(const LinphoneCore *lc){
3401         return lc->video_conf.cams;
3402 }
3403
3404 /**
3405  * Update detection of sound devices.
3406  *
3407  * Use this function when the application is notified of USB plug events, so that
3408  * list of available hardwares for sound playback and capture is updated.
3409  **/
3410 void linphone_core_reload_sound_devices(LinphoneCore *lc){
3411         const char *ringer,*playback,*capture;
3412         ringer=linphone_core_get_ringer_device(lc);
3413         playback=linphone_core_get_playback_device(lc);
3414         capture=linphone_core_get_capture_device(lc);
3415         ms_snd_card_manager_reload(ms_snd_card_manager_get());
3416         build_sound_devices_table(lc);
3417         linphone_core_set_ringer_device(lc,ringer);
3418         linphone_core_set_playback_device(lc,playback);
3419         linphone_core_set_capture_device(lc,capture);
3420 }
3421
3422 /**
3423  * Update detection of camera devices.
3424  *
3425  * Use this function when the application is notified of USB plug events, so that
3426  * list of available hardwares for video capture is updated.
3427  **/
3428 void linphone_core_reload_video_devices(LinphoneCore *lc){
3429         const char *devid;
3430         devid=linphone_core_get_video_device(lc);
3431         ms_web_cam_manager_reload(ms_web_cam_manager_get());
3432         build_video_devices_table(lc);
3433         linphone_core_set_video_device(lc,devid);
3434 }
3435
3436 char linphone_core_get_sound_source(LinphoneCore *lc)
3437 {
3438         return lc->sound_conf.source;
3439 }
3440
3441 void linphone_core_set_sound_source(LinphoneCore *lc, char source)
3442 {
3443         MSSndCard *sndcard=lc->sound_conf.capt_sndcard;
3444         lc->sound_conf.source=source;
3445         if (!sndcard) return;
3446         switch(source){
3447                 case 'm':
3448                         ms_snd_card_set_capture(sndcard,MS_SND_CARD_MIC);
3449                         break;
3450                 case 'l':
3451                         ms_snd_card_set_capture(sndcard,MS_SND_CARD_LINE);
3452                         break;
3453         }
3454
3455 }
3456
3457
3458 /**
3459  * Sets the path to a wav file used for ringing.
3460  *
3461  * @param path The file must be a wav 16bit linear. Local ring is disabled if null
3462  * @param lc The LinphoneCore object
3463  *
3464  * @ingroup media_parameters
3465 **/
3466 void linphone_core_set_ring(LinphoneCore *lc,const char *path){
3467         if (lc->sound_conf.local_ring!=0){
3468                 ms_free(lc->sound_conf.local_ring);
3469                 lc->sound_conf.local_ring=NULL;
3470         }
3471         if (path)
3472                 lc->sound_conf.local_ring=ms_strdup(path);
3473         if ( linphone_core_ready(lc) && lc->sound_conf.local_ring)
3474                 lp_config_set_string(lc->config,"sound","local_ring",lc->sound_conf.local_ring);
3475 }
3476
3477 /**
3478  * Returns the path to the wav file used for ringing.
3479  *
3480  * @param lc The LinphoneCore object
3481  * @ingroup media_parameters
3482 **/
3483 const char *linphone_core_get_ring(const LinphoneCore *lc){
3484         return lc->sound_conf.local_ring;
3485 }
3486
3487 /**
3488  * Sets the path to a file or folder containing trusted root CAs (PEM format)
3489  *
3490  * @param path
3491  * @param lc The LinphoneCore object
3492  *
3493  * @ingroup media_parameters
3494 **/
3495 void linphone_core_set_root_ca(LinphoneCore *lc,const char *path){
3496         sal_set_root_ca(lc->sal, path);
3497 }
3498
3499 /**
3500  * Specify whether the tls server certificate must be verified when connecting to a SIP/TLS server.
3501 **/
3502 void linphone_core_verify_server_certificates(LinphoneCore *lc, bool_t yesno){
3503         sal_verify_server_certificates(lc->sal,yesno);
3504 }
3505
3506 static void notify_end_of_ring(void *ud, MSFilter *f, unsigned int event, void *arg){
3507         LinphoneCore *lc=(LinphoneCore*)ud;
3508         lc->preview_finished=1;
3509 }
3510
3511 int linphone_core_preview_ring(LinphoneCore *lc, const char *ring,LinphoneCoreCbFunc func,void * userdata)
3512 {
3513         if (lc->ringstream!=0){
3514                 ms_warning("Cannot start ring now,there's already a ring being played");
3515                 return -1;
3516         }
3517         lc_callback_obj_init(&lc->preview_finished_cb,func,userdata);
3518         lc->preview_finished=0;
3519         if (lc->sound_conf.ring_sndcard!=NULL){
3520                 MSSndCard *ringcard=lc->sound_conf.lsd_card ? lc->sound_conf.lsd_card : lc->sound_conf.ring_sndcard;
3521                 lc->ringstream=ring_start_with_cb(ring,2000,ringcard,notify_end_of_ring,(void *)lc);
3522         }
3523         return 0;
3524 }
3525
3526 /**
3527  * Sets the path to a wav file used for ringing back.
3528  *
3529  * Ringback means the ring that is heard when it's ringing at the remote party.
3530  * The file must be a wav 16bit linear.
3531  *
3532  * @ingroup media_parameters
3533 **/
3534 void linphone_core_set_ringback(LinphoneCore *lc, const char *path){
3535         if (lc->sound_conf.remote_ring!=0){
3536                 ms_free(lc->sound_conf.remote_ring);
3537         }
3538         lc->sound_conf.remote_ring=ms_strdup(path);
3539 }
3540
3541 /**
3542  * Returns the path to the wav file used for ringing back.
3543  *
3544  * @ingroup media_parameters
3545 **/
3546 const char * linphone_core_get_ringback(const LinphoneCore *lc){
3547         return lc->sound_conf.remote_ring;
3548 }
3549
3550 /**
3551  * Enables or disable echo cancellation. Value is saved an used for subsequent calls
3552  *
3553  * @ingroup media_parameters
3554 **/
3555 void linphone_core_enable_echo_cancellation(LinphoneCore *lc, bool_t val){
3556         lc->sound_conf.ec=val;
3557         if ( linphone_core_ready(lc))
3558                 lp_config_set_int(lc->config,"sound","echocancellation",val);
3559 }
3560
3561
3562 /**
3563  * Returns TRUE if echo cancellation is enabled.
3564  *
3565  * @ingroup media_parameters
3566 **/
3567 bool_t linphone_core_echo_cancellation_enabled(LinphoneCore *lc){
3568         return lc->sound_conf.ec;
3569 }
3570
3571 void linphone_core_enable_echo_limiter(LinphoneCore *lc, bool_t val){
3572         lc->sound_conf.ea=val;
3573 }
3574
3575 bool_t linphone_core_echo_limiter_enabled(const LinphoneCore *lc){
3576         return lc->sound_conf.ea;
3577 }
3578
3579 /**
3580  * Mutes or unmutes the local microphone.
3581  *
3582  * @ingroup media_parameters
3583 **/
3584 void linphone_core_mute_mic(LinphoneCore *lc, bool_t val){
3585         LinphoneCall *call=linphone_core_get_current_call(lc);
3586         AudioStream *st=NULL;
3587         if (linphone_core_is_in_conference(lc)){
3588                 lc->conf_ctx.local_muted=val;
3589                 st=lc->conf_ctx.local_participant;
3590         }else if (call==NULL){
3591                 ms_warning("linphone_core_mute_mic(): No current call !");
3592                 return;
3593         }else{
3594                 st=call->audiostream;
3595                 call->audio_muted=val;
3596         }
3597         if (st!=NULL){
3598                 audio_stream_set_mic_gain(st,
3599                         (val==TRUE) ? 0 : lp_config_get_float(lc->config,"sound","mic_gain",1));
3600                 if ( linphone_core_get_rtp_no_xmit_on_audio_mute(lc) ){
3601                         audio_stream_mute_rtp(st,val);
3602                 }
3603
3604         }
3605 }
3606 /**
3607  * Returns whether microphone is muted.
3608 **/
3609 bool_t linphone_core_is_mic_muted(LinphoneCore *lc) {
3610         LinphoneCall *call=linphone_core_get_current_call(lc);
3611         if (linphone_core_is_in_conference(lc)){
3612                 return lc->conf_ctx.local_muted;
3613         }else if (call==NULL){
3614                 ms_warning("linphone_core_is_mic_muted(): No current call !");
3615                 return FALSE;
3616         }
3617         return call->audio_muted;
3618 }
3619
3620 // returns rtp transmission status for an active stream
3621 // if audio is muted and config parameter rtp_no_xmit_on_audio_mute
3622 // was set on then rtp transmission is also muted
3623 bool_t linphone_core_is_rtp_muted(LinphoneCore *lc){
3624         LinphoneCall *call=linphone_core_get_current_call(lc);
3625         if (call==NULL){
3626                 ms_warning("linphone_core_is_mic_muted(): No current call !");
3627                 return FALSE;
3628         }
3629         if( linphone_core_get_rtp_no_xmit_on_audio_mute(lc)){
3630                 return call->audio_muted;
3631         }
3632         return FALSE;
3633 }
3634
3635 void linphone_core_enable_agc(LinphoneCore *lc, bool_t val){
3636         lc->sound_conf.agc=val;
3637 }
3638
3639 bool_t linphone_core_agc_enabled(const LinphoneCore *lc){
3640         return lc->sound_conf.agc;
3641 }
3642
3643 /**
3644  * Send the specified dtmf.
3645  *
3646  * @ingroup media_parameters
3647  * This function only works during calls. The dtmf is automatically played to the user.
3648  * @param lc The LinphoneCore object
3649  * @param dtmf The dtmf name specified as a char, such as '0', '#' etc...
3650  *
3651 **/
3652 void linphone_core_send_dtmf(LinphoneCore *lc, char dtmf)
3653 {
3654         LinphoneCall *call=linphone_core_get_current_call(lc);
3655         if (call==NULL){
3656                 ms_warning("linphone_core_send_dtmf(): no active call");
3657                 return;
3658         }
3659         /*By default we send DTMF RFC2833 if we do not have enabled SIP_INFO but we can also send RFC2833 and SIP_INFO*/
3660         if (linphone_core_get_use_rfc2833_for_dtmf(lc)!=0 || linphone_core_get_use_info_for_dtmf(lc)==0)
3661         {
3662                 /* In Band DTMF */
3663                 if (call->audiostream!=NULL){
3664                         audio_stream_send_dtmf(call->audiostream,dtmf);
3665                 }
3666                 else
3667                 {
3668                         ms_error("we cannot send RFC2833 dtmf when we are not in communication");
3669                 }
3670         }
3671         if (linphone_core_get_use_info_for_dtmf(lc)!=0){
3672                 /* Out of Band DTMF (use INFO method) */
3673                 sal_call_send_dtmf(call->op,dtmf);
3674         }
3675 }
3676
3677 void linphone_core_set_stun_server(LinphoneCore *lc, const char *server){
3678         if (lc->net_conf.stun_server!=NULL)
3679                 ms_free(lc->net_conf.stun_server);
3680         if (server)
3681                 lc->net_conf.stun_server=ms_strdup(server);
3682         else lc->net_conf.stun_server=NULL;
3683         if (linphone_core_ready(lc))
3684                 lp_config_set_string(lc->config,"net","stun_server",lc->net_conf.stun_server);
3685 }
3686
3687 const char * linphone_core_get_stun_server(const LinphoneCore *lc){
3688         return lc->net_conf.stun_server;
3689 }
3690
3691 const char * linphone_core_get_relay_addr(const LinphoneCore *lc){
3692         return lc->net_conf.relay;
3693 }
3694
3695 int linphone_core_set_relay_addr(LinphoneCore *lc, const char *addr){
3696         if (lc->net_conf.relay!=NULL){
3697                 ms_free(lc->net_conf.relay);
3698                 lc->net_conf.relay=NULL;
3699         }
3700         if (addr){
3701                 lc->net_conf.relay=ms_strdup(addr);
3702         }
3703         return 0;
3704 }
3705
3706 void linphone_core_set_nat_address(LinphoneCore *lc, const char *addr)
3707 {
3708         if (lc->net_conf.nat_address!=NULL){
3709                 ms_free(lc->net_conf.nat_address);
3710         }
3711         if (addr!=NULL) lc->net_conf.nat_address=ms_strdup(addr);
3712         else lc->net_conf.nat_address=NULL;
3713         if (lc->sip_conf.contact) update_primary_contact(lc);
3714 }
3715
3716 const char *linphone_core_get_nat_address(const LinphoneCore *lc) {
3717         return lc->net_conf.nat_address;
3718 }
3719
3720 const char *linphone_core_get_nat_address_resolved(LinphoneCore *lc)
3721 {
3722         struct sockaddr_storage ss;
3723         socklen_t ss_len;
3724         int error;
3725         char ipstring [INET6_ADDRSTRLEN];
3726
3727         if (lc->net_conf.nat_address==NULL) return NULL;
3728
3729         if (parse_hostname_to_addr (lc->net_conf.nat_address, &ss, &ss_len)<0) {
3730                 return lc->net_conf.nat_address;
3731         }
3732
3733         error = getnameinfo((struct sockaddr *)&ss, ss_len,
3734                 ipstring, sizeof(ipstring), NULL, 0, NI_NUMERICHOST);
3735         if (error) {
3736                 return lc->net_conf.nat_address;
3737         }
3738
3739         if (lc->net_conf.nat_address_ip!=NULL){
3740                 ms_free(lc->net_conf.nat_address_ip);
3741         }
3742         lc->net_conf.nat_address_ip = ms_strdup (ipstring);
3743         return lc->net_conf.nat_address_ip;
3744 }
3745
3746 void linphone_core_set_firewall_policy(LinphoneCore *lc, LinphoneFirewallPolicy pol){
3747         lc->net_conf.firewall_policy=pol;
3748         if (lc->sip_conf.contact) update_primary_contact(lc);
3749         if (linphone_core_ready(lc))
3750                 lp_config_set_int(lc->config,"net","firewall_policy",pol);
3751 }
3752
3753 LinphoneFirewallPolicy linphone_core_get_firewall_policy(const LinphoneCore *lc){
3754         return lc->net_conf.firewall_policy;
3755 }
3756
3757 /**
3758  * Get the list of call logs (past calls).
3759  *
3760  * @ingroup call_logs
3761 **/
3762 const MSList * linphone_core_get_call_logs(LinphoneCore *lc){
3763         return lc->call_logs;
3764 }
3765
3766 /**
3767  * Erase the call log.
3768  *
3769  * @ingroup call_logs
3770 **/
3771 void linphone_core_clear_call_logs(LinphoneCore *lc){
3772         lc->missed_calls=0;
3773         ms_list_for_each(lc->call_logs,(void (*)(void*))linphone_call_log_destroy);
3774         lc->call_logs=ms_list_free(lc->call_logs);
3775         call_logs_write_to_config_file(lc);
3776 }
3777
3778 /**
3779  * Returns number of missed calls.
3780  * Once checked, this counter can be reset with linphone_core_reset_missed_calls_count().
3781 **/
3782 int linphone_core_get_missed_calls_count(LinphoneCore *lc) {
3783         return lc->missed_calls;
3784 }
3785
3786 /**
3787  * Resets the counter of missed calls.
3788 **/
3789 void linphone_core_reset_missed_calls_count(LinphoneCore *lc) {
3790         lc->missed_calls=0;
3791 }
3792
3793 /**
3794  * Remove a specific call log from call history list.
3795  * This function destroys the call log object. It must not be accessed anymore by the application after calling this function.
3796  * @param lc the linphone core object
3797  * @param a LinphoneCallLog object.
3798 **/
3799 void linphone_core_remove_call_log(LinphoneCore *lc, LinphoneCallLog *cl){
3800         lc->call_logs = ms_list_remove(lc->call_logs, cl);
3801         call_logs_write_to_config_file(lc);
3802         linphone_call_log_destroy(cl);
3803 }
3804
3805 static void toggle_video_preview(LinphoneCore *lc, bool_t val){
3806 #ifdef VIDEO_ENABLED
3807         if (val){
3808                 if (lc->previewstream==NULL){
3809                         lc->previewstream=video_preview_new();
3810                         video_preview_set_size(lc->previewstream,lc->video_conf.vsize);
3811                         if (lc->video_conf.displaytype)
3812                                 video_preview_set_display_filter_name(lc->previewstream,lc->video_conf.displaytype);
3813                         if (lc->preview_window_id!=0)
3814                                 video_preview_set_native_window_id(lc->previewstream,lc->preview_window_id);
3815                         video_preview_start(lc->previewstream,lc->video_conf.device);
3816                 }
3817         }else{
3818                 if (lc->previewstream!=NULL){
3819                         video_preview_stop(lc->previewstream);
3820                         lc->previewstream=NULL;
3821                 }
3822         }
3823 #endif
3824 }
3825
3826 /**
3827  * Enables video globally.
3828  *
3829  * @ingroup media_parameters
3830  * This function does not have any effect during calls. It just indicates LinphoneCore to
3831  * initiate future calls with video or not. The two boolean parameters indicate in which
3832  * direction video is enabled. Setting both to false disables video entirely.
3833  *
3834  * @param lc The LinphoneCore object
3835  * @param vcap_enabled indicates whether video capture is enabled
3836  * @param display_enabled indicates whether video display should be shown
3837  *
3838 **/
3839 void linphone_core_enable_video(LinphoneCore *lc, bool_t vcap_enabled, bool_t display_enabled){
3840 #ifndef VIDEO_ENABLED
3841         if (vcap_enabled || display_enabled)
3842                 ms_warning("This version of linphone was built without video support.");
3843 #endif
3844         lc->video_conf.capture=vcap_enabled;
3845         lc->video_conf.display=display_enabled;
3846
3847         /* need to re-apply network bandwidth settings*/
3848         linphone_core_set_download_bandwidth(lc,
3849                 linphone_core_get_download_bandwidth(lc));
3850         linphone_core_set_upload_bandwidth(lc,
3851                 linphone_core_get_upload_bandwidth(lc));
3852 }
3853
3854 bool_t linphone_core_video_supported(LinphoneCore *lc){
3855 #ifdef VIDEO_ENABLED
3856         return TRUE;
3857 #else
3858         return FALSE;
3859 #endif
3860 }
3861
3862 /**
3863  * Returns TRUE if video is enabled, FALSE otherwise.
3864  * @ingroup media_parameters
3865 **/
3866 bool_t linphone_core_video_enabled(LinphoneCore *lc){
3867         return (lc->video_conf.display || lc->video_conf.capture);
3868 }
3869
3870 /**
3871  * Sets the default policy for video.
3872  * This policy defines whether:
3873  * - video shall be initiated by default for outgoing calls
3874  * - video shall be accepter by default for incoming calls
3875  * @ingroup media_parameters
3876 **/
3877 void linphone_core_set_video_policy(LinphoneCore *lc, const LinphoneVideoPolicy *policy){
3878         lc->video_policy=*policy;
3879         if (linphone_core_ready(lc)){
3880                 lp_config_set_int(lc->config,"video","automatically_initiate",policy->automatically_initiate);
3881                 lp_config_set_int(lc->config,"video","automatically_accept",policy->automatically_accept);
3882         }
3883 }
3884
3885 /**
3886  * Get the default policy for video.
3887  * See linphone_core_set_video_policy() for more details.
3888  * @ingroup media_parameters
3889 **/
3890 const LinphoneVideoPolicy *linphone_core_get_video_policy(LinphoneCore *lc){
3891         return &lc->video_policy;
3892 }
3893
3894 /**
3895  * Controls video preview enablement.
3896  *
3897  * @ingroup media_parameters
3898  * Video preview refers to the action of displaying the local webcam image
3899  * to the user while not in call.
3900 **/
3901 void linphone_core_enable_video_preview(LinphoneCore *lc, bool_t val){
3902         lc->video_conf.show_local=val;
3903         if (linphone_core_ready(lc))
3904                 lp_config_set_int(lc->config,"video","show_local",val);
3905 }
3906
3907 /**
3908  * Returns TRUE if video previewing is enabled.
3909  * @ingroup media_parameters
3910 **/
3911 bool_t linphone_core_video_preview_enabled(const LinphoneCore *lc){
3912         return lc->video_conf.show_local;
3913 }
3914
3915 /**
3916  * Enables or disable self view during calls.
3917  *
3918  * @ingroup media_parameters
3919  * Self-view refers to having local webcam image inserted in corner
3920  * of the video window during calls.
3921  * This function works at any time, including during calls.
3922 **/
3923 void linphone_core_enable_self_view(LinphoneCore *lc, bool_t val){
3924 #ifdef VIDEO_ENABLED
3925         LinphoneCall *call=linphone_core_get_current_call (lc);
3926         lc->video_conf.selfview=val;
3927         if (call && call->videostream){
3928                 video_stream_enable_self_view(call->videostream,val);
3929         }
3930         if (linphone_core_ready(lc)){
3931                 lp_config_set_int(lc->config,"video","self_view",val);
3932         }
3933 #endif
3934 }
3935
3936 /**
3937  * Returns TRUE if self-view is enabled, FALSE otherwise.
3938  *
3939  * @ingroup media_parameters
3940  *
3941  * Refer to linphone_core_enable_self_view() for details.
3942 **/
3943 bool_t linphone_core_self_view_enabled(const LinphoneCore *lc){
3944         return lc->video_conf.selfview;
3945 }
3946
3947 /**
3948  * Sets the active video device.
3949  *
3950  * @ingroup media_parameters
3951  * @param lc The LinphoneCore object
3952  * @param id the name of the video device as returned by linphone_core_get_video_devices()
3953 **/
3954 int linphone_core_set_video_device(LinphoneCore *lc, const char *id){
3955         MSWebCam *olddev=lc->video_conf.device;
3956         const char *vd;
3957         if (id!=NULL){
3958                 lc->video_conf.device=ms_web_cam_manager_get_cam(ms_web_cam_manager_get(),id);
3959                 if (lc->video_conf.device==NULL){
3960                         ms_warning("Could not found video device %s",id);
3961                 }
3962         }
3963         if (lc->video_conf.device==NULL)
3964                 lc->video_conf.device=ms_web_cam_manager_get_default_cam(ms_web_cam_manager_get());
3965         if (olddev!=NULL && olddev!=lc->video_conf.device){
3966                 toggle_video_preview(lc,FALSE);/*restart the video local preview*/
3967         }
3968         if ( linphone_core_ready(lc) && lc->video_conf.device){
3969                 vd=ms_web_cam_get_string_id(lc->video_conf.device);
3970                 if (vd && strstr(vd,"Static picture")!=NULL){
3971                         vd=NULL;
3972                 }
3973                 lp_config_set_string(lc->config,"video","device",vd);
3974         }
3975         return 0;
3976 }
3977
3978 /**
3979  * Returns the name of the currently active video device.
3980  *
3981  * @param lc The LinphoneCore object
3982  * @ingroup media_parameters
3983 **/
3984 const char *linphone_core_get_video_device(const LinphoneCore *lc){
3985         if (lc->video_conf.device) return ms_web_cam_get_string_id(lc->video_conf.device);
3986         return NULL;
3987 }
3988
3989 #ifdef VIDEO_ENABLED
3990 static VideoStream * get_active_video_stream(LinphoneCore *lc){
3991         VideoStream *vs = NULL;
3992         LinphoneCall *call=linphone_core_get_current_call (lc);
3993         /* Select the video stream from the call in the first place */
3994         if (call && call->videostream) {
3995                 vs = call->videostream;
3996         }
3997         /* If not in call, select the video stream from the preview */
3998         if (vs == NULL && lc->previewstream) {
3999                 vs = lc->previewstream;
4000         }
4001         return vs;
4002 }
4003 #endif
4004
4005 int linphone_core_set_static_picture(LinphoneCore *lc, const char *path) {
4006 #ifdef VIDEO_ENABLED
4007         VideoStream *vs=get_active_video_stream(lc);
4008         /* If we have a video stream (either preview, either from call), we
4009                  have a source and it is using the static picture filter, then
4010                  force the filter to use that picture. */
4011         if (vs && vs->source) {
4012                 if (ms_filter_get_id(vs->source) == MS_STATIC_IMAGE_ID) {
4013                         ms_filter_call_method(vs->source, MS_STATIC_IMAGE_SET_IMAGE,
4014                                                                                                                 (void *)path);
4015                 }
4016         }
4017         /* Tell the static image filter to use that image from now on so
4018                  that the image will be used next time it has to be read */
4019         ms_static_image_set_default_image(path);
4020 #else
4021         ms_warning("Video support not compiled.");
4022 #endif
4023         return 0;
4024 }
4025
4026 int linphone_core_set_static_picture_fps(LinphoneCore *lc, float fps) {
4027 #ifdef VIDEO_ENABLED
4028         VideoStream *vs = NULL;
4029
4030         vs=get_active_video_stream(lc);
4031
4032         /* If we have a video stream (either preview, either from call), we
4033                  have a source and it is using the static picture filter, then
4034                  force the filter to use that picture. */
4035         if (vs && vs->source) {
4036                 if (ms_filter_get_id(vs->source) == MS_STATIC_IMAGE_ID) {
4037                         ms_filter_call_method(vs->source, MS_FILTER_SET_FPS,(void *)&fps);
4038                 }
4039         }
4040 #else
4041         ms_warning("Video support not compiled.");
4042 #endif
4043         return 0;
4044 }
4045
4046 float linphone_core_get_static_picture_fps(LinphoneCore *lc) {
4047 #ifdef VIDEO_ENABLED
4048         VideoStream *vs = NULL;
4049         vs=get_active_video_stream(lc);
4050         /* If we have a video stream (either preview, either from call), we
4051                  have a source and it is using the static picture filter, then
4052                  force the filter to use that picture. */
4053         if (vs && vs->source) {
4054                 if (ms_filter_get_id(vs->source) == MS_STATIC_IMAGE_ID) {
4055
4056                         float fps;
4057
4058                         ms_filter_call_method(vs->source, MS_FILTER_GET_FPS,(void *)&fps);
4059                         return fps;
4060                 }
4061         }
4062 #else
4063         ms_warning("Video support not compiled.");
4064 #endif
4065         return 0;
4066 }
4067
4068 /**
4069  * Returns the native window handle of the video window, casted as an unsigned long.
4070  *
4071  * @ingroup media_parameters
4072 **/
4073 unsigned long linphone_core_get_native_video_window_id(const LinphoneCore *lc){
4074 #ifdef VIDEO_ENABLED
4075         LinphoneCall *call=linphone_core_get_current_call (lc);
4076         if (call && call->videostream)
4077                 return video_stream_get_native_window_id(call->videostream);
4078         if (lc->previewstream)
4079                 return video_stream_get_native_window_id(lc->previewstream);
4080 #endif
4081         return lc->video_window_id;
4082 }
4083
4084 /**@ingroup media_parameters
4085  * Set the native video window id where the video is to be displayed.
4086  * If not set the core will create its own window.
4087 **/
4088 void linphone_core_set_native_video_window_id(LinphoneCore *lc, unsigned long id){
4089 #ifdef VIDEO_ENABLED
4090         LinphoneCall *call=linphone_core_get_current_call(lc);
4091         lc->video_window_id=id;
4092         if (call!=NULL && call->videostream){
4093                 video_stream_set_native_window_id(call->videostream,id);
4094         }
4095 #endif
4096 }
4097
4098 /**
4099  * Returns the native window handle of the video preview window, casted as an unsigned long.
4100  *
4101  * @ingroup media_parameters
4102 **/
4103 unsigned long linphone_core_get_native_preview_window_id(const LinphoneCore *lc){
4104 #ifdef VIDEO_ENABLED
4105         LinphoneCall *call=linphone_core_get_current_call (lc);
4106         if (call && call->videostream)
4107                 return video_stream_get_native_preview_window_id(call->videostream);
4108         if (lc->previewstream)
4109                 return video_preview_get_native_window_id(lc->previewstream);
4110 #endif
4111         return lc->preview_window_id;
4112 }
4113
4114 /**
4115  * @ingroup media_parameters
4116  * Set the native window id where the preview video (local camera) is to be displayed.
4117  * This has to be used in conjonction with linphone_core_use_preview_window().
4118  * If not set the core will create its own window.
4119 **/
4120 void linphone_core_set_native_preview_window_id(LinphoneCore *lc, unsigned long id){
4121         lc->preview_window_id=id;
4122 #ifdef VIDEO_ENABLED
4123         LinphoneCall *call=linphone_core_get_current_call(lc);
4124         if (call!=NULL && call->videostream){
4125                 video_stream_set_native_preview_window_id(call->videostream,id);
4126         }else if (lc->previewstream){
4127                 video_preview_set_native_window_id(lc->previewstream,id);
4128         }
4129 #endif
4130 }
4131
4132 /**
4133  * Can be used to disable video showing to free XV port
4134 **/
4135 void linphone_core_show_video(LinphoneCore *lc, bool_t show){
4136 #ifdef VIDEO_ENABLED
4137         ms_error("linphone_core_show_video %d", show);
4138         LinphoneCall *call=linphone_core_get_current_call(lc);
4139         if (call!=NULL && call->videostream){
4140                 video_stream_show_video(call->videostream,show);
4141         }
4142 #endif
4143 }
4144
4145 /**
4146  * Tells the core to use a separate window for local camera preview video, instead of
4147  * inserting local view within the remote video window.
4148  *
4149 **/
4150 void linphone_core_use_preview_window(LinphoneCore *lc, bool_t yesno){
4151         lc->use_preview_window=yesno;
4152 }
4153 /**
4154  * @ingroup media_parameters
4155  *returns current device orientation
4156  */
4157 int linphone_core_get_device_rotation(LinphoneCore *lc ) {
4158         return lc->device_rotation;
4159 }
4160 /**
4161  * @ingroup media_parameters
4162  * Tells the core the device current orientation. This can be used by capture filters
4163  * on mobile devices to select between portrait/landscape mode and to produce properly
4164  * oriented images. The exact meaning of the value in rotation if left to each device
4165  * specific implementations.
4166  *@param lc  object.
4167  *@param rotation . IOS supported values are 0 for UIInterfaceOrientationPortrait and 270 for UIInterfaceOrientationLandscapeRight.
4168  *
4169 **/
4170 void linphone_core_set_device_rotation(LinphoneCore *lc, int rotation) {
4171 ms_message("%s : rotation=%d\n", __FUNCTION__, rotation);
4172         lc->device_rotation = rotation;
4173 #ifdef VIDEO_ENABLED
4174         LinphoneCall *call=linphone_core_get_current_call(lc);
4175         if (call!=NULL && call->videostream){
4176                 video_stream_set_device_rotation(call->videostream,rotation);
4177         }
4178 #endif
4179 }
4180
4181 static MSVideoSizeDef supported_resolutions[]={
4182 #ifdef ENABLE_HD
4183         {       {MS_VIDEO_SIZE_1080P_W,MS_VIDEO_SIZE_1080P_H}   ,       "1080p" },
4184         {       {MS_VIDEO_SIZE_720P_W,MS_VIDEO_SIZE_720P_H}     ,       "1080p" },
4185 #endif
4186         {       {MS_VIDEO_SIZE_SVGA_W,MS_VIDEO_SIZE_SVGA_H}     ,       "svga"  },
4187         {       {MS_VIDEO_SIZE_4CIF_W,MS_VIDEO_SIZE_4CIF_H}     ,       "4cif"  },
4188         {       {MS_VIDEO_SIZE_VGA_W,MS_VIDEO_SIZE_VGA_H}       ,       "vga"   },
4189         {       {MS_VIDEO_SIZE_IOS_MEDIUM_H,MS_VIDEO_SIZE_IOS_MEDIUM_W} ,       "ios-medium"    },
4190         {       {MS_VIDEO_SIZE_CIF_W,MS_VIDEO_SIZE_CIF_H}       ,       "cif"   },
4191         {       {MS_VIDEO_SIZE_QVGA_W,MS_VIDEO_SIZE_QVGA_H}     ,       "qvga"  },
4192         {       {MS_VIDEO_SIZE_QCIF_W,MS_VIDEO_SIZE_QCIF_H}     ,       "qcif"  },
4193         {       {0,0}                   ,       NULL    }
4194 };
4195
4196 /**
4197  * Returns the zero terminated table of supported video resolutions.
4198  *
4199  * @ingroup media_parameters
4200 **/
4201 const MSVideoSizeDef *linphone_core_get_supported_video_sizes(LinphoneCore *lc){
4202         return supported_resolutions;
4203 }
4204
4205 static MSVideoSize video_size_get_by_name(const char *name){
4206         MSVideoSizeDef *pdef=supported_resolutions;
4207         MSVideoSize null_vsize={0,0};
4208         for(;pdef->name!=NULL;pdef++){
4209                 if (strcasecmp(name,pdef->name)==0){
4210                         return pdef->vsize;
4211                 }
4212         }
4213         ms_warning("Video resolution %s is not supported in linphone.",name);
4214         return null_vsize;
4215 }
4216
4217 static const char *video_size_get_name(MSVideoSize vsize){
4218         MSVideoSizeDef *pdef=supported_resolutions;
4219         for(;pdef->name!=NULL;pdef++){
4220                 if (pdef->vsize.width==vsize.width && pdef->vsize.height==vsize.height){
4221                         return pdef->name;
4222                 }
4223         }
4224         return NULL;
4225 }
4226
4227 static bool_t video_size_supported(MSVideoSize vsize){
4228         if (video_size_get_name(vsize)) return TRUE;
4229         ms_warning("Video resolution %ix%i is not supported in linphone.",vsize.width,vsize.height);
4230         return FALSE;
4231 }
4232
4233 /**
4234  * Sets the preferred video size.
4235  *
4236  * @ingroup media_parameters
4237  * This applies only to the stream that is captured and sent to the remote party,
4238  * since we accept all standard video size on the receive path.
4239 **/
4240 void linphone_core_set_preferred_video_size(LinphoneCore *lc, MSVideoSize vsize){
4241         if (video_size_supported(vsize)){
4242                 MSVideoSize oldvsize=lc->video_conf.vsize;
4243                 lc->video_conf.vsize=vsize;
4244                 if (!ms_video_size_equal(oldvsize,vsize) && lc->previewstream!=NULL){
4245                         toggle_video_preview(lc,FALSE);
4246                         toggle_video_preview(lc,TRUE);
4247                 }
4248                 if ( linphone_core_ready(lc))
4249                         lp_config_set_string(lc->config,"video","size",video_size_get_name(vsize));
4250         }
4251 }
4252
4253 /**
4254  * Sets the preferred video size by its name.
4255  *
4256  * @ingroup media_parameters
4257  * This is identical to linphone_core_set_preferred_video_size() except
4258  * that it takes the name of the video resolution as input.
4259  * Video resolution names are: qcif, svga, cif, vga, 4cif, svga ...
4260 **/
4261 void linphone_core_set_preferred_video_size_by_name(LinphoneCore *lc, const char *name){
4262         MSVideoSize vsize=video_size_get_by_name(name);
4263         MSVideoSize default_vsize={MS_VIDEO_SIZE_CIF_W,MS_VIDEO_SIZE_CIF_H};
4264         if (vsize.width!=0)     linphone_core_set_preferred_video_size(lc,vsize);
4265         else linphone_core_set_preferred_video_size(lc,default_vsize);
4266 }
4267
4268 /**
4269  * Returns the current preferred video size for sending.
4270  *
4271  * @ingroup media_parameters
4272 **/
4273 MSVideoSize linphone_core_get_preferred_video_size(LinphoneCore *lc){
4274         return lc->video_conf.vsize;
4275 }
4276
4277 /**
4278  * Ask the core to stream audio from and to files, instead of using the soundcard.
4279 **/
4280 void linphone_core_use_files(LinphoneCore *lc, bool_t yesno){
4281         lc->use_files=yesno;
4282 }
4283
4284 /**
4285  * Sets a wav file to be played when putting somebody on hold,
4286  * or when files are used instead of soundcards (see linphone_core_use_files()).
4287  *
4288  * The file must be a 16 bit linear wav file.
4289 **/
4290 void linphone_core_set_play_file(LinphoneCore *lc, const char *file){
4291         LinphoneCall *call=linphone_core_get_current_call(lc);
4292         if (lc->play_file!=NULL){
4293                 ms_free(lc->play_file);
4294                 lc->play_file=NULL;
4295         }
4296         if (file!=NULL) {
4297                 lc->play_file=ms_strdup(file);
4298                 if (call && call->audiostream && call->audiostream->ticker)
4299                         audio_stream_play(call->audiostream,file);
4300         }
4301 }
4302
4303
4304 /**
4305  * Sets a wav file where incoming stream is to be recorded,
4306  * when files are used instead of soundcards (see linphone_core_use_files()).
4307  *
4308  * The file must be a 16 bit linear wav file.
4309 **/
4310 void linphone_core_set_record_file(LinphoneCore *lc, const char *file){
4311         LinphoneCall *call=linphone_core_get_current_call(lc);
4312         if (lc->rec_file!=NULL){
4313                 ms_free(lc->rec_file);
4314                 lc->rec_file=NULL;
4315         }
4316         if (file!=NULL) {
4317                 lc->rec_file=ms_strdup(file);
4318                 if (call && call->audiostream)
4319                         audio_stream_record(call->audiostream,file);
4320         }
4321 }
4322
4323
4324 static MSFilter *get_dtmf_gen(LinphoneCore *lc){
4325         LinphoneCall *call=linphone_core_get_current_call (lc);
4326         AudioStream *stream=NULL;
4327         if (call){
4328                 stream=call->audiostream;
4329         }else if (linphone_core_is_in_conference(lc)){
4330                 stream=lc->conf_ctx.local_participant;
4331         }
4332         if (stream){
4333                 return stream->dtmfgen;
4334         }
4335         if (lc->ringstream==NULL){
4336                 float amp=lp_config_get_float(lc->config,"sound","dtmf_player_amp",0.1);
4337                 MSSndCard *ringcard=lc->sound_conf.lsd_card ?lc->sound_conf.lsd_card : lc->sound_conf.ring_sndcard;
4338                 if (ringcard == NULL)
4339                         return NULL;
4340
4341                 lc->ringstream=ring_start(NULL,0,ringcard);
4342                 ms_filter_call_method(lc->ringstream->gendtmf,MS_DTMF_GEN_SET_DEFAULT_AMPLITUDE,&amp);
4343                 lc->dmfs_playing_start_time=time(NULL);
4344         }else{
4345                 if (lc->dmfs_playing_start_time!=0)
4346                         lc->dmfs_playing_start_time=time(NULL);
4347         }
4348         return lc->ringstream->gendtmf;
4349 }
4350
4351 /**
4352  * @ingroup media_parameters
4353  * Plays a dtmf sound to the local user.
4354  * @param lc #LinphoneCore
4355  * @param dtmf DTMF to play ['0'..'16'] | '#' | '#'
4356  * @param duration_ms duration in ms, -1 means play until next further call to #linphone_core_stop_dtmf()
4357 **/
4358 void linphone_core_play_dtmf(LinphoneCore *lc, char dtmf, int duration_ms){
4359         MSFilter *f=get_dtmf_gen(lc);
4360         if (f==NULL){
4361                 ms_error("No dtmf generator at this time !");
4362                 return;
4363         }
4364
4365         if (duration_ms>0)
4366                 ms_filter_call_method(f, MS_DTMF_GEN_PLAY, &dtmf);
4367         else ms_filter_call_method(f, MS_DTMF_GEN_START, &dtmf);
4368 }
4369
4370 /**
4371  * @ingroup media_parameters
4372  * Plays a repeated tone to the local user until next further call to #linphone_core_stop_dtmf()
4373  * @param lc #LinphoneCore
4374 **/
4375 void linphone_core_play_tone(LinphoneCore *lc){
4376         MSFilter *f=get_dtmf_gen(lc);
4377         MSDtmfGenCustomTone def;
4378         if (f==NULL){
4379                 ms_error("No dtmf generator at this time !");
4380                 return;
4381         }
4382         def.duration=300;
4383         def.frequency=500;
4384         def.amplitude=1;
4385         def.interval=2000;
4386         ms_filter_call_method(f, MS_DTMF_GEN_PLAY_CUSTOM,&def);
4387 }
4388
4389 /**
4390  * @ingroup media_parameters
4391  *
4392  * Stops playing a dtmf started by linphone_core_play_dtmf().
4393 **/
4394 void linphone_core_stop_dtmf(LinphoneCore *lc){
4395         MSFilter *f=get_dtmf_gen(lc);
4396         if (f!=NULL)
4397                 ms_filter_call_method_noarg (f, MS_DTMF_GEN_STOP);
4398 }
4399
4400
4401
4402 /**
4403  * Retrieves the user pointer that was given to linphone_core_new()
4404  *
4405  * @ingroup initializing
4406 **/
4407 void *linphone_core_get_user_data(LinphoneCore *lc){
4408         return lc->data;
4409 }
4410
4411 void linphone_core_set_user_data(LinphoneCore *lc, void *userdata){
4412         lc->data=userdata;
4413 }
4414
4415 int linphone_core_get_mtu(const LinphoneCore *lc){
4416         return lc->net_conf.mtu;
4417 }
4418
4419 void linphone_core_set_mtu(LinphoneCore *lc, int mtu){
4420         lc->net_conf.mtu=mtu;
4421         if (mtu>0){
4422                 if (mtu<500){
4423                         ms_error("MTU too small !");
4424                         mtu=500;
4425                 }
4426                 ms_set_mtu(mtu);
4427                 ms_message("MTU is supposed to be %i, rtp payload max size will be %i",mtu, ms_get_payload_max_size());
4428         }else ms_set_mtu(0);//use mediastreamer2 default value
4429 }
4430
4431 void linphone_core_set_waiting_callback(LinphoneCore *lc, LinphoneWaitingCallback cb, void *user_context){
4432         lc->wait_cb=cb;
4433         lc->wait_ctx=user_context;
4434 }
4435
4436 void linphone_core_start_waiting(LinphoneCore *lc, const char *purpose){
4437         if (lc->wait_cb){
4438                 lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingStart,purpose,0);
4439         }
4440 }
4441
4442 void linphone_core_update_progress(LinphoneCore *lc, const char *purpose, float progress){
4443         if (lc->wait_cb){
4444                 lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingProgress,purpose,progress);
4445         }else{
4446 #ifdef WIN32
4447                 Sleep(50000);
4448 #else
4449                 usleep(50000);
4450 #endif
4451         }
4452 }
4453
4454 void linphone_core_stop_waiting(LinphoneCore *lc){
4455         if (lc->wait_cb){
4456                 lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingFinished,NULL,0);
4457         }
4458 }
4459
4460 void linphone_core_set_rtp_transport_factories(LinphoneCore* lc, LinphoneRtpTransportFactories *factories){
4461         lc->rtptf=factories;
4462 }
4463
4464 /**
4465  * Retrieve RTP statistics regarding current call.
4466  * @param local RTP statistics computed locally.
4467  * @param remote RTP statistics computed by far end (obtained via RTCP feedback).
4468  *
4469  * @note Remote RTP statistics is not implemented yet.
4470  *
4471  * @returns 0 or -1 if no call is running.
4472 **/
4473
4474 int linphone_core_get_current_call_stats(LinphoneCore *lc, rtp_stats_t *local, rtp_stats_t *remote){
4475         LinphoneCall *call=linphone_core_get_current_call (lc);
4476         if (call!=NULL){
4477                 if (call->audiostream!=NULL){
4478                         memset(remote,0,sizeof(*remote));
4479                         audio_stream_get_local_rtp_stats (call->audiostream,local);
4480                         return 0;
4481                 }
4482         }
4483         return -1;
4484 }
4485
4486 void net_config_uninit(LinphoneCore *lc)
4487 {
4488         net_config_t *config=&lc->net_conf;
4489
4490         if (config->stun_server!=NULL){
4491                 ms_free(lc->net_conf.stun_server);
4492         }
4493         if (config->nat_address!=NULL){
4494                 lp_config_set_string(lc->config,"net","nat_address",config->nat_address);
4495                 ms_free(lc->net_conf.nat_address);
4496         }
4497         if (lc->net_conf.nat_address_ip !=NULL){
4498                 ms_free(lc->net_conf.nat_address_ip);
4499         }
4500         lp_config_set_int(lc->config,"net","mtu",config->mtu);
4501 }
4502
4503
4504 void sip_config_uninit(LinphoneCore *lc)
4505 {
4506         MSList *elem;
4507         int i;
4508         sip_config_t *config=&lc->sip_conf;
4509
4510         lp_config_set_int(lc->config,"sip","guess_hostname",config->guess_hostname);
4511         lp_config_set_string(lc->config,"sip","contact",config->contact);
4512         lp_config_set_int(lc->config,"sip","inc_timeout",config->inc_timeout);
4513         lp_config_set_int(lc->config,"sip","use_info",config->use_info);
4514         lp_config_set_int(lc->config,"sip","use_rfc2833",config->use_rfc2833);
4515         lp_config_set_int(lc->config,"sip","use_ipv6",config->ipv6_enabled);
4516         lp_config_set_int(lc->config,"sip","register_only_when_network_is_up",config->register_only_when_network_is_up);
4517
4518
4519
4520
4521         for(elem=config->proxies,i=0;elem!=NULL;elem=ms_list_next(elem),i++){
4522                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)(elem->data);
4523                 linphone_proxy_config_edit(cfg);        /* to unregister */
4524         }
4525
4526         for (i=0;i<20;i++){
4527                 sal_iterate(lc->sal);
4528 #ifndef WIN32
4529                 usleep(100000);
4530 #else
4531                 Sleep(100);
4532 #endif
4533         }
4534
4535         ms_list_for_each(config->proxies,(void (*)(void*)) linphone_proxy_config_destroy);
4536         ms_list_free(config->proxies);
4537         config->proxies=NULL;
4538
4539         linphone_proxy_config_write_to_config_file(lc->config,NULL,i);  /*mark the end */
4540
4541         ms_list_for_each(lc->auth_info,(void (*)(void*))linphone_auth_info_destroy);
4542         ms_list_free(lc->auth_info);
4543         lc->auth_info=NULL;
4544
4545         sal_uninit(lc->sal);
4546         lc->sal=NULL;
4547
4548         if (lc->sip_conf.guessed_contact)
4549                 ms_free(lc->sip_conf.guessed_contact);
4550         if (config->contact)
4551                 ms_free(config->contact);
4552
4553 }
4554
4555 void rtp_config_uninit(LinphoneCore *lc)
4556 {
4557         rtp_config_t *config=&lc->rtp_conf;
4558         lp_config_set_int(lc->config,"rtp","audio_rtp_port",config->audio_rtp_port);
4559         lp_config_set_int(lc->config,"rtp","video_rtp_port",config->video_rtp_port);
4560         lp_config_set_int(lc->config,"rtp","audio_jitt_comp",config->audio_jitt_comp);
4561         lp_config_set_int(lc->config,"rtp","video_jitt_comp",config->video_jitt_comp);
4562         lp_config_set_int(lc->config,"rtp","nortp_timeout",config->nortp_timeout);
4563         lp_config_set_int(lc->config,"rtp","audio_jitt_comp_enabled",config->audio_adaptive_jitt_comp_enabled);
4564         lp_config_set_int(lc->config,"rtp","video_jitt_comp_enabled",config->video_adaptive_jitt_comp_enabled);
4565 }
4566
4567 static void sound_config_uninit(LinphoneCore *lc)
4568 {
4569         sound_config_t *config=&lc->sound_conf;
4570         ms_free(config->cards);
4571
4572         lp_config_set_string(lc->config,"sound","remote_ring",config->remote_ring);
4573
4574         if (config->local_ring) ms_free(config->local_ring);
4575         if (config->remote_ring) ms_free(config->remote_ring);
4576         ms_snd_card_manager_destroy();
4577 }
4578
4579 static void video_config_uninit(LinphoneCore *lc)
4580 {
4581         lp_config_set_string(lc->config,"video","size",video_size_get_name(linphone_core_get_preferred_video_size(lc)));
4582         lp_config_set_int(lc->config,"video","display",lc->video_conf.display);
4583         lp_config_set_int(lc->config,"video","capture",lc->video_conf.capture);
4584         if (lc->video_conf.cams)
4585                 ms_free(lc->video_conf.cams);
4586 }
4587
4588 void _linphone_core_codec_config_write(LinphoneCore *lc){
4589         if (linphone_core_ready(lc)){
4590                 PayloadType *pt;
4591                 codecs_config_t *config=&lc->codecs_conf;
4592                 MSList *node;
4593                 char key[50];
4594                 int index;
4595                 index=0;
4596                 for(node=config->audio_codecs;node!=NULL;node=ms_list_next(node)){
4597                         pt=(PayloadType*)(node->data);
4598                         sprintf(key,"audio_codec_%i",index);
4599                         lp_config_set_string(lc->config,key,"mime",pt->mime_type);
4600                         lp_config_set_int(lc->config,key,"rate",pt->clock_rate);
4601                         lp_config_set_int(lc->config,key,"channels",pt->channels);
4602                         lp_config_set_int(lc->config,key,"enabled",linphone_core_payload_type_enabled(lc,pt));
4603                         index++;
4604                 }
4605                 sprintf(key,"audio_codec_%i",index);
4606                 lp_config_clean_section (lc->config,key);
4607
4608                 index=0;
4609                 for(node=config->video_codecs;node!=NULL;node=ms_list_next(node)){
4610                         pt=(PayloadType*)(node->data);
4611                         sprintf(key,"video_codec_%i",index);
4612                         lp_config_set_string(lc->config,key,"mime",pt->mime_type);
4613                         lp_config_set_int(lc->config,key,"rate",pt->clock_rate);
4614                         lp_config_set_int(lc->config,key,"enabled",linphone_core_payload_type_enabled(lc,pt));
4615                         lp_config_set_string(lc->config,key,"recv_fmtp",pt->recv_fmtp);
4616                         index++;
4617                 }
4618                 sprintf(key,"video_codec_%i",index);
4619                 lp_config_clean_section (lc->config,key);
4620         }
4621 }
4622
4623 static void codecs_config_uninit(LinphoneCore *lc)
4624 {
4625         _linphone_core_codec_config_write(lc);
4626         ms_list_free(lc->codecs_conf.audio_codecs);
4627         ms_list_free(lc->codecs_conf.video_codecs);
4628 }
4629
4630 void ui_config_uninit(LinphoneCore* lc)
4631 {
4632         if (lc->friends){
4633                 ms_list_for_each(lc->friends,(void (*)(void *))linphone_friend_destroy);
4634                 ms_list_free(lc->friends);
4635                 lc->friends=NULL;
4636         }
4637 }
4638
4639 /**
4640  * Returns the LpConfig object used to manage the storage (config) file.
4641  *
4642  * @ingroup misc
4643  * The application can use the LpConfig object to insert its own private
4644  * sections and pairs of key=value in the configuration file.
4645  *
4646 **/
4647 LpConfig *linphone_core_get_config(LinphoneCore *lc){
4648         return lc->config;
4649 }
4650
4651 static void linphone_core_uninit(LinphoneCore *lc)
4652 {
4653         linphone_core_free_hooks(lc);
4654         while(lc->calls)
4655         {
4656                 LinphoneCall *the_call = lc->calls->data;
4657                 linphone_core_terminate_call(lc,the_call);
4658                 linphone_core_iterate(lc);
4659 #ifdef WIN32
4660                 Sleep(50000);
4661 #else
4662                 usleep(50000);
4663 #endif
4664         }
4665         if (lc->friends)
4666                 ms_list_for_each(lc->friends,(void (*)(void *))linphone_friend_close_subscriptions);
4667         linphone_core_set_state(lc,LinphoneGlobalShutdown,"Shutting down");
4668 #ifdef VIDEO_ENABLED
4669         if (lc->previewstream!=NULL){
4670                 video_preview_stop(lc->previewstream);
4671                 lc->previewstream=NULL;
4672         }
4673 #endif
4674         ms_event_queue_destroy(lc->msevq);
4675         lc->msevq=NULL;
4676         /* save all config */
4677         net_config_uninit(lc);
4678         rtp_config_uninit(lc);
4679         if (lc->ringstream) ring_stop(lc->ringstream);
4680         sound_config_uninit(lc);
4681         video_config_uninit(lc);
4682         codecs_config_uninit(lc);
4683         ui_config_uninit(lc);
4684         sip_config_uninit(lc);
4685         if (lp_config_needs_commit(lc->config)) lp_config_sync(lc->config);
4686         lp_config_destroy(lc->config);
4687         lc->config = NULL; /* Mark the config as NULL to block further calls */
4688         sip_setup_unregister_all();
4689
4690         ms_list_for_each(lc->call_logs,(void (*)(void*))linphone_call_log_destroy);
4691         lc->call_logs=ms_list_free(lc->call_logs);
4692
4693         linphone_core_free_payload_types(lc);
4694         ortp_exit();
4695         linphone_core_set_state(lc,LinphoneGlobalOff,"Off");
4696 #ifdef TUNNEL_ENABLED
4697         if (lc->tunnel) linphone_tunnel_destroy(lc->tunnel);
4698 #endif
4699 }
4700
4701 static void set_network_reachable(LinphoneCore* lc,bool_t isReachable, time_t curtime){
4702         ms_message("Network state is now [%s]",isReachable?"UP":"DOWN");
4703         // second get the list of available proxies
4704         const MSList *elem=linphone_core_get_proxy_config_list(lc);
4705         for(;elem!=NULL;elem=elem->next){
4706                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
4707                 if (linphone_proxy_config_register_enabled(cfg) ) {
4708                         if (!isReachable) {
4709                                 linphone_proxy_config_set_state(cfg, LinphoneRegistrationNone,"Registration impossible (network down)");
4710                         }else{
4711                                 cfg->commit=TRUE;
4712                         }
4713                 }
4714         }
4715         lc->netup_time=curtime;
4716         lc->network_reachable=isReachable;
4717         if(!isReachable) {
4718                 sal_reset_transports(lc->sal);
4719         }
4720 }
4721
4722 void linphone_core_refresh_registers(LinphoneCore* lc) {
4723         const MSList *elem;
4724         if (!lc->network_reachable) {
4725                 ms_warning("Refresh register operation not available (network unreachable)");
4726                 return;
4727         }
4728         elem=linphone_core_get_proxy_config_list(lc);
4729         for(;elem!=NULL;elem=elem->next){
4730                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
4731                 if (linphone_proxy_config_register_enabled(cfg) && linphone_proxy_config_get_expires(cfg)>0) {
4732                         linphone_proxy_config_refresh_register(cfg);
4733                 }
4734         }
4735 }
4736
4737 void __linphone_core_invalidate_registers(LinphoneCore* lc){
4738         const MSList *elem=linphone_core_get_proxy_config_list(lc);
4739         for(;elem!=NULL;elem=elem->next){
4740                 LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
4741                 if (linphone_proxy_config_register_enabled(cfg)) {
4742                         linphone_proxy_config_edit(cfg);
4743                         linphone_proxy_config_done(cfg);
4744                 }
4745         }
4746 }
4747
4748 void linphone_core_set_network_reachable(LinphoneCore* lc,bool_t isReachable) {
4749         //first disable automatic mode
4750         if (lc->auto_net_state_mon) {
4751                 ms_message("Disabling automatic network state monitoring");
4752                 lc->auto_net_state_mon=FALSE;
4753         }
4754         set_network_reachable(lc,isReachable, ms_time(NULL));
4755 }
4756
4757 bool_t linphone_core_is_network_reachable(LinphoneCore* lc) {
4758         return lc->network_reachable;
4759 }
4760 ortp_socket_t linphone_core_get_sip_socket(LinphoneCore *lc){
4761         return sal_get_socket(lc->sal);
4762 }
4763 /**
4764  * Destroys a LinphoneCore
4765  *
4766  * @ingroup initializing
4767 **/
4768 void linphone_core_destroy(LinphoneCore *lc){
4769         linphone_core_uninit(lc);
4770         ms_free(lc);
4771 }
4772 /**
4773  * Get the number of Call
4774  *
4775  * @ingroup call_control
4776 **/
4777 int linphone_core_get_calls_nb(const LinphoneCore *lc){
4778         return  ms_list_size(lc->calls);;
4779 }
4780
4781 /**
4782  * Check if we do not have exceed the number of simultaneous call
4783  *
4784  * @ingroup call_control
4785 **/
4786 bool_t linphone_core_can_we_add_call(LinphoneCore *lc)
4787 {
4788         if(linphone_core_get_calls_nb(lc) < lc->max_calls)
4789                 return TRUE;
4790         ms_message("Maximum amount of simultaneous calls reached !");
4791         return FALSE;
4792 }
4793
4794
4795 int linphone_core_add_call( LinphoneCore *lc, LinphoneCall *call)
4796 {
4797         if(linphone_core_can_we_add_call(lc))
4798         {
4799                 lc->calls = ms_list_append(lc->calls,call);
4800                 return 0;
4801         }
4802         return -1;
4803 }
4804
4805 int linphone_core_del_call( LinphoneCore *lc, LinphoneCall *call)
4806 {
4807         MSList *it;
4808         MSList *the_calls = lc->calls;
4809
4810         it=ms_list_find(the_calls,call);
4811         if (it)
4812         {
4813                 the_calls = ms_list_remove_link(the_calls,it);
4814         }
4815         else
4816         {
4817                 ms_warning("could not find the call into the list\n");
4818                 return -1;
4819         }
4820         lc->calls = the_calls;
4821         return 0;
4822 }
4823
4824 /**
4825  * Specifiies a ring back tone to be played to far end during incoming calls.
4826 **/
4827 void linphone_core_set_remote_ringback_tone(LinphoneCore *lc, const char *file){
4828         if (lc->sound_conf.ringback_tone){
4829                 ms_free(lc->sound_conf.ringback_tone);
4830                 lc->sound_conf.ringback_tone=NULL;
4831         }
4832         if (file)
4833                 lc->sound_conf.ringback_tone=ms_strdup(file);
4834 }
4835
4836 /**
4837  * Returns the ring back tone played to far end during incoming calls.
4838 **/
4839 const char *linphone_core_get_remote_ringback_tone(const LinphoneCore *lc){
4840         return lc->sound_conf.ringback_tone;
4841 }
4842
4843 static PayloadType* find_payload_type_from_list(const char* type, int rate, int channels, const MSList* from) {
4844         const MSList *elem;
4845         for(elem=from;elem!=NULL;elem=elem->next){
4846                 PayloadType *pt=(PayloadType*)elem->data;
4847                 if ((strcasecmp((char*)type, payload_type_get_mime(pt)) == 0)
4848                         && (rate == LINPHONE_FIND_PAYLOAD_IGNORE_RATE || rate==pt->clock_rate)
4849                         && (channels == LINPHONE_FIND_PAYLOAD_IGNORE_CHANNELS || channels==pt->channels)) {
4850                         return pt;
4851                 }
4852         }
4853         return NULL;
4854 }
4855
4856
4857 PayloadType* linphone_core_find_payload_type(LinphoneCore* lc, const char* type, int rate, int channels) {
4858         PayloadType* result = find_payload_type_from_list(type, rate, channels, linphone_core_get_audio_codecs(lc));
4859         if (result)  {
4860                 return result;
4861         } else {
4862                 result = find_payload_type_from_list(type, rate, 0, linphone_core_get_video_codecs(lc));
4863                 if (result) {
4864                         return result;
4865                 }
4866         }
4867         /*not found*/
4868         return NULL;
4869 }
4870
4871 const char *linphone_global_state_to_string(LinphoneGlobalState gs){
4872         switch(gs){
4873                 case LinphoneGlobalOff:
4874                         return "LinphoneGlobalOff";
4875                 break;
4876                 case LinphoneGlobalOn:
4877                         return "LinphoneGlobalOn";
4878                 break;
4879                 case LinphoneGlobalStartup:
4880                         return "LinphoneGlobalStartup";
4881                 break;
4882                 case LinphoneGlobalShutdown:
4883                         return "LinphoneGlobalShutdown";
4884                 break;
4885         }
4886         return NULL;
4887 }
4888
4889 LinphoneGlobalState linphone_core_get_global_state(const LinphoneCore *lc){
4890         return lc->state;
4891 }
4892
4893 LinphoneCallParams *linphone_core_create_default_call_parameters(LinphoneCore *lc){
4894         LinphoneCallParams *p=ms_new0(LinphoneCallParams,1);
4895         linphone_core_init_default_params(lc, p);
4896         return p;
4897 }
4898
4899 const char *linphone_reason_to_string(LinphoneReason err){
4900         switch(err){
4901                 case LinphoneReasonNone:
4902                         return "No error";
4903                 case LinphoneReasonNoResponse:
4904                         return "No response";
4905                 case LinphoneReasonBadCredentials:
4906                         return "Bad credentials";
4907                 case LinphoneReasonDeclined:
4908                         return "Call declined";
4909                 case LinphoneReasonNotFound:
4910                         return "User not found";
4911                 case LinphoneReasonNotAnswered:
4912                         return "Not answered";
4913         }
4914         return "unknown error";
4915 }
4916
4917 const char *linphone_error_to_string(LinphoneReason err){
4918         return linphone_reason_to_string(err);
4919 }
4920 /**
4921  * Enables signaling keep alive
4922  */
4923 void linphone_core_enable_keep_alive(LinphoneCore* lc,bool_t enable) {
4924         if (enable > 0) {
4925                 sal_set_keepalive_period(lc->sal,lc->sip_conf.keepalive_period);
4926         } else {
4927                 sal_set_keepalive_period(lc->sal,0);
4928         }
4929 }
4930 /**
4931  * Is signaling keep alive enabled
4932  */
4933 bool_t linphone_core_keep_alive_enabled(LinphoneCore* lc) {
4934         return sal_get_keepalive_period(lc->sal) > 0;
4935 }
4936
4937 void linphone_core_start_dtmf_stream(LinphoneCore* lc) {
4938         get_dtmf_gen(lc); /*make sure ring stream is started*/
4939         lc->ringstream_autorelease=FALSE; /*disable autorelease mode*/
4940 }
4941
4942 void linphone_core_stop_dtmf_stream(LinphoneCore* lc) {
4943         if (lc->ringstream && lc->dmfs_playing_start_time!=0) {
4944                 ring_stop(lc->ringstream);
4945                 lc->ringstream=NULL;
4946         }
4947 }
4948
4949 int linphone_core_get_max_calls(LinphoneCore *lc) {
4950         return lc->max_calls;
4951 }
4952 void linphone_core_set_max_calls(LinphoneCore *lc, int max) {
4953         lc->max_calls=max;
4954 }
4955
4956 typedef struct Hook{
4957         LinphoneCoreIterateHook fun;
4958         void *data;
4959 }Hook;
4960
4961 static Hook *hook_new(LinphoneCoreIterateHook hook, void *hook_data){
4962         Hook *h=ms_new(Hook,1);
4963         h->fun=hook;
4964         h->data=hook_data;
4965         return h;
4966 }
4967
4968 static void hook_invoke(Hook *h){
4969         h->fun(h->data);
4970 }
4971
4972 void linphone_core_add_iterate_hook(LinphoneCore *lc, LinphoneCoreIterateHook hook, void *hook_data){
4973         lc->hooks=ms_list_append(lc->hooks,hook_new(hook,hook_data));
4974 }
4975
4976 static void linphone_core_run_hooks(LinphoneCore *lc){
4977         ms_list_for_each(lc->hooks,(void (*)(void*))hook_invoke);
4978 }
4979
4980 static void linphone_core_free_hooks(LinphoneCore *lc){
4981         ms_list_for_each(lc->hooks,(void (*)(void*))ms_free);
4982         ms_list_free(lc->hooks);
4983         lc->hooks=NULL;
4984 }
4985
4986 void linphone_core_remove_iterate_hook(LinphoneCore *lc, LinphoneCoreIterateHook hook, void *hook_data){
4987         MSList *elem;
4988         for(elem=lc->hooks;elem!=NULL;elem=elem->next){
4989                 Hook *h=(Hook*)elem->data;
4990                 if (h->fun==hook && h->data==hook_data){
4991                         ms_list_remove_link(lc->hooks,elem);
4992                         ms_free(h);
4993                         return;
4994                 }
4995         }
4996         ms_error("linphone_core_remove_iterate_hook(): No such hook found.");
4997 }
4998
4999 void linphone_core_set_zrtp_secrets_file(LinphoneCore *lc, const char* file){
5000         if (lc->zrtp_secrets_cache != NULL) {
5001                 ms_free(lc->zrtp_secrets_cache);
5002         }
5003         lc->zrtp_secrets_cache=file ? ms_strdup(file) : NULL;
5004 }
5005
5006 const LinphoneCall* linphone_core_find_call_from_uri(LinphoneCore *lc, const char *uri) {
5007         if (uri == NULL) return NULL;
5008         MSList *calls=lc->calls;
5009         while(calls) {
5010                 const LinphoneCall *c=(LinphoneCall*)calls->data;
5011                 calls=calls->next;
5012                 const LinphoneAddress *address = linphone_call_get_remote_address(c);
5013                 char *current_uri=linphone_address_as_string_uri_only(address);
5014                 if (strcmp(uri,current_uri)==0) {
5015                         ms_free(current_uri);
5016                         return c;
5017                 } else {
5018                         ms_free(current_uri);
5019                 }
5020         }
5021         return NULL;
5022 }
5023
5024
5025 /**
5026  * Check if a call will need the sound resources.
5027  *
5028  * @ingroup call_control
5029  * @param lc The LinphoneCore
5030 **/
5031 bool_t linphone_core_sound_resources_locked(LinphoneCore *lc){
5032         MSList *calls=lc->calls;
5033         while(calls) {
5034                 LinphoneCall *c=(LinphoneCall*)calls->data;
5035                 calls=calls->next;
5036                 switch (c->state) {
5037                         case LinphoneCallOutgoingInit:
5038                         case LinphoneCallOutgoingProgress:
5039                         case LinphoneCallOutgoingRinging:
5040                         case LinphoneCallOutgoingEarlyMedia:
5041                         case LinphoneCallConnected:
5042                         case LinphoneCallRefered:
5043                         case LinphoneCallIncomingEarlyMedia:
5044                         case LinphoneCallUpdated:
5045                                 return TRUE;
5046                         default:
5047                                 break;
5048                 }
5049         }
5050         return FALSE;
5051 }
5052
5053 void linphone_core_set_srtp_enabled(LinphoneCore *lc, bool_t enabled) {
5054         lp_config_set_int(lc->config,"sip","srtp",(int)enabled);
5055 }
5056
5057 /**
5058  * Returns whether a media encryption scheme is supported by the LinphoneCore engine
5059 **/
5060 bool_t linphone_core_media_encryption_supported(const LinphoneCore *lc, LinphoneMediaEncryption menc){
5061         switch(menc){
5062                 case LinphoneMediaEncryptionSRTP:
5063                         return ortp_srtp_supported();
5064                 case LinphoneMediaEncryptionZRTP:
5065                         return ortp_zrtp_available();
5066                 case LinphoneMediaEncryptionNone:
5067                         return TRUE;
5068         }
5069         return FALSE;
5070 }
5071
5072 int linphone_core_set_media_encryption(LinphoneCore *lc, enum LinphoneMediaEncryption menc) {
5073         const char *type="none";
5074         int ret=0;
5075         if (menc == LinphoneMediaEncryptionSRTP){
5076                 if (!ortp_srtp_supported()){
5077                         ms_warning("SRTP not supported by library.");
5078                         type="none";
5079                         ret=-1;
5080                 }else type="srtp";
5081         }else if (menc == LinphoneMediaEncryptionZRTP){
5082                 if (!ortp_zrtp_available()){
5083                         ms_warning("ZRTP not supported by library.");
5084                         type="none";
5085                         ret=-1;
5086                 }else type="zrtp";
5087         }
5088         lp_config_set_string(lc->config,"sip","media_encryption",type);
5089         return ret;
5090 }
5091
5092 LinphoneMediaEncryption linphone_core_get_media_encryption(LinphoneCore *lc) {
5093         const char* menc = lp_config_get_string(lc->config, "sip", "media_encryption", NULL);
5094
5095         if (menc == NULL)
5096                 return LinphoneMediaEncryptionNone;
5097         else if (strcmp(menc, "srtp")==0)
5098                 return LinphoneMediaEncryptionSRTP;
5099         else if (strcmp(menc, "zrtp")==0)
5100                 return LinphoneMediaEncryptionZRTP;
5101         else
5102                 return LinphoneMediaEncryptionNone;
5103 }
5104
5105 bool_t linphone_core_is_media_encryption_mandatory(LinphoneCore *lc) {
5106         return (bool_t)lp_config_get_int(lc->config, "sip", "media_encryption_mandatory", 0);
5107 }
5108
5109 void linphone_core_set_media_encryption_mandatory(LinphoneCore *lc, bool_t m) {
5110         lp_config_set_int(lc->config, "sip", "media_encryption_mandatory", (int)m);
5111 }
5112
5113 void linphone_core_init_default_params(LinphoneCore*lc, LinphoneCallParams *params) {
5114         params->has_video=linphone_core_video_enabled(lc) && lc->video_policy.automatically_initiate;
5115         params->media_encryption=linphone_core_get_media_encryption(lc);
5116         params->in_conference=FALSE;
5117 }
5118
5119 void linphone_call_zoom_video(LinphoneCall* call, float zoom_factor, float* cx, float* cy) {
5120         VideoStream* vstream = call->videostream;
5121         if (vstream) {
5122                 float zoom[3];
5123
5124                 if (zoom_factor < 1)
5125                         zoom_factor = 1;
5126                 float halfsize = 0.5 * 1.0 / zoom_factor;
5127
5128                 if ((*cx - halfsize) < 0)
5129                         *cx = 0 + halfsize;
5130                 if ((*cx + halfsize) > 1)
5131                         *cx = 1 - halfsize;
5132                 if ((*cy - halfsize) < 0)
5133                         *cy = 0 + halfsize;
5134                 if ((*cy + halfsize) > 1)
5135                         *cy = 1 - halfsize;
5136
5137                 zoom[0] = zoom_factor;
5138                 zoom[1] = *cx;
5139                 zoom[2] = *cy;
5140                 ms_filter_call_method(vstream->output, MS_VIDEO_DISPLAY_ZOOM, &zoom);
5141         }else ms_warning("Could not apply zoom: video output wasn't activated.");
5142 }
5143
5144 void linphone_core_set_device_identifier(LinphoneCore *lc,const char* device_id) {
5145         if (lc->device_id) ms_free(lc->device_id);
5146         lc->device_id=ms_strdup(device_id);
5147 }
5148 const char*  linphone_core_get_device_identifier(const LinphoneCore *lc) {
5149         return lc->device_id;
5150 }
5151
5152 /**
5153  * Set the DSCP field for SIP signaling channel.
5154  *
5155  * @ingroup network_parameters
5156  * * The DSCP defines the quality of service in IP packets.
5157  *
5158 **/
5159 void linphone_core_set_sip_dscp(LinphoneCore *lc, int dscp){
5160         sal_set_dscp(lc->sal,dscp);
5161         if (linphone_core_ready(lc))
5162                 lp_config_set_int_hex(lc->config,"sip","dscp",dscp);
5163 }
5164
5165 /**
5166  * Get the DSCP field for SIP signaling channel.
5167  *
5168  * @ingroup network_parameters
5169  * * The DSCP defines the quality of service in IP packets.
5170  *
5171 **/
5172 int linphone_core_get_sip_dscp(const LinphoneCore *lc){
5173         return lp_config_get_int(lc->config,"sip","dscp",0x1a);
5174 }
5175
5176 /**
5177  * Set the DSCP field for outgoing audio streams.
5178  *
5179  * @ingroup network_parameters
5180  * The DSCP defines the quality of service in IP packets.
5181  *
5182 **/
5183 void linphone_core_set_audio_dscp(LinphoneCore *lc, int dscp){
5184         if (linphone_core_ready(lc))
5185                 lp_config_set_int_hex(lc->config,"rtp","audio_dscp",dscp);
5186 }
5187
5188 /**
5189  * Get the DSCP field for outgoing audio streams.
5190  *
5191  * @ingroup network_parameters
5192  * The DSCP defines the quality of service in IP packets.
5193  *
5194 **/
5195 int linphone_core_get_audio_dscp(const LinphoneCore *lc){
5196         return lp_config_get_int(lc->config,"rtp","audio_dscp",0x2e);
5197 }
5198
5199 /**
5200  * Set the DSCP field for outgoing video streams.
5201  *
5202  * @ingroup network_parameters
5203  * The DSCP defines the quality of service in IP packets.
5204  *
5205 **/
5206 void linphone_core_set_video_dscp(LinphoneCore *lc, int dscp){
5207         if (linphone_core_ready(lc))
5208                 lp_config_set_int_hex(lc->config,"rtp","video_dscp",dscp);
5209
5210 }
5211
5212 /**
5213  * Get the DSCP field for outgoing video streams.
5214  *
5215  * @ingroup network_parameters
5216  * The DSCP defines the quality of service in IP packets.
5217  *
5218 **/
5219 int linphone_core_get_video_dscp(const LinphoneCore *lc){
5220         return lp_config_get_int(lc->config,"rtp","video_dscp",0x2e);
5221 }