From: Christopher Faylor Date: Tue, 1 Nov 2005 05:08:29 +0000 (+0000) Subject: * win32-nat.c (get_relocated_section_addrs): Reinstate. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=3cb8e7f69cf29d2b1e994ef7790e58950636ab1d;p=binutils-gdb.git * win32-nat.c (get_relocated_section_addrs): Reinstate. (solib_symbols_add): New function. (lm_info): Remove end_addr field. (register_loaded_dll): Don't try to find end_addr since gdb will do this automatically now. Make so_original_name == so_name for now. Eliminate strcpy by using so_name directly. Read in symbols if new paramater "readsyms" is true. (handle_load_dll): Pass auto_solib_add to register_loaded_dll to control when symbols should be read. (win32_free_so): Don't free objfile here. (win32_create_inferior_hook): New function. (handle_unload_dll): Remove left-over cruft. (win32_special_symbol_handling): New (dummy) function. (map_single_dll_code_section): Reinstate. (dll_code_sections_add): Reinstate. (core_section_load_dll_symbols): Reinstate. Don't issue an error on duplicate attempts to read same dll. Make sure that UNIX-like name is used to register DLL. (win32_current_sos): Handle core files. Reset private list before passing start of list pointer to gdb. (init_win32_ops): Fill out (currently unused) solib_create_inferior_hook. Fill out special_symbol_handling. * config/i386/tm-cygwin.h: Remove most special solib stuff. --- diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 3ddddbcdda2..670a65683f8 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,29 @@ +2005-10-31 Christopher Faylor + + * win32-nat.c (get_relocated_section_addrs): Reinstate. + (solib_symbols_add): New function. + (lm_info): Remove end_addr field. + (register_loaded_dll): Don't try to find end_addr since gdb will do + this automatically now. Make so_original_name == so_name for now. + Eliminate strcpy by using so_name directly. Read in symbols if new + paramater "readsyms" is true. + (handle_load_dll): Pass auto_solib_add to register_loaded_dll to + control when symbols should be read. + (win32_free_so): Don't free objfile here. + (win32_create_inferior_hook): New function. + (handle_unload_dll): Remove left-over cruft. + (win32_special_symbol_handling): New (dummy) function. + (map_single_dll_code_section): Reinstate. + (dll_code_sections_add): Reinstate. + (core_section_load_dll_symbols): Reinstate. Don't issue an error on + duplicate attempts to read same dll. Make sure that UNIX-like name is + used to register DLL. + (win32_current_sos): Handle core files. Reset private list before + passing start of list pointer to gdb. + (init_win32_ops): Fill out (currently unused) + solib_create_inferior_hook. Fill out special_symbol_handling. + * config/i386/tm-cygwin.h: Remove most special solib stuff. + 2005-10-31 Christopher Faylor * win32-nat.c: Remove comment intended only for debugging. diff --git a/gdb/config/i386/tm-cygwin.h b/gdb/config/i386/tm-cygwin.h index 52ec2751261..48748cd0803 100644 --- a/gdb/config/i386/tm-cygwin.h +++ b/gdb/config/i386/tm-cygwin.h @@ -21,16 +21,5 @@ Boston, MA 02111-1307, USA. */ #define ATTACH_NO_WAIT -#define SOLIB_ADD(filename, from_tty, targ, readsyms) child_solib_add(filename, from_tty, targ, readsyms) -#define PC_SOLIB(addr) solib_address (addr) -#define SOLIB_LOADED_LIBRARY_PATHNAME(pid) child_solib_loaded_library_pathname(pid) -#define CLEAR_SOLIB child_clear_solibs #define ADD_SHARED_SYMBOL_FILES dll_symbol_command - -struct target_ops; -char *cygwin_pid_to_str (ptid_t ptid); -void child_solib_add (char *, int, struct target_ops *, int); -char *solib_address (CORE_ADDR); -char *child_solib_loaded_library_pathname(int); -void child_clear_solibs (void); void dll_symbol_command (char *, int); diff --git a/gdb/win32-nat.c b/gdb/win32-nat.c index d0384b190b9..b0dbfe953c3 100644 --- a/gdb/win32-nat.c +++ b/gdb/win32-nat.c @@ -54,6 +54,7 @@ #include #include "exec.h" #include "solist.h" +#include "solib.h" #include "i386-tdep.h" #include "i387-tdep.h" @@ -517,7 +518,6 @@ struct safe_symbol_file_add_args struct lm_info { DWORD load_addr; - DWORD end_addr; }; static struct so_list solib_start, *solib_end; @@ -577,14 +577,121 @@ safe_symbol_file_add (char *name, int from_tty, return p.ret; } +/* Get the loaded address of all sections, given that .text was loaded + at text_load. Assumes that all sections are subject to the same + relocation offset. Returns NULL if problems occur or if the + sections were not relocated. */ + +static struct section_addr_info * +get_relocated_section_addrs (bfd *abfd, CORE_ADDR text_load) +{ + struct section_addr_info *result = NULL; + int section_count = bfd_count_sections (abfd); + asection *text_section = bfd_get_section_by_name (abfd, ".text"); + CORE_ADDR text_vma; + + if (!text_section) + { + /* Couldn't get the .text section. Weird. */ + } + + else if (text_load == (text_vma = bfd_get_section_vma (abfd, text_section))) + { + /* DLL wasn't relocated. */ + } + + else + { + /* Figure out all sections' loaded addresses. The offset here is + such that taking a bfd_get_section_vma() result and adding + offset will give the real load address of the section. */ + + CORE_ADDR offset = text_load - text_vma; + + struct section_table *table_start = NULL; + struct section_table *table_end = NULL; + struct section_table *iter = NULL; + + build_section_table (abfd, &table_start, &table_end); + + for (iter = table_start; iter < table_end; ++iter) + { + /* Relocated addresses. */ + iter->addr += offset; + iter->endaddr += offset; + } + + result = build_section_addr_info_from_section_table (table_start, + table_end); + + xfree (table_start); + } + + return result; +} + +/* Add DLL symbol information. */ +static void +solib_symbols_add (struct so_list *so, CORE_ADDR load_addr) +{ + struct section_addr_info *addrs = NULL; + static struct objfile *result = NULL; + char *name = so->so_name; + bfd *abfd = NULL; + + /* The symbols in a dll are offset by 0x1000, which is the + the offset from 0 of the first byte in an image - because + of the file header and the section alignment. */ + + if (!name || !name[0]) + return; + + abfd = bfd_openr (name, "pei-i386"); + + if (!abfd) + { + /* pei failed - try pe */ + abfd = bfd_openr (name, "pe-i386"); + } + + if (abfd) + { + if (bfd_check_format (abfd, bfd_object)) + addrs = get_relocated_section_addrs (abfd, load_addr); + + bfd_close (abfd); + } + + if (addrs) + { + result = safe_symbol_file_add (name, 0, addrs, 0, OBJF_SHARED); + free_section_addr_info (addrs); + } + else + { + /* Fallback on handling just the .text section. */ + struct cleanup *my_cleanups; + + addrs = alloc_section_addr_info (1); + my_cleanups = make_cleanup (xfree, addrs); + addrs->other[0].name = ".text"; + addrs->other[0].addr = load_addr; + + result = safe_symbol_file_add (name, 0, addrs, 0, OBJF_SHARED); + do_cleanups (my_cleanups); + } + + so->symbols_loaded = !!result; + return; +} + /* Remember the maximum DLL length for printing in info dll command. */ static int max_dll_name_len; -static void -register_loaded_dll (const char *name, DWORD load_addr) +static char * +register_loaded_dll (const char *name, DWORD load_addr, int readsyms) { struct so_list *so; - char ppath[MAX_PATH + 1]; char buf[MAX_PATH + 1]; char cwd[MAX_PATH + 1]; char *p; @@ -615,25 +722,21 @@ register_loaded_dll (const char *name, DWORD load_addr) GetSystemDirectory (buf, sizeof (buf)); strcat (buf, "\\ntdll.dll"); } - cygwin_conv_to_posix_path (buf, ppath); - so = (struct so_list *) xmalloc (sizeof (struct so_list) + strlen (ppath) + 8 + 1); + so = (struct so_list *) xmalloc (sizeof (struct so_list)); memset (so, 0, sizeof (*so)); so->lm_info = (struct lm_info *) xmalloc (sizeof (struct lm_info)); so->lm_info->load_addr = load_addr; - if (VirtualQueryEx (current_process_handle, (void *) load_addr, &m, - sizeof (m))) - so->lm_info->end_addr = (DWORD) m.AllocationBase + m.RegionSize; - else - so->lm_info->end_addr = load_addr + 0x2000; /* completely arbitrary */ - - so->next = NULL; - strcpy (so->so_name, ppath); + cygwin_conv_to_posix_path (buf, so->so_name); + strcpy (so->so_original_name, so->so_name); solib_end->next = so; solib_end = so; - len = strlen (ppath); + len = strlen (so->so_name); if (len > max_dll_name_len) max_dll_name_len = len; + if (readsyms) + solib_symbols_add (so, (CORE_ADDR) load_addr); + return so->so_name; } static char * @@ -699,7 +802,7 @@ handle_load_dll (void *dummy) if (!dll_name) return 1; - register_loaded_dll (dll_name, (DWORD) event->lpBaseOfDll + 0x1000); + register_loaded_dll (dll_name, (DWORD) event->lpBaseOfDll + 0x1000, auto_solib_add); return 1; } @@ -707,18 +810,10 @@ handle_load_dll (void *dummy) static void win32_free_so (struct so_list *so) { - if (so->objfile) - free_objfile (so->objfile); if (so->lm_info) xfree (so->lm_info); } -static struct so_list * -win32_current_sos (void) -{ - return solib_start.next; -} - static void win32_relocate_section_addresses (struct so_list *so, struct section_table *sec) @@ -727,6 +822,13 @@ win32_relocate_section_addresses (struct so_list *so, return; } +static void +win32_solib_create_inferior_hook (void) +{ + solib_add (NULL, 0, NULL, auto_solib_add); + return; +} + static int handle_unload_dll (void *dummy) { @@ -752,13 +854,17 @@ handle_unload_dll (void *dummy) static void win32_clear_solib (void) { - struct so_list *so, *so1 = solib_start.next; - solib_start.next = NULL; solib_end = &solib_start; max_dll_name_len = sizeof ("DLL Name") - 1; } +static void +win32_special_symbol_handling (void) +{ + return; +} + /* Load DLL symbol info. */ void dll_symbol_command (char *args, int from_tty) @@ -1575,18 +1681,18 @@ win32_pid_to_exec_file (int pid) cygwin_internal (CW_LOCK_PINFO, 1000); for (cpid = 0; (pinfo = (struct external_pinfo *) - cygwin_internal (CW_GETPINFO, cpid | CW_NEXTPID)); + cygwin_internal (CW_GETPINFO, cpid | CW_NEXTPID)); cpid = pinfo->pid) { if (pinfo->dwProcessId == current_event.dwProcessId) /* Got it */ { - cygwin_conv_to_full_posix_path (pinfo->progname, path); - path_ptr = path; - break; + cygwin_conv_to_full_posix_path (pinfo->progname, path); + path_ptr = path; + break; } } cygwin_internal (CW_UNLOCK_PINFO); - return path_ptr; + return path_ptr; } /* Print status information about what we're accessing. */ @@ -1987,6 +2093,178 @@ cygwin_pid_to_str (ptid_t ptid) return buf; } +typedef struct +{ + struct target_ops *target; + bfd_vma addr; +} map_code_section_args; + +static void +map_single_dll_code_section (bfd *abfd, asection *sect, void *obj) +{ + int old; + int update_coreops; + struct section_table *new_target_sect_ptr; + + map_code_section_args *args = (map_code_section_args *) obj; + struct target_ops *target = args->target; + if (sect->flags & SEC_CODE) + { + update_coreops = core_ops.to_sections == target->to_sections; + + if (target->to_sections) + { + old = target->to_sections_end - target->to_sections; + target->to_sections = (struct section_table *) + xrealloc ((char *) target->to_sections, + (sizeof (struct section_table)) * (1 + old)); + } + else + { + old = 0; + target->to_sections = (struct section_table *) + xmalloc ((sizeof (struct section_table))); + } + target->to_sections_end = target->to_sections + (1 + old); + + /* Update the to_sections field in the core_ops structure + if needed. */ + if (update_coreops) + { + core_ops.to_sections = target->to_sections; + core_ops.to_sections_end = target->to_sections_end; + } + new_target_sect_ptr = target->to_sections + old; + new_target_sect_ptr->addr = args->addr + bfd_section_vma (abfd, sect); + new_target_sect_ptr->endaddr = args->addr + bfd_section_vma (abfd, sect) + + bfd_section_size (abfd, sect);; + new_target_sect_ptr->the_bfd_section = sect; + new_target_sect_ptr->bfd = abfd; + } +} + +static int +dll_code_sections_add (const char *dll_name, int base_addr, struct target_ops *target) +{ + bfd *dll_bfd; + map_code_section_args map_args; + asection *lowest_sect; + char *name; + if (dll_name == NULL || target == NULL) + return 0; + name = xstrdup (dll_name); + dll_bfd = bfd_openr (name, "pei-i386"); + if (dll_bfd == NULL) + return 0; + + if (bfd_check_format (dll_bfd, bfd_object)) + { + lowest_sect = bfd_get_section_by_name (dll_bfd, ".text"); + if (lowest_sect == NULL) + return 0; + map_args.target = target; + map_args.addr = base_addr - bfd_section_vma (dll_bfd, lowest_sect); + + bfd_map_over_sections (dll_bfd, &map_single_dll_code_section, (void *) (&map_args)); + } + + return 1; +} + +static void +core_section_load_dll_symbols (bfd *abfd, asection *sect, void *obj) +{ + struct target_ops *target = (struct target_ops *) obj; + + DWORD base_addr; + + int dll_name_size; + struct win32_pstatus *pstatus; + struct so_list *so; + char *dll_name; + char *buf = NULL; + char *p; + struct objfile *objfile; + const char *dll_basename; + + if (strncmp (sect->name, ".module", 7) != 0) + return; + + buf = (char *) xmalloc (bfd_get_section_size (sect) + 1); + if (!buf) + { + printf_unfiltered ("memory allocation failed for %s\n", sect->name); + goto out; + } + if (!bfd_get_section_contents (abfd, sect, buf, 0, bfd_get_section_size (sect))) + goto out; + + pstatus = (struct win32_pstatus *) buf; + + memmove (&base_addr, &(pstatus->data.module_info.base_address), sizeof (base_addr)); + dll_name_size = pstatus->data.module_info.module_name_size; + if (offsetof (struct win32_pstatus, data.module_info.module_name) + dll_name_size > bfd_get_section_size (sect)) + goto out; + + dll_name = pstatus->data.module_info.module_name; + + if (!(dll_basename = strrchr (dll_name, '/'))) + dll_basename = dll_name; + else + dll_basename++; + + ALL_OBJFILES (objfile) + { + char *objfile_basename = strrchr (objfile->name, '/'); + + if (objfile_basename && + strcasecmp (dll_basename, objfile_basename + 1) == 0) + goto out; + } + + base_addr += 0x1000; + dll_name = register_loaded_dll (dll_name, base_addr, 1); + + if (!dll_code_sections_add (dll_name, (DWORD) base_addr, target)) + printf_unfiltered ("%s: Failed to map dll code sections.\n", dll_name); + +out: + if (buf) + xfree (buf); + return; +} + +static struct so_list * +win32_current_sos (void) +{ + struct so_list *head = solib_start.next; + win32_clear_solib (); + if (!head && core_bfd) + { + bfd_map_over_sections (core_bfd, &core_section_load_dll_symbols, + &win32_ops); + head = solib_start.next; + win32_clear_solib (); + } + return head; +} + +static void +fetch_elf_core_registers (char *core_reg_sect, + unsigned core_reg_size, + int which, + CORE_ADDR reg_addr) +{ + int r; + if (core_reg_size < sizeof (CONTEXT)) + { + error (_("Core file register section too small (%u bytes)."), core_reg_size); + return; + } + for (r = 0; r < NUM_REGS; r++) + regcache_raw_supply (current_regcache, r, core_reg_sect + mappings[r]); +} + static void init_win32_ops (void) { @@ -2031,8 +2309,8 @@ init_win32_ops (void) win32_so_ops.relocate_section_addresses = win32_relocate_section_addresses; win32_so_ops.free_so = win32_free_so; win32_so_ops.clear_solib = win32_clear_solib; - win32_so_ops.solib_create_inferior_hook = NULL; - win32_so_ops.special_symbol_handling = NULL; + win32_so_ops.solib_create_inferior_hook = win32_solib_create_inferior_hook; + win32_so_ops.special_symbol_handling = win32_special_symbol_handling; win32_so_ops.current_sos = win32_current_sos; win32_so_ops.open_symbol_file_object = NULL; win32_so_ops.in_dynsym_resolve_code = NULL; @@ -2165,22 +2443,6 @@ win32_win32_thread_alive (ptid_t ptid) FALSE : TRUE; } -static void -fetch_elf_core_registers (char *core_reg_sect, - unsigned core_reg_size, - int which, - CORE_ADDR reg_addr) -{ - int r; - if (core_reg_size < sizeof (CONTEXT)) - { - error (_("Core file register section too small (%u bytes)."), core_reg_size); - return; - } - for (r = 0; r < NUM_REGS; r++) - regcache_raw_supply (current_regcache, r, core_reg_sect + mappings[r]); -} - static struct core_fns win32_elf_core_fns = { bfd_target_elf_flavour, diff --git a/gdb/windows-nat.c b/gdb/windows-nat.c index d0384b190b9..b0dbfe953c3 100644 --- a/gdb/windows-nat.c +++ b/gdb/windows-nat.c @@ -54,6 +54,7 @@ #include #include "exec.h" #include "solist.h" +#include "solib.h" #include "i386-tdep.h" #include "i387-tdep.h" @@ -517,7 +518,6 @@ struct safe_symbol_file_add_args struct lm_info { DWORD load_addr; - DWORD end_addr; }; static struct so_list solib_start, *solib_end; @@ -577,14 +577,121 @@ safe_symbol_file_add (char *name, int from_tty, return p.ret; } +/* Get the loaded address of all sections, given that .text was loaded + at text_load. Assumes that all sections are subject to the same + relocation offset. Returns NULL if problems occur or if the + sections were not relocated. */ + +static struct section_addr_info * +get_relocated_section_addrs (bfd *abfd, CORE_ADDR text_load) +{ + struct section_addr_info *result = NULL; + int section_count = bfd_count_sections (abfd); + asection *text_section = bfd_get_section_by_name (abfd, ".text"); + CORE_ADDR text_vma; + + if (!text_section) + { + /* Couldn't get the .text section. Weird. */ + } + + else if (text_load == (text_vma = bfd_get_section_vma (abfd, text_section))) + { + /* DLL wasn't relocated. */ + } + + else + { + /* Figure out all sections' loaded addresses. The offset here is + such that taking a bfd_get_section_vma() result and adding + offset will give the real load address of the section. */ + + CORE_ADDR offset = text_load - text_vma; + + struct section_table *table_start = NULL; + struct section_table *table_end = NULL; + struct section_table *iter = NULL; + + build_section_table (abfd, &table_start, &table_end); + + for (iter = table_start; iter < table_end; ++iter) + { + /* Relocated addresses. */ + iter->addr += offset; + iter->endaddr += offset; + } + + result = build_section_addr_info_from_section_table (table_start, + table_end); + + xfree (table_start); + } + + return result; +} + +/* Add DLL symbol information. */ +static void +solib_symbols_add (struct so_list *so, CORE_ADDR load_addr) +{ + struct section_addr_info *addrs = NULL; + static struct objfile *result = NULL; + char *name = so->so_name; + bfd *abfd = NULL; + + /* The symbols in a dll are offset by 0x1000, which is the + the offset from 0 of the first byte in an image - because + of the file header and the section alignment. */ + + if (!name || !name[0]) + return; + + abfd = bfd_openr (name, "pei-i386"); + + if (!abfd) + { + /* pei failed - try pe */ + abfd = bfd_openr (name, "pe-i386"); + } + + if (abfd) + { + if (bfd_check_format (abfd, bfd_object)) + addrs = get_relocated_section_addrs (abfd, load_addr); + + bfd_close (abfd); + } + + if (addrs) + { + result = safe_symbol_file_add (name, 0, addrs, 0, OBJF_SHARED); + free_section_addr_info (addrs); + } + else + { + /* Fallback on handling just the .text section. */ + struct cleanup *my_cleanups; + + addrs = alloc_section_addr_info (1); + my_cleanups = make_cleanup (xfree, addrs); + addrs->other[0].name = ".text"; + addrs->other[0].addr = load_addr; + + result = safe_symbol_file_add (name, 0, addrs, 0, OBJF_SHARED); + do_cleanups (my_cleanups); + } + + so->symbols_loaded = !!result; + return; +} + /* Remember the maximum DLL length for printing in info dll command. */ static int max_dll_name_len; -static void -register_loaded_dll (const char *name, DWORD load_addr) +static char * +register_loaded_dll (const char *name, DWORD load_addr, int readsyms) { struct so_list *so; - char ppath[MAX_PATH + 1]; char buf[MAX_PATH + 1]; char cwd[MAX_PATH + 1]; char *p; @@ -615,25 +722,21 @@ register_loaded_dll (const char *name, DWORD load_addr) GetSystemDirectory (buf, sizeof (buf)); strcat (buf, "\\ntdll.dll"); } - cygwin_conv_to_posix_path (buf, ppath); - so = (struct so_list *) xmalloc (sizeof (struct so_list) + strlen (ppath) + 8 + 1); + so = (struct so_list *) xmalloc (sizeof (struct so_list)); memset (so, 0, sizeof (*so)); so->lm_info = (struct lm_info *) xmalloc (sizeof (struct lm_info)); so->lm_info->load_addr = load_addr; - if (VirtualQueryEx (current_process_handle, (void *) load_addr, &m, - sizeof (m))) - so->lm_info->end_addr = (DWORD) m.AllocationBase + m.RegionSize; - else - so->lm_info->end_addr = load_addr + 0x2000; /* completely arbitrary */ - - so->next = NULL; - strcpy (so->so_name, ppath); + cygwin_conv_to_posix_path (buf, so->so_name); + strcpy (so->so_original_name, so->so_name); solib_end->next = so; solib_end = so; - len = strlen (ppath); + len = strlen (so->so_name); if (len > max_dll_name_len) max_dll_name_len = len; + if (readsyms) + solib_symbols_add (so, (CORE_ADDR) load_addr); + return so->so_name; } static char * @@ -699,7 +802,7 @@ handle_load_dll (void *dummy) if (!dll_name) return 1; - register_loaded_dll (dll_name, (DWORD) event->lpBaseOfDll + 0x1000); + register_loaded_dll (dll_name, (DWORD) event->lpBaseOfDll + 0x1000, auto_solib_add); return 1; } @@ -707,18 +810,10 @@ handle_load_dll (void *dummy) static void win32_free_so (struct so_list *so) { - if (so->objfile) - free_objfile (so->objfile); if (so->lm_info) xfree (so->lm_info); } -static struct so_list * -win32_current_sos (void) -{ - return solib_start.next; -} - static void win32_relocate_section_addresses (struct so_list *so, struct section_table *sec) @@ -727,6 +822,13 @@ win32_relocate_section_addresses (struct so_list *so, return; } +static void +win32_solib_create_inferior_hook (void) +{ + solib_add (NULL, 0, NULL, auto_solib_add); + return; +} + static int handle_unload_dll (void *dummy) { @@ -752,13 +854,17 @@ handle_unload_dll (void *dummy) static void win32_clear_solib (void) { - struct so_list *so, *so1 = solib_start.next; - solib_start.next = NULL; solib_end = &solib_start; max_dll_name_len = sizeof ("DLL Name") - 1; } +static void +win32_special_symbol_handling (void) +{ + return; +} + /* Load DLL symbol info. */ void dll_symbol_command (char *args, int from_tty) @@ -1575,18 +1681,18 @@ win32_pid_to_exec_file (int pid) cygwin_internal (CW_LOCK_PINFO, 1000); for (cpid = 0; (pinfo = (struct external_pinfo *) - cygwin_internal (CW_GETPINFO, cpid | CW_NEXTPID)); + cygwin_internal (CW_GETPINFO, cpid | CW_NEXTPID)); cpid = pinfo->pid) { if (pinfo->dwProcessId == current_event.dwProcessId) /* Got it */ { - cygwin_conv_to_full_posix_path (pinfo->progname, path); - path_ptr = path; - break; + cygwin_conv_to_full_posix_path (pinfo->progname, path); + path_ptr = path; + break; } } cygwin_internal (CW_UNLOCK_PINFO); - return path_ptr; + return path_ptr; } /* Print status information about what we're accessing. */ @@ -1987,6 +2093,178 @@ cygwin_pid_to_str (ptid_t ptid) return buf; } +typedef struct +{ + struct target_ops *target; + bfd_vma addr; +} map_code_section_args; + +static void +map_single_dll_code_section (bfd *abfd, asection *sect, void *obj) +{ + int old; + int update_coreops; + struct section_table *new_target_sect_ptr; + + map_code_section_args *args = (map_code_section_args *) obj; + struct target_ops *target = args->target; + if (sect->flags & SEC_CODE) + { + update_coreops = core_ops.to_sections == target->to_sections; + + if (target->to_sections) + { + old = target->to_sections_end - target->to_sections; + target->to_sections = (struct section_table *) + xrealloc ((char *) target->to_sections, + (sizeof (struct section_table)) * (1 + old)); + } + else + { + old = 0; + target->to_sections = (struct section_table *) + xmalloc ((sizeof (struct section_table))); + } + target->to_sections_end = target->to_sections + (1 + old); + + /* Update the to_sections field in the core_ops structure + if needed. */ + if (update_coreops) + { + core_ops.to_sections = target->to_sections; + core_ops.to_sections_end = target->to_sections_end; + } + new_target_sect_ptr = target->to_sections + old; + new_target_sect_ptr->addr = args->addr + bfd_section_vma (abfd, sect); + new_target_sect_ptr->endaddr = args->addr + bfd_section_vma (abfd, sect) + + bfd_section_size (abfd, sect);; + new_target_sect_ptr->the_bfd_section = sect; + new_target_sect_ptr->bfd = abfd; + } +} + +static int +dll_code_sections_add (const char *dll_name, int base_addr, struct target_ops *target) +{ + bfd *dll_bfd; + map_code_section_args map_args; + asection *lowest_sect; + char *name; + if (dll_name == NULL || target == NULL) + return 0; + name = xstrdup (dll_name); + dll_bfd = bfd_openr (name, "pei-i386"); + if (dll_bfd == NULL) + return 0; + + if (bfd_check_format (dll_bfd, bfd_object)) + { + lowest_sect = bfd_get_section_by_name (dll_bfd, ".text"); + if (lowest_sect == NULL) + return 0; + map_args.target = target; + map_args.addr = base_addr - bfd_section_vma (dll_bfd, lowest_sect); + + bfd_map_over_sections (dll_bfd, &map_single_dll_code_section, (void *) (&map_args)); + } + + return 1; +} + +static void +core_section_load_dll_symbols (bfd *abfd, asection *sect, void *obj) +{ + struct target_ops *target = (struct target_ops *) obj; + + DWORD base_addr; + + int dll_name_size; + struct win32_pstatus *pstatus; + struct so_list *so; + char *dll_name; + char *buf = NULL; + char *p; + struct objfile *objfile; + const char *dll_basename; + + if (strncmp (sect->name, ".module", 7) != 0) + return; + + buf = (char *) xmalloc (bfd_get_section_size (sect) + 1); + if (!buf) + { + printf_unfiltered ("memory allocation failed for %s\n", sect->name); + goto out; + } + if (!bfd_get_section_contents (abfd, sect, buf, 0, bfd_get_section_size (sect))) + goto out; + + pstatus = (struct win32_pstatus *) buf; + + memmove (&base_addr, &(pstatus->data.module_info.base_address), sizeof (base_addr)); + dll_name_size = pstatus->data.module_info.module_name_size; + if (offsetof (struct win32_pstatus, data.module_info.module_name) + dll_name_size > bfd_get_section_size (sect)) + goto out; + + dll_name = pstatus->data.module_info.module_name; + + if (!(dll_basename = strrchr (dll_name, '/'))) + dll_basename = dll_name; + else + dll_basename++; + + ALL_OBJFILES (objfile) + { + char *objfile_basename = strrchr (objfile->name, '/'); + + if (objfile_basename && + strcasecmp (dll_basename, objfile_basename + 1) == 0) + goto out; + } + + base_addr += 0x1000; + dll_name = register_loaded_dll (dll_name, base_addr, 1); + + if (!dll_code_sections_add (dll_name, (DWORD) base_addr, target)) + printf_unfiltered ("%s: Failed to map dll code sections.\n", dll_name); + +out: + if (buf) + xfree (buf); + return; +} + +static struct so_list * +win32_current_sos (void) +{ + struct so_list *head = solib_start.next; + win32_clear_solib (); + if (!head && core_bfd) + { + bfd_map_over_sections (core_bfd, &core_section_load_dll_symbols, + &win32_ops); + head = solib_start.next; + win32_clear_solib (); + } + return head; +} + +static void +fetch_elf_core_registers (char *core_reg_sect, + unsigned core_reg_size, + int which, + CORE_ADDR reg_addr) +{ + int r; + if (core_reg_size < sizeof (CONTEXT)) + { + error (_("Core file register section too small (%u bytes)."), core_reg_size); + return; + } + for (r = 0; r < NUM_REGS; r++) + regcache_raw_supply (current_regcache, r, core_reg_sect + mappings[r]); +} + static void init_win32_ops (void) { @@ -2031,8 +2309,8 @@ init_win32_ops (void) win32_so_ops.relocate_section_addresses = win32_relocate_section_addresses; win32_so_ops.free_so = win32_free_so; win32_so_ops.clear_solib = win32_clear_solib; - win32_so_ops.solib_create_inferior_hook = NULL; - win32_so_ops.special_symbol_handling = NULL; + win32_so_ops.solib_create_inferior_hook = win32_solib_create_inferior_hook; + win32_so_ops.special_symbol_handling = win32_special_symbol_handling; win32_so_ops.current_sos = win32_current_sos; win32_so_ops.open_symbol_file_object = NULL; win32_so_ops.in_dynsym_resolve_code = NULL; @@ -2165,22 +2443,6 @@ win32_win32_thread_alive (ptid_t ptid) FALSE : TRUE; } -static void -fetch_elf_core_registers (char *core_reg_sect, - unsigned core_reg_size, - int which, - CORE_ADDR reg_addr) -{ - int r; - if (core_reg_size < sizeof (CONTEXT)) - { - error (_("Core file register section too small (%u bytes)."), core_reg_size); - return; - } - for (r = 0; r < NUM_REGS; r++) - regcache_raw_supply (current_regcache, r, core_reg_sect + mappings[r]); -} - static struct core_fns win32_elf_core_fns = { bfd_target_elf_flavour,