archive
/
windows-xp
mirror of https://github.com/tongzx/nt5src
2
0
Fork 0
Code Issues Projects Releases Wiki Activity
Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
9 Commits
1 Branch
0 Tags
2.0 GiB
 
 
 
 
 
 
Tree: 75c48ba87f
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '75c48ba87f'
${ noResults }
windows-xp/Source/XPSP1/NT/sdktools/idwlog/files.cpp

1249 lines
34 KiB
Raw Blame History

#include <windows.h>
#include <stdio.h>
#include <tchar.h>
#include <winver.h>
#include "network.h"
#include "idw_dbg.h"
#include "machines.h"
#include "files.h"
//#include <setupapi.h>
/*++
Filename : Files.c
Description: Contains the network access code.
Created by: Wally Ho
History: Created on 20/02/2000.
09.19.2001 Joe Holman fixes for idwlog bugs 409338, 399178, and 352810
Contains these functions:
1. BOOL GetCurrentSystemBuildInfo ( IN OUT LPINSTALL_DATA pId);
2. BOOL GetCurrentInstallingBuildInfo ( IN OUT LPINSTALL_DATA pId);
3. BOOL GetImageHlpDllInfo ( OUT LPINSTALL_DATA pId,
IN INT iFlag);
4. BOOL MyGetFileVersionInfo(LPTSTR lpszFilename,
LPVOID *lpVersionInfo);
5. BOOL GetSkuFromDosNetInf (IN OUT LPINSTALL_DATA pId);
03.29.2001 Joe Holman Made the code work on Win9x.
--*/
DWORD gdwLength; // global used for Win9x data mining, length of buffer.
BOOL
GetCurrentSystemBuildInfo ( IN OUT LPINSTALL_DATA pId)
/*++
Routine Description:
This loads the three items of
DWORD dwSystemBuild;
DWORD dwSystemBuildDelta;
TCHAR szSystemBuildSourceLocation[100]
From information gleaned from the imagehlp.dll.
*NOTE*
The ImageHlp.dll according to Micheal Lekas is compiled everytime a
build is put out. We are banking on this for this function.
For XP SPs, this will be from the ntoskrnl.exe file.
Arguments:
An Install Data struct for loading the data.
Return Value:
TRUE if success
FALSE if fail
--*/
{
//Initialize all the variables first to expected values.
pId->dwSystemBuild = 0;
pId->dwSystemBuildDelta = 0;
pId->dwSystemSPBuild = 0;
pId->dwSystemMajorVersion = 0;
pId->dwSystemMinorVersion = 0;
_stprintf(pId->szSystemBuildSourceLocation, TEXT("%s"),
TEXT("No_Build_Lab_Information"));
if (DTC == TRUE){
if (FALSE == GetBuildInfoFromOSAndBldFile(pId, F_SYSTEM )){
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile failed. Could not retrieved build, delta, location.\n"));
return FALSE;
}else{
Idwlog(TEXT("Success in retrieving build, delta, location.\n"));
return TRUE;
}
// This is Whistler.
}else{
if (FALSE == GetImageHlpDllInfo(pId, F_SYSTEM_IMAGEHLP_DLL)){
Idwlog(TEXT("GetImageHlpDllInfo failed. Could not retrieved build, delta, location.\n"));
return FALSE;
}else{
Idwlog(TEXT("Success in retrieving build, delta, location.\n"));
return TRUE;
}
}
}
BOOL
GetCurrentInstallingBuildInfo ( IN OUT LPINSTALL_DATA pId)
/*++
Routine Description:
This loads the three items of
DWORD dwInstallingBuild;
DWORD dwInstallingBuildDelta;
TCHAR szCurrentBuildSourceLocation[100];
From information gleaned from the imagehlp.dll.
*NOTE*
The ImageHlp.dll according to Micheal Lekas is compiled everytime a
build is put out. We are banking on this for this function.
Arguments:
An Install Data struct for loading the data.
Return Value:
TRUE if success
FALSE if fail
--*/
{
//Initialize all the variables first to expected values.
pId->dwInstallingBuild = 0;
pId->dwInstallingBuildDelta = 0;
pId->dwInstallingSPBuild = 0;
pId->dwInstallingMajorVersion = 0;
pId->dwInstallingMinorVersion = 0;
_stprintf(pId->szInstallingBuildSourceLocation, TEXT("%s"),
TEXT("No_Build_Lab_Information"));
if (DTC == 1){
if (FALSE == GetBuildInfoFromOSAndBldFile(pId, F_INSTALLING )){
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile failed. Could not retrieved build, delta, location.\n"));
return FALSE;
}else{
Idwlog(TEXT("Success in retrieving build, delta, location.\n"));
return TRUE;
}
}else{
if (FALSE == GetImageHlpDllInfo(pId, F_INSTALLING_IMAGEHLP_DLL )){
Idwlog(TEXT("GetImageHlpDllInfo failed. Could not retrieved build, delta, location.\n"));
return FALSE;
}else{
Idwlog(TEXT("Success in retrieving build, delta, location.\n"));
return TRUE;
}
}
}
BOOL
GetBuildInfoFromOSAndBldFile( OUT LPINSTALL_DATA pId,
IN INT iFlag)
/*++
Routine Description:
This loads the three items of
DWORD dwInstallingBuild;
DWORD dwInstallingBuildDelta;
TCHAR szCurrentBuildSourceLocation[100];
From information gleaned from the OS and the BLD file.
*NOTE*
This is assuming the changes of having the bld files on
the CD in the same dir as the idwlog.exe and in the x86 share in on the server.
Arguments:
These flags are.
F_SYSTEM 0x1
F_INSTALLING 0x2
Return Value:
TRUE if success
FALSE if fail
--*/
{
WIN32_FIND_DATA fd;
HANDLE hFind;
TCHAR szFullPath [ MAX_PATH ];
TCHAR szCurDir [ MAX_PATH ];
LPTSTR ptstr;
OSVERSIONINFO osex;
DWORD dwLength = MAX_PATH;
DWORD dwBuild;
DWORD dwBuildDelta;
TCHAR szDontCare[30];
DWORD dwDontCare;
szCurDir[0] = TEXT('\0');
switch (iFlag){
case F_INSTALLING:
// Get the installing files location of the 2195.0XX.bld file
GetModuleFileName( NULL,szCurDir, dwLength);
// Remove the Idwlog.exe part and get only the directory structure.
ptstr = _tcsrchr(szCurDir,TEXT('\\'));
if (NULL == ptstr) {
Idwlog(TEXT("ERROR GetBuildInfoFromOSAndBldFile could find the file to get bld info from.\n"));
return FALSE;
}
*ptstr = TEXT('\0');
Idwlog(TEXT("Getting Build, Delta, Build lab for the installing files.\n"));
Idwlog(TEXT("Getting Installing file location as %s.\n"), szCurDir);
// Use this to get the location
// idwlog.exe -1 is run from. This tool
// will always assume the 2195.xxx.bld is in its
// current path or two up.
_stprintf (szFullPath, TEXT("%s\\*.bld"),szCurDir);
Idwlog(TEXT("First look for the XXXX.xxx.bld in [CD location] %s.\n"),
szFullPath);
// On a network share the 2195.xxx.bld is two up from where
// idwlog.exe -1 is located.
// On a CD its located in the same directory as where the
// idwlog.exe -1 is located. We will look in both places.
hFind = FindFirstFile (szFullPath, &fd);
if (INVALID_HANDLE_VALUE == hFind){
//
// Now we know the file in not in the
// immediate directory. Move up another 2 levels by
// culling off two more directory.
//
for (INT i = 0; i < 2; i++) {
ptstr = _tcsrchr(szCurDir,TEXT('\\'));
if (NULL == ptstr) {
Idwlog(TEXT("ERROR GetBuildInfoFromOSAndBldFile could not find the file to get bld info from.\n"));
return FALSE;
}
*ptstr = TEXT('\0');
}
_stprintf (szFullPath, TEXT("%s\\*.bld"),szCurDir);
Idwlog(TEXT("Second look for the XXXX.xxx.bld in [NET location] %s.\n"),
szFullPath);
hFind = FindFirstFile (szFullPath,&fd);
if (INVALID_HANDLE_VALUE == hFind){
// In case we cannot find it we will exit.
// Set the currentBuild number to 0;
//_tcscpy (id.szCurrentBuild, TEXT("latest"));
Idwlog(TEXT("Could not find the XXXX.xxx.bld file in %s.\n"),
szFullPath);
Idwlog(TEXT("ERROR - Cannot get build number or delta of the installing build.\n"));
return FALSE;
}
}
_stscanf(fd.cFileName,TEXT("%lu.%lu.%s"),&dwBuild, &dwBuildDelta,szDontCare);
Idwlog(TEXT("Inserting into struct Build, Delta, Build lab for the installing files.\n"));
// Build Location
_tcscpy( pId->szInstallingBuildSourceLocation,TEXT("No_Build_Lab_Information"));
// Major version X.51
pId->dwInstallingMajorVersion = 0;
// Minor version 5.XX
pId->dwInstallingMinorVersion = 0;
// Build
pId->dwInstallingBuild = dwBuild;
// Build Delta.
pId->dwInstallingBuildDelta = dwBuildDelta;
pId->dwInstallingSPBuild = dwBuildDelta;
if ( pId->dwInstallingMajorVersion == 0 || pId->dwInstallingMinorVersion == 0 ) {
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile F_INSTALLING ERROR - need Major or Minor #\n"));
}
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile F_INSTALLING - Build = %ld, Major = %ld, Minor = %ld.\n"),
pId->dwInstallingBuild,
pId->dwInstallingMajorVersion,
pId->dwInstallingMinorVersion
);
break;
case F_SYSTEM:
osex.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
GetVersionEx(&osex);
// The output is like "RC 0.31"
_stscanf(osex.szCSDVersion, TEXT("%s %lu.%lu"),
szDontCare, &dwDontCare, &dwBuildDelta);
// Get the local systems location of the imagehlp.dll
Idwlog(TEXT("Inserting into struct Build, Delta, Build lab for the local system.\n"));
// Build Location
_tcscpy( pId->szSystemBuildSourceLocation,TEXT("No_Build_Lab_Information"));
// Major version X.51
pId->dwSystemMajorVersion = 0;
// Minor version 5.XX
pId->dwSystemMinorVersion = 0;
// Build
pId->dwSystemBuild = osex.dwBuildNumber;
// Build Delta.
pId->dwSystemBuildDelta = dwBuildDelta;
pId->dwSystemSPBuild = dwBuildDelta;
Idwlog(TEXT("Getting Build, Delta, Build lab for local system.\n"));
if ( pId->dwInstallingMajorVersion == 0 || pId->dwInstallingMinorVersion == 0 ) {
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile F_SYSTEM ERROR - need Major or Minor #\n"));
}
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile F_SYSTEM - Build = %ld, Major = %ld, Minor = %ld.\n"),
pId->dwInstallingBuild,
pId->dwInstallingMajorVersion,
pId->dwInstallingMinorVersion
);
break;
}
return TRUE;
}
BOOL
GetImageHlpDllInfo ( OUT LPINSTALL_DATA pId,
IN INT iFlag)
/*++
Routine Description:
This loads the three items of
DWORD dwInstallingBuild;
DWORD dwInstallingBuildDelta;
TCHAR szCurrentBuildSourceLocation[100];
From information gleaned from the imagehlp.dll.
*NOTE*
The ImageHlp.dll according to Micheal Lekas is compiled everytime a
build is put out. We are banking on this for this function.
Arguments:
An Install Data struct and the Imagehelp DLL location.
It so it can be reused for both local probing and
Installation probing.
iFlag for System Probe or Installing Probe.
Also if we want the data from imagehlp.dll or from the
System. These flags are.
F_SYSTEM_IMAGEHLP_DLL 0x1
F_INSTALLING_IMAGEHLP_DLL 0x2
Return Value:
TRUE if success
FALSE if fail
--*/
{
VS_FIXEDFILEINFO* pv;
WIN32_FIND_DATA fd;
HANDLE hFind;
TCHAR szFullPath [ MAX_PATH ] = "\0";
TCHAR szCurDir [ MAX_PATH ] = "\0";
TCHAR szBuildLocation[ MAX_PATH ] = "\0";
TCHAR szTempDir [ MAX_PATH ] = "\0";
TCHAR szTempDirFile [ MAX_PATH ] = "\0";
DWORD dwError = 0;
LPTSTR ptstr;
DWORD dwTemp;
BOOL b;
LPVOID lpData = NULL;
LPVOID lpInfo = NULL;
TCHAR key[80];
DWORD *pdwTranslation;
UINT cch, uLen;
DWORD dwDefLang = 0x40904b0;
DWORD dwLength = MAX_PATH;
CHAR *p = NULL;
DWORD dwHandle;
Idwlog ( TEXT ( "GetImageHlpDllInfo - entered.\n") );
szCurDir[0] = TEXT('\0');
// Configure the path to the where the image file lives.
// This is different for the currently installed system vs. the installing build during -1.
// However, for -3, it's a no-op, since we are installed and logged in.
//
// If we are in phase 3, we switch where the path points to.
//
if ( g_InstallData.bSPUninst || g_InstallData.bSPPatch || g_InstallData.bSPFull || g_InstallData.bSPUpdate ) {
// New code to work with SPs.
//
if (iFlag == F_INSTALLING_IMAGEHLP_DLL && (g_InstallData.iStageSequence == 3 || g_InstallData.iStageSequence == 2) ) {
iFlag = F_SYSTEM_IMAGEHLP_DLL;
}
switch (iFlag){
case F_INSTALLING_IMAGEHLP_DLL:
// Get the image data for the build that we are installing.
p = _tcsstr (GetCommandLine(), TEXT("Path="));
if ( p == NULL ) {
Idwlog ( TEXT ( "GetImageHlpDllInfo ERROR - Could not determine path from command line, you need a Path=<path to the installing build> with trailing slash.\n") );
return(FALSE);
}
p += _tcsclen ( TEXT ("Path=" ) );
// We now have the location of the file to expand.
//
//_stprintf (szCurDir, TEXT("%s\\system32\\idwlog.exe"),p);
_stprintf (szFullPath, TEXT("%s\\imagehlp.dll"),p);
/*****
// Get a temporary location to expand the file.
// Can use this if the file is compressed from the media. This will NOT work on Win9x though (setupapi).
//
//
dwError = GetTempPath ( MAX_PATH, szTempDir );
if ( dwError == 0 ) {
Idwlog(TEXT("GetImageHlpDllInfo - ERROR GetTempPath gle = %ld.\n"), GetLastError () );
}
// Uncompress it, and point to that location.
//
_stprintf ( szTempDirFile, TEXT("%s\\ntoskrnl.exe"), szTempDir);
dwError = SetupDecompressOrCopyFile ( szCurDir, szTempDirFile, NULL );
if ( dwError != ERROR_SUCCESS ) {
Idwlog(TEXT("GetImageHlpDllInfo - ERROR SetupDecompressOrCopyFile gle = %ld.\n"), GetLastError () );
}
// Pass the location of the file.
//
_stprintf (szFullPath, TEXT("%s\\ntoskrnl.exe"),szTempDir );
****/
Idwlog(TEXT("GetImageHlpDllInfo - szFullPath(1) = %s.\n"), szFullPath );
break;
case F_SYSTEM_IMAGEHLP_DLL:
// Get the local systems location for the image file
GetSystemDirectory( szCurDir, MAX_PATH );
_stprintf (szFullPath, TEXT("%s\\imagehlp.dll"),szCurDir);
Idwlog(TEXT("GetImageHlpDllInfo - szFullPath(2) = %s.\n"), szFullPath );
break;
}
// end of new code.
//
}
else {
// This is the old standard code.
//
if (iFlag == F_INSTALLING_IMAGEHLP_DLL && (g_InstallData.iStageSequence == 3 || g_InstallData.iStageSequence == 2)) {
iFlag = F_SYSTEM_IMAGEHLP_DLL;
}
switch (iFlag){
case F_INSTALLING_IMAGEHLP_DLL:
// Get the image data for the build that we are installing.
p = _tcsstr (GetCommandLine(), TEXT("Path="));
if ( p == NULL ) {
Idwlog ( TEXT ( "GetImageHlpDllInfo ERROR - Could not determine path from command line, you need a Path=<path to the installing build> with trailing slash.\n") );
return(FALSE);
}
p += _tcsclen ( TEXT ("Path=" ) );
_stprintf (szCurDir, TEXT("%s"),p);
Idwlog(TEXT("GetImageHlpDllInfo - Getting Installing file location as %s.\n"), szCurDir);
break;
case F_SYSTEM_IMAGEHLP_DLL:
// Get the local systems location for the image file
GetSystemDirectory( szCurDir, MAX_PATH );
Idwlog(TEXT("GetImageHlpDllInfo - Getting Build, Delta, Build lab for local system.\n"));
break;
}
_stprintf (szFullPath, TEXT("%s\\imagehlp.dll"),szCurDir);
Idwlog(TEXT("GetImageHlpDllInfo - szFullPath(3) = %s.\n"), szFullPath );
}
Idwlog(TEXT("GetImageHlpDllInfo - Will look in [%s] for build information.\n"),szFullPath);
/*******
// On a network share the Imagehlp.dll is one up from where
// idwlog.exe -1 is located.
// On a CD its located in the same directory as where the
// idwlog.exe -1 is located. We will look in both places.
hFind = FindFirstFile (szFullPath, &fd);
if (INVALID_HANDLE_VALUE == hFind){
//
// Now we know the file in not in the
// immediate directory. Move up one by
// culling off one more directory.
ptstr = _tcsrchr(szCurDir,TEXT('\\'));
if (NULL == ptstr) {
Idwlog(TEXT("GetBuildInfoFromOSAndBldFile could find the file to get bld info from.\n"));
return FALSE;
}
*ptstr = TEXT('\0');
_stprintf (szFullPath, TEXT("%s\\imagehlp.dll"),szCurDir);
Idwlog(TEXT("First look for imagehlp.dll in %s.\n"),szFullPath);
hFind = FindFirstFile (szFullPath,&fd);
if (INVALID_HANDLE_VALUE == hFind){
// In case we cannot find it we will exit.
// Set the currentBuild number to 0;
//_tcscpy (id.szCurrentBuild, TEXT("latest"));
Idwlog(TEXT("Could not find the imagehlp.dll file in %s.\n"),szFullPath);
Idwlog(TEXT("Cannot get build number of the installing build.\n"));
return FALSE;
}
}
************/
Idwlog ( TEXT ( ">>>>> MyGetFileVersionInfo path = %s\n"), szFullPath );
if (FALSE == MyGetFileVersionInfo(szFullPath,&lpData)){
if(lpData) {
free(lpData);
}
Idwlog(TEXT("ERROR - GetFileVersionInfo failed to retrieve Version Info from: %s.\n"), szFullPath );
return FALSE;
}
else {
Idwlog ( TEXT ( "MyGetFileVersionInfo call OK.\n") );
}
/*****
Idwlog ( TEXT ( ">>>>> GetFileVersionInfoSize path = %s\n"), szFullPath );
uLen = GetFileVersionInfoSize ( szFullPath, &dwHandle );
if ( uLen == 0 ) {
Idwlog ( TEXT ( "GetFileVersionInfoSize ERROR, gle = %ld\n"), GetLastError() );
return FALSE;
}
else {
Idwlog ( TEXT ( "GetFileVersionInfoSize call OK returned uLen = %ld.\n"), uLen );
}
b = GetFileVersionInfo ( szFullPath,
dwHandle,
uLen,
&lpData );
if ( b == 0 ) {
Idwlog ( TEXT ( "GetFileVersionInfo ERROR, gle = %ld\n"), GetLastError() );
return FALSE;
}
else {
Idwlog ( TEXT ( "GetFileVersionInfo call OK.\n") );
}
*****/
b = VerQueryValue(lpData,
TEXT("\\VarFileInfo\\Translation"),
(LPVOID*)&pdwTranslation,
&uLen);
if( b == 0 ){
Idwlog ( TEXT("VerQueryValue ERROR (name does not exist or the specified resource is not valid) \\VarFileInfo\\Translation, assuming default language as: %08lx\n"), dwDefLang);
pdwTranslation = &dwDefLang;
}
else {
Idwlog ( TEXT("VerQueryValue call OK. The specified version-information structure exists, and version information is available.\n" ));
if ( uLen == 0 ) {
Idwlog ( TEXT("However, no value is available...\n") );
}
else {
Idwlog ( TEXT("A value is available, it's size is: %ld.\n"), uLen );
}
}
_stprintf(key, TEXT("\\StringFileInfo\\%04x%04x\\%s"),
LOWORD(*pdwTranslation),
HIWORD(*pdwTranslation),
TEXT("FileVersion"));
Idwlog ( TEXT ( "Just before 2nd VerQueryValue -- key = >>>%s<<< >>%x<<\n"), key, *pdwTranslation );
b = VerQueryValue(lpData, key, &lpInfo, &cch);
if( b ){
Idwlog(TEXT("Retrieved string: >>>%s<<<\n"), lpInfo );
// The output of this should be something like
// 5.0.2195. 30 (LAB01_N.000215-2216)
// we want the Lab part.
//
if (NULL == _tcsstr((LPTSTR)lpInfo,TEXT("(") )){
_stprintf(szBuildLocation,
TEXT("%s"),
TEXT("No_Build_Lab_Information"));
}else{
ptstr = _tcsstr((LPTSTR)lpInfo,TEXT("(") );
ptstr++;
_stprintf(szBuildLocation,TEXT("%s"),ptstr);
// remove the trailing ")"
//
szBuildLocation[_tcslen(szBuildLocation) -1 ] = 0;
}
}else{
DWORD i;
TCHAR * p = (TCHAR*)lpData;
TCHAR szNewString[2048];
DWORD dwAmount;
DWORD dwR;
Idwlog ( TEXT("VerQueryValue ERROR (name does not exist or the specified resource is not valid), gle = %ld\n"), GetLastError());
_stprintf(szBuildLocation,
TEXT("%s"),
TEXT("No_Build_Lab_Information"));
Idwlog(TEXT("Warning - Failed to get the build location in VerQueryValue.\n"));
Idwlog(TEXT("Will manually try to find the data...\n"));
// Let's try to find the data ourselves. We *must* do this on Win9x since Win9x doesn't know what
// to do with Unicode.
//
// We will be careful to stay away from end of the buffer. This should be cleaned up where the 26 values are
// with strlen.
//
for ( i = 0; i < (gdwLength - 26); i++, p++ ) {
//Idwlog ( TEXT("i = %ld, p = %s\n"), i, p );
//Idwlog ( TEXT ( "i = %ld, %x %c" ), i, *p, *p );
if ( *p == 'F' &&
*(p+2) == 'i' &&
*(p+4) == 'l' &&
*(p+6) == 'e' &&
*(p+8) == 'V' &&
*(p+10) == 'e' &&
*(p+12) == 'r' &&
*(p+14) == 's'
) {
Idwlog(TEXT(">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>We found FileVersion data by2...\n"));
p += 26; // to get past word "fileversion"
break;
}
/***
if ( _tcsstr ( p, TEXT("FileVersion")) ){
Idwlog(TEXT("We found FileVersion data...\n"));
break;
}
//Idwlog ( TEXT ( "i = %ld, %x %c" ), i, *p, *p );
***/
}
Idwlog ( TEXT ( "p = %s\n"), p );
Idwlog ( TEXT ( "%x %c" ), i, *p, *p );
Idwlog ( TEXT ( "%x %c" ), i, *(p+1), *(p+1) );
Idwlog ( TEXT ( "%x %c" ), i, *(p+2), *(p+2) );
dwR = WideCharToMultiByte ( CP_ACP,
WC_NO_BEST_FIT_CHARS,
(const unsigned short *)p,
-1,
szNewString,
2048,
NULL,
NULL );
if ( !dwR ) {
Idwlog ( TEXT("ERROR WideChartoMultiByte: dwR = %ld, gle = %ld\n"), dwR, GetLastError () );
}
else {
Idwlog ( TEXT("amount converted dwR = %ld, %s\n"), dwR, p = szNewString );
}
Idwlog(TEXT("Will print out data manually: %s\n"), p );
// The output of this should be something like
// 5.0.2195. 30 (LAB01_N.000215-2216)
// we want the Lab part.
//
if (NULL == _tcsstr((LPTSTR)p,TEXT("(") )){
_stprintf(szBuildLocation,
TEXT("%s"),
TEXT("No_Build_Lab_Information"));
Idwlog ( TEXT ( "Build lab ERROR - we could not find the build # and lab, even manually.\n") );
}else{
ptstr = _tcsstr((LPTSTR)p,TEXT("(") );
ptstr++;
_stprintf(szBuildLocation,TEXT("%s"),ptstr);
// remove the trailing ")"
//
szBuildLocation[_tcslen(szBuildLocation) -1 ] = 0;
Idwlog ( TEXT ( "Build lab found: %s.\n"), szBuildLocation );
}
}
/*********
if(VerQueryValue(lpData, key, &lpInfo, &cch)){
// The output of this should be something like
// 5.0.2195. 30 (LAB01_N.000215-2216)
// we want the Lab part.
//
if (NULL == _tcsstr((LPTSTR)lpInfo,TEXT("(") )){
_stprintf(szBuildLocation,
TEXT("%s"),
TEXT("No_Build_Lab_Information"));
}else{
ptstr = _tcsstr((LPTSTR)lpInfo,TEXT("(") );
ptstr++;
_stprintf(szBuildLocation,TEXT("%s"),ptstr);
// remove the trailing ")"
szBuildLocation[_tcslen(szBuildLocation) -1 ] = 0;
}
}else{
_stprintf(szBuildLocation,
TEXT("%s"),
TEXT("No_Build_Lab_Information"));
Idwlog(TEXT("ERROR - Failed to get the build location in VerQueryValue.\n"));
}
**************/
// This should retrieve the Major/Minor Version and build and build deltas
//
if (0 == VerQueryValue(lpData, "\\", (PVOID*) &pv, (UINT*) &dwTemp)) {
// We have a problem.
//_tcscpy (szBld, TEXT("latest"));
//
Idwlog(TEXT("ERROR VerQueryValue failed to retrieve Version Info from: %s\n"), szFullPath );
if(lpData)
free (lpData);
return FALSE;
}
Idwlog(TEXT("GetImageHlpDllInfo - pv->dwSignature = %x\n"), pv->dwSignature );
Idwlog(TEXT("GetImageHlpDllInfo - pv->dwFileVersionMS = %x\n"), pv->dwFileVersionMS );
Idwlog(TEXT("GetImageHlpDllInfo - pv->dwFileVersionLS = %x\n"), pv->dwFileVersionLS );
// Cast the pvoid into the correct memory arrangement
//
switch (iFlag){
case F_INSTALLING_IMAGEHLP_DLL:
Idwlog(TEXT("GetImageHlpDllInfo F_INSTALLING_IMAGEHLP_DLL - Inserting into struct Build, Delta, Build lab for the installing files.\n"));
// Build Location
_tcscpy( pId->szInstallingBuildSourceLocation,szBuildLocation);
// Major version X.51
pId->dwInstallingMajorVersion = HIWORD(pv->dwFileVersionMS);
// Minor version 5.XX
pId->dwInstallingMinorVersion = LOWORD(pv->dwFileVersionMS);
// Build
pId->dwInstallingBuild = HIWORD(pv->dwFileVersionLS);
// Build Delta.
pId->dwInstallingBuildDelta = LOWORD(pv->dwFileVersionLS);
pId->dwInstallingSPBuild = LOWORD(pv->dwFileVersionLS);
Idwlog(TEXT("GetImageHlpDllInfo F_INSTALLING_IMAGEHLP_DLL - Build = %ld, Major = %ld, Minor = %ld, Delta = %ld\n"),
pId->dwInstallingBuild,
pId->dwInstallingMajorVersion,
pId->dwInstallingMinorVersion,
pId->dwInstallingBuildDelta
);
break;
case F_SYSTEM_IMAGEHLP_DLL:
// Get the local systems location of the imagehlp.dll
Idwlog(TEXT("GetImageHlpDllInfo F_SYSTEM_IMAGEHLP_DLL - Inserting into struct Build, Delta, Build lab for the local system.\n"));
// Build Location
_tcscpy( pId->szSystemBuildSourceLocation,szBuildLocation);
// Major version X.51
pId->dwSystemMajorVersion = HIWORD(pv->dwFileVersionMS);
// Minor version 5.XX
pId->dwSystemMinorVersion = LOWORD(pv->dwFileVersionMS);
// Build
pId->dwSystemBuild = HIWORD(pv->dwFileVersionLS);
// Build Delta.
pId->dwSystemBuildDelta = LOWORD(pv->dwFileVersionLS);
pId->dwSystemSPBuild = LOWORD(pv->dwFileVersionLS);
Idwlog(TEXT("GetImageHlpDllInfo F_SYSTEM_IMAGEHLP_DLL - Build = %ld, Major = %ld, Minor = %ld, Delta = %ld\n"),
pId->dwSystemBuild,
pId->dwSystemMajorVersion,
pId->dwSystemMinorVersion,
pId->dwSystemBuildDelta
);
break;
}
// The MyGetFileVersion allocates its own memory.
if(lpData)
free (lpData);
return TRUE;
}
typedef struct tagVERHEAD {
WORD wTotLen;
WORD wValLen;
WORD wType; /* always 0 */
WCHAR szKey[(sizeof("VS_VERSION_INFO")+3)&~03];
VS_FIXEDFILEINFO vsf;
} VERHEAD ;
/*
Used from Filever.c wallyho. For some reason regular calls fail easier to just reuse this code
* [alanau]
*
* MyGetFileVersionInfo: Maps a file directly without using LoadLibrary. This ensures
* that the right version of the file is examined without regard to where the loaded image
* is. Since this is a local function, it allocates the memory which is freed by the caller.
* This makes it slightly more efficient than a GetFileVersionInfoSize/GetFileVersionInfo pair.
*/
BOOL
MyGetFileVersionInfo(LPTSTR lpszFilename, LPVOID *lpVersionInfo)
{
VS_FIXEDFILEINFO *pvsFFI = NULL;
UINT uiBytes = 0;
HINSTANCE hinst;
HRSRC hVerRes;
HANDLE FileHandle = NULL;
HANDLE MappingHandle = NULL;
LPVOID DllBase = NULL;
VERHEAD *pVerHead;
BOOL bResult = FALSE;
DWORD dwHandle;
DWORD dwLength;
Idwlog ( TEXT ( "Entering MyGetFileVersionInfo.\n") );
if (!lpVersionInfo) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR lpVersionInfo not.\n") );
return FALSE;
}
*lpVersionInfo = NULL;
FileHandle = CreateFile( lpszFilename,
GENERIC_READ,
FILE_SHARE_READ,
NULL,
OPEN_EXISTING,
0,
NULL
);
if (FileHandle == INVALID_HANDLE_VALUE) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR INVALID_HANDLE.\n") );
goto Cleanup;
}
MappingHandle = CreateFileMapping( FileHandle,
NULL,
PAGE_READONLY,
0,
0,
NULL
);
if (MappingHandle == NULL) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR MappingHandle == NULL.\n") );
goto Cleanup;
}
DllBase = MapViewOfFileEx( MappingHandle,
FILE_MAP_READ,
0,
0,
0,
NULL
);
if (DllBase == NULL) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR DllBase == NULL.\n") );
goto Cleanup;
}
hinst = (HMODULE)((ULONG_PTR)DllBase | 0x00000001);
__try {
hVerRes = FindResource(hinst, MAKEINTRESOURCE(VS_VERSION_INFO), VS_FILE_INFO);
if (hVerRes == NULL)
{
// Probably a 16-bit file. Fall back to system APIs.
if(!(dwLength = GetFileVersionInfoSize(lpszFilename, &dwHandle)))
{
if(!GetLastError()) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR resource not found.\n") );
SetLastError(ERROR_RESOURCE_DATA_NOT_FOUND);
}
__leave;
}
if(!(*lpVersionInfo = malloc( dwLength) ) ) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR could not malloc.\n") );
__leave;
}
else {
Idwlog ( TEXT ( "MyGetFileVersionInfo: malloc size was: %ld.\n"), gdwLength = dwLength );
}
if(!GetFileVersionInfo(lpszFilename, 0, dwLength, *lpVersionInfo)) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR GetFileVersionInfo failed.\n") );
__leave;
}
bResult = TRUE;
Idwlog ( TEXT ( "MyGetFileVersionInfo: result is true.\n") );
__leave;
}
pVerHead = (VERHEAD*)LoadResource(hinst, hVerRes);
if (pVerHead == NULL) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR pVerHead == NULL.\n") );
__leave;
}
*lpVersionInfo = malloc(pVerHead->wTotLen + pVerHead->wTotLen/2);
if (*lpVersionInfo == NULL) {
Idwlog ( TEXT ( "MyGetFileVersionInfo: ERROR *lpVersionInfo == NULL.\n") );
__leave;
}
memcpy(*lpVersionInfo, (PVOID)pVerHead, gdwLength = pVerHead->wTotLen);
bResult = TRUE;
Idwlog ( TEXT ( "MyGetFileVersionInfo: bResult == TRUE.\n") );
} __except (EXCEPTION_EXECUTE_HANDLER) {
Idwlog(TEXT("MyGetFileVersionIfno ERROR - Memory problems failed to retrieve version Info from image file of the installing build.\n"));
}
Cleanup:
if (FileHandle)
CloseHandle(FileHandle);
if (MappingHandle)
CloseHandle(MappingHandle);
if (DllBase)
UnmapViewOfFile(DllBase);
if (*lpVersionInfo && bResult == FALSE)
free(*lpVersionInfo);
Idwlog ( TEXT ( "Exiting MyGetFileVersionInfo: bResult = %ld.\n"), bResult );
return bResult;
}
BOOL
GetSkuFromDosNetInf (IN OUT LPINSTALL_DATA pId)
/*++
Routine Description:
This will retrieve the values from Miscellaneous that tell us
if the build is a personal, enterprise, etc...
This will then load the value into the pId field of dwSku.
Arguments:
A install_data struct which contains all the recording variables necessary.
Return Value:
TRUE if success
FALSE if fail
--*/
{
WIN32_FIND_DATA fd;
HANDLE hFind;
TCHAR szFullPath [ MAX_PATH ];
TCHAR szCurDir [ MAX_PATH ];//
LPTSTR ptstr;
// OSVERSIONINFO osex;
DWORD dwLength = MAX_PATH;
// DWORD dwBuild;
// DWORD dwBuildDelta;
TCHAR szSku[5] = "ERR";
// DWORD dwDontCare;
TCHAR * p = NULL;
TCHAR szTmp[MAX_PATH];
ptstr = szTmp;
// Get the installing files location of the dosnet.inf file
/****
szCurDir[0] = TEXT('\0');
GetModuleFileName( NULL,szCurDir, dwLength);
// Remove the Idwlog.exe part and get only the directory structure.
ptstr = szCurDir + _tcsclen(szCurDir);
while (*ptstr-- != TEXT('\\'));
ptstr++;
*ptstr = TEXT('\0');
Idwlog(TEXT("Getting DosNet.inf file location as %s.\n"), szCurDir);
****/
p = _tcsstr (GetCommandLine(), TEXT("Path="));
if ( p == NULL ) {
Idwlog ( TEXT ( "GetSkuFromDosNetInf ERROR - Could not determine path from command line, you need a Path=<path to the installing build> with trailing slash.\n") );
pId->dwSku = 666;
return(FALSE);
}
p += _tcsclen ( TEXT ("Path=" ) );
Idwlog(TEXT("Source path = %s\n"), p );
// Use this to get the location
// idwlog.exe -1 is run from. This tool
// will always assume the dosnet.inf is in its
// current path or two up.
_stprintf (szFullPath, TEXT("%s\\dosnet.inf"),p);
Idwlog(TEXT("Will attempt to open to get ProductType in szFullPath = %s.\n"), szFullPath);
GetPrivateProfileString(TEXT("Miscellaneous"),
TEXT("ProductType"),
TEXT("0"),
szSku,
sizeof(szSku)/sizeof(TCHAR),
szFullPath);
// Check to see if there was an error in the above call getting the value.
// If so, default to Professional for the value, but return.
//
if ( _tcsstr (szSku, TEXT("ERR")) ) {
pId->dwSku = 0;
Idwlog ( TEXT ( "ERROR - GetSkuFromDosNetInf GetPrivateProfileString FAILed. Will return pid->dwSku = %d\n"), pId->dwSku );
return(FALSE);
}
/*
case 0: // Professional
case 1: // Server
case 2: // Advanced Server
case 3: // DataCenter
case 4: // Personal
case 5: // Blade Server
case 6: // Small Business Server
default: // Professional
*/
*ptstr = TEXT('\0');
pId->dwSku = _tcstoul(szSku, &ptstr, 10);
if(pId->dwSku > 6){
// default to Professional
Idwlog ( TEXT ( "ERROR - found an unknown ProductType in dosnet.inf pid->dwSku = %d\n"), pId->dwSku );
pId->dwSku = 0;
return(FALSE);
}
Idwlog ( TEXT ( "We found the following product type: %d\n"), pId->dwSku );
return TRUE;
}