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