229501cb6b152c8600eebc430de428b89d8745bd
[vlc.git] / modules / access / rtsp / real_sdpplin.c
1 /*
2  * Copyright (C) 2002-2003 the xine project
3  *
4  * This file is part of xine, a free video player.
5  *
6  * xine 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  * xine 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  * $Id$
21  *
22  * sdp/sdpplin parser.
23  *
24  */
25  
26 #include "real.h"
27 #define BUFLEN 32000
28
29 /*
30  * Decodes base64 strings (based upon b64 package)
31  */
32
33 static char *b64_decode(const char *in, char *out, int *size) {
34
35   char dtable[256];              /* Encode / decode table */
36   int i,k;
37   unsigned int j;
38
39   for (i = 0; i < 255; i++) {
40     dtable[i] = 0x80;
41   }
42   for (i = 'A'; i <= 'Z'; i++) {
43     dtable[i] = 0 + (i - 'A');
44   }
45   for (i = 'a'; i <= 'z'; i++) {
46     dtable[i] = 26 + (i - 'a');
47   }
48   for (i = '0'; i <= '9'; i++) {
49     dtable[i] = 52 + (i - '0');
50   }
51   dtable['+'] = 62;
52   dtable['/'] = 63;
53   dtable['='] = 0;
54
55   k=0;
56   /*CONSTANTCONDITION*/
57   for (j=0; j<strlen(in); j+=4) {
58     char a[4], b[4];
59
60     for (i = 0; i < 4; i++) {
61       int c = in[i+j];
62
63       if (dtable[c] & 0x80) {
64         printf("Illegal character '%c' in input.\n", c);
65         exit(1);
66       }
67       a[i] = (char) c;
68       b[i] = (char) dtable[c];
69     }
70     //xine_buffer_ensure_size(out, k+3);
71     out[k++] = (b[0] << 2) | (b[1] >> 4);
72     out[k++] = (b[1] << 4) | (b[2] >> 2);
73     out[k++] = (b[2] << 6) | b[3];
74     i = a[2] == '=' ? 1 : (a[3] == '=' ? 2 : 3);
75     if (i < 3) {
76       out[k]=0;
77       *size=k;
78       return out;
79     }
80   }
81   out[k]=0;
82   *size=k;
83   return out;
84 }
85
86 static char *nl(char *data) {
87
88   char *nlptr = (data) ? strchr(data,'\n') : NULL;
89   return (nlptr) ? nlptr + 1 : NULL;
90 }
91
92 static int filter(const char *in, const char *filter, char **out, size_t outlen) {
93
94   int flen=strlen(filter);
95   size_t len;
96
97   if (!in) return 0;
98
99   len = (strchr(in,'\n')) ? (size_t)(strchr(in,'\n')-in) : strlen(in);
100   if (!strncmp(in,filter,flen)) {
101     if(in[flen]=='"') flen++;
102     if(in[len-1]==13) len--;
103     if(in[len-1]=='"') len--;
104     if( len-flen+1 > outlen )
105     {
106         printf("Discarding end of string to avoid overflow");
107         len=outlen+flen-1;
108     }
109     memcpy(*out, in+flen, len-flen+1);
110     (*out)[len-flen]=0;
111     return len-flen;
112   }
113   return 0;
114 }
115
116 static sdpplin_stream_t *sdpplin_parse_stream(char **data) {
117
118   sdpplin_stream_t *desc = malloc(sizeof(sdpplin_stream_t));
119   char      *buf = malloc(BUFLEN);
120   char      *decoded = malloc(BUFLEN);
121   int       handled;
122
123   if( !desc ) return NULL;
124   memset(desc, 0, sizeof(sdpplin_stream_t));
125
126   if( !buf ) goto error;
127   if( !decoded ) goto error;
128
129   if (filter(*data, "m=", &buf, BUFLEN)) {
130     desc->id = strdup(buf);
131   } else {
132     lprintf("sdpplin: no m= found.\n");
133     goto error;
134   }
135   *data=nl(*data);
136
137   while (*data && **data && *data[0]!='m') {
138     handled=0;
139
140     if(filter(*data,"a=control:streamid=",&buf, BUFLEN)) {
141         /* This way negative values are mapped to unfeasibly high
142          * values, and will be discarded afterward
143          */
144         unsigned long tmp = strtoul(buf, NULL, 10);
145         if ( tmp > UINT16_MAX )
146             lprintf("stream id out of bound: %lu\n", tmp);
147         else
148             desc->stream_id=tmp;
149         handled=1;
150         *data=nl(*data);
151     }
152     if(filter(*data,"a=MaxBitRate:integer;",&buf, BUFLEN)) {
153       desc->max_bit_rate=atoi(buf);
154       if (!desc->avg_bit_rate)
155         desc->avg_bit_rate=desc->max_bit_rate;
156       handled=1;
157       *data=nl(*data);
158     }
159     if(filter(*data,"a=MaxPacketSize:integer;",&buf, BUFLEN)) {
160       desc->max_packet_size=atoi(buf);
161       if (!desc->avg_packet_size)
162         desc->avg_packet_size=desc->max_packet_size;
163       handled=1;
164       *data=nl(*data);
165     }
166     if(filter(*data,"a=StartTime:integer;",&buf, BUFLEN)) {
167       desc->start_time=atoi(buf);
168       handled=1;
169       *data=nl(*data);
170     }
171     if(filter(*data,"a=Preroll:integer;",&buf, BUFLEN)) {
172       desc->preroll=atoi(buf);
173       handled=1;
174       *data=nl(*data);
175     }
176     if(filter(*data,"a=length:npt=",&buf, BUFLEN)) {
177       desc->duration=(uint32_t)(atof(buf)*1000);
178       handled=1;
179       *data=nl(*data);
180     }
181     if(filter(*data,"a=StreamName:string;",&buf, BUFLEN)) {
182       desc->stream_name=strdup(buf);
183       desc->stream_name_size=strlen(desc->stream_name);
184       handled=1;
185       *data=nl(*data);
186     }
187     if(filter(*data,"a=mimetype:string;",&buf, BUFLEN)) {
188       desc->mime_type=strdup(buf);
189       desc->mime_type_size=strlen(desc->mime_type);
190       handled=1;
191       *data=nl(*data);
192     }
193     if(filter(*data,"a=OpaqueData:buffer;",&buf, BUFLEN)) {
194       decoded = b64_decode(buf, decoded, &(desc->mlti_data_size));
195       if ( decoded != NULL ) {
196           desc->mlti_data = malloc(sizeof(char)*desc->mlti_data_size);
197           memcpy(desc->mlti_data, decoded, desc->mlti_data_size);
198           handled=1;
199           *data=nl(*data);
200           lprintf("mlti_data_size: %i\n", desc->mlti_data_size);
201       }
202     }
203     if(filter(*data,"a=ASMRuleBook:string;",&buf, BUFLEN)) {
204       desc->asm_rule_book=strdup(buf);
205       handled=1;
206       *data=nl(*data);
207     }
208
209     if(!handled) {
210 #ifdef LOG
211       int len=strchr(*data,'\n')-(*data);
212       memcpy(buf, *data, len+1);
213       buf[len]=0;
214       printf("libreal: sdpplin: not handled: '%s'\n", buf);
215 #endif
216       *data=nl(*data);
217     }
218   }
219   free( buf );
220   free( decoded) ;
221   return desc;
222
223 error:
224   free( decoded );
225   free( desc );
226   free( buf );
227   return NULL;
228 }
229
230 sdpplin_t *sdpplin_parse(char *data) {
231
232   sdpplin_t        *desc = malloc(sizeof(sdpplin_t));
233   sdpplin_stream_t *stream;
234   char             *buf=malloc(BUFLEN);
235   char             *decoded=malloc(BUFLEN);
236   int              handled;
237   int              len;
238
239   if( !desc ) return NULL;
240   if( !buf ) {
241     free( desc );
242     return NULL;
243   }
244   if( !decoded ) {
245     free( buf );
246     free( desc );
247     return NULL;
248   }
249
250   desc->stream = NULL;
251
252   memset(desc, 0, sizeof(sdpplin_t));
253
254   while (data && *data) {
255     handled=0;
256
257     if (filter(data, "m=", &buf, BUFLEN)) {
258         if ( !desc->stream ) {
259             fprintf(stderr, "sdpplin.c: stream identifier found before stream count, skipping.");
260             continue;
261         }
262         stream=sdpplin_parse_stream(&data);
263         lprintf("got data for stream id %u\n", stream->stream_id);
264         if ( stream->stream_id >= desc->stream_count )
265             lprintf("stream id %u is greater than stream count %u\n", stream->stream_id, desc->stream_count);
266         else
267             desc->stream[stream->stream_id]=stream;
268         continue;
269     }
270     if(filter(data,"a=Title:buffer;",&buf, BUFLEN)) {
271       decoded=b64_decode(buf, decoded, &len);
272           if ( decoded != NULL ) {
273           desc->title=strdup(decoded);
274           handled=1;
275           data=nl(data);
276       }
277     }
278     if(filter(data,"a=Author:buffer;",&buf, BUFLEN)) {
279       decoded=b64_decode(buf, decoded, &len);
280           if ( decoded != NULL ) {
281           desc->author=strdup(decoded);
282           handled=1;
283           data=nl(data);
284       }
285     }
286     if(filter(data,"a=Copyright:buffer;",&buf, BUFLEN)) {
287       decoded=b64_decode(buf, decoded, &len);
288           if ( decoded != NULL ) {
289           desc->copyright=strdup(decoded);
290           handled=1;
291           data=nl(data);
292       }
293     }
294     if(filter(data,"a=Abstract:buffer;",&buf, BUFLEN)) {
295       decoded=b64_decode(buf, decoded, &len);
296       if ( decoded != NULL ) {
297            desc->abstract=strdup(decoded);
298            handled=1;
299            data=nl(data);
300       }
301     }
302     if(filter(data,"a=StreamCount:integer;",&buf, BUFLEN)) {
303         /* This way negative values are mapped to unfeasibly high
304          * values, and will be discarded afterward
305          */
306         unsigned long tmp = strtoul(buf, NULL, 10);
307         if ( tmp > UINT16_MAX )
308             lprintf("stream count out of bound: %lu\n", tmp);
309         else
310             desc->stream_count = tmp;
311         desc->stream = malloc(sizeof(sdpplin_stream_t*)*desc->stream_count);
312         handled=1;
313         data=nl(data);
314     }
315     if(filter(data,"a=Flags:integer;",&buf, BUFLEN)) {
316       desc->flags=atoi(buf);
317       handled=1;
318       data=nl(data);
319     }
320
321     if(!handled) {
322 #ifdef LOG
323       int len=strchr(data,'\n')-data;
324       memcpy(buf, data, len+1);
325       buf[len]=0;
326       printf("libreal: sdpplin: not handled: '%s'\n", buf);
327 #endif
328       data=nl(data);
329     }
330   }
331
332   free( decoded );
333   free( buf );
334   return desc;
335 }
336
337 void sdpplin_free(sdpplin_t *description) {
338
339   int i;
340
341   if( !description ) return;
342
343   for( i=0; i<description->stream_count; i++ ) {
344     if( description->stream[i] ) {
345       free( description->stream[i]->id );
346       free( description->stream[i]->bandwidth );
347       free( description->stream[i]->range );
348       free( description->stream[i]->length );
349       free( description->stream[i]->rtpmap );
350       free( description->stream[i]->mimetype );
351       free( description->stream[i]->stream_name );
352       free( description->stream[i]->mime_type );
353       free( description->stream[i]->mlti_data );
354       free( description->stream[i]->rmff_flags );
355       free( description->stream[i]->asm_rule_book );
356       free( description->stream[i] );
357     }
358   }
359   if( description->stream_count ) free( description->stream );
360
361   free( description->owner );
362   free( description->session_name );
363   free( description->session_info );
364   free( description->uri );
365   free( description->email );
366   free( description->phone );
367   free( description->connection );
368   free( description->bandwidth );
369   free( description->title );
370   free( description->author );
371   free( description->copyright );
372   free( description->keywords );
373   free( description->asm_rule_book );
374   free( description->abstract );
375   free( description->range );
376   free(description);
377 }