Mercurial > mplayer.hg
comparison libmpdemux/realrtsp/real.c @ 9922:6cb7a295ab0e
Real rstp:// streaming support, ported from xine
author | rtognimp |
---|---|
date | Thu, 17 Apr 2003 20:39:41 +0000 |
parents | |
children | 0ddf649cff61 |
comparison
equal
deleted
inserted
replaced
9921:61057de81510 | 9922:6cb7a295ab0e |
---|---|
1 /* | |
2 * This file was ported to MPlayer from xine CVS real.c,v 1.8 2003/03/30 17:11:50 | |
3 */ | |
4 | |
5 /* | |
6 * Copyright (C) 2002 the xine project | |
7 * | |
8 * This file is part of xine, a free video player. | |
9 * | |
10 * xine is free software; you can redistribute it and/or modify | |
11 * it under the terms of the GNU General Public License as published by | |
12 * the Free Software Foundation; either version 2 of the License, or | |
13 * (at your option) any later version. | |
14 * | |
15 * xine is distributed in the hope that it will be useful, | |
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 * GNU General Public License for more details. | |
19 * | |
20 * You should have received a copy of the GNU General Public License | |
21 * along with this program; if not, write to the Free Software | |
22 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA | |
23 * | |
24 * | |
25 * special functions for real streams. | |
26 * adopted from joschkas real tools. | |
27 * | |
28 */ | |
29 | |
30 #include <stdio.h> | |
31 #include <string.h> | |
32 | |
33 #include "real.h" | |
34 #include "asmrp.h" | |
35 #include "sdpplin.h" | |
36 | |
37 /* | |
38 #define LOG | |
39 */ | |
40 | |
41 const unsigned char xor_table[] = { | |
42 0x05, 0x18, 0x74, 0xd0, 0x0d, 0x09, 0x02, 0x53, | |
43 0xc0, 0x01, 0x05, 0x05, 0x67, 0x03, 0x19, 0x70, | |
44 0x08, 0x27, 0x66, 0x10, 0x10, 0x72, 0x08, 0x09, | |
45 0x63, 0x11, 0x03, 0x71, 0x08, 0x08, 0x70, 0x02, | |
46 0x10, 0x57, 0x05, 0x18, 0x54, 0x00, 0x00, 0x00 }; | |
47 | |
48 | |
49 #define BE_32C(x,y) x[3]=(char)(y & 0xff);\ | |
50 x[2]=(char)((y >> 8) & 0xff);\ | |
51 x[1]=(char)((y >> 16) & 0xff);\ | |
52 x[0]=(char)((y >> 24) & 0xff); | |
53 | |
54 #define BE_16(x) ((((uint8_t*)(x))[0] << 8) | ((uint8_t*)(x))[1]) | |
55 | |
56 #define BE_32(x) ((((uint8_t*)(x))[0] << 24) | \ | |
57 (((uint8_t*)(x))[1] << 16) | \ | |
58 (((uint8_t*)(x))[2] << 8) | \ | |
59 ((uint8_t*)(x))[3]) | |
60 | |
61 #define MAX(x,y) ((x>y) ? x : y) | |
62 | |
63 #ifdef LOG | |
64 static void hexdump (const char *buf, int length) { | |
65 | |
66 int i; | |
67 | |
68 printf (" hexdump> "); | |
69 for (i = 0; i < length; i++) { | |
70 unsigned char c = buf[i]; | |
71 | |
72 printf ("%02x", c); | |
73 | |
74 if ((i % 16) == 15) | |
75 printf ("\n "); | |
76 | |
77 if ((i % 2) == 1) | |
78 printf (" "); | |
79 | |
80 } | |
81 printf ("\n"); | |
82 } | |
83 #endif | |
84 | |
85 | |
86 static void hash(char *field, char *param) { | |
87 | |
88 uint32_t a, b, c, d; | |
89 | |
90 | |
91 /* fill variables */ | |
92 memcpy(&a, field, sizeof(uint32_t)); | |
93 memcpy(&b, &field[4], sizeof(uint32_t)); | |
94 memcpy(&c, &field[8], sizeof(uint32_t)); | |
95 memcpy(&d, &field[12], sizeof(uint32_t)); | |
96 | |
97 #ifdef LOG | |
98 printf("real: hash input: %x %x %x %x\n", a, b, c, d); | |
99 printf("real: hash parameter:\n"); | |
100 hexdump(param, 64); | |
101 #endif | |
102 | |
103 a = ((b & c) | (~b & d)) + *((uint32_t*)(param+0x00)) + a - 0x28955B88; | |
104 a = ((a << 0x07) | (a >> 0x19)) + b; | |
105 d = ((a & b) | (~a & c)) + *((uint32_t*)(param+0x04)) + d - 0x173848AA; | |
106 d = ((d << 0x0c) | (d >> 0x14)) + a; | |
107 c = ((d & a) | (~d & b)) + *((uint32_t*)(param+0x08)) + c + 0x242070DB; | |
108 c = ((c << 0x11) | (c >> 0x0f)) + d; | |
109 b = ((c & d) | (~c & a)) + *((uint32_t*)(param+0x0c)) + b - 0x3E423112; | |
110 b = ((b << 0x16) | (b >> 0x0a)) + c; | |
111 a = ((b & c) | (~b & d)) + *((uint32_t*)(param+0x10)) + a - 0x0A83F051; | |
112 a = ((a << 0x07) | (a >> 0x19)) + b; | |
113 d = ((a & b) | (~a & c)) + *((uint32_t*)(param+0x14)) + d + 0x4787C62A; | |
114 d = ((d << 0x0c) | (d >> 0x14)) + a; | |
115 c = ((d & a) | (~d & b)) + *((uint32_t*)(param+0x18)) + c - 0x57CFB9ED; | |
116 c = ((c << 0x11) | (c >> 0x0f)) + d; | |
117 b = ((c & d) | (~c & a)) + *((uint32_t*)(param+0x1c)) + b - 0x02B96AFF; | |
118 b = ((b << 0x16) | (b >> 0x0a)) + c; | |
119 a = ((b & c) | (~b & d)) + *((uint32_t*)(param+0x20)) + a + 0x698098D8; | |
120 a = ((a << 0x07) | (a >> 0x19)) + b; | |
121 d = ((a & b) | (~a & c)) + *((uint32_t*)(param+0x24)) + d - 0x74BB0851; | |
122 d = ((d << 0x0c) | (d >> 0x14)) + a; | |
123 c = ((d & a) | (~d & b)) + *((uint32_t*)(param+0x28)) + c - 0x0000A44F; | |
124 c = ((c << 0x11) | (c >> 0x0f)) + d; | |
125 b = ((c & d) | (~c & a)) + *((uint32_t*)(param+0x2C)) + b - 0x76A32842; | |
126 b = ((b << 0x16) | (b >> 0x0a)) + c; | |
127 a = ((b & c) | (~b & d)) + *((uint32_t*)(param+0x30)) + a + 0x6B901122; | |
128 a = ((a << 0x07) | (a >> 0x19)) + b; | |
129 d = ((a & b) | (~a & c)) + *((uint32_t*)(param+0x34)) + d - 0x02678E6D; | |
130 d = ((d << 0x0c) | (d >> 0x14)) + a; | |
131 c = ((d & a) | (~d & b)) + *((uint32_t*)(param+0x38)) + c - 0x5986BC72; | |
132 c = ((c << 0x11) | (c >> 0x0f)) + d; | |
133 b = ((c & d) | (~c & a)) + *((uint32_t*)(param+0x3c)) + b + 0x49B40821; | |
134 b = ((b << 0x16) | (b >> 0x0a)) + c; | |
135 | |
136 a = ((b & d) | (~d & c)) + *((uint32_t*)(param+0x04)) + a - 0x09E1DA9E; | |
137 a = ((a << 0x05) | (a >> 0x1b)) + b; | |
138 d = ((a & c) | (~c & b)) + *((uint32_t*)(param+0x18)) + d - 0x3FBF4CC0; | |
139 d = ((d << 0x09) | (d >> 0x17)) + a; | |
140 c = ((d & b) | (~b & a)) + *((uint32_t*)(param+0x2c)) + c + 0x265E5A51; | |
141 c = ((c << 0x0e) | (c >> 0x12)) + d; | |
142 b = ((c & a) | (~a & d)) + *((uint32_t*)(param+0x00)) + b - 0x16493856; | |
143 b = ((b << 0x14) | (b >> 0x0c)) + c; | |
144 a = ((b & d) | (~d & c)) + *((uint32_t*)(param+0x14)) + a - 0x29D0EFA3; | |
145 a = ((a << 0x05) | (a >> 0x1b)) + b; | |
146 d = ((a & c) | (~c & b)) + *((uint32_t*)(param+0x28)) + d + 0x02441453; | |
147 d = ((d << 0x09) | (d >> 0x17)) + a; | |
148 c = ((d & b) | (~b & a)) + *((uint32_t*)(param+0x3c)) + c - 0x275E197F; | |
149 c = ((c << 0x0e) | (c >> 0x12)) + d; | |
150 b = ((c & a) | (~a & d)) + *((uint32_t*)(param+0x10)) + b - 0x182C0438; | |
151 b = ((b << 0x14) | (b >> 0x0c)) + c; | |
152 a = ((b & d) | (~d & c)) + *((uint32_t*)(param+0x24)) + a + 0x21E1CDE6; | |
153 a = ((a << 0x05) | (a >> 0x1b)) + b; | |
154 d = ((a & c) | (~c & b)) + *((uint32_t*)(param+0x38)) + d - 0x3CC8F82A; | |
155 d = ((d << 0x09) | (d >> 0x17)) + a; | |
156 c = ((d & b) | (~b & a)) + *((uint32_t*)(param+0x0c)) + c - 0x0B2AF279; | |
157 c = ((c << 0x0e) | (c >> 0x12)) + d; | |
158 b = ((c & a) | (~a & d)) + *((uint32_t*)(param+0x20)) + b + 0x455A14ED; | |
159 b = ((b << 0x14) | (b >> 0x0c)) + c; | |
160 a = ((b & d) | (~d & c)) + *((uint32_t*)(param+0x34)) + a - 0x561C16FB; | |
161 a = ((a << 0x05) | (a >> 0x1b)) + b; | |
162 d = ((a & c) | (~c & b)) + *((uint32_t*)(param+0x08)) + d - 0x03105C08; | |
163 d = ((d << 0x09) | (d >> 0x17)) + a; | |
164 c = ((d & b) | (~b & a)) + *((uint32_t*)(param+0x1c)) + c + 0x676F02D9; | |
165 c = ((c << 0x0e) | (c >> 0x12)) + d; | |
166 b = ((c & a) | (~a & d)) + *((uint32_t*)(param+0x30)) + b - 0x72D5B376; | |
167 b = ((b << 0x14) | (b >> 0x0c)) + c; | |
168 | |
169 a = (b ^ c ^ d) + *((uint32_t*)(param+0x14)) + a - 0x0005C6BE; | |
170 a = ((a << 0x04) | (a >> 0x1c)) + b; | |
171 d = (a ^ b ^ c) + *((uint32_t*)(param+0x20)) + d - 0x788E097F; | |
172 d = ((d << 0x0b) | (d >> 0x15)) + a; | |
173 c = (d ^ a ^ b) + *((uint32_t*)(param+0x2c)) + c + 0x6D9D6122; | |
174 c = ((c << 0x10) | (c >> 0x10)) + d; | |
175 b = (c ^ d ^ a) + *((uint32_t*)(param+0x38)) + b - 0x021AC7F4; | |
176 b = ((b << 0x17) | (b >> 0x09)) + c; | |
177 a = (b ^ c ^ d) + *((uint32_t*)(param+0x04)) + a - 0x5B4115BC; | |
178 a = ((a << 0x04) | (a >> 0x1c)) + b; | |
179 d = (a ^ b ^ c) + *((uint32_t*)(param+0x10)) + d + 0x4BDECFA9; | |
180 d = ((d << 0x0b) | (d >> 0x15)) + a; | |
181 c = (d ^ a ^ b) + *((uint32_t*)(param+0x1c)) + c - 0x0944B4A0; | |
182 c = ((c << 0x10) | (c >> 0x10)) + d; | |
183 b = (c ^ d ^ a) + *((uint32_t*)(param+0x28)) + b - 0x41404390; | |
184 b = ((b << 0x17) | (b >> 0x09)) + c; | |
185 a = (b ^ c ^ d) + *((uint32_t*)(param+0x34)) + a + 0x289B7EC6; | |
186 a = ((a << 0x04) | (a >> 0x1c)) + b; | |
187 d = (a ^ b ^ c) + *((uint32_t*)(param+0x00)) + d - 0x155ED806; | |
188 d = ((d << 0x0b) | (d >> 0x15)) + a; | |
189 c = (d ^ a ^ b) + *((uint32_t*)(param+0x0c)) + c - 0x2B10CF7B; | |
190 c = ((c << 0x10) | (c >> 0x10)) + d; | |
191 b = (c ^ d ^ a) + *((uint32_t*)(param+0x18)) + b + 0x04881D05; | |
192 b = ((b << 0x17) | (b >> 0x09)) + c; | |
193 a = (b ^ c ^ d) + *((uint32_t*)(param+0x24)) + a - 0x262B2FC7; | |
194 a = ((a << 0x04) | (a >> 0x1c)) + b; | |
195 d = (a ^ b ^ c) + *((uint32_t*)(param+0x30)) + d - 0x1924661B; | |
196 d = ((d << 0x0b) | (d >> 0x15)) + a; | |
197 c = (d ^ a ^ b) + *((uint32_t*)(param+0x3c)) + c + 0x1fa27cf8; | |
198 c = ((c << 0x10) | (c >> 0x10)) + d; | |
199 b = (c ^ d ^ a) + *((uint32_t*)(param+0x08)) + b - 0x3B53A99B; | |
200 b = ((b << 0x17) | (b >> 0x09)) + c; | |
201 | |
202 a = ((~d | b) ^ c) + *((uint32_t*)(param+0x00)) + a - 0x0BD6DDBC; | |
203 a = ((a << 0x06) | (a >> 0x1a)) + b; | |
204 d = ((~c | a) ^ b) + *((uint32_t*)(param+0x1c)) + d + 0x432AFF97; | |
205 d = ((d << 0x0a) | (d >> 0x16)) + a; | |
206 c = ((~b | d) ^ a) + *((uint32_t*)(param+0x38)) + c - 0x546BDC59; | |
207 c = ((c << 0x0f) | (c >> 0x11)) + d; | |
208 b = ((~a | c) ^ d) + *((uint32_t*)(param+0x14)) + b - 0x036C5FC7; | |
209 b = ((b << 0x15) | (b >> 0x0b)) + c; | |
210 a = ((~d | b) ^ c) + *((uint32_t*)(param+0x30)) + a + 0x655B59C3; | |
211 a = ((a << 0x06) | (a >> 0x1a)) + b; | |
212 d = ((~c | a) ^ b) + *((uint32_t*)(param+0x0C)) + d - 0x70F3336E; | |
213 d = ((d << 0x0a) | (d >> 0x16)) + a; | |
214 c = ((~b | d) ^ a) + *((uint32_t*)(param+0x28)) + c - 0x00100B83; | |
215 c = ((c << 0x0f) | (c >> 0x11)) + d; | |
216 b = ((~a | c) ^ d) + *((uint32_t*)(param+0x04)) + b - 0x7A7BA22F; | |
217 b = ((b << 0x15) | (b >> 0x0b)) + c; | |
218 a = ((~d | b) ^ c) + *((uint32_t*)(param+0x20)) + a + 0x6FA87E4F; | |
219 a = ((a << 0x06) | (a >> 0x1a)) + b; | |
220 d = ((~c | a) ^ b) + *((uint32_t*)(param+0x3c)) + d - 0x01D31920; | |
221 d = ((d << 0x0a) | (d >> 0x16)) + a; | |
222 c = ((~b | d) ^ a) + *((uint32_t*)(param+0x18)) + c - 0x5CFEBCEC; | |
223 c = ((c << 0x0f) | (c >> 0x11)) + d; | |
224 b = ((~a | c) ^ d) + *((uint32_t*)(param+0x34)) + b + 0x4E0811A1; | |
225 b = ((b << 0x15) | (b >> 0x0b)) + c; | |
226 a = ((~d | b) ^ c) + *((uint32_t*)(param+0x10)) + a - 0x08AC817E; | |
227 a = ((a << 0x06) | (a >> 0x1a)) + b; | |
228 d = ((~c | a) ^ b) + *((uint32_t*)(param+0x2c)) + d - 0x42C50DCB; | |
229 d = ((d << 0x0a) | (d >> 0x16)) + a; | |
230 c = ((~b | d) ^ a) + *((uint32_t*)(param+0x08)) + c + 0x2AD7D2BB; | |
231 c = ((c << 0x0f) | (c >> 0x11)) + d; | |
232 b = ((~a | c) ^ d) + *((uint32_t*)(param+0x24)) + b - 0x14792C6F; | |
233 b = ((b << 0x15) | (b >> 0x0b)) + c; | |
234 | |
235 #ifdef LOG | |
236 printf("real: hash output: %x %x %x %x\n", a, b, c, d); | |
237 #endif | |
238 | |
239 *((uint32_t *)(field+0)) += a; | |
240 *((uint32_t *)(field+4)) += b; | |
241 *((uint32_t *)(field+8)) += c; | |
242 *((uint32_t *)(field+12)) += d; | |
243 } | |
244 | |
245 static void call_hash (char *key, char *challenge, int len) { | |
246 | |
247 uint32_t *ptr1, *ptr2; | |
248 uint32_t a, b, c, d; | |
249 | |
250 ptr1=(uint32_t*)(key+16); | |
251 ptr2=(uint32_t*)(key+20); | |
252 | |
253 a = *ptr1; | |
254 b = (a >> 3) & 0x3f; | |
255 a += len * 8; | |
256 *ptr1 = a; | |
257 | |
258 if (a < (len << 3)) | |
259 { | |
260 #ifdef LOG | |
261 printf("not verified: (len << 3) > a true\n"); | |
262 #endif | |
263 ptr2 += 4; | |
264 } | |
265 | |
266 *ptr2 += (len >> 0x1d); | |
267 a = 64 - b; | |
268 c = 0; | |
269 if (a <= len) | |
270 { | |
271 | |
272 memcpy(key+b+24, challenge, a); | |
273 hash(key, key+24); | |
274 c = a; | |
275 d = c + 0x3f; | |
276 | |
277 while ( d < len ) { | |
278 | |
279 #ifdef LOG | |
280 printf("not verified: while ( d < len )\n"); | |
281 #endif | |
282 hash(key, challenge+d-0x3f); | |
283 d += 64; | |
284 c += 64; | |
285 } | |
286 b = 0; | |
287 } | |
288 | |
289 memcpy(key+b+24, challenge+c, len-c); | |
290 } | |
291 | |
292 static void calc_response (char *result, char *field) { | |
293 | |
294 char buf1[128]; | |
295 char buf2[128]; | |
296 int i; | |
297 | |
298 memset (buf1, 0, 64); | |
299 *buf1 = 128; | |
300 | |
301 memcpy (buf2, field+16, 8); | |
302 | |
303 i = ( *((uint32_t*)(buf2)) >> 3 ) & 0x3f; | |
304 | |
305 if (i < 56) { | |
306 i = 56 - i; | |
307 } else { | |
308 #ifdef LOG | |
309 printf("not verified: ! (i < 56)\n"); | |
310 #endif | |
311 i = 120 - i; | |
312 } | |
313 | |
314 call_hash (field, buf1, i); | |
315 call_hash (field, buf2, 8); | |
316 | |
317 memcpy (result, field, 16); | |
318 | |
319 } | |
320 | |
321 | |
322 static void calc_response_string (char *result, char *challenge) { | |
323 | |
324 char field[128]; | |
325 char zres[20]; | |
326 int i; | |
327 | |
328 /* initialize our field */ | |
329 BE_32C (field, 0x01234567); | |
330 BE_32C ((field+4), 0x89ABCDEF); | |
331 BE_32C ((field+8), 0xFEDCBA98); | |
332 BE_32C ((field+12), 0x76543210); | |
333 BE_32C ((field+16), 0x00000000); | |
334 BE_32C ((field+20), 0x00000000); | |
335 | |
336 /* calculate response */ | |
337 call_hash(field, challenge, 64); | |
338 calc_response(zres,field); | |
339 | |
340 /* convert zres to ascii string */ | |
341 for (i=0; i<16; i++ ) { | |
342 char a, b; | |
343 | |
344 a = (zres[i] >> 4) & 15; | |
345 b = zres[i] & 15; | |
346 | |
347 result[i*2] = ((a<10) ? (a+48) : (a+87)) & 255; | |
348 result[i*2+1] = ((b<10) ? (b+48) : (b+87)) & 255; | |
349 } | |
350 } | |
351 | |
352 void real_calc_response_and_checksum (char *response, char *chksum, char *challenge) { | |
353 | |
354 int ch_len, table_len, resp_len; | |
355 int i; | |
356 char *ptr; | |
357 char buf[128]; | |
358 | |
359 /* initialize return values */ | |
360 memset(response, 0, 64); | |
361 memset(chksum, 0, 34); | |
362 | |
363 /* initialize buffer */ | |
364 memset(buf, 0, 128); | |
365 ptr=buf; | |
366 BE_32C(ptr, 0xa1e9149d); | |
367 ptr+=4; | |
368 BE_32C(ptr, 0x0e6b3b59); | |
369 ptr+=4; | |
370 | |
371 /* some (length) checks */ | |
372 if (challenge != NULL) | |
373 { | |
374 ch_len = strlen (challenge); | |
375 | |
376 if (ch_len == 40) /* what a hack... */ | |
377 { | |
378 challenge[32]=0; | |
379 ch_len=32; | |
380 } | |
381 if ( ch_len > 56 ) ch_len=56; | |
382 | |
383 /* copy challenge to buf */ | |
384 memcpy(ptr, challenge, ch_len); | |
385 } | |
386 | |
387 if (xor_table != NULL) | |
388 { | |
389 table_len = strlen(xor_table); | |
390 | |
391 if (table_len > 56) table_len=56; | |
392 | |
393 /* xor challenge bytewise with xor_table */ | |
394 for (i=0; i<table_len; i++) | |
395 ptr[i] = ptr[i] ^ xor_table[i]; | |
396 } | |
397 | |
398 calc_response_string (response, buf); | |
399 | |
400 /* add tail */ | |
401 resp_len = strlen (response); | |
402 strcpy (&response[resp_len], "01d0a8e3"); | |
403 | |
404 /* calculate checksum */ | |
405 for (i=0; i<resp_len/4; i++) | |
406 chksum[i] = response[i*4]; | |
407 } | |
408 | |
409 | |
410 /* | |
411 * takes a MLTI-Chunk and a rule number got from match_asm_rule, | |
412 * returns a pointer to selected data and number of bytes in that. | |
413 */ | |
414 | |
415 static int select_mlti_data(const char *mlti_chunk, int mlti_size, int selection, char *out) { | |
416 | |
417 int numrules, codec, size; | |
418 int i; | |
419 | |
420 /* MLTI chunk should begin with MLTI */ | |
421 | |
422 if ((mlti_chunk[0] != 'M') | |
423 ||(mlti_chunk[1] != 'L') | |
424 ||(mlti_chunk[2] != 'T') | |
425 ||(mlti_chunk[3] != 'I')) | |
426 { | |
427 #ifdef LOG | |
428 printf("libreal: MLTI tag not detected, copying data\n"); | |
429 #endif | |
430 memcpy(out, mlti_chunk, mlti_size); | |
431 return mlti_size; | |
432 } | |
433 | |
434 mlti_chunk+=4; | |
435 | |
436 /* next 16 bits are the number of rules */ | |
437 numrules=BE_16(mlti_chunk); | |
438 if (selection >= numrules) return 0; | |
439 | |
440 /* now <numrules> indices of codecs follows */ | |
441 /* we skip to selection */ | |
442 mlti_chunk+=(selection+1)*2; | |
443 | |
444 /* get our index */ | |
445 codec=BE_16(mlti_chunk); | |
446 | |
447 /* skip to number of codecs */ | |
448 mlti_chunk+=(numrules-selection)*2; | |
449 | |
450 /* get number of codecs */ | |
451 numrules=BE_16(mlti_chunk); | |
452 | |
453 if (codec >= numrules) { | |
454 printf("codec index >= number of codecs. %i %i\n", codec, numrules); | |
455 return 0; | |
456 } | |
457 | |
458 mlti_chunk+=2; | |
459 | |
460 /* now seek to selected codec */ | |
461 for (i=0; i<codec; i++) { | |
462 size=BE_32(mlti_chunk); | |
463 mlti_chunk+=size+4; | |
464 } | |
465 | |
466 size=BE_32(mlti_chunk); | |
467 | |
468 #ifdef LOG | |
469 hexdump(mlti_chunk+4, size); | |
470 #endif | |
471 memcpy(out,mlti_chunk+4, size); | |
472 return size; | |
473 } | |
474 | |
475 /* | |
476 * looking at stream description. | |
477 */ | |
478 | |
479 rmff_header_t *real_parse_sdp(char *data, char *stream_rules, uint32_t bandwidth) { | |
480 | |
481 sdpplin_t *desc; | |
482 rmff_header_t *header; | |
483 char buf[2048]; | |
484 int len, i; | |
485 int max_bit_rate=0; | |
486 int avg_bit_rate=0; | |
487 int max_packet_size=0; | |
488 int avg_packet_size=0; | |
489 int duration=0; | |
490 | |
491 | |
492 if (!data) return NULL; | |
493 | |
494 desc=sdpplin_parse(data); | |
495 | |
496 if (!desc) return NULL; | |
497 | |
498 header=calloc(1,sizeof(rmff_header_t)); | |
499 | |
500 header->fileheader=rmff_new_fileheader(4+desc->stream_count); | |
501 header->cont=rmff_new_cont( | |
502 desc->title, | |
503 desc->author, | |
504 desc->copyright, | |
505 desc->abstract); | |
506 header->data=rmff_new_dataheader(0,0); | |
507 header->streams=calloc(1,sizeof(rmff_mdpr_t*)*(desc->stream_count+1)); | |
508 #ifdef LOG | |
509 printf("number of streams: %u\n", desc->stream_count); | |
510 #endif | |
511 | |
512 for (i=0; i<desc->stream_count; i++) { | |
513 | |
514 int j=0; | |
515 int n; | |
516 char b[64]; | |
517 int rulematches[16]; | |
518 | |
519 #ifdef LOG | |
520 printf("calling asmrp_match with:\n%s\n%u\n", desc->stream[i]->asm_rule_book, bandwidth); | |
521 #endif | |
522 n=asmrp_match(desc->stream[i]->asm_rule_book, bandwidth, rulematches); | |
523 for (j=0; j<n; j++) { | |
524 #ifdef LOG | |
525 printf("asmrp rule match: %u for stream %u\n", rulematches[j], desc->stream[i]->stream_id); | |
526 #endif | |
527 sprintf(b,"stream=%u;rule=%u,", desc->stream[i]->stream_id, rulematches[j]); | |
528 strcat(stream_rules, b); | |
529 } | |
530 | |
531 if (!desc->stream[i]->mlti_data) return NULL; | |
532 | |
533 len=select_mlti_data(desc->stream[i]->mlti_data, desc->stream[i]->mlti_data_size, rulematches[0], buf); | |
534 | |
535 header->streams[i]=rmff_new_mdpr( | |
536 desc->stream[i]->stream_id, | |
537 desc->stream[i]->max_bit_rate, | |
538 desc->stream[i]->avg_bit_rate, | |
539 desc->stream[i]->max_packet_size, | |
540 desc->stream[i]->avg_packet_size, | |
541 desc->stream[i]->start_time, | |
542 desc->stream[i]->preroll, | |
543 desc->stream[i]->duration, | |
544 desc->stream[i]->stream_name, | |
545 desc->stream[i]->mime_type, | |
546 len, | |
547 buf); | |
548 | |
549 duration=MAX(duration,desc->stream[i]->duration); | |
550 max_bit_rate+=desc->stream[i]->max_bit_rate; | |
551 avg_bit_rate+=desc->stream[i]->avg_bit_rate; | |
552 max_packet_size=MAX(max_packet_size, desc->stream[i]->max_packet_size); | |
553 if (avg_packet_size) | |
554 avg_packet_size=(avg_packet_size + desc->stream[i]->avg_packet_size) / 2; | |
555 else | |
556 avg_packet_size=desc->stream[i]->avg_packet_size; | |
557 } | |
558 | |
559 if (stream_rules) | |
560 stream_rules[strlen(stream_rules)-1]=0; /* delete last ',' in stream_rules */ | |
561 | |
562 header->prop=rmff_new_prop( | |
563 max_bit_rate, | |
564 avg_bit_rate, | |
565 max_packet_size, | |
566 avg_packet_size, | |
567 0, | |
568 duration, | |
569 0, | |
570 0, | |
571 0, | |
572 desc->stream_count, | |
573 desc->flags); | |
574 | |
575 rmff_fix_header(header); | |
576 | |
577 return header; | |
578 } | |
579 | |
580 int real_get_rdt_chunk(rtsp_t *rtsp_session, char *buffer) { | |
581 | |
582 int n=1; | |
583 uint8_t header[8]; | |
584 rmff_pheader_t ph; | |
585 int size; | |
586 int flags1; | |
587 int unknown1; | |
588 uint32_t ts; | |
589 | |
590 n=rtsp_read_data(rtsp_session, header, 8); | |
591 if (n<8) return 0; | |
592 if (header[0] != 0x24) | |
593 { | |
594 printf("rdt chunk not recognized: got 0x%02x\n", header[0]); | |
595 return 0; | |
596 } | |
597 size=(header[1]<<12)+(header[2]<<8)+(header[3]); | |
598 flags1=header[4]; | |
599 if ((flags1!=0x40)&&(flags1!=0x42)) | |
600 { | |
601 #ifdef LOG | |
602 printf("got flags1: 0x%02x\n",flags1); | |
603 #endif | |
604 header[0]=header[5]; | |
605 header[1]=header[6]; | |
606 header[2]=header[7]; | |
607 n=rtsp_read_data(rtsp_session, header+3, 5); | |
608 if (n<5) return 0; | |
609 #ifdef LOG | |
610 printf("ignoring bytes:\n"); | |
611 hexdump(header, 8); | |
612 #endif | |
613 n=rtsp_read_data(rtsp_session, header+4, 4); | |
614 if (n<4) return 0; | |
615 flags1=header[4]; | |
616 size-=9; | |
617 } | |
618 unknown1=(header[5]<<12)+(header[6]<<8)+(header[7]); | |
619 n=rtsp_read_data(rtsp_session, header, 6); | |
620 if (n<6) return 0; | |
621 ts=BE_32(header); | |
622 | |
623 #ifdef LOG | |
624 printf("ts: %u size: %u, flags: 0x%02x, unknown values: %u 0x%02x 0x%02x\n", | |
625 ts, size, flags1, unknown1, header[4], header[5]); | |
626 #endif | |
627 size+=2; | |
628 | |
629 ph.object_version=0; | |
630 ph.length=size; | |
631 ph.stream_number=(flags1>>1)&1; | |
632 ph.timestamp=ts; | |
633 ph.reserved=0; | |
634 ph.flags=0; /* TODO: determine keyframe flag and insert here? */ | |
635 rmff_dump_pheader(&ph, buffer); | |
636 size-=12; | |
637 n=rtsp_read_data(rtsp_session, buffer+12, size); | |
638 | |
639 return n+12; | |
640 } | |
641 | |
642 rmff_header_t *real_setup_and_get_header(rtsp_t *rtsp_session, uint32_t bandwidth) { | |
643 | |
644 char *description=NULL; | |
645 char *session_id=NULL; | |
646 rmff_header_t *h; | |
647 char *challenge1; | |
648 char challenge2[64]; | |
649 char checksum[34]; | |
650 char subscribe[256]; | |
651 char buf[256]; | |
652 char *mrl=rtsp_get_mrl(rtsp_session); | |
653 unsigned int size; | |
654 int status; | |
655 | |
656 /* get challenge */ | |
657 challenge1=strdup(rtsp_search_answers(rtsp_session,"RealChallenge1")); | |
658 #ifdef LOG | |
659 printf("real: Challenge1: %s\n", challenge1); | |
660 #endif | |
661 | |
662 /* request stream description */ | |
663 rtsp_schedule_field(rtsp_session, "Accept: application/sdp"); | |
664 sprintf(buf, "Bandwidth: %u", bandwidth); | |
665 rtsp_schedule_field(rtsp_session, buf); | |
666 rtsp_schedule_field(rtsp_session, "GUID: 00000000-0000-0000-0000-000000000000"); | |
667 rtsp_schedule_field(rtsp_session, "RegionData: 0"); | |
668 rtsp_schedule_field(rtsp_session, "ClientID: Linux_2.4_6.0.9.1235_play32_RN01_EN_586"); | |
669 rtsp_schedule_field(rtsp_session, "SupportsMaximumASMBandwidth: 1"); | |
670 rtsp_schedule_field(rtsp_session, "Language: en-US"); | |
671 rtsp_schedule_field(rtsp_session, "Require: com.real.retain-entity-for-setup"); | |
672 status=rtsp_request_describe(rtsp_session,NULL); | |
673 | |
674 if ( status<200 || status>299 ) | |
675 { | |
676 char *alert=rtsp_search_answers(rtsp_session,"Alert"); | |
677 if (alert) { | |
678 printf("real: got message from server:\n%s\n", alert); | |
679 } | |
680 rtsp_send_ok(rtsp_session); | |
681 return NULL; | |
682 } | |
683 | |
684 /* receive description */ | |
685 size=0; | |
686 if (!rtsp_search_answers(rtsp_session,"Content-length")) | |
687 printf("real: got no Content-length!\n"); | |
688 else | |
689 size=atoi(rtsp_search_answers(rtsp_session,"Content-length")); | |
690 | |
691 if (!rtsp_search_answers(rtsp_session,"ETag")) | |
692 printf("real: got no ETag!\n"); | |
693 else | |
694 session_id=strdup(rtsp_search_answers(rtsp_session,"ETag")); | |
695 | |
696 #ifdef LOG | |
697 printf("real: Stream description size: %i\n", size); | |
698 #endif | |
699 | |
700 description=malloc(sizeof(char)*(size+1)); | |
701 | |
702 rtsp_read_data(rtsp_session, description, size); | |
703 description[size]=0; | |
704 | |
705 /* parse sdp (sdpplin) and create a header and a subscribe string */ | |
706 strcpy(subscribe, "Subscribe: "); | |
707 h=real_parse_sdp(description, subscribe+11, bandwidth); | |
708 if (!h) return NULL; | |
709 rmff_fix_header(h); | |
710 | |
711 #ifdef LOG | |
712 printf("Title: %s\nCopyright: %s\nAuthor: %s\nStreams: %i\n", | |
713 h->cont->title, h->cont->copyright, h->cont->author, h->prop->num_streams); | |
714 #endif | |
715 | |
716 /* setup our streams */ | |
717 real_calc_response_and_checksum (challenge2, checksum, challenge1); | |
718 sprintf(buf, "RealChallenge2: %s, sd=%s", challenge2, checksum); | |
719 rtsp_schedule_field(rtsp_session, buf); | |
720 sprintf(buf, "If-Match: %s", session_id); | |
721 rtsp_schedule_field(rtsp_session, buf); | |
722 rtsp_schedule_field(rtsp_session, "Transport: x-pn-tng/tcp;mode=play,rtp/avp/tcp;unicast;mode=play"); | |
723 sprintf(buf, "%s/streamid=0", mrl); | |
724 rtsp_request_setup(rtsp_session,buf); | |
725 | |
726 if (h->prop->num_streams > 1) { | |
727 rtsp_schedule_field(rtsp_session, "Transport: x-pn-tng/tcp;mode=play,rtp/avp/tcp;unicast;mode=play"); | |
728 sprintf(buf, "If-Match: %s", session_id); | |
729 rtsp_schedule_field(rtsp_session, buf); | |
730 | |
731 sprintf(buf, "%s/streamid=1", mrl); | |
732 rtsp_request_setup(rtsp_session,buf); | |
733 } | |
734 /* set stream parameter (bandwidth) with our subscribe string */ | |
735 rtsp_schedule_field(rtsp_session, subscribe); | |
736 rtsp_request_setparameter(rtsp_session,NULL); | |
737 | |
738 /* and finally send a play request */ | |
739 rtsp_schedule_field(rtsp_session, "Range: npt=0-"); | |
740 rtsp_request_play(rtsp_session,NULL); | |
741 | |
742 return h; | |
743 } | |
744 |