Browse Source
(COMMON_OBS): Remove nlmread.o. (nlmread.o): Delete rule. * README: Delete reference to remote-st.c. * acinclude.m4 (CY_AC_TCL_LYNX_POSIX): Delete. * defs.h (enum gdb_osabi): Delete GDB_OSABI_NETWARE and GDB_OSABI_LYNXOS. * i386-tdep.c (i386_nw_init_abi, i386_nlm_osabi_sniffer): Delete. (_initialize_i386_tdep): Do not reference them. * nlmread.c: Delete file. * osabi.c (gdb_osabi_names): Remove NetWare and LynxOS. * target.c: Doc update. * thread.c: Delete commented include. * config/alpha/tm-alpha.h: Doc update. * gdb.texinfo (Startup): Delete references to some alternate names for .gdbinit. (Thread): Remove LynxOS reference. (Tandem ST2000): Delete target-specific documentation. * gdbint.texinfo (Symbol Handling): Remove mention of NLM. (Target Architecture Definition): Remove mention of GDB_OSABI_NETWARE and GDB_OSABI_LYNXOS. * config/netware.exp: Delete file.drow-reverse-20070409-branch
Daniel Jacobowitz
20 years ago
16 changed files with 37 additions and 616 deletions
@ -1,237 +0,0 @@ |
|||
/* Read NLM (NetWare Loadable Module) format executable files for GDB.
|
|||
Copyright (C) 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2007 |
|||
Free Software Foundation, Inc. |
|||
Written by Fred Fish at Cygnus Support (fnf@cygnus.com). |
|||
|
|||
This file is part of GDB. |
|||
|
|||
This program is free software; you can redistribute it and/or modify |
|||
it under the terms of the GNU General Public License as published by |
|||
the Free Software Foundation; either version 2 of the License, or |
|||
(at your option) any later version. |
|||
|
|||
This program is distributed in the hope that it will be useful, |
|||
but WITHOUT ANY WARRANTY; without even the implied warranty of |
|||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|||
GNU General Public License for more details. |
|||
|
|||
You should have received a copy of the GNU General Public License |
|||
along with this program; if not, write to the Free Software |
|||
Foundation, Inc., 51 Franklin Street, Fifth Floor, |
|||
Boston, MA 02110-1301, USA. */ |
|||
|
|||
#include "defs.h" |
|||
#include "bfd.h" |
|||
#include "symtab.h" |
|||
#include "symfile.h" |
|||
#include "objfiles.h" |
|||
#include "buildsym.h" |
|||
#include "stabsread.h" |
|||
#include "block.h" |
|||
|
|||
extern void _initialize_nlmread (void); |
|||
|
|||
static void nlm_new_init (struct objfile *); |
|||
|
|||
static void nlm_symfile_init (struct objfile *); |
|||
|
|||
static void nlm_symfile_read (struct objfile *, int); |
|||
|
|||
static void nlm_symfile_finish (struct objfile *); |
|||
|
|||
static void nlm_symtab_read (bfd *, CORE_ADDR, struct objfile *); |
|||
|
|||
/* Initialize anything that needs initializing when a completely new symbol
|
|||
file is specified (not just adding some symbols from another file, e.g. a |
|||
shared library). |
|||
|
|||
We reinitialize buildsym, since gdb will be able to read stabs from an NLM |
|||
file at some point in the near future. */ |
|||
|
|||
static void |
|||
nlm_new_init (struct objfile *ignore) |
|||
{ |
|||
stabsread_new_init (); |
|||
buildsym_new_init (); |
|||
} |
|||
|
|||
|
|||
/* NLM specific initialization routine for reading symbols.
|
|||
|
|||
It is passed a pointer to a struct sym_fns which contains, among other |
|||
things, the BFD for the file whose symbols are being read, and a slot for |
|||
a pointer to "private data" which we can fill with goodies. |
|||
|
|||
For now at least, we have nothing in particular to do, so this function is |
|||
just a stub. */ |
|||
|
|||
static void |
|||
nlm_symfile_init (struct objfile *ignore) |
|||
{ |
|||
} |
|||
|
|||
/*
|
|||
|
|||
LOCAL FUNCTION |
|||
|
|||
nlm_symtab_read -- read the symbol table of an NLM file |
|||
|
|||
SYNOPSIS |
|||
|
|||
void nlm_symtab_read (bfd *abfd, CORE_ADDR addr, |
|||
struct objfile *objfile) |
|||
|
|||
DESCRIPTION |
|||
|
|||
Given an open bfd, a base address to relocate symbols to, and a |
|||
flag that specifies whether or not this bfd is for an executable |
|||
or not (may be shared library for example), add all the global |
|||
function and data symbols to the minimal symbol table. |
|||
*/ |
|||
|
|||
static void |
|||
nlm_symtab_read (bfd *abfd, CORE_ADDR addr, struct objfile *objfile) |
|||
{ |
|||
long storage_needed; |
|||
asymbol *sym; |
|||
asymbol **symbol_table; |
|||
long number_of_symbols; |
|||
long i; |
|||
struct cleanup *back_to; |
|||
CORE_ADDR symaddr; |
|||
enum minimal_symbol_type ms_type; |
|||
|
|||
storage_needed = bfd_get_symtab_upper_bound (abfd); |
|||
if (storage_needed < 0) |
|||
error (_("Can't read symbols from %s: %s"), bfd_get_filename (abfd), |
|||
bfd_errmsg (bfd_get_error ())); |
|||
if (storage_needed > 0) |
|||
{ |
|||
symbol_table = (asymbol **) xmalloc (storage_needed); |
|||
back_to = make_cleanup (xfree, symbol_table); |
|||
number_of_symbols = bfd_canonicalize_symtab (abfd, symbol_table); |
|||
if (number_of_symbols < 0) |
|||
error (_("Can't read symbols from %s: %s"), bfd_get_filename (abfd), |
|||
bfd_errmsg (bfd_get_error ())); |
|||
|
|||
for (i = 0; i < number_of_symbols; i++) |
|||
{ |
|||
sym = symbol_table[i]; |
|||
if ( /*sym -> flags & BSF_GLOBAL */ 1) |
|||
{ |
|||
/* Bfd symbols are section relative. */ |
|||
symaddr = sym->value + sym->section->vma; |
|||
/* Relocate all non-absolute symbols by base address. */ |
|||
if (sym->section != &bfd_abs_section) |
|||
symaddr += addr; |
|||
|
|||
/* For non-absolute symbols, use the type of the section
|
|||
they are relative to, to intuit text/data. BFD provides |
|||
no way of figuring this out for absolute symbols. */ |
|||
if (sym->section->flags & SEC_CODE) |
|||
ms_type = mst_text; |
|||
else if (sym->section->flags & SEC_DATA) |
|||
ms_type = mst_data; |
|||
else |
|||
ms_type = mst_unknown; |
|||
|
|||
prim_record_minimal_symbol (sym->name, symaddr, ms_type, |
|||
objfile); |
|||
} |
|||
} |
|||
do_cleanups (back_to); |
|||
} |
|||
} |
|||
|
|||
|
|||
/* Scan and build partial symbols for a symbol file.
|
|||
We have been initialized by a call to nlm_symfile_init, which |
|||
currently does nothing. |
|||
|
|||
SECTION_OFFSETS is a set of offsets to apply to relocate the symbols |
|||
in each section. We simplify it down to a single offset for all |
|||
symbols. FIXME. |
|||
|
|||
MAINLINE is true if we are reading the main symbol |
|||
table (as opposed to a shared lib or dynamically loaded file). |
|||
|
|||
This function only does the minimum work necessary for letting the |
|||
user "name" things symbolically; it does not read the entire symtab. |
|||
Instead, it reads the external and static symbols and puts them in partial |
|||
symbol tables. When more extensive information is requested of a |
|||
file, the corresponding partial symbol table is mutated into a full |
|||
fledged symbol table by going back and reading the symbols |
|||
for real. |
|||
|
|||
Note that NLM files have two sets of information that is potentially |
|||
useful for building gdb's minimal symbol table. The first is a list |
|||
of the publically exported symbols, and is currently used to build |
|||
bfd's canonical symbol table. The second is an optional native debugging |
|||
format which contains additional symbols (and possibly duplicates of |
|||
the publically exported symbols). The optional native debugging format |
|||
is not currently used. */ |
|||
|
|||
static void |
|||
nlm_symfile_read (struct objfile *objfile, int mainline) |
|||
{ |
|||
bfd *abfd = objfile->obfd; |
|||
struct cleanup *back_to; |
|||
CORE_ADDR offset; |
|||
|
|||
init_minimal_symbol_collection (); |
|||
back_to = make_cleanup_discard_minimal_symbols (); |
|||
|
|||
/* FIXME, should take a section_offsets param, not just an offset. */ |
|||
|
|||
offset = ANOFFSET (objfile->section_offsets, 0); |
|||
|
|||
/* Process the NLM export records, which become the bfd's canonical symbol
|
|||
table. */ |
|||
|
|||
nlm_symtab_read (abfd, offset, objfile); |
|||
|
|||
/* Install any minimal symbols that have been collected as the current
|
|||
minimal symbols for this objfile. */ |
|||
|
|||
install_minimal_symbols (objfile); |
|||
do_cleanups (back_to); |
|||
|
|||
stabsect_build_psymtabs (objfile, mainline, ".stab", |
|||
".stabstr", ".text"); |
|||
/* FIXME: We could locate and read the optional native debugging format
|
|||
here and add the symbols to the minimal symbol table. */ |
|||
} |
|||
|
|||
|
|||
/* Perform any local cleanups required when we are done with a particular
|
|||
objfile. I.E, we are in the process of discarding all symbol information |
|||
for an objfile, freeing up all memory held for it, and unlinking the |
|||
objfile struct from the global list of known objfiles. */ |
|||
|
|||
static void |
|||
nlm_symfile_finish (struct objfile *objfile) |
|||
{ |
|||
if (objfile->deprecated_sym_private != NULL) |
|||
{ |
|||
xfree (objfile->deprecated_sym_private); |
|||
} |
|||
} |
|||
|
|||
/* Register that we are able to handle NLM file format. */ |
|||
|
|||
static struct sym_fns nlm_sym_fns = |
|||
{ |
|||
bfd_target_nlm_flavour, |
|||
nlm_new_init, /* sym_new_init: init anything gbl to entire symtab */ |
|||
nlm_symfile_init, /* sym_init: read initial info, setup for sym_read() */ |
|||
nlm_symfile_read, /* sym_read: read a symbol file into symtab */ |
|||
nlm_symfile_finish, /* sym_finish: finished with file, cleanup */ |
|||
default_symfile_offsets, /* sym_offsets: Translate ext. to int. relocation */ |
|||
NULL /* next: pointer to next struct sym_fns */ |
|||
}; |
|||
|
|||
void |
|||
_initialize_nlmread (void) |
|||
{ |
|||
add_symtab_fns (&nlm_sym_fns); |
|||
} |
|||
@ -1,219 +0,0 @@ |
|||
# Copyright (C) 1988, 1990, 1991, 1992, 1994, 1997, 2007 |
|||
# Free Software Foundation, Inc. |
|||
|
|||
# This program is free software; you can redistribute it and/or modify |
|||
# it under the terms of the GNU General Public License as published by |
|||
# the Free Software Foundation; either version 2 of the License, or |
|||
# (at your option) any later version. |
|||
# |
|||
# This program is distributed in the hope that it will be useful, |
|||
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
|||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|||
# GNU General Public License for more details. |
|||
# |
|||
# You should have received a copy of the GNU General Public License |
|||
# along with this program; if not, write to the Free Software |
|||
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
|||
|
|||
# Please email any bugs, comments, and/or additions to this file to: |
|||
# bug-gdb@prep.ai.mit.edu |
|||
|
|||
# This file was written by J.T. Conklin. (jtc@cygnus.com) |
|||
|
|||
load_lib gdb.exp |
|||
load_lib remote.exp |
|||
|
|||
global shell_id |
|||
|
|||
global LD |
|||
if ![info exists LD] then { |
|||
set LD [findfile "$base_dir/../../ld/ld.new"] |
|||
} |
|||
|
|||
global NLMCONV |
|||
if ![info exists NLMCONV] then { |
|||
set NLMCONV [findfile "$base_dir/../../binutils/nlmconv"] |
|||
} |
|||
|
|||
# |
|||
# gdb_version -- extract and print the version number of gcc |
|||
# |
|||
proc gdb_version {} { |
|||
default_gdb_version |
|||
} |
|||
|
|||
# |
|||
# gdb_unload -- unload a file if one is loaded |
|||
# |
|||
|
|||
# |
|||
# gdb_load -- load a file into the debugger. |
|||
# return a -1 if anything goes wrong. |
|||
# |
|||
proc gdb_load { arg } { |
|||
global gdb_prompt |
|||
global LD |
|||
global NLMCONV |
|||
global errorCode |
|||
global shell_id |
|||
|
|||
# FIXME: this is wrong. |
|||
set targetname [target_info name]; |
|||
|
|||
set obj [file tail $arg] |
|||
set nlm "$obj.nlm" |
|||
set lnk "$obj.lnk" |
|||
|
|||
# build *.lnk file |
|||
set fd [open $lnk w] |
|||
puts $fd "description \"[file tail $nlm]\"" |
|||
puts $fd "screenname \"System Console\"" |
|||
puts $fd "module clib.nlm" |
|||
puts $fd "module mathlib.nlm" |
|||
puts $fd "stack 32768" |
|||
# puts $fd "stack 64512" |
|||
puts $fd "debug" |
|||
# FIXME: don't hardcode location of prelude.o |
|||
puts $fd "input /s1/cygnus/dejagnu/i386-netware/lib/prelude.o" |
|||
puts $fd "input $arg" |
|||
puts $fd "output $nlm" |
|||
close $fd |
|||
|
|||
# run nlmconv |
|||
verbose "Executing: $NLMCONV -l$LD -T$lnk" 1 |
|||
catch "exec $NLMCONV -l$LD -T$lnk" output |
|||
if ![string match "" $output] then { |
|||
verbose $output 1 |
|||
} |
|||
if ![string match "NONE" $errorCode] { |
|||
warning "Can't link $arg" |
|||
|
|||
return -1 |
|||
} |
|||
catch "exec rm -f $lnk" |
|||
|
|||
# download |
|||
verbose "Downloading $nlm" 1 |
|||
catch "exec cp $nlm /.NetWare/$targetname.nws/sys.nwv/tmp/x.nlm" output |
|||
if ![string match "" $output] then { |
|||
verbose $output 1 |
|||
return -1 |
|||
} |
|||
|
|||
gdb_file_cmd $nlm |
|||
} |
|||
|
|||
proc gdb_run_cmd { } { |
|||
global shell_id |
|||
global gdb_prompt |
|||
global timeout |
|||
|
|||
set connhost [target_info name]; |
|||
if [board_info $connhost exists serial] { |
|||
set serialport [board_info $connhost serial]; |
|||
} else { |
|||
set serialport [board_info $connhost netport]; |
|||
} |
|||
|
|||
if [board_info $connhost exists baud] { |
|||
set baud [board_info $connhost baud]; |
|||
} else { |
|||
set baud 9600; |
|||
} |
|||
# FIXME: This is wrong. |
|||
send "kill\n" |
|||
gdb_expect { |
|||
-re ".*Kill the program being debugged.*y or n. $" { |
|||
send "y\n" |
|||
exp_continue |
|||
} |
|||
-re ".*$gdb_prompt $" {} |
|||
} |
|||
|
|||
verbose "Starting GDB stub on [target_info name]" 1 |
|||
send -i $shell_id "load nlmstub BAUD=$baud x.nlm\r\n" |
|||
|
|||
send "set remotebaud $baud\n" |
|||
gdb_expect { |
|||
-re "$gdb_prompt" {} |
|||
timeout { |
|||
perror "Couldn't set remote baud rate" |
|||
return |
|||
} |
|||
} |
|||
|
|||
set otimeout $timeout |
|||
set timeout 60 |
|||
verbose "Timeout is now $timeout seconds" 2 |
|||
send "target remote $serialport\n" |
|||
gdb_expect { |
|||
-re "Couldn't establish connection to remote target" { |
|||
send "target remote $serialport\n" |
|||
exp_continue |
|||
} |
|||
-re "$gdb_prompt" {} |
|||
timeout { |
|||
set timeout $otimeout |
|||
verbose "Timeout restored to $timeout seconds" 2 |
|||
perror "Couldn't set remote target" |
|||
return |
|||
} |
|||
} |
|||
set timeout $otimeout |
|||
verbose "Timeout restored to $timeout seconds" 2 |
|||
|
|||
send "continue\n" |
|||
gdb_expect { |
|||
"Continuing.$" {} |
|||
} |
|||
|
|||
return |
|||
} |
|||
|
|||
|
|||
|
|||
# |
|||
# start the remote shell |
|||
# |
|||
|
|||
set shell_prompt "Password:" |
|||
set shell_id [remote_open target] |
|||
|
|||
if $shell_id<0 then { |
|||
warning "Couldn't connect to target" |
|||
return -1 |
|||
} |
|||
|
|||
if [string match "" $passwd] then { |
|||
stty -echo |
|||
send_user "Password: " |
|||
expect_user -re "(.*)\n" |
|||
send_user "\n" |
|||
set passwd "$expect_out(1,string)" |
|||
stty echo |
|||
} |
|||
|
|||
send -i $shell_id "$passwd\n" |
|||
gdb_expect { |
|||
-i $shell_id ":" { |
|||
verbose "Got termtype prompt" 0 |
|||
} |
|||
|
|||
-i $shell_id timeout { |
|||
warning "Connection timed out" |
|||
return -1 |
|||
} |
|||
} |
|||
|
|||
|
|||
# FIXME: this is wrong. |
|||
set shell_prompt "[string toupper [target_info name]]:" |
|||
send -i $shell_id "1\n" |
|||
|
|||
gdb_expect { |
|||
-i $shell_id -re "$shell_prompt" {} |
|||
-i $shell_id timeout { |
|||
warning "Connection timed out" |
|||
return -1 |
|||
} |
|||
} |
|||
Loading…
Reference in new issue