library/libres.c

   1 /*
   2  * WINElib-Resources
   3  *
   4  * Copied and modified heavily from loader/resource.c
   5  */
   6
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include "libres.h"
  10 #include "windows.h"
  11 #include "xmalloc.h"
  12
  13 typedef struct RLE
  14 {
  15     const struct resource* const * Resources;  /* NULL-terminated array of pointers */
  16     struct RLE* next;
  17 } ResListE;
  18
  19 static ResListE* ResourceList=NULL;
  20
  21 void LIBRES_RegisterResources(const struct resource* const * Res)
  22 {
  23   ResListE** Curr;
  24   ResListE* n;
  25   for(Curr=&ResourceList; *Curr; Curr=&((*Curr)->next)) { }
  26   n=xmalloc(sizeof(ResListE));
  27   n->Resources=Res;
  28   n->next=NULL;
  29   *Curr=n;
  30 }
  31
  32 /**********************************************************************
  33  *          LIBRES_FindResource
  34  */
  35 HRSRC32 LIBRES_FindResource( HINSTANCE hModule, LPCSTR name, LPCSTR type )
  36 {
  37   int nameid=0,typeid;
  38   ResListE* ResBlock;
  39   const struct resource* const * Res;
  40
  41   if(HIWORD(name))
  42   {
  43     if(*name=='#')
  44     {
  45       nameid=atoi(name+1);
  46       name=NULL;
  47     }
  48   }
  49   else
  50   {
  51     nameid=LOWORD(name);
  52     name=NULL;
  53   }
  54   if(HIWORD(type))
  55   {
  56     if(*type=='#')
  57       typeid=atoi(type+1);
  58     else
  59     {
  60       WINELIB_UNIMP("LIBRES_FindResource(*,*,type=string)");
  61       return 0;
  62     }
  63   }
  64   else
  65     typeid=LOWORD(type);
  66
  67   for(ResBlock=ResourceList; ResBlock; ResBlock=ResBlock->next)
  68     for(Res=ResBlock->Resources; *Res; Res++)
  69       if(name)
  70       {
  71         if((*Res)->type==typeid && !lstrcmpi32A((*Res)->name,name))
  72           return (HRSRC32)*Res;
  73       }
  74       else
  75         if((*Res)->type==typeid && (*Res)->id==nameid)
  76           return (HRSRC32)*Res;
  77   return 0;
  78 }
  79
  80
  81 /**********************************************************************
  82  *          LIBRES_LoadResource
  83  */
  84 HGLOBAL32 LIBRES_LoadResource( HINSTANCE hModule, HRSRC32 hRsrc )
  85 {
  86   return (HGLOBAL32)(((struct resource*)hRsrc)->bytes);
  87 }
  88
  89
  90 /**********************************************************************
  91  *          LIBRES_LockResource
  92  */
  93 LPVOID LIBRES_LockResource( HGLOBAL32 handle )
  94 {
  95   return (LPVOID)handle;
  96 }
  97
  98
  99 /**********************************************************************
 100  *          LIBRES_FreeResource
 101  */
 102 BOOL LIBRES_FreeResource( HGLOBAL handle )
 103 {
 104   return 0; /* Obsolete in Win32 */
 105 }
 106
 107
 108 /**********************************************************************
 109  *          LIBRES_AccessResource
 110  */
 111 INT LIBRES_AccessResource( HINSTANCE hModule, HRSRC hRsrc )
 112 {
 113   WINELIB_UNIMP("LIBRES_AccessResource()");
 114   return -1; /* Obsolete in Win32 */
 115 }
 116
 117
 118 /**********************************************************************
 119  *          LIBRES_SizeofResource
 120  */
 121 DWORD LIBRES_SizeofResource( HINSTANCE hModule, HRSRC32 hRsrc )
 122 {
 123   return (DWORD)(((struct resource*)hRsrc)->size);
 124 }
 125
 126
 127 /**********************************************************************
 128  *          LIBRES_AllocResource
 129  */
 130 HGLOBAL LIBRES_AllocResource( HINSTANCE hModule, HRSRC hRsrc, DWORD size )
 131 {
 132   WINELIB_UNIMP("LIBRES_AllocResource()");
 133   return 0; /* Obsolete in Win32 */
 134 }
 135