[PATCH] version: Merge all 3 C source files into 1
Marcus Meissner
meissner at suse.de
Fri May 13 11:23:59 CDT 2011
Hi,
This avoids a header file or hidden visibility marking,
just merge the small files into one larger one.
Ciao, Marcus
---
dlls/version/Makefile.in | 4 +-
dlls/version/info.c | 675 --------------------
dlls/version/install.c | 602 ------------------
dlls/version/resource.c | 365 -----------
dlls/version/version.c | 1567 ++++++++++++++++++++++++++++++++++++++++++++++
5 files changed, 1568 insertions(+), 1645 deletions(-)
delete mode 100644 dlls/version/info.c
delete mode 100644 dlls/version/install.c
delete mode 100644 dlls/version/resource.c
create mode 100644 dlls/version/version.c
diff --git a/dlls/version/Makefile.in b/dlls/version/Makefile.in
index c4e3f38..5a8ca58 100644
--- a/dlls/version/Makefile.in
+++ b/dlls/version/Makefile.in
@@ -2,9 +2,7 @@ MODULE = version.dll
IMPORTLIB = version
C_SRCS = \
- info.c \
- install.c \
- resource.c
+ version.c
RC_SRCS = version.rc
diff --git a/dlls/version/info.c b/dlls/version/info.c
deleted file mode 100644
index e7f7077..0000000
--- a/dlls/version/info.c
+++ /dev/null
@@ -1,675 +0,0 @@
-/*
- * Implementation of VERSION.DLL - Version Info access
- *
- * Copyright 1996,1997 Marcus Meissner
- * Copyright 1997 David Cuthbert
- * Copyright 1999 Ulrich Weigand
- * Copyright 2005 Paul Vriens
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
- *
- */
-
-#include <stdarg.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include "windef.h"
-#include "winbase.h"
-#include "winver.h"
-#include "winuser.h"
-#include "winternl.h"
-#include "lzexpand.h"
-#include "wine/unicode.h"
-#include "winerror.h"
-#include "wine/debug.h"
-
-WINE_DEFAULT_DEBUG_CHANNEL(ver);
-
-extern DWORD find_version_resource( HFILE lzfd, DWORD *reslen, DWORD *offset );
-
-/******************************************************************************
- *
- * This function will print via standard TRACE, debug info regarding
- * the file info structure vffi.
- * 15-Feb-1998 Dimitrie Paun (dimi at cs.toronto.edu)
- * Added this function to clean up the code.
- *
- *****************************************************************************/
-static void print_vffi_debug(const VS_FIXEDFILEINFO *vffi)
-{
- BOOL versioned_printer = FALSE;
-
- if((vffi->dwFileType == VFT_DLL) || (vffi->dwFileType == VFT_DRV))
- {
- if(vffi->dwFileSubtype == VFT2_DRV_VERSIONED_PRINTER)
- /* this is documented for newer w2k Drivers and up */
- versioned_printer = TRUE;
- else if( (vffi->dwFileSubtype == VFT2_DRV_PRINTER) &&
- (vffi->dwFileVersionMS != vffi->dwProductVersionMS) &&
- (vffi->dwFileVersionMS > 0) &&
- (vffi->dwFileVersionMS <= 3) )
- /* found this on NT 3.51, NT4.0 and old w2k Drivers */
- versioned_printer = TRUE;
- }
-
- TRACE("structversion=%u.%u, ",
- HIWORD(vffi->dwStrucVersion),LOWORD(vffi->dwStrucVersion));
- if(versioned_printer)
- {
- WORD mode = LOWORD(vffi->dwFileVersionMS);
- WORD ver_rev = HIWORD(vffi->dwFileVersionLS);
- TRACE("fileversion=%u.%u.%u.%u (%s.major.minor.release), ",
- (vffi->dwFileVersionMS),
- HIBYTE(ver_rev), LOBYTE(ver_rev), LOWORD(vffi->dwFileVersionLS),
- (mode == 3) ? "Usermode" : ((mode <= 2) ? "Kernelmode" : "?") );
- }
- else
- {
- TRACE("fileversion=%u.%u.%u.%u, ",
- HIWORD(vffi->dwFileVersionMS),LOWORD(vffi->dwFileVersionMS),
- HIWORD(vffi->dwFileVersionLS),LOWORD(vffi->dwFileVersionLS));
- }
- TRACE("productversion=%u.%u.%u.%u\n",
- HIWORD(vffi->dwProductVersionMS),LOWORD(vffi->dwProductVersionMS),
- HIWORD(vffi->dwProductVersionLS),LOWORD(vffi->dwProductVersionLS));
-
- TRACE("flagmask=0x%x, flags=0x%x %s%s%s%s%s%s\n",
- vffi->dwFileFlagsMask, vffi->dwFileFlags,
- (vffi->dwFileFlags & VS_FF_DEBUG) ? "DEBUG," : "",
- (vffi->dwFileFlags & VS_FF_PRERELEASE) ? "PRERELEASE," : "",
- (vffi->dwFileFlags & VS_FF_PATCHED) ? "PATCHED," : "",
- (vffi->dwFileFlags & VS_FF_PRIVATEBUILD) ? "PRIVATEBUILD," : "",
- (vffi->dwFileFlags & VS_FF_INFOINFERRED) ? "INFOINFERRED," : "",
- (vffi->dwFileFlags & VS_FF_SPECIALBUILD) ? "SPECIALBUILD," : "");
-
- TRACE("(");
-
- TRACE("OS=0x%x.0x%x ", HIWORD(vffi->dwFileOS), LOWORD(vffi->dwFileOS));
-
- switch (vffi->dwFileOS&0xFFFF0000)
- {
- case VOS_DOS:TRACE("DOS,");break;
- case VOS_OS216:TRACE("OS/2-16,");break;
- case VOS_OS232:TRACE("OS/2-32,");break;
- case VOS_NT:TRACE("NT,");break;
- case VOS_UNKNOWN:
- default:
- TRACE("UNKNOWN(0x%x),",vffi->dwFileOS&0xFFFF0000);break;
- }
-
- switch (LOWORD(vffi->dwFileOS))
- {
- case VOS__BASE:TRACE("BASE");break;
- case VOS__WINDOWS16:TRACE("WIN16");break;
- case VOS__WINDOWS32:TRACE("WIN32");break;
- case VOS__PM16:TRACE("PM16");break;
- case VOS__PM32:TRACE("PM32");break;
- default:
- TRACE("UNKNOWN(0x%x)",LOWORD(vffi->dwFileOS));break;
- }
-
- TRACE(")\n");
-
- switch (vffi->dwFileType)
- {
- case VFT_APP:TRACE("filetype=APP");break;
- case VFT_DLL:
- TRACE("filetype=DLL");
- if(vffi->dwFileSubtype != 0)
- {
- if(versioned_printer) /* NT3.x/NT4.0 or old w2k Driver */
- TRACE(",PRINTER");
- TRACE(" (subtype=0x%x)", vffi->dwFileSubtype);
- }
- break;
- case VFT_DRV:
- TRACE("filetype=DRV,");
- switch(vffi->dwFileSubtype)
- {
- case VFT2_DRV_PRINTER:TRACE("PRINTER");break;
- case VFT2_DRV_KEYBOARD:TRACE("KEYBOARD");break;
- case VFT2_DRV_LANGUAGE:TRACE("LANGUAGE");break;
- case VFT2_DRV_DISPLAY:TRACE("DISPLAY");break;
- case VFT2_DRV_MOUSE:TRACE("MOUSE");break;
- case VFT2_DRV_NETWORK:TRACE("NETWORK");break;
- case VFT2_DRV_SYSTEM:TRACE("SYSTEM");break;
- case VFT2_DRV_INSTALLABLE:TRACE("INSTALLABLE");break;
- case VFT2_DRV_SOUND:TRACE("SOUND");break;
- case VFT2_DRV_COMM:TRACE("COMM");break;
- case VFT2_DRV_INPUTMETHOD:TRACE("INPUTMETHOD");break;
- case VFT2_DRV_VERSIONED_PRINTER:TRACE("VERSIONED_PRINTER");break;
- case VFT2_UNKNOWN:
- default:
- TRACE("UNKNOWN(0x%x)",vffi->dwFileSubtype);break;
- }
- break;
- case VFT_FONT:
- TRACE("filetype=FONT,");
- switch (vffi->dwFileSubtype)
- {
- case VFT2_FONT_RASTER:TRACE("RASTER");break;
- case VFT2_FONT_VECTOR:TRACE("VECTOR");break;
- case VFT2_FONT_TRUETYPE:TRACE("TRUETYPE");break;
- default:TRACE("UNKNOWN(0x%x)",vffi->dwFileSubtype);break;
- }
- break;
- case VFT_VXD:TRACE("filetype=VXD");break;
- case VFT_STATIC_LIB:TRACE("filetype=STATIC_LIB");break;
- case VFT_UNKNOWN:
- default:
- TRACE("filetype=Unknown(0x%x)",vffi->dwFileType);break;
- }
-
- TRACE("\n");
- TRACE("filedate=0x%x.0x%x\n",vffi->dwFileDateMS,vffi->dwFileDateLS);
-}
-
-/***********************************************************************
- * Version Info Structure
- */
-
-typedef struct
-{
- WORD wLength;
- WORD wValueLength;
- CHAR szKey[1];
-#if 0 /* variable length structure */
- /* DWORD aligned */
- BYTE Value[];
- /* DWORD aligned */
- VS_VERSION_INFO_STRUCT16 Children[];
-#endif
-} VS_VERSION_INFO_STRUCT16;
-
-typedef struct
-{
- WORD wLength;
- WORD wValueLength;
- WORD wType;
- WCHAR szKey[1];
-#if 0 /* variable length structure */
- /* DWORD aligned */
- BYTE Value[];
- /* DWORD aligned */
- VS_VERSION_INFO_STRUCT32 Children[];
-#endif
-} VS_VERSION_INFO_STRUCT32;
-
-#define VersionInfoIs16( ver ) \
- ( ((const VS_VERSION_INFO_STRUCT16 *)ver)->szKey[0] >= ' ' )
-
-#define DWORD_ALIGN( base, ptr ) \
- ( (LPBYTE)(base) + ((((LPBYTE)(ptr) - (LPBYTE)(base)) + 3) & ~3) )
-
-#define VersionInfo16_Value( ver ) \
- DWORD_ALIGN( (ver), (ver)->szKey + strlen((ver)->szKey) + 1 )
-#define VersionInfo32_Value( ver ) \
- DWORD_ALIGN( (ver), (ver)->szKey + strlenW((ver)->szKey) + 1 )
-
-#define VersionInfo16_Children( ver ) \
- (const VS_VERSION_INFO_STRUCT16 *)( VersionInfo16_Value( ver ) + \
- ( ( (ver)->wValueLength + 3 ) & ~3 ) )
-#define VersionInfo32_Children( ver ) \
- (const VS_VERSION_INFO_STRUCT32 *)( VersionInfo32_Value( ver ) + \
- ( ( (ver)->wValueLength * \
- ((ver)->wType? 2 : 1) + 3 ) & ~3 ) )
-
-#define VersionInfo16_Next( ver ) \
- (VS_VERSION_INFO_STRUCT16 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) )
-#define VersionInfo32_Next( ver ) \
- (VS_VERSION_INFO_STRUCT32 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) )
-
-
-/***********************************************************************
- * GetFileVersionInfoSizeW [VERSION.@]
- */
-DWORD WINAPI GetFileVersionInfoSizeW( LPCWSTR filename, LPDWORD handle )
-{
- DWORD len, offset, magic = 1;
- HFILE lzfd;
- HMODULE hModule;
- OFSTRUCT ofs;
-
- TRACE("(%s,%p)\n", debugstr_w(filename), handle );
-
- if (handle) *handle = 0;
-
- if (!filename)
- {
- SetLastError(ERROR_INVALID_PARAMETER);
- return 0;
- }
- if (!*filename)
- {
- SetLastError(ERROR_BAD_PATHNAME);
- return 0;
- }
-
- if ((lzfd = LZOpenFileW( (LPWSTR)filename, &ofs, OF_READ )) != HFILE_ERROR)
- {
- magic = find_version_resource( lzfd, &len, &offset );
- LZClose( lzfd );
- }
-
- if ((magic == 1) && (hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_DATAFILE )))
- {
- HRSRC hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO),
- MAKEINTRESOURCEW(VS_FILE_INFO) );
- if (hRsrc)
- {
- magic = IMAGE_NT_SIGNATURE;
- len = SizeofResource( hModule, hRsrc );
- }
- FreeLibrary( hModule );
- }
-
- switch (magic)
- {
- case IMAGE_OS2_SIGNATURE:
- /* We have a 16bit resource.
- *
- * XP/W2K/W2K3 uses a buffer which is more than the actual needed space:
- *
- * (info->wLength - sizeof(VS_FIXEDFILEINFO)) * 4
- *
- * This extra buffer is used for ANSI to Unicode conversions in W-Calls.
- * info->wLength should be the same as len. Currently it isn't but that
- * doesn't seem to be a problem (len is bigger than info->wLength).
- */
- SetLastError(0);
- return (len - sizeof(VS_FIXEDFILEINFO)) * 4;
-
- case IMAGE_NT_SIGNATURE:
- /* We have a 32bit resource.
- *
- * XP/W2K/W2K3 uses a buffer which is 2 times the actual needed space + 4 bytes "FE2X"
- * This extra buffer is used for Unicode to ANSI conversions in A-Calls
- */
- SetLastError(0);
- return (len * 2) + 4;
-
- default:
- SetLastError( lzfd == HFILE_ERROR ? ofs.nErrCode : ERROR_RESOURCE_DATA_NOT_FOUND );
- return 0;
- }
-}
-
-/***********************************************************************
- * GetFileVersionInfoSizeA [VERSION.@]
- */
-DWORD WINAPI GetFileVersionInfoSizeA( LPCSTR filename, LPDWORD handle )
-{
- UNICODE_STRING filenameW;
- DWORD retval;
-
- TRACE("(%s,%p)\n", debugstr_a(filename), handle );
-
- if(filename)
- RtlCreateUnicodeStringFromAsciiz(&filenameW, filename);
- else
- filenameW.Buffer = NULL;
-
- retval = GetFileVersionInfoSizeW(filenameW.Buffer, handle);
-
- RtlFreeUnicodeString(&filenameW);
-
- return retval;
-}
-
-/***********************************************************************
- * GetFileVersionInfoW [VERSION.@]
- */
-BOOL WINAPI GetFileVersionInfoW( LPCWSTR filename, DWORD handle,
- DWORD datasize, LPVOID data )
-{
- static const char signature[4] = "FE2X";
- DWORD len, offset, magic = 1;
- HFILE lzfd;
- OFSTRUCT ofs;
- HMODULE hModule;
- VS_VERSION_INFO_STRUCT32* vvis = data;
-
- TRACE("(%s,%d,size=%d,data=%p)\n",
- debugstr_w(filename), handle, datasize, data );
-
- if (!data)
- {
- SetLastError(ERROR_INVALID_DATA);
- return FALSE;
- }
-
- if ((lzfd = LZOpenFileW( (LPWSTR)filename, &ofs, OF_READ )) != HFILE_ERROR)
- {
- if ((magic = find_version_resource( lzfd, &len, &offset )) > 1)
- {
- LZSeek( lzfd, offset, 0 /* SEEK_SET */ );
- len = LZRead( lzfd, data, min( len, datasize ) );
- }
- LZClose( lzfd );
- }
-
- if ((magic == 1) && (hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_DATAFILE )))
- {
- HRSRC hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO),
- MAKEINTRESOURCEW(VS_FILE_INFO) );
- if (hRsrc)
- {
- HGLOBAL hMem = LoadResource( hModule, hRsrc );
- magic = IMAGE_NT_SIGNATURE;
- len = min( SizeofResource(hModule, hRsrc), datasize );
- memcpy( data, LockResource( hMem ), len );
- FreeResource( hMem );
- }
- FreeLibrary( hModule );
- }
-
- switch (magic)
- {
- case IMAGE_OS2_SIGNATURE:
- /* We have a 16bit resource. */
- if (TRACE_ON(ver))
- print_vffi_debug( (VS_FIXEDFILEINFO *)VersionInfo16_Value( (VS_VERSION_INFO_STRUCT16 *)data ));
- SetLastError(0);
- return TRUE;
-
- case IMAGE_NT_SIGNATURE:
- /* We have a 32bit resource.
- *
- * XP/W2K/W2K3 uses a buffer which is 2 times the actual needed space + 4 bytes "FE2X"
- * This extra buffer is used for Unicode to ANSI conversions in A-Calls
- */
- len = vvis->wLength + sizeof(signature);
- if (datasize >= len) memcpy( (char*)data + vvis->wLength, signature, sizeof(signature) );
- if (TRACE_ON(ver))
- print_vffi_debug( (VS_FIXEDFILEINFO *)VersionInfo32_Value( vvis ));
- SetLastError(0);
- return TRUE;
-
- default:
- SetLastError( lzfd == HFILE_ERROR ? ofs.nErrCode : ERROR_RESOURCE_DATA_NOT_FOUND );
- return FALSE;
- }
-}
-
-/***********************************************************************
- * GetFileVersionInfoA [VERSION.@]
- */
-BOOL WINAPI GetFileVersionInfoA( LPCSTR filename, DWORD handle,
- DWORD datasize, LPVOID data )
-{
- UNICODE_STRING filenameW;
- BOOL retval;
-
- TRACE("(%s,%d,size=%d,data=%p)\n",
- debugstr_a(filename), handle, datasize, data );
-
- if(filename)
- RtlCreateUnicodeStringFromAsciiz(&filenameW, filename);
- else
- filenameW.Buffer = NULL;
-
- retval = GetFileVersionInfoW(filenameW.Buffer, handle, datasize, data);
-
- RtlFreeUnicodeString(&filenameW);
-
- return retval;
-}
-
-/***********************************************************************
- * VersionInfo16_FindChild [internal]
- */
-static const VS_VERSION_INFO_STRUCT16 *VersionInfo16_FindChild( const VS_VERSION_INFO_STRUCT16 *info,
- LPCSTR szKey, UINT cbKey )
-{
- const VS_VERSION_INFO_STRUCT16 *child = VersionInfo16_Children( info );
-
- while ((char *)child < (char *)info + info->wLength )
- {
- if (!strncasecmp( child->szKey, szKey, cbKey ) && !child->szKey[cbKey])
- return child;
-
- if (!(child->wLength)) return NULL;
- child = VersionInfo16_Next( child );
- }
-
- return NULL;
-}
-
-/***********************************************************************
- * VersionInfo32_FindChild [internal]
- */
-static const VS_VERSION_INFO_STRUCT32 *VersionInfo32_FindChild( const VS_VERSION_INFO_STRUCT32 *info,
- LPCWSTR szKey, UINT cbKey )
-{
- const VS_VERSION_INFO_STRUCT32 *child = VersionInfo32_Children( info );
-
- while ((char *)child < (char *)info + info->wLength )
- {
- if (!strncmpiW( child->szKey, szKey, cbKey ) && !child->szKey[cbKey])
- return child;
-
- if (!(child->wLength)) return NULL;
- child = VersionInfo32_Next( child );
- }
-
- return NULL;
-}
-
-/***********************************************************************
- * VersionInfo16_QueryValue [internal]
- *
- * Gets a value from a 16-bit NE resource
- */
-static BOOL VersionInfo16_QueryValue( const VS_VERSION_INFO_STRUCT16 *info, LPCSTR lpSubBlock,
- LPVOID *lplpBuffer, UINT *puLen )
-{
- while ( *lpSubBlock )
- {
- /* Find next path component */
- LPCSTR lpNextSlash;
- for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ )
- if ( *lpNextSlash == '\\' )
- break;
-
- /* Skip empty components */
- if ( lpNextSlash == lpSubBlock )
- {
- lpSubBlock++;
- continue;
- }
-
- /* We have a non-empty component: search info for key */
- info = VersionInfo16_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock );
- if ( !info )
- {
- if (puLen) *puLen = 0 ;
- SetLastError( ERROR_RESOURCE_TYPE_NOT_FOUND );
- return FALSE;
- }
-
- /* Skip path component */
- lpSubBlock = lpNextSlash;
- }
-
- /* Return value */
- *lplpBuffer = VersionInfo16_Value( info );
- if (puLen)
- *puLen = info->wValueLength;
-
- return TRUE;
-}
-
-/***********************************************************************
- * VersionInfo32_QueryValue [internal]
- *
- * Gets a value from a 32-bit PE resource
- */
-static BOOL VersionInfo32_QueryValue( const VS_VERSION_INFO_STRUCT32 *info, LPCWSTR lpSubBlock,
- LPVOID *lplpBuffer, UINT *puLen )
-{
- TRACE("lpSubBlock : (%s)\n", debugstr_w(lpSubBlock));
-
- while ( *lpSubBlock )
- {
- /* Find next path component */
- LPCWSTR lpNextSlash;
- for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ )
- if ( *lpNextSlash == '\\' )
- break;
-
- /* Skip empty components */
- if ( lpNextSlash == lpSubBlock )
- {
- lpSubBlock++;
- continue;
- }
-
- /* We have a non-empty component: search info for key */
- info = VersionInfo32_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock );
- if ( !info )
- {
- if (puLen) *puLen = 0 ;
- SetLastError( ERROR_RESOURCE_TYPE_NOT_FOUND );
- return FALSE;
- }
-
- /* Skip path component */
- lpSubBlock = lpNextSlash;
- }
-
- /* Return value */
- *lplpBuffer = VersionInfo32_Value( info );
- if (puLen)
- *puLen = info->wValueLength;
-
- return TRUE;
-}
-
-/***********************************************************************
- * VerQueryValueA [VERSION.@]
- */
-BOOL WINAPI VerQueryValueA( LPCVOID pBlock, LPCSTR lpSubBlock,
- LPVOID *lplpBuffer, PUINT puLen )
-{
- static const char rootA[] = "\\";
- static const char varfileinfoA[] = "\\VarFileInfo\\Translation";
- const VS_VERSION_INFO_STRUCT16 *info = pBlock;
-
- TRACE("(%p,%s,%p,%p)\n",
- pBlock, debugstr_a(lpSubBlock), lplpBuffer, puLen );
-
- if (!pBlock)
- return FALSE;
-
- if (lpSubBlock == NULL || lpSubBlock[0] == '\0')
- lpSubBlock = rootA;
-
- if ( !VersionInfoIs16( info ) )
- {
- BOOL ret;
- INT len;
- LPWSTR lpSubBlockW;
-
- len = MultiByteToWideChar(CP_ACP, 0, lpSubBlock, -1, NULL, 0);
- lpSubBlockW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
-
- if (!lpSubBlockW)
- return FALSE;
-
- MultiByteToWideChar(CP_ACP, 0, lpSubBlock, -1, lpSubBlockW, len);
-
- ret = VersionInfo32_QueryValue(pBlock, lpSubBlockW, lplpBuffer, puLen);
-
- HeapFree(GetProcessHeap(), 0, lpSubBlockW);
-
- if (ret && strcasecmp( lpSubBlock, rootA ) && strcasecmp( lpSubBlock, varfileinfoA ))
- {
- /* Set lpBuffer so it points to the 'empty' area where we store
- * the converted strings
- */
- LPSTR lpBufferA = (LPSTR)pBlock + info->wLength + 4;
- DWORD pos = (LPCSTR)*lplpBuffer - (LPCSTR)pBlock;
-
- len = WideCharToMultiByte(CP_ACP, 0, *lplpBuffer, -1,
- lpBufferA + pos, info->wLength - pos, NULL, NULL);
- *lplpBuffer = lpBufferA + pos;
- *puLen = len;
- }
- return ret;
- }
-
- return VersionInfo16_QueryValue(info, lpSubBlock, lplpBuffer, puLen);
-}
-
-/***********************************************************************
- * VerQueryValueW [VERSION.@]
- */
-BOOL WINAPI VerQueryValueW( LPCVOID pBlock, LPCWSTR lpSubBlock,
- LPVOID *lplpBuffer, PUINT puLen )
-{
- static const WCHAR nullW[] = { 0 };
- static const WCHAR rootW[] = { '\\', 0 };
- static const WCHAR varfileinfoW[] = { '\\','V','a','r','F','i','l','e','I','n','f','o',
- '\\','T','r','a','n','s','l','a','t','i','o','n', 0 };
-
- const VS_VERSION_INFO_STRUCT32 *info = pBlock;
-
- TRACE("(%p,%s,%p,%p)\n",
- pBlock, debugstr_w(lpSubBlock), lplpBuffer, puLen );
-
- if (!pBlock)
- return FALSE;
-
- if (lpSubBlock == NULL || lpSubBlock[0] == nullW[0])
- lpSubBlock = rootW;
-
- if ( VersionInfoIs16( info ) )
- {
- BOOL ret;
- int len;
- LPSTR lpSubBlockA;
-
- len = WideCharToMultiByte(CP_ACP, 0, lpSubBlock, -1, NULL, 0, NULL, NULL);
- lpSubBlockA = HeapAlloc(GetProcessHeap(), 0, len * sizeof(char));
-
- if (!lpSubBlockA)
- return FALSE;
-
- WideCharToMultiByte(CP_ACP, 0, lpSubBlock, -1, lpSubBlockA, len, NULL, NULL);
-
- ret = VersionInfo16_QueryValue(pBlock, lpSubBlockA, lplpBuffer, puLen);
-
- HeapFree(GetProcessHeap(), 0, lpSubBlockA);
-
- if (ret && strcmpiW( lpSubBlock, rootW ) && strcmpiW( lpSubBlock, varfileinfoW ))
- {
- /* Set lpBuffer so it points to the 'empty' area where we store
- * the converted strings
- */
- LPWSTR lpBufferW = (LPWSTR)((LPSTR)pBlock + info->wLength);
- DWORD pos = (LPCSTR)*lplpBuffer - (LPCSTR)pBlock;
- DWORD max = (info->wLength - sizeof(VS_FIXEDFILEINFO)) * 4 - info->wLength;
-
- len = MultiByteToWideChar(CP_ACP, 0, *lplpBuffer, -1,
- lpBufferW + pos, max/sizeof(WCHAR) - pos );
- *lplpBuffer = lpBufferW + pos;
- *puLen = len;
- }
- return ret;
- }
-
- return VersionInfo32_QueryValue(info, lpSubBlock, lplpBuffer, puLen);
-}
diff --git a/dlls/version/install.c b/dlls/version/install.c
deleted file mode 100644
index d5c12eb..0000000
--- a/dlls/version/install.c
+++ /dev/null
@@ -1,602 +0,0 @@
-/*
- * Implementation of VERSION.DLL - File Installer routines
- *
- * Copyright 1996,1997 Marcus Meissner
- * Copyright 1997 David Cuthbert
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
- *
- * TODO
- * o Check the installation functions.
- */
-
-#include <stdlib.h>
-#include <stdarg.h>
-#include <stdio.h>
-#include <string.h>
-
-#include "windef.h"
-#include "winbase.h"
-#include "winver.h"
-#include "winnls.h"
-#include "wine/unicode.h"
-#include "winerror.h"
-#include "lzexpand.h"
-#include "wine/debug.h"
-
-WINE_DEFAULT_DEBUG_CHANNEL(ver);
-
-
-/******************************************************************************
- * testFileExistenceA
- *
- * Tests whether a given path/file combination exists. If the file does
- * not exist, the return value is zero. If it does exist, the return
- * value is non-zero.
- *
- * Revision history
- * 30-May-1997 Dave Cuthbert (dacut at ece.cmu.edu)
- * Original implementation
- *
- */
-static int testFileExistenceA( char const * path, char const * file, BOOL excl )
-{
- char filename[1024];
- int filenamelen;
- OFSTRUCT fileinfo;
-
- fileinfo.cBytes = sizeof(OFSTRUCT);
-
- strcpy(filename, path);
- filenamelen = strlen(filename);
-
- /* Add a trailing \ if necessary */
- if(filenamelen) {
- if(filename[filenamelen - 1] != '\\')
- strcat(filename, "\\");
- }
- else /* specify the current directory */
- strcpy(filename, ".\\");
-
- /* Create the full pathname */
- strcat(filename, file);
-
- return (OpenFile(filename, &fileinfo,
- OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
-}
-
-/******************************************************************************
- * testFileExistenceW
- */
-static int testFileExistenceW( const WCHAR *path, const WCHAR *file, BOOL excl )
-{
- char *filename;
- DWORD pathlen, filelen;
- int ret;
- OFSTRUCT fileinfo;
-
- fileinfo.cBytes = sizeof(OFSTRUCT);
-
- pathlen = WideCharToMultiByte( CP_ACP, 0, path, -1, NULL, 0, NULL, NULL );
- filelen = WideCharToMultiByte( CP_ACP, 0, file, -1, NULL, 0, NULL, NULL );
- filename = HeapAlloc( GetProcessHeap(), 0, pathlen+filelen+2 );
-
- WideCharToMultiByte( CP_ACP, 0, path, -1, filename, pathlen, NULL, NULL );
- /* Add a trailing \ if necessary */
- if (pathlen > 1)
- {
- if (filename[pathlen-2] != '\\') strcpy( &filename[pathlen-1], "\\" );
- }
- else /* specify the current directory */
- strcpy(filename, ".\\");
-
- WideCharToMultiByte( CP_ACP, 0, file, -1, filename+strlen(filename), filelen, NULL, NULL );
-
- ret = (OpenFile(filename, &fileinfo,
- OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
- HeapFree( GetProcessHeap(), 0, filename );
- return ret;
-}
-
-/*****************************************************************************
- * VerFindFileA [VERSION.@]
- *
- * Determines where to install a file based on whether it locates another
- * version of the file in the system. The values VerFindFile returns are
- * used in a subsequent call to the VerInstallFile function.
- *
- * Revision history:
- * 30-May-1997 Dave Cuthbert (dacut at ece.cmu.edu)
- * Reimplementation of VerFindFile from original stub.
- */
-DWORD WINAPI VerFindFileA(
- DWORD flags,
- LPCSTR lpszFilename,
- LPCSTR lpszWinDir,
- LPCSTR lpszAppDir,
- LPSTR lpszCurDir,
- PUINT lpuCurDirLen,
- LPSTR lpszDestDir,
- PUINT lpuDestDirLen )
-{
- DWORD retval = 0;
- const char *curDir;
- const char *destDir;
- unsigned int curDirSizeReq;
- unsigned int destDirSizeReq;
- char systemDir[MAX_PATH];
-
- /* Print out debugging information */
- TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
- flags, debugstr_a(lpszFilename), debugstr_a(lpszWinDir), debugstr_a(lpszAppDir),
- lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
- lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
-
- /* Figure out where the file should go; shared files default to the
- system directory */
-
- GetSystemDirectoryA(systemDir, sizeof(systemDir));
- curDir = "";
- destDir = "";
-
- if(flags & VFFF_ISSHAREDFILE)
- {
- destDir = systemDir;
- /* Were we given a filename? If so, try to find the file. */
- if(lpszFilename)
- {
- if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
- else if(lpszAppDir && testFileExistenceA(lpszAppDir, lpszFilename, FALSE))
- {
- curDir = lpszAppDir;
- retval |= VFF_CURNEDEST;
- }
- }
- }
- else /* not a shared file */
- {
- if(lpszAppDir)
- {
- destDir = lpszAppDir;
- if(lpszFilename)
- {
- if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
- else if(testFileExistenceA(systemDir, lpszFilename, FALSE))
- {
- curDir = systemDir;
- retval |= VFF_CURNEDEST;
- }
- }
- }
- }
-
- /* Check to see if the file exists and is in use by another application */
- if (lpszFilename && testFileExistenceA(curDir, lpszFilename, FALSE)) {
- if (lpszFilename && !testFileExistenceA(curDir, lpszFilename, TRUE))
- retval |= VFF_FILEINUSE;
- }
-
- curDirSizeReq = strlen(curDir) + 1;
- destDirSizeReq = strlen(destDir) + 1;
-
- /* Make sure that the pointers to the size of the buffers are
- valid; if not, do NOTHING with that buffer. If that pointer
- is valid, then make sure that the buffer pointer is valid, too! */
-
- if(lpuDestDirLen && lpszDestDir)
- {
- if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
- lstrcpynA(lpszDestDir, destDir, *lpuDestDirLen);
- *lpuDestDirLen = destDirSizeReq;
- }
- if(lpuCurDirLen && lpszCurDir)
- {
- if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
- lstrcpynA(lpszCurDir, curDir, *lpuCurDirLen);
- *lpuCurDirLen = curDirSizeReq;
- }
-
- TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
- (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
- (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
- (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
- debugstr_a(lpszCurDir), debugstr_a(lpszDestDir));
-
- return retval;
-}
-
-/*****************************************************************************
- * VerFindFileW [VERSION.@]
- */
-DWORD WINAPI VerFindFileW( DWORD flags,LPCWSTR lpszFilename,LPCWSTR lpszWinDir,
- LPCWSTR lpszAppDir, LPWSTR lpszCurDir,PUINT lpuCurDirLen,
- LPWSTR lpszDestDir,PUINT lpuDestDirLen )
-{
- static const WCHAR emptyW;
- DWORD retval = 0;
- const WCHAR *curDir;
- const WCHAR *destDir;
- unsigned int curDirSizeReq;
- unsigned int destDirSizeReq;
- WCHAR systemDir[MAX_PATH];
-
- /* Print out debugging information */
- TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
- flags, debugstr_w(lpszFilename), debugstr_w(lpszWinDir), debugstr_w(lpszAppDir),
- lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
- lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
-
- /* Figure out where the file should go; shared files default to the
- system directory */
-
- GetSystemDirectoryW(systemDir, sizeof(systemDir)/sizeof(WCHAR));
- curDir = &emptyW;
- destDir = &emptyW;
-
- if(flags & VFFF_ISSHAREDFILE)
- {
- destDir = systemDir;
- /* Were we given a filename? If so, try to find the file. */
- if(lpszFilename)
- {
- if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
- else if(lpszAppDir && testFileExistenceW(lpszAppDir, lpszFilename, FALSE))
- {
- curDir = lpszAppDir;
- retval |= VFF_CURNEDEST;
- }
- }
- }
- else /* not a shared file */
- {
- if(lpszAppDir)
- {
- destDir = lpszAppDir;
- if(lpszFilename)
- {
- if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
- else if(testFileExistenceW(systemDir, lpszFilename, FALSE))
- {
- curDir = systemDir;
- retval |= VFF_CURNEDEST;
- }
- }
- }
- }
-
- if (lpszFilename && !testFileExistenceW(curDir, lpszFilename, TRUE))
- retval |= VFF_FILEINUSE;
-
- curDirSizeReq = strlenW(curDir) + 1;
- destDirSizeReq = strlenW(destDir) + 1;
-
- /* Make sure that the pointers to the size of the buffers are
- valid; if not, do NOTHING with that buffer. If that pointer
- is valid, then make sure that the buffer pointer is valid, too! */
-
- if(lpuDestDirLen && lpszDestDir)
- {
- if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
- lstrcpynW(lpszDestDir, destDir, *lpuDestDirLen);
- *lpuDestDirLen = destDirSizeReq;
- }
- if(lpuCurDirLen && lpszCurDir)
- {
- if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
- lstrcpynW(lpszCurDir, curDir, *lpuCurDirLen);
- *lpuCurDirLen = curDirSizeReq;
- }
-
- TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
- (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
- (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
- (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
- debugstr_w(lpszCurDir), debugstr_w(lpszDestDir));
- return retval;
-}
-
-static LPBYTE
-_fetch_versioninfo(LPSTR fn,VS_FIXEDFILEINFO **vffi) {
- DWORD alloclen;
- LPBYTE buf;
- DWORD ret;
-
- alloclen = 1000;
- buf=HeapAlloc(GetProcessHeap(), 0, alloclen);
- if(buf == NULL) {
- WARN("Memory exausted while fetching version info!\n");
- return NULL;
- }
- while (1) {
- ret = GetFileVersionInfoA(fn,0,alloclen,buf);
- if (!ret) {
- HeapFree(GetProcessHeap(), 0, buf);
- return NULL;
- }
- if (alloclen<*(WORD*)buf) {
- alloclen = *(WORD*)buf;
- HeapFree(GetProcessHeap(), 0, buf);
- buf = HeapAlloc(GetProcessHeap(), 0, alloclen);
- if(buf == NULL) {
- WARN("Memory exausted while fetching version info!\n");
- return NULL;
- }
- } else {
- *vffi = (VS_FIXEDFILEINFO*)(buf+0x14);
- if ((*vffi)->dwSignature == 0x004f0049) /* hack to detect unicode */
- *vffi = (VS_FIXEDFILEINFO*)(buf+0x28);
- if ((*vffi)->dwSignature != VS_FFI_SIGNATURE)
- WARN("Bad VS_FIXEDFILEINFO signature 0x%08x\n",(*vffi)->dwSignature);
- return buf;
- }
- }
-}
-
-static DWORD
-_error2vif(DWORD error) {
- switch (error) {
- case ERROR_ACCESS_DENIED:
- return VIF_ACCESSVIOLATION;
- case ERROR_SHARING_VIOLATION:
- return VIF_SHARINGVIOLATION;
- default:
- return 0;
- }
-}
-
-
-/******************************************************************************
- * VerInstallFileA [VERSION.@]
- */
-DWORD WINAPI VerInstallFileA(
- DWORD flags,LPCSTR srcfilename,LPCSTR destfilename,LPCSTR srcdir,
- LPCSTR destdir,LPCSTR curdir,LPSTR tmpfile,PUINT tmpfilelen )
-{
- LPCSTR pdest;
- char destfn[260],tmpfn[260],srcfn[260];
- HFILE hfsrc,hfdst;
- DWORD attr,xret,tmplast;
- LONG ret;
- LPBYTE buf1,buf2;
- OFSTRUCT ofs;
-
- TRACE("(%x,%s,%s,%s,%s,%s,%p,%d)\n",
- flags,srcfilename,destfilename,srcdir,destdir,curdir,tmpfile,*tmpfilelen
- );
- xret = 0;
- sprintf(srcfn,"%s\\%s",srcdir,srcfilename);
- if (!destdir || !*destdir) pdest = srcdir;
- else pdest = destdir;
- sprintf(destfn,"%s\\%s",pdest,destfilename);
- hfsrc=LZOpenFileA(srcfn,&ofs,OF_READ);
- if (hfsrc < 0)
- return VIF_CANNOTREADSRC;
- sprintf(tmpfn,"%s\\%s",pdest,destfilename);
- tmplast=strlen(pdest)+1;
- attr = GetFileAttributesA(tmpfn);
- if (attr != INVALID_FILE_ATTRIBUTES) {
- if (attr & FILE_ATTRIBUTE_READONLY) {
- LZClose(hfsrc);
- return VIF_WRITEPROT;
- }
- /* FIXME: check if file currently in use and return VIF_FILEINUSE */
- }
- attr = INVALID_FILE_ATTRIBUTES;
- if (flags & VIFF_FORCEINSTALL) {
- if (tmpfile[0]) {
- sprintf(tmpfn,"%s\\%s",pdest,tmpfile);
- tmplast = strlen(pdest)+1;
- attr = GetFileAttributesA(tmpfn);
- /* if it exists, it has been copied by the call before.
- * we jump over the copy part...
- */
- }
- }
- if (attr == INVALID_FILE_ATTRIBUTES) {
- char *s;
-
- GetTempFileNameA(pdest,"ver",0,tmpfn); /* should not fail ... */
- s=strrchr(tmpfn,'\\');
- if (s)
- tmplast = s-tmpfn;
- else
- tmplast = 0;
- hfdst = OpenFile(tmpfn,&ofs,OF_CREATE);
- if (hfdst == HFILE_ERROR) {
- LZClose(hfsrc);
- return VIF_CANNOTCREATE; /* | translated dos error */
- }
- ret = LZCopy(hfsrc,hfdst);
- _lclose(hfdst);
- if (ret < 0) {
- /* translate LZ errors into VIF_xxx */
- switch (ret) {
- case LZERROR_BADINHANDLE:
- case LZERROR_READ:
- case LZERROR_BADVALUE:
- case LZERROR_UNKNOWNALG:
- xret = VIF_CANNOTREADSRC;
- break;
- case LZERROR_BADOUTHANDLE:
- case LZERROR_WRITE:
- xret = VIF_OUTOFSPACE;
- break;
- case LZERROR_GLOBALLOC:
- case LZERROR_GLOBLOCK:
- xret = VIF_OUTOFMEMORY;
- break;
- default: /* unknown error, should not happen */
- FIXME("Unknown LZCopy error %d, ignoring.\n", ret);
- xret = 0;
- break;
- }
- if (xret) {
- LZClose(hfsrc);
- return xret;
- }
- }
- }
- xret = 0;
- if (!(flags & VIFF_FORCEINSTALL)) {
- VS_FIXEDFILEINFO *destvffi,*tmpvffi;
- buf1 = _fetch_versioninfo(destfn,&destvffi);
- if (buf1) {
- buf2 = _fetch_versioninfo(tmpfn,&tmpvffi);
- if (buf2) {
- char *tbuf1,*tbuf2;
- static const CHAR trans_array[] = "\\VarFileInfo\\Translation";
- UINT len1,len2;
-
- len1=len2=40;
-
- /* compare file versions */
- if ((destvffi->dwFileVersionMS > tmpvffi->dwFileVersionMS)||
- ((destvffi->dwFileVersionMS==tmpvffi->dwFileVersionMS)&&
- (destvffi->dwFileVersionLS > tmpvffi->dwFileVersionLS)
- )
- )
- xret |= VIF_MISMATCH|VIF_SRCOLD;
- /* compare filetypes and filesubtypes */
- if ((destvffi->dwFileType!=tmpvffi->dwFileType) ||
- (destvffi->dwFileSubtype!=tmpvffi->dwFileSubtype)
- )
- xret |= VIF_MISMATCH|VIF_DIFFTYPE;
- if (VerQueryValueA(buf1,trans_array,(LPVOID*)&tbuf1,&len1) &&
- VerQueryValueA(buf2,trans_array,(LPVOID*)&tbuf2,&len2)
- ) {
- /* Do something with tbuf1 and tbuf2
- * generates DIFFLANG|MISMATCH
- */
- }
- HeapFree(GetProcessHeap(), 0, buf2);
- } else
- xret=VIF_MISMATCH|VIF_SRCOLD;
- HeapFree(GetProcessHeap(), 0, buf1);
- }
- }
- if (xret) {
- if (*tmpfilelen<strlen(tmpfn+tmplast)) {
- xret|=VIF_BUFFTOOSMALL;
- DeleteFileA(tmpfn);
- } else {
- strcpy(tmpfile,tmpfn+tmplast);
- *tmpfilelen = strlen(tmpfn+tmplast)+1;
- xret|=VIF_TEMPFILE;
- }
- } else {
- if (INVALID_FILE_ATTRIBUTES!=GetFileAttributesA(destfn))
- if (!DeleteFileA(destfn)) {
- xret|=_error2vif(GetLastError())|VIF_CANNOTDELETE;
- DeleteFileA(tmpfn);
- LZClose(hfsrc);
- return xret;
- }
- if ((!(flags & VIFF_DONTDELETEOLD)) &&
- curdir &&
- *curdir &&
- lstrcmpiA(curdir,pdest)
- ) {
- char curfn[260];
-
- sprintf(curfn,"%s\\%s",curdir,destfilename);
- if (INVALID_FILE_ATTRIBUTES != GetFileAttributesA(curfn)) {
- /* FIXME: check if in use ... if it is, VIF_CANNOTDELETECUR */
- if (!DeleteFileA(curfn))
- xret|=_error2vif(GetLastError())|VIF_CANNOTDELETECUR;
- }
- }
- if (!MoveFileA(tmpfn,destfn)) {
- xret|=_error2vif(GetLastError())|VIF_CANNOTRENAME;
- DeleteFileA(tmpfn);
- }
- }
- LZClose(hfsrc);
- return xret;
-}
-
-
-/******************************************************************************
- * VerInstallFileW [VERSION.@]
- */
-DWORD WINAPI VerInstallFileW(
- DWORD flags,LPCWSTR srcfilename,LPCWSTR destfilename,LPCWSTR srcdir,
- LPCWSTR destdir,LPCWSTR curdir,LPWSTR tmpfile,PUINT tmpfilelen )
-{
- LPSTR wsrcf = NULL, wsrcd = NULL, wdestf = NULL, wdestd = NULL, wtmpf = NULL, wcurd = NULL;
- DWORD ret = 0;
- UINT len;
-
- if (srcfilename)
- {
- len = WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, NULL, 0, NULL, NULL );
- if ((wsrcf = HeapAlloc( GetProcessHeap(), 0, len )))
- WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, wsrcf, len, NULL, NULL );
- else
- ret = VIF_OUTOFMEMORY;
- }
- if (srcdir && !ret)
- {
- len = WideCharToMultiByte( CP_ACP, 0, srcdir, -1, NULL, 0, NULL, NULL );
- if ((wsrcd = HeapAlloc( GetProcessHeap(), 0, len )))
- WideCharToMultiByte( CP_ACP, 0, srcdir, -1, wsrcd, len, NULL, NULL );
- else
- ret = VIF_OUTOFMEMORY;
- }
- if (destfilename && !ret)
- {
- len = WideCharToMultiByte( CP_ACP, 0, destfilename, -1, NULL, 0, NULL, NULL );
- if ((wdestf = HeapAlloc( GetProcessHeap(), 0, len )))
- WideCharToMultiByte( CP_ACP, 0, destfilename, -1, wdestf, len, NULL, NULL );
- else
- ret = VIF_OUTOFMEMORY;
- }
- if (destdir && !ret)
- {
- len = WideCharToMultiByte( CP_ACP, 0, destdir, -1, NULL, 0, NULL, NULL );
- if ((wdestd = HeapAlloc( GetProcessHeap(), 0, len )))
- WideCharToMultiByte( CP_ACP, 0, destdir, -1, wdestd, len, NULL, NULL );
- else
- ret = VIF_OUTOFMEMORY;
- }
- if (curdir && !ret)
- {
- len = WideCharToMultiByte( CP_ACP, 0, curdir, -1, NULL, 0, NULL, NULL );
- if ((wcurd = HeapAlloc( GetProcessHeap(), 0, len )))
- WideCharToMultiByte( CP_ACP, 0, curdir, -1, wcurd, len, NULL, NULL );
- else
- ret = VIF_OUTOFMEMORY;
- }
- if (!ret)
- {
- len = *tmpfilelen * sizeof(WCHAR);
- wtmpf = HeapAlloc( GetProcessHeap(), 0, len );
- if (!wtmpf)
- ret = VIF_OUTOFMEMORY;
- }
- if (!ret)
- ret = VerInstallFileA(flags,wsrcf,wdestf,wsrcd,wdestd,wcurd,wtmpf,&len);
- if (!ret)
- *tmpfilelen = MultiByteToWideChar( CP_ACP, 0, wtmpf, -1, tmpfile, *tmpfilelen );
- else if (ret & VIF_BUFFTOOSMALL)
- *tmpfilelen = len; /* FIXME: not correct */
-
- HeapFree( GetProcessHeap(), 0, wsrcf );
- HeapFree( GetProcessHeap(), 0, wsrcd );
- HeapFree( GetProcessHeap(), 0, wdestf );
- HeapFree( GetProcessHeap(), 0, wdestd );
- HeapFree( GetProcessHeap(), 0, wtmpf );
- HeapFree( GetProcessHeap(), 0, wcurd );
- return ret;
-}
diff --git a/dlls/version/resource.c b/dlls/version/resource.c
deleted file mode 100644
index 5772487..0000000
--- a/dlls/version/resource.c
+++ /dev/null
@@ -1,365 +0,0 @@
-/*
- * Implementation of VERSION.DLL - Resource Access routines
- *
- * Copyright 1996,1997 Marcus Meissner
- * Copyright 1997 David Cuthbert
- * Copyright 1999 Ulrich Weigand
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
- */
-
-#include "config.h"
-
-#include <stdarg.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <sys/types.h>
-#ifdef HAVE_UNISTD_H
-# include <unistd.h>
-#endif
-
-#define NONAMELESSUNION
-#define NONAMELESSSTRUCT
-#include "windef.h"
-#include "winbase.h"
-#include "lzexpand.h"
-#include "winver.h"
-
-#include "wine/unicode.h"
-#include "wine/debug.h"
-
-typedef struct
-{
- WORD offset;
- WORD length;
- WORD flags;
- WORD id;
- WORD handle;
- WORD usage;
-} NE_NAMEINFO;
-
-typedef struct
-{
- WORD type_id;
- WORD count;
- DWORD resloader;
-} NE_TYPEINFO;
-
-WINE_DEFAULT_DEBUG_CHANNEL(ver);
-
-
-/**********************************************************************
- * find_entry_by_id
- *
- * Find an entry by id in a resource directory
- * Copied from loader/pe_resource.c
- */
-static const IMAGE_RESOURCE_DIRECTORY *find_entry_by_id( const IMAGE_RESOURCE_DIRECTORY *dir,
- WORD id, const void *root )
-{
- const IMAGE_RESOURCE_DIRECTORY_ENTRY *entry;
- int min, max, pos;
-
- entry = (const IMAGE_RESOURCE_DIRECTORY_ENTRY *)(dir + 1);
- min = dir->NumberOfNamedEntries;
- max = min + dir->NumberOfIdEntries - 1;
- while (min <= max)
- {
- pos = (min + max) / 2;
- if (entry[pos].u1.s2.Id == id)
- return (const IMAGE_RESOURCE_DIRECTORY *)((const char *)root + entry[pos].u2.s3.OffsetToDirectory);
- if (entry[pos].u1.s2.Id > id) max = pos - 1;
- else min = pos + 1;
- }
- return NULL;
-}
-
-
-/**********************************************************************
- * find_entry_default
- *
- * Find a default entry in a resource directory
- * Copied from loader/pe_resource.c
- */
-static const IMAGE_RESOURCE_DIRECTORY *find_entry_default( const IMAGE_RESOURCE_DIRECTORY *dir,
- const void *root )
-{
- const IMAGE_RESOURCE_DIRECTORY_ENTRY *entry;
-
- entry = (const IMAGE_RESOURCE_DIRECTORY_ENTRY *)(dir + 1);
- return (const IMAGE_RESOURCE_DIRECTORY *)((const char *)root + entry->u2.s3.OffsetToDirectory);
-}
-
-
-/***********************************************************************
- * read_xx_header [internal]
- */
-static int read_xx_header( HFILE lzfd )
-{
- IMAGE_DOS_HEADER mzh;
- char magic[3];
-
- LZSeek( lzfd, 0, SEEK_SET );
- if ( sizeof(mzh) != LZRead( lzfd, (LPSTR)&mzh, sizeof(mzh) ) )
- return 0;
- if ( mzh.e_magic != IMAGE_DOS_SIGNATURE )
- {
- if (!memcmp( &mzh, "\177ELF", 4 )) return 1; /* ELF */
- if (*(UINT *)&mzh == 0xfeedface || *(UINT *)&mzh == 0xcefaedfe) return 1; /* Mach-O */
- return 0;
- }
-
- LZSeek( lzfd, mzh.e_lfanew, SEEK_SET );
- if ( 2 != LZRead( lzfd, magic, 2 ) )
- return 0;
-
- LZSeek( lzfd, mzh.e_lfanew, SEEK_SET );
-
- if ( magic[0] == 'N' && magic[1] == 'E' )
- return IMAGE_OS2_SIGNATURE;
- if ( magic[0] == 'P' && magic[1] == 'E' )
- return IMAGE_NT_SIGNATURE;
-
- magic[2] = '\0';
- WARN("Can't handle %s files.\n", magic );
- return 0;
-}
-
-/***********************************************************************
- * find_ne_resource [internal]
- */
-static BOOL find_ne_resource( HFILE lzfd, DWORD *resLen, DWORD *resOff )
-{
- const WORD typeid = VS_FILE_INFO | 0x8000;
- const WORD resid = VS_VERSION_INFO | 0x8000;
- IMAGE_OS2_HEADER nehd;
- NE_TYPEINFO *typeInfo;
- NE_NAMEINFO *nameInfo;
- DWORD nehdoffset;
- LPBYTE resTab;
- DWORD resTabSize;
- int count;
-
- /* Read in NE header */
- nehdoffset = LZSeek( lzfd, 0, SEEK_CUR );
- if ( sizeof(nehd) != LZRead( lzfd, (LPSTR)&nehd, sizeof(nehd) ) ) return 0;
-
- resTabSize = nehd.ne_restab - nehd.ne_rsrctab;
- if ( !resTabSize )
- {
- TRACE("No resources in NE dll\n" );
- return FALSE;
- }
-
- /* Read in resource table */
- resTab = HeapAlloc( GetProcessHeap(), 0, resTabSize );
- if ( !resTab ) return FALSE;
-
- LZSeek( lzfd, nehd.ne_rsrctab + nehdoffset, SEEK_SET );
- if ( resTabSize != LZRead( lzfd, (char*)resTab, resTabSize ) )
- {
- HeapFree( GetProcessHeap(), 0, resTab );
- return FALSE;
- }
-
- /* Find resource */
- typeInfo = (NE_TYPEINFO *)(resTab + 2);
- while (typeInfo->type_id)
- {
- if (typeInfo->type_id == typeid) goto found_type;
- typeInfo = (NE_TYPEINFO *)((char *)(typeInfo + 1) +
- typeInfo->count * sizeof(NE_NAMEINFO));
- }
- TRACE("No typeid entry found\n" );
- HeapFree( GetProcessHeap(), 0, resTab );
- return FALSE;
-
- found_type:
- nameInfo = (NE_NAMEINFO *)(typeInfo + 1);
-
- for (count = typeInfo->count; count > 0; count--, nameInfo++)
- if (nameInfo->id == resid) goto found_name;
-
- TRACE("No resid entry found\n" );
- HeapFree( GetProcessHeap(), 0, resTab );
- return FALSE;
-
- found_name:
- /* Return resource data */
- if ( resLen ) *resLen = nameInfo->length << *(WORD *)resTab;
- if ( resOff ) *resOff = nameInfo->offset << *(WORD *)resTab;
-
- HeapFree( GetProcessHeap(), 0, resTab );
- return TRUE;
-}
-
-/***********************************************************************
- * find_pe_resource [internal]
- */
-static BOOL find_pe_resource( HFILE lzfd, DWORD *resLen, DWORD *resOff )
-{
- union
- {
- IMAGE_NT_HEADERS32 nt32;
- IMAGE_NT_HEADERS64 nt64;
- } pehd;
- DWORD pehdoffset;
- PIMAGE_DATA_DIRECTORY resDataDir;
- PIMAGE_SECTION_HEADER sections;
- LPBYTE resSection;
- DWORD section_size, data_size;
- const void *resDir;
- const IMAGE_RESOURCE_DIRECTORY *resPtr;
- const IMAGE_RESOURCE_DATA_ENTRY *resData;
- int i, len, nSections;
- BOOL ret = FALSE;
-
- /* Read in PE header */
- pehdoffset = LZSeek( lzfd, 0, SEEK_CUR );
- len = LZRead( lzfd, (LPSTR)&pehd, sizeof(pehd) );
- if (len < sizeof(pehd.nt32.FileHeader)) return 0;
- if (len < sizeof(pehd)) memset( (char *)&pehd + len, 0, sizeof(pehd) - len );
-
- switch (pehd.nt32.OptionalHeader.Magic)
- {
- case IMAGE_NT_OPTIONAL_HDR32_MAGIC:
- resDataDir = pehd.nt32.OptionalHeader.DataDirectory + IMAGE_DIRECTORY_ENTRY_RESOURCE;
- break;
- case IMAGE_NT_OPTIONAL_HDR64_MAGIC:
- resDataDir = pehd.nt64.OptionalHeader.DataDirectory + IMAGE_DIRECTORY_ENTRY_RESOURCE;
- break;
- default:
- return 0;
- }
-
- if ( !resDataDir->Size )
- {
- TRACE("No resources in PE dll\n" );
- return FALSE;
- }
-
- /* Read in section table */
- nSections = pehd.nt32.FileHeader.NumberOfSections;
- sections = HeapAlloc( GetProcessHeap(), 0,
- nSections * sizeof(IMAGE_SECTION_HEADER) );
- if ( !sections ) return FALSE;
-
- len = FIELD_OFFSET( IMAGE_NT_HEADERS32, OptionalHeader ) + pehd.nt32.FileHeader.SizeOfOptionalHeader;
- LZSeek( lzfd, pehdoffset + len, SEEK_SET );
-
- if ( nSections * sizeof(IMAGE_SECTION_HEADER) !=
- LZRead( lzfd, (LPSTR)sections, nSections * sizeof(IMAGE_SECTION_HEADER) ) )
- {
- HeapFree( GetProcessHeap(), 0, sections );
- return FALSE;
- }
-
- /* Find resource section */
- for ( i = 0; i < nSections; i++ )
- if ( resDataDir->VirtualAddress >= sections[i].VirtualAddress
- && resDataDir->VirtualAddress < sections[i].VirtualAddress +
- sections[i].SizeOfRawData )
- break;
-
- if ( i == nSections )
- {
- HeapFree( GetProcessHeap(), 0, sections );
- TRACE("Couldn't find resource section\n" );
- return FALSE;
- }
-
- /* Read in resource section */
- data_size = sections[i].SizeOfRawData;
- section_size = max( data_size, sections[i].Misc.VirtualSize );
- resSection = HeapAlloc( GetProcessHeap(), 0, section_size );
- if ( !resSection )
- {
- HeapFree( GetProcessHeap(), 0, sections );
- return FALSE;
- }
-
- LZSeek( lzfd, sections[i].PointerToRawData, SEEK_SET );
- if (data_size != LZRead( lzfd, (char*)resSection, data_size )) goto done;
- if (data_size < section_size) memset( (char *)resSection + data_size, 0, section_size - data_size );
-
- /* Find resource */
- resDir = resSection + (resDataDir->VirtualAddress - sections[i].VirtualAddress);
-
- resPtr = resDir;
- resPtr = find_entry_by_id( resPtr, VS_FILE_INFO, resDir );
- if ( !resPtr )
- {
- TRACE("No typeid entry found\n" );
- goto done;
- }
- resPtr = find_entry_by_id( resPtr, VS_VERSION_INFO, resDir );
- if ( !resPtr )
- {
- TRACE("No resid entry found\n" );
- goto done;
- }
- resPtr = find_entry_default( resPtr, resDir );
- if ( !resPtr )
- {
- TRACE("No default language entry found\n" );
- goto done;
- }
-
- /* Find resource data section */
- resData = (const IMAGE_RESOURCE_DATA_ENTRY*)resPtr;
- for ( i = 0; i < nSections; i++ )
- if ( resData->OffsetToData >= sections[i].VirtualAddress
- && resData->OffsetToData < sections[i].VirtualAddress +
- sections[i].SizeOfRawData )
- break;
-
- if ( i == nSections )
- {
- TRACE("Couldn't find resource data section\n" );
- goto done;
- }
-
- /* Return resource data */
- if ( resLen ) *resLen = resData->Size;
- if ( resOff ) *resOff = resData->OffsetToData - sections[i].VirtualAddress
- + sections[i].PointerToRawData;
- ret = TRUE;
-
- done:
- HeapFree( GetProcessHeap(), 0, resSection );
- HeapFree( GetProcessHeap(), 0, sections );
- return ret;
-}
-
-
-/***********************************************************************
- * find_version_resource [internal]
- */
-DWORD find_version_resource( HFILE lzfd, DWORD *reslen, DWORD *offset )
-{
- DWORD magic = read_xx_header( lzfd );
-
- switch (magic)
- {
- case IMAGE_OS2_SIGNATURE:
- if (!find_ne_resource( lzfd, reslen, offset )) magic = 0;
- break;
- case IMAGE_NT_SIGNATURE:
- if (!find_pe_resource( lzfd, reslen, offset )) magic = 0;
- break;
- }
- return magic;
-}
diff --git a/dlls/version/version.c b/dlls/version/version.c
new file mode 100644
index 0000000..7d9b80a
--- /dev/null
+++ b/dlls/version/version.c
@@ -0,0 +1,1567 @@
+/*
+ * Implementation of VERSION.DLL
+ *
+ * Copyright 1996,1997 Marcus Meissner
+ * Copyright 1997 David Cuthbert
+ * Copyright 1999 Ulrich Weigand
+ * Copyright 2005 Paul Vriens
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ *
+ */
+#include "config.h"
+
+#include <stdarg.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdio.h>
+
+#include <sys/types.h>
+#ifdef HAVE_UNISTD_H
+# include <unistd.h>
+#endif
+
+#define NONAMELESSUNION
+#define NONAMELESSSTRUCT
+#include "windef.h"
+#include "winbase.h"
+#include "winver.h"
+#include "winuser.h"
+#include "winnls.h"
+#include "winternl.h"
+#include "lzexpand.h"
+#include "wine/unicode.h"
+#include "winerror.h"
+#include "wine/debug.h"
+
+
+WINE_DEFAULT_DEBUG_CHANNEL(ver);
+
+typedef struct
+{
+ WORD offset;
+ WORD length;
+ WORD flags;
+ WORD id;
+ WORD handle;
+ WORD usage;
+} NE_NAMEINFO;
+
+typedef struct
+{
+ WORD type_id;
+ WORD count;
+ DWORD resloader;
+} NE_TYPEINFO;
+
+/**********************************************************************
+ * find_entry_by_id
+ *
+ * Find an entry by id in a resource directory
+ * Copied from loader/pe_resource.c
+ */
+static const IMAGE_RESOURCE_DIRECTORY *find_entry_by_id( const IMAGE_RESOURCE_DIRECTORY *dir,
+ WORD id, const void *root )
+{
+ const IMAGE_RESOURCE_DIRECTORY_ENTRY *entry;
+ int min, max, pos;
+
+ entry = (const IMAGE_RESOURCE_DIRECTORY_ENTRY *)(dir + 1);
+ min = dir->NumberOfNamedEntries;
+ max = min + dir->NumberOfIdEntries - 1;
+ while (min <= max)
+ {
+ pos = (min + max) / 2;
+ if (entry[pos].u1.s2.Id == id)
+ return (const IMAGE_RESOURCE_DIRECTORY *)((const char *)root + entry[pos].u2.s3.OffsetToDirectory);
+ if (entry[pos].u1.s2.Id > id) max = pos - 1;
+ else min = pos + 1;
+ }
+ return NULL;
+}
+
+
+/**********************************************************************
+ * find_entry_default
+ *
+ * Find a default entry in a resource directory
+ * Copied from loader/pe_resource.c
+ */
+static const IMAGE_RESOURCE_DIRECTORY *find_entry_default( const IMAGE_RESOURCE_DIRECTORY *dir,
+ const void *root )
+{
+ const IMAGE_RESOURCE_DIRECTORY_ENTRY *entry;
+
+ entry = (const IMAGE_RESOURCE_DIRECTORY_ENTRY *)(dir + 1);
+ return (const IMAGE_RESOURCE_DIRECTORY *)((const char *)root + entry->u2.s3.OffsetToDirectory);
+}
+
+
+/***********************************************************************
+ * read_xx_header [internal]
+ */
+static int read_xx_header( HFILE lzfd )
+{
+ IMAGE_DOS_HEADER mzh;
+ char magic[3];
+
+ LZSeek( lzfd, 0, SEEK_SET );
+ if ( sizeof(mzh) != LZRead( lzfd, (LPSTR)&mzh, sizeof(mzh) ) )
+ return 0;
+ if ( mzh.e_magic != IMAGE_DOS_SIGNATURE )
+ {
+ if (!memcmp( &mzh, "\177ELF", 4 )) return 1; /* ELF */
+ if (*(UINT *)&mzh == 0xfeedface || *(UINT *)&mzh == 0xcefaedfe) return 1; /* Mach-O */
+ return 0;
+ }
+
+ LZSeek( lzfd, mzh.e_lfanew, SEEK_SET );
+ if ( 2 != LZRead( lzfd, magic, 2 ) )
+ return 0;
+
+ LZSeek( lzfd, mzh.e_lfanew, SEEK_SET );
+
+ if ( magic[0] == 'N' && magic[1] == 'E' )
+ return IMAGE_OS2_SIGNATURE;
+ if ( magic[0] == 'P' && magic[1] == 'E' )
+ return IMAGE_NT_SIGNATURE;
+
+ magic[2] = '\0';
+ WARN("Can't handle %s files.\n", magic );
+ return 0;
+}
+
+/***********************************************************************
+ * find_ne_resource [internal]
+ */
+static BOOL find_ne_resource( HFILE lzfd, DWORD *resLen, DWORD *resOff )
+{
+ const WORD typeid = VS_FILE_INFO | 0x8000;
+ const WORD resid = VS_VERSION_INFO | 0x8000;
+ IMAGE_OS2_HEADER nehd;
+ NE_TYPEINFO *typeInfo;
+ NE_NAMEINFO *nameInfo;
+ DWORD nehdoffset;
+ LPBYTE resTab;
+ DWORD resTabSize;
+ int count;
+
+ /* Read in NE header */
+ nehdoffset = LZSeek( lzfd, 0, SEEK_CUR );
+ if ( sizeof(nehd) != LZRead( lzfd, (LPSTR)&nehd, sizeof(nehd) ) ) return 0;
+
+ resTabSize = nehd.ne_restab - nehd.ne_rsrctab;
+ if ( !resTabSize )
+ {
+ TRACE("No resources in NE dll\n" );
+ return FALSE;
+ }
+
+ /* Read in resource table */
+ resTab = HeapAlloc( GetProcessHeap(), 0, resTabSize );
+ if ( !resTab ) return FALSE;
+
+ LZSeek( lzfd, nehd.ne_rsrctab + nehdoffset, SEEK_SET );
+ if ( resTabSize != LZRead( lzfd, (char*)resTab, resTabSize ) )
+ {
+ HeapFree( GetProcessHeap(), 0, resTab );
+ return FALSE;
+ }
+
+ /* Find resource */
+ typeInfo = (NE_TYPEINFO *)(resTab + 2);
+ while (typeInfo->type_id)
+ {
+ if (typeInfo->type_id == typeid) goto found_type;
+ typeInfo = (NE_TYPEINFO *)((char *)(typeInfo + 1) +
+ typeInfo->count * sizeof(NE_NAMEINFO));
+ }
+ TRACE("No typeid entry found\n" );
+ HeapFree( GetProcessHeap(), 0, resTab );
+ return FALSE;
+
+ found_type:
+ nameInfo = (NE_NAMEINFO *)(typeInfo + 1);
+
+ for (count = typeInfo->count; count > 0; count--, nameInfo++)
+ if (nameInfo->id == resid) goto found_name;
+
+ TRACE("No resid entry found\n" );
+ HeapFree( GetProcessHeap(), 0, resTab );
+ return FALSE;
+
+ found_name:
+ /* Return resource data */
+ if ( resLen ) *resLen = nameInfo->length << *(WORD *)resTab;
+ if ( resOff ) *resOff = nameInfo->offset << *(WORD *)resTab;
+
+ HeapFree( GetProcessHeap(), 0, resTab );
+ return TRUE;
+}
+
+/***********************************************************************
+ * find_pe_resource [internal]
+ */
+static BOOL find_pe_resource( HFILE lzfd, DWORD *resLen, DWORD *resOff )
+{
+ union
+ {
+ IMAGE_NT_HEADERS32 nt32;
+ IMAGE_NT_HEADERS64 nt64;
+ } pehd;
+ DWORD pehdoffset;
+ PIMAGE_DATA_DIRECTORY resDataDir;
+ PIMAGE_SECTION_HEADER sections;
+ LPBYTE resSection;
+ DWORD section_size, data_size;
+ const void *resDir;
+ const IMAGE_RESOURCE_DIRECTORY *resPtr;
+ const IMAGE_RESOURCE_DATA_ENTRY *resData;
+ int i, len, nSections;
+ BOOL ret = FALSE;
+
+ /* Read in PE header */
+ pehdoffset = LZSeek( lzfd, 0, SEEK_CUR );
+ len = LZRead( lzfd, (LPSTR)&pehd, sizeof(pehd) );
+ if (len < sizeof(pehd.nt32.FileHeader)) return 0;
+ if (len < sizeof(pehd)) memset( (char *)&pehd + len, 0, sizeof(pehd) - len );
+
+ switch (pehd.nt32.OptionalHeader.Magic)
+ {
+ case IMAGE_NT_OPTIONAL_HDR32_MAGIC:
+ resDataDir = pehd.nt32.OptionalHeader.DataDirectory + IMAGE_DIRECTORY_ENTRY_RESOURCE;
+ break;
+ case IMAGE_NT_OPTIONAL_HDR64_MAGIC:
+ resDataDir = pehd.nt64.OptionalHeader.DataDirectory + IMAGE_DIRECTORY_ENTRY_RESOURCE;
+ break;
+ default:
+ return 0;
+ }
+
+ if ( !resDataDir->Size )
+ {
+ TRACE("No resources in PE dll\n" );
+ return FALSE;
+ }
+
+ /* Read in section table */
+ nSections = pehd.nt32.FileHeader.NumberOfSections;
+ sections = HeapAlloc( GetProcessHeap(), 0,
+ nSections * sizeof(IMAGE_SECTION_HEADER) );
+ if ( !sections ) return FALSE;
+
+ len = FIELD_OFFSET( IMAGE_NT_HEADERS32, OptionalHeader ) + pehd.nt32.FileHeader.SizeOfOptionalHeader;
+ LZSeek( lzfd, pehdoffset + len, SEEK_SET );
+
+ if ( nSections * sizeof(IMAGE_SECTION_HEADER) !=
+ LZRead( lzfd, (LPSTR)sections, nSections * sizeof(IMAGE_SECTION_HEADER) ) )
+ {
+ HeapFree( GetProcessHeap(), 0, sections );
+ return FALSE;
+ }
+
+ /* Find resource section */
+ for ( i = 0; i < nSections; i++ )
+ if ( resDataDir->VirtualAddress >= sections[i].VirtualAddress
+ && resDataDir->VirtualAddress < sections[i].VirtualAddress +
+ sections[i].SizeOfRawData )
+ break;
+
+ if ( i == nSections )
+ {
+ HeapFree( GetProcessHeap(), 0, sections );
+ TRACE("Couldn't find resource section\n" );
+ return FALSE;
+ }
+
+ /* Read in resource section */
+ data_size = sections[i].SizeOfRawData;
+ section_size = max( data_size, sections[i].Misc.VirtualSize );
+ resSection = HeapAlloc( GetProcessHeap(), 0, section_size );
+ if ( !resSection )
+ {
+ HeapFree( GetProcessHeap(), 0, sections );
+ return FALSE;
+ }
+
+ LZSeek( lzfd, sections[i].PointerToRawData, SEEK_SET );
+ if (data_size != LZRead( lzfd, (char*)resSection, data_size )) goto done;
+ if (data_size < section_size) memset( (char *)resSection + data_size, 0, section_size - data_size );
+
+ /* Find resource */
+ resDir = resSection + (resDataDir->VirtualAddress - sections[i].VirtualAddress);
+
+ resPtr = resDir;
+ resPtr = find_entry_by_id( resPtr, VS_FILE_INFO, resDir );
+ if ( !resPtr )
+ {
+ TRACE("No typeid entry found\n" );
+ goto done;
+ }
+ resPtr = find_entry_by_id( resPtr, VS_VERSION_INFO, resDir );
+ if ( !resPtr )
+ {
+ TRACE("No resid entry found\n" );
+ goto done;
+ }
+ resPtr = find_entry_default( resPtr, resDir );
+ if ( !resPtr )
+ {
+ TRACE("No default language entry found\n" );
+ goto done;
+ }
+
+ /* Find resource data section */
+ resData = (const IMAGE_RESOURCE_DATA_ENTRY*)resPtr;
+ for ( i = 0; i < nSections; i++ )
+ if ( resData->OffsetToData >= sections[i].VirtualAddress
+ && resData->OffsetToData < sections[i].VirtualAddress +
+ sections[i].SizeOfRawData )
+ break;
+
+ if ( i == nSections )
+ {
+ TRACE("Couldn't find resource data section\n" );
+ goto done;
+ }
+
+ /* Return resource data */
+ if ( resLen ) *resLen = resData->Size;
+ if ( resOff ) *resOff = resData->OffsetToData - sections[i].VirtualAddress
+ + sections[i].PointerToRawData;
+ ret = TRUE;
+
+ done:
+ HeapFree( GetProcessHeap(), 0, resSection );
+ HeapFree( GetProcessHeap(), 0, sections );
+ return ret;
+}
+
+
+/***********************************************************************
+ * find_version_resource [internal]
+ */
+static DWORD find_version_resource( HFILE lzfd, DWORD *reslen, DWORD *offset )
+{
+ DWORD magic = read_xx_header( lzfd );
+
+ switch (magic)
+ {
+ case IMAGE_OS2_SIGNATURE:
+ if (!find_ne_resource( lzfd, reslen, offset )) magic = 0;
+ break;
+ case IMAGE_NT_SIGNATURE:
+ if (!find_pe_resource( lzfd, reslen, offset )) magic = 0;
+ break;
+ }
+ return magic;
+}
+
+/******************************************************************************
+ *
+ * This function will print via standard TRACE, debug info regarding
+ * the file info structure vffi.
+ * 15-Feb-1998 Dimitrie Paun (dimi at cs.toronto.edu)
+ * Added this function to clean up the code.
+ *
+ *****************************************************************************/
+static void print_vffi_debug(const VS_FIXEDFILEINFO *vffi)
+{
+ BOOL versioned_printer = FALSE;
+
+ if((vffi->dwFileType == VFT_DLL) || (vffi->dwFileType == VFT_DRV))
+ {
+ if(vffi->dwFileSubtype == VFT2_DRV_VERSIONED_PRINTER)
+ /* this is documented for newer w2k Drivers and up */
+ versioned_printer = TRUE;
+ else if( (vffi->dwFileSubtype == VFT2_DRV_PRINTER) &&
+ (vffi->dwFileVersionMS != vffi->dwProductVersionMS) &&
+ (vffi->dwFileVersionMS > 0) &&
+ (vffi->dwFileVersionMS <= 3) )
+ /* found this on NT 3.51, NT4.0 and old w2k Drivers */
+ versioned_printer = TRUE;
+ }
+
+ TRACE("structversion=%u.%u, ",
+ HIWORD(vffi->dwStrucVersion),LOWORD(vffi->dwStrucVersion));
+ if(versioned_printer)
+ {
+ WORD mode = LOWORD(vffi->dwFileVersionMS);
+ WORD ver_rev = HIWORD(vffi->dwFileVersionLS);
+ TRACE("fileversion=%u.%u.%u.%u (%s.major.minor.release), ",
+ (vffi->dwFileVersionMS),
+ HIBYTE(ver_rev), LOBYTE(ver_rev), LOWORD(vffi->dwFileVersionLS),
+ (mode == 3) ? "Usermode" : ((mode <= 2) ? "Kernelmode" : "?") );
+ }
+ else
+ {
+ TRACE("fileversion=%u.%u.%u.%u, ",
+ HIWORD(vffi->dwFileVersionMS),LOWORD(vffi->dwFileVersionMS),
+ HIWORD(vffi->dwFileVersionLS),LOWORD(vffi->dwFileVersionLS));
+ }
+ TRACE("productversion=%u.%u.%u.%u\n",
+ HIWORD(vffi->dwProductVersionMS),LOWORD(vffi->dwProductVersionMS),
+ HIWORD(vffi->dwProductVersionLS),LOWORD(vffi->dwProductVersionLS));
+
+ TRACE("flagmask=0x%x, flags=0x%x %s%s%s%s%s%s\n",
+ vffi->dwFileFlagsMask, vffi->dwFileFlags,
+ (vffi->dwFileFlags & VS_FF_DEBUG) ? "DEBUG," : "",
+ (vffi->dwFileFlags & VS_FF_PRERELEASE) ? "PRERELEASE," : "",
+ (vffi->dwFileFlags & VS_FF_PATCHED) ? "PATCHED," : "",
+ (vffi->dwFileFlags & VS_FF_PRIVATEBUILD) ? "PRIVATEBUILD," : "",
+ (vffi->dwFileFlags & VS_FF_INFOINFERRED) ? "INFOINFERRED," : "",
+ (vffi->dwFileFlags & VS_FF_SPECIALBUILD) ? "SPECIALBUILD," : "");
+
+ TRACE("(");
+
+ TRACE("OS=0x%x.0x%x ", HIWORD(vffi->dwFileOS), LOWORD(vffi->dwFileOS));
+
+ switch (vffi->dwFileOS&0xFFFF0000)
+ {
+ case VOS_DOS:TRACE("DOS,");break;
+ case VOS_OS216:TRACE("OS/2-16,");break;
+ case VOS_OS232:TRACE("OS/2-32,");break;
+ case VOS_NT:TRACE("NT,");break;
+ case VOS_UNKNOWN:
+ default:
+ TRACE("UNKNOWN(0x%x),",vffi->dwFileOS&0xFFFF0000);break;
+ }
+
+ switch (LOWORD(vffi->dwFileOS))
+ {
+ case VOS__BASE:TRACE("BASE");break;
+ case VOS__WINDOWS16:TRACE("WIN16");break;
+ case VOS__WINDOWS32:TRACE("WIN32");break;
+ case VOS__PM16:TRACE("PM16");break;
+ case VOS__PM32:TRACE("PM32");break;
+ default:
+ TRACE("UNKNOWN(0x%x)",LOWORD(vffi->dwFileOS));break;
+ }
+
+ TRACE(")\n");
+
+ switch (vffi->dwFileType)
+ {
+ case VFT_APP:TRACE("filetype=APP");break;
+ case VFT_DLL:
+ TRACE("filetype=DLL");
+ if(vffi->dwFileSubtype != 0)
+ {
+ if(versioned_printer) /* NT3.x/NT4.0 or old w2k Driver */
+ TRACE(",PRINTER");
+ TRACE(" (subtype=0x%x)", vffi->dwFileSubtype);
+ }
+ break;
+ case VFT_DRV:
+ TRACE("filetype=DRV,");
+ switch(vffi->dwFileSubtype)
+ {
+ case VFT2_DRV_PRINTER:TRACE("PRINTER");break;
+ case VFT2_DRV_KEYBOARD:TRACE("KEYBOARD");break;
+ case VFT2_DRV_LANGUAGE:TRACE("LANGUAGE");break;
+ case VFT2_DRV_DISPLAY:TRACE("DISPLAY");break;
+ case VFT2_DRV_MOUSE:TRACE("MOUSE");break;
+ case VFT2_DRV_NETWORK:TRACE("NETWORK");break;
+ case VFT2_DRV_SYSTEM:TRACE("SYSTEM");break;
+ case VFT2_DRV_INSTALLABLE:TRACE("INSTALLABLE");break;
+ case VFT2_DRV_SOUND:TRACE("SOUND");break;
+ case VFT2_DRV_COMM:TRACE("COMM");break;
+ case VFT2_DRV_INPUTMETHOD:TRACE("INPUTMETHOD");break;
+ case VFT2_DRV_VERSIONED_PRINTER:TRACE("VERSIONED_PRINTER");break;
+ case VFT2_UNKNOWN:
+ default:
+ TRACE("UNKNOWN(0x%x)",vffi->dwFileSubtype);break;
+ }
+ break;
+ case VFT_FONT:
+ TRACE("filetype=FONT,");
+ switch (vffi->dwFileSubtype)
+ {
+ case VFT2_FONT_RASTER:TRACE("RASTER");break;
+ case VFT2_FONT_VECTOR:TRACE("VECTOR");break;
+ case VFT2_FONT_TRUETYPE:TRACE("TRUETYPE");break;
+ default:TRACE("UNKNOWN(0x%x)",vffi->dwFileSubtype);break;
+ }
+ break;
+ case VFT_VXD:TRACE("filetype=VXD");break;
+ case VFT_STATIC_LIB:TRACE("filetype=STATIC_LIB");break;
+ case VFT_UNKNOWN:
+ default:
+ TRACE("filetype=Unknown(0x%x)",vffi->dwFileType);break;
+ }
+
+ TRACE("\n");
+ TRACE("filedate=0x%x.0x%x\n",vffi->dwFileDateMS,vffi->dwFileDateLS);
+}
+
+/***********************************************************************
+ * Version Info Structure
+ */
+
+typedef struct
+{
+ WORD wLength;
+ WORD wValueLength;
+ CHAR szKey[1];
+#if 0 /* variable length structure */
+ /* DWORD aligned */
+ BYTE Value[];
+ /* DWORD aligned */
+ VS_VERSION_INFO_STRUCT16 Children[];
+#endif
+} VS_VERSION_INFO_STRUCT16;
+
+typedef struct
+{
+ WORD wLength;
+ WORD wValueLength;
+ WORD wType;
+ WCHAR szKey[1];
+#if 0 /* variable length structure */
+ /* DWORD aligned */
+ BYTE Value[];
+ /* DWORD aligned */
+ VS_VERSION_INFO_STRUCT32 Children[];
+#endif
+} VS_VERSION_INFO_STRUCT32;
+
+#define VersionInfoIs16( ver ) \
+ ( ((const VS_VERSION_INFO_STRUCT16 *)ver)->szKey[0] >= ' ' )
+
+#define DWORD_ALIGN( base, ptr ) \
+ ( (LPBYTE)(base) + ((((LPBYTE)(ptr) - (LPBYTE)(base)) + 3) & ~3) )
+
+#define VersionInfo16_Value( ver ) \
+ DWORD_ALIGN( (ver), (ver)->szKey + strlen((ver)->szKey) + 1 )
+#define VersionInfo32_Value( ver ) \
+ DWORD_ALIGN( (ver), (ver)->szKey + strlenW((ver)->szKey) + 1 )
+
+#define VersionInfo16_Children( ver ) \
+ (const VS_VERSION_INFO_STRUCT16 *)( VersionInfo16_Value( ver ) + \
+ ( ( (ver)->wValueLength + 3 ) & ~3 ) )
+#define VersionInfo32_Children( ver ) \
+ (const VS_VERSION_INFO_STRUCT32 *)( VersionInfo32_Value( ver ) + \
+ ( ( (ver)->wValueLength * \
+ ((ver)->wType? 2 : 1) + 3 ) & ~3 ) )
+
+#define VersionInfo16_Next( ver ) \
+ (VS_VERSION_INFO_STRUCT16 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) )
+#define VersionInfo32_Next( ver ) \
+ (VS_VERSION_INFO_STRUCT32 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) )
+
+
+/***********************************************************************
+ * GetFileVersionInfoSizeW [VERSION.@]
+ */
+DWORD WINAPI GetFileVersionInfoSizeW( LPCWSTR filename, LPDWORD handle )
+{
+ DWORD len, offset, magic = 1;
+ HFILE lzfd;
+ HMODULE hModule;
+ OFSTRUCT ofs;
+
+ TRACE("(%s,%p)\n", debugstr_w(filename), handle );
+
+ if (handle) *handle = 0;
+
+ if (!filename)
+ {
+ SetLastError(ERROR_INVALID_PARAMETER);
+ return 0;
+ }
+ if (!*filename)
+ {
+ SetLastError(ERROR_BAD_PATHNAME);
+ return 0;
+ }
+
+ if ((lzfd = LZOpenFileW( (LPWSTR)filename, &ofs, OF_READ )) != HFILE_ERROR)
+ {
+ magic = find_version_resource( lzfd, &len, &offset );
+ LZClose( lzfd );
+ }
+
+ if ((magic == 1) && (hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_DATAFILE )))
+ {
+ HRSRC hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO),
+ MAKEINTRESOURCEW(VS_FILE_INFO) );
+ if (hRsrc)
+ {
+ magic = IMAGE_NT_SIGNATURE;
+ len = SizeofResource( hModule, hRsrc );
+ }
+ FreeLibrary( hModule );
+ }
+
+ switch (magic)
+ {
+ case IMAGE_OS2_SIGNATURE:
+ /* We have a 16bit resource.
+ *
+ * XP/W2K/W2K3 uses a buffer which is more than the actual needed space:
+ *
+ * (info->wLength - sizeof(VS_FIXEDFILEINFO)) * 4
+ *
+ * This extra buffer is used for ANSI to Unicode conversions in W-Calls.
+ * info->wLength should be the same as len. Currently it isn't but that
+ * doesn't seem to be a problem (len is bigger than info->wLength).
+ */
+ SetLastError(0);
+ return (len - sizeof(VS_FIXEDFILEINFO)) * 4;
+
+ case IMAGE_NT_SIGNATURE:
+ /* We have a 32bit resource.
+ *
+ * XP/W2K/W2K3 uses a buffer which is 2 times the actual needed space + 4 bytes "FE2X"
+ * This extra buffer is used for Unicode to ANSI conversions in A-Calls
+ */
+ SetLastError(0);
+ return (len * 2) + 4;
+
+ default:
+ SetLastError( lzfd == HFILE_ERROR ? ofs.nErrCode : ERROR_RESOURCE_DATA_NOT_FOUND );
+ return 0;
+ }
+}
+
+/***********************************************************************
+ * GetFileVersionInfoSizeA [VERSION.@]
+ */
+DWORD WINAPI GetFileVersionInfoSizeA( LPCSTR filename, LPDWORD handle )
+{
+ UNICODE_STRING filenameW;
+ DWORD retval;
+
+ TRACE("(%s,%p)\n", debugstr_a(filename), handle );
+
+ if(filename)
+ RtlCreateUnicodeStringFromAsciiz(&filenameW, filename);
+ else
+ filenameW.Buffer = NULL;
+
+ retval = GetFileVersionInfoSizeW(filenameW.Buffer, handle);
+
+ RtlFreeUnicodeString(&filenameW);
+
+ return retval;
+}
+
+/***********************************************************************
+ * GetFileVersionInfoW [VERSION.@]
+ */
+BOOL WINAPI GetFileVersionInfoW( LPCWSTR filename, DWORD handle,
+ DWORD datasize, LPVOID data )
+{
+ static const char signature[4] = "FE2X";
+ DWORD len, offset, magic = 1;
+ HFILE lzfd;
+ OFSTRUCT ofs;
+ HMODULE hModule;
+ VS_VERSION_INFO_STRUCT32* vvis = data;
+
+ TRACE("(%s,%d,size=%d,data=%p)\n",
+ debugstr_w(filename), handle, datasize, data );
+
+ if (!data)
+ {
+ SetLastError(ERROR_INVALID_DATA);
+ return FALSE;
+ }
+
+ if ((lzfd = LZOpenFileW( (LPWSTR)filename, &ofs, OF_READ )) != HFILE_ERROR)
+ {
+ if ((magic = find_version_resource( lzfd, &len, &offset )) > 1)
+ {
+ LZSeek( lzfd, offset, 0 /* SEEK_SET */ );
+ len = LZRead( lzfd, data, min( len, datasize ) );
+ }
+ LZClose( lzfd );
+ }
+
+ if ((magic == 1) && (hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_DATAFILE )))
+ {
+ HRSRC hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO),
+ MAKEINTRESOURCEW(VS_FILE_INFO) );
+ if (hRsrc)
+ {
+ HGLOBAL hMem = LoadResource( hModule, hRsrc );
+ magic = IMAGE_NT_SIGNATURE;
+ len = min( SizeofResource(hModule, hRsrc), datasize );
+ memcpy( data, LockResource( hMem ), len );
+ FreeResource( hMem );
+ }
+ FreeLibrary( hModule );
+ }
+
+ switch (magic)
+ {
+ case IMAGE_OS2_SIGNATURE:
+ /* We have a 16bit resource. */
+ if (TRACE_ON(ver))
+ print_vffi_debug( (VS_FIXEDFILEINFO *)VersionInfo16_Value( (VS_VERSION_INFO_STRUCT16 *)data ));
+ SetLastError(0);
+ return TRUE;
+
+ case IMAGE_NT_SIGNATURE:
+ /* We have a 32bit resource.
+ *
+ * XP/W2K/W2K3 uses a buffer which is 2 times the actual needed space + 4 bytes "FE2X"
+ * This extra buffer is used for Unicode to ANSI conversions in A-Calls
+ */
+ len = vvis->wLength + sizeof(signature);
+ if (datasize >= len) memcpy( (char*)data + vvis->wLength, signature, sizeof(signature) );
+ if (TRACE_ON(ver))
+ print_vffi_debug( (VS_FIXEDFILEINFO *)VersionInfo32_Value( vvis ));
+ SetLastError(0);
+ return TRUE;
+
+ default:
+ SetLastError( lzfd == HFILE_ERROR ? ofs.nErrCode : ERROR_RESOURCE_DATA_NOT_FOUND );
+ return FALSE;
+ }
+}
+
+/***********************************************************************
+ * GetFileVersionInfoA [VERSION.@]
+ */
+BOOL WINAPI GetFileVersionInfoA( LPCSTR filename, DWORD handle,
+ DWORD datasize, LPVOID data )
+{
+ UNICODE_STRING filenameW;
+ BOOL retval;
+
+ TRACE("(%s,%d,size=%d,data=%p)\n",
+ debugstr_a(filename), handle, datasize, data );
+
+ if(filename)
+ RtlCreateUnicodeStringFromAsciiz(&filenameW, filename);
+ else
+ filenameW.Buffer = NULL;
+
+ retval = GetFileVersionInfoW(filenameW.Buffer, handle, datasize, data);
+
+ RtlFreeUnicodeString(&filenameW);
+
+ return retval;
+}
+
+/***********************************************************************
+ * VersionInfo16_FindChild [internal]
+ */
+static const VS_VERSION_INFO_STRUCT16 *VersionInfo16_FindChild( const VS_VERSION_INFO_STRUCT16 *info,
+ LPCSTR szKey, UINT cbKey )
+{
+ const VS_VERSION_INFO_STRUCT16 *child = VersionInfo16_Children( info );
+
+ while ((char *)child < (char *)info + info->wLength )
+ {
+ if (!strncasecmp( child->szKey, szKey, cbKey ) && !child->szKey[cbKey])
+ return child;
+
+ if (!(child->wLength)) return NULL;
+ child = VersionInfo16_Next( child );
+ }
+
+ return NULL;
+}
+
+/***********************************************************************
+ * VersionInfo32_FindChild [internal]
+ */
+static const VS_VERSION_INFO_STRUCT32 *VersionInfo32_FindChild( const VS_VERSION_INFO_STRUCT32 *info,
+ LPCWSTR szKey, UINT cbKey )
+{
+ const VS_VERSION_INFO_STRUCT32 *child = VersionInfo32_Children( info );
+
+ while ((char *)child < (char *)info + info->wLength )
+ {
+ if (!strncmpiW( child->szKey, szKey, cbKey ) && !child->szKey[cbKey])
+ return child;
+
+ if (!(child->wLength)) return NULL;
+ child = VersionInfo32_Next( child );
+ }
+
+ return NULL;
+}
+
+/***********************************************************************
+ * VersionInfo16_QueryValue [internal]
+ *
+ * Gets a value from a 16-bit NE resource
+ */
+static BOOL VersionInfo16_QueryValue( const VS_VERSION_INFO_STRUCT16 *info, LPCSTR lpSubBlock,
+ LPVOID *lplpBuffer, UINT *puLen )
+{
+ while ( *lpSubBlock )
+ {
+ /* Find next path component */
+ LPCSTR lpNextSlash;
+ for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ )
+ if ( *lpNextSlash == '\\' )
+ break;
+
+ /* Skip empty components */
+ if ( lpNextSlash == lpSubBlock )
+ {
+ lpSubBlock++;
+ continue;
+ }
+
+ /* We have a non-empty component: search info for key */
+ info = VersionInfo16_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock );
+ if ( !info )
+ {
+ if (puLen) *puLen = 0 ;
+ SetLastError( ERROR_RESOURCE_TYPE_NOT_FOUND );
+ return FALSE;
+ }
+
+ /* Skip path component */
+ lpSubBlock = lpNextSlash;
+ }
+
+ /* Return value */
+ *lplpBuffer = VersionInfo16_Value( info );
+ if (puLen)
+ *puLen = info->wValueLength;
+
+ return TRUE;
+}
+
+/***********************************************************************
+ * VersionInfo32_QueryValue [internal]
+ *
+ * Gets a value from a 32-bit PE resource
+ */
+static BOOL VersionInfo32_QueryValue( const VS_VERSION_INFO_STRUCT32 *info, LPCWSTR lpSubBlock,
+ LPVOID *lplpBuffer, UINT *puLen )
+{
+ TRACE("lpSubBlock : (%s)\n", debugstr_w(lpSubBlock));
+
+ while ( *lpSubBlock )
+ {
+ /* Find next path component */
+ LPCWSTR lpNextSlash;
+ for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ )
+ if ( *lpNextSlash == '\\' )
+ break;
+
+ /* Skip empty components */
+ if ( lpNextSlash == lpSubBlock )
+ {
+ lpSubBlock++;
+ continue;
+ }
+
+ /* We have a non-empty component: search info for key */
+ info = VersionInfo32_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock );
+ if ( !info )
+ {
+ if (puLen) *puLen = 0 ;
+ SetLastError( ERROR_RESOURCE_TYPE_NOT_FOUND );
+ return FALSE;
+ }
+
+ /* Skip path component */
+ lpSubBlock = lpNextSlash;
+ }
+
+ /* Return value */
+ *lplpBuffer = VersionInfo32_Value( info );
+ if (puLen)
+ *puLen = info->wValueLength;
+
+ return TRUE;
+}
+
+/***********************************************************************
+ * VerQueryValueA [VERSION.@]
+ */
+BOOL WINAPI VerQueryValueA( LPCVOID pBlock, LPCSTR lpSubBlock,
+ LPVOID *lplpBuffer, PUINT puLen )
+{
+ static const char rootA[] = "\\";
+ static const char varfileinfoA[] = "\\VarFileInfo\\Translation";
+ const VS_VERSION_INFO_STRUCT16 *info = pBlock;
+
+ TRACE("(%p,%s,%p,%p)\n",
+ pBlock, debugstr_a(lpSubBlock), lplpBuffer, puLen );
+
+ if (!pBlock)
+ return FALSE;
+
+ if (lpSubBlock == NULL || lpSubBlock[0] == '\0')
+ lpSubBlock = rootA;
+
+ if ( !VersionInfoIs16( info ) )
+ {
+ BOOL ret;
+ INT len;
+ LPWSTR lpSubBlockW;
+
+ len = MultiByteToWideChar(CP_ACP, 0, lpSubBlock, -1, NULL, 0);
+ lpSubBlockW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
+
+ if (!lpSubBlockW)
+ return FALSE;
+
+ MultiByteToWideChar(CP_ACP, 0, lpSubBlock, -1, lpSubBlockW, len);
+
+ ret = VersionInfo32_QueryValue(pBlock, lpSubBlockW, lplpBuffer, puLen);
+
+ HeapFree(GetProcessHeap(), 0, lpSubBlockW);
+
+ if (ret && strcasecmp( lpSubBlock, rootA ) && strcasecmp( lpSubBlock, varfileinfoA ))
+ {
+ /* Set lpBuffer so it points to the 'empty' area where we store
+ * the converted strings
+ */
+ LPSTR lpBufferA = (LPSTR)pBlock + info->wLength + 4;
+ DWORD pos = (LPCSTR)*lplpBuffer - (LPCSTR)pBlock;
+
+ len = WideCharToMultiByte(CP_ACP, 0, *lplpBuffer, -1,
+ lpBufferA + pos, info->wLength - pos, NULL, NULL);
+ *lplpBuffer = lpBufferA + pos;
+ *puLen = len;
+ }
+ return ret;
+ }
+
+ return VersionInfo16_QueryValue(info, lpSubBlock, lplpBuffer, puLen);
+}
+
+/***********************************************************************
+ * VerQueryValueW [VERSION.@]
+ */
+BOOL WINAPI VerQueryValueW( LPCVOID pBlock, LPCWSTR lpSubBlock,
+ LPVOID *lplpBuffer, PUINT puLen )
+{
+ static const WCHAR nullW[] = { 0 };
+ static const WCHAR rootW[] = { '\\', 0 };
+ static const WCHAR varfileinfoW[] = { '\\','V','a','r','F','i','l','e','I','n','f','o',
+ '\\','T','r','a','n','s','l','a','t','i','o','n', 0 };
+
+ const VS_VERSION_INFO_STRUCT32 *info = pBlock;
+
+ TRACE("(%p,%s,%p,%p)\n",
+ pBlock, debugstr_w(lpSubBlock), lplpBuffer, puLen );
+
+ if (!pBlock)
+ return FALSE;
+
+ if (lpSubBlock == NULL || lpSubBlock[0] == nullW[0])
+ lpSubBlock = rootW;
+
+ if ( VersionInfoIs16( info ) )
+ {
+ BOOL ret;
+ int len;
+ LPSTR lpSubBlockA;
+
+ len = WideCharToMultiByte(CP_ACP, 0, lpSubBlock, -1, NULL, 0, NULL, NULL);
+ lpSubBlockA = HeapAlloc(GetProcessHeap(), 0, len * sizeof(char));
+
+ if (!lpSubBlockA)
+ return FALSE;
+
+ WideCharToMultiByte(CP_ACP, 0, lpSubBlock, -1, lpSubBlockA, len, NULL, NULL);
+
+ ret = VersionInfo16_QueryValue(pBlock, lpSubBlockA, lplpBuffer, puLen);
+
+ HeapFree(GetProcessHeap(), 0, lpSubBlockA);
+
+ if (ret && strcmpiW( lpSubBlock, rootW ) && strcmpiW( lpSubBlock, varfileinfoW ))
+ {
+ /* Set lpBuffer so it points to the 'empty' area where we store
+ * the converted strings
+ */
+ LPWSTR lpBufferW = (LPWSTR)((LPSTR)pBlock + info->wLength);
+ DWORD pos = (LPCSTR)*lplpBuffer - (LPCSTR)pBlock;
+ DWORD max = (info->wLength - sizeof(VS_FIXEDFILEINFO)) * 4 - info->wLength;
+
+ len = MultiByteToWideChar(CP_ACP, 0, *lplpBuffer, -1,
+ lpBufferW + pos, max/sizeof(WCHAR) - pos );
+ *lplpBuffer = lpBufferW + pos;
+ *puLen = len;
+ }
+ return ret;
+ }
+
+ return VersionInfo32_QueryValue(info, lpSubBlock, lplpBuffer, puLen);
+}
+
+
+/******************************************************************************
+ * testFileExistenceA
+ *
+ * Tests whether a given path/file combination exists. If the file does
+ * not exist, the return value is zero. If it does exist, the return
+ * value is non-zero.
+ *
+ * Revision history
+ * 30-May-1997 Dave Cuthbert (dacut at ece.cmu.edu)
+ * Original implementation
+ *
+ */
+static int testFileExistenceA( char const * path, char const * file, BOOL excl )
+{
+ char filename[1024];
+ int filenamelen;
+ OFSTRUCT fileinfo;
+
+ fileinfo.cBytes = sizeof(OFSTRUCT);
+
+ strcpy(filename, path);
+ filenamelen = strlen(filename);
+
+ /* Add a trailing \ if necessary */
+ if(filenamelen) {
+ if(filename[filenamelen - 1] != '\\')
+ strcat(filename, "\\");
+ }
+ else /* specify the current directory */
+ strcpy(filename, ".\\");
+
+ /* Create the full pathname */
+ strcat(filename, file);
+
+ return (OpenFile(filename, &fileinfo,
+ OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
+}
+
+/******************************************************************************
+ * testFileExistenceW
+ */
+static int testFileExistenceW( const WCHAR *path, const WCHAR *file, BOOL excl )
+{
+ char *filename;
+ DWORD pathlen, filelen;
+ int ret;
+ OFSTRUCT fileinfo;
+
+ fileinfo.cBytes = sizeof(OFSTRUCT);
+
+ pathlen = WideCharToMultiByte( CP_ACP, 0, path, -1, NULL, 0, NULL, NULL );
+ filelen = WideCharToMultiByte( CP_ACP, 0, file, -1, NULL, 0, NULL, NULL );
+ filename = HeapAlloc( GetProcessHeap(), 0, pathlen+filelen+2 );
+
+ WideCharToMultiByte( CP_ACP, 0, path, -1, filename, pathlen, NULL, NULL );
+ /* Add a trailing \ if necessary */
+ if (pathlen > 1)
+ {
+ if (filename[pathlen-2] != '\\') strcpy( &filename[pathlen-1], "\\" );
+ }
+ else /* specify the current directory */
+ strcpy(filename, ".\\");
+
+ WideCharToMultiByte( CP_ACP, 0, file, -1, filename+strlen(filename), filelen, NULL, NULL );
+
+ ret = (OpenFile(filename, &fileinfo,
+ OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
+ HeapFree( GetProcessHeap(), 0, filename );
+ return ret;
+}
+
+/*****************************************************************************
+ * VerFindFileA [VERSION.@]
+ *
+ * Determines where to install a file based on whether it locates another
+ * version of the file in the system. The values VerFindFile returns are
+ * used in a subsequent call to the VerInstallFile function.
+ *
+ * Revision history:
+ * 30-May-1997 Dave Cuthbert (dacut at ece.cmu.edu)
+ * Reimplementation of VerFindFile from original stub.
+ */
+DWORD WINAPI VerFindFileA(
+ DWORD flags,
+ LPCSTR lpszFilename,
+ LPCSTR lpszWinDir,
+ LPCSTR lpszAppDir,
+ LPSTR lpszCurDir,
+ PUINT lpuCurDirLen,
+ LPSTR lpszDestDir,
+ PUINT lpuDestDirLen )
+{
+ DWORD retval = 0;
+ const char *curDir;
+ const char *destDir;
+ unsigned int curDirSizeReq;
+ unsigned int destDirSizeReq;
+ char systemDir[MAX_PATH];
+
+ /* Print out debugging information */
+ TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
+ flags, debugstr_a(lpszFilename), debugstr_a(lpszWinDir), debugstr_a(lpszAppDir),
+ lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
+ lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
+
+ /* Figure out where the file should go; shared files default to the
+ system directory */
+
+ GetSystemDirectoryA(systemDir, sizeof(systemDir));
+ curDir = "";
+ destDir = "";
+
+ if(flags & VFFF_ISSHAREDFILE)
+ {
+ destDir = systemDir;
+ /* Were we given a filename? If so, try to find the file. */
+ if(lpszFilename)
+ {
+ if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
+ else if(lpszAppDir && testFileExistenceA(lpszAppDir, lpszFilename, FALSE))
+ {
+ curDir = lpszAppDir;
+ retval |= VFF_CURNEDEST;
+ }
+ }
+ }
+ else /* not a shared file */
+ {
+ if(lpszAppDir)
+ {
+ destDir = lpszAppDir;
+ if(lpszFilename)
+ {
+ if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
+ else if(testFileExistenceA(systemDir, lpszFilename, FALSE))
+ {
+ curDir = systemDir;
+ retval |= VFF_CURNEDEST;
+ }
+ }
+ }
+ }
+
+ /* Check to see if the file exists and is in use by another application */
+ if (lpszFilename && testFileExistenceA(curDir, lpszFilename, FALSE)) {
+ if (lpszFilename && !testFileExistenceA(curDir, lpszFilename, TRUE))
+ retval |= VFF_FILEINUSE;
+ }
+
+ curDirSizeReq = strlen(curDir) + 1;
+ destDirSizeReq = strlen(destDir) + 1;
+
+ /* Make sure that the pointers to the size of the buffers are
+ valid; if not, do NOTHING with that buffer. If that pointer
+ is valid, then make sure that the buffer pointer is valid, too! */
+
+ if(lpuDestDirLen && lpszDestDir)
+ {
+ if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
+ lstrcpynA(lpszDestDir, destDir, *lpuDestDirLen);
+ *lpuDestDirLen = destDirSizeReq;
+ }
+ if(lpuCurDirLen && lpszCurDir)
+ {
+ if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
+ lstrcpynA(lpszCurDir, curDir, *lpuCurDirLen);
+ *lpuCurDirLen = curDirSizeReq;
+ }
+
+ TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
+ (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
+ (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
+ (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
+ debugstr_a(lpszCurDir), debugstr_a(lpszDestDir));
+
+ return retval;
+}
+
+/*****************************************************************************
+ * VerFindFileW [VERSION.@]
+ */
+DWORD WINAPI VerFindFileW( DWORD flags,LPCWSTR lpszFilename,LPCWSTR lpszWinDir,
+ LPCWSTR lpszAppDir, LPWSTR lpszCurDir,PUINT lpuCurDirLen,
+ LPWSTR lpszDestDir,PUINT lpuDestDirLen )
+{
+ static const WCHAR emptyW;
+ DWORD retval = 0;
+ const WCHAR *curDir;
+ const WCHAR *destDir;
+ unsigned int curDirSizeReq;
+ unsigned int destDirSizeReq;
+ WCHAR systemDir[MAX_PATH];
+
+ /* Print out debugging information */
+ TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
+ flags, debugstr_w(lpszFilename), debugstr_w(lpszWinDir), debugstr_w(lpszAppDir),
+ lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
+ lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
+
+ /* Figure out where the file should go; shared files default to the
+ system directory */
+
+ GetSystemDirectoryW(systemDir, sizeof(systemDir)/sizeof(WCHAR));
+ curDir = &emptyW;
+ destDir = &emptyW;
+
+ if(flags & VFFF_ISSHAREDFILE)
+ {
+ destDir = systemDir;
+ /* Were we given a filename? If so, try to find the file. */
+ if(lpszFilename)
+ {
+ if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
+ else if(lpszAppDir && testFileExistenceW(lpszAppDir, lpszFilename, FALSE))
+ {
+ curDir = lpszAppDir;
+ retval |= VFF_CURNEDEST;
+ }
+ }
+ }
+ else /* not a shared file */
+ {
+ if(lpszAppDir)
+ {
+ destDir = lpszAppDir;
+ if(lpszFilename)
+ {
+ if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
+ else if(testFileExistenceW(systemDir, lpszFilename, FALSE))
+ {
+ curDir = systemDir;
+ retval |= VFF_CURNEDEST;
+ }
+ }
+ }
+ }
+
+ if (lpszFilename && !testFileExistenceW(curDir, lpszFilename, TRUE))
+ retval |= VFF_FILEINUSE;
+
+ curDirSizeReq = strlenW(curDir) + 1;
+ destDirSizeReq = strlenW(destDir) + 1;
+
+ /* Make sure that the pointers to the size of the buffers are
+ valid; if not, do NOTHING with that buffer. If that pointer
+ is valid, then make sure that the buffer pointer is valid, too! */
+
+ if(lpuDestDirLen && lpszDestDir)
+ {
+ if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
+ lstrcpynW(lpszDestDir, destDir, *lpuDestDirLen);
+ *lpuDestDirLen = destDirSizeReq;
+ }
+ if(lpuCurDirLen && lpszCurDir)
+ {
+ if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
+ lstrcpynW(lpszCurDir, curDir, *lpuCurDirLen);
+ *lpuCurDirLen = curDirSizeReq;
+ }
+
+ TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
+ (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
+ (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
+ (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
+ debugstr_w(lpszCurDir), debugstr_w(lpszDestDir));
+ return retval;
+}
+
+static LPBYTE
+_fetch_versioninfo(LPSTR fn,VS_FIXEDFILEINFO **vffi) {
+ DWORD alloclen;
+ LPBYTE buf;
+ DWORD ret;
+
+ alloclen = 1000;
+ buf=HeapAlloc(GetProcessHeap(), 0, alloclen);
+ if(buf == NULL) {
+ WARN("Memory exausted while fetching version info!\n");
+ return NULL;
+ }
+ while (1) {
+ ret = GetFileVersionInfoA(fn,0,alloclen,buf);
+ if (!ret) {
+ HeapFree(GetProcessHeap(), 0, buf);
+ return NULL;
+ }
+ if (alloclen<*(WORD*)buf) {
+ alloclen = *(WORD*)buf;
+ HeapFree(GetProcessHeap(), 0, buf);
+ buf = HeapAlloc(GetProcessHeap(), 0, alloclen);
+ if(buf == NULL) {
+ WARN("Memory exausted while fetching version info!\n");
+ return NULL;
+ }
+ } else {
+ *vffi = (VS_FIXEDFILEINFO*)(buf+0x14);
+ if ((*vffi)->dwSignature == 0x004f0049) /* hack to detect unicode */
+ *vffi = (VS_FIXEDFILEINFO*)(buf+0x28);
+ if ((*vffi)->dwSignature != VS_FFI_SIGNATURE)
+ WARN("Bad VS_FIXEDFILEINFO signature 0x%08x\n",(*vffi)->dwSignature);
+ return buf;
+ }
+ }
+}
+
+static DWORD
+_error2vif(DWORD error) {
+ switch (error) {
+ case ERROR_ACCESS_DENIED:
+ return VIF_ACCESSVIOLATION;
+ case ERROR_SHARING_VIOLATION:
+ return VIF_SHARINGVIOLATION;
+ default:
+ return 0;
+ }
+}
+
+
+/******************************************************************************
+ * VerInstallFileA [VERSION.@]
+ */
+DWORD WINAPI VerInstallFileA(
+ DWORD flags,LPCSTR srcfilename,LPCSTR destfilename,LPCSTR srcdir,
+ LPCSTR destdir,LPCSTR curdir,LPSTR tmpfile,PUINT tmpfilelen )
+{
+ LPCSTR pdest;
+ char destfn[260],tmpfn[260],srcfn[260];
+ HFILE hfsrc,hfdst;
+ DWORD attr,xret,tmplast;
+ LONG ret;
+ LPBYTE buf1,buf2;
+ OFSTRUCT ofs;
+
+ TRACE("(%x,%s,%s,%s,%s,%s,%p,%d)\n",
+ flags,srcfilename,destfilename,srcdir,destdir,curdir,tmpfile,*tmpfilelen
+ );
+ xret = 0;
+ sprintf(srcfn,"%s\\%s",srcdir,srcfilename);
+ if (!destdir || !*destdir) pdest = srcdir;
+ else pdest = destdir;
+ sprintf(destfn,"%s\\%s",pdest,destfilename);
+ hfsrc=LZOpenFileA(srcfn,&ofs,OF_READ);
+ if (hfsrc < 0)
+ return VIF_CANNOTREADSRC;
+ sprintf(tmpfn,"%s\\%s",pdest,destfilename);
+ tmplast=strlen(pdest)+1;
+ attr = GetFileAttributesA(tmpfn);
+ if (attr != INVALID_FILE_ATTRIBUTES) {
+ if (attr & FILE_ATTRIBUTE_READONLY) {
+ LZClose(hfsrc);
+ return VIF_WRITEPROT;
+ }
+ /* FIXME: check if file currently in use and return VIF_FILEINUSE */
+ }
+ attr = INVALID_FILE_ATTRIBUTES;
+ if (flags & VIFF_FORCEINSTALL) {
+ if (tmpfile[0]) {
+ sprintf(tmpfn,"%s\\%s",pdest,tmpfile);
+ tmplast = strlen(pdest)+1;
+ attr = GetFileAttributesA(tmpfn);
+ /* if it exists, it has been copied by the call before.
+ * we jump over the copy part...
+ */
+ }
+ }
+ if (attr == INVALID_FILE_ATTRIBUTES) {
+ char *s;
+
+ GetTempFileNameA(pdest,"ver",0,tmpfn); /* should not fail ... */
+ s=strrchr(tmpfn,'\\');
+ if (s)
+ tmplast = s-tmpfn;
+ else
+ tmplast = 0;
+ hfdst = OpenFile(tmpfn,&ofs,OF_CREATE);
+ if (hfdst == HFILE_ERROR) {
+ LZClose(hfsrc);
+ return VIF_CANNOTCREATE; /* | translated dos error */
+ }
+ ret = LZCopy(hfsrc,hfdst);
+ _lclose(hfdst);
+ if (ret < 0) {
+ /* translate LZ errors into VIF_xxx */
+ switch (ret) {
+ case LZERROR_BADINHANDLE:
+ case LZERROR_READ:
+ case LZERROR_BADVALUE:
+ case LZERROR_UNKNOWNALG:
+ xret = VIF_CANNOTREADSRC;
+ break;
+ case LZERROR_BADOUTHANDLE:
+ case LZERROR_WRITE:
+ xret = VIF_OUTOFSPACE;
+ break;
+ case LZERROR_GLOBALLOC:
+ case LZERROR_GLOBLOCK:
+ xret = VIF_OUTOFMEMORY;
+ break;
+ default: /* unknown error, should not happen */
+ FIXME("Unknown LZCopy error %d, ignoring.\n", ret);
+ xret = 0;
+ break;
+ }
+ if (xret) {
+ LZClose(hfsrc);
+ return xret;
+ }
+ }
+ }
+ xret = 0;
+ if (!(flags & VIFF_FORCEINSTALL)) {
+ VS_FIXEDFILEINFO *destvffi,*tmpvffi;
+ buf1 = _fetch_versioninfo(destfn,&destvffi);
+ if (buf1) {
+ buf2 = _fetch_versioninfo(tmpfn,&tmpvffi);
+ if (buf2) {
+ char *tbuf1,*tbuf2;
+ static const CHAR trans_array[] = "\\VarFileInfo\\Translation";
+ UINT len1,len2;
+
+ len1=len2=40;
+
+ /* compare file versions */
+ if ((destvffi->dwFileVersionMS > tmpvffi->dwFileVersionMS)||
+ ((destvffi->dwFileVersionMS==tmpvffi->dwFileVersionMS)&&
+ (destvffi->dwFileVersionLS > tmpvffi->dwFileVersionLS)
+ )
+ )
+ xret |= VIF_MISMATCH|VIF_SRCOLD;
+ /* compare filetypes and filesubtypes */
+ if ((destvffi->dwFileType!=tmpvffi->dwFileType) ||
+ (destvffi->dwFileSubtype!=tmpvffi->dwFileSubtype)
+ )
+ xret |= VIF_MISMATCH|VIF_DIFFTYPE;
+ if (VerQueryValueA(buf1,trans_array,(LPVOID*)&tbuf1,&len1) &&
+ VerQueryValueA(buf2,trans_array,(LPVOID*)&tbuf2,&len2)
+ ) {
+ /* Do something with tbuf1 and tbuf2
+ * generates DIFFLANG|MISMATCH
+ */
+ }
+ HeapFree(GetProcessHeap(), 0, buf2);
+ } else
+ xret=VIF_MISMATCH|VIF_SRCOLD;
+ HeapFree(GetProcessHeap(), 0, buf1);
+ }
+ }
+ if (xret) {
+ if (*tmpfilelen<strlen(tmpfn+tmplast)) {
+ xret|=VIF_BUFFTOOSMALL;
+ DeleteFileA(tmpfn);
+ } else {
+ strcpy(tmpfile,tmpfn+tmplast);
+ *tmpfilelen = strlen(tmpfn+tmplast)+1;
+ xret|=VIF_TEMPFILE;
+ }
+ } else {
+ if (INVALID_FILE_ATTRIBUTES!=GetFileAttributesA(destfn))
+ if (!DeleteFileA(destfn)) {
+ xret|=_error2vif(GetLastError())|VIF_CANNOTDELETE;
+ DeleteFileA(tmpfn);
+ LZClose(hfsrc);
+ return xret;
+ }
+ if ((!(flags & VIFF_DONTDELETEOLD)) &&
+ curdir &&
+ *curdir &&
+ lstrcmpiA(curdir,pdest)
+ ) {
+ char curfn[260];
+
+ sprintf(curfn,"%s\\%s",curdir,destfilename);
+ if (INVALID_FILE_ATTRIBUTES != GetFileAttributesA(curfn)) {
+ /* FIXME: check if in use ... if it is, VIF_CANNOTDELETECUR */
+ if (!DeleteFileA(curfn))
+ xret|=_error2vif(GetLastError())|VIF_CANNOTDELETECUR;
+ }
+ }
+ if (!MoveFileA(tmpfn,destfn)) {
+ xret|=_error2vif(GetLastError())|VIF_CANNOTRENAME;
+ DeleteFileA(tmpfn);
+ }
+ }
+ LZClose(hfsrc);
+ return xret;
+}
+
+
+/******************************************************************************
+ * VerInstallFileW [VERSION.@]
+ */
+DWORD WINAPI VerInstallFileW(
+ DWORD flags,LPCWSTR srcfilename,LPCWSTR destfilename,LPCWSTR srcdir,
+ LPCWSTR destdir,LPCWSTR curdir,LPWSTR tmpfile,PUINT tmpfilelen )
+{
+ LPSTR wsrcf = NULL, wsrcd = NULL, wdestf = NULL, wdestd = NULL, wtmpf = NULL, wcurd = NULL;
+ DWORD ret = 0;
+ UINT len;
+
+ if (srcfilename)
+ {
+ len = WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, NULL, 0, NULL, NULL );
+ if ((wsrcf = HeapAlloc( GetProcessHeap(), 0, len )))
+ WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, wsrcf, len, NULL, NULL );
+ else
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (srcdir && !ret)
+ {
+ len = WideCharToMultiByte( CP_ACP, 0, srcdir, -1, NULL, 0, NULL, NULL );
+ if ((wsrcd = HeapAlloc( GetProcessHeap(), 0, len )))
+ WideCharToMultiByte( CP_ACP, 0, srcdir, -1, wsrcd, len, NULL, NULL );
+ else
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (destfilename && !ret)
+ {
+ len = WideCharToMultiByte( CP_ACP, 0, destfilename, -1, NULL, 0, NULL, NULL );
+ if ((wdestf = HeapAlloc( GetProcessHeap(), 0, len )))
+ WideCharToMultiByte( CP_ACP, 0, destfilename, -1, wdestf, len, NULL, NULL );
+ else
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (destdir && !ret)
+ {
+ len = WideCharToMultiByte( CP_ACP, 0, destdir, -1, NULL, 0, NULL, NULL );
+ if ((wdestd = HeapAlloc( GetProcessHeap(), 0, len )))
+ WideCharToMultiByte( CP_ACP, 0, destdir, -1, wdestd, len, NULL, NULL );
+ else
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (curdir && !ret)
+ {
+ len = WideCharToMultiByte( CP_ACP, 0, curdir, -1, NULL, 0, NULL, NULL );
+ if ((wcurd = HeapAlloc( GetProcessHeap(), 0, len )))
+ WideCharToMultiByte( CP_ACP, 0, curdir, -1, wcurd, len, NULL, NULL );
+ else
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (!ret)
+ {
+ len = *tmpfilelen * sizeof(WCHAR);
+ wtmpf = HeapAlloc( GetProcessHeap(), 0, len );
+ if (!wtmpf)
+ ret = VIF_OUTOFMEMORY;
+ }
+ if (!ret)
+ ret = VerInstallFileA(flags,wsrcf,wdestf,wsrcd,wdestd,wcurd,wtmpf,&len);
+ if (!ret)
+ *tmpfilelen = MultiByteToWideChar( CP_ACP, 0, wtmpf, -1, tmpfile, *tmpfilelen );
+ else if (ret & VIF_BUFFTOOSMALL)
+ *tmpfilelen = len; /* FIXME: not correct */
+
+ HeapFree( GetProcessHeap(), 0, wsrcf );
+ HeapFree( GetProcessHeap(), 0, wsrcd );
+ HeapFree( GetProcessHeap(), 0, wdestf );
+ HeapFree( GetProcessHeap(), 0, wdestd );
+ HeapFree( GetProcessHeap(), 0, wtmpf );
+ HeapFree( GetProcessHeap(), 0, wcurd );
+ return ret;
+}
--
1.7.1
More information about the wine-patches
mailing list