|
|
//+-------------------------------------------------------------------------
//
// Microsoft Windows
// Copyright (C) Microsoft Corporation, 1995
//
// File: dclassInfo.cxx
//
// Contents: Display registry class information
//
// Functions: classInfoHelp
// displayclassInfo
//
//
// History: 06-01-95 BruceMa Created
//
//
//--------------------------------------------------------------------------
// DOLATERIFEVER: Add threading model flags
#include <ole2int.h>
#include <windows.h>
#include "ole.h"
#include "dinfolvl.h"
#include "debnot.h"
BOOL ScanCLSID(char *szClsid, CLSID *pClsid);void FormatCLSID(REFGUID rguid, LPSTR lpsz);
static void GetSomeClsidValues(HKEY hKey, char *szName, char *szInprocHandler, char *szInprocHandler32, char *szInprocServer, char *szInprocServer32, char *szLocalServer, char *szLocalServer32, char *szProgid, char *szTreatAs, char *szAutoConvertTo, char *szOle1Class);
static void DisplayValues(PNTSD_EXTENSION_APIS lpExtensionApis, char *szName, char *szInprocHandler, char *szInprocHandler32, char *szInprocServer, char *szInprocServer32, char *szLocalServer, char *szLocalServer32, char *szProgid, char *szTreatAs, char *szAutoConvertTo, char *szOle1Class);
static void MungePath(char *szPath);
static DWORD dwRESERVED = 0;
//+-------------------------------------------------------------------------
//
// Function: classInfoHelp
//
// Synopsis: Display a menu for the command 'id'
//
// Arguments: -
//
// Returns: -
//
// History: 07-Mar-95 BruceMa Created
//
//--------------------------------------------------------------------------
void classInfoHelp(PNTSD_EXTENSION_APIS lpExtensionApis){ Printf("ci - Display registry class information\n"); Printf("ci clsid - Display registry class information for clsid\n");
}
//+-------------------------------------------------------------------------
//
// Function: displayclassInfo
//
// Synopsis: Display/set debug info levels
//
// Arguments: [hProcess] - Handle of this process
// [lpExtensionApis] - Table of extension functions
// [CLSID *] - Get info for this clsid
//
// Returns: -
//
// History: 07-Mar-95 BruceMa Created
//
//--------------------------------------------------------------------------
BOOL displayClassInfo(HANDLE hProcess, PNTSD_EXTENSION_APIS lpExtensionApis, CLSID *pClsid){ HKEY hKey; char szCLSID[CLSIDSTR_MAX]; char szClsid[5 + 1 + CLSIDSTR_MAX]; char szName[64]; char szInprocHandler[64]; char szInprocHandler32[64]; char szInprocServer[64]; char szInprocServer32[64]; char szLocalServer[64]; char szLocalServer32[64]; char szProgid[64]; char szTreatAs[64]; char szAutoConvertTo[64]; char szOle1Class[64];
// Information for a specific clsid?
if (pClsid) { // Prepare to open the "...CLSID\<clsid>" key
FormatCLSID(*pClsid, szCLSID); lstrcpy(szClsid, "CLSID\\"); lstrcat(szClsid, szCLSID);
// Open the key for the specified clsid
if (RegOpenKeyEx(HKEY_CLASSES_ROOT, szClsid, dwRESERVED, KEY_READ, &hKey) != ERROR_SUCCESS) { return FALSE; }
// Read interesting values for this clsid
GetSomeClsidValues(hKey, szName, szInprocHandler, szInprocHandler32, szInprocServer, szInprocServer32, szLocalServer, szLocalServer32, szProgid, szTreatAs, szAutoConvertTo, szOle1Class);
// Only display "interesting" entries
if ((szInprocHandler[0] && _stricmp(szInprocHandler, "ole2.dll") != 0) || (szInprocHandler32[0] && _stricmp(szInprocHandler32, "ole32.dll") != 0) || (szInprocServer[0] && _stricmp(szInprocServer, "ole2.dll") != 0) || (szInprocServer32[0] && _stricmp(szInprocServer32, "ole32.dll") != 0) || szLocalServer[0] || szLocalServer32[0] || szTreatAs[0] || szAutoConvertTo[0]) { // Display them
DisplayValues(lpExtensionApis, szName, szInprocHandler, szInprocHandler32, szInprocServer, szInprocServer32, szLocalServer, szLocalServer32, szProgid, szTreatAs, szAutoConvertTo, szOle1Class); }
// Close registry handle and return success
CloseHandle(hKey); return TRUE; }
// Else display all of them
else { HKEY hKey2; DWORD dwErr; DWORD cbSubKey = 0; char szClsid[64]; DWORD cbClsid; DWORD cbClass; FILETIME sLastWrite;
// Open the key for the root "CLSID"
if (RegOpenKeyEx(HKEY_CLASSES_ROOT, "CLSID", dwRESERVED, KEY_ENUMERATE_SUB_KEYS, &hKey) != ERROR_SUCCESS) { return FALSE; }
// Enumerate over the keys under "HKEY_CLASSES_ROOT\CLSID"
do { // Enumerate the next subkey
cbClsid = 64; dwErr = RegEnumKeyEx(hKey, cbSubKey, szClsid, &cbClsid, NULL, NULL, NULL, &sLastWrite);
// Prepare for next subkey
cbSubKey++;
// If it does look like a clsid, skip it
CLSID clsid;
if (!ScanCLSID(szClsid, &clsid)) { continue; }
// Open this clsid key
if (RegOpenKeyEx(hKey, szClsid, dwRESERVED, KEY_READ, &hKey2) != ERROR_SUCCESS) { return FALSE; }
// Get the interesting values
GetSomeClsidValues(hKey2, szName, szInprocHandler, szInprocHandler32, szInprocServer, szInprocServer32, szLocalServer, szLocalServer32, szProgid, szTreatAs, szAutoConvertTo, szOle1Class);
// Only display "interesting" entries
if ((szInprocHandler[0] && _stricmp(szInprocHandler, "ole2.dll") != 0) || (szInprocHandler32[0] && _stricmp(szInprocHandler32, "ole32.dll") != 0) || (szInprocServer[0] && _stricmp(szInprocServer, "ole2.dll") != 0) || (szInprocServer32[0] && _stricmp(szInprocServer32, "ole32.dll") != 0) || szLocalServer[0] || szLocalServer32[0] || szTreatAs[0] || szAutoConvertTo[0]) { // Display the clsid
Printf("%s ", szClsid);
// Display its values
DisplayValues(lpExtensionApis, szName, szInprocHandler, szInprocHandler32, szInprocServer, szInprocServer32, szLocalServer, szLocalServer32, szProgid, szTreatAs, szAutoConvertTo, szOle1Class); }
// Close registry handle
CloseHandle(hKey2);
} until_(dwErr == ERROR_NO_MORE_ITEMS || dwErr != ERROR_SUCCESS);
// Close clsid registry handle
CloseHandle(hKey);
return TRUE; }}
//+-------------------------------------------------------------------------
//
// Function: GetSomeClsidValues
//
// Synopsis: Given an open registry key to a clsid, read some of
// the more interesting subkey values
//
// Arguments: [hkey] Open registry key
// [szName] Where to store the name
// [szInprocHandler] Where to store the InprocHandler
// [szInprocHandler32] Where to store the InprocHandler32
// [szInprocServer] Where to store the InprocServer
// [szInprocServer32] Where to store the InprocServer32
// [szLocalServer] Where to store the LocalServer
// [szLocalServer32] Where to store the LocalServer32
// [ProgId] Where to store the ProgId
// [TreatAs] Where to store the TreatAs
// [AutoConvertTo] Where to store the AutoConvertTo
// [Ole1Class] Where to store the Ole1Class
//
// Returns: -
//
// History: 01-Jun-95 BruceMa Created
//
//--------------------------------------------------------------------------
static void GetSomeClsidValues(HKEY hKey, char *szName, char *szInprocHandler, char *szInprocHandler32, char *szInprocServer, char *szInprocServer32, char *szLocalServer, char *szLocalServer32, char *szProgId, char *szTreatAs, char *szAutoConvertTo, char *szOle1Class){ DWORD dwRESERVED = 0; HKEY hKey2; DWORD dwValueType; DWORD cbValue;
// Initialize
szName[0] = '\0'; szInprocHandler[0] = '\0'; szInprocHandler32[0] = '\0'; szInprocServer[0] = '\0'; szInprocServer32[0] = '\0'; szLocalServer[0] = '\0'; szLocalServer32[0] = '\0'; szProgId[0] = '\0'; szTreatAs[0] = '\0'; szAutoConvertTo[0] = '\0'; szOle1Class[0] = '\0';
// Name
cbValue = 64; if (RegQueryValueEx(hKey, NULL, NULL, &dwValueType, (LPBYTE) szName, &cbValue) != ERROR_SUCCESS) { return; }
// InprocHandler
if (RegOpenKeyEx(hKey, "InprocHandler", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szInprocHandler, &cbValue); MungePath(szInprocHandler); CloseHandle(hKey2); }
// InprocHandler32
if (RegOpenKeyEx(hKey, "InprocHandler32", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szInprocHandler32, &cbValue); MungePath(szInprocHandler32); CloseHandle(hKey2); }
// InprocServer
if (RegOpenKeyEx(hKey, "InprocServer", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szInprocServer, &cbValue); MungePath(szInprocServer); CloseHandle(hKey2); }
// InprocServer32
if (RegOpenKeyEx(hKey, "InprocServer32", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szInprocServer32, &cbValue); MungePath(szInprocServer32); CloseHandle(hKey2); }
// LocalServer
if (RegOpenKeyEx(hKey, "LocalServer", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szLocalServer, &cbValue); MungePath(szLocalServer); CloseHandle(hKey2); }
// LocalServer32
if (RegOpenKeyEx(hKey, "LocalServer32", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szLocalServer32, &cbValue); MungePath(szLocalServer32); CloseHandle(hKey2); }
// ProgId
if (RegOpenKeyEx(hKey, "ProgId", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szProgId, &cbValue); CloseHandle(hKey2); }
// TreatAs
if (RegOpenKeyEx(hKey, "TreatAs", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szTreatAs, &cbValue); CloseHandle(hKey2); }
// AutoConvertTo
if (RegOpenKeyEx(hKey, "AutoConvertTo", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { cbValue = 64; RegQueryValueEx(hKey2, NULL, NULL, &dwValueType, (LPBYTE) szAutoConvertTo, &cbValue); CloseHandle(hKey2); }
// Ole1Class
if (RegOpenKeyEx(hKey, "Ole1Class", dwRESERVED, KEY_READ, &hKey2) == ERROR_SUCCESS) { szOle1Class[0] = '1'; CloseHandle(hKey2); }}
//+-------------------------------------------------------------------------
//
// Function: DisplayValues
//
// Synopsis: Display the values read above
//
// Arguments: [hkey] Open registry key
// [szName] Where to store the name
// [szInprocHandler] Where to store the InprocHandler
// [szInprocHandler32] Where to store the InprocHandler32
// [szInprocServer] Where to store the InprocServer
// [szInprocServer32] Where to store the InprocServer32
// [szLocalServer] Where to store the LocalServer
// [szLocalServer32] Where to store the LocalServer32
// [ProgId] Where to store the ProgId
// [TreatAs] Where to store the TreatAs
// [AutoConvertTo] Where to store the AutoConvertTo
// [Ole1Class] Where to store the Ole1Class
//
// Returns: -
//
// History: 01-Jun-95 BruceMa Created
//
//--------------------------------------------------------------------------
static void DisplayValues(PNTSD_EXTENSION_APIS lpExtensionApis, char *szName, char *szInprocHandler, char *szInprocHandler32, char *szInprocServer, char *szInprocServer32, char *szLocalServer, char *szLocalServer32, char *szProgId, char *szTreatAs, char *szAutoConvertTo, char *szOle1Class)
{ // Display the name
Printf("%s ", szName);
// Display ProgId (if unique)
if (szProgId[0] && lstrcmp(szProgId, szName) != 0) { Printf("%s ", szProgId); }
// Display the server executable
if (szLocalServer[0]) { Printf("%s ", szLocalServer32); } else if (szInprocServer32[0]) { Printf("%s ", szInprocServer32); } else if (szLocalServer[0]) { Printf("%s(16) ", szLocalServer); } else if (szInprocServer[0]) { Printf("%s(16) ", szInprocServer); }
// Display handler information
if (szInprocHandler32[0] && _stricmp(szInprocHandler32, "ole32.dll") != 0) { Printf("Hndlr: %s ", szInprocHandler32); } else if (szInprocHandler[0] && _stricmp(szInprocHandler, "ole2.dll") != 0) { Printf("Hndlr: %s(16) ", szInprocHandler); }
// Display any TreatAs or AutoConvertTo information
if (szTreatAs[0]) { Printf("TA: %s", szTreatAs); } if (szAutoConvertTo[0]) { Printf("ACT: %s", szAutoConvertTo); }
// Check if this is an ole1 class
if (szOle1Class[0]) { Printf("ole1 class"); }
// We're done
Printf("\n");}
//+-------------------------------------------------------------------------
//
// Function: MungePath
//
// Synopsis: Remove directory components from a file path
//
// Arguments: [szPath] Path to munge
//
// Returns: -
//
// History: 01-Jun-95 BruceMa Created
//
//--------------------------------------------------------------------------
static void MungePath(char *szPath){ int cbLen = lstrlen(szPath); DWORD cbPath;
for (cbPath = cbLen; cbPath > 0 && szPath[cbPath] != '\\'; cbPath--) { } if (cbPath > 0) { lstrcpy(szPath, &szPath[cbPath + 1]); }}
|
