sjero.net Git - linphone/blob - coreapi/linphonecall.c

   1
   2 /*
   3 linphone
   4 Copyright (C) 2010  Belledonne Communications SARL
   5  (simon.morlat@linphone.org)
   6
   7 This program is free software; you can redistribute it and/or
   8 modify it under the terms of the GNU General Public License
   9 as published by the Free Software Foundation; either version 2
  10 of the License, or (at your option) any later version.
  11
  12 This program is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program; if not, write to the Free Software
  19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20 */
  21 #ifdef WIN32
  22 #include <time.h>
  23 #endif
  24 #include "linphonecore.h"
  25 #include "sipsetup.h"
  26 #include "lpconfig.h"
  27 #include "private.h"
  28 #include <ortp/event.h>
  29 #include <ortp/b64.h>
  30
  31
  32 #include "mediastreamer2/mediastream.h"
  33 #include "mediastreamer2/msvolume.h"
  34 #include "mediastreamer2/msequalizer.h"
  35 #include "mediastreamer2/msfileplayer.h"
  36 #include "mediastreamer2/msjpegwriter.h"
  37 #include "mediastreamer2/mseventqueue.h"
  38
  39 #ifdef VIDEO_ENABLED
  40 static MSWebCam *get_nowebcam_device(){
  41         return ms_web_cam_manager_get_cam(ms_web_cam_manager_get(),"StaticImage: Static picture");
  42 }
  43 #endif
  44
  45 static bool_t generate_b64_crypto_key(int key_length, char* key_out) {
  46         int b64_size;
  47         uint8_t* tmp = (uint8_t*) malloc(key_length);
  48         if (ortp_crypto_get_random(tmp, key_length)!=0) {
  49                 ms_error("Failed to generate random key");
  50                 free(tmp);
  51                 return FALSE;
  52         }
  53
  54         b64_size = b64_encode((const char*)tmp, key_length, NULL, 0);
  55         if (b64_size == 0) {
  56                 ms_error("Failed to b64 encode key");
  57                 free(tmp);
  58                 return FALSE;
  59         }
  60         key_out[b64_size] = '\0';
  61         b64_encode((const char*)tmp, key_length, key_out, 40);
  62         free(tmp);
  63         return TRUE;
  64 }
  65
  66 LinphoneCore *linphone_call_get_core(const LinphoneCall *call){
  67         return call->core;
  68 }
  69
  70 const char* linphone_call_get_authentication_token(LinphoneCall *call){
  71         return call->auth_token;
  72 }
  73
  74 bool_t linphone_call_get_authentication_token_verified(LinphoneCall *call){
  75         return call->auth_token_verified;
  76 }
  77
  78 static bool_t linphone_call_are_all_streams_encrypted(LinphoneCall *call) {
  79         // Check ZRTP encryption in audiostream
  80         if (!call->audiostream_encrypted) {
  81                 return FALSE;
  82         }
  83
  84 #ifdef VIDEO_ENABLED
  85         // If video enabled, check ZRTP encryption in videostream
  86         const LinphoneCallParams *params=linphone_call_get_current_params(call);
  87         if (params->has_video && !call->videostream_encrypted) {
  88                 return FALSE;
  89         }
  90 #endif
  91
  92         return TRUE;
  93 }
  94
  95 void propagate_encryption_changed(LinphoneCall *call){
  96         LinphoneCore *lc=call->core;
  97         if (!linphone_call_are_all_streams_encrypted(call)) {
  98                 ms_message("Some streams are not encrypted");
  99                 call->current_params.media_encryption=LinphoneMediaEncryptionNone;
 100                 if (lc->vtable.call_encryption_changed)
 101                         lc->vtable.call_encryption_changed(call->core, call, FALSE, call->auth_token);
 102         } else {
 103                 ms_message("All streams are encrypted");
 104                 call->current_params.media_encryption=LinphoneMediaEncryptionZRTP;
 105                 if (lc->vtable.call_encryption_changed)
 106                         lc->vtable.call_encryption_changed(call->core, call, TRUE, call->auth_token);
 107         }
 108 }
 109
 110 #ifdef VIDEO_ENABLED
 111 static void linphone_call_videostream_encryption_changed(void *data, bool_t encrypted){
 112         ms_message("Video stream is %s", encrypted ? "encrypted" : "not encrypted");
 113
 114         LinphoneCall *call = (LinphoneCall *)data;
 115         call->videostream_encrypted=encrypted;
 116         propagate_encryption_changed(call);
 117 }
 118 #endif
 119
 120 static void linphone_call_audiostream_encryption_changed(void *data, bool_t encrypted) {
 121         char status[255]={0};
 122         ms_message("Audio stream is %s ", encrypted ? "encrypted" : "not encrypted");
 123
 124         LinphoneCall *call = (LinphoneCall *)data;
 125         call->audiostream_encrypted=encrypted;
 126
 127         if (encrypted && call->core->vtable.display_status != NULL) {
 128                 snprintf(status,sizeof(status)-1,_("Authentication token is %s"),call->auth_token);
 129                  call->core->vtable.display_status(call->core, status);
 130         }
 131
 132         propagate_encryption_changed(call);
 133
 134
 135 #ifdef VIDEO_ENABLED
 136         // Enable video encryption
 137         const LinphoneCallParams *params=linphone_call_get_current_params(call);
 138         if (params->has_video) {
 139                 ms_message("Trying to enable encryption on video stream");
 140                 OrtpZrtpParams params;
 141                 params.zid_file=NULL; //unused
 142                 video_stream_enable_zrtp(call->videostream,call->audiostream,&params);
 143         }
 144 #endif
 145 }
 146
 147
 148 static void linphone_call_audiostream_auth_token_ready(void *data, const char* auth_token, bool_t verified) {
 149         LinphoneCall *call=(LinphoneCall *)data;
 150         if (call->auth_token != NULL)
 151                 ms_free(call->auth_token);
 152
 153         call->auth_token=ms_strdup(auth_token);
 154         call->auth_token_verified=verified;
 155
 156         ms_message("Authentication token is %s (%s)", auth_token, verified?"verified":"unverified");
 157 }
 158
 159 void linphone_call_set_authentication_token_verified(LinphoneCall *call, bool_t verified){
 160         if (call->audiostream==NULL){
 161                 ms_error("linphone_call_set_authentication_token_verified(): No audio stream");
 162         }
 163         if (call->audiostream->ortpZrtpContext==NULL){
 164                 ms_error("linphone_call_set_authentication_token_verified(): No zrtp context.");
 165         }
 166         if (!call->auth_token_verified && verified){
 167                 ortp_zrtp_sas_verified(call->audiostream->ortpZrtpContext);
 168         }else if (call->auth_token_verified && !verified){
 169                 ortp_zrtp_sas_reset_verified(call->audiostream->ortpZrtpContext);
 170         }
 171         call->auth_token_verified=verified;
 172         propagate_encryption_changed(call);
 173 }
 174
 175 static MSList *make_codec_list(LinphoneCore *lc, const MSList *codecs, int bandwidth_limit){
 176         MSList *l=NULL;
 177         const MSList *it;
 178         for(it=codecs;it!=NULL;it=it->next){
 179                 PayloadType *pt=(PayloadType*)it->data;
 180                 if (pt->flags & PAYLOAD_TYPE_ENABLED){
 181                         if (bandwidth_limit>0 && !linphone_core_is_payload_type_usable_for_bandwidth(lc,pt,bandwidth_limit)){
 182                                 ms_message("Codec %s/%i eliminated because of audio bandwidth constraint.",pt->mime_type,pt->clock_rate);
 183                                 continue;
 184                         }
 185                         if (linphone_core_check_payload_type_usability(lc,pt)){
 186                                 l=ms_list_append(l,payload_type_clone(pt));
 187                         }
 188                 }
 189         }
 190         return l;
 191 }
 192
 193 static SalMediaDescription *_create_local_media_description(LinphoneCore *lc, LinphoneCall *call, unsigned int session_id, unsigned int session_ver){
 194         MSList *l;
 195         PayloadType *pt;
 196         int i;
 197         const char *me=linphone_core_get_identity(lc);
 198         LinphoneAddress *addr=linphone_address_new(me);
 199         const char *username=linphone_address_get_username (addr);
 200         SalMediaDescription *md=sal_media_description_new();
 201
 202         md->session_id=session_id;
 203         md->session_ver=session_ver;
 204         md->nstreams=1;
 205         strncpy(md->addr,call->localip,sizeof(md->addr));
 206         strncpy(md->username,username,sizeof(md->username));
 207         md->bandwidth=linphone_core_get_download_bandwidth(lc);
 208
 209         /*set audio capabilities */
 210         strncpy(md->streams[0].addr,call->localip,sizeof(md->streams[0].addr));
 211         md->streams[0].port=call->audio_port;
 212         md->streams[0].proto=(call->params.media_encryption == LinphoneMediaEncryptionSRTP) ?
 213                 SalProtoRtpSavp : SalProtoRtpAvp;
 214         md->streams[0].type=SalAudio;
 215         md->streams[0].ptime=lc->net_conf.down_ptime;
 216         l=make_codec_list(lc,lc->codecs_conf.audio_codecs,call->params.audio_bw);
 217         pt=payload_type_clone(rtp_profile_get_payload_from_mime(&av_profile,"telephone-event"));
 218         l=ms_list_append(l,pt);
 219         md->streams[0].payloads=l;
 220
 221
 222         if (call->params.has_video){
 223                 md->nstreams++;
 224                 md->streams[1].port=call->video_port;
 225                 md->streams[1].proto=md->streams[0].proto;
 226                 md->streams[1].type=SalVideo;
 227                 l=make_codec_list(lc,lc->codecs_conf.video_codecs,0);
 228                 md->streams[1].payloads=l;
 229         }
 230
 231         for(i=0; i<md->nstreams; i++) {
 232                 if (md->streams[i].proto == SalProtoRtpSavp) {
 233                         md->streams[i].crypto[0].tag = 1;
 234                         md->streams[i].crypto[0].algo = AES_128_SHA1_80;
 235                         if (!generate_b64_crypto_key(30, md->streams[i].crypto[0].master_key))
 236                                 md->streams[i].crypto[0].algo = 0;
 237                         md->streams[i].crypto[1].tag = 2;
 238                         md->streams[i].crypto[1].algo = AES_128_SHA1_32;
 239                         if (!generate_b64_crypto_key(30, md->streams[i].crypto[1].master_key))
 240                                 md->streams[i].crypto[1].algo = 0;
 241                         md->streams[i].crypto[2].algo = 0;
 242                 }
 243         }
 244
 245         linphone_address_destroy(addr);
 246         return md;
 247 }
 248
 249 void update_local_media_description(LinphoneCore *lc, LinphoneCall *call){
 250         SalMediaDescription *md=call->localdesc;
 251         if (md== NULL) {
 252                 call->localdesc = create_local_media_description(lc,call);
 253         } else {
 254                 call->localdesc = _create_local_media_description(lc,call,md->session_id,md->session_ver+1);
 255                 sal_media_description_unref(md);
 256         }
 257 }
 258
 259 SalMediaDescription *create_local_media_description(LinphoneCore *lc, LinphoneCall *call){
 260         unsigned int id=rand() & 0xfff;
 261         return _create_local_media_description(lc,call,id,id);
 262 }
 263
 264 static int find_port_offset(LinphoneCore *lc){
 265         int offset;
 266         MSList *elem;
 267         int audio_port;
 268         bool_t already_used=FALSE;
 269         for(offset=0;offset<100;offset+=2){
 270                 audio_port=linphone_core_get_audio_port (lc)+offset;
 271                 already_used=FALSE;
 272                 for(elem=lc->calls;elem!=NULL;elem=elem->next){
 273                         LinphoneCall *call=(LinphoneCall*)elem->data;
 274                         if (call->audio_port==audio_port) {
 275                                 already_used=TRUE;
 276                                 break;
 277                         }
 278                 }
 279                 if (!already_used) break;
 280         }
 281         if (offset==100){
 282                 ms_error("Could not find any free port !");
 283                 return -1;
 284         }
 285         return offset;
 286 }
 287
 288 static void linphone_call_init_common(LinphoneCall *call, LinphoneAddress *from, LinphoneAddress *to){
 289         int port_offset;
 290         call->refcnt=1;
 291         call->state=LinphoneCallIdle;
 292         call->start_time=time(NULL);
 293         call->media_start_time=0;
 294         call->log=linphone_call_log_new(call, from, to);
 295         call->owns_call_log=TRUE;
 296         linphone_core_notify_all_friends(call->core,LinphoneStatusOnThePhone);
 297         port_offset=find_port_offset (call->core);
 298         if (port_offset==-1) return;
 299         call->audio_port=linphone_core_get_audio_port(call->core)+port_offset;
 300         call->video_port=linphone_core_get_video_port(call->core)+port_offset;
 301
 302 }
 303
 304 static void discover_mtu(LinphoneCore *lc, const char *remote){
 305         int mtu;
 306         if (lc->net_conf.mtu==0 ){
 307                 /*attempt to discover mtu*/
 308                 mtu=ms_discover_mtu(remote);
 309                 if (mtu>0){
 310                         ms_set_mtu(mtu);
 311                         ms_message("Discovered mtu is %i, RTP payload max size is %i",
 312                                 mtu, ms_get_payload_max_size());
 313                 }
 314         }
 315 }
 316
 317 LinphoneCall * linphone_call_new_outgoing(struct _LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to, const LinphoneCallParams *params)
 318 {
 319         LinphoneCall *call=ms_new0(LinphoneCall,1);
 320         call->dir=LinphoneCallOutgoing;
 321         call->op=sal_op_new(lc->sal);
 322         sal_op_set_user_pointer(call->op,call);
 323         call->core=lc;
 324         linphone_core_get_local_ip(lc,linphone_address_get_domain(to),call->localip);
 325         linphone_call_init_common(call,from,to);
 326         call->params=*params;
 327         call->localdesc=create_local_media_description (lc,call);
 328         call->camera_active=params->has_video;
 329         if (linphone_core_get_firewall_policy(call->core)==LinphonePolicyUseStun)
 330                 linphone_core_run_stun_tests(call->core,call);
 331         discover_mtu(lc,linphone_address_get_domain (to));
 332         if (params->referer){
 333                 sal_call_set_referer(call->op,params->referer->op);
 334         }
 335         return call;
 336 }
 337
 338 LinphoneCall * linphone_call_new_incoming(LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to, SalOp *op){
 339         LinphoneCall *call=ms_new0(LinphoneCall,1);
 340         char *from_str;
 341
 342         call->dir=LinphoneCallIncoming;
 343         sal_op_set_user_pointer(op,call);
 344         call->op=op;
 345         call->core=lc;
 346
 347         if (lc->sip_conf.ping_with_options){
 348                 /*the following sends an option request back to the caller so that
 349                  we get a chance to discover our nat'd address before answering.*/
 350                 call->ping_op=sal_op_new(lc->sal);
 351                 from_str=linphone_address_as_string_uri_only(from);
 352                 sal_op_set_route(call->ping_op,sal_op_get_network_origin(op));
 353                 sal_op_set_user_pointer(call->ping_op,call);
 354                 sal_ping(call->ping_op,linphone_core_find_best_identity(lc,from,NULL),from_str);
 355                 ms_free(from_str);
 356         }
 357
 358         linphone_address_clean(from);
 359         linphone_core_get_local_ip(lc,linphone_address_get_domain(from),call->localip);
 360         linphone_call_init_common(call, from, to);
 361         linphone_core_init_default_params(lc, &call->params);
 362         call->params.has_video &= !!lc->video_policy.automatically_accept;
 363         call->localdesc=create_local_media_description (lc,call);
 364         call->camera_active=call->params.has_video;
 365         if (linphone_core_get_firewall_policy(call->core)==LinphonePolicyUseStun)
 366                 linphone_core_run_stun_tests(call->core,call);
 367         discover_mtu(lc,linphone_address_get_domain(from));
 368         return call;
 369 }
 370
 371 /* this function is called internally to get rid of a call.
 372  It performs the following tasks:
 373  - remove the call from the internal list of calls
 374  - update the call logs accordingly
 375 */
 376
 377 static void linphone_call_set_terminated(LinphoneCall *call){
 378         LinphoneCore *lc=call->core;
 379
 380         linphone_core_update_allocated_audio_bandwidth(lc);
 381
 382         call->owns_call_log=FALSE;
 383         linphone_call_log_completed(call);
 384
 385
 386         if (call == lc->current_call){
 387                 ms_message("Resetting the current call");
 388                 lc->current_call=NULL;
 389         }
 390
 391         if (linphone_core_del_call(lc,call) != 0){
 392                 ms_error("Could not remove the call from the list !!!");
 393         }
 394
 395         if (ms_list_size(lc->calls)==0)
 396                 linphone_core_notify_all_friends(lc,lc->presence_mode);
 397
 398         linphone_core_conference_check_uninit(lc);
 399         if (call->ringing_beep){
 400                 linphone_core_stop_dtmf(lc);
 401                 call->ringing_beep=FALSE;
 402         }
 403 }
 404
 405 void linphone_call_fix_call_parameters(LinphoneCall *call){
 406         call->params.has_video=call->current_params.has_video;
 407         call->params.media_encryption=call->current_params.media_encryption;
 408 }
 409
 410 const char *linphone_call_state_to_string(LinphoneCallState cs){
 411         switch (cs){
 412                 case LinphoneCallIdle:
 413                         return "LinphoneCallIdle";
 414                 case LinphoneCallIncomingReceived:
 415                         return "LinphoneCallIncomingReceived";
 416                 case LinphoneCallOutgoingInit:
 417                         return "LinphoneCallOutgoingInit";
 418                 case LinphoneCallOutgoingProgress:
 419                         return "LinphoneCallOutgoingProgress";
 420                 case LinphoneCallOutgoingRinging:
 421                         return "LinphoneCallOutgoingRinging";
 422                 case LinphoneCallOutgoingEarlyMedia:
 423                         return "LinphoneCallOutgoingEarlyMedia";
 424                 case LinphoneCallConnected:
 425                         return "LinphoneCallConnected";
 426                 case LinphoneCallStreamsRunning:
 427                         return "LinphoneCallStreamsRunning";
 428                 case LinphoneCallPausing:
 429                         return "LinphoneCallPausing";
 430                 case LinphoneCallPaused:
 431                         return "LinphoneCallPaused";
 432                 case LinphoneCallResuming:
 433                         return "LinphoneCallResuming";
 434                 case LinphoneCallRefered:
 435                         return "LinphoneCallRefered";
 436                 case LinphoneCallError:
 437                         return "LinphoneCallError";
 438                 case LinphoneCallEnd:
 439                         return "LinphoneCallEnd";
 440                 case LinphoneCallPausedByRemote:
 441                         return "LinphoneCallPausedByRemote";
 442                 case LinphoneCallUpdatedByRemote:
 443                         return "LinphoneCallUpdatedByRemote";
 444                 case LinphoneCallIncomingEarlyMedia:
 445                         return "LinphoneCallIncomingEarlyMedia";
 446                 case LinphoneCallUpdated:
 447                         return "LinphoneCallUpdated";
 448                 case LinphoneCallReleased:
 449                         return "LinphoneCallReleased";
 450         }
 451         return "undefined state";
 452 }
 453
 454 void linphone_call_set_state(LinphoneCall *call, LinphoneCallState cstate, const char *message){
 455         LinphoneCore *lc=call->core;
 456
 457         if (call->state!=cstate){
 458                 if (call->state==LinphoneCallEnd || call->state==LinphoneCallError){
 459                         if (cstate!=LinphoneCallReleased){
 460                                 ms_warning("Spurious call state change from %s to %s, ignored.",linphone_call_state_to_string(call->state),
 461                                    linphone_call_state_to_string(cstate));
 462                                 return;
 463                         }
 464                 }
 465                 ms_message("Call %p: moving from state %s to %s",call,linphone_call_state_to_string(call->state),
 466                            linphone_call_state_to_string(cstate));
 467                 if (cstate!=LinphoneCallRefered){
 468                         /*LinphoneCallRefered is rather an event, not a state.
 469                          Indeed it does not change the state of the call (still paused or running)*/
 470                         call->state=cstate;
 471                 }
 472                 if (cstate==LinphoneCallEnd || cstate==LinphoneCallError){
 473              if (call->reason==LinphoneReasonDeclined){
 474                                 call->log->status=LinphoneCallDeclined;
 475                         }
 476                         linphone_call_set_terminated (call);
 477                 }
 478                 if (cstate == LinphoneCallConnected) {
 479                         call->log->status=LinphoneCallSuccess;
 480                         call->media_start_time=time(NULL);
 481                 }
 482
 483                 if (lc->vtable.call_state_changed)
 484                         lc->vtable.call_state_changed(lc,call,cstate,message);
 485                 if (cstate==LinphoneCallReleased){
 486                         if (call->op!=NULL) {
 487                                 /* so that we cannot have anymore upcalls for SAL
 488                                  concerning this call*/
 489                                 sal_op_release(call->op);
 490                                 call->op=NULL;
 491                         }
 492                         linphone_call_unref(call);
 493                 }
 494         }
 495 }
 496
 497 static void linphone_call_destroy(LinphoneCall *obj)
 498 {
 499         if (obj->op!=NULL) {
 500                 sal_op_release(obj->op);
 501                 obj->op=NULL;
 502         }
 503         if (obj->resultdesc!=NULL) {
 504                 sal_media_description_unref(obj->resultdesc);
 505                 obj->resultdesc=NULL;
 506         }
 507         if (obj->localdesc!=NULL) {
 508                 sal_media_description_unref(obj->localdesc);
 509                 obj->localdesc=NULL;
 510         }
 511         if (obj->ping_op) {
 512                 sal_op_release(obj->ping_op);
 513         }
 514         if (obj->refer_to){
 515                 ms_free(obj->refer_to);
 516         }
 517         if (obj->owns_call_log)
 518                 linphone_call_log_destroy(obj->log);
 519         if (obj->auth_token) {
 520                 ms_free(obj->auth_token);
 521         }
 522
 523         ms_free(obj);
 524 }
 525
 526 /**
 527  * @addtogroup call_control
 528  * @{
 529 **/
 530
 531 /**
 532  * Increments the call 's reference count.
 533  * An application that wishes to retain a pointer to call object
 534  * must use this function to unsure the pointer remains
 535  * valid. Once the application no more needs this pointer,
 536  * it must call linphone_call_unref().
 537 **/
 538 LinphoneCall * linphone_call_ref(LinphoneCall *obj){
 539         obj->refcnt++;
 540         return obj;
 541 }
 542
 543 /**
 544  * Decrements the call object reference count.
 545  * See linphone_call_ref().
 546 **/
 547 void linphone_call_unref(LinphoneCall *obj){
 548         obj->refcnt--;
 549         if (obj->refcnt==0){
 550                 linphone_call_destroy(obj);
 551         }
 552 }
 553
 554 /**
 555  * Returns current parameters associated to the call.
 556 **/
 557 const LinphoneCallParams * linphone_call_get_current_params(const LinphoneCall *call){
 558         return &call->current_params;
 559 }
 560
 561 static bool_t is_video_active(const SalStreamDescription *sd){
 562         return sd->port!=0 && sd->dir!=SalStreamInactive;
 563 }
 564
 565 /**
 566  * Returns call parameters proposed by remote.
 567  *
 568  * This is useful when receiving an incoming call, to know whether the remote party
 569  * supports video, encryption or whatever.
 570 **/
 571 const LinphoneCallParams * linphone_call_get_remote_params(LinphoneCall *call){
 572         LinphoneCallParams *cp=&call->remote_params;
 573         memset(cp,0,sizeof(*cp));
 574         if (call->op){
 575                 SalMediaDescription *md=sal_call_get_remote_media_description(call->op);
 576                 if (md){
 577                         SalStreamDescription *asd,*vsd,*secure_asd,*secure_vsd;
 578
 579                         asd=sal_media_description_find_stream(md,SalProtoRtpAvp,SalAudio);
 580                         vsd=sal_media_description_find_stream(md,SalProtoRtpAvp,SalVideo);
 581                         secure_asd=sal_media_description_find_stream(md,SalProtoRtpSavp,SalAudio);
 582                         secure_vsd=sal_media_description_find_stream(md,SalProtoRtpSavp,SalVideo);
 583                         if (secure_vsd){
 584                                 cp->has_video=is_video_active(secure_vsd);
 585                                 if (secure_asd || asd==NULL)
 586                                         cp->media_encryption=LinphoneMediaEncryptionSRTP;
 587                         }else if (vsd){
 588                                 cp->has_video=is_video_active(vsd);
 589                         }
 590                         return cp;
 591                 }
 592         }
 593         return NULL;
 594 }
 595
 596 /**
 597  * Returns the remote address associated to this call
 598  *
 599 **/
 600 const LinphoneAddress * linphone_call_get_remote_address(const LinphoneCall *call){
 601         return call->dir==LinphoneCallIncoming ? call->log->from : call->log->to;
 602 }
 603
 604 /**
 605  * Returns the remote address associated to this call as a string.
 606  *
 607  * The result string must be freed by user using ms_free().
 608 **/
 609 char *linphone_call_get_remote_address_as_string(const LinphoneCall *call){
 610         return linphone_address_as_string(linphone_call_get_remote_address(call));
 611 }
 612
 613 /**
 614  * Retrieves the call's current state.
 615 **/
 616 LinphoneCallState linphone_call_get_state(const LinphoneCall *call){
 617         return call->state;
 618 }
 619
 620 /**
 621  * Returns the reason for a call termination (either error or normal termination)
 622 **/
 623 LinphoneReason linphone_call_get_reason(const LinphoneCall *call){
 624         return call->reason;
 625 }
 626
 627 /**
 628  * Get the user_pointer in the LinphoneCall
 629  *
 630  * @ingroup call_control
 631  *
 632  * return user_pointer an opaque user pointer that can be retrieved at any time
 633 **/
 634 void *linphone_call_get_user_pointer(LinphoneCall *call)
 635 {
 636         return call->user_pointer;
 637 }
 638
 639 /**
 640  * Set the user_pointer in the LinphoneCall
 641  *
 642  * @ingroup call_control
 643  *
 644  * the user_pointer is an opaque user pointer that can be retrieved at any time in the LinphoneCall
 645 **/
 646 void linphone_call_set_user_pointer(LinphoneCall *call, void *user_pointer)
 647 {
 648         call->user_pointer = user_pointer;
 649 }
 650
 651 /**
 652  * Returns the call log associated to this call.
 653 **/
 654 LinphoneCallLog *linphone_call_get_call_log(const LinphoneCall *call){
 655         return call->log;
 656 }
 657
 658 /**
 659  * Returns the refer-to uri (if the call was transfered).
 660 **/
 661 const char *linphone_call_get_refer_to(const LinphoneCall *call){
 662         return call->refer_to;
 663 }
 664
 665 /**
 666  * Returns direction of the call (incoming or outgoing).
 667 **/
 668 LinphoneCallDir linphone_call_get_dir(const LinphoneCall *call){
 669         return call->log->dir;
 670 }
 671
 672 /**
 673  * Returns the far end's user agent description string, if available.
 674 **/
 675 const char *linphone_call_get_remote_user_agent(LinphoneCall *call){
 676         if (call->op){
 677                 return sal_op_get_remote_ua (call->op);
 678         }
 679         return NULL;
 680 }
 681
 682 /**
 683  * Returns true if this calls has received a transfer that has not been
 684  * executed yet.
 685  * Pending transfers are executed when this call is being paused or closed,
 686  * locally or by remote endpoint.
 687  * If the call is already paused while receiving the transfer request, the
 688  * transfer immediately occurs.
 689 **/
 690 bool_t linphone_call_has_transfer_pending(const LinphoneCall *call){
 691         return call->refer_pending;
 692 }
 693
 694 /**
 695  * Returns call's duration in seconds.
 696 **/
 697 int linphone_call_get_duration(const LinphoneCall *call){
 698         if (call->media_start_time==0) return 0;
 699         return time(NULL)-call->media_start_time;
 700 }
 701
 702 /**
 703  * Returns the call object this call is replacing, if any.
 704  * Call replacement can occur during call transfers.
 705  * By default, the core automatically terminates the replaced call and accept the new one.
 706  * This function allows the application to know whether a new incoming call is a one that replaces another one.
 707 **/
 708 LinphoneCall *linphone_call_get_replaced_call(LinphoneCall *call){
 709         SalOp *op=sal_call_get_replaces(call->op);
 710         if (op){
 711                 return (LinphoneCall*)sal_op_get_user_pointer(op);
 712         }
 713         return NULL;
 714 }
 715
 716 /**
 717  * Indicate whether camera input should be sent to remote end.
 718 **/
 719 void linphone_call_enable_camera (LinphoneCall *call, bool_t enable){
 720 #ifdef VIDEO_ENABLED
 721         if (call->videostream!=NULL && call->videostream->ticker!=NULL){
 722                 LinphoneCore *lc=call->core;
 723                 MSWebCam *nowebcam=get_nowebcam_device();
 724                 if (call->camera_active!=enable && lc->video_conf.device!=nowebcam){
 725                         video_stream_change_camera(call->videostream,
 726                                      enable ? lc->video_conf.device : nowebcam);
 727                 }
 728         }
 729         call->camera_active=enable;
 730 #endif
 731 }
 732
 733 /**
 734  * Take a photo of currently received video and write it into a jpeg file.
 735 **/
 736 int linphone_call_take_video_snapshot(LinphoneCall *call, const char *file){
 737 #ifdef VIDEO_ENABLED
 738         if (call->videostream!=NULL && call->videostream->jpegwriter!=NULL){
 739                 return ms_filter_call_method(call->videostream->jpegwriter,MS_JPEG_WRITER_TAKE_SNAPSHOT,(void*)file);
 740         }
 741         ms_warning("Cannot take snapshot: no currently running video stream on this call.");
 742         return -1;
 743 #endif
 744         return -1;
 745 }
 746
 747 /**
 748  * Returns TRUE if camera pictures are sent to the remote party.
 749 **/
 750 bool_t linphone_call_camera_enabled (const LinphoneCall *call){
 751         return call->camera_active;
 752 }
 753
 754 /**
 755  * Enable video stream.
 756 **/
 757 void linphone_call_params_enable_video(LinphoneCallParams *cp, bool_t enabled){
 758         cp->has_video=enabled;
 759 }
 760
 761 /**
 762  * Returns whether video is enabled.
 763 **/
 764 bool_t linphone_call_params_video_enabled(const LinphoneCallParams *cp){
 765         return cp->has_video;
 766 }
 767
 768 enum LinphoneMediaEncryption linphone_call_params_get_media_encryption(const LinphoneCallParams *cp) {
 769         return cp->media_encryption;
 770 }
 771
 772 void linphone_call_params_set_media_encryption(LinphoneCallParams *cp, enum LinphoneMediaEncryption e) {
 773         cp->media_encryption = e;
 774 }
 775
 776
 777 /**
 778  * Enable sending of real early media (during outgoing calls).
 779 **/
 780 void linphone_call_params_enable_early_media_sending(LinphoneCallParams *cp, bool_t enabled){
 781         cp->real_early_media=enabled;
 782 }
 783
 784 bool_t linphone_call_params_early_media_sending_enabled(const LinphoneCallParams *cp){
 785         return cp->real_early_media;
 786 }
 787
 788 /**
 789  * Returns true if the call is part of the locally managed conference.
 790 **/
 791 bool_t linphone_call_params_local_conference_mode(const LinphoneCallParams *cp){
 792         return cp->in_conference;
 793 }
 794
 795 /**
 796  * Refine bandwidth settings for this call by setting a bandwidth limit for audio streams.
 797  * As a consequence, codecs whose bitrates are not compatible with this limit won't be used.
 798 **/
 799 void linphone_call_params_set_audio_bandwidth_limit(LinphoneCallParams *cp, int bandwidth){
 800         cp->audio_bw=bandwidth;
 801 }
 802
 803 #ifdef VIDEO_ENABLED
 804 /**
 805  * Request remote side to send us a Video Fast Update.
 806 **/
 807 void linphone_call_send_vfu_request(LinphoneCall *call)
 808 {
 809         if (LinphoneCallStreamsRunning == linphone_call_get_state(call))
 810                 sal_call_send_vfu_request(call->op);
 811 }
 812 #endif
 813
 814 /**
 815  *
 816 **/
 817 LinphoneCallParams * linphone_call_params_copy(const LinphoneCallParams *cp){
 818         LinphoneCallParams *ncp=ms_new0(LinphoneCallParams,1);
 819         memcpy(ncp,cp,sizeof(LinphoneCallParams));
 820         return ncp;
 821 }
 822
 823 /**
 824  *
 825 **/
 826 void linphone_call_params_destroy(LinphoneCallParams *p){
 827         ms_free(p);
 828 }
 829
 830 /**
 831  * @}
 832 **/
 833
 834
 835 #ifdef TEST_EXT_RENDERER
 836 static void rendercb(void *data, const MSPicture *local, const MSPicture *remote){
 837         ms_message("rendercb, local buffer=%p, remote buffer=%p",
 838                    local ? local->planes[0] : NULL, remote? remote->planes[0] : NULL);
 839 }
 840 #endif
 841
 842 #ifdef VIDEO_ENABLED
 843 static void video_stream_event_cb(void *user_pointer, const MSFilter *f, const unsigned int event_id, const void *args){
 844         ms_warning("In linphonecall.c: video_stream_event_cb");
 845         switch (event_id) {
 846                 case MS_VIDEO_DECODER_DECODING_ERRORS:
 847                         ms_warning("Case is MS_VIDEO_DECODER_DECODING_ERRORS");
 848                         linphone_call_send_vfu_request((LinphoneCall*) user_pointer);
 849                         break;
 850                 default:
 851                         ms_warning("Unhandled event %i", event_id);
 852                         break;
 853         }
 854 }
 855 #endif
 856
 857 void linphone_call_init_media_streams(LinphoneCall *call){
 858         LinphoneCore *lc=call->core;
 859         SalMediaDescription *md=call->localdesc;
 860         AudioStream *audiostream;
 861
 862         call->audiostream=audiostream=audio_stream_new(md->streams[0].port,linphone_core_ipv6_enabled(lc));
 863         if (linphone_core_echo_limiter_enabled(lc)){
 864                 const char *type=lp_config_get_string(lc->config,"sound","el_type","mic");
 865                 if (strcasecmp(type,"mic")==0)
 866                         audio_stream_enable_echo_limiter(audiostream,ELControlMic);
 867                 else if (strcasecmp(type,"full")==0)
 868                         audio_stream_enable_echo_limiter(audiostream,ELControlFull);
 869         }
 870         audio_stream_enable_gain_control(audiostream,TRUE);
 871         if (linphone_core_echo_cancellation_enabled(lc)){
 872                 int len,delay,framesize;
 873                 const char *statestr=lp_config_get_string(lc->config,"sound","ec_state",NULL);
 874                 len=lp_config_get_int(lc->config,"sound","ec_tail_len",0);
 875                 delay=lp_config_get_int(lc->config,"sound","ec_delay",0);
 876                 framesize=lp_config_get_int(lc->config,"sound","ec_framesize",0);
 877                 audio_stream_set_echo_canceller_params(audiostream,len,delay,framesize);
 878                 if (statestr && audiostream->ec){
 879                         ms_filter_call_method(audiostream->ec,MS_ECHO_CANCELLER_SET_STATE_STRING,(void*)statestr);
 880                 }
 881         }
 882         audio_stream_enable_automatic_gain_control(audiostream,linphone_core_agc_enabled(lc));
 883         {
 884                 int enabled=lp_config_get_int(lc->config,"sound","noisegate",0);
 885                 audio_stream_enable_noise_gate(audiostream,enabled);
 886         }
 887
 888         if (lc->rtptf){
 889                 RtpTransport *artp=lc->rtptf->audio_rtp_func(lc->rtptf->audio_rtp_func_data, call->audio_port);
 890                 RtpTransport *artcp=lc->rtptf->audio_rtcp_func(lc->rtptf->audio_rtcp_func_data, call->audio_port+1);
 891                 rtp_session_set_transports(audiostream->session,artp,artcp);
 892         }
 893
 894         call->audiostream_app_evq = ortp_ev_queue_new();
 895         rtp_session_register_event_queue(audiostream->session,call->audiostream_app_evq);
 896
 897 #ifdef VIDEO_ENABLED
 898
 899         if ((lc->video_conf.display || lc->video_conf.capture) && md->streams[1].port>0){
 900                 call->videostream=video_stream_new(md->streams[1].port,linphone_core_ipv6_enabled(lc));
 901         if( lc->video_conf.displaytype != NULL)
 902                 video_stream_set_display_filter_name(call->videostream,lc->video_conf.displaytype);
 903         video_stream_set_event_callback(call->videostream,video_stream_event_cb, call);
 904         if (lc->rtptf){
 905                 RtpTransport *vrtp=lc->rtptf->video_rtp_func(lc->rtptf->video_rtp_func_data, call->video_port);
 906                 RtpTransport *vrtcp=lc->rtptf->video_rtcp_func(lc->rtptf->video_rtcp_func_data, call->video_port+1);
 907                 rtp_session_set_transports(call->videostream->session,vrtp,vrtcp);
 908         }
 909         call->videostream_app_evq = ortp_ev_queue_new();
 910         rtp_session_register_event_queue(call->videostream->session,call->videostream_app_evq);
 911 #ifdef TEST_EXT_RENDERER
 912                 video_stream_set_render_callback(call->videostream,rendercb,NULL);
 913 #endif
 914         }
 915 #else
 916         call->videostream=NULL;
 917 #endif
 918 }
 919
 920
 921 static int dtmf_tab[16]={'0','1','2','3','4','5','6','7','8','9','*','#','A','B','C','D'};
 922
 923 static void linphone_core_dtmf_received(RtpSession* s, int dtmf, void* user_data){
 924         LinphoneCore* lc = (LinphoneCore*)user_data;
 925         if (dtmf<0 || dtmf>15){
 926                 ms_warning("Bad dtmf value %i",dtmf);
 927                 return;
 928         }
 929         if (lc->vtable.dtmf_received != NULL)
 930                 lc->vtable.dtmf_received(lc, linphone_core_get_current_call(lc), dtmf_tab[dtmf]);
 931 }
 932
 933 static void parametrize_equalizer(LinphoneCore *lc, AudioStream *st){
 934         if (st->equalizer){
 935                 MSFilter *f=st->equalizer;
 936                 int enabled=lp_config_get_int(lc->config,"sound","eq_active",0);
 937                 const char *gains=lp_config_get_string(lc->config,"sound","eq_gains",NULL);
 938                 ms_filter_call_method(f,MS_EQUALIZER_SET_ACTIVE,&enabled);
 939                 if (enabled){
 940                         if (gains){
 941                                 do{
 942                                         int bytes;
 943                                         MSEqualizerGain g;
 944                                         if (sscanf(gains,"%f:%f:%f %n",&g.frequency,&g.gain,&g.width,&bytes)==3){
 945                                                 ms_message("Read equalizer gains: %f(~%f) --> %f",g.frequency,g.width,g.gain);
 946                                                 ms_filter_call_method(f,MS_EQUALIZER_SET_GAIN,&g);
 947                                                 gains+=bytes;
 948                                         }else break;
 949                                 }while(1);
 950                         }
 951                 }
 952         }
 953 }
 954
 955 void _post_configure_audio_stream(AudioStream *st, LinphoneCore *lc, bool_t muted){
 956         float mic_gain=lp_config_get_float(lc->config,"sound","mic_gain",1);
 957         float thres = 0;
 958         float recv_gain;
 959         float ng_thres=lp_config_get_float(lc->config,"sound","ng_thres",0.05);
 960         float ng_floorgain=lp_config_get_float(lc->config,"sound","ng_floorgain",0);
 961         int dc_removal=lp_config_get_int(lc->config,"sound","dc_removal",0);
 962
 963         if (!muted)
 964                 audio_stream_set_mic_gain(st,mic_gain);
 965         else
 966                 audio_stream_set_mic_gain(st,0);
 967
 968         recv_gain = lc->sound_conf.soft_play_lev;
 969         if (recv_gain != 0) {
 970                 linphone_core_set_playback_gain_db (lc,recv_gain);
 971         }
 972
 973         if (st->volsend){
 974                 ms_filter_call_method(st->volsend,MS_VOLUME_REMOVE_DC,&dc_removal);
 975                 float speed=lp_config_get_float(lc->config,"sound","el_speed",-1);
 976                 thres=lp_config_get_float(lc->config,"sound","el_thres",-1);
 977                 float force=lp_config_get_float(lc->config,"sound","el_force",-1);
 978                 int sustain=lp_config_get_int(lc->config,"sound","el_sustain",-1);
 979                 float transmit_thres=lp_config_get_float(lc->config,"sound","el_transmit_thres",-1);
 980                 MSFilter *f=NULL;
 981                 f=st->volsend;
 982                 if (speed==-1) speed=0.03;
 983                 if (force==-1) force=25;
 984                 ms_filter_call_method(f,MS_VOLUME_SET_EA_SPEED,&speed);
 985                 ms_filter_call_method(f,MS_VOLUME_SET_EA_FORCE,&force);
 986                 if (thres!=-1)
 987                         ms_filter_call_method(f,MS_VOLUME_SET_EA_THRESHOLD,&thres);
 988                 if (sustain!=-1)
 989                         ms_filter_call_method(f,MS_VOLUME_SET_EA_SUSTAIN,&sustain);
 990                 if (transmit_thres!=-1)
 991                                 ms_filter_call_method(f,MS_VOLUME_SET_EA_TRANSMIT_THRESHOLD,&transmit_thres);
 992
 993                 ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_THRESHOLD,&ng_thres);
 994                 ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_FLOORGAIN,&ng_floorgain);
 995         }
 996         if (st->volrecv){
 997                 /* parameters for a limited noise-gate effect, using echo limiter threshold */
 998                 float floorgain = 1/mic_gain;
 999                 int spk_agc=lp_config_get_int(lc->config,"sound","speaker_agc_enabled",0);
1000                 ms_filter_call_method(st->volrecv, MS_VOLUME_ENABLE_AGC, &spk_agc);
1001                 ms_filter_call_method(st->volrecv,MS_VOLUME_SET_NOISE_GATE_THRESHOLD,&ng_thres);
1002                 ms_filter_call_method(st->volrecv,MS_VOLUME_SET_NOISE_GATE_FLOORGAIN,&floorgain);
1003         }
1004         parametrize_equalizer(lc,st);
1005 }
1006
1007 static void post_configure_audio_streams(LinphoneCall*call){
1008         AudioStream *st=call->audiostream;
1009         LinphoneCore *lc=call->core;
1010         _post_configure_audio_stream(st,lc,call->audio_muted);
1011         if (lc->vtable.dtmf_received!=NULL){
1012                 /* replace by our default action*/
1013                 audio_stream_play_received_dtmfs(call->audiostream,FALSE);
1014                 rtp_session_signal_connect(call->audiostream->session,"telephone-event",(RtpCallback)linphone_core_dtmf_received,(unsigned long)lc);
1015         }
1016 }
1017
1018 static RtpProfile *make_profile(LinphoneCall *call, const SalMediaDescription *md, const SalStreamDescription *desc, int *used_pt){
1019         int bw;
1020         const MSList *elem;
1021         RtpProfile *prof=rtp_profile_new("Call profile");
1022         bool_t first=TRUE;
1023         int remote_bw=0;
1024         LinphoneCore *lc=call->core;
1025         int up_ptime=0;
1026         *used_pt=-1;
1027
1028         for(elem=desc->payloads;elem!=NULL;elem=elem->next){
1029                 PayloadType *pt=(PayloadType*)elem->data;
1030                 int number;
1031
1032                 if ((pt->flags & PAYLOAD_TYPE_FLAG_CAN_SEND) && first) {
1033                         if (desc->type==SalAudio){
1034                                 linphone_core_update_allocated_audio_bandwidth_in_call(call,pt);
1035                                 up_ptime=linphone_core_get_upload_ptime(lc);
1036                         }
1037                         *used_pt=payload_type_get_number(pt);
1038                         first=FALSE;
1039                 }
1040                 if (desc->bandwidth>0) remote_bw=desc->bandwidth;
1041                 else if (md->bandwidth>0) {
1042                         /*case where b=AS is given globally, not per stream*/
1043                         remote_bw=md->bandwidth;
1044                         if (desc->type==SalVideo){
1045                                 remote_bw=get_video_bandwidth(remote_bw,call->audio_bw);
1046                         }
1047                 }
1048
1049                 if (desc->type==SalAudio){
1050                                 bw=get_min_bandwidth(call->audio_bw,remote_bw);
1051                 }else bw=get_min_bandwidth(get_video_bandwidth(linphone_core_get_upload_bandwidth (lc),call->audio_bw),remote_bw);
1052                 if (bw>0) pt->normal_bitrate=bw*1000;
1053                 else if (desc->type==SalAudio){
1054                         pt->normal_bitrate=-1;
1055                 }
1056                 if (desc->ptime>0){
1057                         up_ptime=desc->ptime;
1058                 }
1059                 if (up_ptime>0){
1060                         char tmp[40];
1061                         snprintf(tmp,sizeof(tmp),"ptime=%i",up_ptime);
1062                         payload_type_append_send_fmtp(pt,tmp);
1063                 }
1064                 number=payload_type_get_number(pt);
1065                 if (rtp_profile_get_payload(prof,number)!=NULL){
1066                         ms_warning("A payload type with number %i already exists in profile !",number);
1067                 }else
1068                         rtp_profile_set_payload(prof,number,pt);
1069         }
1070         return prof;
1071 }
1072
1073
1074 static void setup_ring_player(LinphoneCore *lc, LinphoneCall *call){
1075         int pause_time=3000;
1076         audio_stream_play(call->audiostream,lc->sound_conf.ringback_tone);
1077         ms_filter_call_method(call->audiostream->soundread,MS_FILE_PLAYER_LOOP,&pause_time);
1078 }
1079
1080 #define LINPHONE_RTCP_SDES_TOOL "Linphone-" LINPHONE_VERSION
1081
1082 static bool_t linphone_call_sound_resources_available(LinphoneCall *call){
1083         LinphoneCore *lc=call->core;
1084         LinphoneCall *current=linphone_core_get_current_call(lc);
1085         return !linphone_core_is_in_conference(lc) &&
1086                 (current==NULL || current==call);
1087 }
1088 static int find_crypto_index_from_tag(const SalSrtpCryptoAlgo crypto[],unsigned char tag) {
1089     int i;
1090     for(i=0; i<SAL_CRYPTO_ALGO_MAX; i++) {
1091         if (crypto[i].tag == tag) {
1092             return i;
1093         }
1094     }
1095     return -1;
1096 }
1097 static void linphone_call_start_audio_stream(LinphoneCall *call, const char *cname, bool_t muted, bool_t send_ringbacktone, bool_t use_arc){
1098         LinphoneCore *lc=call->core;
1099         int jitt_comp=lc->rtp_conf.audio_jitt_comp;
1100         int used_pt=-1;
1101         /* look for savp stream first */
1102         const SalStreamDescription *stream=sal_media_description_find_stream(call->resultdesc,
1103                                                 SalProtoRtpSavp,SalAudio);
1104         /* no savp audio stream, use avp */
1105         if (!stream)
1106                 stream=sal_media_description_find_stream(call->resultdesc,
1107                                                 SalProtoRtpAvp,SalAudio);
1108
1109         if (stream && stream->dir!=SalStreamInactive && stream->port!=0){
1110                 MSSndCard *playcard=lc->sound_conf.lsd_card ?
1111                         lc->sound_conf.lsd_card : lc->sound_conf.play_sndcard;
1112                 MSSndCard *captcard=lc->sound_conf.capt_sndcard;
1113                 const char *playfile=lc->play_file;
1114                 const char *recfile=lc->rec_file;
1115                 call->audio_profile=make_profile(call,call->resultdesc,stream,&used_pt);
1116                 bool_t use_ec;
1117
1118                 if (used_pt!=-1){
1119                         if (playcard==NULL) {
1120                                 ms_warning("No card defined for playback !");
1121                         }
1122                         if (captcard==NULL) {
1123                                 ms_warning("No card defined for capture !");
1124                         }
1125                         /*Replace soundcard filters by inactive file players or recorders
1126                          when placed in recvonly or sendonly mode*/
1127                         if (stream->port==0 || stream->dir==SalStreamRecvOnly){
1128                                 captcard=NULL;
1129                                 playfile=NULL;
1130                         }else if (stream->dir==SalStreamSendOnly){
1131                                 playcard=NULL;
1132                                 captcard=NULL;
1133                                 recfile=NULL;
1134                                 /*And we will eventually play "playfile" if set by the user*/
1135                                 /*playfile=NULL;*/
1136                         }
1137                         if (send_ringbacktone){
1138                                 captcard=NULL;
1139                                 playfile=NULL;/* it is setup later*/
1140                         }
1141                         /*if playfile are supplied don't use soundcards*/
1142                         if (lc->use_files) {
1143                                 captcard=NULL;
1144                                 playcard=NULL;
1145                         }
1146                         if (call->params.in_conference){
1147                                 /* first create the graph without soundcard resources*/
1148                                 captcard=playcard=NULL;
1149                         }
1150                         if (!linphone_call_sound_resources_available(call)){
1151                                 ms_message("Sound resources are used by another call, not using soundcard.");
1152                                 captcard=playcard=NULL;
1153                         }
1154                         use_ec=captcard==NULL ? FALSE : linphone_core_echo_cancellation_enabled(lc);
1155
1156                         audio_stream_enable_adaptive_bitrate_control(call->audiostream,use_arc);
1157                         audio_stream_start_full(
1158                                 call->audiostream,
1159                                 call->audio_profile,
1160                                 stream->addr[0]!='\0' ? stream->addr : call->resultdesc->addr,
1161                                 stream->port,
1162                                 linphone_core_rtcp_enabled(lc) ? (stream->port+1) : 0,
1163                                 used_pt,
1164                                 jitt_comp,
1165                                 playfile,
1166                                 recfile,
1167                                 playcard,
1168                                 captcard,
1169                                 use_ec
1170                                 );
1171                         post_configure_audio_streams(call);
1172                         if (muted && !send_ringbacktone){
1173                                 audio_stream_set_mic_gain(call->audiostream,0);
1174                         }
1175                         if (stream->dir==SalStreamSendOnly && playfile!=NULL){
1176                                 int pause_time=500;
1177                                 ms_filter_call_method(call->audiostream->soundread,MS_FILE_PLAYER_LOOP,&pause_time);
1178                         }
1179                         if (send_ringbacktone){
1180                                 setup_ring_player(lc,call);
1181                         }
1182                         audio_stream_set_rtcp_information(call->audiostream, cname, LINPHONE_RTCP_SDES_TOOL);
1183
1184             /* valid local tags are > 0 */
1185                         if (stream->proto == SalProtoRtpSavp) {
1186                 const SalStreamDescription *local_st_desc=sal_media_description_find_stream(call->localdesc,
1187                                                                                             SalProtoRtpSavp,SalAudio);
1188                 int crypto_idx = find_crypto_index_from_tag(local_st_desc->crypto, stream->crypto_local_tag);
1189
1190                 if (crypto_idx >= 0) {
1191                     audio_stream_enable_strp(
1192                                              call->audiostream,
1193                                              stream->crypto[0].algo,
1194                                              local_st_desc->crypto[crypto_idx].master_key,
1195                                              stream->crypto[0].master_key);
1196                     call->audiostream_encrypted=TRUE;
1197                 } else {
1198                     ms_warning("Failed to find local crypto algo with tag: %d", stream->crypto_local_tag);
1199                     call->audiostream_encrypted=FALSE;
1200                 }
1201                         }else call->audiostream_encrypted=FALSE;
1202                         if (call->params.in_conference){
1203                                 /*transform the graph to connect it to the conference filter */
1204                                 bool_t mute=stream->dir==SalStreamRecvOnly;
1205                                 linphone_call_add_to_conf(call, mute);
1206                         }
1207                         call->current_params.in_conference=call->params.in_conference;
1208                 }else ms_warning("No audio stream accepted ?");
1209         }
1210 }
1211
1212 static void linphone_call_start_video_stream(LinphoneCall *call, const char *cname,bool_t all_inputs_muted){
1213 #ifdef VIDEO_ENABLED
1214         LinphoneCore *lc=call->core;
1215         int used_pt=-1;
1216         /* look for savp stream first */
1217         const SalStreamDescription *vstream=sal_media_description_find_stream(call->resultdesc,
1218                                                 SalProtoRtpSavp,SalVideo);
1219         /* no savp audio stream, use avp */
1220         if (!vstream)
1221                 vstream=sal_media_description_find_stream(call->resultdesc,
1222                                                 SalProtoRtpAvp,SalVideo);
1223
1224         /* shutdown preview */
1225         if (lc->previewstream!=NULL) {
1226                 video_preview_stop(lc->previewstream);
1227                 lc->previewstream=NULL;
1228         }
1229
1230         if (vstream!=NULL && vstream->dir!=SalStreamInactive && vstream->port!=0) {
1231                 const char *addr=vstream->addr[0]!='\0' ? vstream->addr : call->resultdesc->addr;
1232                 call->video_profile=make_profile(call,call->resultdesc,vstream,&used_pt);
1233                 if (used_pt!=-1){
1234                         VideoStreamDir dir=VideoStreamSendRecv;
1235                         MSWebCam *cam=lc->video_conf.device;
1236                         bool_t is_inactive=FALSE;
1237
1238                         call->current_params.has_video=TRUE;
1239
1240                         video_stream_enable_adaptive_bitrate_control(call->videostream,
1241                                                                   linphone_core_adaptive_rate_control_enabled(lc));
1242                         video_stream_set_sent_video_size(call->videostream,linphone_core_get_preferred_video_size(lc));
1243                         video_stream_enable_self_view(call->videostream,lc->video_conf.selfview);
1244                         if (lc->video_window_id!=0)
1245                                 video_stream_set_native_window_id(call->videostream,lc->video_window_id);
1246                         if (lc->preview_window_id!=0)
1247                                 video_stream_set_native_preview_window_id (call->videostream,lc->preview_window_id);
1248                         video_stream_use_preview_video_window (call->videostream,lc->use_preview_window);
1249
1250                         if (vstream->dir==SalStreamSendOnly && lc->video_conf.capture ){
1251                                 cam=get_nowebcam_device();
1252                                 dir=VideoStreamSendOnly;
1253                         }else if (vstream->dir==SalStreamRecvOnly && lc->video_conf.display ){
1254                                 dir=VideoStreamRecvOnly;
1255                         }else if (vstream->dir==SalStreamSendRecv){
1256                                 if (lc->video_conf.display && lc->video_conf.capture)
1257                                         dir=VideoStreamSendRecv;
1258                                 else if (lc->video_conf.display)
1259                                         dir=VideoStreamRecvOnly;
1260                                 else
1261                                         dir=VideoStreamSendOnly;
1262                         }else{
1263                                 ms_warning("video stream is inactive.");
1264                                 /*either inactive or incompatible with local capabilities*/
1265                                 is_inactive=TRUE;
1266                         }
1267                         if (call->camera_active==FALSE || all_inputs_muted){
1268                                 cam=get_nowebcam_device();
1269                         }
1270                         if (!is_inactive){
1271                                 video_stream_set_direction (call->videostream, dir);
1272                                 ms_message("%s lc rotation:%d\n", __FUNCTION__, lc->device_rotation);
1273                                 video_stream_set_device_rotation(call->videostream, lc->device_rotation);
1274                                 video_stream_start(call->videostream,
1275                                         call->video_profile, addr, vstream->port,
1276                                         linphone_core_rtcp_enabled(lc) ? (vstream->port+1) : 0,
1277                                         used_pt, lc->rtp_conf.audio_jitt_comp, cam);
1278                                 video_stream_set_rtcp_information(call->videostream, cname,LINPHONE_RTCP_SDES_TOOL);
1279                         }
1280
1281                         if (vstream->proto == SalProtoRtpSavp) {
1282                                 const SalStreamDescription *local_st_desc=sal_media_description_find_stream(call->localdesc,
1283                                                 SalProtoRtpSavp,SalVideo);
1284
1285                                 video_stream_enable_strp(
1286                                         call->videostream,
1287                                         vstream->crypto[0].algo,
1288                                         local_st_desc->crypto[0].master_key,
1289                                         vstream->crypto[0].master_key
1290                                         );
1291                                 call->videostream_encrypted=TRUE;
1292                         }else{
1293                                 call->videostream_encrypted=FALSE;
1294                         }
1295                 }else ms_warning("No video stream accepted.");
1296         }else{
1297                 ms_warning("No valid video stream defined.");
1298         }
1299 #endif
1300 }
1301
1302 void linphone_call_start_media_streams(LinphoneCall *call, bool_t all_inputs_muted, bool_t send_ringbacktone){
1303         LinphoneCore *lc=call->core;
1304         LinphoneAddress *me=linphone_core_get_primary_contact_parsed(lc);
1305         char *cname;
1306         bool_t use_arc=linphone_core_adaptive_rate_control_enabled(lc);
1307 #ifdef VIDEO_ENABLED
1308         const SalStreamDescription *vstream=sal_media_description_find_stream(call->resultdesc,
1309                                                         SalProtoRtpAvp,SalVideo);
1310 #endif
1311
1312         if(call->audiostream == NULL)
1313         {
1314                 ms_fatal("start_media_stream() called without prior init !");
1315                 return;
1316         }
1317         cname=linphone_address_as_string_uri_only(me);
1318
1319 #if defined(VIDEO_ENABLED)
1320         if (vstream!=NULL && vstream->dir!=SalStreamInactive && vstream->payloads!=NULL){
1321                 /*when video is used, do not make adaptive rate control on audio, it is stupid.*/
1322                 use_arc=FALSE;
1323         }
1324 #endif
1325         linphone_call_start_audio_stream(call,cname,all_inputs_muted,send_ringbacktone,use_arc);
1326         call->current_params.has_video=FALSE;
1327         if (call->videostream!=NULL) {
1328                 linphone_call_start_video_stream(call,cname,all_inputs_muted);
1329         }
1330
1331         call->all_muted=all_inputs_muted;
1332         call->playing_ringbacktone=send_ringbacktone;
1333         call->up_bw=linphone_core_get_upload_bandwidth(lc);
1334
1335         if (call->params.media_encryption==LinphoneMediaEncryptionZRTP) {
1336                 OrtpZrtpParams params;
1337                 /*will be set later when zrtp is activated*/
1338                 call->current_params.media_encryption=LinphoneMediaEncryptionNone;
1339
1340                 params.zid_file=lc->zrtp_secrets_cache;
1341                 audio_stream_enable_zrtp(call->audiostream,&params);
1342         }else if (call->params.media_encryption==LinphoneMediaEncryptionSRTP){
1343                 call->current_params.media_encryption=linphone_call_are_all_streams_encrypted(call) ?
1344                         LinphoneMediaEncryptionSRTP : LinphoneMediaEncryptionNone;
1345         }
1346
1347         /*also reflect the change if the "wished" params, in order to avoid to propose SAVP or video again
1348          * further in the call, for example during pause,resume, conferencing reINVITEs*/
1349         linphone_call_fix_call_parameters(call);
1350
1351         goto end;
1352         end:
1353                 ms_free(cname);
1354                 linphone_address_destroy(me);
1355 }
1356
1357 static void linphone_call_log_fill_stats(LinphoneCallLog *log, AudioStream *st){
1358         audio_stream_get_local_rtp_stats (st,&log->local_stats);
1359         log->quality=audio_stream_get_average_quality_rating(st);
1360 }
1361
1362 void linphone_call_stop_media_streams(LinphoneCall *call){
1363         if (call->audiostream!=NULL) {
1364                 rtp_session_unregister_event_queue(call->audiostream->session,call->audiostream_app_evq);
1365                 ortp_ev_queue_flush(call->audiostream_app_evq);
1366                 ortp_ev_queue_destroy(call->audiostream_app_evq);
1367
1368                 if (call->audiostream->ec){
1369                         const char *state_str=NULL;
1370                         ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_GET_STATE_STRING,&state_str);
1371                         if (state_str){
1372                                 ms_message("Writing echo canceler state, %i bytes",(int)strlen(state_str));
1373                                 lp_config_set_string(call->core->config,"sound","ec_state",state_str);
1374                         }
1375                 }
1376                 linphone_call_log_fill_stats (call->log,call->audiostream);
1377                 if (call->endpoint){
1378                         linphone_call_remove_from_conf(call);
1379                 }
1380                 audio_stream_stop(call->audiostream);
1381                 call->audiostream=NULL;
1382         }
1383
1384
1385 #ifdef VIDEO_ENABLED
1386         if (call->videostream!=NULL){
1387                 rtp_session_unregister_event_queue(call->videostream->session,call->videostream_app_evq);
1388                 ortp_ev_queue_flush(call->videostream_app_evq);
1389                 ortp_ev_queue_destroy(call->videostream_app_evq);
1390                 video_stream_stop(call->videostream);
1391                 call->videostream=NULL;
1392         }
1393 #endif
1394         ms_event_queue_skip(call->core->msevq);
1395
1396         if (call->audio_profile){
1397                 rtp_profile_clear_all(call->audio_profile);
1398                 rtp_profile_destroy(call->audio_profile);
1399                 call->audio_profile=NULL;
1400         }
1401         if (call->video_profile){
1402                 rtp_profile_clear_all(call->video_profile);
1403                 rtp_profile_destroy(call->video_profile);
1404                 call->video_profile=NULL;
1405         }
1406 }
1407
1408
1409
1410 void linphone_call_enable_echo_cancellation(LinphoneCall *call, bool_t enable) {
1411         if (call!=NULL && call->audiostream!=NULL && call->audiostream->ec){
1412                 bool_t bypass_mode = !enable;
1413                 ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_SET_BYPASS_MODE,&bypass_mode);
1414         }
1415 }
1416 bool_t linphone_call_echo_cancellation_enabled(LinphoneCall *call) {
1417         if (call!=NULL && call->audiostream!=NULL && call->audiostream->ec){
1418                 bool_t val;
1419                 ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_GET_BYPASS_MODE,&val);
1420                 return !val;
1421         } else {
1422                 return linphone_core_echo_cancellation_enabled(call->core);
1423         }
1424 }
1425
1426 void linphone_call_enable_echo_limiter(LinphoneCall *call, bool_t val){
1427         if (call!=NULL && call->audiostream!=NULL ) {
1428                 if (val) {
1429                 const char *type=lp_config_get_string(call->core->config,"sound","el_type","mic");
1430                 if (strcasecmp(type,"mic")==0)
1431                         audio_stream_enable_echo_limiter(call->audiostream,ELControlMic);
1432                 else if (strcasecmp(type,"full")==0)
1433                         audio_stream_enable_echo_limiter(call->audiostream,ELControlFull);
1434                 } else {
1435                         audio_stream_enable_echo_limiter(call->audiostream,ELInactive);
1436                 }
1437         }
1438 }
1439
1440 bool_t linphone_call_echo_limiter_enabled(const LinphoneCall *call){
1441         if (call!=NULL && call->audiostream!=NULL ){
1442                 return call->audiostream->el_type !=ELInactive ;
1443         } else {
1444                 return linphone_core_echo_limiter_enabled(call->core);
1445         }
1446 }
1447
1448 /**
1449  * @addtogroup call_misc
1450  * @{
1451 **/
1452
1453 /**
1454  * Returns the measured sound volume played locally (received from remote)
1455  * It is expressed in dbm0.
1456 **/
1457 float linphone_call_get_play_volume(LinphoneCall *call){
1458         AudioStream *st=call->audiostream;
1459         if (st && st->volrecv){
1460                 float vol=0;
1461                 ms_filter_call_method(st->volrecv,MS_VOLUME_GET,&vol);
1462                 return vol;
1463
1464         }
1465         return LINPHONE_VOLUME_DB_LOWEST;
1466 }
1467
1468 /**
1469  * Returns the measured sound volume recorded locally (sent to remote)
1470  * It is expressed in dbm0.
1471 **/
1472 float linphone_call_get_record_volume(LinphoneCall *call){
1473         AudioStream *st=call->audiostream;
1474         if (st && st->volsend && !call->audio_muted && call->state==LinphoneCallStreamsRunning){
1475                 float vol=0;
1476                 ms_filter_call_method(st->volsend,MS_VOLUME_GET,&vol);
1477                 return vol;
1478
1479         }
1480         return LINPHONE_VOLUME_DB_LOWEST;
1481 }
1482
1483 /**
1484  * Obtain real-time quality rating of the call
1485  *
1486  * Based on local RTP statistics and RTCP feedback, a quality rating is computed and updated
1487  * during all the duration of the call. This function returns its value at the time of the function call.
1488  * It is expected that the rating is updated at least every 5 seconds or so.
1489  * The rating is a floating point number comprised between 0 and 5.
1490  *
1491  * 4-5 = good quality <br>
1492  * 3-4 = average quality <br>
1493  * 2-3 = poor quality <br>
1494  * 1-2 = very poor quality <br>
1495  * 0-1 = can't be worse, mostly unusable <br>
1496  *
1497  * @returns The function returns -1 if no quality measurement is available, for example if no
1498  * active audio stream exist. Otherwise it returns the quality rating.
1499 **/
1500 float linphone_call_get_current_quality(LinphoneCall *call){
1501         if (call->audiostream){
1502                 return audio_stream_get_quality_rating(call->audiostream);
1503         }
1504         return -1;
1505 }
1506
1507 /**
1508  * Returns call quality averaged over all the duration of the call.
1509  *
1510  * See linphone_call_get_current_quality() for more details about quality measurement.
1511 **/
1512 float linphone_call_get_average_quality(LinphoneCall *call){
1513         if (call->audiostream){
1514                 return audio_stream_get_average_quality_rating(call->audiostream);
1515         }
1516         return -1;
1517 }
1518
1519 /**
1520  * @}
1521 **/
1522
1523 static void display_bandwidth(RtpSession *as, RtpSession *vs){
1524         ms_message("bandwidth usage: audio=[d=%.1f,u=%.1f] video=[d=%.1f,u=%.1f] kbit/sec",
1525         (as!=NULL) ? (rtp_session_compute_recv_bandwidth(as)*1e-3) : 0,
1526         (as!=NULL) ? (rtp_session_compute_send_bandwidth(as)*1e-3) : 0,
1527         (vs!=NULL) ? (rtp_session_compute_recv_bandwidth(vs)*1e-3) : 0,
1528         (vs!=NULL) ? (rtp_session_compute_send_bandwidth(vs)*1e-3) : 0);
1529 }
1530
1531 static void linphone_core_disconnected(LinphoneCore *lc, LinphoneCall *call){
1532         char temp[256];
1533         char *from=NULL;
1534         if(call)
1535                 from = linphone_call_get_remote_address_as_string(call);
1536         if (from)
1537         {
1538                 snprintf(temp,sizeof(temp),"Remote end %s seems to have disconnected, the call is going to be closed.",from);
1539                 free(from);
1540         }
1541         else
1542         {
1543                 snprintf(temp,sizeof(temp),"Remote end seems to have disconnected, the call is going to be closed.");
1544         }
1545         if (lc->vtable.display_warning!=NULL)
1546                 lc->vtable.display_warning(lc,temp);
1547         linphone_core_terminate_call(lc,call);
1548 }
1549
1550 void linphone_call_background_tasks(LinphoneCall *call, bool_t one_second_elapsed){
1551         int disconnect_timeout = linphone_core_get_nortp_timeout(call->core);
1552         bool_t disconnected=FALSE;
1553
1554         if (call->state==LinphoneCallStreamsRunning && one_second_elapsed){
1555                 RtpSession *as=NULL,*vs=NULL;
1556                 float audio_load=0, video_load=0;
1557                 if (call->audiostream!=NULL){
1558                         as=call->audiostream->session;
1559                         if (call->audiostream->ticker)
1560                                 audio_load=ms_ticker_get_average_load(call->audiostream->ticker);
1561                 }
1562                 if (call->videostream!=NULL){
1563                         if (call->videostream->ticker)
1564                                 video_load=ms_ticker_get_average_load(call->videostream->ticker);
1565                         vs=call->videostream->session;
1566                 }
1567                 display_bandwidth(as,vs);
1568                 ms_message("Thread processing load: audio=%f\tvideo=%f",audio_load,video_load);
1569         }
1570 #ifdef VIDEO_ENABLED
1571         if (call->videostream!=NULL) {
1572                 // Beware that the application queue should not depend on treatments fron the
1573                 // mediastreamer queue.
1574                 video_stream_iterate(call->videostream);
1575
1576                 if (call->videostream_app_evq){
1577                         OrtpEvent *ev;
1578                         while (NULL != (ev=ortp_ev_queue_get(call->videostream_app_evq))){
1579                                 OrtpEventType evt=ortp_event_get_type(ev);
1580                                 if (evt == ORTP_EVENT_ZRTP_ENCRYPTION_CHANGED){
1581                                         OrtpEventData *evd=ortp_event_get_data(ev);
1582                                         linphone_call_videostream_encryption_changed(call, evd->info.zrtp_stream_encrypted);
1583                                 }
1584                                 ortp_event_destroy(ev);
1585                         }
1586                 }
1587         }
1588 #endif
1589         if (call->audiostream!=NULL) {
1590                 // Beware that the application queue should not depend on treatments fron the
1591                 // mediastreamer queue.
1592                 audio_stream_iterate(call->audiostream);
1593
1594                 if (call->audiostream_app_evq){
1595                         OrtpEvent *ev;
1596                         while (NULL != (ev=ortp_ev_queue_get(call->audiostream_app_evq))){
1597                                 OrtpEventType evt=ortp_event_get_type(ev);
1598                                 if (evt == ORTP_EVENT_ZRTP_ENCRYPTION_CHANGED){
1599                                         OrtpEventData *evd=ortp_event_get_data(ev);
1600                                         linphone_call_audiostream_encryption_changed(call, evd->info.zrtp_stream_encrypted);
1601                                 } else if (evt == ORTP_EVENT_ZRTP_SAS_READY) {
1602                                         OrtpEventData *evd=ortp_event_get_data(ev);
1603                                         linphone_call_audiostream_auth_token_ready(call, evd->info.zrtp_sas.sas, evd->info.zrtp_sas.verified);
1604                                 }
1605                                 ortp_event_destroy(ev);
1606                         }
1607                 }
1608         }
1609         if (call->state==LinphoneCallStreamsRunning && one_second_elapsed && call->audiostream!=NULL && disconnect_timeout>0 )
1610                 disconnected=!audio_stream_alive(call->audiostream,disconnect_timeout);
1611         if (disconnected)
1612                 linphone_core_disconnected(call->core,call);
1613 }
1614
1615 void linphone_call_log_completed(LinphoneCall *call){
1616         LinphoneCore *lc=call->core;
1617
1618         call->log->duration=time(NULL)-call->start_time;
1619
1620         if (call->log->status==LinphoneCallMissed){
1621                 char *info;
1622                 lc->missed_calls++;
1623                 info=ortp_strdup_printf(ngettext("You have missed %i call.",
1624                                          "You have missed %i calls.", lc->missed_calls),
1625                                 lc->missed_calls);
1626         if (lc->vtable.display_status!=NULL)
1627             lc->vtable.display_status(lc,info);
1628                 ms_free(info);
1629         }
1630         lc->call_logs=ms_list_prepend(lc->call_logs,(void *)call->log);
1631         if (ms_list_size(lc->call_logs)>lc->max_call_logs){
1632                 MSList *elem,*prevelem=NULL;
1633                 /*find the last element*/
1634                 for(elem=lc->call_logs;elem!=NULL;elem=elem->next){
1635                         prevelem=elem;
1636                 }
1637                 elem=prevelem;
1638                 linphone_call_log_destroy((LinphoneCallLog*)elem->data);
1639                 lc->call_logs=ms_list_remove_link(lc->call_logs,elem);
1640         }
1641         if (lc->vtable.call_log_updated!=NULL){
1642                 lc->vtable.call_log_updated(lc,call->log);
1643         }
1644         call_logs_write_to_config_file(lc);
1645 }
1646
1647