2 * This file is part of MPlayer.
4 * MPlayer is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * MPlayer is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License along
15 * with MPlayer; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
29 #include "ffmpeg_files/intreadwrite.h"
32 #include "vd_internal.h"
33 #include "loader/wine/windef.h"
35 static const vd_info_t info
= {
39 "Florian Schneider, Arpad Gereoffy, Alex Beregszaszi, Donnie Smith",
40 "binary real video codecs"
47 * Structures for data packets. These used to be tables of unsigned ints, but
48 * that does not work on 64 bit platforms (e.g. Alpha). The entries that are
49 * pointers get truncated. Pointers on 64 bit platforms are 8 byte longs.
50 * So we have to use structures so the compiler will assign the proper space
53 typedef struct cmsg_data_s
{
59 typedef struct transform_in_s
{
68 static unsigned long (*rvyuv_custom_message
)(cmsg_data_t
* ,void*);
69 static unsigned long (*rvyuv_free
)(void*);
70 static unsigned long (*rvyuv_init
)(void*, void*); // initdata,context
71 static unsigned long (*rvyuv_transform
)(char*, char*,transform_in_t
*,unsigned int*,void*);
72 #ifdef CONFIG_WIN32DLL
73 static unsigned long WINAPI (*wrvyuv_custom_message
)(cmsg_data_t
* ,void*);
74 static unsigned long WINAPI (*wrvyuv_free
)(void*);
75 static unsigned long WINAPI (*wrvyuv_init
)(void*, void*); // initdata,context
76 static unsigned long WINAPI (*wrvyuv_transform
)(char*, char*,transform_in_t
*,unsigned int*,void*);
79 static void *rv_handle
=NULL
;
80 static int initialized
=0;
81 static uint8_t *buffer
= NULL
;
83 #ifdef CONFIG_WIN32DLL
84 static int dll_type
= 0; /* 0 = unix dlopen, 1 = win32 dll */
87 void *__builtin_vec_new(unsigned long size
);
88 void __builtin_vec_delete(void *mem
);
89 void __pure_virtual(void);
91 void *__builtin_vec_new(unsigned long size
) {
95 void __builtin_vec_delete(void *mem
) {
99 void __pure_virtual(void) {
100 printf("FATAL: __pure_virtual() called!\n");
104 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__)
105 void ___brk_addr(void) {exit(0);}
106 char **__environ
={NULL
};
111 // to set/get/query special features/parameters
112 static int control(sh_video_t
*sh
,int cmd
,void* arg
,...){
114 // case VDCTRL_QUERY_MAX_PP_LEVEL:
116 // case VDCTRL_SET_PP_LEVEL:
117 // vfw_set_postproc(sh,10*(*((int*)arg)));
118 // return CONTROL_OK;
120 return CONTROL_UNKNOWN
;
123 /* exits program when failure */
125 static int load_syms_linux(char *path
) {
128 mp_msg(MSGT_DECVIDEO
,MSGL_V
, "opening shared obj '%s'\n", path
);
129 handle
= dlopen (path
, RTLD_LAZY
);
131 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error: %s\n",dlerror());
135 rvyuv_custom_message
= dlsym(handle
, "RV20toYUV420CustomMessage");
136 rvyuv_free
= dlsym(handle
, "RV20toYUV420Free");
137 rvyuv_init
= dlsym(handle
, "RV20toYUV420Init");
138 rvyuv_transform
= dlsym(handle
, "RV20toYUV420Transform");
140 if(rvyuv_custom_message
&&
149 rvyuv_custom_message
= dlsym(handle
, "RV40toYUV420CustomMessage");
150 rvyuv_free
= dlsym(handle
, "RV40toYUV420Free");
151 rvyuv_init
= dlsym(handle
, "RV40toYUV420Init");
152 rvyuv_transform
= dlsym(handle
, "RV40toYUV420Transform");
154 if(rvyuv_custom_message
&&
163 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error resolving symbols! (version incompatibility?)\n");
169 #ifdef CONFIG_WIN32DLL
172 #include "loader/ldt_keeper.h"
174 void* WINAPI
LoadLibraryA(char* name
);
175 void* WINAPI
GetProcAddress(void* handle
,char* func
);
176 int WINAPI
FreeLibrary(void *handle
);
179 void * WINAPI
GetModuleHandleA(char *);
180 static int patch_dll(uint8_t *patchpos
, const uint8_t *oldcode
,
181 const uint8_t *newcode
, int codesize
) {
182 void *handle
= GetModuleHandleA("kernel32");
183 int WINAPI (*VirtProt
)(void *, unsigned, int, int *);
186 VirtProt
= GetProcAddress(handle
, "VirtualProtect");
187 // change permissions to PAGE_WRITECOPY
189 !VirtProt(patchpos
, codesize
, 0x08, &prot
)) {
190 mp_msg(MSGT_DECVIDEO
, MSGL_WARN
, "VirtualProtect failed at %p\n", patchpos
);
193 if (memcmp(patchpos
, oldcode
, codesize
) == 0) {
194 memcpy(patchpos
, newcode
, codesize
);
197 VirtProt(patchpos
, codesize
, prot
, &tmp
);
202 static int load_syms_windows(char *path
) {
205 mp_msg(MSGT_DECVIDEO
,MSGL_V
, "opening win32 dll '%s'\n", path
);
209 handle
= LoadLibraryA(path
);
210 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"win32 real codec handle=%p \n",handle
);
212 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error loading dll\n");
216 wrvyuv_custom_message
= GetProcAddress(handle
, "RV20toYUV420CustomMessage");
217 wrvyuv_free
= GetProcAddress(handle
, "RV20toYUV420Free");
218 wrvyuv_init
= GetProcAddress(handle
, "RV20toYUV420Init");
219 wrvyuv_transform
= GetProcAddress(handle
, "RV20toYUV420Transform");
221 if(wrvyuv_custom_message
&&
230 if (strstr(path
, "drv43260.dll")) {
232 // patch away multithreaded decoding, it causes crashes
233 static const uint8_t oldcode
[13] = {
234 0x83, 0xbb, 0xf8, 0x05, 0x00, 0x00, 0x01,
235 0x0f, 0x86, 0xd0, 0x00, 0x00, 0x00 };
236 static const uint8_t newcode
[13] = {
238 0x89, 0x83, 0xf8, 0x05, 0x00, 0x00,
239 0xe9, 0xd0, 0x00, 0x00, 0x00 };
241 (char*)wrvyuv_transform
+ 0x634132fa - 0x634114d0,
242 oldcode
, newcode
, sizeof(oldcode
));
244 mp_msg(MSGT_DECVIDEO
, MSGL_WARN
, "Could not patch Real codec, this might crash on multi-CPU systems\n");
251 wrvyuv_custom_message
= GetProcAddress(handle
, "RV40toYUV420CustomMessage");
252 wrvyuv_free
= GetProcAddress(handle
, "RV40toYUV420Free");
253 wrvyuv_init
= GetProcAddress(handle
, "RV40toYUV420Init");
254 wrvyuv_transform
= GetProcAddress(handle
, "RV40toYUV420Transform");
255 if(wrvyuv_custom_message
&&
264 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"Error resolving symbols! (version incompatibility?)\n");
270 /* we need exact positions */
283 static int init(sh_video_t
*sh
){
284 //unsigned int out_fmt;
287 // we export codec id and sub-id from demuxer in bitmapinfohdr:
288 unsigned char* extrahdr
=(unsigned char*)(sh
->bih
+1);
289 unsigned int extrahdr_size
= sh
->bih
->biSize
- sizeof(*sh
->bih
);
290 struct rv_init_t init_data
;
292 if(extrahdr_size
< 8) {
293 mp_msg(MSGT_DECVIDEO
,MSGL_ERR
,"realvideo: extradata too small (%u)\n", extrahdr_size
);
296 init_data
= (struct rv_init_t
){11, sh
->disp_w
, sh
->disp_h
, 0, 0, AV_RB32(extrahdr
), 1, AV_RB32(extrahdr
+ 4)}; // rv30
298 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"realvideo codec id: 0x%08X sub-id: 0x%08X\n",init_data
.format
,init_data
.subformat
);
300 path
= malloc(strlen(codec_path
) + strlen(sh
->codec
->dll
) + 2);
302 sprintf(path
, "%s/%s", codec_path
, sh
->codec
->dll
);
304 /* first try to load linux dlls, if failed and we're supporting win32 dlls,
305 then try to load the windows ones */
307 if(strstr(sh
->codec
->dll
,".dll") || !load_syms_linux(path
))
309 #ifdef CONFIG_WIN32DLL
310 if (!load_syms_windows(sh
->codec
->dll
))
313 mp_tmsg(MSGT_DECVIDEO
,MSGL_ERR
,"ERROR: Could not open required DirectShow codec %s.\n",sh
->codec
->dll
);
314 mp_msg(MSGT_DECVIDEO
,MSGL_HINT
,"Read the RealVideo section of the DOCS!\n");
319 // only I420 supported
320 // if((sh->format!=0x30335652) && !mpcodecs_config_vo(sh,sh->disp_w,sh->disp_h,IMGFMT_I420)) return 0;
323 #ifdef CONFIG_WIN32DLL
325 result
=(*wrvyuv_init
)(&init_data
, &sh
->context
);
328 result
=(*rvyuv_init
)(&init_data
, &sh
->context
);
330 mp_msg(MSGT_DECVIDEO
,MSGL_ERR
,"Couldn't open RealVideo codec, error code: 0x%X \n",result
);
333 // setup rv30 codec (codec sub-type and image dimensions):
334 if((sh
->format
<=0x30335652) && AV_RB32(extrahdr
+ 4)>=0x20200002){
336 uint32_t cmsg24
[16]={sh
->disp_w
,sh
->disp_h
};
337 cmsg_data_t cmsg_data
={0x24,1+(extrahdr
[1]&7), &cmsg24
[0]};
339 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"realvideo: using cmsg24 with %u elements.\n",extrahdr
[1]&7);
340 cmsg_cnt
= (extrahdr
[1]&7)*2;
341 if (extrahdr_size
-8 < cmsg_cnt
) {
342 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"realvideo: not enough extradata (%u) to make %u cmsg24 elements.\n",extrahdr_size
-8,extrahdr
[1]&7);
343 cmsg_cnt
= extrahdr_size
-8;
345 for (i
= 0; i
< cmsg_cnt
; i
++)
346 cmsg24
[2+i
] = extrahdr
[8+i
]*4;
347 if (extrahdr_size
-8 > cmsg_cnt
)
348 mp_msg(MSGT_DECVIDEO
,MSGL_WARN
,"realvideo: %u bytes of unknown extradata remaining.\n",extrahdr_size
-8-cmsg_cnt
);
350 #ifdef CONFIG_WIN32DLL
352 (*wrvyuv_custom_message
)(&cmsg_data
,sh
->context
);
355 (*rvyuv_custom_message
)(&cmsg_data
,sh
->context
);
357 mp_msg(MSGT_DECVIDEO
,MSGL_V
,"INFO: RealVideo codec init OK!\n");
362 static void uninit(sh_video_t
*sh
){
363 #ifdef CONFIG_WIN32DLL
366 if (wrvyuv_free
) wrvyuv_free(sh
->context
);
369 if(rvyuv_free
) rvyuv_free(sh
->context
);
371 #ifdef CONFIG_WIN32DLL
374 if (rv_handle
) FreeLibrary(rv_handle
);
378 if(rv_handle
) dlclose(rv_handle
);
388 static mp_image_t
* decode(sh_video_t
*sh
,void* data
,int len
,int flags
){
390 unsigned long result
;
393 int extra_size
= 8*(chunks
+1);
394 uint32_t data_size
= len
-1-extra_size
;
395 unsigned char* dp_data
=buf
+extra_size
;
396 uint32_t* extra
=(uint32_t*)buf
;
399 unsigned int transform_out
[5];
400 transform_in_t transform_in
={
401 data_size
, // length of the packet (sub-packets appended)
402 0, // unknown, seems to be unused
403 chunks
, // number of sub-packets - 1
404 extra
, // table of sub-packet offsets
405 0, // unknown, seems to be unused
406 0, // timestamp (should be unneded)
409 if(len
<=0 || flags
&2) return NULL
; // skipped frame || hardframedrop
411 if (bufsz
< sh
->disp_w
*sh
->disp_h
*3/2) {
413 bufsz
= sh
->disp_w
*sh
->disp_h
*3/2;
414 buffer
=malloc(bufsz
);
415 if (!buffer
) return 0;
418 for (i
=0; i
<2*(chunks
+1); i
++)
419 extra
[i
] = le2me_32(extra
[i
]);
421 #ifdef CONFIG_WIN32DLL
423 result
=(*wrvyuv_transform
)(dp_data
, buffer
, &transform_in
,
424 transform_out
, sh
->context
);
427 result
=(*rvyuv_transform
)(dp_data
, buffer
, &transform_in
,
428 transform_out
, sh
->context
);
430 if(!initialized
){ // rv30 width/height now known
431 sh
->aspect
=(float)sh
->disp_w
/(float)sh
->disp_h
;
432 sh
->disp_w
=transform_out
[3];
433 sh
->disp_h
=transform_out
[4];
434 if (!mpcodecs_config_vo(sh
,sh
->disp_w
,sh
->disp_h
,IMGFMT_I420
)) return 0;
437 mpi
=mpcodecs_get_image(sh
, MP_IMGTYPE_EXPORT
, 0 /*MP_IMGFLAG_ACCEPT_STRIDE*/,
438 sh
->disp_w
, sh
->disp_h
);
439 if(!mpi
) return NULL
;
440 mpi
->planes
[0] = buffer
;
441 mpi
->stride
[0] = sh
->disp_w
;
442 mpi
->planes
[1] = buffer
+ sh
->disp_w
*sh
->disp_h
;
443 mpi
->stride
[1] = sh
->disp_w
/ 2;
444 mpi
->planes
[2] = buffer
+ sh
->disp_w
*sh
->disp_h
*5/4;
445 mpi
->stride
[2] = sh
->disp_w
/ 2;
447 if(transform_out
[0] &&
448 (sh
->disp_w
!= transform_out
[3] || sh
->disp_h
!= transform_out
[4]))
451 return result
? NULL
: mpi
;