core: restructure main play loop, continue audio after video
[mplayer.git] / TOOLS / realcodecs / drv2.c
blobe93b4f2e8f2934a3b62905591f100b1e65294b2d
1 /*
2 * This is a small DLL that works as a wrapper for the actual realdrv2.so.6.0
3 * DLL from RealPlayer 8.0.
5 * This file is part of MPlayer.
7 * MPlayer is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * MPlayer is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License along
18 * with MPlayer; if not, write to the Free Software Foundation, Inc.,
19 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 Assuming that RACloseCodec is the last call.
26 #include <stddef.h>
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #include <dlfcn.h>
31 #include <sys/time.h>
33 typedef unsigned long ulong;
35 ulong (*rvyuvCustomMessage)(ulong,ulong);
36 ulong (*rvyuvFree)(ulong);
37 ulong (*rvyuvHiveMessage)(ulong,ulong);
38 ulong (*rvyuvInit)(ulong,ulong);
39 ulong (*rvyuvTransform)(ulong,ulong,ulong,ulong,ulong);
40 ulong (*rvyuvRNFRUFree)(ulong);
41 ulong (*rvyuvRNFRUGetFrame)(ulong,ulong,ulong);
42 ulong (*rvyuvRNFRUInit)(ulong,ulong,ulong);
43 ulong (*rvyuvRNFRUSetup)(ulong,ulong,ulong,ulong,ulong,ulong,ulong,ulong);
45 //void (*setDLLAccessPath)(ulong);
47 int b_dlOpened=0;
48 void *handle=NULL;
50 /* exits program when failure */
51 void loadSyms(void) {
52 fputs("loadSyms()\n", stderr);
53 if (!b_dlOpened) {
54 char *error;
56 fputs("opening dll...\n",stderr);
57 handle = dlopen ("/usr/local/RealPlayer8/Codecs/realdrv2.so.6.0", RTLD_LAZY);
58 if (!handle) {
59 fputs (dlerror(), stderr);
60 exit(1);
63 rvyuvCustomMessage = dlsym(handle, "RV20toYUV420CustomMessage");
64 if ((error = dlerror()) != NULL) {
65 fprintf (stderr, "dlsym(rvyuvCustomMessage): %s\n", error);
66 exit(1);
68 fprintf(stderr, "RV20toYUV420CustomMessage()=0x%0x\n", rvyuvCustomMessage);
69 rvyuvFree = dlsym(handle, "RV20toYUV420Free");
70 if ((error = dlerror()) != NULL) {
71 fprintf (stderr, "dlsym(rvyuvFree): %s\n", error);
72 exit(1);
74 fprintf(stderr, "RV20toYUV420Free()=0x%0x\n", rvyuvFree);
75 rvyuvHiveMessage = dlsym(handle, "RV20toYUV420HiveMessage");
76 if ((error = dlerror()) != NULL) {
77 fprintf (stderr, "dlsym(rvyuvHiveMessage): %s\n", error);
78 exit(1);
80 fprintf(stderr, "RV20toYUV420HiveMessage()=0x%0x\n", rvyuvHiveMessage);
81 rvyuvInit = dlsym(handle, "RV20toYUV420Init");
82 if ((error = dlerror()) != NULL) {
83 fprintf (stderr, "dlsym(rvyuvInit): %s\n", error);
84 exit(1);
86 fprintf(stderr, "RV20toYUV420Init()=0x%0x\n", rvyuvInit);
87 rvyuvTransform = dlsym(handle, "RV20toYUV420Transform");
88 if ((error = dlerror()) != NULL) {
89 fprintf (stderr, "dlsym(rvyuvTransform): %s\n", error);
90 exit(1);
92 fprintf(stderr, "RV20toYUV420Transform()=0x%0x\n", rvyuvTransform);
93 rvyuvRNFRUFree = dlsym(handle, "RV20toYUV420_RN_FRU_Free");
94 if ((error = dlerror()) != NULL) {
95 fprintf (stderr, "dlsym(rvyuvRNFRUFree): %s\n", error);
96 exit(1);
98 fprintf(stderr, "RV20toYUV420_RN_FRU_Free()=0x%0x\n", rvyuvRNFRUFree);
99 rvyuvRNFRUGetFrame = dlsym(handle, "RV20toYUV420_RN_FRU_GetFrame");
100 if ((error = dlerror()) != NULL) {
101 fprintf (stderr, "dlsym(rvyuvRNFRUGetFrame): %s\n", error);
102 exit(1);
104 fprintf(stderr, "RV20toYUV420_RN_FRU_GetFrame()=0x%0x\n", rvyuvRNFRUGetFrame);
105 rvyuvRNFRUInit = dlsym(handle, "RV20toYUV420_RN_FRU_Init");
106 if ((error = dlerror()) != NULL) {
107 fprintf (stderr, "dlsym(rvyuvRNFRUInit): %s\n", error);
108 exit(1);
110 fprintf(stderr, "RV20toYUV420_RN_FRU_Init()=0x%0x\n", rvyuvRNFRUInit);
111 rvyuvRNFRUSetup = dlsym(handle, "RV20toYUV420_RN_FRU_Setup");
112 if ((error = dlerror()) != NULL) {
113 fprintf (stderr, "dlsym(rvyuvRNFRUSetup): %s\n", error);
114 exit(1);
116 fprintf(stderr, "RV20toYUV420_RN_FRU_Setup()=0x%0x\n", rvyuvRNFRUSetup);
118 /* setDLLAccessPath = dlsym(handle, "SetDLLAccessPath");
119 if ((error = dlerror()) != NULL) {
120 fprintf (stderr, "dlsym(SetDLLAccessPath): %s\n", error);
121 exit(1);
123 */ b_dlOpened=1;
127 void closeDll(void) {
128 if (handle) {
129 b_dlOpened=0;
130 dlclose(handle);
131 handle=NULL;
135 void _init(void) {
136 loadSyms();
139 struct timezone tz;
140 struct timeval tv1, tv2;
142 void tic(void) {
143 gettimeofday(&tv1, &tz);
146 void toc(void) {
147 long secs, usecs;
148 gettimeofday(&tv2, &tz);
149 secs=tv2.tv_sec-tv1.tv_sec;
150 usecs=tv2.tv_usec-tv1.tv_usec;
151 if (usecs<0) {
152 usecs+=1000000;
153 --secs;
155 // fprintf(stderr, "Duration: %ld.%.6lds\n", secs, usecs);
159 static void hexdump(void *pos, int len) {
160 unsigned char *cpos=pos, *cpos1;
161 int lines=(len+15)>>4;
162 while(lines--) {
163 int len1=len, i;
164 fprintf(stderr, "#R# %0x ", (int)cpos-(int)pos);
165 cpos1=cpos;
166 for (i=0;i<16;i++) {
167 if (len1>0) {
168 fprintf(stderr, "%02x ", *(cpos++));
169 } else {
170 fprintf(stderr, " ");
172 len1--;
174 fputs(" ", stderr);
175 cpos=cpos1;
176 for (i=0;i<16;i++) {
177 if (len>0) {
178 unsigned char ch=(*(cpos++));
179 if ((ch<32)||(ch>127)) ch='.';
180 fputc(ch, stderr);
182 len--;
184 fputs("\n", stderr);
186 fputc('\n', stderr);
190 ulong RV20toYUV420CustomMessage(ulong* p1,ulong p2) {
191 ulong result;
192 // ulong *pp1=p1;
193 ulong temp[16];
194 fprintf(stderr, "#R# => RV20toYUV420CustomMessage(%p,%p) [%ld,%ld,%ld] \n", p1, p2, p1[0],p1[1],p1[2]);
197 if(p1[0]!=17) return 0;
199 if(p1[1]!=1) return 0;
201 if(p1[0]==105) return 0;
202 if(p1[0]==3) return 0;
203 if(p1[0]==18) return 0;
204 if(p1[0]==30) return 0;
207 if(p1[0]==0x24){
208 hexdump(p1[2],64);
209 memset(temp,0x77,16*4);
210 memcpy(temp,p1[2],16);
211 p1[2]=temp;
212 } else {
213 switch(p1[0]){
214 case 17:
215 if(p1[1]==1)
216 break;
217 case 18:
218 case 30:
219 case 3:
220 default:
221 return 0;
224 // fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
225 // hexdump((void*)p1, 12);
226 // if (pp1[0]==0x24) {
227 // hexdump((void*)(pp1[2]),128);
228 // }
229 // tic();
230 result=(*rvyuvCustomMessage)(p1,p2);
231 // toc();
232 fprintf(stderr, "#R# <= RV20toYUV420CustomMessage --> 0x%0lx(%ld)\n", result, result);
233 return result;
236 ulong RV20toYUV420Free(ulong p1) {
237 ulong result;
238 fprintf(stderr, "RV20toYUV420Free(ulong p1=0x%0lx(%ld))\n", p1, p1);
239 // hexdump((void*)p1, 44);
240 tic();
241 result=(*rvyuvFree)(p1);
242 toc();
243 // hexdump((void*)p1, 44);
244 fprintf(stderr, "RV20toYUV420Free --> 0x%0lx(%ld)\n\n\n", result, result);
245 return result;
248 char h_temp[32768];
250 ulong RV20toYUV420HiveMessage(ulong *p1,ulong p2) {
251 ulong result;
252 fprintf(stderr, "#R# RV20toYUV420HiveMessage(%p,%p)\n", p1, p2);
253 // p1->constant,p1->width,p1->height,p1->format1,p1->format2);
254 // fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
255 // hexdump((void*)p1, sizeof(struct init_data));
257 fprintf(stderr,">HIVE %ld %p\n",p1[0],p1[1]);
259 if(p1[0]!=0) return 0;
261 p1[1]=0x10000000;
262 return 0;
264 // fprintf(stderr,"COPY INIT DATA!\n");
265 memset(h_temp,0x77,1000);
266 memcpy(h_temp,p1,4);
267 // fprintf(stderr,"COPY OK!\n");
269 // tic();
270 // result=(*rvyuvHiveMessage)(p1,p2);
271 result=(*rvyuvHiveMessage)(h_temp,p2);
272 // toc();
274 fprintf(stderr,"COPY INIT DATA!\n");
275 memcpy(p1,h_temp,8);
276 fprintf(stderr,"COPY OK!\n");
278 memset(h_temp,0x77,1000);
280 // p1[0]=0;
281 // p1[1]=0x20000000;
283 fprintf(stderr,"<HIVE %ld %p\n",p1[0],p1[1]);
285 // hexdump((void*)p1, sizeof(struct init_data));
286 // hexdump((void*)p1, 8);
287 fprintf(stderr, "#R# RV20toYUV420HiveMessage --> 0x%0lx(%ld)\n\n", result, result);
288 return result;
291 struct init_data {
292 short constant; //=0xb;
293 short width, height;
294 short x1,x2,x3;
295 // 12
296 ulong format1;
297 long x4;
298 ulong format2;
299 // long unknown[32];
302 static char i_temp[32768];
304 ulong RV20toYUV420Init(ulong p1,ulong p2) {
305 ulong result;
306 fprintf(stderr, "#R# RV20toYUV420Init(ulong p1=0x%0lx(%ld), ", p1, p1);
307 fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
309 fprintf(stderr,"COPY INIT DATA!\n");
310 memcpy(i_temp,p1,24);
311 p1=i_temp;
312 fprintf(stderr,"COPY OK!\n");
314 hexdump((void*)p1, 24);
315 tic();
316 result=(*rvyuvInit)(p1,p2);
317 toc();
318 hexdump((void*)p1, 24);
320 memset(i_temp,0x77,1000);
322 // hexdump(*((void**)p2), 512);
323 fprintf(stderr, "#R# RV20toYUV420Init --> 0x%0lx(%ld)\n\n\n", result, result);
324 return result;
327 unsigned long build_crc(unsigned char *pch, unsigned long len) {
328 unsigned long crc=0, a;
329 // unsigned long b;
330 // it's not the real crc function, but so what...
331 while (len--) {
332 a=*(pch++);
333 // a=a+(a<<6);
334 // a^=0x555;
335 // b=(crc>>29)&7;
336 // crc=((crc<<3)+b)^a;
337 crc^=a;
339 return crc;
342 #define MIN(a,b) ((a)<(b)?(a):(b))
344 // p1=input data (stream)
345 // p2=output buffer
346 // p3=input struct
347 // p4=output struct
348 // p5=rvyuv_main
349 ulong RV20toYUV420Transform(ulong p1,ulong p2,ulong p3,ulong p4,ulong p5) {
351 //result=RV20toYUV420Transform(char *input_stream, char *output_data,
352 // struct transin *, struct transout *, struct rvyuvMain *);
354 ulong result;
355 ulong *pp3=p3;
356 ulong *pp4=p4;
357 void *v;
358 ulong temp[128];
359 int i;
361 unsigned long crc_src, crc0;
362 // unsigned long len, crc1, crc2;
363 unsigned char *pch=(char *)p1;
364 fprintf(stderr, "#R# RV20toYUV420Transform(in=%p,out=%p,tin=%p,tout=%p,yuv=%p)\n",p1,p2,p3,p4,p5);
365 // input data, length=*p3
366 // hexdump((void*)p1, /*MIN(64,*/ *((ulong*)p3) /*)*/ );
367 // v=p5;
368 // v+=0x3c;
369 // v=*((void **)v);
370 // pp3=v;
371 // len=pp3[3]*pp3[4]*3/2;
372 // pch=p2;
373 // while(--len) *(pch++)=0;
374 // hexdump((char*)p2, 64);
375 // hexdump((void*)p3, 32);
376 // hexdump((void*)p5, 64);
377 // pp3=p3;
378 // if (pp3[3]>1024) {
379 // hexdump((void*)(pp3[3]),32);
380 // pp3=pp3[3];
381 // }
383 pp3=p3;
384 // it's not the real crc function, but so what...
385 pch=p1;
386 crc_src=build_crc(pch, pp3[0]);
388 pp4=pp3[3];
389 fprintf(stderr,"transin1[%p]: {%ld/%ld} ",pp4,pp3[2],pp3[0]);
390 // pp4[0],pp4[1],pp4[2],pp4[3],
391 // pp4[4],pp4[5],pp4[6],pp4[7]);
393 memset(temp,0x77,128*4);
395 memcpy(temp,pp4,8*(pp3[2]+1));
396 for(i=0;i<=pp3[2];i++){
397 fprintf(stderr," %p(%ld)",temp[i*2],temp[i*2+1]);
399 fprintf(stderr,"\n");
402 pp3[3]=pp4=temp;
404 // pp4[2]=
405 // pp4[3]=
406 // pp4[4]=NULL;
408 //pp4[6]=pp4[5];
410 v=p5;
411 /* fprintf(stderr, "rvyuvMain=0x%0x\n", v);
412 v+=0x3c;
413 v=*((void **)v);
414 fprintf(stderr, "[$+3ch]=0x%0x\n", v);
415 hexdump(v, 512);
416 v+=0x60;
417 v=*((void **)v);
418 fprintf(stderr, "[$+60h]=0x%0x\n", v);
419 hexdump(v, 512);
420 v+=0x28;
421 v=*((void **)v);
422 fprintf(stderr, "[$+28h]=0x%0x\n", v);
423 hexdump(v, 512);
425 /* v+=0x178;
426 hexdump(v, 16);
427 v=*((void **)v);
428 if (v>0x8000000) {
429 fprintf(stderr, "[$+178h]=0x%0x\n", v);
430 hexdump(v, 128);
433 // tic();
434 result=(*rvyuvTransform)(p1,p2,p3,p4,p5);
435 // toc();
437 crc0=build_crc(p2, 176*144);
438 // crc1=build_crc(p2+pp4[3]*pp4[4]/2, pp4[3]*pp4[4]/2);
439 // crc2=build_crc(p2+pp4[3]*pp4[4], pp4[3]*pp4[4]/2);
441 // pp3=p3;
442 // TRANSFORM: <timestamp> <numblocks> <len> <crc_src> <crc_dest> <p4[4]>
443 // fprintf(stderr, "TRAFO:\t%ld\t%ld\t%ld\t%.8lX\t%.8lX\t%ld\n",
444 // pp3[5], pp3[2], pp3[0], crc_src, crc0, pp3[4]);
445 fprintf(stderr, "#R# Decode: %ld(%ld) [%08lX] pts=%ld -> %ld [%08lX]\n",
446 pp3[0],pp3[2],crc_src,pp3[5],
447 result,crc0);
449 // output
450 // hexdump((char*)p2, /*64*/ pp4[3]*pp4[4]/2);
451 // hexdump((void*)p4, 20);
452 // hexdump((void*)p5, 512);
453 // fprintf(stderr, "RV20toYUV420Transform --> 0x%0lx(%ld)\n\n\n", result, result);
454 return result;
457 ulong RV20toYUV420_RN_FRU_Free(ulong p1) {
458 ulong result;
459 fprintf(stderr, "RV20toYUV420_RN_FRU_Free(ulong p1=0x%0lx(%ld))\n", p1, p1);
460 tic();
461 result=(*rvyuvRNFRUFree)(p1);
462 toc();
463 fprintf(stderr, "RV20toYUV420_RN_FRU_Free --> 0x%0lx(%ld)\n\n\n", result, result);
464 return result;
467 ulong RV20toYUV420_RN_FRU_GetFrame(ulong p1,ulong p2,ulong p3) {
468 ulong result;
469 // fprintf(stderr, "RV20toYUV420_RN_FRU_GetFrame(ulong p1=0x%0lx(%ld), ", p1, p1);
470 // fprintf(stderr, "ulong p2=0x%0lx(%ld),\n\t", p2, p2);
471 // fprintf(stderr, "ulong p3=0x%0lx(%ld))\n", p3, p3);
472 // hexdump((void*)p1, 44);
473 tic();
474 result=(*rvyuvRNFRUGetFrame)(p1,p2,p3);
475 toc();
476 // hexdump((void*)p1, 44);
477 // fprintf(stderr, "RV20toYUV420_RN_FRU_GetFrame --> 0x%0lx(%ld)\n\n\n", result, result);
478 return result;
481 ulong RV20toYUV420_RN_FRU_Init(ulong p1,ulong p2,ulong p3) {
482 ulong result;
483 // fprintf(stderr, "RV20toYUV420_RN_FRU_Init(ulong p1=0x%0lx(%ld), ", p1, p1);
484 // fprintf(stderr, "ulong p2=0x%0lx(%ld),\n\t", p2, p2);
485 // fprintf(stderr, "ulong p3=0x%0lx(%ld))\n", p3, p3);
486 // hexdump((void*)p1, 44);
487 tic();
488 result=(*rvyuvRNFRUInit)(p1,p2,p3);
489 toc();
490 // hexdump((void*)p1, 44);
491 // fprintf(stderr, "RV20toYUV420_RN_FRU_Init --> 0x%0lx(%ld)\n\n\n", result, result);
492 return result;
495 ulong RV20toYUV420_RN_FRU_Setup(ulong p1,ulong p2,ulong p3,ulong p4,
496 ulong p5,ulong p6,ulong p7,ulong p8) {
497 ulong result;
498 // fprintf(stderr, "RV20toYUV420_RN_FRU_Setup(ulong p1=0x%0lx(%ld), ", p1, p1);
499 // fprintf(stderr, "ulong p2=0x%0lx(%ld),\n\t", p2, p2);
500 // fprintf(stderr, "ulong p3=0x%0lx(%ld), ", p3, p3);
501 // fprintf(stderr, "ulong p4=0x%0lx(%ld),\n\t", p4, p4);
502 // fprintf(stderr, "ulong p5=0x%0lx(%ld), ", p5, p5);
503 // fprintf(stderr, "ulong p6=0x%0lx(%ld),\n\t", p6, p6);
504 // fprintf(stderr, "ulong p7=0x%0lx(%ld), ", p7, p7);
505 // fprintf(stderr, "ulong p8=0x%0lx(%ld))\n", p8, p8);
506 // hexdump((void*)p1, 44);
507 tic();
508 result=(*rvyuvRNFRUSetup)(p1,p2,p3,p4,p5,p6,p7,p8);
509 toc();
510 // hexdump((void*)p1, 44);
511 // fprintf(stderr, "RV20toYUV420_RN_FRU_Setup --> 0x%0lx(%ld)\n\n\n", result, result);
512 return result;
515 /*void SetDLLAccessPath(ulong p1) {
516 fprintf(stderr, "SetDLLAccessPath(ulong p1=0x%0lx(%ld))\n", p1, p1);
517 hexdump((void*)p1, 44);
518 (*setDLLAccessPath)(p1);
519 hexdump((void*)p1, 44);
520 fprintf(stderr, "--> void\n\n\n");