TOOLS/realcodecs/ra.c

   1 /*
   2  * This is a small DLL that works as a wrapper for the actual realcook.so.6.0
   3  * DLL from RealPlayer 8.0.
   4  *
   5  * This file is part of MPlayer.
   6  *
   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.
  11  *
  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.
  16  *
  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.
  20  */
  21
  22 /*
  23    Assuming that RACloseCodec is the last call.
  24 */
  25
  26 #include <stddef.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <dlfcn.h>
  30 #include <sys/time.h>
  31
  32 typedef unsigned long ulong;
  33
  34 ulong (*raCloseCodec)(ulong);
  35 ulong (*raDecode)(ulong,ulong,ulong,ulong,ulong,ulong);
  36 ulong (*raEncode)(ulong,ulong,ulong);
  37 ulong (*raFlush)(ulong,ulong,ulong);
  38 ulong (*raFreeDecoder)(ulong);
  39 ulong (*raFreeEncoder)(ulong);
  40 ulong (*raGetFlavorProperty)(ulong,ulong,ulong,ulong);
  41 ulong (*raGetNumberOfFlavors)(void);
  42 ulong (*raGetNumberOfFlavors2)(void);
  43 ulong (*raInitDecoder)(ulong,ulong);
  44 ulong (*raInitEncoder)(ulong,ulong);
  45 ulong (*raOpenCodec)(ulong);
  46 ulong (*raOpenCodec2)(ulong);
  47 ulong (*raSetFlavor)(ulong,ulong);
  48 void  (*raSetDLLAccessPath)(ulong);
  49 /* the following symbol will be _dlsym()ed by rarender.so,
  50    but at least doesn't exist in cook.so
  51 ulong (raSetPwd*)(ulong);
  52 */
  53
  54 int b_dlOpened=0;
  55 void *handle=NULL;
  56
  57 /* exits program when failure */
  58 void loadSyms(void) {
  59         fputs("loadSyms()\n", stderr);
  60         if (!b_dlOpened) {
  61                 char *error;
  62
  63                 fputs("opening dll...\n", stderr);
  64                 handle = dlopen ("/usr/local/RealPlayer8/Codecs/realcook.so.6.0", RTLD_LAZY);
  65                 if (!handle) {
  66                         fputs (dlerror(), stderr);
  67                         exit(1);
  68                 }
  69
  70                 raCloseCodec = dlsym(handle, "RACloseCodec");
  71                 if ((error = dlerror()) != NULL)  {
  72                         fprintf (stderr, "dlsym(RACloseCodec): %s\n", error);
  73                         exit(1);
  74                 }
  75                 raDecode = dlsym(handle, "RADecode");
  76                 if ((error = dlerror()) != NULL)  {
  77                         fprintf (stderr, "dlsym(RADecode): %s\n", error);
  78                         exit(1);
  79                 }
  80                 raEncode = dlsym(handle, "RAEncode");
  81                 if ((error = dlerror()) != NULL)  {
  82                         fprintf (stderr, "dlsym(RAEncode): %s\n", error);
  83                         exit(1);
  84                 }
  85                 raFlush = dlsym(handle, "RAFlush");
  86                 if ((error = dlerror()) != NULL)  {
  87                         fprintf (stderr, "dlsym(RAFlush): %s\n", error);
  88                         exit(1);
  89                 }
  90                 raFreeDecoder = dlsym(handle, "RAFreeDecoder");
  91                 if ((error = dlerror()) != NULL)  {
  92                         fprintf (stderr, "dlsym(RAFreeDecoder): %s\n", error);
  93                         exit(1);
  94                 }
  95                 raFreeEncoder = dlsym(handle, "RAFreeEncoder");
  96                 if ((error = dlerror()) != NULL)  {
  97                         fprintf (stderr, "dlsym(RAFreeEncoder): %s\n", error);
  98                         exit(1);
  99                 }
 100                 raGetFlavorProperty = dlsym(handle, "RAGetFlavorProperty");
 101                 if ((error = dlerror()) != NULL)  {
 102                         fprintf (stderr, "dlsym(RAGetFlavorProperty): %s\n", error);
 103                         exit(1);
 104                 }
 105                 raGetNumberOfFlavors = dlsym(handle, "RAGetNumberOfFlavors");
 106                 if ((error = dlerror()) != NULL)  {
 107                         fprintf (stderr, "dlsym(RAGetNumberOfFlavors): %s\n", error);
 108                         exit(1);
 109                         }
 110                 raGetNumberOfFlavors2 = dlsym(handle, "RAGetNumberOfFlavors2");
 111                 if ((error = dlerror()) != NULL)  {
 112                         fprintf (stderr, "dlsym(RAGetNumberOfFlavors2): %s\n", error);
 113                         exit(1);
 114                 }
 115                 raInitDecoder = dlsym(handle, "RAInitDecoder");
 116                 if ((error = dlerror()) != NULL)  {
 117                         fprintf (stderr, "dlsym(RAInitDecoder): %s\n", error);
 118                         exit(1);
 119                 }
 120                 raInitEncoder = dlsym(handle, "RAInitEncoder");
 121                 if ((error = dlerror()) != NULL)  {
 122                         fprintf (stderr, "dlsym(RAInitEncoder): %s\n", error);
 123                         exit(1);
 124                 }
 125                 raOpenCodec = dlsym(handle, "RAOpenCodec");
 126                 if ((error = dlerror()) != NULL)  {
 127                         fprintf (stderr, "dlsym(RAOpenCodec): %s\n", error);
 128                         exit(1);
 129                 }
 130                 raOpenCodec2 = dlsym(handle, "RAOpenCodec2");
 131                 if ((error = dlerror()) != NULL)  {
 132                         fprintf (stderr, "dlsym(RAOpenCodec2): %s\n", error);
 133                         exit(1);
 134                 }
 135                 raSetFlavor = dlsym(handle, "RASetFlavor");
 136                 if ((error = dlerror()) != NULL)  {
 137                         fprintf (stderr, "dlsym(RASetFlavor): %s\n", error);
 138                         exit(1);
 139                 }
 140                 raSetDLLAccessPath = dlsym(handle, "SetDLLAccessPath");
 141                 if ((error = dlerror()) != NULL)  {
 142                         fprintf (stderr, "dlsym(SetDLLAccessPath): %s\n", error);
 143                         exit(1);
 144                 }
 145                 b_dlOpened=1;
 146         }
 147 }
 148
 149 void closeDll(void) {
 150         if (handle) {
 151                 b_dlOpened=0;
 152                 dlclose(handle);
 153                 handle=NULL;
 154         }
 155 }
 156
 157 void _init(void) {
 158         loadSyms();
 159 }
 160
 161 struct timezone tz;
 162 struct timeval tv1, tv2;
 163
 164 void tic(void) {
 165         gettimeofday(&tv1, &tz);
 166 }
 167
 168 void toc(void) {
 169         long secs, usecs;
 170         gettimeofday(&tv2, &tz);
 171         secs=tv2.tv_sec-tv1.tv_sec;
 172         usecs=tv2.tv_usec-tv1.tv_usec;
 173         if (usecs<0) {
 174                 usecs+=1000000;
 175                 --secs;
 176         }
 177         fprintf(stderr, "Duration: %ld.%.6lds\n", secs, usecs);
 178 }
 179
 180
 181 void hexdump(void *pos, int len) {
 182         unsigned char *cpos=pos, *cpos1;
 183         int lines=(len+15)>>4;
 184         while(lines--) {
 185                 int len1=len, i;
 186                 fprintf(stderr, "%0x  ", cpos);
 187                 cpos1=cpos;
 188                 for (i=0;i<16;i++) {
 189                         if (len1>0) {
 190                                 fprintf(stderr, "%02x ", *(cpos++));
 191                         } else {
 192                                 fprintf(stderr, "   ");
 193                         }
 194                         len1--;
 195                 }
 196                 fputs("  ", stderr);
 197                 cpos=cpos1;
 198                 for (i=0;i<16;i++) {
 199                         if (len>0) {
 200                                 unsigned char ch=(*(cpos++));
 201                                 if ((ch<32)||(ch>127)) ch='.';
 202                                 fputc(ch, stderr);
 203                         }
 204                         len--;
 205                 }
 206                 fputs("\n", stderr);
 207         }
 208         fputc('\n', stderr);
 209 }
 210
 211
 212 ulong RACloseCodec(ulong p1) {
 213         ulong result;
 214         fprintf(stderr, "RACloseCodec(ulong p1=0x%0lx(%ld))\n", p1, p1);
 215         result=(*raCloseCodec)(p1);
 216 //      closeDll();
 217         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 218         return result;
 219 }
 220
 221 ulong RADecode(ulong p1,ulong p2,ulong p3,ulong p4,ulong p5,ulong p6) {
 222         ulong result;
 223         fprintf(stderr, "RADecode(ulong p1=0x%0lx(%ld), ", p1, p1);
 224         fprintf(stderr, "ulong p2=0x%0lx(%ld),\n", p2, p2);
 225         fprintf(stderr, "ulong p3=0x%0lx(%ld),", p3, p3);
 226         fprintf(stderr, "\tulong p4=0x%0lx(%ld),\n", p4, p4);
 227         fprintf(stderr, "ulong p5=0x%0lx(%ld), ", p5, p5);
 228         fprintf(stderr, "ulong p6=0x%0lx(%ld))\n", p6, p6);
 229         hexdump((void*)p1, 44);
 230         hexdump((void*)p2, p3);
 231         hexdump((void*)p4, 80);
 232         hexdump((void*)p5, 16);
 233         tic();
 234         result=(*raDecode)(p1,p2,p3,p4,p5,p6);
 235         toc();
 236         hexdump((void*)p1, 44);
 237         hexdump((void*)p4, 80);
 238         hexdump((void*)p5, 16);
 239         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 240         return result;
 241 }
 242
 243 ulong RAEncode(ulong p1,ulong p2,ulong p3) {
 244         ulong result;
 245         fprintf(stderr, "RAEncode(ulong p1=0x%0lx(%ld), ", p1, p1);
 246         fprintf(stderr, "ulong p2=0x%0lx(%ld),\n", p2, p2);
 247         fprintf(stderr, "ulong p3=0x%0lx(%ld))\n", p3, p3);
 248         result=(*raEncode)(p1,p2,p3);
 249         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 250         return result;
 251 }
 252
 253 ulong RAFlush(ulong p1,ulong p2,ulong p3) {
 254         ulong result;
 255         fprintf(stderr, "RAFlush(ulong p1=0x%0lx(%ld), ", p1, p1);
 256         fprintf(stderr, "ulong p2=0x%0lx(%ld),\n", p2, p2);
 257         fprintf(stderr, "ulong p3=0x%0lx(%ld))\n", p3, p3);
 258         result=(*raFlush)(p1,p2,p3);
 259         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 260         return result;
 261 }
 262
 263 ulong RAFreeDecoder(ulong p1) {
 264         ulong result;
 265         fprintf(stderr, "RAFreeDecoder(ulong p1=0x%0lx(%ld))\n", p1, p1);
 266         hexdump((void*)p1, 44);
 267         result=(*raFreeDecoder)(p1);
 268         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 269         return result;
 270 }
 271
 272 ulong RAFreeEncoder(ulong p1) {
 273         ulong result;
 274         fprintf(stderr, "RAFreeEncoder(ulong p1=0x%0lx(%ld))\n", p1, p1);
 275         result=(*raFreeEncoder)(p1);
 276         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 277         return result;
 278 }
 279
 280 ulong RAGetFlavorProperty(ulong p1,ulong p2,ulong p3, ulong p4) {
 281         ulong result;
 282         fprintf(stderr, "RAGetFlavorProperty(ulong p1=0x%0lx(%ld), ", p1, p1);
 283         fprintf(stderr, "ulong p2=0x%0lx(%ld),\n", p2, p2);
 284         fprintf(stderr, "ulong p3=0x%0lx(%ld), ", p3, p3);
 285         fprintf(stderr, "ulong p4=0x%0lx(%ld))\n", p4, p4);
 286         hexdump((void*)p4/*(void*)(*((void**)p4))*/,p2);
 287         hexdump((void*)p1, 44);
 288         tic();
 289         result=(*raGetFlavorProperty)(p1,p2,p3,p4);
 290         toc();
 291         fprintf(stderr, "*p4=0x%0lx\n", *((ulong*)p4));
 292         hexdump((void*)p4/*(void*)(*((void**)p4))*/,p2);
 293         hexdump((void*)p1, 44);
 294         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 295         return result;
 296 }
 297
 298 ulong RAGetNumberOfFlavors(void) {
 299         ulong result;
 300         fprintf(stderr, "RAGetNumberOfFlavors(void)\n");
 301         result=(*raGetNumberOfFlavors)();
 302         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 303         return result;
 304 }
 305
 306 ulong RAGetNumberOfFlavors2(void) {
 307         ulong result;
 308         fprintf(stderr, "RAGetNumberOfFlavors2(void)\n");
 309         result=(*raGetNumberOfFlavors2)();
 310         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 311         return result;
 312 }
 313
 314 ulong RAInitDecoder(ulong p1,ulong p2) {
 315         ulong result;
 316         fprintf(stderr, "RAInitDecoder(ulong p1=0x%0lx(%ld), ", p1, p1);
 317         fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
 318         hexdump((void*)p2, 44);
 319         hexdump((void*)p1, 44);
 320         result=(*raInitDecoder)(p1,p2);
 321         hexdump((void*)p1, 44);
 322         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 323         return result;
 324 }
 325
 326 ulong RAInitEncoder(ulong p1,ulong p2) {
 327         ulong result;
 328         fprintf(stderr, "RAInitEncoder(ulong p1=0x%0lx(%ld), ", p1, p1);
 329         fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
 330         result=(*raInitEncoder)(p1,p2);
 331         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 332         return result;
 333 }
 334
 335 ulong RAOpenCodec(ulong p1) {
 336         ulong result;
 337 //      loadSyms();
 338         fprintf(stderr, "RAOpenCodec(ulong p1=0x%0lx(%ld))\n", p1, p1);
 339         result=(*raOpenCodec)(p1);
 340         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 341         return result;
 342 }
 343
 344 ulong RAOpenCodec2(ulong p1) {
 345         ulong result;
 346 //      loadSyms();
 347         fprintf(stderr, "RAOpenCodec2(ulong p1=0x%0lx(%ld))\n", p1, p1);
 348         hexdump((void*)p1, 44);
 349         result=(*raOpenCodec2)(p1);
 350         hexdump((void*)p1, 44);
 351         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 352         return result;
 353 }
 354
 355 ulong RASetFlavor(ulong p1,ulong p2) {
 356         ulong result;
 357 //      ulong numflavors, flavor, numprop=0, result1=0;
 358 //      unsigned short property;
 359         fprintf(stderr, "RASetFlavor(ulong p1=0x%0lx(%ld), ", p1, p1);
 360         fprintf(stderr, "ulong p2=0x%0lx(%ld))\n", p2, p2);
 361         hexdump((void*)p1, 44);
 362         hexdump((void*)p1, 44);
 363         result=(*raSetFlavor)(p1,p2);
 364         fprintf(stderr, "--> 0x%0lx(%ld)\n\n\n", result, result);
 365 /*      fputs("######################## FLAVOR PROPERTIES ###################\n\n", stderr);
 366
 367         numflavors=raGetNumberOfFlavors2();
 368         flavor=0;
 369         while (flavor<numflavors) {
 370                 fprintf(stderr, "************ Flavor %ld *************\n\n", flavor);
 371                 numprop=0;
 372                 while (numprop<32) {
 373                         result1=raGetFlavorProperty(p1, flavor, numprop, (ulong)&property);
 374                         fprintf(stderr, "property %ld=%d, result=0x%0lx\n\n",
 375                                 numprop, property, result1);
 376                         hexdump((void*)result1, property);
 377                         numprop++;
 378                 }
 379                 flavor++;
 380         }
 381
 382         fputs("######################## FLAVOR PROPERTIES ###################\n\n", stderr);
 383 */
 384         return result;
 385 }
 386
 387 void  SetDLLAccessPath(ulong p1) {
 388 //      loadSyms();
 389         fprintf(stderr, "SetDLLAccessPath(ulong p1=0x%0lx(%ld))\n", p1, p1);
 390         hexdump((void*)p1, 44);
 391         (*raSetDLLAccessPath)(p1);
 392         hexdump((void*)p1, 44);
 393         fprintf(stderr, "--> void\n\n\n");
 394 }