mirror of
https://code.videolan.org/videolan/vlc
synced 2024-09-08 11:26:59 +02:00
6d6ec75ce7
Disabled by default, enable with --enable-loader There's no sanity checks in configure so don't do it if your platform is not compatible. zorglub and Anil report it works for WMV3 with the dmo decoder plugin. It seems to crash with Quicktime (after displaying a few frame ?). There's no RealVideo decoder so, won't do that, but it probably could as well. Legal considerations ===================== Section 2 of the GPL puts no restriction on what you link with so long as you have obtained the program from source (and compiled it yourself), so this is OK. It is not clear to me whether it is ok to provide binaries with this feature enabled. Maybe it would infringe on the GPL and, hence, on VLC's past contributors intellectual rights. So if in doubt don't put this in binary package you make.
488 lines
12 KiB
C
488 lines
12 KiB
C
/*
|
|
* Resources
|
|
*
|
|
* Copyright 1993 Robert J. Amstadt
|
|
* Copyright 1995 Alexandre Julliard
|
|
*
|
|
* Modified for use with MPlayer, detailed CVS changelog at
|
|
* http://www.mplayerhq.hu/cgi-bin/cvsweb.cgi/main/
|
|
* $Id$
|
|
*
|
|
*/
|
|
#include "config.h"
|
|
|
|
#include <assert.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#include <fcntl.h>
|
|
#include <unistd.h>
|
|
|
|
#include "wine/winbase.h"
|
|
#include "wine/windef.h"
|
|
#include "wine/winuser.h"
|
|
#include "wine/heap.h"
|
|
#include "wine/module.h"
|
|
#include "wine/debugtools.h"
|
|
#include "wine/winerror.h"
|
|
#include "loader.h"
|
|
|
|
#define CP_ACP 0
|
|
|
|
WORD WINE_LanguageId=0x409;//english
|
|
|
|
#define HRSRC_MAP_BLOCKSIZE 16
|
|
|
|
typedef struct _HRSRC_ELEM
|
|
{
|
|
HANDLE hRsrc;
|
|
WORD type;
|
|
} HRSRC_ELEM;
|
|
|
|
typedef struct _HRSRC_MAP
|
|
{
|
|
int nAlloc;
|
|
int nUsed;
|
|
HRSRC_ELEM *elem;
|
|
} HRSRC_MAP;
|
|
|
|
static HRSRC RES_FindResource2( HMODULE hModule, LPCSTR type,
|
|
LPCSTR name, WORD lang, int unicode)
|
|
{
|
|
HRSRC hRsrc = 0;
|
|
LPWSTR typeStr, nameStr;
|
|
WINE_MODREF *wm = MODULE32_LookupHMODULE( hModule );
|
|
|
|
if(!wm)
|
|
return 0;
|
|
/* 32-bit PE module */
|
|
|
|
|
|
if ( HIWORD( type ) && (!unicode))
|
|
typeStr = HEAP_strdupAtoW( GetProcessHeap(), 0, type );
|
|
else
|
|
typeStr = (LPWSTR)type;
|
|
if ( HIWORD( name ) && (!unicode))
|
|
nameStr = HEAP_strdupAtoW( GetProcessHeap(), 0, name );
|
|
else
|
|
nameStr = (LPWSTR)name;
|
|
|
|
hRsrc = PE_FindResourceExW( wm, nameStr, typeStr, lang );
|
|
|
|
if ( HIWORD( type ) && (!unicode))
|
|
HeapFree( GetProcessHeap(), 0, typeStr );
|
|
if ( HIWORD( name ) && (!unicode))
|
|
HeapFree( GetProcessHeap(), 0, nameStr );
|
|
|
|
return hRsrc;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_FindResource
|
|
*/
|
|
|
|
static HRSRC RES_FindResource( HMODULE hModule, LPCSTR type,
|
|
LPCSTR name, WORD lang, int unicode )
|
|
{
|
|
HRSRC hRsrc;
|
|
// __TRY
|
|
// {
|
|
hRsrc = RES_FindResource2(hModule, type, name, lang, unicode);
|
|
// }
|
|
// __EXCEPT(page_fault)
|
|
// {
|
|
// WARN("page fault\n");
|
|
// SetLastError(ERROR_INVALID_PARAMETER);
|
|
// return 0;
|
|
// }
|
|
// __ENDTRY
|
|
return hRsrc;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_SizeofResource
|
|
*/
|
|
static DWORD RES_SizeofResource( HMODULE hModule, HRSRC hRsrc)
|
|
{
|
|
DWORD size = 0;
|
|
HRSRC hRsrc32;
|
|
|
|
// HMODULE16 hMod16 = MapHModuleLS( hModule );
|
|
// NE_MODULE *pModule = NE_GetPtr( hMod16 );
|
|
// WINE_MODREF *wm = pModule && pModule->module32?
|
|
// MODULE32_LookupHMODULE( pModule->module32 ) : NULL;
|
|
WINE_MODREF *wm = MODULE32_LookupHMODULE( hModule );
|
|
|
|
if ( !hModule || !hRsrc ) return 0;
|
|
|
|
/* 32-bit PE module */
|
|
/* If we got a 16-bit hRsrc, convert it */
|
|
// hRsrc32 = HIWORD(hRsrc)? hRsrc : MapHRsrc16To32( pModule, hRsrc );
|
|
if(!HIWORD(hRsrc))
|
|
{
|
|
printf("16-bit hRsrcs not supported\n");
|
|
return 0;
|
|
}
|
|
size = PE_SizeofResource( hModule, hRsrc );
|
|
return size;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_AccessResource
|
|
*/
|
|
static HFILE RES_AccessResource( HMODULE hModule, HRSRC hRsrc )
|
|
{
|
|
HFILE hFile = HFILE_ERROR;
|
|
|
|
WINE_MODREF *wm = MODULE32_LookupHMODULE( hModule );
|
|
|
|
if ( !hModule || !hRsrc ) return HFILE_ERROR;
|
|
|
|
/* 32-bit PE module */
|
|
FIXME("32-bit modules not yet supported.\n" );
|
|
hFile = HFILE_ERROR;
|
|
|
|
return hFile;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_LoadResource
|
|
*/
|
|
static HGLOBAL RES_LoadResource( HMODULE hModule, HRSRC hRsrc)
|
|
{
|
|
HGLOBAL hMem = 0;
|
|
HRSRC hRsrc32;
|
|
WINE_MODREF *wm = MODULE32_LookupHMODULE( hModule );
|
|
|
|
|
|
if ( !hModule || !hRsrc ) return 0;
|
|
|
|
/* 32-bit PE module */
|
|
|
|
/* If we got a 16-bit hRsrc, convert it */
|
|
// hRsrc32 = HIWORD(hRsrc)? hRsrc : MapHRsrc16To32( pModule, hRsrc );
|
|
if(!HIWORD(hRsrc))
|
|
{
|
|
printf("16-bit hRsrcs not supported\n");
|
|
return 0;
|
|
}
|
|
hMem = PE_LoadResource( wm, hRsrc );
|
|
|
|
return hMem;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_LockResource
|
|
*/
|
|
static LPVOID RES_LockResource( HGLOBAL handle )
|
|
{
|
|
LPVOID bits = NULL;
|
|
|
|
TRACE("(%08x, %s)\n", handle, "PE" );
|
|
|
|
bits = (LPVOID)handle;
|
|
|
|
return bits;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* RES_FreeResource
|
|
*/
|
|
static WIN_BOOL RES_FreeResource( HGLOBAL handle )
|
|
{
|
|
HGLOBAL retv = handle;
|
|
return (WIN_BOOL)retv;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* FindResourceA (KERNEL32.128)
|
|
*/
|
|
HANDLE WINAPI FindResourceA( HMODULE hModule, LPCSTR name, LPCSTR type )
|
|
{
|
|
return RES_FindResource( hModule, type, name,
|
|
WINE_LanguageId, 0);
|
|
}
|
|
HANDLE WINAPI FindResourceW( HMODULE hModule, LPCWSTR name, LPCWSTR type )
|
|
{
|
|
return RES_FindResource( hModule, (LPCSTR)type, (LPCSTR)name,
|
|
WINE_LanguageId, 1);
|
|
}
|
|
|
|
/**********************************************************************
|
|
* FindResourceExA (KERNEL32.129)
|
|
*/
|
|
HANDLE WINAPI FindResourceExA( HMODULE hModule,
|
|
LPCSTR type, LPCSTR name, WORD lang )
|
|
{
|
|
return RES_FindResource( hModule, type, name,
|
|
lang, 0 );
|
|
}
|
|
|
|
HANDLE WINAPI FindResourceExW( HMODULE hModule,
|
|
LPCWSTR type, LPCWSTR name, WORD lang )
|
|
{
|
|
return RES_FindResource( hModule, (LPCSTR)type, (LPCSTR)name,
|
|
lang, 1 );
|
|
}
|
|
|
|
|
|
|
|
/**********************************************************************
|
|
* LockResource (KERNEL32.384)
|
|
*/
|
|
LPVOID WINAPI LockResource( HGLOBAL handle )
|
|
{
|
|
return RES_LockResource( handle );
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* FreeResource (KERNEL32.145)
|
|
*/
|
|
WIN_BOOL WINAPI FreeResource( HGLOBAL handle )
|
|
{
|
|
return RES_FreeResource( handle );
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* AccessResource (KERNEL32.64)
|
|
*/
|
|
INT WINAPI AccessResource( HMODULE hModule, HRSRC hRsrc )
|
|
{
|
|
return RES_AccessResource( hModule, hRsrc );
|
|
}
|
|
/**********************************************************************
|
|
* SizeofResource (KERNEL32.522)
|
|
*/
|
|
DWORD WINAPI SizeofResource( HINSTANCE hModule, HRSRC hRsrc )
|
|
{
|
|
return RES_SizeofResource( hModule, hRsrc );
|
|
}
|
|
|
|
|
|
INT WINAPI LoadStringW( HINSTANCE instance, UINT resource_id,
|
|
LPWSTR buffer, INT buflen );
|
|
|
|
/**********************************************************************
|
|
* LoadStringA (USER32.375)
|
|
*/
|
|
INT WINAPI LoadStringA( HINSTANCE instance, UINT resource_id,
|
|
LPSTR buffer, INT buflen )
|
|
{
|
|
INT retval;
|
|
INT wbuflen;
|
|
INT abuflen;
|
|
LPWSTR wbuf = NULL;
|
|
LPSTR abuf = NULL;
|
|
|
|
if ( buffer != NULL && buflen > 0 )
|
|
*buffer = 0;
|
|
|
|
wbuflen = LoadStringW(instance,resource_id,NULL,0);
|
|
if ( !wbuflen )
|
|
return 0;
|
|
wbuflen ++;
|
|
|
|
retval = 0;
|
|
wbuf = (LPWSTR) HeapAlloc( GetProcessHeap(), 0, wbuflen * sizeof(WCHAR) );
|
|
wbuflen = LoadStringW(instance,resource_id,wbuf,wbuflen);
|
|
if ( wbuflen > 0 )
|
|
{
|
|
abuflen = WideCharToMultiByte(CP_ACP,0,wbuf,wbuflen,NULL,0,NULL,NULL);
|
|
if ( abuflen > 0 )
|
|
{
|
|
if ( buffer == NULL || buflen == 0 )
|
|
retval = abuflen;
|
|
else
|
|
{
|
|
abuf = (LPSTR) HeapAlloc( GetProcessHeap(), 0, abuflen * sizeof(CHAR) );
|
|
abuflen = WideCharToMultiByte(CP_ACP,0,wbuf,wbuflen,abuf,abuflen,NULL,NULL);
|
|
if ( abuflen > 0 )
|
|
{
|
|
abuflen = min(abuflen,buflen - 1);
|
|
memcpy( buffer, abuf, abuflen );
|
|
buffer[abuflen] = 0;
|
|
retval = abuflen;
|
|
}
|
|
HeapFree( GetProcessHeap(), 0, abuf );
|
|
}
|
|
}
|
|
}
|
|
HeapFree( GetProcessHeap(), 0, wbuf );
|
|
|
|
return retval;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* LoadStringW (USER32.376)
|
|
*/
|
|
INT WINAPI LoadStringW( HINSTANCE instance, UINT resource_id,
|
|
LPWSTR buffer, INT buflen )
|
|
{
|
|
HGLOBAL hmem;
|
|
HRSRC hrsrc;
|
|
WCHAR *p;
|
|
int string_num;
|
|
int i;
|
|
|
|
if (HIWORD(resource_id)==0xFFFF) /* netscape 3 passes this */
|
|
resource_id = (UINT)(-((INT)resource_id));
|
|
TRACE("instance = %04x, id = %04x, buffer = %08x, "
|
|
"length = %d\n", instance, (int)resource_id, (int) buffer, buflen);
|
|
|
|
/* Use bits 4 - 19 (incremented by 1) as resourceid, mask out
|
|
* 20 - 31. */
|
|
hrsrc = FindResourceW( instance, (LPCWSTR)(((resource_id>>4)&0xffff)+1),
|
|
RT_STRINGW );
|
|
if (!hrsrc) return 0;
|
|
hmem = LoadResource( instance, hrsrc );
|
|
if (!hmem) return 0;
|
|
|
|
p = (WCHAR*) LockResource(hmem);
|
|
string_num = resource_id & 0x000f;
|
|
for (i = 0; i < string_num; i++)
|
|
p += *p + 1;
|
|
|
|
TRACE("strlen = %d\n", (int)*p );
|
|
|
|
if (buffer == NULL) return *p;
|
|
i = min(buflen - 1, *p);
|
|
if (i > 0) {
|
|
memcpy(buffer, p + 1, i * sizeof (WCHAR));
|
|
buffer[i] = (WCHAR) 0;
|
|
} else {
|
|
if (buflen > 1) {
|
|
buffer[0] = (WCHAR) 0;
|
|
return 0;
|
|
}
|
|
#if 0
|
|
WARN("Don't know why caller give buflen=%d *p=%d trying to obtain string '%s'\n", buflen, *p, p + 1);
|
|
#endif
|
|
}
|
|
|
|
TRACE("String loaded !\n");
|
|
return i;
|
|
}
|
|
|
|
/* Messages...used by FormatMessage32* (KERNEL32.something)
|
|
*
|
|
* They can be specified either directly or using a message ID and
|
|
* loading them from the resource.
|
|
*
|
|
* The resourcedata has following format:
|
|
* start:
|
|
* 0: DWORD nrofentries
|
|
* nrofentries * subentry:
|
|
* 0: DWORD firstentry
|
|
* 4: DWORD lastentry
|
|
* 8: DWORD offset from start to the stringentries
|
|
*
|
|
* (lastentry-firstentry) * stringentry:
|
|
* 0: WORD len (0 marks end)
|
|
* 2: WORD flags
|
|
* 4: CHAR[len-4]
|
|
* (stringentry i of a subentry refers to the ID 'firstentry+i')
|
|
*
|
|
* Yes, ANSI strings in win32 resources. Go figure.
|
|
*/
|
|
|
|
/**********************************************************************
|
|
* LoadMessageA (internal)
|
|
*/
|
|
INT WINAPI LoadMessageA( HMODULE instance, UINT id, WORD lang,
|
|
LPSTR buffer, INT buflen )
|
|
{
|
|
HGLOBAL hmem;
|
|
HRSRC hrsrc;
|
|
PMESSAGE_RESOURCE_DATA mrd;
|
|
PMESSAGE_RESOURCE_BLOCK mrb;
|
|
PMESSAGE_RESOURCE_ENTRY mre;
|
|
int i,slen;
|
|
|
|
TRACE("instance = %08lx, id = %08lx, buffer = %p, length = %ld\n", (DWORD)instance, (DWORD)id, buffer, (DWORD)buflen);
|
|
|
|
/*FIXME: I am not sure about the '1' ... But I've only seen those entries*/
|
|
hrsrc = FindResourceExW(instance,RT_MESSAGELISTW,(LPWSTR)1,lang);
|
|
if (!hrsrc) return 0;
|
|
hmem = LoadResource( instance, hrsrc );
|
|
if (!hmem) return 0;
|
|
|
|
mrd = (PMESSAGE_RESOURCE_DATA)LockResource(hmem);
|
|
mre = NULL;
|
|
mrb = &(mrd->Blocks[0]);
|
|
for (i=mrd->NumberOfBlocks;i--;) {
|
|
if ((id>=mrb->LowId) && (id<=mrb->HighId)) {
|
|
mre = (PMESSAGE_RESOURCE_ENTRY)(((char*)mrd)+mrb->OffsetToEntries);
|
|
id -= mrb->LowId;
|
|
break;
|
|
}
|
|
mrb++;
|
|
}
|
|
if (!mre)
|
|
return 0;
|
|
for (i=id;i--;) {
|
|
if (!mre->Length)
|
|
return 0;
|
|
mre = (PMESSAGE_RESOURCE_ENTRY)(((char*)mre)+(mre->Length));
|
|
}
|
|
slen=mre->Length;
|
|
TRACE(" - strlen=%d\n",slen);
|
|
i = min(buflen - 1, slen);
|
|
if (buffer == NULL)
|
|
return slen;
|
|
if (i>0) {
|
|
lstrcpynA(buffer,(char*)mre->Text,i);
|
|
buffer[i]=0;
|
|
} else {
|
|
if (buflen>1) {
|
|
buffer[0]=0;
|
|
return 0;
|
|
}
|
|
}
|
|
if (buffer)
|
|
TRACE("'%s' copied !\n", buffer);
|
|
return i;
|
|
}
|
|
|
|
|
|
|
|
/**********************************************************************
|
|
* EnumResourceTypesA (KERNEL32.90)
|
|
*/
|
|
WIN_BOOL WINAPI EnumResourceTypesA( HMODULE hmodule,ENUMRESTYPEPROCA lpfun,
|
|
LONG lParam)
|
|
{
|
|
/* FIXME: move WINE_MODREF stuff here */
|
|
return PE_EnumResourceTypesA(hmodule,lpfun,lParam);
|
|
}
|
|
|
|
/**********************************************************************
|
|
* EnumResourceNamesA (KERNEL32.88)
|
|
*/
|
|
WIN_BOOL WINAPI EnumResourceNamesA( HMODULE hmodule, LPCSTR type,
|
|
ENUMRESNAMEPROCA lpfun, LONG lParam )
|
|
{
|
|
/* FIXME: move WINE_MODREF stuff here */
|
|
return PE_EnumResourceNamesA(hmodule,type,lpfun,lParam);
|
|
}
|
|
/**********************************************************************
|
|
* EnumResourceLanguagesA (KERNEL32.86)
|
|
*/
|
|
WIN_BOOL WINAPI EnumResourceLanguagesA( HMODULE hmodule, LPCSTR type,
|
|
LPCSTR name, ENUMRESLANGPROCA lpfun,
|
|
LONG lParam)
|
|
{
|
|
/* FIXME: move WINE_MODREF stuff here */
|
|
return PE_EnumResourceLanguagesA(hmodule,type,name,lpfun,lParam);
|
|
}
|
|
/**********************************************************************
|
|
* LoadResource (KERNEL32.370)
|
|
*/
|
|
HGLOBAL WINAPI LoadResource( HINSTANCE hModule, HRSRC hRsrc )
|
|
{
|
|
return RES_LoadResource( hModule, hRsrc);
|
|
}
|