programs/winedbg/tgt_module.c

   1 /*
   2  * Wine debugger - loading a module for debug purposes
   3  *
   4  * Copyright 2006 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdlib.h>
  24 #include <stdio.h>
  25 #include <string.h>
  26 #include <stdarg.h>
  27
  28 #include "debugger.h"
  29
  30
  31 static struct be_process_io be_process_module_io;
  32
  33 static BOOL tgt_process_module_read(HANDLE hProcess, const void* addr,
  34                                     void* buffer, SIZE_T len, SIZE_T* rlen)
  35 {
  36     return FALSE;
  37 }
  38
  39 static BOOL tgt_process_module_write(HANDLE hProcess, void* addr,
  40                                      const void* buffer, SIZE_T len, SIZE_T* wlen)
  41 {
  42     return FALSE;
  43 }
  44
  45 enum dbg_start tgt_module_load(const char* name, BOOL keep)
  46 {
  47     DWORD opts = SymGetOptions();
  48     BOOL native;
  49     HANDLE hDummy = (HANDLE)0x87654321;
  50     enum dbg_start ret = start_ok;
  51     WCHAR* nameW;
  52     unsigned len;
  53
  54     SymSetOptions((opts & ~(SYMOPT_UNDNAME|SYMOPT_DEFERRED_LOADS)) |
  55                   SYMOPT_LOAD_LINES | SYMOPT_AUTO_PUBLICS);
  56     native = SymSetExtendedOption(SYMOPT_EX_WINE_NATIVE_MODULES, TRUE);
  57     if (!dbg_init(hDummy, NULL, FALSE))
  58         return start_error_init;
  59     len = MultiByteToWideChar(CP_ACP, 0, name, -1, NULL, 0);
  60     nameW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
  61     if (!nameW)
  62     {
  63         ret = start_error_init;
  64         keep = FALSE;
  65     }
  66     else
  67     {
  68         len = MultiByteToWideChar(CP_ACP, 0, name, -1, nameW, len);
  69         if (!dbg_load_module(hDummy, NULL, nameW, 0, 0))
  70         {
  71             ret = start_error_init;
  72             keep = FALSE;
  73         }
  74         HeapFree(GetProcessHeap(), 0, nameW);
  75     }
  76
  77     if (keep)
  78     {
  79         dbg_printf("Non supported mode... errors may occur\n"
  80                    "Use at your own risks\n");
  81         SymSetExtendedOption(SYMOPT_EX_WINE_NATIVE_MODULES, TRUE);
  82         dbg_curr_process = dbg_add_process(&be_process_module_io, 1, hDummy);
  83         dbg_curr_pid = 1;
  84         dbg_curr_thread = dbg_add_thread(dbg_curr_process, 2, NULL, NULL);
  85
  86         /* FIXME: missing thread creation, fetching frames, restoring dbghelp's options... */
  87     }
  88     else
  89     {
  90         SymCleanup(hDummy);
  91         SymSetOptions(opts);
  92         SymSetExtendedOption(SYMOPT_EX_WINE_NATIVE_MODULES, native);
  93     }
  94
  95     return ret;
  96 }
  97
  98 static BOOL tgt_process_module_close_process(struct dbg_process* pcs, BOOL kill)
  99 {
 100     SymCleanup(pcs->handle);
 101     dbg_del_process(pcs);
 102     return TRUE;
 103 }
 104
 105 static BOOL tgt_process_module_get_selector(HANDLE hThread, DWORD sel, LDT_ENTRY* le)
 106 {
 107     return FALSE;
 108 }
 109
 110 static struct be_process_io be_process_module_io =
 111 {
 112     tgt_process_module_close_process,
 113     tgt_process_module_read,
 114     tgt_process_module_write,
 115     tgt_process_module_get_selector,
 116 };