~ubuntu-branches/ubuntu/wily/sflphone/wily

« back to all changes in this revision

Viewing changes to daemon/libs/pjproject-2.2.1/pjsip/src/pjsip-simple/presence_body.c

  • Committer: Package Import Robot
  • Author(s): Jonathan Riddell
  • Date: 2015-01-07 14:51:16 UTC
  • mfrom: (4.3.5 sid)
  • Revision ID: package-import@ubuntu.com-20150107145116-yxnafinf4lrdvrmx
Tags: 1.4.1-0.1ubuntu1
* Merge with Debian, remaining changes:
 - Drop soprano, nepomuk build-dep
* Drop ubuntu patches, now upstream

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* $Id: presence_body.c 3553 2011-05-05 06:14:19Z nanang $ */
 
2
/* 
 
3
 * Copyright (C) 2008-2011 Teluu Inc. (http://www.teluu.com)
 
4
 * Copyright (C) 2003-2008 Benny Prijono <benny@prijono.org>
 
5
 *
 
6
 * This program is free software; you can redistribute it and/or modify
 
7
 * it under the terms of the GNU General Public License as published by
 
8
 * the Free Software Foundation; either version 2 of the License, or
 
9
 * (at your option) any later version.
 
10
 *
 
11
 * This program is distributed in the hope that it will be useful,
 
12
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
14
 * GNU General Public License for more details.
 
15
 *
 
16
 * You should have received a copy of the GNU General Public License
 
17
 * along with this program; if not, write to the Free Software
 
18
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA 
 
19
 */
 
20
#include <pjsip-simple/presence.h>
 
21
#include <pjsip-simple/errno.h>
 
22
#include <pjsip/sip_msg.h>
 
23
#include <pjsip/sip_transport.h>
 
24
#include <pj/guid.h>
 
25
#include <pj/log.h>
 
26
#include <pj/os.h>
 
27
#include <pj/pool.h>
 
28
#include <pj/string.h>
 
29
 
 
30
 
 
31
#define THIS_FILE   "presence_body.c"
 
32
 
 
33
 
 
34
static const pj_str_t STR_APPLICATION = { "application", 11 };
 
35
static const pj_str_t STR_PIDF_XML =    { "pidf+xml", 8 };
 
36
static const pj_str_t STR_XPIDF_XML =   { "xpidf+xml", 9 };
 
37
 
 
38
 
 
39
 
 
40
 
 
41
/*
 
42
 * Function to print XML message body.
 
43
 */
 
44
static int pres_print_body(struct pjsip_msg_body *msg_body, 
 
45
                           char *buf, pj_size_t size)
 
46
{
 
47
    return pj_xml_print((const pj_xml_node*)msg_body->data, buf, size, 
 
48
                        PJ_TRUE);
 
49
}
 
50
 
 
51
 
 
52
/*
 
53
 * Function to clone XML document.
 
54
 */
 
55
static void* xml_clone_data(pj_pool_t *pool, const void *data, unsigned len)
 
56
{
 
57
    PJ_UNUSED_ARG(len);
 
58
    return pj_xml_clone( pool, (const pj_xml_node*) data);
 
59
}
 
60
 
 
61
 
 
62
/*
 
63
 * This is a utility function to create PIDF message body from PJSIP
 
64
 * presence status (pjsip_pres_status).
 
65
 */
 
66
PJ_DEF(pj_status_t) pjsip_pres_create_pidf( pj_pool_t *pool,
 
67
                                            const pjsip_pres_status *status,
 
68
                                            const pj_str_t *entity,
 
69
                                            pjsip_msg_body **p_body )
 
70
{
 
71
    pjpidf_pres *pidf;
 
72
    pjsip_msg_body *body;
 
73
    unsigned i;
 
74
 
 
75
    /* Create <presence>. */
 
76
    pidf = pjpidf_create(pool, entity);
 
77
 
 
78
    /* Create <tuple> */
 
79
    for (i=0; i<status->info_cnt; ++i) {
 
80
 
 
81
        pjpidf_tuple *pidf_tuple;
 
82
        pjpidf_status *pidf_status;
 
83
        pj_str_t id;
 
84
 
 
85
        /* Add tuple id. */
 
86
        if (status->info[i].id.slen == 0) {
 
87
            /* xs:ID must start with letter */
 
88
            //pj_create_unique_string(pool, &id);
 
89
            id.ptr = (char*)pj_pool_alloc(pool, PJ_GUID_STRING_LENGTH+2);
 
90
            id.ptr += 2;
 
91
            pj_generate_unique_string(&id);
 
92
            id.ptr -= 2;
 
93
            id.ptr[0] = 'p';
 
94
            id.ptr[1] = 'j';
 
95
            id.slen += 2;
 
96
        } else {
 
97
            id = status->info[i].id;
 
98
        }
 
99
 
 
100
        pidf_tuple = pjpidf_pres_add_tuple(pool, pidf, &id);
 
101
 
 
102
        /* Set <contact> */
 
103
        if (status->info[i].contact.slen)
 
104
            pjpidf_tuple_set_contact(pool, pidf_tuple, 
 
105
                                     &status->info[i].contact);
 
106
 
 
107
 
 
108
        /* Set basic status */
 
109
        pidf_status = pjpidf_tuple_get_status(pidf_tuple);
 
110
        pjpidf_status_set_basic_open(pidf_status, 
 
111
                                     status->info[i].basic_open);
 
112
 
 
113
        /* Add <timestamp> if configured */
 
114
#if defined(PJSIP_PRES_PIDF_ADD_TIMESTAMP) && PJSIP_PRES_PIDF_ADD_TIMESTAMP
 
115
        if (PJSIP_PRES_PIDF_ADD_TIMESTAMP) {
 
116
          char buf[50];
 
117
          int tslen = 0;
 
118
          pj_time_val tv;
 
119
          pj_parsed_time pt;
 
120
 
 
121
          pj_gettimeofday(&tv);
 
122
          /* TODO: convert time to GMT! (unsupported by pjlib) */
 
123
          pj_time_decode( &tv, &pt);
 
124
 
 
125
          tslen = pj_ansi_snprintf(buf, sizeof(buf),
 
126
                                   "%04d-%02d-%02dT%02d:%02d:%02d.%03dZ",
 
127
                                   pt.year, pt.mon+1, pt.day, 
 
128
                                   pt.hour, pt.min, pt.sec, pt.msec);
 
129
          if (tslen > 0 && tslen < (int)sizeof(buf)) {
 
130
              pj_str_t time = pj_str(buf);
 
131
              pjpidf_tuple_set_timestamp(pool, pidf_tuple, &time);
 
132
          }
 
133
        }
 
134
#endif
 
135
    }
 
136
 
 
137
    /* Create <person> (RPID) */
 
138
    if (status->info_cnt) {
 
139
        pjrpid_add_element(pidf, pool, 0, &status->info[0].rpid);
 
140
    }
 
141
 
 
142
    body = PJ_POOL_ZALLOC_T(pool, pjsip_msg_body);
 
143
    body->data = pidf;
 
144
    body->content_type.type = STR_APPLICATION;
 
145
    body->content_type.subtype = STR_PIDF_XML;
 
146
    body->print_body = &pres_print_body;
 
147
    body->clone_data = &xml_clone_data;
 
148
 
 
149
    *p_body = body;
 
150
 
 
151
    return PJ_SUCCESS;    
 
152
}
 
153
 
 
154
 
 
155
/*
 
156
 * This is a utility function to create X-PIDF message body from PJSIP
 
157
 * presence status (pjsip_pres_status).
 
158
 */
 
159
PJ_DEF(pj_status_t) pjsip_pres_create_xpidf( pj_pool_t *pool,
 
160
                                             const pjsip_pres_status *status,
 
161
                                             const pj_str_t *entity,
 
162
                                             pjsip_msg_body **p_body )
 
163
{
 
164
    /* Note: PJSIP implementation of XPIDF is not complete!
 
165
     */
 
166
    pjxpidf_pres *xpidf;
 
167
    pjsip_msg_body *body;
 
168
 
 
169
    PJ_LOG(4,(THIS_FILE, "Warning: XPIDF format is not fully supported "
 
170
                         "by PJSIP"));
 
171
 
 
172
    /* Create XPIDF document. */
 
173
    xpidf = pjxpidf_create(pool, entity);
 
174
 
 
175
    /* Set basic status. */
 
176
    if (status->info_cnt > 0)
 
177
        pjxpidf_set_status( xpidf, status->info[0].basic_open);
 
178
    else
 
179
        pjxpidf_set_status( xpidf, PJ_FALSE);
 
180
 
 
181
    body = PJ_POOL_ZALLOC_T(pool, pjsip_msg_body);
 
182
    body->data = xpidf;
 
183
    body->content_type.type = STR_APPLICATION;
 
184
    body->content_type.subtype = STR_XPIDF_XML;
 
185
    body->print_body = &pres_print_body;
 
186
    body->clone_data = &xml_clone_data;
 
187
 
 
188
    *p_body = body;
 
189
 
 
190
    return PJ_SUCCESS;
 
191
}
 
192
 
 
193
 
 
194
 
 
195
/*
 
196
 * This is a utility function to parse PIDF body into PJSIP presence status.
 
197
 */
 
198
PJ_DEF(pj_status_t) pjsip_pres_parse_pidf( pjsip_rx_data *rdata,
 
199
                                           pj_pool_t *pool,
 
200
                                           pjsip_pres_status *pres_status)
 
201
{
 
202
    return pjsip_pres_parse_pidf2((char*)rdata->msg_info.msg->body->data,
 
203
                                  rdata->msg_info.msg->body->len,
 
204
                                  pool, pres_status);
 
205
}
 
206
 
 
207
PJ_DEF(pj_status_t) pjsip_pres_parse_pidf2(char *body, unsigned body_len,
 
208
                                           pj_pool_t *pool,
 
209
                                           pjsip_pres_status *pres_status)
 
210
{
 
211
    pjpidf_pres *pidf;
 
212
    pjpidf_tuple *pidf_tuple;
 
213
 
 
214
    pidf = pjpidf_parse(pool, body, body_len);
 
215
    if (pidf == NULL)
 
216
        return PJSIP_SIMPLE_EBADPIDF;
 
217
 
 
218
    pres_status->info_cnt = 0;
 
219
 
 
220
    pidf_tuple = pjpidf_pres_get_first_tuple(pidf);
 
221
    while (pidf_tuple && pres_status->info_cnt < PJSIP_PRES_STATUS_MAX_INFO) {
 
222
        pjpidf_status *pidf_status;
 
223
 
 
224
        pres_status->info[pres_status->info_cnt].tuple_node = 
 
225
            pj_xml_clone(pool, pidf_tuple);
 
226
 
 
227
        pj_strdup(pool, 
 
228
                  &pres_status->info[pres_status->info_cnt].id,
 
229
                  pjpidf_tuple_get_id(pidf_tuple));
 
230
 
 
231
        pj_strdup(pool, 
 
232
                  &pres_status->info[pres_status->info_cnt].contact,
 
233
                  pjpidf_tuple_get_contact(pidf_tuple));
 
234
 
 
235
        pidf_status = pjpidf_tuple_get_status(pidf_tuple);
 
236
        if (pidf_status) {
 
237
            pres_status->info[pres_status->info_cnt].basic_open = 
 
238
                pjpidf_status_is_basic_open(pidf_status);
 
239
        } else {
 
240
            pres_status->info[pres_status->info_cnt].basic_open = PJ_FALSE;
 
241
        }
 
242
 
 
243
        pidf_tuple = pjpidf_pres_get_next_tuple( pidf, pidf_tuple );
 
244
        pres_status->info_cnt++;
 
245
    }
 
246
 
 
247
    /* Parse <person> (RPID) */
 
248
    pjrpid_get_element(pidf, pool, &pres_status->info[0].rpid);
 
249
 
 
250
    return PJ_SUCCESS;
 
251
}
 
252
 
 
253
 
 
254
/*
 
255
 * This is a utility function to parse X-PIDF body into PJSIP presence status.
 
256
 */
 
257
PJ_DEF(pj_status_t) pjsip_pres_parse_xpidf(pjsip_rx_data *rdata,
 
258
                                           pj_pool_t *pool,
 
259
                                           pjsip_pres_status *pres_status)
 
260
{
 
261
    return pjsip_pres_parse_xpidf2((char*)rdata->msg_info.msg->body->data,
 
262
                                   rdata->msg_info.msg->body->len,
 
263
                                   pool, pres_status);
 
264
}
 
265
 
 
266
PJ_DEF(pj_status_t) pjsip_pres_parse_xpidf2(char *body, unsigned body_len,
 
267
                                            pj_pool_t *pool,
 
268
                                            pjsip_pres_status *pres_status)
 
269
{
 
270
    pjxpidf_pres *xpidf;
 
271
 
 
272
    xpidf = pjxpidf_parse(pool, body, body_len);
 
273
    if (xpidf == NULL)
 
274
        return PJSIP_SIMPLE_EBADXPIDF;
 
275
 
 
276
    pres_status->info_cnt = 1;
 
277
    
 
278
    pj_strdup(pool,
 
279
              &pres_status->info[0].contact,
 
280
              pjxpidf_get_uri(xpidf));
 
281
    pres_status->info[0].basic_open = pjxpidf_get_status(xpidf);
 
282
    pres_status->info[0].id.slen = 0;
 
283
    pres_status->info[0].tuple_node = NULL;
 
284
 
 
285
    return PJ_SUCCESS;
 
286
}
 
287
 
 
288