source: mediastreamer2/linphone/coreapi/linphonecore.c @ 795:653a07331dfa

/*
linphone
Copyright (C) 2000  Simon MORLAT (simon.morlat@linphone.org)

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#include "linphonecore.h"
#include "sipsetup.h"
#include "lpconfig.h"
#include "private.h"
#include "mediastreamer2/mediastream.h"
#include "mediastreamer2/msvolume.h"
#include "mediastreamer2/msequalizer.h"
#include <eXosip2/eXosip.h>
#include "sdphandler.h"

#include <ortp/telephonyevents.h>
#include "exevents.h"


#ifdef INET6  
#ifndef WIN32
#include <netdb.h>  
#endif
#endif

/*#define UNSTANDART_GSM_11K 1*/

static const char *liblinphone_version=LIBLINPHONE_VERSION;

#include "enum.h"

void linphone_core_get_local_ip(LinphoneCore *lc, const char *dest, char *result);
static void apply_nat_settings(LinphoneCore *lc);
static void toggle_video_preview(LinphoneCore *lc, bool_t val);

/* relative path where is stored local ring*/
#define LOCAL_RING "rings/oldphone.wav"
/* same for remote ring (ringback)*/
#define REMOTE_RING "ringback.wav" 


sdp_handler_t linphone_sdphandler={
        linphone_accept_audio_offer,   /*from remote sdp */
        linphone_accept_video_offer,   /*from remote sdp */
        linphone_set_audio_offer,       /*to local sdp */
        linphone_set_video_offer,       /*to local sdp */
        linphone_read_audio_answer,     /*from incoming answer  */
        linphone_read_video_answer      /*from incoming answer  */
};

void lc_callback_obj_init(LCCallbackObj *obj,LinphoneCoreCbFunc func,void* ud)
{
  obj->_func=func;
  obj->_user_data=ud;
}

int lc_callback_obj_invoke(LCCallbackObj *obj, LinphoneCore *lc){
        if (obj->_func!=NULL) obj->_func(lc,obj->_user_data);
        return 0;
}

static void  linphone_call_init_common(LinphoneCall *call, LinphoneAddress *from, LinphoneAddress *to){
        call->state=LCStateInit;
        call->start_time=time(NULL);
        call->media_start_time=0;
        call->log=linphone_call_log_new(call, from, to);
        linphone_core_notify_all_friends(call->core,LINPHONE_STATUS_ONTHEPHONE);
        if (linphone_core_get_firewall_policy(call->core)==LINPHONE_POLICY_USE_STUN) 
                linphone_core_run_stun_tests(call->core,call);
        call->profile=rtp_profile_new("Call RTP profile");
}

void linphone_call_init_media_params(LinphoneCall *call){
        memset(&call->audio_params,0,sizeof(call->audio_params));
        memset(&call->video_params,0,sizeof(call->video_params));
}

static void discover_mtu(LinphoneCore *lc, const char *remote){
        int mtu;
        if (lc->net_conf.mtu==0 ){
                /*attempt to discover mtu*/
                mtu=ms_discover_mtu(remote);
                if (mtu>0){
                        ms_set_mtu(mtu);
                        ms_message("Discovered mtu is %i, RTP payload max size is %i",
                                mtu, ms_get_payload_max_size());
                }
        }
}

LinphoneCall * linphone_call_new_outgoing(struct _LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to)
{
        LinphoneCall *call=ms_new0(LinphoneCall,1);
        call->dir=LinphoneCallOutgoing;
        call->cid=-1;
        call->did=-1;
        call->tid=-1;
        call->core=lc;
        linphone_core_get_local_ip(lc,linphone_address_get_domain(to),call->localip);
        linphone_call_init_common(call,from,to);
        call->sdpctx=sdp_handler_create_context(&linphone_sdphandler,
                call->audio_params.natd_port>0 ? call->audio_params.natd_addr : call->localip,
                linphone_address_get_username (from),NULL);
        sdp_context_set_user_pointer(call->sdpctx,(void*)call);
        discover_mtu(lc,linphone_address_get_domain (to));
        return call;
}


LinphoneCall * linphone_call_new_incoming(LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to, eXosip_event_t *ev){
        LinphoneCall *call=ms_new0(LinphoneCall,1);
        LinphoneAddress *me=linphone_core_get_primary_contact_parsed(lc);
        osip_header_t *h=NULL;

        call->dir=LinphoneCallIncoming;
        call->cid=ev->cid;
        call->did=ev->did;
        call->tid=ev->tid;
        call->core=lc;
        
        linphone_address_clean(from);
        
        linphone_core_get_local_ip(lc,linphone_address_get_domain(from),call->localip);
        linphone_call_init_common(call, from, to);
        call->sdpctx=sdp_handler_create_context(&linphone_sdphandler,
                call->audio_params.natd_port>0 ? call->audio_params.natd_addr : call->localip,
                linphone_address_get_username (me),NULL);
        sdp_context_set_user_pointer(call->sdpctx,(void*)call);
        discover_mtu(lc,linphone_address_get_domain(from));
        linphone_address_destroy(me);
        osip_message_header_get_byname(ev->request,"Session-expires",0,&h);
        if (h) call->supports_session_timers=TRUE;
        return call;
}

void linphone_call_destroy(LinphoneCall *obj)
{
        linphone_core_notify_all_friends(obj->core,obj->core->prev_mode);
        linphone_call_log_completed(obj->log,obj);
        linphone_core_update_allocated_audio_bandwidth(obj->core);
        if (obj->profile!=NULL) rtp_profile_destroy(obj->profile);
        if (obj->sdpctx!=NULL) sdp_context_free(obj->sdpctx);
        ms_free(obj);
}

/*prevent a gcc bug with %c*/
static size_t my_strftime(char *s, size_t max, const char  *fmt,  const struct tm *tm){
        return strftime(s, max, fmt, tm);
}

static void set_call_log_date(LinphoneCallLog *cl, const struct tm *loctime){
        my_strftime(cl->start_date,sizeof(cl->start_date),"%c",loctime);
}

LinphoneCallLog * linphone_call_log_new(LinphoneCall *call, LinphoneAddress *from, LinphoneAddress *to){
        LinphoneCallLog *cl=ms_new0(LinphoneCallLog,1);
        struct tm loctime;
        cl->dir=call->dir;
#ifdef WIN32
        loctime=*localtime(&call->start_time);
#else
        localtime_r(&call->start_time,&loctime);
#endif
        set_call_log_date(cl,&loctime);
        cl->from=from;
        cl->to=to;
        return cl;
}

static void call_logs_write_to_config_file(LinphoneCore *lc){
        MSList *elem;
        char logsection[32];
        int i;
        char *tmp;
        LpConfig *cfg=lc->config;

        if (!lc->ready) return;
        
        for(i=0,elem=lc->call_logs;elem!=NULL;elem=elem->next,++i){
                LinphoneCallLog *cl=(LinphoneCallLog*)elem->data;
                snprintf(logsection,sizeof(logsection),"call_log_%i",i);
                lp_config_set_int(cfg,logsection,"dir",cl->dir);
                lp_config_set_int(cfg,logsection,"status",cl->status);
                tmp=linphone_address_as_string(cl->from);
                lp_config_set_string(cfg,logsection,"from",tmp);
                ms_free(tmp);
                tmp=linphone_address_as_string(cl->to);
                lp_config_set_string(cfg,logsection,"to",tmp);
                ms_free(tmp);
                lp_config_set_string(cfg,logsection,"start_date",cl->start_date);
                lp_config_set_int(cfg,logsection,"duration",cl->duration);
                if (cl->refkey) lp_config_set_string(cfg,logsection,"refkey",cl->refkey);
        }
        for(;i<lc->max_call_logs;++i){
                snprintf(logsection,sizeof(logsection),"call_log_%i",i);
                lp_config_clean_section(cfg,logsection);
        }
}

static void call_logs_read_from_config_file(LinphoneCore *lc){
        char logsection[32];
        int i;
        const char *tmp;
        LpConfig *cfg=lc->config;
        for(i=0;;++i){
                snprintf(logsection,sizeof(logsection),"call_log_%i",i);
                if (lp_config_has_section(cfg,logsection)){
                        LinphoneCallLog *cl=ms_new0(LinphoneCallLog,1);
                        cl->dir=lp_config_get_int(cfg,logsection,"dir",0);
                        cl->status=lp_config_get_int(cfg,logsection,"status",0);
                        tmp=lp_config_get_string(cfg,logsection,"from",NULL);
                        if (tmp) cl->from=linphone_address_new(tmp);
                        tmp=lp_config_get_string(cfg,logsection,"to",NULL);
                        if (tmp) cl->to=linphone_address_new(tmp);
                        tmp=lp_config_get_string(cfg,logsection,"start_date",NULL);
                        if (tmp) strncpy(cl->start_date,tmp,sizeof(cl->start_date));
                        cl->duration=lp_config_get_int(cfg,logsection,"duration",0);
                        tmp=lp_config_get_string(cfg,logsection,"refkey",NULL);
                        if (tmp) cl->refkey=ms_strdup(tmp);
                        lc->call_logs=ms_list_append(lc->call_logs,cl);
                }else break;    
        }
}


void linphone_call_log_completed(LinphoneCallLog *calllog, LinphoneCall *call){
        LinphoneCore *lc=call->core;
        
        calllog->duration=time(NULL)-call->start_time;
        switch(call->state){
                case LCStateInit:
                        calllog->status=LinphoneCallAborted;
                        break;
                case LCStateRinging:
                        if (calllog->dir==LinphoneCallIncoming){
                                char *info;
                                calllog->status=LinphoneCallMissed;
                                lc->missed_calls++;
                                info=ortp_strdup_printf(ngettext("You have missed %i call.",
                            "You have missed %i calls.", lc->missed_calls),
                        lc->missed_calls);
                                lc->vtable.display_status(lc,info);
                                ms_free(info);
                        }
                        else calllog->status=LinphoneCallAborted;
                        break;
                case LCStateAVRunning:
                        calllog->status=LinphoneCallSuccess;
                        break;
        }
        lc->call_logs=ms_list_append(lc->call_logs,(void *)calllog);
        if (ms_list_size(lc->call_logs)>lc->max_call_logs){
                MSList *elem;
                elem=lc->call_logs;
                linphone_call_log_destroy((LinphoneCallLog*)elem->data);
                lc->call_logs=ms_list_remove_link(lc->call_logs,elem);
        }
        if (lc->vtable.call_log_updated!=NULL){
                lc->vtable.call_log_updated(lc,calllog);
        }
        call_logs_write_to_config_file(lc);
}

char * linphone_call_log_to_str(LinphoneCallLog *cl){
        char *status;
        char *tmp;
        char *from=linphone_address_as_string (cl->from);
        char *to=linphone_address_as_string (cl->to);
        switch(cl->status){
                case LinphoneCallAborted:
                        status=_("aborted");
                        break;
                case LinphoneCallSuccess:
                        status=_("completed");
                        break;
                case LinphoneCallMissed:
                        status=_("missed");
                        break;
                default:
                        status="unknown";
        }
        tmp=ortp_strdup_printf(_("%s at %s\nFrom: %s\nTo: %s\nStatus: %s\nDuration: %i mn %i sec\n"),
                        (cl->dir==LinphoneCallIncoming) ? _("Incoming call") : _("Outgoing call"),
                        cl->start_date,
                        from,
                        to,
                        status,
                        cl->duration/60,
                        cl->duration%60);
        ms_free(from);
        ms_free(to);
        return tmp;
}

void linphone_call_log_set_user_pointer(LinphoneCallLog *cl, void *up){
        cl->user_pointer=up;
}

void *linphone_call_log_get_user_pointer(const LinphoneCallLog *cl){
        return cl->user_pointer;
}

/**
 * Associate a persistent reference key to the call log.
 *
 * The reference key can be for example an id to an external database.
 * It is stored in the config file, thus can survive to process exits/restarts.
 *
**/
void linphone_call_log_set_ref_key(LinphoneCallLog *cl, const char *refkey){
        if (cl->refkey!=NULL){
                ms_free(cl->refkey);
                cl->refkey=NULL;
        }
        if (refkey) cl->refkey=ms_strdup(refkey);
        call_logs_write_to_config_file(cl->lc);
}

/**
 * Get the persistent reference key associated to the call log.
 *
 * The reference key can be for example an id to an external database.
 * It is stored in the config file, thus can survive to process exits/restarts.
 *
**/
const char *linphone_call_log_get_ref_key(const LinphoneCallLog *cl){
        return cl->refkey;
}

void linphone_call_log_destroy(LinphoneCallLog *cl){
        if (cl->from!=NULL) linphone_address_destroy(cl->from);
        if (cl->to!=NULL) linphone_address_destroy(cl->to);
        if (cl->refkey!=NULL) ms_free(cl->refkey);
        ms_free(cl);
}

int linphone_core_get_current_call_duration(const LinphoneCore *lc){
        LinphoneCall *call=lc->call;
        if (call==NULL) return 0;
        if (call->media_start_time==0) return 0;
        return time(NULL)-call->media_start_time;
}

const LinphoneAddress *linphone_core_get_remote_uri(LinphoneCore *lc){
        LinphoneCall *call=lc->call;
        if (call==NULL) return 0;
        return call->dir==LinphoneCallIncoming ? call->log->from : call->log->to;
}

void _osip_trace_func(char *fi, int li, osip_trace_level_t level, char *chfr, va_list ap){
        int ortp_level=ORTP_DEBUG;
        switch(level){
                case OSIP_INFO1:
                case OSIP_INFO2:
                case OSIP_INFO3:
                case OSIP_INFO4:
                        ortp_level=ORTP_MESSAGE;
                        break;
                case OSIP_WARNING:
                        ortp_level=ORTP_WARNING;
                        break;
                case OSIP_ERROR:
                case OSIP_BUG:
                        ortp_level=ORTP_ERROR;
                        break;
                case OSIP_FATAL:
                        ortp_level=ORTP_FATAL;
                        break;
                case END_TRACE_LEVEL:
                        break;  
        }
        if (ortp_log_level_enabled(level)){
                int len=strlen(chfr);
                char *chfrdup=ortp_strdup(chfr);
                /*need to remove endline*/
                if (len>1){
                        if (chfrdup[len-1]=='\n')
                                chfrdup[len-1]='\0';
                        if (chfrdup[len-2]=='\r')
                                chfrdup[len-2]='\0';
                }
                ortp_logv(ortp_level,chfrdup,ap);
                ortp_free(chfrdup);
        }
}

/**
 * Enable logs in supplied FILE*.
 *
 * @ingroup misc
 *
 * @param file a C FILE* where to fprintf logs. If null stdout is used.
 * 
**/
void linphone_core_enable_logs(FILE *file){
        if (file==NULL) file=stdout;
        ortp_set_log_file(file);
        ortp_set_log_level_mask(ORTP_MESSAGE|ORTP_WARNING|ORTP_ERROR|ORTP_FATAL);
        osip_trace_initialize_func (OSIP_INFO4,&_osip_trace_func);
}

/**
 * Enable logs through the user's supplied log callback.
 *
 * @ingroup misc
 *
 * @param logfunc The address of a OrtpLogFunc callback whose protoype is
 *                typedef void (*OrtpLogFunc)(OrtpLogLevel lev, const char *fmt, va_list args);
 * 
**/
void linphone_core_enable_logs_with_cb(OrtpLogFunc logfunc){
        ortp_set_log_level_mask(ORTP_MESSAGE|ORTP_WARNING|ORTP_ERROR|ORTP_FATAL);
        osip_trace_initialize_func (OSIP_INFO4,&_osip_trace_func);
        ortp_set_log_handler(logfunc);
}

/**
 * Entirely disable logging.
 *
 * @ingroup misc
**/
void linphone_core_disable_logs(){
        int tl;
        for (tl=0;tl<=OSIP_INFO4;tl++) osip_trace_disable_level(tl);
        ortp_set_log_level_mask(ORTP_ERROR|ORTP_FATAL);
}


static void
net_config_read (LinphoneCore *lc)
{
        int tmp;
        const char *tmpstr;
        LpConfig *config=lc->config;

        tmp=lp_config_get_int(config,"net","download_bw",0);
        linphone_core_set_download_bandwidth(lc,tmp);
        tmp=lp_config_get_int(config,"net","upload_bw",0);
        linphone_core_set_upload_bandwidth(lc,tmp);
        linphone_core_set_stun_server(lc,lp_config_get_string(config,"net","stun_server",NULL));
        tmpstr=lp_config_get_string(lc->config,"net","nat_address",NULL);
        if (tmpstr!=NULL && (strlen(tmpstr)<1)) tmpstr=NULL;
        linphone_core_set_nat_address(lc,tmpstr);
        tmp=lp_config_get_int(lc->config,"net","firewall_policy",0);
        linphone_core_set_firewall_policy(lc,tmp);
        tmp=lp_config_get_int(lc->config,"net","nat_sdp_only",0);
        lc->net_conf.nat_sdp_only=tmp;
        tmp=lp_config_get_int(lc->config,"net","mtu",0);
        linphone_core_set_mtu(lc,tmp);
}

static void build_sound_devices_table(LinphoneCore *lc){
        const char **devices;
        const char **old;
        int ndev;
        int i;
        const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
        ndev=ms_list_size(elem);
        devices=ms_malloc((ndev+1)*sizeof(const char *));
        for (i=0;elem!=NULL;elem=elem->next,i++){
                devices[i]=ms_snd_card_get_string_id((MSSndCard *)elem->data);
        }
        devices[ndev]=NULL;
        old=lc->sound_conf.cards;
        lc->sound_conf.cards=devices;
        if (old!=NULL) ms_free(old);
}

static void sound_config_read(LinphoneCore *lc)
{
        /*int tmp;*/
        const char *tmpbuf;
        const char *devid;
#ifdef __linux
        /*alsadev let the user use custom alsa device within linphone*/
        devid=lp_config_get_string(lc->config,"sound","alsadev",NULL);
        if (devid){
                MSSndCard *card=ms_alsa_card_new_custom(devid,devid);
                ms_snd_card_manager_add_card(ms_snd_card_manager_get(),card);
        }
#endif
        /* retrieve all sound devices */
        build_sound_devices_table(lc);

        devid=lp_config_get_string(lc->config,"sound","playback_dev_id",NULL);
        linphone_core_set_playback_device(lc,devid);
        
        devid=lp_config_get_string(lc->config,"sound","ringer_dev_id",NULL);
        linphone_core_set_ringer_device(lc,devid);
        
        devid=lp_config_get_string(lc->config,"sound","capture_dev_id",NULL);
        linphone_core_set_capture_device(lc,devid);
        
/*
        tmp=lp_config_get_int(lc->config,"sound","play_lev",80);
        linphone_core_set_play_level(lc,tmp);
        tmp=lp_config_get_int(lc->config,"sound","ring_lev",80);
        linphone_core_set_ring_level(lc,tmp);
        tmp=lp_config_get_int(lc->config,"sound","rec_lev",80);
        linphone_core_set_rec_level(lc,tmp);
        tmpbuf=lp_config_get_string(lc->config,"sound","source","m");
        linphone_core_set_sound_source(lc,tmpbuf[0]);
*/
        
        tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
        tmpbuf=lp_config_get_string(lc->config,"sound","local_ring",tmpbuf);
        if (access(tmpbuf,F_OK)==-1) {
                tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
        }
        if (strstr(tmpbuf,".wav")==NULL){
                /* it currently uses old sound files, so replace them */
                tmpbuf=PACKAGE_SOUND_DIR "/" LOCAL_RING;
        }
        
        linphone_core_set_ring(lc,tmpbuf);
        
        tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
        tmpbuf=lp_config_get_string(lc->config,"sound","remote_ring",tmpbuf);
        if (access(tmpbuf,F_OK)==-1){
                tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
        }
        if (strstr(tmpbuf,".wav")==NULL){
                /* it currently uses old sound files, so replace them */
                tmpbuf=PACKAGE_SOUND_DIR "/" REMOTE_RING;
        }
        linphone_core_set_ringback(lc,tmpbuf);
        check_sound_device(lc);
        lc->sound_conf.latency=0;

        linphone_core_enable_echo_cancellation(lc,
            lp_config_get_int(lc->config,"sound","echocancelation",0) |
            lp_config_get_int(lc->config,"sound","echocancellation",0)
                );

        linphone_core_enable_echo_limiter(lc,
                lp_config_get_int(lc->config,"sound","echolimiter",0));
        linphone_core_enable_agc(lc,
                lp_config_get_int(lc->config,"sound","agc",0));
}

static void sip_config_read(LinphoneCore *lc)
{
        char *contact;
        const char *tmpstr;
        int port;
        int i,tmp;
        int ipv6;
        port=lp_config_get_int(lc->config,"sip","use_info",0);
        linphone_core_set_use_info_for_dtmf(lc,port);

        port=lp_config_get_int(lc->config,"sip","use_rfc2833",0);
        linphone_core_set_use_rfc2833_for_dtmf(lc,port);

        ipv6=lp_config_get_int(lc->config,"sip","use_ipv6",-1);
        if (ipv6==-1){
                ipv6=0;
                if (host_has_ipv6_network()){
                        lc->vtable.display_message(lc,_("Your machine appears to be connected to an IPv6 network. By default linphone always uses IPv4. Please update your configuration if you want to use IPv6"));
                }
        }
        linphone_core_enable_ipv6(lc,ipv6);
        port=lp_config_get_int(lc->config,"sip","sip_port",5060);
        linphone_core_set_sip_port(lc,port);
        
        tmpstr=lp_config_get_string(lc->config,"sip","contact",NULL);
        if (tmpstr==NULL || linphone_core_set_primary_contact(lc,tmpstr)==-1) {
                char *hostname=getenv("HOST");
                char *username=getenv("USER");
                if (hostname==NULL) hostname=getenv("HOSTNAME");
                if (hostname==NULL)
                        hostname="unknown-host";
                if (username==NULL){
                        username="toto";
                }
                contact=ortp_strdup_printf("sip:%s@%s",username,hostname);
                linphone_core_set_primary_contact(lc,contact);
                ms_free(contact);
        }

        tmp=lp_config_get_int(lc->config,"sip","guess_hostname",1);
        linphone_core_set_guess_hostname(lc,tmp);
        
        
        tmp=lp_config_get_int(lc->config,"sip","inc_timeout",15);
        linphone_core_set_inc_timeout(lc,tmp);

        /* get proxies config */
        for(i=0;; i++){
                LinphoneProxyConfig *cfg=linphone_proxy_config_new_from_config_file(lc->config,i);
                if (cfg!=NULL){
                        linphone_core_add_proxy_config(lc,cfg);
                }else{
                        break;
                }
        }
        /* get the default proxy */
        tmp=lp_config_get_int(lc->config,"sip","default_proxy",-1);
        linphone_core_set_default_proxy_index(lc,tmp);
        
        /* read authentication information */
        for(i=0;; i++){
                LinphoneAuthInfo *ai=linphone_auth_info_new_from_config_file(lc->config,i);
                if (ai!=NULL){
                        linphone_core_add_auth_info(lc,ai);
                }else{
                        break;
                }
        }
        /*for test*/
        lc->sip_conf.sdp_200_ack=lp_config_get_int(lc->config,"sip","sdp_200_ack",0);
        lc->sip_conf.only_one_codec=lp_config_get_int(lc->config,"sip","only_one_codec",0);
        lc->sip_conf.register_only_when_network_is_up=
                lp_config_get_int(lc->config,"sip","register_only_when_network_is_up",0);
}

static void rtp_config_read(LinphoneCore *lc)
{
        int port;
        int jitt_comp;
        int nortp_timeout;
        port=lp_config_get_int(lc->config,"rtp","audio_rtp_port",7078);
        linphone_core_set_audio_port(lc,port);
        
        port=lp_config_get_int(lc->config,"rtp","video_rtp_port",9078);
        if (port==0) port=9078;
        linphone_core_set_video_port(lc,port);
        
        jitt_comp=lp_config_get_int(lc->config,"rtp","audio_jitt_comp",60);
        linphone_core_set_audio_jittcomp(lc,jitt_comp);         
        jitt_comp=lp_config_get_int(lc->config,"rtp","video_jitt_comp",60);
        nortp_timeout=lp_config_get_int(lc->config,"rtp","nortp_timeout",30);
        linphone_core_set_nortp_timeout(lc,nortp_timeout);      
}


static PayloadType * get_codec(LpConfig *config, char* type,int index){
        char codeckey[50];
        const char *mime,*fmtp;
        int rate,enabled;
        PayloadType *pt;
        
        snprintf(codeckey,50,"%s_%i",type,index);
        mime=lp_config_get_string(config,codeckey,"mime",NULL);
        if (mime==NULL || strlen(mime)==0 ) return NULL;
        
        pt=payload_type_new();
        pt->mime_type=ms_strdup(mime);
        
        rate=lp_config_get_int(config,codeckey,"rate",8000);
        pt->clock_rate=rate;
        fmtp=lp_config_get_string(config,codeckey,"recv_fmtp",NULL);
        if (fmtp) pt->recv_fmtp=ms_strdup(fmtp);
        enabled=lp_config_get_int(config,codeckey,"enabled",1);
        if (enabled ) pt->flags|=PAYLOAD_TYPE_ENABLED;
        //ms_message("Found codec %s/%i",pt->mime_type,pt->clock_rate);
        return pt;
}

static void codecs_config_read(LinphoneCore *lc)
{
        int i;
        PayloadType *pt;
        MSList *audio_codecs=NULL;
        MSList *video_codecs=NULL;
        for (i=0;;i++){
                pt=get_codec(lc->config,"audio_codec",i);
                if (pt==NULL) break;
                audio_codecs=ms_list_append(audio_codecs,(void *)pt);
        }
        for (i=0;;i++){
                pt=get_codec(lc->config,"video_codec",i);
                if (pt==NULL) break;
                video_codecs=ms_list_append(video_codecs,(void *)pt);
        }
        linphone_core_set_audio_codecs(lc,audio_codecs);
        linphone_core_set_video_codecs(lc,video_codecs);
        linphone_core_setup_local_rtp_profile(lc);
}

static void video_config_read(LinphoneCore *lc)
{
        int capture, display;
        int enabled;
        const char *str;
        int ndev;
        const char **devices;
        const MSList *elem;
        int i;

        /* retrieve all video devices */
        elem=ms_web_cam_manager_get_list(ms_web_cam_manager_get());
        ndev=ms_list_size(elem);
        devices=ms_malloc((ndev+1)*sizeof(const char *));
        for (i=0;elem!=NULL;elem=elem->next,i++){
                devices[i]=ms_web_cam_get_string_id((MSWebCam *)elem->data);
        }
        devices[ndev]=NULL;
        lc->video_conf.cams=devices;

        str=lp_config_get_string(lc->config,"video","device",NULL);
        if (str && str[0]==0) str=NULL;
        linphone_core_set_video_device(lc,str);
        
        linphone_core_set_preferred_video_size_by_name(lc,
                lp_config_get_string(lc->config,"video","size","cif"));

        enabled=lp_config_get_int(lc->config,"video","enabled",1);
        capture=lp_config_get_int(lc->config,"video","capture",enabled);
        display=lp_config_get_int(lc->config,"video","display",enabled);
#ifdef VIDEO_ENABLED
        linphone_core_enable_video(lc,capture,display);
        linphone_core_enable_self_view(lc,TRUE);
#endif
}

static void ui_config_read(LinphoneCore *lc)
{
        LinphoneFriend *lf;
        int i;
        for (i=0;(lf=linphone_friend_new_from_config_file(lc,i))!=NULL;i++){
                linphone_core_add_friend(lc,lf);
        }
        call_logs_read_from_config_file(lc);
}

/*
static void autoreplier_config_init(LinphoneCore *lc)
{
        autoreplier_config_t *config=&lc->autoreplier_conf;
        config->enabled=lp_config_get_int(lc->config,"autoreplier","enabled",0);
        config->after_seconds=lp_config_get_int(lc->config,"autoreplier","after_seconds",6);
        config->max_users=lp_config_get_int(lc->config,"autoreplier","max_users",1);
        config->max_rec_time=lp_config_get_int(lc->config,"autoreplier","max_rec_time",60);
        config->max_rec_msg=lp_config_get_int(lc->config,"autoreplier","max_rec_msg",10);
        config->message=lp_config_get_string(lc->config,"autoreplier","message",NULL);
}
*/

/**
 * Sets maximum available download bandwidth
 *
 * @ingroup media_parameters
 *
 * This is IP bandwidth, in kbit/s.
 * This information is used signaled to other parties during
 * calls (within SDP messages) so that the remote end can have
 * sufficient knowledge to properly configure its audio & video
 * codec output bitrate to not overflow available bandwidth.
 *
 * @param lc the LinphoneCore object
 * @param bw the bandwidth in kbits/s, 0 for infinite
 */
void linphone_core_set_download_bandwidth(LinphoneCore *lc, int bw){
        lc->net_conf.download_bw=bw;
        if (bw==0){ /*infinite*/
                lc->dw_audio_bw=-1;
                lc->dw_video_bw=-1;
        }else {
                lc->dw_audio_bw=MIN(lc->audio_bw,bw);
                lc->dw_video_bw=MAX(bw-lc->dw_audio_bw-10,0);/*-10: security margin*/
        }
}

/**
 * Sets maximum available upload bandwidth
 *
 * @ingroup media_parameters
 *
 * This is IP bandwidth, in kbit/s.
 * This information is used by liblinphone together with remote
 * side available bandwidth signaled in SDP messages to properly
 * configure audio & video codec's output bitrate.
 *
 * @param lc the LinphoneCore object
 * @param bw the bandwidth in kbits/s, 0 for infinite
 */
void linphone_core_set_upload_bandwidth(LinphoneCore *lc, int bw){
        lc->net_conf.upload_bw=bw;
        if (bw==0){ /*infinite*/
                lc->up_audio_bw=-1;
                lc->up_video_bw=-1;
        }else{
                lc->up_audio_bw=MIN(lc->audio_bw,bw);
                lc->up_video_bw=MAX(bw-lc->up_audio_bw-10,0);/*-10: security margin*/
        }
}

/**
 * Retrieve the maximum available download bandwidth.
 *
 * @ingroup media_parameters
 *
 * This value was set by linphone_core_set_download_bandwidth().
 *
**/
int linphone_core_get_download_bandwidth(const LinphoneCore *lc){
        return lc->net_conf.download_bw;
}

/**
 * Retrieve the maximum available upload bandwidth.
 *
 * @ingroup media_parameters
 *
 * This value was set by linphone_core_set_upload_bandwidth().
 *
**/
int linphone_core_get_upload_bandwidth(const LinphoneCore *lc){
        return lc->net_conf.upload_bw;
}

/**
 * Returns liblinphone's version as a string.
 *
 * @ingroup misc
 *
**/
const char * linphone_core_get_version(void){
        return liblinphone_version;
}


static MSList *linphone_payload_types=NULL;

static void linphone_core_assign_payload_type(PayloadType *const_pt, int number, const char *recv_fmtp){
        PayloadType *pt;
        pt=payload_type_clone(const_pt);
        if (recv_fmtp!=NULL) payload_type_set_recv_fmtp(pt,recv_fmtp);
        rtp_profile_set_payload(&av_profile,number,pt);
        linphone_payload_types=ms_list_append(linphone_payload_types,pt);
}

static void linphone_core_free_payload_types(void){
        ms_list_for_each(linphone_payload_types,(void (*)(void*))payload_type_destroy);
        ms_list_free(linphone_payload_types);
        linphone_payload_types=NULL;
}

static void linphone_core_init (LinphoneCore * lc, const LinphoneCoreVTable *vtable, const char *config_path, 
    const char *factory_config_path, void * userdata)
{
        memset (lc, 0, sizeof (LinphoneCore));
        lc->data=userdata;

        memcpy(&lc->vtable,vtable,sizeof(LinphoneCoreVTable));

        gstate_initialize(lc);
        gstate_new_state(lc, GSTATE_POWER_STARTUP, NULL);
        
        ortp_init();
        linphone_core_assign_payload_type(&payload_type_lpc1015,115,NULL);
        linphone_core_assign_payload_type(&payload_type_speex_nb,110,"vbr=on");
        linphone_core_assign_payload_type(&payload_type_speex_wb,111,"vbr=on");
        linphone_core_assign_payload_type(&payload_type_speex_uwb,112,"vbr=on");
        linphone_core_assign_payload_type(&payload_type_telephone_event,101,NULL);
        linphone_core_assign_payload_type(&payload_type_ilbc,113,NULL);

#ifdef ENABLE_NONSTANDARD_GSM
        {
                PayloadType *pt;
                pt=payload_type_clone(&payload_type_gsm);
                pt->clock_rate=11025;
                rtp_profile_set_payload(&av_profile,114,pt);
                linphone_payload_types=ms_list_append(linphone_payload_types,pt);
                pt=payload_type_clone(&payload_type_gsm);
                pt->clock_rate=22050;
                rtp_profile_set_payload(&av_profile,115,pt);
                linphone_payload_types=ms_list_append(linphone_payload_types,pt);
        }
#endif

#ifdef VIDEO_ENABLED
        linphone_core_assign_payload_type(&payload_type_h263,34,NULL);
        linphone_core_assign_payload_type(&payload_type_theora,97,NULL);
        linphone_core_assign_payload_type(&payload_type_h263_1998,98,"CIF=1;QCIF=1");
        linphone_core_assign_payload_type(&payload_type_mp4v,99,"profile-level-id=3");
        linphone_core_assign_payload_type(&payload_type_x_snow,100,NULL);
        linphone_core_assign_payload_type(&payload_type_h264,102,NULL);
        linphone_core_assign_payload_type(&payload_type_h264,103,"packetization-mode=1");
#endif

        ms_init();
        
        lc->config=lp_config_new(config_path);
        if (factory_config_path)
                lp_config_read_file(lc->config,factory_config_path);
  
#ifdef VINCENT_MAURY_RSVP
        /* default qos parameters : rsvp on, rpc off */
        lc->rsvp_enable = 1;
        lc->rpc_enable = 0;
#endif
        sip_setup_register_all();
        sound_config_read(lc);
        net_config_read(lc);
        rtp_config_read(lc);
        codecs_config_read(lc);
        sip_config_read(lc); /* this will start eXosip*/
        video_config_read(lc);
        //autoreplier_config_init(&lc->autoreplier_conf);
        lc->prev_mode=LINPHONE_STATUS_ONLINE;
        lc->presence_mode=LINPHONE_STATUS_ONLINE;
        lc->max_call_logs=15;
        ui_config_read(lc);
        ms_mutex_init(&lc->lock,NULL);
        lc->vtable.display_status(lc,_("Ready"));
        gstate_new_state(lc, GSTATE_POWER_ON, NULL);
        lc->ready=TRUE;
}

/**
 * Instanciates a LinphoneCore object.
 * @ingroup initializing
 * 
 * The LinphoneCore object is the primary handle for doing all phone actions.
 * It should be unique within your application.
 * @param vtable a LinphoneCoreVTable structure holding your application callbacks
 * @param config_path a path to a config file. If it does not exists it will be created.
 *        The config file is used to store all user settings, call logs, friends, proxies...
 * @param factory_config_path a path to a read-only config file that can be used to 
 *        to store hard-coded preference such as proxy settings or internal preferences.
 *        The settings in this factory file always override the one in the normal config file.
 *        It is OPTIONAL, use NULL if unneeded.
 * @param userdata an opaque user pointer that can be retrieved at any time (for example in
 *        callbacks) using linphone_core_get_user_data().
 * 
**/
LinphoneCore *linphone_core_new(const LinphoneCoreVTable *vtable,
                                                const char *config_path, const char *factory_config_path, void * userdata)
{
        LinphoneCore *core=ms_new(LinphoneCore,1);
        linphone_core_init(core,vtable,config_path, factory_config_path, userdata);
        return core;
}

/**
 * Returns the list of available audio codecs.
 *
 * This list is unmodifiable. The ->data field of the MSList points a PayloadType
 * structure holding the codec information.
 * It is possible to make copy of the list with ms_list_copy() in order to modify it
 * (such as the order of codecs).
**/
const MSList *linphone_core_get_audio_codecs(const LinphoneCore *lc)
{
        return lc->codecs_conf.audio_codecs;
}

/**
 * Returns the list of available video codecs.
 *
 * This list is unmodifiable. The ->data field of the MSList points a PayloadType
 * structure holding the codec information.
 * It is possible to make copy of the list with ms_list_copy() in order to modify it
 * (such as the order of codecs).
**/
const MSList *linphone_core_get_video_codecs(const LinphoneCore *lc)
{
        return lc->codecs_conf.video_codecs;
}

int linphone_core_set_primary_contact(LinphoneCore *lc, const char *contact)
{
        osip_from_t *ctt=NULL;
        osip_from_init(&ctt);
        if (osip_from_parse(ctt,contact)!=0){
                ms_error("Bad contact url: %s",contact);
                osip_from_free(ctt);
                return -1;
        }
        if (lc->sip_conf.contact!=NULL) ms_free(lc->sip_conf.contact);
        lc->sip_conf.contact=ms_strdup(contact);
        if (lc->sip_conf.guessed_contact!=NULL){
                ms_free(lc->sip_conf.guessed_contact);
                lc->sip_conf.guessed_contact=NULL;
        }
        osip_from_free(ctt);
        return 0;
}


/*result must be an array of chars at least LINPHONE_IPADDR_SIZE */
void linphone_core_get_local_ip(LinphoneCore *lc, const char *dest, char *result){
        if (lc->apply_nat_settings){
                apply_nat_settings(lc);
                lc->apply_nat_settings=FALSE;
        }
        if (linphone_core_get_firewall_policy(lc)==LINPHONE_POLICY_USE_NAT_ADDRESS){
                strncpy(result,linphone_core_get_nat_address(lc),LINPHONE_IPADDR_SIZE);
                return;
        }
        if (dest==NULL) dest="87.98.157.38"; /*a public IP address*/
        if (linphone_core_get_local_ip_for(dest,result)==0)
                return;
        /*else fallback to exosip routine that will attempt to find the most realistic interface */
        if (eXosip_guess_localip(lc->sip_conf.ipv6_enabled ? AF_INET6 : AF_INET,result,LINPHONE_IPADDR_SIZE)<0){
                /*default to something */
                strncpy(result,lc->sip_conf.ipv6_enabled ? "::1" : "127.0.0.1",LINPHONE_IPADDR_SIZE);
                ms_error("Could not find default routable ip address !"); 
        }
}

const char *linphone_core_get_primary_contact(LinphoneCore *lc)
{
        char *identity;
        char tmp[LINPHONE_IPADDR_SIZE];
        if (lc->sip_conf.guess_hostname){
                if (lc->sip_conf.guessed_contact==NULL || lc->sip_conf.loopback_only){
                        char *guessed=NULL;
                        osip_from_t *url;
                        if (lc->sip_conf.guessed_contact!=NULL){
                                ms_free(lc->sip_conf.guessed_contact);
                                lc->sip_conf.guessed_contact=NULL;
                        }
                        
                        osip_from_init(&url);
                        if (osip_from_parse(url,lc->sip_conf.contact)==0){
                                
                        }else ms_error("Could not parse identity contact !");
                        linphone_core_get_local_ip(lc, NULL, tmp);
                        if (strcmp(tmp,"127.0.0.1")==0 || strcmp(tmp,"::1")==0 ){
                                ms_warning("Local loopback network only !");
                                lc->sip_conf.loopback_only=TRUE;
                        }else lc->sip_conf.loopback_only=FALSE;
                        osip_free(url->url->host);
                        url->url->host=osip_strdup(tmp);
                        if (url->url->port!=NULL){
                                osip_free(url->url->port);
                                url->url->port=NULL;
                        }
                        if (lc->sip_conf.sip_port!=5060){
                                url->url->port=ortp_strdup_printf("%i",lc->sip_conf.sip_port);
                        }
                        osip_from_to_str(url,&guessed);
                        lc->sip_conf.guessed_contact=guessed;
                        
                        osip_from_free(url);
                        
                }
                identity=lc->sip_conf.guessed_contact;
        }else{
                identity=lc->sip_conf.contact;
        }
        return identity;
}

void linphone_core_set_guess_hostname(LinphoneCore *lc, bool_t val){
        lc->sip_conf.guess_hostname=val;
}
        
bool_t linphone_core_get_guess_hostname(LinphoneCore *lc){
        return lc->sip_conf.guess_hostname;
}

LinphoneAddress *linphone_core_get_primary_contact_parsed(LinphoneCore *lc){
        return linphone_address_new(linphone_core_get_primary_contact(lc));
}

int linphone_core_set_audio_codecs(LinphoneCore *lc, MSList *codecs)
{
        if (lc->codecs_conf.audio_codecs!=NULL) ms_list_free(lc->codecs_conf.audio_codecs);
        lc->codecs_conf.audio_codecs=codecs;
        return 0;
}

int linphone_core_set_video_codecs(LinphoneCore *lc, MSList *codecs)
{
        if (lc->codecs_conf.video_codecs!=NULL) ms_list_free(lc->codecs_conf.video_codecs);
        lc->codecs_conf.video_codecs=codecs;
        return 0;
}

const MSList * linphone_core_get_friend_list(const LinphoneCore *lc)
{
        return lc->friends;
}

int linphone_core_get_audio_jittcomp(LinphoneCore *lc)
{
        return lc->rtp_conf.audio_jitt_comp;
}

int linphone_core_get_audio_port(const LinphoneCore *lc)
{
        return lc->rtp_conf.audio_rtp_port;
}

int linphone_core_get_video_port(const LinphoneCore *lc){
        return lc->rtp_conf.video_rtp_port;
}

int linphone_core_get_nortp_timeout(const LinphoneCore *lc){
        return lc->rtp_conf.nortp_timeout;
}

void linphone_core_set_audio_jittcomp(LinphoneCore *lc, int value)
{
        lc->rtp_conf.audio_jitt_comp=value;
}

void linphone_core_set_audio_port(LinphoneCore *lc, int port)
{
        lc->rtp_conf.audio_rtp_port=port;
}

void linphone_core_set_video_port(LinphoneCore *lc, int port){
        lc->rtp_conf.video_rtp_port=port;
}

void linphone_core_set_nortp_timeout(LinphoneCore *lc, int nortp_timeout){
        lc->rtp_conf.nortp_timeout=nortp_timeout;
}

bool_t linphone_core_get_use_info_for_dtmf(LinphoneCore *lc)
{
        return lc->sip_conf.use_info;
}

void linphone_core_set_use_info_for_dtmf(LinphoneCore *lc,bool_t use_info)
{
        lc->sip_conf.use_info=use_info;
}

bool_t linphone_core_get_use_rfc2833_for_dtmf(LinphoneCore *lc)
{
        return lc->sip_conf.use_rfc2833;
}

void linphone_core_set_use_rfc2833_for_dtmf(LinphoneCore *lc,bool_t use_rfc2833)
{
        lc->sip_conf.use_rfc2833=use_rfc2833;
}

int linphone_core_get_sip_port(LinphoneCore *lc)
{
        return lc->sip_conf.sip_port;
}

static bool_t exosip_running=FALSE;
static char _ua_name[64]="Linphone";
static char _ua_version[64]=LINPHONE_VERSION;

static void apply_user_agent(void){
        char ua_string[256];
        snprintf(ua_string,sizeof(ua_string),"%s/%s (eXosip2/%s)",_ua_name,_ua_version,
#ifdef HAVE_EXOSIP_GET_VERSION
                 eXosip_get_version()
#else
                 "unknown"
#endif
        );
        eXosip_set_user_agent(ua_string);
}

void linphone_core_set_user_agent(const char *name, const char *ver){
        strncpy(_ua_name,name,sizeof(_ua_name)-1);
        strncpy(_ua_version,ver,sizeof(_ua_version));
}

void linphone_core_set_sip_port(LinphoneCore *lc,int port)
{
        const char *anyaddr;
        int err=0;
        if (port==lc->sip_conf.sip_port) return;
        lc->sip_conf.sip_port=port;
        if (exosip_running) eXosip_quit();
        eXosip_init();
        err=0;
        eXosip_set_option(13,&err); /*13=EXOSIP_OPT_SRV_WITH_NAPTR, as it is an enum value, we can't use it unless we are sure of the
                                        version of eXosip, which is not the case*/
        eXosip_enable_ipv6(lc->sip_conf.ipv6_enabled);
        if (lc->sip_conf.ipv6_enabled)
                anyaddr="::0";
        else
                anyaddr="0.0.0.0";
        err=eXosip_listen_addr (IPPROTO_UDP, anyaddr, port,
                lc->sip_conf.ipv6_enabled ?  PF_INET6 : PF_INET, 0);
        if (err<0){
                char *msg=ortp_strdup_printf("UDP port %i seems already in use ! Cannot initialize.",port);
                ms_warning(msg);
                lc->vtable.display_warning(lc,msg);
                ms_free(msg);
                return;
        }
#ifdef VINCENT_MAURY_RSVP
        /* tell exosip the qos settings according to default linphone parameters */
        eXosip_set_rsvp_mode (lc->rsvp_enable);
        eXosip_set_rpc_mode (lc->rpc_enable);
#endif
        apply_user_agent();
        exosip_running=TRUE;
}

bool_t linphone_core_ipv6_enabled(LinphoneCore *lc){
        return lc->sip_conf.ipv6_enabled;
}
void linphone_core_enable_ipv6(LinphoneCore *lc, bool_t val){
        if (lc->sip_conf.ipv6_enabled!=val){
                lc->sip_conf.ipv6_enabled=val;
                if (exosip_running){
                        /* we need to restart eXosip */
                        linphone_core_set_sip_port(lc, lc->sip_conf.sip_port);
                }
        }
}

static void display_bandwidth(RtpSession *as, RtpSession *vs){
        ms_message("bandwidth usage: audio=[d=%.1f,u=%.1f] video=[d=%.1f,u=%.1f] kbit/sec",
        (as!=NULL) ? (rtp_session_compute_recv_bandwidth(as)*1e-3) : 0,
        (as!=NULL) ? (rtp_session_compute_send_bandwidth(as)*1e-3) : 0,
        (vs!=NULL) ? (rtp_session_compute_recv_bandwidth(vs)*1e-3) : 0,
        (vs!=NULL) ? (rtp_session_compute_send_bandwidth(vs)*1e-3) : 0);
}

static void linphone_core_disconnected(LinphoneCore *lc){
        lc->vtable.display_warning(lc,_("Remote end seems to have disconnected, the call is going to be closed."));
        linphone_core_terminate_call(lc,NULL);
}

static void proxy_update(LinphoneCore *lc, time_t curtime){
        bool_t doit=FALSE;
        static time_t last_check=0;
        static bool_t last_status=FALSE;
        if (lc->sip_conf.register_only_when_network_is_up){
                char result[LINPHONE_IPADDR_SIZE];
                /* only do the network up checking every five seconds */
                if (last_check==0 || (curtime-last_check)>=5){
                        if (eXosip_guess_localip(lc->sip_conf.ipv6_enabled ? AF_INET6 : AF_INET,result,LINPHONE_IPADDR_SIZE)==0){
                                if (strcmp(result,"::1")!=0 && strcmp(result,"127.0.0.1")!=0){
                                        last_status=TRUE;
                                        ms_message("Network is up, registering now (%s)",result);
                                }else last_status=FALSE;
                        }
                        last_check=curtime;
                }
                doit=last_status;
        }else doit=TRUE;
        if (doit) ms_list_for_each(lc->sip_conf.proxies,(void (*)(void*))&linphone_proxy_config_update);
}

static void assign_buddy_info(LinphoneCore *lc, BuddyInfo *info){
        LinphoneFriend *lf=linphone_core_get_friend_by_uri(lc,info->sip_uri);
        if (lf!=NULL){
                lf->info=info;
                ms_message("%s has a BuddyInfo assigned with image %p",info->sip_uri, info->image_data);
                if (lc->vtable.buddy_info_updated)
                        lc->vtable.buddy_info_updated(lc,lf);
        }else{
                ms_warning("Could not any friend with uri %s",info->sip_uri);
        }
}

static void analyze_buddy_lookup_results(LinphoneCore *lc, LinphoneProxyConfig *cfg){
        MSList *elem;
        SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
        for (elem=lc->bl_reqs;elem!=NULL;elem=ms_list_next(elem)){
                BuddyLookupRequest *req=(BuddyLookupRequest *)elem->data;
                if (req->status==BuddyLookupDone || req->status==BuddyLookupFailure){
                        if (req->results!=NULL){
                                BuddyInfo *i=(BuddyInfo*)req->results->data;
                                ms_list_free(req->results);
                                req->results=NULL;
                                assign_buddy_info(lc,i);
                        }
                        sip_setup_context_buddy_lookup_free(ctx,req);
                        elem->data=NULL;
                }
        }
        /*purge completed requests */
        while((elem=ms_list_find(lc->bl_reqs,NULL))!=NULL){
                lc->bl_reqs=ms_list_remove_link(lc->bl_reqs,elem);
        }
}

static void linphone_core_grab_buddy_infos(LinphoneCore *lc, LinphoneProxyConfig *cfg){
        const MSList *elem;
        SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
        for(elem=linphone_core_get_friend_list(lc);elem!=NULL;elem=elem->next){
                LinphoneFriend *lf=(LinphoneFriend*)elem->data;
                if (lf->info==NULL){
                        if (linphone_core_lookup_known_proxy(lc,lf->uri)==cfg){
                                if (linphone_address_get_username(lf->uri)!=NULL){
                                        BuddyLookupRequest *req;
                                        char *tmp=linphone_address_as_string_uri_only(lf->uri);
                                        req=sip_setup_context_create_buddy_lookup_request(ctx);
                                        buddy_lookup_request_set_key(req,tmp);
                                        buddy_lookup_request_set_max_results(req,1);
                                        sip_setup_context_buddy_lookup_submit(ctx,req);
                                        lc->bl_reqs=ms_list_append(lc->bl_reqs,req);
                                        ms_free(tmp);
                                }
                        }
                }
        }
}

static void linphone_core_do_plugin_tasks(LinphoneCore *lc){
        LinphoneProxyConfig *cfg=NULL;
        linphone_core_get_default_proxy(lc,&cfg);
        if (cfg){
                if (lc->bl_refresh){
                        SipSetupContext *ctx=linphone_proxy_config_get_sip_setup_context(cfg);
                        if (ctx && (sip_setup_context_get_capabilities(ctx) & SIP_SETUP_CAP_BUDDY_LOOKUP)){
                                linphone_core_grab_buddy_infos(lc,cfg);
                                lc->bl_refresh=FALSE;
                        }
                }
                if (lc->bl_reqs) analyze_buddy_lookup_results(lc,cfg);
        }
}

void linphone_core_iterate(LinphoneCore *lc)
{
        eXosip_event_t *ev;
        bool_t disconnected=FALSE;
        int disconnect_timeout = linphone_core_get_nortp_timeout(lc); 
        time_t curtime=time(NULL);
        int elapsed;
        bool_t one_second_elapsed=FALSE;
        
        if (curtime-lc->prevtime>=1){
                lc->prevtime=curtime;
                one_second_elapsed=TRUE;
        }

        if (lc->preview_finished){
                lc->preview_finished=0;
                ring_stop(lc->ringstream);
                lc->ringstream=NULL;
                lc_callback_obj_invoke(&lc->preview_finished_cb,lc);
        }
        
        if (exosip_running){
                while((ev=eXosip_event_wait(0,0))!=NULL){
                        linphone_core_process_event(lc,ev);
                }
                if (lc->automatic_action==0) {
                        eXosip_lock();
                        eXosip_automatic_action();
                        eXosip_unlock();
                }
        }

        proxy_update(lc,curtime);

        if (lc->call!=NULL){
                LinphoneCall *call=lc->call;
                
                if (call->dir==LinphoneCallIncoming && call->state==LCStateRinging){
                        elapsed=curtime-call->start_time;
                        ms_message("incoming call ringing for %i seconds",elapsed);
                        if (elapsed>lc->sip_conf.inc_timeout){
                                linphone_core_terminate_call(lc,NULL);
                        }
                }else if (call->state==LCStateAVRunning){
                        if (one_second_elapsed){
                                RtpSession *as=NULL,*vs=NULL;
                                lc->prevtime=curtime;
                                if (lc->audiostream!=NULL)
                                        as=lc->audiostream->session;
                                if (lc->videostream!=NULL)
                                        vs=lc->videostream->session;
                                display_bandwidth(as,vs);
                        }
#ifdef VIDEO_ENABLED
                        if (lc->videostream!=NULL)
                                video_stream_iterate(lc->videostream);
#endif
                        if (lc->audiostream!=NULL && disconnect_timeout>0)
                                disconnected=!audio_stream_alive(lc->audiostream,disconnect_timeout);
                }
        }
        if (linphone_core_video_preview_enabled(lc)){
                if (lc->previewstream==NULL)
                        toggle_video_preview(lc,TRUE);
#ifdef VIDEO_ENABLED
                else video_stream_iterate(lc->previewstream);
#endif
        }else{
                if (lc->previewstream!=NULL)
                        toggle_video_preview(lc,FALSE);
        }
        if (disconnected)
                linphone_core_disconnected(lc);

        linphone_core_do_plugin_tasks(lc);

        if (one_second_elapsed && lp_config_needs_commit(lc->config)){
                lp_config_sync(lc->config);
        }
}


bool_t linphone_core_is_in_main_thread(LinphoneCore *lc){
        return TRUE;
}

static char *guess_route_if_any(LinphoneCore *lc, osip_to_t *parsed_url){
        const MSList *elem=linphone_core_get_proxy_config_list(lc);
        for(;elem!=NULL;elem=elem->next){
                LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
                char prx[256];
                if (cfg->ssctx && sip_setup_context_get_proxy(cfg->ssctx,parsed_url->url->host,prx,sizeof(prx))==0){
                        ms_message("We have a proxy for domain %s",parsed_url->url->host);
                        if (strcmp(parsed_url->url->host,prx)!=0){
                                char *route=NULL;
                                osip_route_t *rt;
                                osip_route_init(&rt);
                                if (osip_route_parse(rt,prx)==0){
                                        char *rtstr;
                                        osip_uri_uparam_add(rt->url,osip_strdup("lr"),NULL);
                                        osip_route_to_str(rt,&rtstr);
                                        route=ms_strdup(rtstr);
                                        osip_free(rtstr);
                                }
                                osip_route_free(rt);
                                ms_message("Adding a route: %s",route);
                                return route;
                        }
                }
        }
        return NULL;
}

bool_t linphone_core_interpret_url(LinphoneCore *lc, const char *url, LinphoneAddress **real_parsed_url, char **route){
        enum_lookup_res_t *enumres=NULL;
        osip_to_t *parsed_url=NULL;
        char *enum_domain=NULL;
        LinphoneProxyConfig *proxy;
        char *tmpurl;
        const char *tmproute;
        if (real_parsed_url!=NULL) *real_parsed_url=NULL;
        *route=NULL;
        tmproute=linphone_core_get_route(lc);
        
        if (is_enum(url,&enum_domain)){
                lc->vtable.display_status(lc,_("Looking for telephone number destination..."));
                if (enum_lookup(enum_domain,&enumres)<0){
                        lc->vtable.display_status(lc,_("Could not resolve this number."));
                        ms_free(enum_domain);
                        return FALSE;
                }
                ms_free(enum_domain);
                tmpurl=enumres->sip_address[0];
                if (real_parsed_url!=NULL) *real_parsed_url=linphone_address_new(tmpurl);
                enum_lookup_res_free(enumres);
                if (tmproute) *route=ms_strdup(tmproute);
                return TRUE;
        }
        /* check if we have a "sip:" */
        if (strstr(url,"sip:")==NULL){
                /* this doesn't look like a true sip uri */
                proxy=lc->default_proxy;
                if (proxy!=NULL){
                        /* append the proxy domain suffix */
                        LinphoneAddress *uri;
                        const char *identity=linphone_proxy_config_get_identity(proxy);
                        uri=linphone_address_new(identity);
                        if (uri==NULL){
                                return FALSE;
                        }
                        linphone_address_set_display_name(uri,NULL);
                        linphone_address_set_username(uri,url);
                        if (real_parsed_url!=NULL) *real_parsed_url=uri;
#if 0
                        /*if the prompted uri was auto-suffixed with proxy domain,
                        then automatically set a route so that the request goes
                        through the proxy*/
                        if (tmproute==NULL){
                                osip_route_t *rt=NULL;
                                char *rtstr=NULL;
                                osip_route_init(&rt);
                                if (osip_route_parse(rt,linphone_proxy_config_get_addr(proxy))==0){
                                        osip_uri_uparam_add(rt->url,osip_strdup("lr"),NULL);
                                        osip_route_to_str(rt,&rtstr);
                                        *route=ms_strdup(rtstr);
                                        osip_free(rtstr);
                                }
                                ms_message("setting automatically a route to %s",*route);
                        }
                        else *route=ms_strdup(tmproute);
#else
                        if (tmproute==NULL) *route=guess_route_if_any(lc,*real_parsed_url);
                        if (tmproute) *route=ms_strdup(tmproute);
#endif
                        return TRUE;
                }
        }
        parsed_url=linphone_address_new(url);
        if (parsed_url!=NULL){
                if (real_parsed_url!=NULL) *real_parsed_url=parsed_url;
                else linphone_address_destroy(parsed_url);
                if (tmproute) *route=ms_strdup(tmproute);
                else *route=guess_route_if_any(lc,*real_parsed_url);
                return TRUE;
        }
        /* else we could not do anything with url given by user, so display an error */
        if (lc->vtable.display_warning!=NULL){
                lc->vtable.display_warning(lc,_("Could not parse given sip address. A sip url usually looks like sip:user@domain"));
        }
        return FALSE;
}

const char * linphone_core_get_identity(LinphoneCore *lc){
        LinphoneProxyConfig *proxy=NULL;
        const char *from;
        linphone_core_get_default_proxy(lc,&proxy);
        if (proxy!=NULL) {
                from=linphone_proxy_config_get_identity(proxy);
        }else from=linphone_core_get_primary_contact(lc);
        return from;
}

const char * linphone_core_get_route(LinphoneCore *lc){
        LinphoneProxyConfig *proxy=NULL;
        const char *route=NULL;
        linphone_core_get_default_proxy(lc,&proxy);
        if (proxy!=NULL) {
                route=linphone_proxy_config_get_route(proxy);
        }
        return route;
}

void linphone_set_sdp(osip_message_t *sip, const char *sdpmesg){
        int sdplen=strlen(sdpmesg);
        char clen[10];
        snprintf(clen,sizeof(clen),"%i",sdplen);
        osip_message_set_body(sip,sdpmesg,sdplen);
        osip_message_set_content_type(sip,"application/sdp");
        osip_message_set_content_length(sip,clen);
}

LinphoneProxyConfig * linphone_core_lookup_known_proxy(LinphoneCore *lc, const LinphoneAddress *uri){
        const MSList *elem;
        LinphoneProxyConfig *found_cfg=NULL;
        for (elem=linphone_core_get_proxy_config_list(lc);elem!=NULL;elem=elem->next){
                LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
                const char *domain=linphone_proxy_config_get_domain(cfg);
                if (domain!=NULL && strcmp(domain,linphone_address_get_domain(uri))==0){
                        found_cfg=cfg;
                        break;
                }
        }
        return found_cfg;
}

static void fix_contact(LinphoneCore *lc, osip_message_t *msg, const char *localip, LinphoneProxyConfig *dest_proxy){
        osip_contact_t *ctt=NULL;
        const char *ip=NULL;
        int port=5060;

        osip_message_get_contact(msg,0,&ctt);
        if (ctt!=NULL){
                if (dest_proxy!=NULL){
                        /* if we know the request will go to a known proxy for which we are registered,
                        we can use the same contact address as in the register */
                        linphone_proxy_config_get_contact(dest_proxy,&ip,&port);
                }else{
                        ip=localip;
                        port=linphone_core_get_sip_port(lc);
                }
                if (ip!=NULL){
                        osip_free(ctt->url->host);
                        ctt->url->host=osip_strdup(ip);
                }
                if (port!=0){
                        char tmp[10]={0};
                        char *str;
                        snprintf(tmp,sizeof(tmp)-1,"%i",port);
                        if (ctt->url->port!=NULL)
                                osip_free(ctt->url->port);
                        ctt->url->port=osip_strdup(tmp);
                        osip_contact_to_str(ctt,&str);
                        ms_message("Contact has been fixed to %s",str);
                        osip_free(str);
                }
        }
}

int linphone_core_invite(LinphoneCore *lc, const char *url)
{
        char *barmsg;
        int err=0;
        char *sdpmesg=NULL;
        char *route=NULL;
        const char *from=NULL;
        osip_message_t *invite=NULL;
        sdp_context_t *ctx=NULL;
        LinphoneProxyConfig *proxy=NULL;
        LinphoneAddress *parsed_url2=NULL;
        LinphoneAddress *real_parsed_url=NULL;
        char *real_url=NULL;
        LinphoneProxyConfig *dest_proxy=NULL;
        
        if (lc->call!=NULL){
                lc->vtable.display_warning(lc,_("Sorry, having multiple simultaneous calls is not supported yet !"));
                return -1;
        }

        linphone_core_get_default_proxy(lc,&proxy);
        if (!linphone_core_interpret_url(lc,url,&real_parsed_url,&route)){
                return -1;
        }
        real_url=linphone_address_as_string(real_parsed_url);
        dest_proxy=linphone_core_lookup_known_proxy(lc,real_parsed_url);

        if (proxy!=dest_proxy && dest_proxy!=NULL) {
                ms_message("Overriding default proxy setting for this call:");
                ms_message("The used identity will be %s",linphone_proxy_config_get_identity(dest_proxy));
        }

        if (dest_proxy!=NULL) 
                from=linphone_proxy_config_get_identity(dest_proxy);
        else if (proxy!=NULL)
                from=linphone_proxy_config_get_identity(proxy);

        /* if no proxy or no identity defined for this proxy, default to primary contact*/
        if (from==NULL) from=linphone_core_get_primary_contact(lc);

        err=eXosip_call_build_initial_invite(&invite,real_url,from,
                                                route,"Phone call");
        if (err<0){
                ms_warning("Could not build initial invite");
                goto end;
        }
        if (lp_config_get_int(lc->config,"sip","use_session_timers",0)==1){
                osip_message_set_header(invite, "Session-expires", "200");
                osip_message_set_supported(invite, "timer");
        }
        /* make sdp message */
        
        parsed_url2=linphone_address_new(from);
        
        lc->call=linphone_call_new_outgoing(lc,parsed_url2,real_parsed_url);
        /*try to be best-effort in giving real local or routable contact address,
        except when the user choosed to override the ipaddress */
        if (linphone_core_get_firewall_policy(lc)!=LINPHONE_POLICY_USE_NAT_ADDRESS)
                fix_contact(lc,invite,lc->call->localip,dest_proxy);

        barmsg=ortp_strdup_printf("%s %s", _("Contacting"), real_url);
        lc->vtable.display_status(lc,barmsg);
        ms_free(barmsg);
        if (!lc->sip_conf.sdp_200_ack){
                ctx=lc->call->sdpctx;
                sdpmesg=sdp_context_get_offer(ctx);
                linphone_set_sdp(invite,sdpmesg);
                linphone_core_init_media_streams(lc);
        }
        eXosip_lock();
        err=eXosip_call_send_initial_invite(invite);
        lc->call->cid=err;
        eXosip_unlock();
        
        if (err<0){
                ms_warning("Could not initiate call.");
                lc->vtable.display_status(lc,_("could not call"));
                linphone_call_destroy(lc->call);
                lc->call=NULL;
                linphone_core_stop_media_streams(lc);
        }else gstate_new_state(lc, GSTATE_CALL_OUT_INVITE, url);
        
        goto end;
        end:
                if (real_url!=NULL) ms_free(real_url);
                if (route!=NULL) ms_free(route);
        return (err<0) ? -1 : 0;
}

int linphone_core_refer(LinphoneCore *lc, const char *url)
{
        char *real_url=NULL;
        LinphoneAddress *real_parsed_url=NULL;
        LinphoneCall *call;
        osip_message_t *msg=NULL;
        char *route;
        if (!linphone_core_interpret_url(lc,url,&real_parsed_url, &route)){
                /* bad url */
                return -1;
        }
        if (route!=NULL) ms_free(route);
        call=lc->call;
        if (call==NULL){
                ms_warning("No established call to refer.");
                return -1;
        }
        lc->call=NULL;
        real_url=linphone_address_as_string (real_parsed_url);
        eXosip_call_build_refer(call->did, real_url, &msg);
        ms_free(real_url);
        eXosip_lock();
        eXosip_call_send_request(call->did, msg);
        eXosip_unlock();
        return 0;
}

bool_t linphone_core_inc_invite_pending(LinphoneCore*lc){
        if (lc->call!=NULL && lc->call->dir==LinphoneCallIncoming){
                return TRUE;
        }
        return FALSE;
}

#ifdef VINCENT_MAURY_RSVP
/* on=1 for RPC_ENABLE=1...*/
int linphone_core_set_rpc_mode(LinphoneCore *lc, int on)
{
        if (on==1)
                printf("RPC_ENABLE set on\n");
        else 
                printf("RPC_ENABLE set off\n");
        lc->rpc_enable = (on==1);
        /* need to tell eXosip the new setting */
        if (eXosip_set_rpc_mode (lc->rpc_enable)!=0)
                return -1;
        return 0;
}

/* on=1 for RSVP_ENABLE=1...*/
int linphone_core_set_rsvp_mode(LinphoneCore *lc, int on)
{
        if (on==1)
                printf("RSVP_ENABLE set on\n");
        else 
                printf("RSVP_ENABLE set off\n");
        lc->rsvp_enable = (on==1);
        /* need to tell eXosip the new setting */
        if (eXosip_set_rsvp_mode (lc->rsvp_enable)!=0)
                return -1;
        return 0;
}

/* answer : 1 for yes, 0 for no */
int linphone_core_change_qos(LinphoneCore *lc, int answer)
{
        char *sdpmesg;
        if (lc->call==NULL){
                return -1;
        }
        
        if (lc->rsvp_enable && answer==1)
        {
                /* answer is yes, local setting is with qos, so 
                 * the user chose to continue with no qos ! */
                /* so switch in normal mode : ring and 180 */
                lc->rsvp_enable = 0; /* no more rsvp */
                eXosip_set_rsvp_mode (lc->rsvp_enable);
                /* send 180 */
                eXosip_lock();
                eXosip_answer_call(lc->call->did,180,NULL);
                eXosip_unlock();
                /* play the ring */
                ms_message("Starting local ring...");
                lc->ringstream=ring_start(lc->sound_conf.local_ring,
                                        2000,ms_snd_card_manager_get_card(ms_snd_card_manager_get(),lc->sound_conf.ring_sndcard));
        }
        else if (!lc->rsvp_enable && answer==1)
        {
                /* switch to QoS mode on : answer 183 session progress */
                lc->rsvp_enable = 1;
                eXosip_set_rsvp_mode (lc->rsvp_enable);
                /* take the sdp already computed, see osipuacb.c */
                sdpmesg=lc->call->sdpctx->answerstr;
                eXosip_lock();
                eXosip_answer_call_with_body(lc->call->did,183,"application/sdp",sdpmesg);
                eXosip_unlock();
        }
        else
        {
                /* decline offer (603) */
                linphone_core_terminate_call(lc, NULL);
        }
        return 0;
}
#endif

void linphone_core_init_media_streams(LinphoneCore *lc){
        lc->audiostream=audio_stream_new(linphone_core_get_audio_port(lc),linphone_core_ipv6_enabled(lc));
        if (linphone_core_echo_limiter_enabled(lc)){
                const char *type=lp_config_get_string(lc->config,"sound","el_type","mic");
                if (strcasecmp(type,"mic")==0)
                        audio_stream_enable_echo_limiter(lc->audiostream,ELControlMic);
                else if (strcasecmp(type,"speaker")==0)
                        audio_stream_enable_echo_limiter(lc->audiostream,ELControlSpeaker);
        }
        audio_stream_enable_gain_control(lc->audiostream,TRUE);
        if (linphone_core_echo_cancellation_enabled(lc)){
                int len,delay,framesize;
                len=lp_config_get_int(lc->config,"sound","ec_tail_len",0);
                delay=lp_config_get_int(lc->config,"sound","ec_delay",0);
                framesize=lp_config_get_int(lc->config,"sound","ec_framesize",0);
                audio_stream_set_echo_canceller_params(lc->audiostream,len,delay,framesize);
        }
        audio_stream_enable_automatic_gain_control(lc->audiostream,linphone_core_agc_enabled(lc));
        {
                int enabled=lp_config_get_int(lc->config,"sound","noisegate",0);
                audio_stream_enable_noise_gate(lc->audiostream,enabled);
        }
        if (lc->a_rtp)
                rtp_session_set_transports(lc->audiostream->session,lc->a_rtp,lc->a_rtcp);

#ifdef VIDEO_ENABLED
        if (lc->video_conf.display || lc->video_conf.capture)
                lc->videostream=video_stream_new(linphone_core_get_video_port(lc),linphone_core_ipv6_enabled(lc));
#else
        lc->videostream=NULL;
#endif
}

static void linphone_core_dtmf_received(RtpSession* s, int dtmf, void* user_data){
        LinphoneCore* lc = (LinphoneCore*)user_data;
        if (lc->vtable.dtmf_received != NULL)
                lc->vtable.dtmf_received(lc, dtmf);
}

static void parametrize_equalizer(LinphoneCore *lc, AudioStream *st){
        if (st->equalizer){
                MSFilter *f=st->equalizer;
                int enabled=lp_config_get_int(lc->config,"sound","eq_active",0);
                const char *gains=lp_config_get_string(lc->config,"sound","eq_gains",NULL);
                ms_filter_call_method(f,MS_EQUALIZER_SET_ACTIVE,&enabled);
                if (enabled){
                        if (gains){
                                do{
                                        int bytes;
                                        MSEqualizerGain g;
                                        if (sscanf(gains,"%f:%f:%f %n",&g.frequency,&g.gain,&g.width,&bytes)==3){
                                                ms_message("Read equalizer gains: %f(~%f) --> %f",g.frequency,g.width,g.gain);
                                                ms_filter_call_method(f,MS_EQUALIZER_SET_GAIN,&g);
                                                gains+=bytes;
                                        }else break;
                                }while(1);
                        }
                }
        }
}

static void post_configure_audio_streams(LinphoneCore *lc){
        AudioStream *st=lc->audiostream;
        float gain=lp_config_get_float(lc->config,"sound","mic_gain",-1);
        if (gain!=-1)
                audio_stream_set_mic_gain(st,gain);
        if (linphone_core_echo_limiter_enabled(lc)){
                float speed=lp_config_get_float(lc->config,"sound","el_speed",-1);
                float thres=lp_config_get_float(lc->config,"sound","el_thres",-1);
                float force=lp_config_get_float(lc->config,"sound","el_force",-1);
                int sustain=lp_config_get_int(lc->config,"sound","el_sustain",-1);
                MSFilter *f=NULL;
                if (st->el_type==ELControlMic){
                        f=st->volsend;
                        if (speed==-1) speed=0.03;
                        if (force==-1) force=10;
                }
                else if (st->el_type==ELControlSpeaker){
                        f=st->volrecv;
                        if (speed==-1) speed=0.02;
                        if (force==-1) force=5;
                }
                if (speed!=-1)
                        ms_filter_call_method(f,MS_VOLUME_SET_EA_SPEED,&speed);
                if (thres!=-1)
                        ms_filter_call_method(f,MS_VOLUME_SET_EA_THRESHOLD,&thres);
                if (force!=-1)
                        ms_filter_call_method(f,MS_VOLUME_SET_EA_FORCE,&force);
                if (sustain!=-1)
                        ms_filter_call_method(f,MS_VOLUME_SET_EA_SUSTAIN,&sustain);
                
        }
        if (st->volsend){
                float ng_thres=lp_config_get_float(lc->config,"sound","ng_thres",0.05);
                float ng_floorgain=lp_config_get_float(lc->config,"sound","ng_floorgain",0);
                ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_THRESHOLD,&ng_thres);
                ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_FLOORGAIN,&ng_floorgain);
        }
        parametrize_equalizer(lc,st);
        if (lc->vtable.dtmf_received!=NULL){
                /* replace by our default action*/
                audio_stream_play_received_dtmfs(lc->audiostream,FALSE);
                rtp_session_signal_connect(lc->audiostream->session,"telephone-event",(RtpCallback)linphone_core_dtmf_received,(unsigned long)lc);
        }
}

void linphone_core_start_media_streams(LinphoneCore *lc, LinphoneCall *call){
        LinphoneAddress *me=linphone_core_get_primary_contact_parsed(lc);
        const char *tool="linphone-" LINPHONE_VERSION;
        /* adjust rtp jitter compensation. It must be at least the latency of the sound card */
        int jitt_comp=MAX(lc->sound_conf.latency,lc->rtp_conf.audio_jitt_comp);

        if (call->media_start_time==0) call->media_start_time=time(NULL);

        char *cname=ortp_strdup_printf("%s@%s",linphone_address_get_username(me),linphone_address_get_domain(me));
        {
                StreamParams *audio_params=&call->audio_params;
                if (!lc->use_files){
                        MSSndCard *playcard=lc->sound_conf.play_sndcard;
                        MSSndCard *captcard=lc->sound_conf.capt_sndcard;
                        if (playcard==NULL) {
                                ms_warning("No card defined for playback !");
                                goto end;
                        }
                        if (captcard==NULL) {
                                ms_warning("No card defined for capture !");
                                goto end;
                        }
                        if (audio_params->relay_session_id!=NULL) 
                                audio_stream_set_relay_session_id(lc->audiostream,audio_params->relay_session_id);
                        audio_stream_start_now(
                                lc->audiostream,
                                call->profile,
                                audio_params->remoteaddr,
                                audio_params->remoteport,
                                audio_params->remotertcpport,
                                audio_params->pt,
                                jitt_comp,
                                playcard,
                                captcard,
                                linphone_core_echo_cancellation_enabled(lc));
                }else{
                        audio_stream_start_with_files(
                                lc->audiostream,
                                call->profile,
                                audio_params->remoteaddr,
                                audio_params->remoteport,
                                audio_params->remotertcpport,
                                audio_params->pt,
                                100,
                                lc->play_file,
                                lc->rec_file);
                }
                post_configure_audio_streams(lc);       
                audio_stream_set_rtcp_information(lc->audiostream, cname, tool);
        }
#ifdef VIDEO_ENABLED
        {
                /* shutdown preview */
                if (lc->previewstream!=NULL) {
                        video_preview_stop(lc->previewstream);
                        lc->previewstream=NULL;
                }
                if (lc->video_conf.display || lc->video_conf.capture) {
                        StreamParams *video_params=&call->video_params;
                        
                        if (video_params->remoteport>0){
                                if (video_params->relay_session_id!=NULL) 
                                        video_stream_set_relay_session_id(lc->videostream,video_params->relay_session_id);
                                video_stream_set_sent_video_size(lc->videostream,linphone_core_get_preferred_video_size(lc));
                                video_stream_enable_self_view(lc->videostream,lc->video_conf.selfview);
                                if (lc->video_conf.display && lc->video_conf.capture)
                                        video_stream_start(lc->videostream,
                                        call->profile, video_params->remoteaddr, video_params->remoteport,
                                        video_params->remotertcpport,
                                        video_params->pt, jitt_comp, lc->video_conf.device);
                                else if (lc->video_conf.display)
                                        video_stream_recv_only_start(lc->videostream,
                                        call->profile, video_params->remoteaddr, video_params->remoteport,
                                        video_params->pt, jitt_comp);
                                else if (lc->video_conf.capture)
                                        video_stream_send_only_start(lc->videostream,
                                        call->profile, video_params->remoteaddr, video_params->remoteport,
                                        video_params->remotertcpport,
                                        video_params->pt, jitt_comp, lc->video_conf.device);
                                video_stream_set_rtcp_information(lc->videostream, cname,tool);
                        }
                }
        }
#endif
        goto end;
        end:
        ms_free(cname);
        linphone_address_destroy(me);
        lc->call->state=LCStateAVRunning;
}

void linphone_core_stop_media_streams(LinphoneCore *lc){
        if (lc->audiostream!=NULL) {
                audio_stream_stop(lc->audiostream);
                lc->audiostream=NULL;
        }
#ifdef VIDEO_ENABLED
        if (lc->videostream!=NULL){
                if (lc->video_conf.display && lc->video_conf.capture)
                        video_stream_stop(lc->videostream);
                else if (lc->video_conf.display)
                        video_stream_recv_only_stop(lc->videostream);
                else if (lc->video_conf.capture)
                        video_stream_send_only_stop(lc->videostream);
                lc->videostream=NULL;
        }
        if (linphone_core_video_preview_enabled(lc)){
                if (lc->previewstream==NULL){
                        lc->previewstream=video_preview_start(lc->video_conf.device, lc->video_conf.vsize);
                }
        }
#endif
}

int linphone_core_accept_call(LinphoneCore *lc, const char *url)
{
        char *sdpmesg;
        osip_message_t *msg=NULL;
        LinphoneCall *call=lc->call;
        int err;
        bool_t offering=FALSE;
        
        if (call==NULL){
                return -1;
        }
        
        if (lc->call->state==LCStateAVRunning){
                /*call already accepted*/
                return -1;
        }

        /*stop ringing */
        if (lc->ringstream!=NULL) {
                ms_message("stop ringing");
                ring_stop(lc->ringstream);
                ms_message("ring stopped");
                lc->ringstream=NULL;
        }
        /* sends a 200 OK */
        err=eXosip_call_build_answer(call->tid,200,&msg);
        if (err<0 || msg==NULL){
                ms_error("Fail to build answer for call: err=%i",err);
                return -1;
        }
        if (lp_config_get_int(lc->config,"sip","use_session_timers",0)==1){
                if (call->supports_session_timers) osip_message_set_supported(msg, "timer");
        }
        /*try to be best-effort in giving real local or routable contact address,
        except when the user choosed to override the ipaddress */
        if (linphone_core_get_firewall_policy(lc)!=LINPHONE_POLICY_USE_NAT_ADDRESS)
                fix_contact(lc,msg,call->localip,NULL);
        /*if a sdp answer is computed, send it, else send an offer */
        sdpmesg=call->sdpctx->answerstr;
        if (sdpmesg==NULL){
                offering=TRUE;
                ms_message("generating sdp offer");
                sdpmesg=sdp_context_get_offer(call->sdpctx);
                
                if (sdpmesg==NULL){
                        ms_error("fail to generate sdp offer !");
                        return -1;
                }
                linphone_set_sdp(msg,sdpmesg);
                linphone_core_init_media_streams(lc);
        }else{
                linphone_set_sdp(msg,sdpmesg);
        }
        eXosip_lock();
        eXosip_call_send_answer(call->tid,200,msg);
        eXosip_unlock();
        lc->vtable.display_status(lc,_("Connected."));
        gstate_new_state(lc, GSTATE_CALL_IN_CONNECTED, NULL);
        
        if (!offering) linphone_core_start_media_streams(lc, lc->call);
        ms_message("call answered.");
        return 0;
}

int linphone_core_terminate_call(LinphoneCore *lc, const char *url)
{
        LinphoneCall *call=lc->call;
        if (call==NULL){
                return -1;
        }
        lc->call=NULL;
        
        eXosip_lock();
        eXosip_call_terminate(call->cid,call->did);
        eXosip_unlock();
        
        /*stop ringing*/
        if (lc->ringstream!=NULL) {
                ring_stop(lc->ringstream);
                lc->ringstream=NULL;
        }
        linphone_core_stop_media_streams(lc);
        lc->vtable.display_status(lc,_("Call ended") );
        gstate_new_state(lc, GSTATE_CALL_END, NULL);
        linphone_call_destroy(call);
        return 0;
}

bool_t linphone_core_in_call(const LinphoneCore *lc){
        return lc->call!=NULL;
}

int linphone_core_send_publish(LinphoneCore *lc,
                               LinphoneOnlineStatus presence_mode)
{
        const MSList *elem;
        for (elem=linphone_core_get_proxy_config_list(lc);elem!=NULL;elem=ms_list_next(elem)){
                LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)elem->data;
                if (cfg->publish) linphone_proxy_config_send_publish(cfg,presence_mode);
        }
        return 0;
}

void linphone_core_set_inc_timeout(LinphoneCore *lc, int seconds){
        lc->sip_conf.inc_timeout=seconds;
}

int linphone_core_get_inc_timeout(LinphoneCore *lc){
        return lc->sip_conf.inc_timeout;
}

void linphone_core_set_presence_info(LinphoneCore *lc,int minutes_away,
                                                                                                        const char *contact,
                                                                                                        LinphoneOnlineStatus presence_mode)
{
        int contactok=-1;
        if (minutes_away>0) lc->minutes_away=minutes_away;
        if (contact!=NULL) {
                osip_from_t *url;
                osip_from_init(&url);
                contactok=osip_from_parse(url,contact);
                if (contactok>=0) {
                        ms_message("contact url is correct.");
                }
                osip_from_free(url);
                
        }
        if (contactok>=0){
                if (lc->alt_contact!=NULL) ms_free(lc->alt_contact);
                lc->alt_contact=ms_strdup(contact);
        }
        if (lc->presence_mode!=presence_mode){
                linphone_core_notify_all_friends(lc,presence_mode);
                /* 
                   Improve the use of all LINPHONE_STATUS available.
                   !TODO Do not mix "presence status" with "answer status code"..
                   Use correct parameter to follow sip_if_match/sip_etag.
                 */
                linphone_core_send_publish(lc,presence_mode);
        }
        lc->prev_mode=lc->presence_mode;
        lc->presence_mode=presence_mode;
        
}

LinphoneOnlineStatus linphone_core_get_presence_info(const LinphoneCore *lc){
        return lc->presence_mode;
}

/* sound functions */
int linphone_core_get_play_level(LinphoneCore *lc)
{
        return lc->sound_conf.play_lev;
}
int linphone_core_get_ring_level(LinphoneCore *lc)
{
        return lc->sound_conf.ring_lev;
}
int linphone_core_get_rec_level(LinphoneCore *lc){
        return lc->sound_conf.rec_lev;
}
void linphone_core_set_ring_level(LinphoneCore *lc, int level){
        MSSndCard *sndcard;
        lc->sound_conf.ring_lev=level;
        sndcard=lc->sound_conf.ring_sndcard;
        if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_PLAYBACK,level);
}

void linphone_core_set_play_level(LinphoneCore *lc, int level){
        MSSndCard *sndcard;
        lc->sound_conf.play_lev=level;
        sndcard=lc->sound_conf.play_sndcard;
        if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_PLAYBACK,level);
}

void linphone_core_set_rec_level(LinphoneCore *lc, int level)
{
        MSSndCard *sndcard;
        lc->sound_conf.rec_lev=level;
        sndcard=lc->sound_conf.capt_sndcard;
        if (sndcard) ms_snd_card_set_level(sndcard,MS_SND_CARD_CAPTURE,level);
}

static MSSndCard *get_card_from_string_id(const char *devid, unsigned int cap){
        MSSndCard *sndcard=NULL;
        if (devid!=NULL){
                sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
                if (sndcard!=NULL && 
                        (ms_snd_card_get_capabilities(sndcard) & cap)==0 ){
                        ms_warning("%s card does not have the %s capability, ignoring.",
                                devid,
                                cap==MS_SND_CARD_CAP_CAPTURE ? "capture" : "playback");
                        sndcard=NULL;
                }
        }
        if (sndcard==NULL) {
                /* get a card that has read+write capabilities */
                sndcard=ms_snd_card_manager_get_default_card(ms_snd_card_manager_get());
                /* otherwise refine to the first card having the right capability*/
                if (sndcard==NULL){
                        const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
                        for(;elem!=NULL;elem=elem->next){
                                sndcard=(MSSndCard*)elem->data;
                                if (ms_snd_card_get_capabilities(sndcard) & cap) break;
                        }
                }
                if (sndcard==NULL){/*looks like a bug! take the first one !*/
                        const MSList *elem=ms_snd_card_manager_get_list(ms_snd_card_manager_get());
                        sndcard=(MSSndCard*)elem->data;
                }
        }
        if (sndcard==NULL) ms_error("Could not find a suitable soundcard !");
        return sndcard;
}

bool_t linphone_core_sound_device_can_capture(LinphoneCore *lc, const char *devid){
        MSSndCard *sndcard;
        sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
        if (sndcard!=NULL && (ms_snd_card_get_capabilities(sndcard) & MS_SND_CARD_CAP_CAPTURE)) return TRUE;
        return FALSE;
}

bool_t linphone_core_sound_device_can_playback(LinphoneCore *lc, const char *devid){
        MSSndCard *sndcard;
        sndcard=ms_snd_card_manager_get_card(ms_snd_card_manager_get(),devid);
        if (sndcard!=NULL && (ms_snd_card_get_capabilities(sndcard) & MS_SND_CARD_CAP_PLAYBACK)) return TRUE;
        return FALSE;
}

int linphone_core_set_ringer_device(LinphoneCore *lc, const char * devid){
        MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_PLAYBACK);
        lc->sound_conf.ring_sndcard=card;
        if (card && lc->ready)
                lp_config_set_string(lc->config,"sound","ringer_dev_id",ms_snd_card_get_string_id(card));
        return 0;
}

int linphone_core_set_playback_device(LinphoneCore *lc, const char * devid){
        MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_PLAYBACK);
        lc->sound_conf.play_sndcard=card;
        if (card && lc->ready)
                lp_config_set_string(lc->config,"sound","playback_dev_id",ms_snd_card_get_string_id(card));
        return 0;
}

int linphone_core_set_capture_device(LinphoneCore *lc, const char * devid){
        MSSndCard *card=get_card_from_string_id(devid,MS_SND_CARD_CAP_CAPTURE);
        lc->sound_conf.capt_sndcard=card;
        if (card && lc->ready)
                lp_config_set_string(lc->config,"sound","capture_dev_id",ms_snd_card_get_string_id(card));
        return 0;
}

const char * linphone_core_get_ringer_device(LinphoneCore *lc)
{
        if (lc->sound_conf.ring_sndcard) return ms_snd_card_get_string_id(lc->sound_conf.ring_sndcard);
        return NULL;
}

const char * linphone_core_get_playback_device(LinphoneCore *lc)
{
        return lc->sound_conf.play_sndcard ? ms_snd_card_get_string_id(lc->sound_conf.play_sndcard) : NULL;
}

const char * linphone_core_get_capture_device(LinphoneCore *lc)
{
        return lc->sound_conf.capt_sndcard ? ms_snd_card_get_string_id(lc->sound_conf.capt_sndcard) : NULL;
}

/* returns a static array of string describing the sound devices */ 
const char**  linphone_core_get_sound_devices(LinphoneCore *lc){
        build_sound_devices_table(lc);
        return lc->sound_conf.cards;
}

const char**  linphone_core_get_video_devices(const LinphoneCore *lc){
        return lc->video_conf.cams;
}

char linphone_core_get_sound_source(LinphoneCore *lc)
{
        return lc->sound_conf.source;
}

void linphone_core_set_sound_source(LinphoneCore *lc, char source)
{
        MSSndCard *sndcard=lc->sound_conf.capt_sndcard;
        lc->sound_conf.source=source;
        if (!sndcard) return;
        switch(source){
                case 'm':
                        ms_snd_card_set_capture(sndcard,MS_SND_CARD_MIC);
                        break;
                case 'l':
                        ms_snd_card_set_capture(sndcard,MS_SND_CARD_LINE);
                        break;
        }
        
}

void linphone_core_set_ring(LinphoneCore *lc,const char *path){
        if (lc->sound_conf.local_ring!=0){
                ms_free(lc->sound_conf.local_ring);
        }
        lc->sound_conf.local_ring=ms_strdup(path);
        if (lc->ready && lc->sound_conf.local_ring)
                lp_config_set_string(lc->config,"sound","local_ring",lc->sound_conf.local_ring);
}

const char *linphone_core_get_ring(const LinphoneCore *lc){
        return lc->sound_conf.local_ring;
}

static void notify_end_of_ring(void *ud ,unsigned int event, void * arg){
        LinphoneCore *lc=(LinphoneCore*)ud;
        lc->preview_finished=1;
}

int linphone_core_preview_ring(LinphoneCore *lc, const char *ring,LinphoneCoreCbFunc func,void * userdata)
{
        if (lc->ringstream!=0){
                ms_warning("Cannot start ring now,there's already a ring being played");
                return -1;
        }
        lc_callback_obj_init(&lc->preview_finished_cb,func,userdata);
        lc->preview_finished=0;
        if (lc->sound_conf.ring_sndcard!=NULL){
                lc->ringstream=ring_start_with_cb(ring,2000,lc->sound_conf.ring_sndcard,notify_end_of_ring,(void *)lc);
        }
        return 0;
}


void linphone_core_set_ringback(LinphoneCore *lc, const char *path){
        if (lc->sound_conf.remote_ring!=0){
                ms_free(lc->sound_conf.remote_ring);
        }
        lc->sound_conf.remote_ring=ms_strdup(path);
}

const char * linphone_core_get_ringback(const LinphoneCore *lc){
        return lc->sound_conf.remote_ring;
}

void linphone_core_enable_echo_cancellation(LinphoneCore *lc, bool_t val){
        lc->sound_conf.ec=val;
        if (lc->ready)
                lp_config_set_int(lc->config,"sound","echocancellation",val);
}

bool_t linphone_core_echo_cancellation_enabled(LinphoneCore *lc){
        return lc->sound_conf.ec;
}

void linphone_core_enable_echo_limiter(LinphoneCore *lc, bool_t val){
        lc->sound_conf.ea=val;
}

bool_t linphone_core_echo_limiter_enabled(const LinphoneCore *lc){
        return lc->sound_conf.ea;
}

void linphone_core_mute_mic(LinphoneCore *lc, bool_t val){
        if (lc->audiostream!=NULL){
                 audio_stream_set_mic_gain(lc->audiostream,
                        (val==TRUE) ? 0 : 1.0);
        }
}

void linphone_core_enable_agc(LinphoneCore *lc, bool_t val){
        lc->sound_conf.agc=val;
}

bool_t linphone_core_agc_enabled(const LinphoneCore *lc){
        return lc->sound_conf.agc;
}


void linphone_core_send_dtmf(LinphoneCore *lc,char dtmf)
{
        /*By default we send DTMF RFC2833 if we do not have enabled SIP_INFO but we can also send RFC2833 and SIP_INFO*/
        if (linphone_core_get_use_rfc2833_for_dtmf(lc)!=0 || linphone_core_get_use_info_for_dtmf(lc)==0)
        {
                /* In Band DTMF */
                if (lc->audiostream!=NULL){
                        audio_stream_send_dtmf(lc->audiostream,dtmf);
                }
                else
                {
                        ms_error("we cannot send RFC2833 dtmf when we are not in communication");
                }
        }
        if (linphone_core_get_use_info_for_dtmf(lc)!=0)
        {
                char dtmf_body[1000];
                char clen[10];
                osip_message_t *msg=NULL;
                /* Out of Band DTMF (use INFO method) */
                LinphoneCall *call=lc->call;
                if (call==NULL){
                        return;
                }
                eXosip_call_build_info(call->did,&msg);
                snprintf(dtmf_body, 999, "Signal=%c\r\nDuration=250\r\n", dtmf);
                osip_message_set_body(msg,dtmf_body,strlen(dtmf_body));
                osip_message_set_content_type(msg,"application/dtmf-relay");
                snprintf(clen,sizeof(clen),"%lu",(unsigned long)strlen(dtmf_body));
                osip_message_set_content_length(msg,clen);
                
                eXosip_lock();
                eXosip_call_send_request(call->did,msg);
                eXosip_unlock();
        }
}

void linphone_core_set_stun_server(LinphoneCore *lc, const char *server){
        if (lc->net_conf.stun_server!=NULL)
                ms_free(lc->net_conf.stun_server);
        if (server)
                lc->net_conf.stun_server=ms_strdup(server);
        else lc->net_conf.stun_server=NULL;
        lc->apply_nat_settings=TRUE;
}

const char * linphone_core_get_stun_server(const LinphoneCore *lc){
        return lc->net_conf.stun_server;
}

const char * linphone_core_get_relay_addr(const LinphoneCore *lc){
        return lc->net_conf.relay;
}

int linphone_core_set_relay_addr(LinphoneCore *lc, const char *addr){
        if (lc->net_conf.relay!=NULL){
                ms_free(lc->net_conf.relay);
                lc->net_conf.relay=NULL;
        }
        if (addr){
                lc->net_conf.relay=ms_strdup(addr);
        }
        return 0;
}

static void apply_nat_settings(LinphoneCore *lc){
        char *wmsg;
        char *tmp=NULL;
        int err;
        struct addrinfo hints,*res;
        const char *addr=lc->net_conf.nat_address;
        
        if (lc->net_conf.firewall_policy==LINPHONE_POLICY_USE_NAT_ADDRESS){
                if (addr==NULL || strlen(addr)==0){
                        lc->vtable.display_warning(lc,_("No nat/firewall address supplied !"));
                        linphone_core_set_firewall_policy(lc,LINPHONE_POLICY_NO_FIREWALL);
                }
                /*check the ip address given */
                memset(&hints,0,sizeof(struct addrinfo));
                if (lc->sip_conf.ipv6_enabled)
                        hints.ai_family=AF_INET6;
                else 
                        hints.ai_family=AF_INET;
                hints.ai_socktype = SOCK_DGRAM;
                err=getaddrinfo(addr,NULL,&hints,&res);
                if (err!=0){
                        wmsg=ortp_strdup_printf(_("Invalid nat address '%s' : %s"),
                                addr, gai_strerror(err));
                        ms_warning(wmsg); // what is this for ?
                        lc->vtable.display_warning(lc, wmsg);
                        ms_free(wmsg);
                        linphone_core_set_firewall_policy(lc,LINPHONE_POLICY_NO_FIREWALL);
                        return;
                }
                /*now get it as an numeric ip address */
                tmp=ms_malloc0(50);
                err=getnameinfo(res->ai_addr,res->ai_addrlen,tmp,50,NULL,0,NI_NUMERICHOST);
                if (err!=0){
                        wmsg=ortp_strdup_printf(_("Invalid nat address '%s' : %s"),
                                addr, gai_strerror(err));
                        ms_warning(wmsg); // what is this for ?
                        lc->vtable.display_warning(lc, wmsg);
                        ms_free(wmsg);
                        ms_free(tmp);
                        freeaddrinfo(res);
                        linphone_core_set_firewall_policy(lc,LINPHONE_POLICY_NO_FIREWALL);
                        return;
                }
                freeaddrinfo(res);
        }

        if (lc->net_conf.firewall_policy==LINPHONE_POLICY_USE_NAT_ADDRESS){
                if (tmp!=NULL){
                        if (!lc->net_conf.nat_sdp_only){
                                eXosip_set_option(EXOSIP_OPT_SET_IPV4_FOR_GATEWAY,tmp);
                                /* the following does not work in all cases */
                                /*
                                eXosip_masquerade_contact(tmp,lc->sip_conf.sip_port);
                                */
                        }
                        ms_free(tmp);
                }
                else{
                        eXosip_set_option(EXOSIP_OPT_SET_IPV4_FOR_GATEWAY,NULL);
                        eXosip_masquerade_contact("",0);
                }
        }
        else {
                eXosip_set_option(EXOSIP_OPT_SET_IPV4_FOR_GATEWAY,NULL);
                eXosip_masquerade_contact("",0);        
        }
}


void linphone_core_set_nat_address(LinphoneCore *lc, const char *addr)
{
        if (lc->net_conf.nat_address!=NULL){
                ms_free(lc->net_conf.nat_address);
        }
        if (addr!=NULL) lc->net_conf.nat_address=ms_strdup(addr);
        else lc->net_conf.nat_address=NULL;
        lc->apply_nat_settings=TRUE;
}

const char *linphone_core_get_nat_address(const LinphoneCore *lc)
{
        return lc->net_conf.nat_address;
}

void linphone_core_set_firewall_policy(LinphoneCore *lc, LinphoneFirewallPolicy pol){
        lc->net_conf.firewall_policy=pol;
        lc->apply_nat_settings=TRUE;
}

LinphoneFirewallPolicy linphone_core_get_firewall_policy(const LinphoneCore *lc){
        return lc->net_conf.firewall_policy;
}

const MSList * linphone_core_get_call_logs(LinphoneCore *lc){
        lc->missed_calls=0;
        return lc->call_logs;
}

void linphone_core_clear_call_logs(LinphoneCore *lc){
        lc->missed_calls=0;
        ms_list_for_each(lc->call_logs,(void (*)(void*))linphone_call_log_destroy);
        lc->call_logs=ms_list_free(lc->call_logs);
}

static void toggle_video_preview(LinphoneCore *lc, bool_t val){
#ifdef VIDEO_ENABLED
        if (lc->videostream==NULL){
                if (val){
                        if (lc->previewstream==NULL){
                                lc->previewstream=video_preview_start(lc->video_conf.device,
                                                        lc->video_conf.vsize);
                        }
                }else{
                        if (lc->previewstream!=NULL){
                                video_preview_stop(lc->previewstream);
                                lc->previewstream=NULL;
                        }
                }
        }
#endif
}

void linphone_core_enable_video(LinphoneCore *lc, bool_t vcap_enabled, bool_t display_enabled){
#ifndef VIDEO_ENABLED
        if (vcap_enabled || display_enabled)
                ms_warning("This version of linphone was built without video support.");
#endif
        lc->video_conf.capture=vcap_enabled;
        lc->video_conf.display=display_enabled;

        if (lc->ready){
                lp_config_set_int(lc->config,"video","display",display_enabled);
                lp_config_set_int(lc->config,"video","capture",vcap_enabled);
        }

        /* need to re-apply network bandwidth settings*/
        linphone_core_set_download_bandwidth(lc,
                linphone_core_get_download_bandwidth(lc));
        linphone_core_set_upload_bandwidth(lc,
                linphone_core_get_upload_bandwidth(lc));
}

bool_t linphone_core_video_enabled(LinphoneCore *lc){
        return (lc->video_conf.display || lc->video_conf.capture);
}

void linphone_core_enable_video_preview(LinphoneCore *lc, bool_t val){
        lc->video_conf.show_local=val;
        if (lc->ready) lp_config_set_int(lc->config,"video","show_local",val);
}

bool_t linphone_core_video_preview_enabled(const LinphoneCore *lc){
        return lc->video_conf.show_local;
}

void linphone_core_enable_self_view(LinphoneCore *lc, bool_t val){
        lc->video_conf.selfview=val;
#ifdef VIDEO_ENABLED
        if (lc->videostream){
                video_stream_enable_self_view(lc->videostream,val);
        }
#endif
}

bool_t linphone_core_self_view_enabled(const LinphoneCore *lc){
        return lc->video_conf.selfview;
}

int linphone_core_set_video_device(LinphoneCore *lc, const char *id){
        MSWebCam *olddev=lc->video_conf.device;
        const char *vd;
        if (id!=NULL){
                lc->video_conf.device=ms_web_cam_manager_get_cam(ms_web_cam_manager_get(),id);
                if (lc->video_conf.device==NULL){
                        ms_warning("Could not found video device %s",id);
                }
        }
        if (lc->video_conf.device==NULL)
                lc->video_conf.device=ms_web_cam_manager_get_default_cam(ms_web_cam_manager_get());
        if (olddev!=NULL && olddev!=lc->video_conf.device){
                toggle_video_preview(lc,FALSE);/*restart the video local preview*/
        }
        if (lc->ready && lc->video_conf.device){
                vd=ms_web_cam_get_string_id(lc->video_conf.device);
                if (vd && strstr(vd,"Static picture")!=NULL){
                        vd=NULL;
                }
                lp_config_set_string(lc->config,"video","device",vd);
        }
        return 0;
}

const char *linphone_core_get_video_device(const LinphoneCore *lc){
        if (lc->video_conf.device) return ms_web_cam_get_string_id(lc->video_conf.device);
        return NULL;
}

unsigned long linphone_core_get_native_video_window_id(const LinphoneCore *lc){
#ifdef VIDEO_ENABLED
        if (lc->videostream)
                return video_stream_get_native_window_id(lc->videostream);
        if (lc->previewstream)
                return video_stream_get_native_window_id(lc->previewstream);
#endif
        return 0;
}

static MSVideoSizeDef supported_resolutions[]={
        {       MS_VIDEO_SIZE_SVGA      ,       "svga"  },
        {       MS_VIDEO_SIZE_4CIF      ,       "4cif"  },
        {       MS_VIDEO_SIZE_VGA       ,       "vga"   },
        {       MS_VIDEO_SIZE_CIF       ,       "cif"   },
        {       MS_VIDEO_SIZE_QVGA      ,       "qvga"  },
        {       MS_VIDEO_SIZE_QCIF      ,       "qcif"  },
        {       {0,0}                   ,       NULL    }
};

const MSVideoSizeDef *linphone_core_get_supported_video_sizes(LinphoneCore *lc){
        return supported_resolutions;
}

static MSVideoSize video_size_get_by_name(const char *name){
        MSVideoSizeDef *pdef=supported_resolutions;
        for(;pdef->name!=NULL;pdef++){
                if (strcasecmp(name,pdef->name)==0){
                        return pdef->vsize;
                }
        }
        ms_warning("Video resolution %s is not supported in linphone.",name);
        return (MSVideoSize){0,0};
}

const char *video_size_get_name(MSVideoSize vsize){
        MSVideoSizeDef *pdef=supported_resolutions;
        for(;pdef->name!=NULL;pdef++){
                if (pdef->vsize.width==vsize.width && pdef->vsize.height==vsize.height){
                        return pdef->name;
                }
        }
        return NULL;
}

static bool_t video_size_supported(MSVideoSize vsize){
        if (video_size_get_name(vsize)) return TRUE;
        ms_warning("Video resolution %ix%i is not supported in linphone.",vsize.width,vsize.height);
        return FALSE;
}


void linphone_core_set_preferred_video_size(LinphoneCore *lc, MSVideoSize vsize){
        if (video_size_supported(vsize)){
                MSVideoSize oldvsize=lc->video_conf.vsize;
                lc->video_conf.vsize=vsize;
                if (!ms_video_size_equal(oldvsize,vsize) && lc->previewstream!=NULL){
                        toggle_video_preview(lc,FALSE);
                        toggle_video_preview(lc,TRUE);
                }
                if (lc->ready)
                        lp_config_set_string(lc->config,"video","size",video_size_get_name(vsize));
        }
}

void linphone_core_set_preferred_video_size_by_name(LinphoneCore *lc, const char *name){
        MSVideoSize vsize=video_size_get_by_name(name);
        if (vsize.width!=0)     linphone_core_set_preferred_video_size(lc,vsize);
        else linphone_core_set_preferred_video_size(lc,MS_VIDEO_SIZE_CIF);
}

MSVideoSize linphone_core_get_preferred_video_size(LinphoneCore *lc){
        return lc->video_conf.vsize;
}

void linphone_core_use_files(LinphoneCore *lc, bool_t yesno){
        lc->use_files=yesno;
}

void linphone_core_set_play_file(LinphoneCore *lc, const char *file){
        if (lc->play_file!=NULL){
                ms_free(lc->play_file);
                lc->play_file=NULL;
        }
        if (file!=NULL) {
                lc->play_file=ms_strdup(file);
                if (lc->audiostream)
                        audio_stream_play(lc->audiostream,file);
        }
}

void linphone_core_set_record_file(LinphoneCore *lc, const char *file){
        if (lc->rec_file!=NULL){
                ms_free(lc->rec_file);
                lc->rec_file=NULL;
        }
        if (file!=NULL) {
                lc->rec_file=ms_strdup(file);
                if (lc->audiostream) 
                        audio_stream_record(lc->audiostream,file);
        }
}


void *linphone_core_get_user_data(LinphoneCore *lc){
        return lc->data;
}

int linphone_core_get_mtu(const LinphoneCore *lc){
        return lc->net_conf.mtu;
}

void linphone_core_set_mtu(LinphoneCore *lc, int mtu){
        lc->net_conf.mtu=mtu;
        if (mtu>0){
                if (mtu<500){
                        ms_error("MTU too small !");
                        mtu=500;
                }
                ms_set_mtu(mtu);
                ms_message("MTU is supposed to be %i, rtp payload max size will be %i",mtu, ms_get_payload_max_size());
        }else ms_set_mtu(0);//use mediastreamer2 default value
}

void linphone_core_set_waiting_callback(LinphoneCore *lc, LinphoneWaitingCallback cb, void *user_context){
        lc->wait_cb=cb;
        lc->wait_ctx=user_context;
}

void linphone_core_start_waiting(LinphoneCore *lc, const char *purpose){
        if (lc->wait_cb){
                lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingStart,purpose,0);
        }
}

void linphone_core_update_progress(LinphoneCore *lc, const char *purpose, float progress){
        if (lc->wait_cb){
                lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingProgress,purpose,progress);
        }else{
#ifdef WIN32
                Sleep(50000);
#else
                usleep(50000);
#endif
        }
}

void linphone_core_stop_waiting(LinphoneCore *lc){
        if (lc->wait_cb){
                lc->wait_ctx=lc->wait_cb(lc,lc->wait_ctx,LinphoneWaitingFinished,NULL,0);
        }
}

void linphone_core_set_audio_transports(LinphoneCore *lc, RtpTransport *rtp, RtpTransport *rtcp){
        lc->a_rtp=rtp;
        lc->a_rtcp=rtcp;
}

void net_config_uninit(LinphoneCore *lc)
{
        net_config_t *config=&lc->net_conf;
        lp_config_set_int(lc->config,"net","download_bw",config->download_bw);
        lp_config_set_int(lc->config,"net","upload_bw",config->upload_bw);
        
        if (config->stun_server!=NULL)
                lp_config_set_string(lc->config,"net","stun_server",config->stun_server);
        if (config->nat_address!=NULL)
                lp_config_set_string(lc->config,"net","nat_address",config->nat_address);
        lp_config_set_int(lc->config,"net","firewall_policy",config->firewall_policy);
        lp_config_set_int(lc->config,"net","mtu",config->mtu);
        if (lc->net_conf.stun_server!=NULL)
                ms_free(lc->net_conf.stun_server);
}


void sip_config_uninit(LinphoneCore *lc)
{
        MSList *elem;
        int i;
        sip_config_t *config=&lc->sip_conf;
        lp_config_set_int(lc->config,"sip","sip_port",config->sip_port);
        lp_config_set_int(lc->config,"sip","guess_hostname",config->guess_hostname);
        lp_config_set_string(lc->config,"sip","contact",config->contact);
        lp_config_set_int(lc->config,"sip","inc_timeout",config->inc_timeout);
        lp_config_set_int(lc->config,"sip","use_info",config->use_info);
        lp_config_set_int(lc->config,"sip","use_rfc2833",config->use_rfc2833);
        lp_config_set_int(lc->config,"sip","use_ipv6",config->ipv6_enabled);
        lp_config_set_int(lc->config,"sip","register_only_when_network_is_up",config->register_only_when_network_is_up);
        for(elem=config->proxies,i=0;elem!=NULL;elem=ms_list_next(elem),i++){
                LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)(elem->data);
                linphone_proxy_config_write_to_config_file(lc->config,cfg,i);
                linphone_proxy_config_edit(cfg);        /* to unregister */
        }

        if (exosip_running)
          {
            int i;
            for (i=0;i<20;i++)
              {
                eXosip_event_t *ev;
                while((ev=eXosip_event_wait(0,0))!=NULL){
                  linphone_core_process_event(lc,ev);
                }
                eXosip_automatic_action();
#ifndef WIN32
                usleep(100000);
#else
        Sleep(100);
#endif
              }
          }
        
        linphone_proxy_config_write_to_config_file(lc->config,NULL,i);  /*mark the end */
        
        for(elem=lc->auth_info,i=0;elem!=NULL;elem=ms_list_next(elem),i++){
                LinphoneAuthInfo *ai=(LinphoneAuthInfo*)(elem->data);
                linphone_auth_info_write_config(lc->config,ai,i);
        }
        linphone_auth_info_write_config(lc->config,NULL,i); /* mark the end */
}

void rtp_config_uninit(LinphoneCore *lc)
{
        rtp_config_t *config=&lc->rtp_conf;
        lp_config_set_int(lc->config,"rtp","audio_rtp_port",config->audio_rtp_port);
        lp_config_set_int(lc->config,"rtp","video_rtp_port",config->video_rtp_port);
        lp_config_set_int(lc->config,"rtp","audio_jitt_comp",config->audio_jitt_comp);
        lp_config_set_int(lc->config,"rtp","video_jitt_comp",config->audio_jitt_comp);
        lp_config_set_int(lc->config,"rtp","nortp_timeout",config->nortp_timeout);
}

void sound_config_uninit(LinphoneCore *lc)
{
        sound_config_t *config=&lc->sound_conf;
        ms_free(config->cards);
        
        lp_config_set_string(lc->config,"sound","remote_ring",config->remote_ring);
        
        if (config->local_ring) ms_free(config->local_ring);
        if (config->remote_ring) ms_free(config->remote_ring);
        ms_snd_card_manager_destroy();
}

void video_config_uninit(LinphoneCore *lc)
{
                
}

void codecs_config_uninit(LinphoneCore *lc)
{
        PayloadType *pt;
        codecs_config_t *config=&lc->codecs_conf;
        MSList *node;
        char key[50];
        int index;
        index=0;
        for(node=config->audio_codecs;node!=NULL;node=ms_list_next(node)){
                pt=(PayloadType*)(node->data);
                sprintf(key,"audio_codec_%i",index);
                lp_config_set_string(lc->config,key,"mime",pt->mime_type);
                lp_config_set_int(lc->config,key,"rate",pt->clock_rate);
                lp_config_set_int(lc->config,key,"enabled",payload_type_enabled(pt));
                index++;
        }
        index=0;
        for(node=config->video_codecs;node!=NULL;node=ms_list_next(node)){
                pt=(PayloadType*)(node->data);
                sprintf(key,"video_codec_%i",index);
                lp_config_set_string(lc->config,key,"mime",pt->mime_type);
                lp_config_set_int(lc->config,key,"rate",pt->clock_rate);
                lp_config_set_int(lc->config,key,"enabled",payload_type_enabled(pt));
                lp_config_set_string(lc->config,key,"recv_fmtp",pt->recv_fmtp);
                index++;
        }
        if (lc->local_profile){
                rtp_profile_destroy(lc->local_profile);
                lc->local_profile=NULL;
        }
}

void ui_config_uninit(LinphoneCore* lc)
{
        if (lc->friends){
                ms_list_for_each(lc->friends,(void (*)(void *))linphone_friend_destroy);
                ms_list_free(lc->friends);
                lc->friends=NULL;
        }
}

LpConfig *linphone_core_get_config(LinphoneCore *lc){
        return lc->config;
}

static void linphone_core_uninit(LinphoneCore *lc)
{
        if (lc->call){
                int i;
                linphone_core_terminate_call(lc,NULL);
                for(i=0;i<10;++i){
#ifndef WIN32
                        usleep(50000);
#else
                        Sleep(50);
#endif
                        linphone_core_iterate(lc);
                }
        }
        gstate_new_state(lc, GSTATE_POWER_SHUTDOWN, NULL);
#ifdef VIDEO_ENABLED
        if (lc->previewstream!=NULL){
                video_preview_stop(lc->previewstream);
                lc->previewstream=NULL;
        }
#endif
        /* save all config */
        net_config_uninit(lc);
        sip_config_uninit(lc);
        lp_config_set_int(lc->config,"sip","default_proxy",linphone_core_get_default_proxy(lc,NULL));
        rtp_config_uninit(lc);
        sound_config_uninit(lc);
        video_config_uninit(lc);
        codecs_config_uninit(lc);
        ui_config_uninit(lc);
        if (lp_config_needs_commit(lc->config)) lp_config_sync(lc->config);
        lp_config_destroy(lc->config);
        sip_setup_unregister_all();

        linphone_core_free_payload_types();
        
        ortp_exit();
        eXosip_quit();
        exosip_running=FALSE;
        gstate_new_state(lc, GSTATE_POWER_OFF, NULL);
}

void linphone_core_destroy(LinphoneCore *lc){
        linphone_core_uninit(lc);
        ms_free(lc);
}

LinphoneAddress * linphone_address_new(const char *uri){
        osip_from_t *from;
        osip_from_init(&from);
        if (osip_from_parse(from,uri)!=0){
                osip_from_free(from);
                return NULL;
        }
        return from;
}

LinphoneAddress * linphone_address_clone(const LinphoneAddress *uri){
        osip_from_t *ret=NULL;
        osip_from_clone(uri,&ret);
        return ret;
}

#define null_if_empty(s) (((s)!=NULL && (s)[0]!='\0') ? (s) : NULL )

const char *linphone_address_get_scheme(const LinphoneAddress *u){
        return null_if_empty(u->url->scheme);
}

const char *linphone_address_get_display_name(const LinphoneAddress* u){
        return null_if_empty(u->displayname);
}

const char *linphone_address_get_username(const LinphoneAddress *u){
        return null_if_empty(u->url->username);
}

const char *linphone_address_get_domain(const LinphoneAddress *u){
        return null_if_empty(u->url->host);
}

void linphone_address_set_display_name(LinphoneAddress *u, const char *display_name){
        if (u->displayname!=NULL){
                osip_free(u->displayname);
                u->displayname=NULL;
        }
        if (display_name!=NULL)
                u->displayname=osip_strdup(display_name);
}

void linphone_address_set_username(LinphoneAddress *uri, const char *username){
        if (uri->url->username!=NULL){
                osip_free(uri->url->username);
                uri->url->username=NULL;
        }
        if (username)
                uri->url->username=osip_strdup(username);
}

void linphone_address_set_domain(LinphoneAddress *uri, const char *host){
        if (uri->url->host!=NULL){
                osip_free(uri->url->host);
                uri->url->host=NULL;
        }
        if (host)
                uri->url->host=osip_strdup(host);
}

void linphone_address_set_port(LinphoneAddress *uri, const char *port){
        if (uri->url->port!=NULL){
                osip_free(uri->url->port);
                uri->url->port=NULL;
        }
        if (port)
                uri->url->port=osip_strdup(port);
}

void linphone_address_set_port_int(LinphoneAddress *uri, int port){
        char tmp[12];
        if (port==5060){
                /*this is the default, special case to leave the port field blank*/
                linphone_address_set_port(uri,NULL);
                return;
        }
        snprintf(tmp,sizeof(tmp),"%i",port);
        linphone_address_set_port(uri,tmp);
}

void linphone_address_clean(LinphoneAddress *uri){
        osip_generic_param_freelist(&uri->gen_params);
}

char *linphone_address_as_string(const LinphoneAddress *u){
        char *tmp,*ret;
        osip_from_to_str(u,&tmp);
        ret=ms_strdup(tmp);
        osip_free(tmp);
        return ret;
}

char *linphone_address_as_string_uri_only(const LinphoneAddress *u){
        char *tmp=NULL,*ret;
        osip_uri_to_str(u->url,&tmp);
        ret=ms_strdup(tmp);
        osip_free(tmp);
        return ret;
}

void linphone_address_destroy(LinphoneAddress *u){
        osip_from_free(u);
}