dll/win32/imagehlp/access.c

   1 /*
   2  *      IMAGEHLP library
   3  *
   4  *      Copyright 1998  Patrik Stridvall
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include <string.h>
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winnt.h"
  26 #include "winternl.h"
  27 #include "winerror.h"
  28 #include "wine/debug.h"
  29 #include "imagehlp.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(imagehlp);
  32
  33 /***********************************************************************
  34  *           Data
  35  */
  36 LIST_ENTRY image_list = { &image_list, &image_list };
  37
  38 DECLSPEC_HIDDEN extern HANDLE IMAGEHLP_hHeap;
  39
  40 /***********************************************************************
  41  *              GetImageConfigInformation (IMAGEHLP.@)
  42  */
  43 BOOL WINAPI GetImageConfigInformation(
  44   PLOADED_IMAGE LoadedImage,
  45   PIMAGE_LOAD_CONFIG_DIRECTORY ImageConfigInformation)
  46 {
  47   FIXME("(%p, %p): stub\n",
  48     LoadedImage, ImageConfigInformation
  49   );
  50   SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
  51   return FALSE;
  52 }
  53
  54 /***********************************************************************
  55  *              GetImageUnusedHeaderBytes (IMAGEHLP.@)
  56  */
  57 DWORD WINAPI GetImageUnusedHeaderBytes(
  58   PLOADED_IMAGE LoadedImage,
  59   LPDWORD SizeUnusedHeaderBytes)
  60 {
  61   FIXME("(%p, %p): stub\n",
  62     LoadedImage, SizeUnusedHeaderBytes
  63   );
  64   SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
  65   return 0;
  66 }
  67
  68 /***********************************************************************
  69  *              ImageLoad (IMAGEHLP.@)
  70  */
  71 PLOADED_IMAGE WINAPI ImageLoad(PCSTR dll_name, PCSTR dll_path)
  72 {
  73     LOADED_IMAGE *image;
  74
  75     TRACE("(%s, %s)\n", dll_name, dll_path);
  76
  77     image = HeapAlloc(IMAGEHLP_hHeap, 0, sizeof(*image));
  78     if (!image) return NULL;
  79
  80     if (!MapAndLoad(dll_name, dll_path, image, TRUE, TRUE))
  81     {
  82         HeapFree(IMAGEHLP_hHeap, 0, image);
  83         return NULL;
  84     }
  85
  86     image->Links.Flink = image_list.Flink;
  87     image->Links.Blink = &image_list;
  88     image_list.Flink->Blink = &image->Links;
  89     image_list.Flink = &image->Links;
  90
  91     return image;
  92 }
  93
  94 /***********************************************************************
  95  *              ImageUnload (IMAGEHLP.@)
  96  */
  97 BOOL WINAPI ImageUnload(PLOADED_IMAGE loaded_image)
  98 {
  99     LIST_ENTRY *entry, *mark;
 100     PLOADED_IMAGE image;
 101
 102     FIXME("(%p)\n", loaded_image);
 103
 104     if (!loaded_image)
 105     {
 106         /* No image loaded or null pointer */
 107         SetLastError(ERROR_INVALID_PARAMETER);
 108         return FALSE;
 109     }
 110
 111     /* FIXME: do we really need to check this? */
 112     mark = &image_list;
 113     for (entry = mark->Flink; entry != mark; entry = entry->Flink)
 114     {
 115         image = CONTAINING_RECORD(entry, LOADED_IMAGE, Links);
 116         if (image == loaded_image)
 117             break;
 118     }
 119
 120     if (entry == mark)
 121     {
 122         /* Not found */
 123         SetLastError(ERROR_INVALID_PARAMETER);
 124         return FALSE;
 125     }
 126
 127     entry->Blink->Flink = entry->Flink;
 128     entry->Flink->Blink = entry->Blink;
 129
 130     UnMapAndLoad(loaded_image);
 131     HeapFree(IMAGEHLP_hHeap, 0, loaded_image);
 132
 133     return TRUE;
 134 }
 135
 136 /***********************************************************************
 137  *              MapAndLoad (IMAGEHLP.@)
 138  */
 139 BOOL WINAPI MapAndLoad(PCSTR pszImageName, PCSTR pszDllPath, PLOADED_IMAGE pLoadedImage,
 140                        BOOL bDotDll, BOOL bReadOnly)
 141 {
 142     CHAR szFileName[MAX_PATH];
 143     HANDLE hFile = INVALID_HANDLE_VALUE;
 144     HANDLE hFileMapping = NULL;
 145     PVOID mapping = NULL;
 146     PIMAGE_NT_HEADERS pNtHeader = NULL;
 147
 148     TRACE("(%s, %s, %p, %d, %d)\n",
 149           pszImageName, pszDllPath, pLoadedImage, bDotDll, bReadOnly);
 150
 151     if (!SearchPathA(pszDllPath, pszImageName, bDotDll ? ".DLL" : ".EXE",
 152                      sizeof(szFileName), szFileName, NULL))
 153     {
 154         SetLastError(ERROR_FILE_NOT_FOUND);
 155         goto Error;
 156     }
 157
 158     hFile = CreateFileA(szFileName,
 159                         GENERIC_READ | (bReadOnly ? 0 : GENERIC_WRITE),
 160                         FILE_SHARE_READ,
 161                         NULL, OPEN_EXISTING, 0, NULL);
 162     if (hFile == INVALID_HANDLE_VALUE)
 163     {
 164         WARN("CreateFile: Error = %d\n", GetLastError());
 165         goto Error;
 166     }
 167
 168     hFileMapping = CreateFileMappingA(hFile, NULL,
 169                                       (bReadOnly ? PAGE_READONLY : PAGE_READWRITE) | SEC_COMMIT,
 170                                       0, 0, NULL);
 171     if (!hFileMapping)
 172     {
 173         WARN("CreateFileMapping: Error = %d\n", GetLastError());
 174         goto Error;
 175     }
 176
 177     mapping = MapViewOfFile(hFileMapping, bReadOnly ? FILE_MAP_READ : FILE_MAP_WRITE, 0, 0, 0);
 178     CloseHandle(hFileMapping);
 179     if (!mapping)
 180     {
 181         WARN("MapViewOfFile: Error = %d\n", GetLastError());
 182         goto Error;
 183     }
 184
 185     if (!(pNtHeader = RtlImageNtHeader(mapping)))
 186     {
 187         WARN("Not an NT header\n");
 188         UnmapViewOfFile(mapping);
 189         goto Error;
 190     }
 191
 192     pLoadedImage->ModuleName       = HeapAlloc(GetProcessHeap(), 0,
 193                                                strlen(szFileName) + 1);
 194     if (pLoadedImage->ModuleName) strcpy(pLoadedImage->ModuleName, szFileName);
 195     pLoadedImage->hFile            = hFile;
 196     pLoadedImage->MappedAddress    = mapping;
 197     pLoadedImage->FileHeader       = pNtHeader;
 198     pLoadedImage->Sections         = (PIMAGE_SECTION_HEADER)
 199         ((LPBYTE) &pNtHeader->OptionalHeader +
 200          pNtHeader->FileHeader.SizeOfOptionalHeader);
 201     pLoadedImage->NumberOfSections = pNtHeader->FileHeader.NumberOfSections;
 202     pLoadedImage->SizeOfImage      = GetFileSize(hFile, NULL);
 203     pLoadedImage->Characteristics  = pNtHeader->FileHeader.Characteristics;
 204     pLoadedImage->LastRvaSection   = pLoadedImage->Sections;
 205
 206     pLoadedImage->fSystemImage     = FALSE; /* FIXME */
 207     pLoadedImage->fDOSImage        = FALSE; /* FIXME */
 208
 209     pLoadedImage->Links.Flink      = &pLoadedImage->Links;
 210     pLoadedImage->Links.Blink      = &pLoadedImage->Links;
 211
 212     return TRUE;
 213
 214 Error:
 215     if (hFile != INVALID_HANDLE_VALUE) CloseHandle(hFile);
 216     return FALSE;
 217 }
 218
 219 /***********************************************************************
 220  *              SetImageConfigInformation (IMAGEHLP.@)
 221  */
 222 BOOL WINAPI SetImageConfigInformation(
 223   PLOADED_IMAGE LoadedImage,
 224   PIMAGE_LOAD_CONFIG_DIRECTORY ImageConfigInformation)
 225 {
 226   FIXME("(%p, %p): stub\n",
 227     LoadedImage, ImageConfigInformation
 228   );
 229   SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
 230   return FALSE;
 231 }
 232
 233 /***********************************************************************
 234  *              UnMapAndLoad (IMAGEHLP.@)
 235  */
 236 BOOL WINAPI UnMapAndLoad(PLOADED_IMAGE pLoadedImage)
 237 {
 238     HeapFree(GetProcessHeap(), 0, pLoadedImage->ModuleName);
 239     /* FIXME: MSDN states that a new checksum is computed and stored into the file */
 240     if (pLoadedImage->MappedAddress) UnmapViewOfFile(pLoadedImage->MappedAddress);
 241     if (pLoadedImage->hFile != INVALID_HANDLE_VALUE) CloseHandle(pLoadedImage->hFile);
 242     return TRUE;
 243 }