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