Something went wrong. Try again.
Reactos
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755/* * 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 <stdarg.h>#include <stdlib.h>#include <string.h>#include <stdio.h>#include <sys/types.h>
#include "ntstatus.h"#define WIN32_NO_STATUS#include "windef.h"#include "winbase.h"#include "winver.h"#include "winuser.h"#include "winnls.h"#include "winternl.h"#include "winerror.h"#include "appmodel.h"
#include "kernelbase.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;
struct version_info{ DWORD major; DWORD minor; DWORD build;};
/*********************************************************************** * 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; /* 1:Text, 0:Binary */ 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 + lstrlenW((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) )
/*********************************************************************** * Win8 info, reported if the app doesn't provide compat GUID in the manifest and * doesn't have higher OS version in PE header. */static const struct version_info windows8_version_info = { 6, 2, 9200 };
/*********************************************************************** * Win8.1 info, reported if the app doesn't provide compat GUID in the manifest and * OS version in PE header is 8.1 or higher but below 10. */static const struct version_info windows8_1_version_info = { 6, 3, 9600 };
/*********************************************************************** * Windows versions that need compatibility GUID specified in manifest * in order to be reported by the APIs. */static const struct{ struct version_info info; GUID guid;} version_data[] ={ /* Windows 8.1 */ { { 6, 3, 9600 }, {0x1f676c76,0x80e1,0x4239,{0x95,0xbb,0x83,0xd0,0xf6,0xd0,0xda,0x78}} }, /* Windows 10 */ { { 10, 0, 19043 }, {0x8e0f7a12,0xbfb3,0x4fe8,{0xb9,0xa5,0x48,0xfd,0x50,0xa1,0x5a,0x9a}} }};
/****************************************************************************** * init_current_version * * Initialize the current_version variable. * * For compatibility, Windows 8.1 and later report Win8 version unless the app * has a manifest or higher OS version in the PE optional header * that confirms its compatibility with newer versions of Windows. * */static RTL_OSVERSIONINFOEXW current_version;
static BOOL CALLBACK init_current_version(PINIT_ONCE init_once, PVOID parameter, PVOID *context){ struct acci { DWORD ElementCount; COMPATIBILITY_CONTEXT_ELEMENT Elements[1]; } *acci; BOOL have_os_compat_elements = FALSE; const struct version_info *ver; IMAGE_NT_HEADERS *nt; SIZE_T req; int idx;
current_version.dwOSVersionInfoSize = sizeof(current_version); if (!set_ntstatus( RtlGetVersion(¤t_version) )) return FALSE;
for (idx = ARRAY_SIZE(version_data); idx--;) if ( current_version.dwMajorVersion > version_data[idx].info.major || (current_version.dwMajorVersion == version_data[idx].info.major && current_version.dwMinorVersion >= version_data[idx].info.minor)) break;
if (idx < 0) return TRUE; ver = &windows8_version_info;
if (RtlQueryInformationActivationContext(0, NtCurrentTeb()->Peb->ActivationContextData, NULL, CompatibilityInformationInActivationContext, NULL, 0, &req) != STATUS_BUFFER_TOO_SMALL || !req) goto done;
if (!(acci = HeapAlloc(GetProcessHeap(), 0, req))) { SetLastError(ERROR_NOT_ENOUGH_MEMORY); return FALSE; }
if (RtlQueryInformationActivationContext(0, NtCurrentTeb()->Peb->ActivationContextData, NULL, CompatibilityInformationInActivationContext, acci, req, &req) == STATUS_SUCCESS) { do { DWORD i;
for (i = 0; i < acci->ElementCount; i++) { if (acci->Elements[i].Type != ACTCTX_COMPATIBILITY_ELEMENT_TYPE_OS) continue;
have_os_compat_elements = TRUE;
if (IsEqualGUID(&acci->Elements[i].Id, &version_data[idx].guid)) { ver = &version_data[idx].info;
if (ver->major == current_version.dwMajorVersion && ver->minor == current_version.dwMinorVersion) ver = NULL;
idx = 0; /* break from outer loop */ break; } } } while (idx--); } HeapFree(GetProcessHeap(), 0, acci);
done: if (!have_os_compat_elements && current_version.dwMajorVersion >= 10 && (nt = RtlImageNtHeader(NtCurrentTeb()->Peb->ImageBaseAddress)) && (nt->OptionalHeader.MajorOperatingSystemVersion > 6 || (nt->OptionalHeader.MajorOperatingSystemVersion == 6 && nt->OptionalHeader.MinorOperatingSystemVersion >= 3))) { if (current_version.dwMajorVersion > 10) FIXME("Unsupported current_version.dwMajorVersion %lu.\n", current_version.dwMajorVersion);
ver = nt->OptionalHeader.MajorOperatingSystemVersion >= 10 ? NULL : &windows8_1_version_info; }
if (ver) { current_version.dwMajorVersion = ver->major; current_version.dwMinorVersion = ver->minor; current_version.dwBuildNumber = ver->build; } return TRUE;}
/********************************************************************** * 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, DWORD root_size ){ 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;
if (max >= (root_size - ((INT_PTR)dir - (INT_PTR)root) - sizeof(*dir)) / sizeof(*entry)) return NULL;
while (min <= max) { pos = (min + max) / 2; if (entry[pos].Id == id) { DWORD offset = entry[pos].OffsetToDirectory; if (offset > root_size - sizeof(*dir)) return NULL; return (const IMAGE_RESOURCE_DIRECTORY *)((const char *)root + offset); } if (entry[pos].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->OffsetToDirectory);}
/********************************************************************** * push_language * * push a language onto the list of languages to try */static inline int push_language( WORD *list, int pos, WORD lang ){ int i; for (i = 0; i < pos; i++) if (list[i] == lang) return pos; list[pos++] = lang; return pos;}
/********************************************************************** * find_entry_language */static const IMAGE_RESOURCE_DIRECTORY *find_entry_language( const IMAGE_RESOURCE_DIRECTORY *dir, const void *root, DWORD root_size, DWORD flags ){ const IMAGE_RESOURCE_DIRECTORY *ret; WORD list[9]; int i, pos = 0;
if (flags & FILE_VER_GET_LOCALISED) { /* cf. LdrFindResource_U */ pos = push_language( list, pos, MAKELANGID( LANG_NEUTRAL, SUBLANG_NEUTRAL ) ); pos = push_language( list, pos, LANGIDFROMLCID( NtCurrentTeb()->CurrentLocale ) ); pos = push_language( list, pos, GetUserDefaultLangID() ); pos = push_language( list, pos, MAKELANGID( PRIMARYLANGID(GetUserDefaultLangID()), SUBLANG_NEUTRAL )); pos = push_language( list, pos, MAKELANGID( PRIMARYLANGID(GetUserDefaultLangID()), SUBLANG_DEFAULT )); pos = push_language( list, pos, GetSystemDefaultLangID() ); pos = push_language( list, pos, MAKELANGID( PRIMARYLANGID(GetSystemDefaultLangID()), SUBLANG_NEUTRAL )); pos = push_language( list, pos, MAKELANGID( PRIMARYLANGID(GetSystemDefaultLangID()), SUBLANG_DEFAULT )); pos = push_language( list, pos, MAKELANGID( LANG_ENGLISH, SUBLANG_DEFAULT ) ); } else { /* FIXME: resolve LN file here */ pos = push_language( list, pos, MAKELANGID( LANG_ENGLISH, SUBLANG_DEFAULT ) ); }
for (i = 0; i < pos; i++) if ((ret = find_entry_by_id( dir, list[i], root, root_size ))) return ret; return find_entry_default( dir, root );}
static DWORD read_data( HANDLE handle, DWORD offset, void *data, DWORD len ){ DWORD res;
SetFilePointer( handle, offset, NULL, FILE_BEGIN ); if (!ReadFile( handle, data, len, &res, NULL )) res = 0; return res;}
/*********************************************************************** * find_ne_resource [internal] */static BOOL find_ne_resource( HANDLE handle, 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 = *resOff; LPBYTE resTab; DWORD resTabSize; int count;
/* Read in NE header */ if (read_data( handle, nehdoffset, &nehd, sizeof(nehd) ) != sizeof(nehd)) return FALSE;
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;
if (read_data( handle, nehd.ne_rsrctab + nehdoffset, resTab, resTabSize ) != 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 */ *resLen = nameInfo->length << *(WORD *)resTab; *resOff = nameInfo->offset << *(WORD *)resTab;
HeapFree( GetProcessHeap(), 0, resTab ); return TRUE;}
/*********************************************************************** * find_pe_resource [internal] */static BOOL find_pe_resource( HANDLE handle, DWORD *resLen, DWORD *resOff, DWORD flags ){ union { IMAGE_NT_HEADERS32 nt32; IMAGE_NT_HEADERS64 nt64; } pehd; DWORD pehdoffset = *resOff; PIMAGE_DATA_DIRECTORY resDataDir; PIMAGE_SECTION_HEADER sections; LPBYTE resSection; DWORD len, section_size, data_size, resDirSize; const void *resDir; const IMAGE_RESOURCE_DIRECTORY *resPtr; const IMAGE_RESOURCE_DATA_ENTRY *resData; int i, nSections; BOOL ret = FALSE;
/* Read in PE header */ len = read_data( handle, pehdoffset, &pehd, sizeof(pehd) ); if (len < sizeof(pehd.nt32.FileHeader)) return FALSE; 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 FALSE; }
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; if (read_data( handle, pehdoffset + len, sections, nSections * sizeof(IMAGE_SECTION_HEADER) ) != 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; }
if (read_data( handle, sections[i].PointerToRawData, resSection, data_size ) != 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); resDirSize = section_size - (resDataDir->VirtualAddress - sections[i].VirtualAddress);
resPtr = resDir; resPtr = find_entry_by_id( resPtr, VS_FILE_INFO, resDir, resDirSize ); if ( !resPtr ) { TRACE("No typeid entry found\n" ); goto done; } resPtr = find_entry_by_id( resPtr, VS_VERSION_INFO, resDir, resDirSize ); if ( !resPtr ) { TRACE("No resid entry found\n" ); goto done; } resPtr = find_entry_language( resPtr, resDir, resDirSize, flags ); 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 */ *resLen = resData->Size; *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( HANDLE handle, DWORD *reslen, DWORD *offset, DWORD flags ){ IMAGE_DOS_HEADER mzh; WORD magic;
if (read_data( handle, 0, &mzh, sizeof(mzh) ) != sizeof(mzh)) return 0; if (mzh.e_magic != IMAGE_DOS_SIGNATURE) return 0;
if (read_data( handle, mzh.e_lfanew, &magic, sizeof(magic) ) != sizeof(magic)) return 0; *offset = mzh.e_lfanew;
switch (magic) { case IMAGE_OS2_SIGNATURE: if (!find_ne_resource( handle, reslen, offset )) magic = 0; break; case IMAGE_NT_SIGNATURE: if (!find_pe_resource( handle, reslen, offset, flags )) magic = 0; break; } WARN( "Can't handle %04x files.\n", magic ); return magic;}
/****************************************************************************** * This function will print via standard TRACE, debug info regarding * the file info structure vffi. */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=%lu.%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%lx, flags=0x%lx %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%lx),",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%lx)", 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%lx)",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%lx)",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%lx)",vffi->dwFileType);break; }
TRACE("\n"); TRACE("filedate=0x%lx.0x%lx\n",vffi->dwFileDateMS,vffi->dwFileDateLS);}
/*********************************************************************** * GetFileVersionInfoSizeW (kernelbase.@) */DWORD WINAPI GetFileVersionInfoSizeW( LPCWSTR filename, LPDWORD handle ){ return GetFileVersionInfoSizeExW( FILE_VER_GET_LOCALISED, filename, handle );}
/*********************************************************************** * GetFileVersionInfoSizeA (kernelbase.@) */DWORD WINAPI GetFileVersionInfoSizeA( LPCSTR filename, LPDWORD handle ){ return GetFileVersionInfoSizeExA( FILE_VER_GET_LOCALISED, filename, handle );}
/****************************************************************************** * GetFileVersionInfoSizeExW (kernelbase.@) */DWORD WINAPI GetFileVersionInfoSizeExW( DWORD flags, LPCWSTR filename, LPDWORD ret_handle ){ DWORD len, offset, magic = 1; HMODULE hModule;
TRACE("(0x%lx,%s,%p)\n", flags, debugstr_w(filename), ret_handle );
if (ret_handle) *ret_handle = 0;
if (!filename) { SetLastError(ERROR_INVALID_PARAMETER); return 0; } if (!*filename) { SetLastError(ERROR_BAD_PATHNAME); return 0; } if (flags & ~FILE_VER_GET_LOCALISED) FIXME("flags 0x%lx ignored\n", flags & ~FILE_VER_GET_LOCALISED);
if ((hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_IMAGE_RESOURCE ))) { HRSRC hRsrc = NULL; if (!(flags & FILE_VER_GET_LOCALISED)) { LANGID english = MAKELANGID( LANG_ENGLISH, SUBLANG_DEFAULT ); hRsrc = FindResourceExW( hModule, (LPWSTR)VS_FILE_INFO, MAKEINTRESOURCEW(VS_VERSION_INFO), english ); } if (!hRsrc) hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO), (LPWSTR)VS_FILE_INFO ); if (hRsrc) { magic = IMAGE_NT_SIGNATURE; len = SizeofResource( hModule, hRsrc ); } FreeLibrary( hModule ); } else { HANDLE handle = CreateFileW( filename, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, 0 ); if (handle == INVALID_HANDLE_VALUE) return 0; magic = find_version_resource( handle, &len, &offset, flags ); CloseHandle( handle ); }
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: if (GetVersion() & 0x80000000) /* Windows 95/98 */ SetLastError(ERROR_FILE_NOT_FOUND); else SetLastError(ERROR_RESOURCE_DATA_NOT_FOUND); return 0; }}
/****************************************************************************** * GetFileVersionInfoSizeExA (kernelbase.@) */DWORD WINAPI GetFileVersionInfoSizeExA( DWORD flags, LPCSTR filename, LPDWORD handle ){ UNICODE_STRING filenameW; DWORD retval;
TRACE("(0x%lx,%s,%p)\n", flags, debugstr_a(filename), handle );
if(filename) RtlCreateUnicodeStringFromAsciiz(&filenameW, filename); else filenameW.Buffer = NULL;
retval = GetFileVersionInfoSizeExW(flags, filenameW.Buffer, handle);
RtlFreeUnicodeString(&filenameW);
return retval;}
/*********************************************************************** * GetFileVersionInfoExW (kernelbase.@) */BOOL WINAPI GetFileVersionInfoExW( DWORD flags, LPCWSTR filename, DWORD ignored, DWORD datasize, LPVOID data ){ static const char signature[4] = "FE2X"; DWORD len, offset, magic = 1; HMODULE hModule; VS_VERSION_INFO_STRUCT32* vvis = data;
TRACE("(0x%lx,%s,%ld,size=%ld,data=%p)\n", flags, debugstr_w(filename), ignored, datasize, data );
if (!data) { SetLastError(ERROR_INVALID_DATA); return FALSE; } if (flags & ~FILE_VER_GET_LOCALISED) FIXME("flags 0x%lx ignored\n", flags & ~FILE_VER_GET_LOCALISED);
if ((hModule = LoadLibraryExW( filename, 0, LOAD_LIBRARY_AS_IMAGE_RESOURCE ))) { HRSRC hRsrc = NULL; if (!(flags & FILE_VER_GET_LOCALISED)) { LANGID english = MAKELANGID( LANG_ENGLISH, SUBLANG_DEFAULT ); hRsrc = FindResourceExW( hModule, (LPWSTR)VS_FILE_INFO, MAKEINTRESOURCEW(VS_VERSION_INFO), english ); } if (!hRsrc) hRsrc = FindResourceW( hModule, MAKEINTRESOURCEW(VS_VERSION_INFO), (LPWSTR)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 ); } else { HANDLE handle = CreateFileW( filename, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, 0 ); if (handle == INVALID_HANDLE_VALUE) return 0; if ((magic = find_version_resource( handle, &len, &offset, flags ))) len = read_data( handle, offset, data, min( len, datasize )); CloseHandle( handle ); }
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( ERROR_RESOURCE_DATA_NOT_FOUND ); return FALSE; }}
/*********************************************************************** * GetFileVersionInfoExA (kernelbase.@) */BOOL WINAPI GetFileVersionInfoExA( DWORD flags, LPCSTR filename, DWORD handle, DWORD datasize, LPVOID data ){ UNICODE_STRING filenameW; BOOL retval;
TRACE("(0x%lx,%s,%ld,size=%ld,data=%p)\n", flags, debugstr_a(filename), handle, datasize, data );
if(filename) RtlCreateUnicodeStringFromAsciiz(&filenameW, filename); else filenameW.Buffer = NULL;
retval = GetFileVersionInfoExW(flags, filenameW.Buffer, handle, datasize, data);
RtlFreeUnicodeString(&filenameW);
return retval;}
/*********************************************************************** * GetFileVersionInfoW (kernelbase.@) */BOOL WINAPI GetFileVersionInfoW( LPCWSTR filename, DWORD handle, DWORD datasize, LPVOID data ){ return GetFileVersionInfoExW(FILE_VER_GET_LOCALISED, filename, handle, datasize, data);}
/*********************************************************************** * GetFileVersionInfoA (kernelbase.@) */BOOL WINAPI GetFileVersionInfoA( LPCSTR filename, DWORD handle, DWORD datasize, LPVOID data ){ return GetFileVersionInfoExA(FILE_VER_GET_LOCALISED, filename, handle, datasize, data);}
/*********************************************************************** * VersionInfo16_FindChild [internal] */static const VS_VERSION_INFO_STRUCT16 *VersionInfo16_FindChild( const VS_VERSION_INFO_STRUCT16 *info, LPCSTR key, UINT len ){ const VS_VERSION_INFO_STRUCT16 *child = VersionInfo16_Children( info );
while ((char *)child < (char *)info + info->wLength ) { if (!strnicmp( child->szKey, key, len ) && !child->szKey[len]) 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 key, UINT len ){ const VS_VERSION_INFO_STRUCT32 *child = VersionInfo32_Children( info );
while ((char *)child < (char *)info + info->wLength ) { if (!wcsnicmp( child->szKey, key, len ) && !child->szKey[len]) 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, BOOL *pbText ){ 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; if (pbText) *pbText = info->wType;
return TRUE;}
/*********************************************************************** * VerQueryValueA (kernelbase.@) */BOOL WINAPI VerQueryValueA( LPCVOID pBlock, LPCSTR lpSubBlock, LPVOID *lplpBuffer, PUINT puLen ){ static const char rootA[] = "\\"; 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, isText; INT len; LPWSTR lpSubBlockW; UINT value_len;
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, &value_len, &isText); if (puLen) *puLen = value_len;
HeapFree(GetProcessHeap(), 0, lpSubBlockW);
if (ret && isText) { /* 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, value_len, lpBufferA + pos, info->wLength - pos, NULL, NULL); *lplpBuffer = lpBufferA + pos; if (puLen) *puLen = len; } return ret; }
return VersionInfo16_QueryValue(info, lpSubBlock, lplpBuffer, puLen);}
/*********************************************************************** * VerQueryValueW (kernelbase.@) */BOOL WINAPI VerQueryValueW( LPCVOID pBlock, LPCWSTR lpSubBlock, LPVOID *lplpBuffer, PUINT puLen ){ 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 || !lpSubBlock[0]) lpSubBlock = L"\\";
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 && wcscmp( lpSubBlock, L"\\" ) && wcsicmp( lpSubBlock, L"\\VarFileInfo\\Translation" )) { /* 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; if (puLen) *puLen = len; } return ret; }
return VersionInfo32_QueryValue(info, lpSubBlock, lplpBuffer, puLen, NULL);}
/****************************************************************************** * file_existsA */static BOOL file_existsA( char const * path, char const * file, BOOL excl ){ DWORD sharing = excl ? 0 : FILE_SHARE_READ | FILE_SHARE_WRITE; char filename[MAX_PATH]; int len; HANDLE handle;
if (path) { strcpy( filename, path ); len = strlen(filename); if (len && filename[len - 1] != '\\') strcat( filename, "\\" ); strcat( filename, file ); } else if (!SearchPathA( NULL, file, NULL, MAX_PATH, filename, NULL )) return FALSE;
handle = CreateFileA( filename, 0, sharing, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0 ); if (handle == INVALID_HANDLE_VALUE) return FALSE; CloseHandle( handle ); return TRUE;}
/****************************************************************************** * file_existsW */static BOOL file_existsW( const WCHAR *path, const WCHAR *file, BOOL excl ){ DWORD sharing = excl ? 0 : FILE_SHARE_READ | FILE_SHARE_WRITE; WCHAR filename[MAX_PATH]; int len; HANDLE handle;
if (path) { lstrcpyW( filename, path ); len = lstrlenW(filename); if (len && filename[len - 1] != '\\') lstrcatW( filename, L"\\" ); lstrcatW( filename, file ); } else if (!SearchPathW( NULL, file, NULL, MAX_PATH, filename, NULL )) return FALSE;
handle = CreateFileW( filename, 0, sharing, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0 ); if (handle == INVALID_HANDLE_VALUE) return FALSE; CloseHandle( handle ); return TRUE;}
/***************************************************************************** * VerFindFileA (kernelbase.@) * * 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. */DWORD WINAPI VerFindFileA( DWORD flags, LPCSTR filename, LPCSTR win_dir, LPCSTR app_dir, LPSTR cur_dir, PUINT curdir_len, LPSTR dest, PUINT dest_len ){ DWORD retval = 0; const char *curDir; const char *destDir; char winDir[MAX_PATH], systemDir[MAX_PATH];
TRACE("flags = %lx filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n", flags, debugstr_a(filename), debugstr_a(win_dir), debugstr_a(app_dir), curdir_len, curdir_len ? *curdir_len : 0, dest_len, dest_len ? *dest_len : 0 );
/* Figure out where the file should go; shared files default to the system directory */
GetSystemDirectoryA(systemDir, sizeof(systemDir)); curDir = "";
if(flags & VFFF_ISSHAREDFILE) { destDir = systemDir; /* Were we given a filename? If so, try to find the file. */ if(filename) { if(file_existsA(destDir, filename, FALSE)) curDir = destDir; else if(app_dir && file_existsA(app_dir, filename, FALSE)) curDir = app_dir;
if(!file_existsA(systemDir, filename, FALSE)) retval |= VFF_CURNEDEST; } } else /* not a shared file */ { destDir = app_dir ? app_dir : ""; if(filename) { GetWindowsDirectoryA( winDir, MAX_PATH ); if(file_existsA(destDir, filename, FALSE)) curDir = destDir; else if(file_existsA(winDir, filename, FALSE)) curDir = winDir; else if(file_existsA(systemDir, filename, FALSE)) curDir = systemDir;
if (app_dir && app_dir[0]) { if(!file_existsA(app_dir, filename, FALSE)) retval |= VFF_CURNEDEST; } else if(file_existsA(NULL, filename, FALSE)) retval |= VFF_CURNEDEST; } }
/* Check to see if the file exists and is in use by another application */ if (filename && file_existsA(curDir, filename, FALSE)) { if (filename && !file_existsA(curDir, filename, TRUE)) retval |= VFF_FILEINUSE; }
if (dest_len && dest) { UINT len = strlen(destDir) + 1; if (*dest_len < len) retval |= VFF_BUFFTOOSMALL; lstrcpynA(dest, destDir, *dest_len); *dest_len = len; } if (curdir_len && cur_dir) { UINT len = strlen(curDir) + 1; if (*curdir_len < len) retval |= VFF_BUFFTOOSMALL; lstrcpynA(cur_dir, curDir, *curdir_len); *curdir_len = len; }
TRACE("ret = %lu (%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(cur_dir), debugstr_a(dest));
return retval;}
/***************************************************************************** * VerFindFileW (kernelbase.@) */DWORD WINAPI VerFindFileW( DWORD flags, LPCWSTR filename, LPCWSTR win_dir, LPCWSTR app_dir, LPWSTR cur_dir, PUINT curdir_len, LPWSTR dest, PUINT dest_len ){ DWORD retval = 0; const WCHAR *curDir; const WCHAR *destDir;
TRACE("flags = %lx filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n", flags, debugstr_w(filename), debugstr_w(win_dir), debugstr_w(app_dir), curdir_len, curdir_len ? *curdir_len : 0, dest_len, dest_len ? *dest_len : 0 );
/* Figure out where the file should go; shared files default to the system directory */
curDir = L"";
if(flags & VFFF_ISSHAREDFILE) { destDir = system_dir; /* Were we given a filename? If so, try to find the file. */ if(filename) { if(file_existsW(destDir, filename, FALSE)) curDir = destDir; else if(app_dir && file_existsW(app_dir, filename, FALSE)) { curDir = app_dir; retval |= VFF_CURNEDEST; } } } else /* not a shared file */ { destDir = app_dir ? app_dir : L""; if(filename) { if(file_existsW(destDir, filename, FALSE)) curDir = destDir; else if(file_existsW(windows_dir, filename, FALSE)) { curDir = windows_dir; retval |= VFF_CURNEDEST; } else if (file_existsW(system_dir, filename, FALSE)) { curDir = system_dir; retval |= VFF_CURNEDEST; } } }
if (filename && !file_existsW(curDir, filename, TRUE)) retval |= VFF_FILEINUSE;
if (dest_len && dest) { UINT len = lstrlenW(destDir) + 1; if (*dest_len < len) retval |= VFF_BUFFTOOSMALL; lstrcpynW(dest, destDir, *dest_len); *dest_len = len; } if (curdir_len && cur_dir) { UINT len = lstrlenW(curDir) + 1; if (*curdir_len < len) retval |= VFF_BUFFTOOSMALL; lstrcpynW(cur_dir, curDir, *curdir_len); *curdir_len = len; }
TRACE("ret = %lu (%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(cur_dir), debugstr_w(dest)); return retval;}
/*********************************************************************** * GetProductInfo (kernelbase.@) */BOOL WINAPI DECLSPEC_HOTPATCH GetProductInfo( DWORD os_major, DWORD os_minor, DWORD sp_major, DWORD sp_minor, DWORD *type ){ return RtlGetProductInfo( os_major, os_minor, sp_major, sp_minor, type );}
/*********************************************************************** * GetVersion (kernelbase.@) */DWORD WINAPI GetVersion(void){ OSVERSIONINFOEXW info; DWORD result;
info.dwOSVersionInfoSize = sizeof(info); if (!GetVersionExW( (OSVERSIONINFOW *)&info )) return 0;
result = MAKELONG( MAKEWORD( info.dwMajorVersion, info.dwMinorVersion ), (info.dwPlatformId ^ 2) << 14 );
if (info.dwPlatformId == VER_PLATFORM_WIN32_NT) result |= LOWORD(info.dwBuildNumber) << 16; return result;}
/*********************************************************************** * GetVersionExA (kernelbase.@) */BOOL WINAPI GetVersionExA( OSVERSIONINFOA *info ){ OSVERSIONINFOEXW infoW;
if (info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOA) && info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXA)) { WARN( "wrong OSVERSIONINFO size from app (got: %ld)\n", info->dwOSVersionInfoSize ); SetLastError( ERROR_INSUFFICIENT_BUFFER ); return FALSE; }
infoW.dwOSVersionInfoSize = sizeof(infoW); if (!GetVersionExW( (OSVERSIONINFOW *)&infoW )) return FALSE;
info->dwMajorVersion = infoW.dwMajorVersion; info->dwMinorVersion = infoW.dwMinorVersion; info->dwBuildNumber = infoW.dwBuildNumber; info->dwPlatformId = infoW.dwPlatformId; WideCharToMultiByte( CP_ACP, 0, infoW.szCSDVersion, -1, info->szCSDVersion, sizeof(info->szCSDVersion), NULL, NULL );
if (info->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXA)) { OSVERSIONINFOEXA *vex = (OSVERSIONINFOEXA *)info; vex->wServicePackMajor = infoW.wServicePackMajor; vex->wServicePackMinor = infoW.wServicePackMinor; vex->wSuiteMask = infoW.wSuiteMask; vex->wProductType = infoW.wProductType; } return TRUE;}
/*********************************************************************** * GetVersionExW (kernelbase.@) */BOOL WINAPI GetVersionExW( OSVERSIONINFOW *info ){ static INIT_ONCE init_once = INIT_ONCE_STATIC_INIT;
if (info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOW) && info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXW)) { WARN( "wrong OSVERSIONINFO size from app (got: %ld)\n", info->dwOSVersionInfoSize ); return FALSE; }
if (!InitOnceExecuteOnce(&init_once, init_current_version, NULL, NULL)) return FALSE;
info->dwMajorVersion = current_version.dwMajorVersion; info->dwMinorVersion = current_version.dwMinorVersion; info->dwBuildNumber = current_version.dwBuildNumber; info->dwPlatformId = current_version.dwPlatformId; wcscpy( info->szCSDVersion, current_version.szCSDVersion );
if (info->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXW)) { OSVERSIONINFOEXW *vex = (OSVERSIONINFOEXW *)info; vex->wServicePackMajor = current_version.wServicePackMajor; vex->wServicePackMinor = current_version.wServicePackMinor; vex->wSuiteMask = current_version.wSuiteMask; vex->wProductType = current_version.wProductType; } return TRUE;}
/*********************************************************************** * GetCurrentPackageFamilyName (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetCurrentPackageFamilyName( UINT32 *length, WCHAR *name ){ FIXME( "(%p %p): stub\n", length, name ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetCurrentPackageFullName (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetCurrentPackageFullName( UINT32 *length, WCHAR *name ){ FIXME( "(%p %p): stub\n", length, name ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetCurrentPackageId (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetCurrentPackageId( UINT32 *len, BYTE *buffer ){ FIXME( "(%p %p): stub\n", len, buffer ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetCurrentPackageInfo (kernelbase.@) */LONG WINAPI GetCurrentPackageInfo( const UINT32 flags, UINT32 *buffer_size, BYTE *buffer, UINT32 *count ){ FIXME( "(%#x %p %p %p): stub\n", flags, buffer_size, buffer, count ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetCurrentPackagePath (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetCurrentPackagePath( UINT32 *length, WCHAR *path ){ FIXME( "(%p %p): stub\n", length, path ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetPackageFullName (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetPackageFullName( HANDLE process, UINT32 *length, WCHAR *name ){ FIXME( "(%p %p %p): stub\n", process, length, name ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetPackageFamilyName (kernelbase.@) */LONG WINAPI /* DECLSPEC_HOTPATCH */ GetPackageFamilyName( HANDLE process, UINT32 *length, WCHAR *name ){ FIXME( "(%p %p %p): stub\n", process, length, name ); return APPMODEL_ERROR_NO_PACKAGE;}
/*********************************************************************** * GetPackagesByPackageFamily (kernelbase.@) */LONG WINAPI DECLSPEC_HOTPATCH GetPackagesByPackageFamily(const WCHAR *family_name, UINT32 *count, WCHAR *full_names, UINT32 *buffer_len, WCHAR *buffer){ FIXME( "(%s %p %p %p %p): stub\n", debugstr_w(family_name), count, full_names, buffer_len, buffer );
if (!count || !buffer_len) return ERROR_INVALID_PARAMETER;
*count = 0; *buffer_len = 0; return ERROR_SUCCESS;}
/*********************************************************************** * GetPackagePathByFullName (kernelbase.@) */LONG WINAPI GetPackagePathByFullName(const WCHAR *name, UINT32 *len, WCHAR *path){ if (!len || !name) return ERROR_INVALID_PARAMETER;
FIXME( "(%s %p %p): stub\n", debugstr_w(name), len, path );
return APPMODEL_ERROR_NO_PACKAGE;}
static const struct{ UINT32 code; const WCHAR *name;}arch_names[] ={ {PROCESSOR_ARCHITECTURE_INTEL, L"x86"}, {PROCESSOR_ARCHITECTURE_ARM, L"arm"}, {PROCESSOR_ARCHITECTURE_AMD64, L"x64"}, {PROCESSOR_ARCHITECTURE_NEUTRAL, L"neutral"}, {PROCESSOR_ARCHITECTURE_ARM64, L"arm64"}, {PROCESSOR_ARCHITECTURE_UNKNOWN, L"unknown"},};
static UINT32 processor_arch_from_string(const WCHAR *str, unsigned int len){ unsigned int i;
for (i = 0; i < ARRAY_SIZE(arch_names); ++i) if (lstrlenW(arch_names[i].name) == len && !wcsnicmp(str, arch_names[i].name, len)) return arch_names[i].code; return ~0u;}
/*********************************************************************** * PackageIdFromFullName (kernelbase.@) */LONG WINAPI PackageIdFromFullName(const WCHAR *full_name, UINT32 flags, UINT32 *buffer_length, BYTE *buffer){ const WCHAR *name, *version_str, *arch_str, *resource_id, *publisher_id, *s; PACKAGE_ID *id = (PACKAGE_ID *)buffer; UINT32 size, buffer_size, len;
TRACE("full_name %s, flags %#x, buffer_length %p, buffer %p.\n", debugstr_w(full_name), flags, buffer_length, buffer);
if (flags) FIXME("Flags %#x are not supported.\n", flags);
if (!full_name || !buffer_length) return ERROR_INVALID_PARAMETER;
if (!buffer && *buffer_length) return ERROR_INVALID_PARAMETER;
name = full_name; if (!(version_str = wcschr(name, L'_'))) return ERROR_INVALID_PARAMETER; ++version_str;
if (!(arch_str = wcschr(version_str, L'_'))) return ERROR_INVALID_PARAMETER; ++arch_str;
if (!(resource_id = wcschr(arch_str, L'_'))) return ERROR_INVALID_PARAMETER; ++resource_id;
if (!(publisher_id = wcschr(resource_id, L'_'))) return ERROR_INVALID_PARAMETER; ++publisher_id;
/* Publisher id length should be 13. */ size = sizeof(*id) + sizeof(WCHAR) * ((version_str - name) + (publisher_id - resource_id) + 13 + 1); buffer_size = *buffer_length; *buffer_length = size; if (buffer_size < size) return ERROR_INSUFFICIENT_BUFFER;
memset(id, 0, sizeof(*id)); if ((id->processorArchitecture = processor_arch_from_string(arch_str, resource_id - arch_str - 1)) == ~0u) { FIXME("Unrecognized arch %s.\n", debugstr_w(arch_str)); return ERROR_INVALID_PARAMETER; } buffer += sizeof(*id);
id->version.Major = wcstol(version_str, NULL, 10); if (!(s = wcschr(version_str, L'.'))) return ERROR_INVALID_PARAMETER; ++s; id->version.Minor = wcstol(s, NULL, 10); if (!(s = wcschr(s, L'.'))) return ERROR_INVALID_PARAMETER; ++s; id->version.Build = wcstol(s, NULL, 10); if (!(s = wcschr(s, L'.'))) return ERROR_INVALID_PARAMETER; ++s; id->version.Revision = wcstol(s, NULL, 10);
id->name = (WCHAR *)buffer; len = version_str - name - 1; memcpy(id->name, name, sizeof(*id->name) * len); id->name[len] = 0; buffer += sizeof(*id->name) * (len + 1);
id->resourceId = (WCHAR *)buffer; len = publisher_id - resource_id - 1; memcpy(id->resourceId, resource_id, sizeof(*id->resourceId) * len); id->resourceId[len] = 0; buffer += sizeof(*id->resourceId) * (len + 1);
id->publisherId = (WCHAR *)buffer; len = lstrlenW(publisher_id); if (len != 13) return ERROR_INVALID_PARAMETER; memcpy(id->publisherId, publisher_id, sizeof(*id->publisherId) * len); id->publisherId[len] = 0;
return ERROR_SUCCESS;}