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