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