3 Copyright (C) 2010 Simon MORLAT (simon.morlat@free.fr)
5 This program is free software; you can redistribute it and/or
6 modify it under the terms of the GNU General Public License
7 as published by the Free Software Foundation; either version 2
8 of the License, or (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 #include "sal_eXosip2.h"
24 static SalOp * sal_find_out_subscribe(Sal *sal, int sid){
27 for(elem=sal->out_subscribes;elem!=NULL;elem=elem->next){
28 op=(SalOp*)elem->data;
29 if (op->sid==sid) return op;
34 static void sal_add_out_subscribe(Sal *sal, SalOp *op){
35 sal->out_subscribes=ms_list_append(sal->out_subscribes,op);
38 void sal_remove_out_subscribe(Sal *sal, SalOp *op){
39 sal->out_subscribes=ms_list_remove(sal->out_subscribes,op);
42 static SalOp * sal_find_in_subscribe(Sal *sal, int nid){
45 for(elem=sal->in_subscribes;elem!=NULL;elem=elem->next){
46 op=(SalOp*)elem->data;
47 if (op->nid==nid) return op;
52 static SalOp * sal_find_in_subscribe_by_call_id(Sal *sal, osip_call_id_t *call_id){
55 for(elem=sal->in_subscribes;elem!=NULL;elem=elem->next){
56 op=(SalOp*)elem->data;
57 if (op->call_id && osip_call_id_match(op->call_id,call_id)==0)
63 static void sal_add_in_subscribe(Sal *sal, SalOp *op, osip_message_t *subs){
64 osip_call_id_clone(subs->call_id,&op->call_id);
65 sal->in_subscribes=ms_list_append(sal->in_subscribes,op);
68 void sal_remove_in_subscribe(Sal *sal, SalOp *op){
69 sal->in_subscribes=ms_list_remove(sal->in_subscribes,op);
72 int sal_text_send(SalOp *op, const char *from, const char *to, const char *msg){
73 osip_message_t *sip=NULL;
75 sal_op_set_from(op,from);
80 eXosip_message_build_request(&sip,"MESSAGE",sal_op_get_to(op),
81 sal_op_get_from(op),sal_op_get_route(op));
82 osip_message_set_content_type(sip,"text/plain");
83 osip_message_set_body(sip,msg,strlen(msg));
84 eXosip_message_send_request(sip);
89 /*presence Subscribe/notify*/
90 int sal_subscribe_presence(SalOp *op, const char *from, const char *to){
93 sal_op_set_from(op,from);
96 sal_exosip_fix_route(op);
98 eXosip_subscribe_build_initial_request(&msg,sal_op_get_to(op),sal_op_get_from(op),
99 sal_op_get_route(op),"presence",600);
100 op->sid=eXosip_subscribe_send_initial_request(msg);
103 osip_message_free(msg);
106 sal_add_out_subscribe(op->base.root,op);
110 int sal_unsubscribe(SalOp *op){
111 osip_message_t *msg=NULL;
113 ms_error("cannot unsubscribe, no dialog !");
117 eXosip_subscribe_build_refresh_request(op->did,&msg);
119 osip_message_set_expires(msg,"0");
120 eXosip_subscribe_send_refresh_request(op->did,msg);
121 }else ms_error("Could not build subscribe refresh request ! op->sid=%i, op->did=%i",
127 int sal_subscribe_accept(SalOp *op){
130 eXosip_insubscription_build_answer(op->tid,202,&msg);
131 eXosip_insubscription_send_answer(op->tid,202,msg);
136 int sal_subscribe_decline(SalOp *op){
138 eXosip_insubscription_send_answer(op->tid,401,NULL);
143 static void add_presence_body(osip_message_t *notify, SalPresenceStatus online_status)
151 osip_contact_t *ct=NULL;
152 osip_message_get_contact(notify,0,&ct);
153 osip_contact_to_str(ct,&contact_info);
157 if (online_status==SalPresenceOnline)
159 sprintf(buf, "<?xml version=\"1.0\"?>\n\
160 <!DOCTYPE presence\n\
161 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
163 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
165 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
166 <status status=\"open\" />\n\
167 <msnsubstatus substatus=\"online\" />\n\
170 </presence>", contact_info, atom_id, contact_info);
173 else if (online_status==SalPresenceBusy)
175 sprintf(buf, "<?xml version=\"1.0\"?>\n\
176 <!DOCTYPE presence\n\
177 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
179 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
181 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
182 <status status=\"inuse\" />\n\
183 <msnsubstatus substatus=\"busy\" />\n\
186 </presence>", contact_info, atom_id, contact_info);
189 else if (online_status==SalPresenceBerightback)
191 sprintf(buf, "<?xml version=\"1.0\"?>\n\
192 <!DOCTYPE presence\n\
193 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
195 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
197 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
198 <status status=\"inactive\" />\n\
199 <msnsubstatus substatus=\"berightback\" />\n\
202 </presence>", contact_info, atom_id, contact_info);
205 else if (online_status==SalPresenceAway)
207 sprintf(buf, "<?xml version=\"1.0\"?>\n\
208 <!DOCTYPE presence\n\
209 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
211 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
213 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
214 <status status=\"inactive\" />\n\
215 <msnsubstatus substatus=\"away\" />\n\
218 </presence>", contact_info, atom_id, contact_info);
221 else if (online_status==SalPresenceOnthephone)
223 sprintf(buf, "<?xml version=\"1.0\"?>\n\
224 <!DOCTYPE presence\n\
225 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
227 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
229 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
230 <status status=\"inuse\" />\n\
231 <msnsubstatus substatus=\"onthephone\" />\n\
234 </presence>", contact_info, atom_id, contact_info);
237 else if (online_status==SalPresenceOuttolunch)
239 sprintf(buf, "<?xml version=\"1.0\"?>\n\
240 <!DOCTYPE presence\n\
241 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
243 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
245 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
246 <status status=\"inactive\" />\n\
247 <msnsubstatus substatus=\"outtolunch\" />\n\
250 </presence>", contact_info, atom_id, contact_info);
255 sprintf(buf, "<?xml version=\"1.0\"?>\n\
256 <!DOCTYPE presence\n\
257 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
259 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
261 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
262 <status status=\"inactive\" />\n\
263 <msnsubstatus substatus=\"away\" />\n\
266 </presence>", contact_info, atom_id, contact_info);
269 osip_message_set_body(notify, buf, strlen(buf));
270 osip_message_set_content_type(notify, "application/xpidf+xml");
273 if (online_status==SalPresenceOnline)
275 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
276 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
278 <tuple id=\"sg89ae\">\n\
280 <basic>open</basic>\n\
282 <contact priority=\"0.8\">%s</contact>\n\
283 <note>online</note>\n\
286 contact_info, contact_info);
288 else if (online_status==SalPresenceBusy)
290 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
291 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
292 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
294 <tuple id=\"sg89ae\">\n\
296 <basic>open</basic>\n\
298 <es:activity>busy</es:activity>\n\
301 <contact priority=\"0.8\">%s</contact>\n\
305 contact_info, contact_info);
307 else if (online_status==SalPresenceBerightback)
309 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
310 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
311 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
313 <tuple id=\"sg89ae\">\n\
315 <basic>open</basic>\n\
317 <es:activity>in-transit</es:activity>\n\
320 <contact priority=\"0.8\">%s</contact>\n\
321 <note>be right back</note>\n\
324 contact_info, contact_info);
326 else if (online_status==SalPresenceAway)
328 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
329 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
330 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
332 <tuple id=\"sg89ae\">\n\
334 <basic>open</basic>\n\
336 <es:activity>away</es:activity>\n\
339 <contact priority=\"0.8\">%s</contact>\n\
343 contact_info, contact_info);
345 else if (online_status==SalPresenceOnthephone)
347 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
348 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
349 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
351 <tuple id=\"sg89ae\">\n\
353 <basic>open</basic>\n\
355 <es:activity>on-the-phone</es:activity>\n\
358 <contact priority=\"0.8\">%s</contact>\n\
359 <note>on the phone</note>\n\
362 contact_info, contact_info);
364 else if (online_status==SalPresenceOuttolunch)
366 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
367 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
368 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
370 <tuple id=\"sg89ae\">\n\
372 <basic>open</basic>\n\
374 <es:activity>meal</es:activity>\n\
377 <contact priority=\"0.8\">%s</contact>\n\
378 <note>out to lunch</note>\n\
381 contact_info, contact_info);
386 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
387 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
388 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
391 "<tuple id=\"sg89ae\">\n\
393 <basic>closed</basic>\n\
395 <es:activity>permanent-absence</es:activity>\n\
401 osip_message_set_body(notify, buf, strlen(buf));
402 osip_message_set_content_type(notify, "application/pidf+xml");
405 osip_free(contact_info);
409 int sal_notify_presence(SalOp *op, SalPresenceStatus status, const char *status_message){
411 eXosip_ss_t ss=EXOSIP_SUBCRSTATE_ACTIVE;
413 ms_warning("Cannot notify, subscription was closed.");
418 eXosip_insubscription_build_notify(op->did,ss,DEACTIVATED,&msg);
420 const char *identity=sal_op_get_contact(op);
421 if (identity==NULL) identity=sal_op_get_to(op);
422 osip_message_set_contact(msg,identity);
423 add_presence_body(msg,status);
424 eXosip_insubscription_send_request(op->did,msg);
425 }else ms_error("could not create notify for incoming subscription.");
430 int sal_notify_close(SalOp *op){
431 osip_message_t *msg=NULL;
433 eXosip_insubscription_build_notify(op->did,EXOSIP_SUBCRSTATE_TERMINATED,DEACTIVATED,&msg);
435 const char *identity=sal_op_get_contact(op);
436 if (identity==NULL) identity=sal_op_get_to(op);
437 osip_message_set_contact(msg,identity);
438 add_presence_body(msg,SalPresenceOffline);
439 eXosip_insubscription_send_request(op->did,msg);
440 }else ms_error("sal_notify_close(): could not create notify for incoming subscription"
441 " did=%i, nid=%i",op->did,op->nid);
446 int sal_publish(SalOp *op, const char *from, const char *to, SalPresenceStatus presence_mode){
451 if (presence_mode==SalPresenceOnline)
453 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
454 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
456 <tuple id=\"sg89ae\">\n\
458 <basic>open</basic>\n\
460 <contact priority=\"0.8\">%s</contact>\n\
461 <note>online</note>\n\
466 else if (presence_mode==SalPresenceBusy
467 ||presence_mode==SalPresenceDonotdisturb)
469 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
470 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
471 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
473 <tuple id=\"sg89ae\">\n\
475 <basic>open</basic>\n\
477 <es:activity>busy</es:activity>\n\
480 <contact priority=\"0.8\">%s</contact>\n\
486 else if (presence_mode==SalPresenceBerightback)
488 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
489 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
490 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
492 <tuple id=\"sg89ae\">\n\
494 <basic>open</basic>\n\
496 <es:activity>in-transit</es:activity>\n\
499 <contact priority=\"0.8\">%s</contact>\n\
500 <note>be right back</note>\n\
505 else if (presence_mode==SalPresenceAway
506 ||presence_mode==SalPresenceMoved)
508 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
509 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
510 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
512 <tuple id=\"sg89ae\">\n\
514 <basic>open</basic>\n\
516 <es:activity>away</es:activity>\n\
519 <contact priority=\"0.8\">%s</contact>\n\
525 else if (presence_mode==SalPresenceOnthephone)
527 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
528 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
529 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
531 <tuple id=\"sg89ae\">\n\
533 <basic>open</basic>\n\
535 <es:activity>on-the-phone</es:activity>\n\
538 <contact priority=\"0.8\">%s</contact>\n\
539 <note>on the phone</note>\n\
544 else if (presence_mode==SalPresenceOuttolunch)
546 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
547 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
548 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
550 <tuple id=\"sg89ae\">\n\
552 <basic>open</basic>\n\
554 <es:activity>meal</es:activity>\n\
557 <contact priority=\"0.8\">%s</contact>\n\
558 <note>out to lunch</note>\n\
565 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
566 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
567 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
570 "<tuple id=\"sg89ae\">\n\
572 <basic>closed</basic>\n\
574 <es:activity>permanent-absence</e:activity>\n\
581 i = eXosip_build_publish(&pub,from, to, NULL, "presence", "1800", "application/pidf+xml", buf);
583 ms_warning("Failed to build publish request.");
588 i = eXosip_publish(pub, to); /* should update the sip-if-match parameter
589 from sip-etag from last 200ok of PUBLISH */
592 ms_message("Failed to send publish request.");
598 static void _sal_exosip_subscription_recv(Sal *sal, eXosip_event_t *ev){
599 SalOp *op=sal_op_new(sal);
604 osip_from_to_str(ev->request->from,&tmp);
605 sal_op_set_from(op,tmp);
607 osip_from_to_str(ev->request->to,&tmp);
608 sal_op_set_to(op,tmp);
610 sal_add_in_subscribe(sal,op,ev->request);
611 sal->callbacks.subscribe_received(op,sal_op_get_from(op));
614 void sal_exosip_subscription_recv(Sal *sal, eXosip_event_t *ev){
615 /*workaround a bug in eXosip: incoming SUBSCRIBES within dialog with expires: 0 are
616 recognized as new incoming subscribes*/
617 SalOp *op=sal_find_in_subscribe_by_call_id(sal,ev->request->call_id);
620 osip_message_header_get_byname(ev->request,"expires",0,&h);
621 if (h && h->hvalue && atoi(h->hvalue)==0){
622 ms_warning("This susbscribe is not a new one but terminates an old one.");
625 sal_exosip_subscription_closed(sal,ev);
627 osip_message_t *msg=NULL;
628 ms_warning("Probably a refresh subscribe");
630 eXosip_insubscription_build_answer(ev->tid,202,&msg);
631 eXosip_insubscription_send_answer(ev->tid,202,msg);
634 }else _sal_exosip_subscription_recv(sal,ev);
637 void sal_exosip_notify_recv(Sal *sal, eXosip_event_t *ev){
638 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
640 osip_from_t *from=NULL;
641 osip_body_t *body=NULL;
642 SalPresenceStatus estatus=SalPresenceOffline;
644 ms_message("Receiving notify with sid=%i,nid=%i",ev->sid,ev->nid);
647 ms_error("No operation related to this notify !");
650 if (ev->request==NULL) return;
652 from=ev->request->from;
653 osip_message_get_body(ev->request,0,&body);
655 ms_error("No body in NOTIFY");
658 osip_from_to_str(from,&tmp);
659 if (strstr(body->body,"pending")!=NULL){
660 estatus=SalPresenceOffline;
661 }else if (strstr(body->body,"busy")!=NULL){
662 estatus=SalPresenceBusy;
663 }else if (strstr(body->body,"berightback")!=NULL
664 || strstr(body->body,"in-transit")!=NULL ){
665 estatus=SalPresenceBerightback;
666 }else if (strstr(body->body,"away")!=NULL){
667 estatus=SalPresenceAway;
668 }else if (strstr(body->body,"onthephone")!=NULL
669 || strstr(body->body,"on-the-phone")!=NULL){
670 estatus=SalPresenceOnthephone;
671 }else if (strstr(body->body,"outtolunch")!=NULL
672 || strstr(body->body,"meal")!=NULL){
673 estatus=SalPresenceOuttolunch;
674 }else if (strstr(body->body,"closed")!=NULL){
675 estatus=SalPresenceOffline;
676 }else if ((strstr(body->body,"online")!=NULL) || (strstr(body->body,"open")!=NULL)) {
677 estatus=SalPresenceOnline;
679 estatus=SalPresenceOffline;
681 ms_message("We are notified that %s has online status %i",tmp,estatus);
682 if (ev->ss_status==EXOSIP_SUBCRSTATE_TERMINATED) {
683 sal_remove_out_subscribe(sal,op);
686 ms_message("And outgoing subscription terminated by remote.");
688 sal->callbacks.notify(op,op->sid!=-1 ? SalSubscribeActive : SalSubscribeTerminated, estatus,NULL);
692 void sal_exosip_subscription_answered(Sal *sal,eXosip_event_t *ev){
693 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
695 ms_error("Subscription answered but no associated op !");
701 void sal_exosip_in_subscription_closed(Sal *sal, eXosip_event_t *ev){
702 SalOp *op=sal_find_in_subscribe(sal,ev->nid);
705 ms_error("Incoming subscription closed but no associated op !");
710 sal_remove_in_subscribe(sal,op);
714 osip_from_to_str(ev->request->from,&tmp);
715 sal->callbacks.subscribe_closed(op,tmp);
720 void sal_exosip_subscription_closed(Sal *sal,eXosip_event_t *ev){
721 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
723 ms_error("Subscription closed but no associated op !");
726 sal_remove_out_subscribe(sal,op);
729 sal->callbacks.notify(op,SalSubscribeTerminated, SalPresenceOffline,NULL);