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