2687
|
1 // VIVO file parser by A'rpi
|
2784
|
2 // VIVO text header parser by alex
|
2687
|
3
|
|
4 #include <stdio.h>
|
|
5 #include <stdlib.h>
|
|
6 #include <unistd.h>
|
|
7
|
|
8 #include "config.h"
|
|
9 #include "mp_msg.h"
|
|
10 #include "help_mp.h"
|
|
11
|
|
12 #include "stream.h"
|
|
13 #include "demuxer.h"
|
|
14 #include "stheader.h"
|
|
15
|
|
16 #include "bswap.h"
|
|
17
|
|
18 typedef struct {
|
2784
|
19 /* generic */
|
|
20 int supported;
|
|
21 /* info */
|
|
22 char *title;
|
|
23 char *author;
|
|
24 char *copyright;
|
|
25 char *producer;
|
|
26 /* video */
|
|
27 float fps;
|
|
28 int width;
|
|
29 int height;
|
|
30 int disp_width;
|
|
31 int disp_height;
|
|
32 /* audio */
|
|
33 int br;
|
|
34 int samplerate;
|
2687
|
35 } vivo_priv_t;
|
|
36
|
2784
|
37 /* parse all possible extra headers */
|
|
38 /* (audio headers are seperate - mostly with recordtype=3) */
|
|
39 #define TEXTPARSE_ALL 1
|
|
40
|
|
41 static void vivo_parse_text_header(demuxer_t *demux, int header_len)
|
|
42 {
|
|
43 vivo_priv_t* priv = demux->priv;
|
|
44 char *buf;
|
|
45 int i;
|
|
46 char *token;
|
|
47 char *opt, *param;
|
|
48
|
|
49 if (!demux->priv)
|
|
50 {
|
|
51 priv = malloc(sizeof(vivo_priv_t));
|
|
52 memset(priv, 0, sizeof(vivo_priv_t));
|
|
53 demux->priv = priv;
|
|
54 priv->supported = 0;
|
|
55 }
|
|
56
|
|
57 buf = malloc(header_len);
|
|
58 opt = malloc(header_len);
|
|
59 param = malloc(header_len);
|
|
60 stream_read(demux->stream, buf, header_len);
|
|
61 i=0;
|
|
62 while(i<header_len && buf[i]==0x0D && buf[i+1]==0x0A) i+=2; // skip empty lines
|
|
63
|
|
64 token = strtok(buf, (char *)&("\x0d\x0a"));
|
|
65 while (token && (header_len>2))
|
|
66 {
|
|
67 header_len -= strlen(token)+2;
|
|
68 if (sscanf(token, "%[^:]:%[^\n]", opt, param) != 2)
|
|
69 {
|
|
70 mp_msg(MSGT_DEMUX, MSGL_V, "viv_text_header_parser: bad line: '%s' at ~%p\n",
|
|
71 token, stream_tell(demux->stream));
|
|
72 break;
|
|
73 }
|
|
74 mp_msg(MSGT_DEMUX, MSGL_DBG3, "token: '%s' (%d bytes/%d bytes left)\n",
|
|
75 token, strlen(token), header_len);
|
|
76 mp_msg(MSGT_DEMUX, MSGL_DBG3, "token => o: '%s', p: '%s'\n",
|
|
77 opt, param);
|
|
78
|
|
79 /* checking versions: only v1 or v2 is suitable (or known?:) */
|
|
80 if (!strcmp(opt, "Version"))
|
|
81 {
|
|
82 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Version: %s\n", param);
|
|
83 if (atoi(param) == 1 || atoi(param) == 2)
|
|
84 priv->supported = 1;
|
|
85 }
|
|
86
|
|
87 /* video specific */
|
|
88 if (!strcmp(opt, "FPS"))
|
|
89 {
|
|
90 mp_msg(MSGT_DEMUX, MSGL_DBG2, "FPS: %f\n", atof(param));
|
|
91 priv->fps = atof(param);
|
|
92 }
|
|
93 if (!strcmp(opt, "Width"))
|
|
94 {
|
|
95 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Width: %d\n", atoi(param));
|
|
96 priv->width = atoi(param);
|
|
97 }
|
|
98 if (!strcmp(opt, "Height"))
|
|
99 {
|
|
100 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Height: %d\n", atoi(param));
|
|
101 priv->height = atoi(param);
|
|
102 }
|
|
103 if (!strcmp(opt, "DisplayWidth"))
|
|
104 {
|
|
105 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Display Width: %d\n", atoi(param));
|
|
106 priv->disp_width = atoi(param);
|
|
107 }
|
|
108 if (!strcmp(opt, "DisplayHeight"))
|
|
109 {
|
|
110 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Display Height: %d\n", atoi(param));
|
|
111 priv->disp_height = atoi(param);
|
|
112 }
|
|
113
|
|
114 /* audio specific */
|
|
115 if (!strcmp(opt, "NominalBitrate"))
|
|
116 {
|
|
117 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Bitrate: %d\n", atoi(param));
|
|
118 priv->br = atoi(param);
|
|
119 }
|
|
120 if (!strcmp(opt, "SamplingFrequency"))
|
|
121 {
|
|
122 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Samplerate: %d\n", atoi(param));
|
|
123 priv->samplerate = atoi(param);
|
|
124 }
|
|
125
|
|
126 /* only for displaying some informations about movie*/
|
|
127 if (!strcmp(opt, "Title"))
|
|
128 {
|
|
129 mp_msg(MSGT_DEMUX, MSGL_INFO, " Title: %s\n", param);
|
|
130 priv->title = malloc(strlen(param));
|
|
131 strcpy(priv->title, param);
|
|
132 }
|
|
133 if (!strcmp(opt, "Author"))
|
|
134 {
|
|
135 mp_msg(MSGT_DEMUX, MSGL_INFO, " Author: %s\n", param);
|
|
136 priv->author = malloc(strlen(param));
|
|
137 strcpy(priv->author, param);
|
|
138 }
|
|
139 if (!strcmp(opt, "Copyright"))
|
|
140 {
|
|
141 mp_msg(MSGT_DEMUX, MSGL_INFO, " Copyright: %s\n", param);
|
|
142 priv->copyright = malloc(strlen(param));
|
|
143 strcpy(priv->copyright, param);
|
|
144 }
|
|
145 if (!strcmp(opt, "Producer"))
|
|
146 {
|
|
147 mp_msg(MSGT_DEMUX, MSGL_INFO, " Producer: %s\n", param);
|
|
148 priv->producer = malloc(strlen(param));
|
|
149 strcpy(priv->producer, param);
|
|
150 }
|
|
151
|
|
152 /* get next token */
|
|
153 token = strtok(NULL, (char *)&("\x0d\x0a"));
|
|
154 }
|
|
155 }
|
|
156
|
2687
|
157 int vivo_check_file(demuxer_t* demuxer){
|
|
158 int flags=0;
|
|
159 int i=0;
|
|
160 int len;
|
|
161 int len2;
|
|
162 int c;
|
|
163 unsigned char buf[2048+256];
|
|
164 vivo_priv_t* priv;
|
2784
|
165 int orig_pos = stream_tell(demuxer->stream);
|
2687
|
166
|
|
167 mp_msg(MSGT_DEMUX,MSGL_V,"Checking for VIVO\n");
|
|
168
|
|
169 c=stream_read_char(demuxer->stream);
|
|
170 if(c) return 0;
|
|
171 len=0;
|
|
172 while((c=stream_read_char(demuxer->stream))>=0x80){
|
|
173 len+=0x80*(c-0x80);
|
|
174 if(len>1024) return 0;
|
|
175 }
|
|
176 len+=c;
|
|
177 printf("header block 1 size: %d\n",len);
|
|
178 //stream_skip(demuxer->stream,len);
|
|
179 stream_read(demuxer->stream,buf,len);
|
|
180 buf[len]=0;
|
|
181 // printf("VIVO header: '%s'\n",buf);
|
2784
|
182
|
2785
|
183 #if 1
|
|
184 vivo_parse_text_header(demuxer, len);
|
2784
|
185 if (priv->supported == 0)
|
|
186 return 0;
|
|
187 #else
|
2687
|
188 // parse header:
|
|
189 i=0;
|
|
190 while(i<len && buf[i]==0x0D && buf[i+1]==0x0A) i+=2; // skip empty lines
|
2695
|
191 if(strncmp(buf+i,"Version:Vivo/",13)) return 0; // bad version/type!
|
2687
|
192
|
|
193 priv=malloc(sizeof(vivo_priv_t));
|
|
194 memset(priv,0,sizeof(vivo_priv_t));
|
|
195 demuxer->priv=priv;
|
|
196
|
|
197 // TODO: parse FPS and other info (display title/author etc)
|
|
198 priv->fps=10.0; // FIXME (parse from header)
|
2784
|
199 #endif
|
2687
|
200
|
2695
|
201 #if 0
|
2687
|
202 c=stream_read_char(demuxer->stream);
|
|
203 if(c) return 0;
|
|
204 len2=0;
|
|
205 while((c=stream_read_char(demuxer->stream))>=0x80){
|
|
206 len2+=0x80*(c-0x80);
|
|
207 if(len+len2>2048) return 0;
|
|
208 }
|
|
209 len2+=c;
|
|
210 printf("header block 2 size: %d\n",len2);
|
|
211 stream_skip(demuxer->stream,len2);
|
|
212 // stream_read(demuxer->stream,buf+len,len2);
|
2695
|
213 #endif
|
2687
|
214
|
|
215 // c=stream_read_char(demuxer->stream);
|
|
216 // printf("first packet: %02X\n",c);
|
|
217
|
2784
|
218 stream_seek(demuxer->stream, orig_pos);
|
|
219
|
2687
|
220 return 1;
|
|
221 }
|
|
222
|
|
223 // return value:
|
|
224 // 0 = EOF or no stream found
|
|
225 // 1 = successfully read a packet
|
|
226 int demux_vivo_fill_buffer(demuxer_t *demux){
|
|
227 demux_stream_t *ds=NULL;
|
|
228 int c;
|
|
229 int len=0;
|
|
230 int seq;
|
|
231 demux->filepos=stream_tell(demux->stream);
|
|
232
|
|
233 c=stream_read_char(demux->stream);
|
2695
|
234 // printf("c=%02X\n",c);
|
2687
|
235 switch(c&0xF0){
|
2695
|
236 case 0x00: // header - skip it!
|
2784
|
237 {
|
2687
|
238 len=stream_read_char(demux->stream);
|
2695
|
239 if(len>=0x80) len=0x80*(len-0x80)+stream_read_char(demux->stream);
|
|
240 printf("vivo extra header: %d bytes\n",len);
|
2784
|
241 #ifdef TEXTPARSE_ALL
|
|
242 {
|
|
243 int pos;
|
|
244 /* also try to parse all headers */
|
|
245 pos = stream_tell(demux->stream);
|
|
246 vivo_parse_text_header(demux, len);
|
|
247 stream_seek(demux->stream, pos);
|
|
248 }
|
|
249 #endif
|
2687
|
250 break;
|
2784
|
251 }
|
2687
|
252 case 0x10: // video packet
|
|
253 len=128;
|
|
254 ds=demux->video;
|
|
255 break;
|
|
256 case 0x20: // video packet
|
|
257 len=stream_read_char(demux->stream);
|
|
258 ds=demux->video;
|
|
259 break;
|
2695
|
260 case 0x30: // audio ?
|
|
261 len=0x28;
|
|
262 ds=demux->audio;
|
|
263 break;
|
2687
|
264 case 0x40: // audio packet
|
|
265 len=24;
|
|
266 ds=demux->audio;
|
|
267 break;
|
|
268 default:
|
|
269 mp_msg(MSGT_DEMUX,MSGL_WARN,"VIVO - unknown ID found: %02X contact author!\n",c);
|
|
270 }
|
|
271
|
2695
|
272 if(!ds || ds->id<-1){
|
2687
|
273 if(len) stream_skip(demux->stream,len);
|
|
274 return 1;
|
|
275 }
|
|
276
|
|
277 seq=c&0x0F;
|
|
278
|
|
279 if(ds->asf_packet){
|
|
280 if(ds->asf_seq!=seq){
|
|
281 // closed segment, finalize packet:
|
|
282 ds_add_packet(ds,ds->asf_packet);
|
|
283 ds->asf_packet=NULL;
|
2695
|
284 // printf("packet!\n");
|
2687
|
285 } else {
|
|
286 // append data to it!
|
|
287 demux_packet_t* dp=ds->asf_packet;
|
|
288 dp->buffer=realloc(dp->buffer,dp->len+len);
|
|
289 //memcpy(dp->buffer+dp->len,data,len);
|
|
290 stream_read(demux->stream,dp->buffer+dp->len,len);
|
|
291 mp_dbg(MSGT_DEMUX,MSGL_DBG4,"data appended! %d+%d\n",dp->len,len);
|
|
292 dp->len+=len;
|
|
293 // we are ready now.
|
2695
|
294 if((c&0xF0)==0x20) --ds->asf_seq; // hack!
|
2687
|
295 return 1;
|
|
296 }
|
|
297 }
|
|
298 // create new packet:
|
|
299 { demux_packet_t* dp;
|
|
300 dp=new_demux_packet(len);
|
|
301 //memcpy(dp->buffer,data,len);
|
|
302 stream_read(demux->stream,dp->buffer,len);
|
|
303 // dp->pts=time*0.001f;
|
|
304 // dp->flags=keyframe;
|
|
305 // if(ds==demux->video) printf("ASF time: %8d dur: %5d \n",time,dur);
|
|
306 dp->pos=demux->filepos;
|
|
307 ds->asf_packet=dp;
|
|
308 ds->asf_seq=seq;
|
|
309 // we are ready now.
|
|
310 return 1;
|
|
311 }
|
|
312
|
|
313 }
|
|
314
|
|
315 static const short h263_format[8][2] = {
|
|
316 { 0, 0 },
|
|
317 { 128, 96 },
|
|
318 { 176, 144 },
|
|
319 { 352, 288 },
|
|
320 { 704, 576 },
|
|
321 { 1408, 1152 },
|
2784
|
322 { 320, 240 } // ??????? or 240x180 (found in vivo2) ?
|
2687
|
323 };
|
|
324
|
|
325 static unsigned char* buffer;
|
|
326 static int bufptr=0;
|
|
327 static int bitcnt=0;
|
|
328 static unsigned char buf=0;
|
|
329 static int format, width, height;
|
|
330
|
|
331 static unsigned int x_get_bits(int n){
|
|
332 unsigned int x=0;
|
|
333 while(n-->0){
|
|
334 if(!bitcnt){
|
|
335 // fill buff
|
|
336 buf=buffer[bufptr++];
|
|
337 bitcnt=8;
|
|
338 }
|
|
339 //x=(x<<1)|(buf&1);buf>>=1;
|
|
340 x=(x<<1)|(buf>>7);buf<<=1;
|
|
341 --bitcnt;
|
|
342 }
|
|
343 return x;
|
|
344 }
|
|
345
|
|
346 #define get_bits(xxx,n) x_get_bits(n)
|
|
347 #define get_bits1(xxx) x_get_bits(1)
|
|
348 #define skip_bits(xxx,n) x_get_bits(n)
|
|
349 #define skip_bits1(xxx) x_get_bits(1)
|
|
350
|
|
351 /* most is hardcoded. should extend to handle all h263 streams */
|
|
352 static int h263_decode_picture_header(unsigned char *b_ptr)
|
|
353 {
|
2695
|
354 int i;
|
|
355
|
|
356 // for(i=0;i<16;i++) printf(" %02X",b_ptr[i]); printf("\n");
|
2687
|
357
|
|
358 buffer=b_ptr;
|
|
359 bufptr=bitcnt=buf=0;
|
|
360
|
|
361 /* picture header */
|
2695
|
362 if (get_bits(&s->gb, 22) != 0x20){
|
|
363 printf("bad picture header\n");
|
2687
|
364 return -1;
|
2695
|
365 }
|
2687
|
366 skip_bits(&s->gb, 8); /* picture timestamp */
|
|
367
|
2695
|
368 if (get_bits1(&s->gb) != 1){
|
|
369 printf("bad marker\n");
|
2687
|
370 return -1; /* marker */
|
2695
|
371 }
|
|
372 if (get_bits1(&s->gb) != 0){
|
|
373 printf("bad h263 id\n");
|
2687
|
374 return -1; /* h263 id */
|
2695
|
375 }
|
2687
|
376 skip_bits1(&s->gb); /* split screen off */
|
|
377 skip_bits1(&s->gb); /* camera off */
|
|
378 skip_bits1(&s->gb); /* freeze picture release off */
|
|
379
|
|
380 format = get_bits(&s->gb, 3);
|
|
381
|
|
382 if (format != 7) {
|
|
383 printf("h263_plus = 0 format = %d\n",format);
|
|
384 /* H.263v1 */
|
|
385 width = h263_format[format][0];
|
|
386 height = h263_format[format][1];
|
|
387 printf("%d x %d\n",width,height);
|
2695
|
388 // if (!width) return -1;
|
2687
|
389
|
|
390 printf("pict_type=%d\n",get_bits1(&s->gb));
|
|
391 printf("unrestricted_mv=%d\n",get_bits1(&s->gb));
|
|
392 #if 1
|
|
393 printf("SAC: %d\n",get_bits1(&s->gb));
|
|
394 printf("advanced prediction mode: %d\n",get_bits1(&s->gb));
|
|
395 printf("PB frame: %d\n",get_bits1(&s->gb));
|
|
396 #else
|
|
397 if (get_bits1(&s->gb) != 0)
|
|
398 return -1; /* SAC: off */
|
|
399 if (get_bits1(&s->gb) != 0)
|
|
400 return -1; /* advanced prediction mode: off */
|
|
401 if (get_bits1(&s->gb) != 0)
|
|
402 return -1; /* not PB frame */
|
|
403 #endif
|
|
404 printf("qscale=%d\n",get_bits(&s->gb, 5));
|
|
405 skip_bits1(&s->gb); /* Continuous Presence Multipoint mode: off */
|
|
406 } else {
|
|
407 printf("h263_plus = 1\n");
|
|
408 /* H.263v2 */
|
2695
|
409 if (get_bits(&s->gb, 3) != 1){
|
|
410 printf("H.263v2 A error\n");
|
2687
|
411 return -1;
|
2695
|
412 }
|
|
413 if (get_bits(&s->gb, 3) != 6){ /* custom source format */
|
|
414 printf("custom source format\n");
|
2687
|
415 return -1;
|
2695
|
416 }
|
2687
|
417 skip_bits(&s->gb, 12);
|
|
418 skip_bits(&s->gb, 3);
|
|
419 printf("pict_type=%d\n",get_bits(&s->gb, 3) + 1);
|
|
420 // if (s->pict_type != I_TYPE &&
|
|
421 // s->pict_type != P_TYPE)
|
|
422 // return -1;
|
|
423 skip_bits(&s->gb, 7);
|
|
424 skip_bits(&s->gb, 4); /* aspect ratio */
|
|
425 width = (get_bits(&s->gb, 9) + 1) * 4;
|
|
426 skip_bits1(&s->gb);
|
|
427 height = get_bits(&s->gb, 9) * 4;
|
|
428 printf("%d x %d\n",width,height);
|
2695
|
429 //if (height == 0)
|
|
430 // return -1;
|
2687
|
431 printf("qscale=%d\n",get_bits(&s->gb, 5));
|
|
432 }
|
|
433
|
|
434 /* PEI */
|
|
435 while (get_bits1(&s->gb) != 0) {
|
|
436 skip_bits(&s->gb, 8);
|
|
437 }
|
|
438 // s->f_code = 1;
|
|
439 // s->width = width;
|
|
440 // s->height = height;
|
|
441 return 0;
|
|
442 }
|
|
443
|
|
444
|
2695
|
445
|
2687
|
446 void demux_open_vivo(demuxer_t* demuxer){
|
|
447 vivo_priv_t* priv=demuxer->priv;
|
|
448
|
|
449 if(!ds_fill_buffer(demuxer->video)){
|
|
450 mp_msg(MSGT_DEMUX,MSGL_ERR,"VIVO: " MSGTR_MissingVideoStreamBug);
|
|
451 return;
|
|
452 }
|
|
453
|
|
454 h263_decode_picture_header(demuxer->video->buffer);
|
|
455
|
|
456
|
|
457 { sh_video_t* sh=new_sh_video(demuxer,0);
|
|
458
|
|
459 sh->format=0x6f766976; // "vivo"
|
2784
|
460 if(!sh->fps)
|
|
461 if (priv->fps)
|
|
462 sh->fps=priv->fps;
|
|
463 else
|
|
464 sh->fps=15.0f;
|
2687
|
465 sh->frametime=1.0f/sh->fps;
|
2784
|
466 if (priv->disp_width)
|
|
467 sh->disp_w = priv->disp_width;
|
|
468 else
|
|
469 sh->disp_w = width;
|
|
470 if (priv->disp_height)
|
|
471 sh->disp_h = priv->disp_height;
|
|
472 else
|
|
473 sh->disp_h = height;
|
2687
|
474
|
|
475 // emulate BITMAPINFOHEADER:
|
|
476 sh->bih=malloc(sizeof(BITMAPINFOHEADER));
|
|
477 memset(sh->bih,0,sizeof(BITMAPINFOHEADER));
|
|
478 sh->bih->biSize=40;
|
2784
|
479 if (priv->width)
|
|
480 sh->bih->biWidth = priv->width;
|
|
481 else
|
|
482 sh->bih->biWidth = width;
|
|
483 if (priv->height)
|
|
484 sh->bih->biHeight = priv->height;
|
|
485 else
|
|
486 sh->bih->biHeight = height;
|
2687
|
487 sh->bih->biPlanes=1;
|
|
488 sh->bih->biBitCount=24;
|
|
489 sh->bih->biCompression=sh->format;
|
|
490 sh->bih->biSizeImage=sh->bih->biWidth*sh->bih->biHeight*3;
|
|
491 demuxer->video->sh=sh; sh->ds=demuxer->video;
|
|
492 demuxer->video->id=0;
|
|
493 }
|
|
494
|
2695
|
495 if(demuxer->audio->id>=-1){
|
2687
|
496 if(!ds_fill_buffer(demuxer->audio)){
|
|
497 mp_msg(MSGT_DEMUX,MSGL_ERR,"VIVO: " MSGTR_MissingAudioStream);
|
|
498 } else
|
|
499 { sh_audio_t* sh=new_sh_audio(demuxer,1);
|
|
500 sh->format=0x111; // 0x112
|
|
501 // Emulate WAVEFORMATEX struct:
|
|
502 sh->wf=malloc(sizeof(WAVEFORMATEX));
|
|
503 memset(sh->wf,0,sizeof(WAVEFORMATEX));
|
|
504 sh->wf->nChannels=1;
|
|
505 sh->wf->wBitsPerSample=16;
|
2784
|
506 if (priv->samplerate)
|
|
507 sh->wf->nSamplesPerSec=priv->samplerate;
|
|
508 else
|
|
509 sh->wf->nSamplesPerSec=22050;
|
2687
|
510 sh->wf->nAvgBytesPerSec=sh->wf->nChannels*sh->wf->wBitsPerSample*sh->wf->nSamplesPerSec/8;
|
|
511 demuxer->audio->sh=sh; sh->ds=demuxer->audio;
|
|
512 demuxer->audio->id=1;
|
|
513 }
|
2695
|
514 }
|
2687
|
515
|
|
516 }
|
|
517
|