4 * Copyright 1993 Robert J. Amstadt
5 * Copyright 1995, 2003 Alexandre Julliard
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 #include "wine/port.h"
27 #define NONAMELESSUNION
28 #define NONAMELESSSTRUCT
35 #include "wine/winbase16.h"
36 #include "wine/debug.h"
38 #include "wine/exception.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(resource);
42 /* handle conversions */
43 #define HRSRC_32(h16) ((HRSRC)(ULONG_PTR)(h16))
44 #define HRSRC_16(h32) (LOWORD(h32))
45 #define HGLOBAL_32(h16) ((HGLOBAL)(ULONG_PTR)(h16))
46 #define HGLOBAL_16(h32) (LOWORD(h32))
47 #define HMODULE_16(h32) (LOWORD(h32))
49 static WINE_EXCEPTION_FILTER(page_fault)
51 if (GetExceptionCode() == EXCEPTION_ACCESS_VIOLATION ||
52 GetExceptionCode() == EXCEPTION_PRIV_INSTRUCTION)
53 return EXCEPTION_EXECUTE_HANDLER;
54 return EXCEPTION_CONTINUE_SEARCH;
57 /* retrieve the resource name to pass to the ntdll functions */
58 static NTSTATUS get_res_nameA( LPCSTR name, UNICODE_STRING *str )
62 str->Buffer = (LPWSTR)name;
63 return STATUS_SUCCESS;
68 if (RtlCharToInteger( name + 1, 10, &value ) != STATUS_SUCCESS || HIWORD(value))
69 return STATUS_INVALID_PARAMETER;
70 str->Buffer = (LPWSTR)value;
71 return STATUS_SUCCESS;
73 RtlCreateUnicodeStringFromAsciiz( str, name );
74 RtlUpcaseUnicodeString( str, str, FALSE );
75 return STATUS_SUCCESS;
78 /* retrieve the resource name to pass to the ntdll functions */
79 static NTSTATUS get_res_nameW( LPCWSTR name, UNICODE_STRING *str )
83 str->Buffer = (LPWSTR)name;
84 return STATUS_SUCCESS;
89 RtlInitUnicodeString( str, name + 1 );
90 if (RtlUnicodeStringToInteger( str, 10, &value ) != STATUS_SUCCESS || HIWORD(value))
91 return STATUS_INVALID_PARAMETER;
92 str->Buffer = (LPWSTR)value;
93 return STATUS_SUCCESS;
95 RtlCreateUnicodeString( str, name );
96 RtlUpcaseUnicodeString( str, str, FALSE );
97 return STATUS_SUCCESS;
100 /* retrieve the resource names for the 16-bit FindResource function */
101 static BOOL get_res_name_type_WtoA( LPCWSTR name, LPCWSTR type, LPSTR *nameA, LPSTR *typeA )
103 *nameA = *typeA = NULL;
109 DWORD len = WideCharToMultiByte( CP_ACP, 0, name, -1, NULL, 0, NULL, NULL );
110 *nameA = HeapAlloc( GetProcessHeap(), 0, len );
111 if (*nameA) WideCharToMultiByte( CP_ACP, 0, name, -1, *nameA, len, NULL, NULL );
113 else *nameA = (LPSTR)name;
117 DWORD len = WideCharToMultiByte( CP_ACP, 0, type, -1, NULL, 0, NULL, NULL );
118 *typeA = HeapAlloc( GetProcessHeap(), 0, len );
119 if (*typeA) WideCharToMultiByte( CP_ACP, 0, type, -1, *typeA, len, NULL, NULL );
121 else *typeA = (LPSTR)type;
125 if (HIWORD(*nameA)) HeapFree( GetProcessHeap(), 0, *nameA );
126 if (HIWORD(*typeA)) HeapFree( GetProcessHeap(), 0, *typeA );
127 SetLastError( ERROR_INVALID_PARAMETER );
134 /* implementation of FindResourceExA */
135 static HRSRC find_resourceA( HMODULE hModule, LPCSTR type, LPCSTR name, WORD lang )
138 UNICODE_STRING nameW, typeW;
139 LDR_RESOURCE_INFO info;
140 const IMAGE_RESOURCE_DATA_ENTRY *entry = NULL;
144 if ((status = get_res_nameA( name, &nameW )) != STATUS_SUCCESS) goto done;
145 if ((status = get_res_nameA( type, &typeW )) != STATUS_SUCCESS) goto done;
146 info.Type = (ULONG)typeW.Buffer;
147 info.Name = (ULONG)nameW.Buffer;
148 info.Language = lang;
149 status = LdrFindResource_U( hModule, &info, 3, &entry );
151 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
155 SetLastError( ERROR_INVALID_PARAMETER );
159 if (HIWORD(nameW.Buffer)) HeapFree( GetProcessHeap(), 0, nameW.Buffer );
160 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
165 /* implementation of FindResourceExW */
166 static HRSRC find_resourceW( HMODULE hModule, LPCWSTR type, LPCWSTR name, WORD lang )
169 UNICODE_STRING nameW, typeW;
170 LDR_RESOURCE_INFO info;
171 const IMAGE_RESOURCE_DATA_ENTRY *entry = NULL;
173 nameW.Buffer = typeW.Buffer = NULL;
177 if ((status = get_res_nameW( name, &nameW )) != STATUS_SUCCESS) goto done;
178 if ((status = get_res_nameW( type, &typeW )) != STATUS_SUCCESS) goto done;
179 info.Type = (ULONG)typeW.Buffer;
180 info.Name = (ULONG)nameW.Buffer;
181 info.Language = lang;
182 status = LdrFindResource_U( hModule, &info, 3, &entry );
184 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
188 SetLastError( ERROR_INVALID_PARAMETER );
192 if (HIWORD(nameW.Buffer)) HeapFree( GetProcessHeap(), 0, nameW.Buffer );
193 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
197 /**********************************************************************
198 * FindResourceExA (KERNEL32.@)
200 HRSRC WINAPI FindResourceExA( HMODULE hModule, LPCSTR type, LPCSTR name, WORD lang )
202 TRACE( "%p %s %s %04x\n", hModule, debugstr_a(type), debugstr_a(name), lang );
204 if (!hModule) hModule = GetModuleHandleW(0);
205 else if (!HIWORD(hModule))
207 return HRSRC_32( FindResource16( HMODULE_16(hModule), name, type ) );
209 return find_resourceA( hModule, type, name, lang );
213 /**********************************************************************
214 * FindResourceA (KERNEL32.@)
216 HRSRC WINAPI FindResourceA( HMODULE hModule, LPCSTR name, LPCSTR type )
218 return FindResourceExA( hModule, type, name, MAKELANGID( LANG_NEUTRAL, SUBLANG_NEUTRAL ) );
222 /**********************************************************************
223 * FindResourceExW (KERNEL32.@)
225 HRSRC WINAPI FindResourceExW( HMODULE hModule, LPCWSTR type, LPCWSTR name, WORD lang )
227 TRACE( "%p %s %s %04x\n", hModule, debugstr_w(type), debugstr_w(name), lang );
229 if (!hModule) hModule = GetModuleHandleW(0);
230 else if (!HIWORD(hModule))
235 if (!get_res_name_type_WtoA( name, type, &nameA, &typeA )) return NULL;
237 ret = FindResource16( HMODULE_16(hModule), nameA, typeA );
238 if (HIWORD(nameA)) HeapFree( GetProcessHeap(), 0, nameA );
239 if (HIWORD(typeA)) HeapFree( GetProcessHeap(), 0, typeA );
240 return HRSRC_32(ret);
243 return find_resourceW( hModule, type, name, lang );
247 /**********************************************************************
248 * FindResourceW (KERNEL32.@)
250 HRSRC WINAPI FindResourceW( HINSTANCE hModule, LPCWSTR name, LPCWSTR type )
252 return FindResourceExW( hModule, type, name, MAKELANGID( LANG_NEUTRAL, SUBLANG_NEUTRAL ) );
256 /**********************************************************************
257 * EnumResourceTypesA (KERNEL32.@)
259 BOOL WINAPI EnumResourceTypesA( HMODULE hmod, ENUMRESTYPEPROCA lpfun, LONG_PTR lparam )
264 DWORD len = 0, newlen;
266 const IMAGE_RESOURCE_DIRECTORY *resdir;
267 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
268 const IMAGE_RESOURCE_DIR_STRING_U *str;
270 TRACE( "%p %p %lx\n", hmod, lpfun, lparam );
272 if (!hmod) hmod = GetModuleHandleA( NULL );
274 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &resdir )) != STATUS_SUCCESS)
276 SetLastError( RtlNtStatusToDosError(status) );
279 et = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(resdir + 1);
280 for (i = 0; i < resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries; i++)
282 if (et[i].u1.s1.NameIsString)
284 str = (PIMAGE_RESOURCE_DIR_STRING_U) ((LPBYTE) resdir + et[i].u1.s1.NameOffset);
285 newlen = WideCharToMultiByte( CP_ACP, 0, str->NameString, str->Length, NULL, 0, NULL, NULL);
286 if (newlen + 1 > len)
289 if (type) HeapFree( GetProcessHeap(), 0, type );
290 if (!(type = HeapAlloc( GetProcessHeap(), 0, len ))) return FALSE;
292 WideCharToMultiByte( CP_ACP, 0, str->NameString, str->Length, type, len, NULL, NULL);
294 ret = lpfun(hmod,type,lparam);
298 ret = lpfun( hmod, (LPSTR)(int)et[i].u1.s2.Id, lparam );
302 if (type) HeapFree( GetProcessHeap(), 0, type );
307 /**********************************************************************
308 * EnumResourceTypesW (KERNEL32.@)
310 BOOL WINAPI EnumResourceTypesW( HMODULE hmod, ENUMRESTYPEPROCW lpfun, LONG_PTR lparam )
317 const IMAGE_RESOURCE_DIRECTORY *resdir;
318 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
319 const IMAGE_RESOURCE_DIR_STRING_U *str;
321 TRACE( "%p %p %lx\n", hmod, lpfun, lparam );
323 if (!hmod) hmod = GetModuleHandleW( NULL );
325 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &resdir )) != STATUS_SUCCESS)
327 SetLastError( RtlNtStatusToDosError(status) );
330 et = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(resdir + 1);
331 for (i = 0; i < resdir->NumberOfNamedEntries + resdir->NumberOfIdEntries; i++)
333 if (et[i].u1.s1.NameIsString)
335 str = (PIMAGE_RESOURCE_DIR_STRING_U) ((LPBYTE) resdir + et[i].u1.s1.NameOffset);
336 if (str->Length + 1 > len)
338 len = str->Length + 1;
339 if (type) HeapFree( GetProcessHeap(), 0, type );
340 if (!(type = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) ))) return FALSE;
342 memcpy(type, str->NameString, str->Length * sizeof (WCHAR));
343 type[str->Length] = 0;
344 ret = lpfun(hmod,type,lparam);
348 ret = lpfun( hmod, (LPWSTR)(int)et[i].u1.s2.Id, lparam );
352 if (type) HeapFree( GetProcessHeap(), 0, type );
357 /**********************************************************************
358 * EnumResourceNamesA (KERNEL32.@)
360 BOOL WINAPI EnumResourceNamesA( HMODULE hmod, LPCSTR type, ENUMRESNAMEPROCA lpfun, LONG_PTR lparam )
364 DWORD len = 0, newlen;
367 UNICODE_STRING typeW;
368 LDR_RESOURCE_INFO info;
369 const IMAGE_RESOURCE_DIRECTORY *basedir, *resdir;
370 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
371 const IMAGE_RESOURCE_DIR_STRING_U *str;
373 TRACE( "%p %s %p %lx\n", hmod, debugstr_a(type), lpfun, lparam );
375 if (!hmod) hmod = GetModuleHandleA( NULL );
377 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &basedir )) != STATUS_SUCCESS)
379 if ((status = get_res_nameA( type, &typeW )) != STATUS_SUCCESS)
381 info.Type = (ULONG)typeW.Buffer;
382 if ((status = LdrFindResourceDirectory_U( hmod, &info, 1, &resdir )) != STATUS_SUCCESS)
385 et = (IMAGE_RESOURCE_DIRECTORY_ENTRY *)(resdir + 1);
386 for (i = 0; i < resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries; i++)
388 if (et[i].u1.s1.NameIsString)
390 str = (IMAGE_RESOURCE_DIR_STRING_U *) ((LPBYTE) basedir + et[i].u1.s1.NameOffset);
391 newlen = WideCharToMultiByte(CP_ACP, 0, str->NameString, str->Length, NULL, 0, NULL, NULL);
392 if (newlen + 1 > len)
395 if (name) HeapFree( GetProcessHeap(), 0, name );
396 if (!(name = HeapAlloc(GetProcessHeap(), 0, len + 1 )))
402 WideCharToMultiByte( CP_ACP, 0, str->NameString, str->Length, name, len, NULL, NULL );
404 ret = lpfun(hmod,type,name,lparam);
408 ret = lpfun( hmod, type, (LPSTR)(int)et[i].u1.s2.Id, lparam );
413 if (name) HeapFree( GetProcessHeap(), 0, name );
414 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
415 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
420 /**********************************************************************
421 * EnumResourceNamesW (KERNEL32.@)
423 BOOL WINAPI EnumResourceNamesW( HMODULE hmod, LPCWSTR type, ENUMRESNAMEPROCW lpfun, LONG_PTR lparam )
430 UNICODE_STRING typeW;
431 LDR_RESOURCE_INFO info;
432 const IMAGE_RESOURCE_DIRECTORY *basedir, *resdir;
433 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
434 const IMAGE_RESOURCE_DIR_STRING_U *str;
436 TRACE( "%p %s %p %lx\n", hmod, debugstr_w(type), lpfun, lparam );
438 if (!hmod) hmod = GetModuleHandleW( NULL );
440 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &basedir )) != STATUS_SUCCESS)
442 if ((status = get_res_nameW( type, &typeW )) != STATUS_SUCCESS)
444 info.Type = (ULONG)typeW.Buffer;
445 if ((status = LdrFindResourceDirectory_U( hmod, &info, 1, &resdir )) != STATUS_SUCCESS)
448 et = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(resdir + 1);
449 for (i = 0; i < resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries; i++)
451 if (et[i].u1.s1.NameIsString)
453 str = (IMAGE_RESOURCE_DIR_STRING_U *) ((LPBYTE) basedir + et[i].u1.s1.NameOffset);
454 if (str->Length + 1 > len)
456 len = str->Length + 1;
457 if (name) HeapFree( GetProcessHeap(), 0, name );
458 if (!(name = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) )))
464 memcpy(name, str->NameString, str->Length * sizeof (WCHAR));
465 name[str->Length] = 0;
466 ret = lpfun(hmod,type,name,lparam);
470 ret = lpfun( hmod, type, (LPWSTR)(int)et[i].u1.s2.Id, lparam );
475 if (name) HeapFree( GetProcessHeap(), 0, name );
476 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
477 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
482 /**********************************************************************
483 * EnumResourceLanguagesA (KERNEL32.@)
485 BOOL WINAPI EnumResourceLanguagesA( HMODULE hmod, LPCSTR type, LPCSTR name,
486 ENUMRESLANGPROCA lpfun, LONG_PTR lparam )
491 UNICODE_STRING typeW, nameW;
492 LDR_RESOURCE_INFO info;
493 const IMAGE_RESOURCE_DIRECTORY *basedir, *resdir;
494 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
496 TRACE( "%p %s %s %p %lx\n", hmod, debugstr_a(type), debugstr_a(name), lpfun, lparam );
498 if (!hmod) hmod = GetModuleHandleA( NULL );
499 typeW.Buffer = nameW.Buffer = NULL;
500 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &basedir )) != STATUS_SUCCESS)
502 if ((status = get_res_nameA( type, &typeW )) != STATUS_SUCCESS)
504 if ((status = get_res_nameA( name, &nameW )) != STATUS_SUCCESS)
506 info.Type = (ULONG)typeW.Buffer;
507 info.Name = (ULONG)nameW.Buffer;
508 if ((status = LdrFindResourceDirectory_U( hmod, &info, 2, &resdir )) != STATUS_SUCCESS)
511 et = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(resdir + 1);
512 for (i = 0; i < resdir->NumberOfNamedEntries + resdir->NumberOfIdEntries; i++)
514 ret = lpfun( hmod, type, name, et[i].u1.s2.Id, lparam );
518 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
519 if (HIWORD(nameW.Buffer)) HeapFree( GetProcessHeap(), 0, nameW.Buffer );
520 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
525 /**********************************************************************
526 * EnumResourceLanguagesW (KERNEL32.@)
528 BOOL WINAPI EnumResourceLanguagesW( HMODULE hmod, LPCWSTR type, LPCWSTR name,
529 ENUMRESLANGPROCW lpfun, LONG_PTR lparam )
534 UNICODE_STRING typeW, nameW;
535 LDR_RESOURCE_INFO info;
536 const IMAGE_RESOURCE_DIRECTORY *basedir, *resdir;
537 const IMAGE_RESOURCE_DIRECTORY_ENTRY *et;
539 TRACE( "%p %s %s %p %lx\n", hmod, debugstr_w(type), debugstr_w(name), lpfun, lparam );
541 if (!hmod) hmod = GetModuleHandleW( NULL );
542 typeW.Buffer = nameW.Buffer = NULL;
543 if ((status = LdrFindResourceDirectory_U( hmod, NULL, 0, &basedir )) != STATUS_SUCCESS)
545 if ((status = get_res_nameW( type, &typeW )) != STATUS_SUCCESS)
547 if ((status = get_res_nameW( name, &nameW )) != STATUS_SUCCESS)
549 info.Type = (ULONG)typeW.Buffer;
550 info.Name = (ULONG)nameW.Buffer;
551 if ((status = LdrFindResourceDirectory_U( hmod, &info, 2, &resdir )) != STATUS_SUCCESS)
554 et = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(resdir + 1);
555 for (i = 0; i < resdir->NumberOfNamedEntries + resdir->NumberOfIdEntries; i++)
557 ret = lpfun( hmod, type, name, et[i].u1.s2.Id, lparam );
561 if (HIWORD(typeW.Buffer)) HeapFree( GetProcessHeap(), 0, typeW.Buffer );
562 if (HIWORD(nameW.Buffer)) HeapFree( GetProcessHeap(), 0, nameW.Buffer );
563 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
568 /**********************************************************************
569 * LoadResource (KERNEL32.@)
571 HGLOBAL WINAPI LoadResource( HINSTANCE hModule, HRSRC hRsrc )
576 TRACE( "%p %p\n", hModule, hRsrc );
578 if (hModule && !HIWORD(hModule))
579 /* FIXME: should convert return to 32-bit resource */
580 return HGLOBAL_32( LoadResource16( HMODULE_16(hModule), HRSRC_16(hRsrc) ) );
582 if (!hRsrc) return 0;
583 if (!hModule) hModule = GetModuleHandleA( NULL );
584 status = LdrAccessResource( hModule, (IMAGE_RESOURCE_DATA_ENTRY *)hRsrc, &ret, NULL );
585 if (status != STATUS_SUCCESS) SetLastError( RtlNtStatusToDosError(status) );
590 /**********************************************************************
591 * LockResource (KERNEL32.@)
593 LPVOID WINAPI LockResource( HGLOBAL handle )
595 TRACE("(%p)\n", handle );
597 if (HIWORD( handle )) /* 32-bit memory handle */
598 return (LPVOID)handle;
600 /* 16-bit memory handle */
601 return LockResource16( HGLOBAL_16(handle) );
605 /**********************************************************************
606 * FreeResource (KERNEL32.@)
608 BOOL WINAPI FreeResource( HGLOBAL handle )
610 if (HIWORD(handle)) return 0; /* 32-bit memory handle: nothing to do */
611 return FreeResource16( HGLOBAL_16(handle) );
615 /**********************************************************************
616 * SizeofResource (KERNEL32.@)
618 DWORD WINAPI SizeofResource( HINSTANCE hModule, HRSRC hRsrc )
620 if (hModule && !HIWORD(hModule))
621 return SizeofResource16( HMODULE_16(hModule), HRSRC_16(hRsrc) );
623 if (!hRsrc) return 0;
624 return ((PIMAGE_RESOURCE_DATA_ENTRY)hRsrc)->Size;
628 /***********************************************************************
629 * BeginUpdateResourceA (KERNEL32.@)
631 HANDLE WINAPI BeginUpdateResourceA( LPCSTR pFileName, BOOL bDeleteExistingResources )
633 FIXME("(%s,%d): stub\n",debugstr_a(pFileName),bDeleteExistingResources);
634 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
639 /***********************************************************************
640 * BeginUpdateResourceW (KERNEL32.@)
642 HANDLE WINAPI BeginUpdateResourceW( LPCWSTR pFileName, BOOL bDeleteExistingResources )
644 FIXME("(%s,%d): stub\n",debugstr_w(pFileName),bDeleteExistingResources);
645 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
650 /***********************************************************************
651 * EndUpdateResourceA (KERNEL32.@)
653 BOOL WINAPI EndUpdateResourceA( HANDLE hUpdate, BOOL fDiscard )
655 FIXME("(%p,%d): stub\n",hUpdate, fDiscard);
656 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
661 /***********************************************************************
662 * EndUpdateResourceW (KERNEL32.@)
664 BOOL WINAPI EndUpdateResourceW( HANDLE hUpdate, BOOL fDiscard )
666 FIXME("(%p,%d): stub\n",hUpdate, fDiscard);
667 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
672 /***********************************************************************
673 * UpdateResourceA (KERNEL32.@)
675 BOOL WINAPI UpdateResourceA(
684 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
689 /***********************************************************************
690 * UpdateResourceW (KERNEL32.@)
692 BOOL WINAPI UpdateResourceW(
701 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);