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