开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 查看源码
MODULE.C
资源名称：MSDN_VC98.zip　[点击查看]
上传用户：bangxh
上传日期：2007-01-31
资源大小：42235k
文件大小：3k
源码类别：

Windows编程

开发平台：

Visual C++

MODULE.C：源码内容
  1. /*++
  3. Copyright (c) 1993  Microsoft Corporation
  5. Module Name:
  7.     module.c
  9. Abstract:
  11.     This file implements the module load debug events.
  13. Author:
  15.     Wesley Witt (wesw) 1-May-1993
  17. Environment:
  19.     User Mode
  21. --*/
  23. #include <windows.h>
  24. #include <stdlib.h>
  25. #include <stdio.h>
  26. #include <string.h>
  28. #include "drwatson.h"
  29. #include "proto.h"
  30. #include "messages.h"
  32. //
  33. // defines for symbol (.dbg) file searching
  34. //
  35. #define SYMBOL_PATH             "_NT_SYMBOL_PATH"
  36. #define ALTERNATE_SYMBOL_PATH   "_NT_ALT_SYMBOL_PATH"
  37. char szApp[MAX_PATH];
  39. //
  40. // local prototypes
  41. //
  42. LPSTR GetSymbolSearchPath( void );
  46. BOOL
  47. ProcessModuleLoad ( PDEBUGPACKET dp, LPDEBUG_EVENT de )
  49. /*++
  51. Routine Description:
  53.     Process all module load debug events, create process & dll load.
  54.     The purpose is to allocate a MODULEINFO structure, fill in the
  55.     necessary values, and load the symbol table.
  57. Arguments:
  59.     dp      - pointer to a debug packet
  60.     de      - pointer to a debug event structure
  62. Return Value:
  64.     TRUE    - everything worked
  65.     FALSE   - we're hosed
  67. --*/
  69. {
  70.     HANDLE      hFile;
  71.     DWORD       dwBaseOfImage;
  72.     LPSTR       SymbolPath;
  74.     if (de->dwDebugEventCode == CREATE_PROCESS_DEBUG_EVENT) {
  75.         hFile = de->u.CreateProcessInfo.hFile;
  76.         dwBaseOfImage = (DWORD)de->u.CreateProcessInfo.lpBaseOfImage;
  77.         dp->hProcess = de->u.CreateProcessInfo.hProcess;
  78.         dp->dwProcessId = de->dwProcessId;
  79.         SymInitialize( dp->hProcess, NULL, FALSE );
  80.         SymbolPath = GetSymbolSearchPath();
  81.         SymSetSearchPath( dp->hProcess, SymbolPath );
  82.         free( SymbolPath );
  83.     } else if (de->dwDebugEventCode == LOAD_DLL_DEBUG_EVENT) {
  84.         hFile = de->u.LoadDll.hFile;
  85.         dwBaseOfImage = (DWORD)de->u.LoadDll.lpBaseOfDll;
  86.     }
  88.     if ((hFile == NULL) || (hFile == INVALID_HANDLE_VALUE)) {
  89.         return FALSE;
  90.     }
  92.     if (!SymLoadModule( dp->hProcess, hFile, NULL, NULL, dwBaseOfImage, 0 )) {
  93.         return FALSE;
  94.     } else {
  95.         if (de->dwDebugEventCode == CREATE_PROCESS_DEBUG_EVENT) {
  96.             IMAGEHLP_MODULE   mi;
  97.             if (SymGetModuleInfo( dp->hProcess, dwBaseOfImage, &mi )) {
  98.                 strcpy( szApp, mi.ImageName );
  99.             }
  100.         }
  101.     }
  103.     return TRUE;
  104. }
  107. LPSTR
  108. GetSymbolSearchPath( void )
  110. /*++
  112. Routine Description:
  114.     Gets the search path to be used for locating a .DBG file.
  116. Arguments:
  118.     None.
  120. Return Value:
  122.     pointer to the path string
  124. --*/
  126. {
  127.     LPSTR   lpSymPathEnv      = NULL;
  128.     LPSTR   lpAltSymPathEnv   = NULL;
  129.     LPSTR   lpSystemRootEnv   = NULL;
  130.     LPSTR   SymbolSearchPath  = NULL;
  131.     DWORD   cbSymPath         = 0;
  133.     cbSymPath = 16;
  134.     if (lpSymPathEnv = getenv(SYMBOL_PATH)) {
  135.         cbSymPath += strlen(lpSymPathEnv) + 1;
  136.     }
  137.     if (lpAltSymPathEnv = getenv(ALTERNATE_SYMBOL_PATH)) {
  138.         cbSymPath += strlen(lpAltSymPathEnv) + 1;
  139.     }
  140.     if (lpSystemRootEnv = getenv("SystemRoot")) {
  141.         cbSymPath += strlen(lpSystemRootEnv) + 1;
  142.     }
  144.     SymbolSearchPath = calloc(cbSymPath,1);
  146.     if (lpAltSymPathEnv) {
  147.         strcat(SymbolSearchPath,lpAltSymPathEnv);
  148.         strcat(SymbolSearchPath,";");
  149.     }
  150.     if (lpSymPathEnv) {
  151.         strcat(SymbolSearchPath,lpSymPathEnv);
  152.         strcat(SymbolSearchPath,";");
  153.     }
  154.     if (lpSystemRootEnv) {
  155.         strcat(SymbolSearchPath,lpSystemRootEnv);
  156.         strcat(SymbolSearchPath,";");
  157.     }
  158.     return SymbolSearchPath;
  159. }