mirror of
https://github.com/reactos/wine.git
synced 2024-11-29 06:30:37 +00:00
version: Merge all 3 C source files into one.
This commit is contained in:
Marcus Meissner
Alexandre Julliard
parent
792a9eb689
commit
d8ed83e3c1
@ -2,9 +2,7 @@ MODULE = version.dll
|
|||||||
IMPORTLIB = version
|
IMPORTLIB = version
|
||||||
|
|
||||||
C_SRCS = \
|
C_SRCS = \
|
||||||
info.c \
|
version.c
|
||||||
install.c \
|
|
||||||
resource.c
|
|
||||||
|
|
||||||
RC_SRCS = version.rc
|
RC_SRCS = version.rc
|
||||||
|
|
||||||
|
|||||||
@ -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@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);
|
|
||||||
}
|
|
||||||
@ -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@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@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,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;
|
|
||||||
}
|
|
||||||
1567
dlls/version/version.c
Normal file
1567
dlls/version/version.c
Normal file
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user