summaryrefslogtreecommitdiffstats
path: root/loader/resource.c
diff options
context:
space:
mode:
Diffstat (limited to 'loader/resource.c')
-rw-r--r--loader/resource.c487
1 files changed, 0 insertions, 487 deletions
diff --git a/loader/resource.c b/loader/resource.c
deleted file mode 100644
index c15b308c69..0000000000
--- a/loader/resource.c
+++ /dev/null
@@ -1,487 +0,0 @@
-/*
- * Resources
- *
- * Copyright 1993 Robert J. Amstadt
- * Copyright 1995 Alexandre Julliard
- *
- * Modified for use with MPlayer, detailed changelog at
- * http://svn.mplayerhq.hu/mplayer/trunk/
- *
- */
-#include "config.h"
-#include "debug.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);
-}