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