First shot at implementing dbghelp.
[wine] / dlls / dbghelp / memory.c
1 /*
2  * File memory.c - managing memory
3  *
4  * Copyright (C) 2004, Eric Pouech
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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "config.h"
22
23 #include <assert.h>
24 #include "dbghelp_private.h"
25 #include "wine/debug.h"
26
27 WINE_DEFAULT_DEBUG_CHANNEL(dbghelp);
28
29 BOOL        win32_read_mem(HANDLE hProcess, DWORD addr, void* buf, DWORD len)
30 {
31     return ReadProcessMemory(hProcess, (void*)addr, buf, len, NULL);
32 }
33
34 BOOL        win32_write_mem(HANDLE hProcess, DWORD addr, void* buf, DWORD len)
35 {
36     return WriteProcessMemory(hProcess, (void*)addr, buf, len, NULL);
37 }
38
39 /* standard routines for reading / writing memory. Can be overriden for some
40  * minidump usage
41  */
42 struct memory_access mem_access = {win32_read_mem, win32_write_mem};
43
44 /******************************************************************
45  *              addr_to_linear
46  *
47  * converts an address into its linear value
48  */
49 unsigned long WINAPI addr_to_linear(HANDLE hProcess, HANDLE hThread, ADDRESS* addr)
50 {
51     LDT_ENTRY   le;
52
53     switch (addr->Mode)
54     {
55     case AddrMode1616:
56         if (GetThreadSelectorEntry(hThread, addr->Segment, &le))
57             return (le.HighWord.Bits.BaseHi << 24) + 
58                 (le.HighWord.Bits.BaseMid << 16) + le.BaseLow + LOWORD(addr->Offset);
59         break;
60     case AddrMode1632:
61         if (GetThreadSelectorEntry(hThread, addr->Segment, &le))
62             return (le.HighWord.Bits.BaseHi << 24) + 
63                 (le.HighWord.Bits.BaseMid << 16) + le.BaseLow + addr->Offset;
64         break;
65     case AddrModeReal:
66         return (DWORD)(LOWORD(addr->Segment) << 4) + addr->Offset;
67     case AddrModeFlat:
68         return addr->Offset;
69     default:
70         FIXME("Unsupported (yet) mode (%x)\n", addr->Mode);
71         return 0;
72     }
73     FIXME("Failed to linearize address %04x:%08lx (mode %x)\n",
74           addr->Segment, addr->Offset, addr->Mode);
75     return 0;
76 }