13 #include "vd_internal.h"
14 #include "loader/wine/windef.h"
16 static vd_info_t info
= {
20 "Florian Schneider, Arpad Gereoffy, Alex Beregszaszi, Donnie Smith",
21 "binary real video codecs"
28 * Structures for data packets. These used to be tables of unsigned ints, but
29 * that does not work on 64 bit platforms (e.g. Alpha). The entries that are
30 * pointers get truncated. Pointers on 64 bit platforms are 8 byte longs.
31 * So we have to use structures so the compiler will assign the proper space
34 typedef struct cmsg_data_s
{
40 typedef struct transform_in_s
{
49 static unsigned long (*rvyuv_custom_message
)(cmsg_data_t
* ,void*);
50 static unsigned long (*rvyuv_free
)(void*);
51 static unsigned long (*rvyuv_init
)(void*, void*); // initdata,context
52 static unsigned long (*rvyuv_transform
)(char*, char*,transform_in_t
*,unsigned int*,void*);
54 static unsigned long WINAPI (*wrvyuv_custom_message
)(cmsg_data_t
* ,void*);
55 static unsigned long WINAPI (*wrvyuv_free
)(void*);
56 static unsigned long WINAPI (*wrvyuv_init
)(void*, void*); // initdata,context
57 static unsigned long WINAPI (*wrvyuv_transform
)(char*, char*,transform_in_t
*,unsigned int*,void*);
60 static void *rv_handle
=NULL
;
62 static uint8_t *buffer
= NULL
;
65 static int dll_type
= 0; /* 0 = unix dlopen, 1 = win32 dll */
68 void *__builtin_vec_new(unsigned long size
) {
72 void __builtin_vec_delete(void *mem
) {
76 void __pure_virtual(void) {
77 printf("FATAL: __pure_virtual() called!\n");
81 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__)
82 void ___brk_addr(void) {exit(0);}
83 char **__environ
={NULL
};
88 // to set/get/query special features/parameters
89 static int control(sh_video_t
*sh
,int cmd
,void* arg
,...){
91 // case VDCTRL_QUERY_MAX_PP_LEVEL:
93 // case VDCTRL_SET_PP_LEVEL:
94 // vfw_set_postproc(sh,10*(*((int*)arg)));
97 return CONTROL_UNKNOWN
;
100 /* exits program when failure */
102 static int load_syms_linux(char *path
) {
105 mp_msg(MSGT_DECVIDEO
,MSGL_V
, "opening shared obj '%s'\n", path
);
106 handle
= dlopen (path
, RTLD_LAZY
);
108 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error: %s\n",dlerror());
112 rvyuv_custom_message
= dlsym(handle
, "RV20toYUV420CustomMessage");
113 rvyuv_free
= dlsym(handle
, "RV20toYUV420Free");
114 rvyuv_init
= dlsym(handle
, "RV20toYUV420Init");
115 rvyuv_transform
= dlsym(handle
, "RV20toYUV420Transform");
117 if(rvyuv_custom_message
&&
126 rvyuv_custom_message
= dlsym(handle
, "RV40toYUV420CustomMessage");
127 rvyuv_free
= dlsym(handle
, "RV40toYUV420Free");
128 rvyuv_init
= dlsym(handle
, "RV40toYUV420Init");
129 rvyuv_transform
= dlsym(handle
, "RV40toYUV420Transform");
131 if(rvyuv_custom_message
&&
140 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error resolving symbols! (version incompatibility?)\n");
149 #include "loader/ldt_keeper.h"
151 void* WINAPI
LoadLibraryA(char* name
);
152 void* WINAPI
GetProcAddress(void* handle
,char* func
);
153 int WINAPI
FreeLibrary(void *handle
);
156 void * WINAPI
GetModuleHandleA(char *);
157 static int patch_dll(uint8_t *patchpos
, const uint8_t *oldcode
,
158 const uint8_t *newcode
, int codesize
) {
159 void *handle
= GetModuleHandleA("kernel32");
160 int WINAPI (*VirtProt
)(void *, unsigned, int, int *);
163 VirtProt
= GetProcAddress(handle
, "VirtualProtect");
164 // change permissions to PAGE_WRITECOPY
166 !VirtProt(patchpos
, codesize
, 0x08, &prot
)) {
167 mp_msg(MSGT_DECVIDEO
, MSGL_WARN
, "VirtualProtect failed at %p\n", patchpos
);
170 if (memcmp(patchpos
, oldcode
, codesize
) == 0) {
171 memcpy(patchpos
, newcode
, codesize
);
174 VirtProt(patchpos
, codesize
, prot
, &tmp
);
179 static int load_syms_windows(char *path
) {
182 mp_msg(MSGT_DECVIDEO
,MSGL_V
, "opening win32 dll '%s'\n", path
);
186 handle
= LoadLibraryA(path
);
187 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"win32 real codec handle=%p \n",handle
);
189 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error loading dll\n");
193 wrvyuv_custom_message
= GetProcAddress(handle
, "RV20toYUV420CustomMessage");
194 wrvyuv_free
= GetProcAddress(handle
, "RV20toYUV420Free");
195 wrvyuv_init
= GetProcAddress(handle
, "RV20toYUV420Init");
196 wrvyuv_transform
= GetProcAddress(handle
, "RV20toYUV420Transform");
198 if(wrvyuv_custom_message
&&
209 if (wrvyuv_transform
== (void *)0x634114d0) {
210 // patch away multithreaded decoding, it causes crashes
211 static const uint8_t oldcode
[13] = {
212 0x83, 0xbb, 0xf8, 0x05, 0x00, 0x00, 0x01,
213 0x0f, 0x86, 0xd0, 0x00, 0x00, 0x00 };
214 static const uint8_t newcode
[13] = {
216 0x89, 0x83, 0xf8, 0x05, 0x00, 0x00,
217 0xe9, 0xd0, 0x00, 0x00, 0x00 };
218 patched
= patch_dll((void *)0x634132fa, oldcode
, newcode
,
222 mp_msg(MSGT_DECVIDEO
, MSGL_WARN
, "Could not patch Real codec, this might crash on multi-CPU systems\n");
227 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error resolving symbols! (version incompatibility?)\n");
233 /* we need exact positions */
246 static int init(sh_video_t
*sh
){
247 //unsigned int out_fmt;
250 // we export codec id and sub-id from demuxer in bitmapinfohdr:
251 unsigned char* extrahdr
=(unsigned char*)(sh
->bih
+1);
252 unsigned int extrahdr_size
= sh
->bih
->biSize
- sizeof(BITMAPINFOHEADER
);
253 struct rv_init_t init_data
;
255 if(extrahdr_size
< 8) {
256 mp_msg(MSGT_DECVIDEO
,MSGL_ERR
,"realvideo: extradata too small (%u)\n", sh
->bih
->biSize
- sizeof(BITMAPINFOHEADER
));
259 init_data
= (struct rv_init_t
){11, sh
->disp_w
, sh
->disp_h
, 0, 0, be2me_32(((unsigned int*)extrahdr
)[0]), 1, be2me_32(((unsigned int*)extrahdr
)[1])}; // rv30
261 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"realvideo codec id: 0x%08X sub-id: 0x%08X\n",be2me_32(((unsigned int*)extrahdr
)[1]),be2me_32(((unsigned int*)extrahdr
)[0]));
263 path
= malloc(strlen(REALCODEC_PATH
)+strlen(sh
->codec
->dll
)+2);
265 sprintf(path
, REALCODEC_PATH
"/%s", sh
->codec
->dll
);
267 /* first try to load linux dlls, if failed and we're supporting win32 dlls,
268 then try to load the windows ones */
270 if(strstr(sh
->codec
->dll
,".dll") || !load_syms_linux(path
))
273 if (!load_syms_windows(sh
->codec
->dll
))
276 mp_msg(MSGT_DECVIDEO
,MSGL_ERR
,MSGTR_MissingDLLcodec
,sh
->codec
->dll
);
277 mp_msg(MSGT_DECVIDEO
,MSGL_HINT
,"Read the RealVideo section of the DOCS!\n");
282 // only I420 supported
283 // if((sh->format!=0x30335652) && !mpcodecs_config_vo(sh,sh->disp_w,sh->disp_h,IMGFMT_I420)) return 0;
288 result
=(*wrvyuv_init
)(&init_data
, &sh
->context
);
291 result
=(*rvyuv_init
)(&init_data
, &sh
->context
);
293 mp_msg(MSGT_DECVIDEO
,MSGL_ERR
,"Couldn't open RealVideo codec, error code: 0x%X \n",result
);
296 // setup rv30 codec (codec sub-type and image dimensions):
297 if((sh
->format
<=0x30335652) && (be2me_32(((unsigned int*)extrahdr
)[1])>=0x20200002)){
299 uint32_t cmsg24
[16]={sh
->disp_w
,sh
->disp_h
};
300 cmsg_data_t cmsg_data
={0x24,1+(extrahdr
[1]&7), &cmsg24
[0]};
302 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"realvideo: using cmsg24 with %u elements.\n",extrahdr
[1]&7);
303 cmsg_cnt
= (extrahdr
[1]&7)*2;
304 if (extrahdr_size
-8 < cmsg_cnt
) {
305 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"realvideo: not enough extradata (%u) to make %u cmsg24 elements.\n",extrahdr_size
-8,extrahdr
[1]&7);
306 cmsg_cnt
= extrahdr_size
-8;
308 for (i
= 0; i
< cmsg_cnt
; i
++)
309 cmsg24
[2+i
] = extrahdr
[8+i
]*4;
310 if (extrahdr_size
-8 > cmsg_cnt
)
311 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"realvideo: %u bytes of unknown extradata remaining.\n",extrahdr_size
-8-cmsg_cnt
);
315 (*wrvyuv_custom_message
)(&cmsg_data
,sh
->context
);
318 (*rvyuv_custom_message
)(&cmsg_data
,sh
->context
);
320 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"INFO: RealVideo codec init OK!\n");
325 static void uninit(sh_video_t
*sh
){
329 if (wrvyuv_free
) wrvyuv_free(sh
->context
);
332 if(rvyuv_free
) rvyuv_free(sh
->context
);
337 if (rv_handle
) FreeLibrary(rv_handle
);
341 if(rv_handle
) dlclose(rv_handle
);
351 // copypaste from demux_real.c - it should match to get it working!
352 typedef struct dp_hdr_s
{
353 uint32_t chunks
; // number of chunks
354 uint32_t timestamp
; // timestamp from packet header
355 uint32_t len
; // length of actual data
356 uint32_t chunktab
; // offset to chunk offset array
360 static mp_image_t
* decode(sh_video_t
*sh
,void* data
,int len
,int flags
){
362 unsigned long result
;
363 dp_hdr_t
* dp_hdr
=(dp_hdr_t
*)data
;
364 unsigned char* dp_data
=((unsigned char*)data
)+sizeof(dp_hdr_t
);
365 uint32_t* extra
=(uint32_t*)(((char*)data
)+dp_hdr
->chunktab
);
367 unsigned int transform_out
[5];
368 transform_in_t transform_in
={
369 dp_hdr
->len
, // length of the packet (sub-packets appended)
370 0, // unknown, seems to be unused
371 dp_hdr
->chunks
, // number of sub-packets - 1
372 extra
, // table of sub-packet offsets
373 0, // unknown, seems to be unused
374 dp_hdr
->timestamp
,// timestamp (the integer value from the stream)
377 if(len
<=0 || flags
&2) return NULL
; // skipped frame || hardframedrop
379 if (bufsz
< sh
->disp_w
*sh
->disp_h
*3/2) {
380 if (buffer
) free(buffer
);
381 bufsz
= sh
->disp_w
*sh
->disp_h
*3/2;
382 buffer
=malloc(bufsz
);
383 if (!buffer
) return 0;
388 result
=(*wrvyuv_transform
)(dp_data
, buffer
, &transform_in
,
389 transform_out
, sh
->context
);
392 result
=(*rvyuv_transform
)(dp_data
, buffer
, &transform_in
,
393 transform_out
, sh
->context
);
395 if(!inited
){ // rv30 width/height now known
396 sh
->aspect
=(float)sh
->disp_w
/(float)sh
->disp_h
;
397 sh
->disp_w
=transform_out
[3];
398 sh
->disp_h
=transform_out
[4];
399 if (!mpcodecs_config_vo(sh
,sh
->disp_w
,sh
->disp_h
,IMGFMT_I420
)) return 0;
402 mpi
=mpcodecs_get_image(sh
, MP_IMGTYPE_EXPORT
, 0 /*MP_IMGFLAG_ACCEPT_STRIDE*/,
403 sh
->disp_w
, sh
->disp_h
);
404 if(!mpi
) return NULL
;
405 mpi
->planes
[0] = buffer
;
406 mpi
->stride
[0] = sh
->disp_w
;
407 mpi
->planes
[1] = buffer
+ sh
->disp_w
*sh
->disp_h
;
408 mpi
->stride
[1] = sh
->disp_w
/ 2;
409 mpi
->planes
[2] = buffer
+ sh
->disp_w
*sh
->disp_h
*5/4;
410 mpi
->stride
[2] = sh
->disp_w
/ 2;
412 if(transform_out
[0] &&
413 (sh
->disp_w
!= transform_out
[3] || sh
->disp_h
!= transform_out
[4]))
416 return (result
?NULL
:mpi
);