/* OBSOLETE /* Remote debugging interface for AMD 29k interfaced via UDI, for GDB. */ /* OBSOLETE Copyright 1990, 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001 */ /* OBSOLETE Free Software Foundation, Inc. */ /* OBSOLETE Written by Daniel Mann. Contributed by AMD. */ /* OBSOLETE */ /* OBSOLETE This file is part of GDB. */ /* OBSOLETE */ /* OBSOLETE This program is free software; you can redistribute it and/or modify */ /* OBSOLETE it under the terms of the GNU General Public License as published by */ /* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ /* OBSOLETE (at your option) any later version. */ /* OBSOLETE */ /* OBSOLETE This program is distributed in the hope that it will be useful, */ /* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ /* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ /* OBSOLETE GNU General Public License for more details. */ /* OBSOLETE */ /* OBSOLETE You should have received a copy of the GNU General Public License */ /* OBSOLETE along with this program; if not, write to the Free Software */ /* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ /* OBSOLETE Boston, MA 02111-1307, USA. */ */ /* OBSOLETE */ /* OBSOLETE /* This is like remote.c but uses the Universal Debug Interface (UDI) to */ /* OBSOLETE talk to the target hardware (or simulator). UDI is a TCP/IP based */ /* OBSOLETE protocol; for hardware that doesn't run TCP, an interface adapter */ /* OBSOLETE daemon talks UDI on one side, and talks to the hardware (typically */ /* OBSOLETE over a serial port) on the other side. */ /* OBSOLETE */ /* OBSOLETE - Originally written by Daniel Mann at AMD for MiniMON and gdb 3.91.6. */ /* OBSOLETE - David Wood (wood@lab.ultra.nyu.edu) at New York University adapted this */ /* OBSOLETE file to gdb 3.95. I was unable to get this working on sun3os4 */ /* OBSOLETE with termio, only with sgtty. */ /* OBSOLETE - Daniel Mann at AMD took the 3.95 adaptions above and replaced */ /* OBSOLETE MiniMON interface with UDI-p interface. */ */ /* OBSOLETE */ /* OBSOLETE #include "defs.h" */ /* OBSOLETE #include "frame.h" */ /* OBSOLETE #include "inferior.h" */ /* OBSOLETE #include "value.h" */ /* OBSOLETE #include <ctype.h> */ /* OBSOLETE #include <fcntl.h> */ /* OBSOLETE #include <errno.h> */ /* OBSOLETE #include "gdb_string.h" */ /* OBSOLETE #include "terminal.h" */ /* OBSOLETE #include "target.h" */ /* OBSOLETE #include "29k-share/udi/udiproc.h" */ /* OBSOLETE #include "gdbcmd.h" */ /* OBSOLETE #include "bfd.h" */ /* OBSOLETE #include "gdbcore.h" /* For download function */ */ /* OBSOLETE #include "regcache.h" */ /* OBSOLETE */ /* OBSOLETE /* access the register store directly, without going through */ /* OBSOLETE the normal handler functions. This avoids an extra data copy. */ */ /* OBSOLETE */ /* OBSOLETE extern int stop_soon_quietly; /* for wait_for_inferior */ */ /* OBSOLETE extern struct value *call_function_by_hand (); */ /* OBSOLETE static void udi_resume (ptid_t ptid, int step, enum target_signal sig); */ /* OBSOLETE static void udi_fetch_registers (int regno); */ /* OBSOLETE static void udi_load (char *args, int from_tty); */ /* OBSOLETE static void fetch_register (int regno); */ /* OBSOLETE static void udi_store_registers (int regno); */ /* OBSOLETE static int store_register (int regno); */ /* OBSOLETE static int regnum_to_srnum (int regno); */ /* OBSOLETE static void udi_close (int quitting); */ /* OBSOLETE static CPUSpace udi_memory_space (CORE_ADDR addr); */ /* OBSOLETE static int udi_write_inferior_memory (CORE_ADDR memaddr, char *myaddr, */ /* OBSOLETE int len); */ /* OBSOLETE static int udi_read_inferior_memory (CORE_ADDR memaddr, char *myaddr, */ /* OBSOLETE int len); */ /* OBSOLETE static void download (char *load_arg_string, int from_tty); */ /* OBSOLETE char CoffFileName[100] = ""; */ /* OBSOLETE */ /* OBSOLETE #define FREEZE_MODE (read_register(CPS_REGNUM) & 0x400) */ /* OBSOLETE #define USE_SHADOW_PC ((processor_type == a29k_freeze_mode) && FREEZE_MODE) */ /* OBSOLETE */ /* OBSOLETE static int timeout = 5; */ /* OBSOLETE extern struct target_ops udi_ops; /* Forward declaration */ */ /* OBSOLETE */ /* OBSOLETE /* Special register enumeration. */ /* OBSOLETE */ */ /* OBSOLETE */ /* OBSOLETE /******************************************************************* UDI DATA*/ */ /* OBSOLETE #define MAXDATA 2*1024 /* max UDI[read/write] byte size */ */ /* OBSOLETE /* Descriptor for I/O to remote machine. Initialize it to -1 so that */ /* OBSOLETE udi_open knows that we don't have a file open when the program */ /* OBSOLETE starts. */ */ /* OBSOLETE */ /* OBSOLETE UDISessionId udi_session_id = -1; */ /* OBSOLETE static char *udi_config_id; */ /* OBSOLETE */ /* OBSOLETE CPUOffset IMemStart = 0; */ /* OBSOLETE CPUSizeT IMemSize = 0; */ /* OBSOLETE CPUOffset DMemStart = 0; */ /* OBSOLETE CPUSizeT DMemSize = 0; */ /* OBSOLETE CPUOffset RMemStart = 0; */ /* OBSOLETE CPUSizeT RMemSize = 0; */ /* OBSOLETE UDIUInt32 CPUPRL; */ /* OBSOLETE UDIUInt32 CoProcPRL; */ /* OBSOLETE */ /* OBSOLETE UDIMemoryRange address_ranges[2]; /* Text and data */ */ /* OBSOLETE UDIResource entry = */ /* OBSOLETE {0, 0}; /* Entry point */ */ /* OBSOLETE CPUSizeT stack_sizes[2]; /* Regular and memory stacks */ */ /* OBSOLETE */ /* OBSOLETE #define SBUF_MAX 1024 /* maximum size of string handling buffer */ */ /* OBSOLETE char sbuf[SBUF_MAX]; */ /* OBSOLETE */ /* OBSOLETE typedef struct bkpt_entry_str */ /* OBSOLETE { */ /* OBSOLETE UDIResource Addr; */ /* OBSOLETE UDIUInt32 PassCount; */ /* OBSOLETE UDIBreakType Type; */ /* OBSOLETE unsigned int BreakId; */ /* OBSOLETE } */ /* OBSOLETE bkpt_entry_t; */ /* OBSOLETE #define BKPT_TABLE_SIZE 40 */ /* OBSOLETE static bkpt_entry_t bkpt_table[BKPT_TABLE_SIZE]; */ /* OBSOLETE extern char dfe_errmsg[]; /* error string */ */ /* OBSOLETE */ /* OBSOLETE /* malloc'd name of the program on the remote system. */ */ /* OBSOLETE static char *prog_name = NULL; */ /* OBSOLETE */ /* OBSOLETE /* This is called not only when we first attach, but also when the */ /* OBSOLETE user types "run" after having attached. */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_create_inferior (char *execfile, char *args, char **env) */ /* OBSOLETE { */ /* OBSOLETE char *args1; */ /* OBSOLETE */ /* OBSOLETE if (execfile) */ /* OBSOLETE { */ /* OBSOLETE if (prog_name != NULL) */ /* OBSOLETE xfree (prog_name); */ /* OBSOLETE prog_name = savestring (execfile, strlen (execfile)); */ /* OBSOLETE } */ /* OBSOLETE else if (entry.Offset) */ /* OBSOLETE execfile = ""; */ /* OBSOLETE else */ /* OBSOLETE error ("No image loaded into target."); */ /* OBSOLETE */ /* OBSOLETE if (udi_session_id < 0) */ /* OBSOLETE { */ /* OBSOLETE /* If the TIP is not open, open it. */ */ /* OBSOLETE if (UDIConnect (udi_config_id, &udi_session_id)) */ /* OBSOLETE error ("UDIConnect() failed: %s\n", dfe_errmsg); */ /* OBSOLETE /* We will need to download the program. */ */ /* OBSOLETE entry.Offset = 0; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE inferior_ptid = pid_to_ptid (40000); */ /* OBSOLETE */ /* OBSOLETE if (!entry.Offset) */ /* OBSOLETE download (execfile, 0); */ /* OBSOLETE */ /* OBSOLETE args1 = alloca (strlen (execfile) + strlen (args) + 2); */ /* OBSOLETE */ /* OBSOLETE if (execfile[0] == '\0') */ /* OBSOLETE */ /* OBSOLETE /* It is empty. We need to quote it somehow, or else the target */ /* OBSOLETE will think there is no argument being passed here. According */ /* OBSOLETE to the UDI spec it is quoted "according to TIP OS rules" which */ /* OBSOLETE I guess means quoting it like the Unix shell should work */ /* OBSOLETE (sounds pretty bogus to me...). In fact it doesn't work (with */ /* OBSOLETE isstip anyway), but passing in two quotes as the argument seems */ /* OBSOLETE like a reasonable enough behavior anyway (I guess). */ */ /* OBSOLETE */ /* OBSOLETE strcpy (args1, "''"); */ /* OBSOLETE else */ /* OBSOLETE strcpy (args1, execfile); */ /* OBSOLETE strcat (args1, " "); */ /* OBSOLETE strcat (args1, args); */ /* OBSOLETE */ /* OBSOLETE UDIInitializeProcess (address_ranges, /* ProcessMemory[] */ */ /* OBSOLETE (UDIInt) 2, /* NumberOfRanges */ */ /* OBSOLETE entry, /* EntryPoint */ */ /* OBSOLETE stack_sizes, /* *StackSizes */ */ /* OBSOLETE (UDIInt) 2, /* NumberOfStacks */ */ /* OBSOLETE args1); /* ArgString */ */ /* OBSOLETE */ /* OBSOLETE init_wait_for_inferior (); */ /* OBSOLETE clear_proceed_status (); */ /* OBSOLETE proceed (-1, TARGET_SIGNAL_DEFAULT, 0); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_mourn (void) */ /* OBSOLETE { */ /* OBSOLETE #if 0 */ /* OBSOLETE /* Requiring "target udi" each time you run is a major pain. I suspect */ /* OBSOLETE this was just blindy copied from remote.c, in which "target" and */ /* OBSOLETE "run" are combined. Having a udi target without an inferior seems */ /* OBSOLETE to work between "target udi" and "run", so why not now? */ */ /* OBSOLETE pop_target (); /* Pop back to no-child state */ */ /* OBSOLETE #endif */ /* OBSOLETE /* But if we're going to want to run it again, we better remove the */ /* OBSOLETE breakpoints... */ */ /* OBSOLETE remove_breakpoints (); */ /* OBSOLETE generic_mourn_inferior (); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /******************************************************************** UDI_OPEN */ /* OBSOLETE ** Open a connection to remote TIP. */ /* OBSOLETE NAME is the socket domain used for communication with the TIP, */ /* OBSOLETE then a space and the socket name or TIP-host name. */ /* OBSOLETE '<udi_udi_config_id>' for example. */ /* OBSOLETE */ */ /* OBSOLETE */ /* OBSOLETE /* XXX - need cleanups for udiconnect for various failures!!! */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_open (char *name, int from_tty) */ /* OBSOLETE { */ /* OBSOLETE unsigned int prl; */ /* OBSOLETE char *p; */ /* OBSOLETE int cnt; */ /* OBSOLETE UDIMemoryRange KnownMemory[10]; */ /* OBSOLETE UDIUInt32 ChipVersions[10]; */ /* OBSOLETE UDIInt NumberOfRanges = 10; */ /* OBSOLETE UDIInt NumberOfChips = 10; */ /* OBSOLETE UDIPId PId; */ /* OBSOLETE UDIUInt32 TIPId, TargetId, DFEId, DFE, TIP, DFEIPCId, TIPIPCId; */ /* OBSOLETE */ /* OBSOLETE target_preopen (from_tty); */ /* OBSOLETE */ /* OBSOLETE entry.Offset = 0; */ /* OBSOLETE */ /* OBSOLETE for (cnt = 0; cnt < BKPT_TABLE_SIZE; cnt++) */ /* OBSOLETE bkpt_table[cnt].Type = 0; */ /* OBSOLETE */ /* OBSOLETE if (udi_config_id) */ /* OBSOLETE xfree (udi_config_id); */ /* OBSOLETE */ /* OBSOLETE if (!name) */ /* OBSOLETE error ("Usage: target udi config_id, where config_id appears in udi_soc file"); */ /* OBSOLETE */ /* OBSOLETE udi_config_id = xstrdup (strtok (name, " \t")); */ /* OBSOLETE */ /* OBSOLETE if (UDIConnect (udi_config_id, &udi_session_id)) */ /* OBSOLETE /* FIXME: Should set udi_session_id to -1 here. */ */ /* OBSOLETE error ("UDIConnect() failed: %s\n", dfe_errmsg); */ /* OBSOLETE */ /* OBSOLETE push_target (&udi_ops); */ /* OBSOLETE */ /* OBSOLETE /* */ /* OBSOLETE ** Initialize target configuration structure (global) */ /* OBSOLETE */ */ /* OBSOLETE if (UDIGetTargetConfig (KnownMemory, &NumberOfRanges, */ /* OBSOLETE ChipVersions, &NumberOfChips)) */ /* OBSOLETE error ("UDIGetTargetConfig() failed"); */ /* OBSOLETE if (NumberOfChips > 2) */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "Target has more than one processor\n"); */ /* OBSOLETE for (cnt = 0; cnt < NumberOfRanges; cnt++) */ /* OBSOLETE { */ /* OBSOLETE switch (KnownMemory[cnt].Space) */ /* OBSOLETE { */ /* OBSOLETE default: */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "UDIGetTargetConfig() unknown memory space\n"); */ /* OBSOLETE break; */ /* OBSOLETE case UDI29KCP_S: */ /* OBSOLETE break; */ /* OBSOLETE case UDI29KIROMSpace: */ /* OBSOLETE RMemStart = KnownMemory[cnt].Offset; */ /* OBSOLETE RMemSize = KnownMemory[cnt].Size; */ /* OBSOLETE break; */ /* OBSOLETE case UDI29KIRAMSpace: */ /* OBSOLETE IMemStart = KnownMemory[cnt].Offset; */ /* OBSOLETE IMemSize = KnownMemory[cnt].Size; */ /* OBSOLETE break; */ /* OBSOLETE case UDI29KDRAMSpace: */ /* OBSOLETE DMemStart = KnownMemory[cnt].Offset; */ /* OBSOLETE DMemSize = KnownMemory[cnt].Size; */ /* OBSOLETE break; */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE a29k_get_processor_type (); */ /* OBSOLETE */ /* OBSOLETE if (UDICreateProcess (&PId)) */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "UDICreateProcess() failed\n"); */ /* OBSOLETE */ /* OBSOLETE /* Print out some stuff, letting the user now what's going on */ */ /* OBSOLETE if (UDICapabilities (&TIPId, &TargetId, DFEId, DFE, &TIP, &DFEIPCId, */ /* OBSOLETE &TIPIPCId, sbuf)) */ /* OBSOLETE error ("UDICapabilities() failed"); */ /* OBSOLETE if (from_tty) */ /* OBSOLETE { */ /* OBSOLETE printf_filtered ("Connected via UDI socket,\n\ */ /* OBSOLETE DFE-IPC version %x.%x.%x TIP-IPC version %x.%x.%x TIP version %x.%x.%x\n %s\n", */ /* OBSOLETE (DFEIPCId >> 8) & 0xf, (DFEIPCId >> 4) & 0xf, DFEIPCId & 0xf, */ /* OBSOLETE (TIPIPCId >> 8) & 0xf, (TIPIPCId >> 4) & 0xf, TIPIPCId & 0xf, */ /* OBSOLETE (TargetId >> 8) & 0xf, (TargetId >> 4) & 0xf, TargetId & 0xf, */ /* OBSOLETE sbuf); */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /******************************************************************* UDI_CLOSE */ /* OBSOLETE Close the open connection to the TIP process. */ /* OBSOLETE Use this when you want to detach and do something else */ /* OBSOLETE with your gdb. */ */ /* OBSOLETE static void */ /* OBSOLETE udi_close ( /*FIXME: how is quitting used */ */ /* OBSOLETE int quitting) */ /* OBSOLETE { */ /* OBSOLETE if (udi_session_id < 0) */ /* OBSOLETE return; */ /* OBSOLETE */ /* OBSOLETE /* We should never get here if there isn't something valid in */ /* OBSOLETE udi_session_id. */ */ /* OBSOLETE */ /* OBSOLETE if (UDIDisconnect (udi_session_id, UDITerminateSession)) */ /* OBSOLETE { */ /* OBSOLETE if (quitting) */ /* OBSOLETE warning ("UDIDisconnect() failed in udi_close"); */ /* OBSOLETE else */ /* OBSOLETE error ("UDIDisconnect() failed in udi_close"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* Do not try to close udi_session_id again, later in the program. */ */ /* OBSOLETE udi_session_id = -1; */ /* OBSOLETE inferior_ptid = null_ptid; */ /* OBSOLETE */ /* OBSOLETE printf_filtered (" Ending remote debugging\n"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /**************************************************************** UDI_ATACH */ */ /* OBSOLETE /* Attach to a program that is already loaded and running */ /* OBSOLETE * Upon exiting the process's execution is stopped. */ /* OBSOLETE */ */ /* OBSOLETE static void */ /* OBSOLETE udi_attach (char *args, int from_tty) */ /* OBSOLETE { */ /* OBSOLETE UDIResource From; */ /* OBSOLETE UDIInt32 PC_adds; */ /* OBSOLETE UDICount Count = 1; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE UDIError err; */ /* OBSOLETE */ /* OBSOLETE if (args == NULL) */ /* OBSOLETE error_no_arg ("program to attach"); */ /* OBSOLETE */ /* OBSOLETE if (udi_session_id < 0) */ /* OBSOLETE error ("UDI connection not opened yet, use the 'target udi' command.\n"); */ /* OBSOLETE */ /* OBSOLETE if (from_tty) */ /* OBSOLETE printf_unfiltered ("Attaching to remote program %s...\n", prog_name); */ /* OBSOLETE */ /* OBSOLETE UDIStop (); */ /* OBSOLETE From.Space = UDI29KSpecialRegs; */ /* OBSOLETE From.Offset = 11; */ /* OBSOLETE if (err = UDIRead (From, &PC_adds, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead failed in udi_attach"); */ /* OBSOLETE printf_unfiltered ("Remote process is now halted, pc1 = 0x%x.\n", PC_adds); */ /* OBSOLETE } */ /* OBSOLETE /************************************************************* UDI_DETACH */ */ /* OBSOLETE /* Terminate the open connection to the TIP process. */ /* OBSOLETE Use this when you want to detach and do something else */ /* OBSOLETE with your gdb. Leave remote process running (with no breakpoints set). */ */ /* OBSOLETE static void */ /* OBSOLETE udi_detach (char *args, int from_tty) */ /* OBSOLETE { */ /* OBSOLETE */ /* OBSOLETE remove_breakpoints (); /* Just in case there were any left in */ */ /* OBSOLETE */ /* OBSOLETE if (UDIDisconnect (udi_session_id, UDIContinueSession)) */ /* OBSOLETE error ("UDIDisconnect() failed in udi_detach"); */ /* OBSOLETE */ /* OBSOLETE /* Don't try to UDIDisconnect it again in udi_close, which is called from */ /* OBSOLETE pop_target. */ */ /* OBSOLETE udi_session_id = -1; */ /* OBSOLETE inferior_ptid = null_ptid; */ /* OBSOLETE */ /* OBSOLETE pop_target (); */ /* OBSOLETE */ /* OBSOLETE if (from_tty) */ /* OBSOLETE printf_unfiltered ("Detaching from TIP\n"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE */ /* OBSOLETE /****************************************************************** UDI_RESUME */ /* OBSOLETE ** Tell the remote machine to resume. */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_resume (ptid_t ptid, int step, enum target_signal sig) */ /* OBSOLETE { */ /* OBSOLETE UDIError tip_error; */ /* OBSOLETE UDIUInt32 Steps = 1; */ /* OBSOLETE UDIStepType StepType = UDIStepNatural; */ /* OBSOLETE UDIRange Range; */ /* OBSOLETE */ /* OBSOLETE if (step) /* step 1 instruction */ */ /* OBSOLETE { */ /* OBSOLETE tip_error = UDIStep (Steps, StepType, Range); */ /* OBSOLETE if (!tip_error) */ /* OBSOLETE return; */ /* OBSOLETE */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "UDIStep() error = %d\n", tip_error); */ /* OBSOLETE error ("failed in udi_resume"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (UDIExecute ()) */ /* OBSOLETE error ("UDIExecute() failed in udi_resume"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /******************************************************************** UDI_WAIT */ /* OBSOLETE ** Wait until the remote machine stops, then return, */ /* OBSOLETE storing status in STATUS just as `wait' would. */ */ /* OBSOLETE */ /* OBSOLETE static ptid_t */ /* OBSOLETE udi_wait (ptid_t ptid, struct target_waitstatus *status) */ /* OBSOLETE { */ /* OBSOLETE UDIInt32 MaxTime; */ /* OBSOLETE UDIPId PId; */ /* OBSOLETE UDIInt32 StopReason; */ /* OBSOLETE UDISizeT CountDone; */ /* OBSOLETE int old_timeout = timeout; */ /* OBSOLETE int old_immediate_quit = immediate_quit; */ /* OBSOLETE int i; */ /* OBSOLETE */ /* OBSOLETE status->kind = TARGET_WAITKIND_EXITED; */ /* OBSOLETE status->value.integer = 0; */ /* OBSOLETE */ /* OBSOLETE /* wait for message to arrive. It should be: */ /* OBSOLETE If the target stops executing, udi_wait() should return. */ /* OBSOLETE */ */ /* OBSOLETE timeout = 0; /* Wait indefinetly for a message */ */ /* OBSOLETE immediate_quit = 1; /* Helps ability to QUIT */ */ /* OBSOLETE */ /* OBSOLETE while (1) */ /* OBSOLETE { */ /* OBSOLETE i = 0; */ /* OBSOLETE MaxTime = UDIWaitForever; */ /* OBSOLETE UDIWait (MaxTime, &PId, &StopReason); */ /* OBSOLETE QUIT; /* Let user quit if they want */ */ /* OBSOLETE */ /* OBSOLETE switch (StopReason & UDIGrossState) */ /* OBSOLETE { */ /* OBSOLETE case UDIStdoutReady: */ /* OBSOLETE if (UDIGetStdout (sbuf, (UDISizeT) SBUF_MAX, &CountDone)) */ /* OBSOLETE /* This is said to happen if the program tries to output */ /* OBSOLETE a whole bunch of output (more than SBUF_MAX, I would */ /* OBSOLETE guess). It doesn't seem to happen with the simulator. */ */ /* OBSOLETE warning ("UDIGetStdout() failed in udi_wait"); */ /* OBSOLETE fwrite (sbuf, 1, CountDone, stdout); */ /* OBSOLETE gdb_flush (gdb_stdout); */ /* OBSOLETE continue; */ /* OBSOLETE */ /* OBSOLETE case UDIStderrReady: */ /* OBSOLETE UDIGetStderr (sbuf, (UDISizeT) SBUF_MAX, &CountDone); */ /* OBSOLETE fwrite (sbuf, 1, CountDone, stderr); */ /* OBSOLETE gdb_flush (gdb_stderr); */ /* OBSOLETE continue; */ /* OBSOLETE */ /* OBSOLETE case UDIStdinNeeded: */ /* OBSOLETE { */ /* OBSOLETE int ch; */ /* OBSOLETE i = 0; */ /* OBSOLETE do */ /* OBSOLETE { */ /* OBSOLETE ch = getchar (); */ /* OBSOLETE if (ch == EOF) */ /* OBSOLETE break; */ /* OBSOLETE sbuf[i++] = ch; */ /* OBSOLETE } */ /* OBSOLETE while (i < SBUF_MAX && ch != '\n'); */ /* OBSOLETE UDIPutStdin (sbuf, (UDISizeT) i, &CountDone); */ /* OBSOLETE continue; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE case UDIRunning: */ /* OBSOLETE /* In spite of the fact that we told UDIWait to wait forever, it will */ /* OBSOLETE return spuriously sometimes. */ */ /* OBSOLETE case UDIStdinModeX: */ /* OBSOLETE continue; */ /* OBSOLETE default: */ /* OBSOLETE break; */ /* OBSOLETE } */ /* OBSOLETE break; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE switch (StopReason & UDIGrossState) */ /* OBSOLETE { */ /* OBSOLETE case UDITrapped: */ /* OBSOLETE printf_unfiltered ("Am290*0 received vector number %d\n", StopReason >> 24); */ /* OBSOLETE */ /* OBSOLETE switch ((StopReason >> 8) & 0xff) */ /* OBSOLETE { */ /* OBSOLETE case 0: /* Illegal opcode */ */ /* OBSOLETE printf_unfiltered (" (break point)\n"); */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; */ /* OBSOLETE break; */ /* OBSOLETE case 1: /* Unaligned Access */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_BUS; */ /* OBSOLETE break; */ /* OBSOLETE case 3: */ /* OBSOLETE case 4: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_FPE; */ /* OBSOLETE break; */ /* OBSOLETE case 5: /* Protection Violation */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE /* Why not SEGV? What is a Protection Violation? */ */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_ILL; */ /* OBSOLETE break; */ /* OBSOLETE case 6: */ /* OBSOLETE case 7: */ /* OBSOLETE case 8: /* User Instruction Mapping Miss */ */ /* OBSOLETE case 9: /* User Data Mapping Miss */ */ /* OBSOLETE case 10: /* Supervisor Instruction Mapping Miss */ */ /* OBSOLETE case 11: /* Supervisor Data Mapping Miss */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_SEGV; */ /* OBSOLETE break; */ /* OBSOLETE case 12: */ /* OBSOLETE case 13: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_ILL; */ /* OBSOLETE break; */ /* OBSOLETE case 14: /* Timer */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_ALRM; */ /* OBSOLETE break; */ /* OBSOLETE case 15: /* Trace */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; */ /* OBSOLETE break; */ /* OBSOLETE case 16: /* INTR0 */ */ /* OBSOLETE case 17: /* INTR1 */ */ /* OBSOLETE case 18: /* INTR2 */ */ /* OBSOLETE case 19: /* INTR3/Internal */ */ /* OBSOLETE case 20: /* TRAP0 */ */ /* OBSOLETE case 21: /* TRAP1 */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_INT; */ /* OBSOLETE break; */ /* OBSOLETE case 22: /* Floating-Point Exception */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE /* Why not FPE? */ */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_ILL; */ /* OBSOLETE break; */ /* OBSOLETE case 77: /* assert 77 */ */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; */ /* OBSOLETE break; */ /* OBSOLETE default: */ /* OBSOLETE status->kind = TARGET_WAITKIND_EXITED; */ /* OBSOLETE status->value.integer = 0; */ /* OBSOLETE } */ /* OBSOLETE break; */ /* OBSOLETE case UDINotExecuting: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TERM; */ /* OBSOLETE break; */ /* OBSOLETE case UDIStopped: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TSTP; */ /* OBSOLETE break; */ /* OBSOLETE case UDIWarned: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_URG; */ /* OBSOLETE break; */ /* OBSOLETE case UDIStepped: */ /* OBSOLETE case UDIBreak: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; */ /* OBSOLETE break; */ /* OBSOLETE case UDIWaiting: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_STOP; */ /* OBSOLETE break; */ /* OBSOLETE case UDIHalted: */ /* OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; */ /* OBSOLETE status->value.sig = TARGET_SIGNAL_KILL; */ /* OBSOLETE break; */ /* OBSOLETE case UDIExited: */ /* OBSOLETE default: */ /* OBSOLETE status->kind = TARGET_WAITKIND_EXITED; */ /* OBSOLETE status->value.integer = 0; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE timeout = old_timeout; /* Restore original timeout value */ */ /* OBSOLETE immediate_quit = old_immediate_quit; */ /* OBSOLETE return inferior_ptid; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE #if 0 */ /* OBSOLETE /* Handy for debugging */ */ /* OBSOLETE udi_pc (void) */ /* OBSOLETE { */ /* OBSOLETE UDIResource From; */ /* OBSOLETE UDIUInt32 *To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE UDIError err; */ /* OBSOLETE int pc[2]; */ /* OBSOLETE unsigned long myregs[256]; */ /* OBSOLETE int i; */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KPC; */ /* OBSOLETE From.Offset = 0; */ /* OBSOLETE To = (UDIUInt32 *) pc; */ /* OBSOLETE Count = 2; */ /* OBSOLETE */ /* OBSOLETE err = UDIRead (From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE */ /* OBSOLETE printf_unfiltered ("err = %d, CountDone = %d, pc[0] = 0x%x, pc[1] = 0x%x\n", */ /* OBSOLETE err, CountDone, pc[0], pc[1]); */ /* OBSOLETE */ /* OBSOLETE udi_fetch_registers (-1); */ /* OBSOLETE */ /* OBSOLETE printf_unfiltered ("other pc1 = 0x%x, pc0 = 0x%x\n", *(int *) ®isters[4 * PC_REGNUM], */ /* OBSOLETE *(int *) ®isters[4 * NPC_REGNUM]); */ /* OBSOLETE */ /* OBSOLETE /* Now, read all the registers globally */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = 0; */ /* OBSOLETE err = UDIRead (From, myregs, 256, 4, &CountDone, HostEndian); */ /* OBSOLETE */ /* OBSOLETE printf ("err = %d, CountDone = %d\n", err, CountDone); */ /* OBSOLETE */ /* OBSOLETE printf ("\n"); */ /* OBSOLETE */ /* OBSOLETE for (i = 0; i < 256; i += 2) */ /* OBSOLETE printf ("%d:\t%#10x\t%11d\t%#10x\t%11d\n", i, myregs[i], myregs[i], */ /* OBSOLETE myregs[i + 1], myregs[i + 1]); */ /* OBSOLETE printf ("\n"); */ /* OBSOLETE */ /* OBSOLETE return pc[0]; */ /* OBSOLETE } */ /* OBSOLETE #endif */ /* OBSOLETE */ /* OBSOLETE /********************************************************** UDI_FETCH_REGISTERS */ /* OBSOLETE * Read a remote register 'regno'. */ /* OBSOLETE * If regno==-1 then read all the registers. */ /* OBSOLETE */ */ /* OBSOLETE static void */ /* OBSOLETE udi_fetch_registers (int regno) */ /* OBSOLETE { */ /* OBSOLETE UDIResource From; */ /* OBSOLETE UDIUInt32 *To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE UDIError err; */ /* OBSOLETE int i; */ /* OBSOLETE */ /* OBSOLETE if (regno >= 0) */ /* OBSOLETE { */ /* OBSOLETE fetch_register (regno); */ /* OBSOLETE return; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* Gr1/rsp */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = 1; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * GR1_REGNUM]; */ /* OBSOLETE Count = 1; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE register_valid[GR1_REGNUM] = 1; */ /* OBSOLETE */ /* OBSOLETE #if defined(GR64_REGNUM) /* Read gr64-127 */ */ /* OBSOLETE */ /* OBSOLETE /* Global Registers gr64-gr95 */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = 64; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * GR64_REGNUM]; */ /* OBSOLETE Count = 32; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE for (i = GR64_REGNUM; i < GR64_REGNUM + 32; i++) */ /* OBSOLETE register_valid[i] = 1; */ /* OBSOLETE */ /* OBSOLETE #endif /* GR64_REGNUM */ */ /* OBSOLETE */ /* OBSOLETE /* Global Registers gr96-gr127 */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = 96; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * GR96_REGNUM]; */ /* OBSOLETE Count = 32; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE for (i = GR96_REGNUM; i < GR96_REGNUM + 32; i++) */ /* OBSOLETE register_valid[i] = 1; */ /* OBSOLETE */ /* OBSOLETE /* Local Registers */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KLocalRegs; */ /* OBSOLETE From.Offset = 0; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * LR0_REGNUM]; */ /* OBSOLETE Count = 128; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE for (i = LR0_REGNUM; i < LR0_REGNUM + 128; i++) */ /* OBSOLETE register_valid[i] = 1; */ /* OBSOLETE */ /* OBSOLETE /* Protected Special Registers */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KSpecialRegs; */ /* OBSOLETE From.Offset = 0; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * SR_REGNUM (0)]; */ /* OBSOLETE Count = 15; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE for (i = SR_REGNUM (0); i < SR_REGNUM (0) + 15; i++) */ /* OBSOLETE register_valid[i] = 1; */ /* OBSOLETE */ /* OBSOLETE if (USE_SHADOW_PC) */ /* OBSOLETE { /* Let regno_to_srnum() handle the register number */ */ /* OBSOLETE fetch_register (NPC_REGNUM); */ /* OBSOLETE fetch_register (PC_REGNUM); */ /* OBSOLETE fetch_register (PC2_REGNUM); */ /* OBSOLETE */ /* OBSOLETE /* Unprotected Special Registers sr128-sr135 */ */ /* OBSOLETE */ /* OBSOLETE From.Space = UDI29KSpecialRegs; */ /* OBSOLETE From.Offset = 128; */ /* OBSOLETE To = (UDIUInt32 *) & registers[4 * SR_REGNUM (128)]; */ /* OBSOLETE Count = 135 - 128 + 1; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE for (i = SR_REGNUM (128); i < SR_REGNUM (128) + 135 - 128 + 1; i++) */ /* OBSOLETE register_valid[i] = 1; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (remote_debug) */ /* OBSOLETE { */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, "Fetching all registers\n"); */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, */ /* OBSOLETE "Fetching PC0 = 0x%x, PC1 = 0x%x, PC2 = 0x%x\n", */ /* OBSOLETE read_register (NPC_REGNUM), */ /* OBSOLETE read_register (PC_REGNUM), */ /* OBSOLETE read_register (PC2_REGNUM)); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* There doesn't seem to be any way to get these. */ */ /* OBSOLETE { */ /* OBSOLETE int val = -1; */ /* OBSOLETE supply_register (FPE_REGNUM, (char *) &val); */ /* OBSOLETE supply_register (INTE_REGNUM, (char *) &val); */ /* OBSOLETE supply_register (FPS_REGNUM, (char *) &val); */ /* OBSOLETE supply_register (EXO_REGNUM, (char *) &val); */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE */ /* OBSOLETE /********************************************************* UDI_STORE_REGISTERS */ /* OBSOLETE ** Store register regno into the target. */ /* OBSOLETE * If regno==-1 then store all the registers. */ /* OBSOLETE */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_store_registers (int regno) */ /* OBSOLETE { */ /* OBSOLETE UDIUInt32 *From; */ /* OBSOLETE UDIResource To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE */ /* OBSOLETE if (regno >= 0) */ /* OBSOLETE { */ /* OBSOLETE store_register (regno); */ /* OBSOLETE return; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (remote_debug) */ /* OBSOLETE { */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, "Storing all registers\n"); */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, */ /* OBSOLETE "PC0 = 0x%x, PC1 = 0x%x, PC2 = 0x%x\n", */ /* OBSOLETE read_register (NPC_REGNUM), */ /* OBSOLETE read_register (PC_REGNUM), */ /* OBSOLETE read_register (PC2_REGNUM)); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* Gr1/rsp */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * GR1_REGNUM]; */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = 1; */ /* OBSOLETE Count = 1; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE #if defined(GR64_REGNUM) */ /* OBSOLETE */ /* OBSOLETE /* Global registers gr64-gr95 */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * GR64_REGNUM]; */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = 64; */ /* OBSOLETE Count = 32; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE #endif /* GR64_REGNUM */ */ /* OBSOLETE */ /* OBSOLETE /* Global registers gr96-gr127 */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * GR96_REGNUM]; */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = 96; */ /* OBSOLETE Count = 32; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE /* Local Registers */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * LR0_REGNUM]; */ /* OBSOLETE To.Space = UDI29KLocalRegs; */ /* OBSOLETE To.Offset = 0; */ /* OBSOLETE Count = 128; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE */ /* OBSOLETE /* Protected Special Registers *//* VAB through TMR */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * SR_REGNUM (0)]; */ /* OBSOLETE To.Space = UDI29KSpecialRegs; */ /* OBSOLETE To.Offset = 0; */ /* OBSOLETE Count = 10; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE /* PC0, PC1, PC2 possibly as shadow registers */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * SR_REGNUM (10)]; */ /* OBSOLETE To.Space = UDI29KSpecialRegs; */ /* OBSOLETE Count = 3; */ /* OBSOLETE if (USE_SHADOW_PC) */ /* OBSOLETE To.Offset = 20; /* SPC0 */ */ /* OBSOLETE else */ /* OBSOLETE To.Offset = 10; /* PC0 */ */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE /* PC1 via UDI29KPC */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * PC_REGNUM]; */ /* OBSOLETE To.Space = UDI29KPC; */ /* OBSOLETE To.Offset = 0; /* PC1 */ */ /* OBSOLETE Count = 1; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE /* LRU and MMU */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * SR_REGNUM (13)]; */ /* OBSOLETE To.Space = UDI29KSpecialRegs; */ /* OBSOLETE To.Offset = 13; */ /* OBSOLETE Count = 2; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE /* Unprotected Special Registers */ */ /* OBSOLETE */ /* OBSOLETE From = (UDIUInt32 *) & registers[4 * SR_REGNUM (128)]; */ /* OBSOLETE To.Space = UDI29KSpecialRegs; */ /* OBSOLETE To.Offset = 128; */ /* OBSOLETE Count = 135 - 128 + 1; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIWrite() failed in udi_store_regisetrs"); */ /* OBSOLETE */ /* OBSOLETE registers_changed (); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /****************************************************** UDI_PREPARE_TO_STORE */ */ /* OBSOLETE /* Get ready to modify the registers array. On machines which store */ /* OBSOLETE individual registers, this doesn't need to do anything. On machines */ /* OBSOLETE which store all the registers in one fell swoop, this makes sure */ /* OBSOLETE that registers contains all the registers from the program being */ /* OBSOLETE debugged. */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_prepare_to_store (void) */ /* OBSOLETE { */ /* OBSOLETE /* Do nothing, since we can store individual regs */ */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /********************************************************** TRANSLATE_ADDR */ */ /* OBSOLETE static CORE_ADDR */ /* OBSOLETE translate_addr (CORE_ADDR addr) */ /* OBSOLETE { */ /* OBSOLETE #if defined(ULTRA3) && defined(KERNEL_DEBUGGING) */ /* OBSOLETE /* Check for a virtual address in the kernel */ */ /* OBSOLETE /* Assume physical address of ublock is in paddr_u register */ */ /* OBSOLETE /* FIXME: doesn't work for user virtual addresses */ */ /* OBSOLETE if (addr >= UVADDR) */ /* OBSOLETE { */ /* OBSOLETE /* PADDR_U register holds the physical address of the ublock */ */ /* OBSOLETE CORE_ADDR i = (CORE_ADDR) read_register (PADDR_U_REGNUM); */ /* OBSOLETE return (i + addr - (CORE_ADDR) UVADDR); */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE return (addr); */ /* OBSOLETE } */ /* OBSOLETE #else */ /* OBSOLETE return (addr); */ /* OBSOLETE #endif */ /* OBSOLETE } */ /* OBSOLETE /************************************************* UDI_XFER_INFERIOR_MEMORY */ */ /* OBSOLETE /* FIXME! Merge these two. */ */ /* OBSOLETE static int */ /* OBSOLETE udi_xfer_inferior_memory (CORE_ADDR memaddr, char *myaddr, int len, int write, */ /* OBSOLETE struct mem_attrib *attrib ATTRIBUTE_UNUSED, */ /* OBSOLETE struct target_ops *target ATTRIBUTE_UNUSED) */ /* OBSOLETE { */ /* OBSOLETE */ /* OBSOLETE memaddr = translate_addr (memaddr); */ /* OBSOLETE */ /* OBSOLETE if (write) */ /* OBSOLETE return udi_write_inferior_memory (memaddr, myaddr, len); */ /* OBSOLETE else */ /* OBSOLETE return udi_read_inferior_memory (memaddr, myaddr, len); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /********************************************************** UDI_FILES_INFO */ */ /* OBSOLETE static void */ /* OBSOLETE udi_files_info (struct target_ops *target) */ /* OBSOLETE { */ /* OBSOLETE printf_unfiltered ("\tAttached to UDI socket to %s", udi_config_id); */ /* OBSOLETE if (prog_name != NULL) */ /* OBSOLETE printf_unfiltered ("and running program %s", prog_name); */ /* OBSOLETE printf_unfiltered (".\n"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /**************************************************** UDI_INSERT_BREAKPOINT */ */ /* OBSOLETE static int */ /* OBSOLETE udi_insert_breakpoint (CORE_ADDR addr, char *contents_cache) */ /* OBSOLETE { */ /* OBSOLETE int cnt; */ /* OBSOLETE UDIError err; */ /* OBSOLETE */ /* OBSOLETE for (cnt = 0; cnt < BKPT_TABLE_SIZE; cnt++) */ /* OBSOLETE if (bkpt_table[cnt].Type == 0) /* Find first free slot */ */ /* OBSOLETE break; */ /* OBSOLETE */ /* OBSOLETE if (cnt >= BKPT_TABLE_SIZE) */ /* OBSOLETE error ("Too many breakpoints set"); */ /* OBSOLETE */ /* OBSOLETE bkpt_table[cnt].Addr.Offset = addr; */ /* OBSOLETE bkpt_table[cnt].Addr.Space = UDI29KIRAMSpace; */ /* OBSOLETE bkpt_table[cnt].PassCount = 1; */ /* OBSOLETE bkpt_table[cnt].Type = UDIBreakFlagExecute; */ /* OBSOLETE */ /* OBSOLETE err = UDISetBreakpoint (bkpt_table[cnt].Addr, */ /* OBSOLETE bkpt_table[cnt].PassCount, */ /* OBSOLETE bkpt_table[cnt].Type, */ /* OBSOLETE &bkpt_table[cnt].BreakId); */ /* OBSOLETE */ /* OBSOLETE if (err == 0) */ /* OBSOLETE return 0; /* Success */ */ /* OBSOLETE */ /* OBSOLETE bkpt_table[cnt].Type = 0; */ /* OBSOLETE error ("UDISetBreakpoint returned error code %d\n", err); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /**************************************************** UDI_REMOVE_BREAKPOINT */ */ /* OBSOLETE static int */ /* OBSOLETE udi_remove_breakpoint (CORE_ADDR addr, char *contents_cache) */ /* OBSOLETE { */ /* OBSOLETE int cnt; */ /* OBSOLETE UDIError err; */ /* OBSOLETE */ /* OBSOLETE for (cnt = 0; cnt < BKPT_TABLE_SIZE; cnt++) */ /* OBSOLETE if (bkpt_table[cnt].Addr.Offset == addr) /* Find matching breakpoint */ */ /* OBSOLETE break; */ /* OBSOLETE */ /* OBSOLETE if (cnt >= BKPT_TABLE_SIZE) */ /* OBSOLETE error ("Can't find breakpoint in table"); */ /* OBSOLETE */ /* OBSOLETE bkpt_table[cnt].Type = 0; */ /* OBSOLETE */ /* OBSOLETE err = UDIClearBreakpoint (bkpt_table[cnt].BreakId); */ /* OBSOLETE if (err == 0) */ /* OBSOLETE return 0; /* Success */ */ /* OBSOLETE */ /* OBSOLETE error ("UDIClearBreakpoint returned error code %d\n", err); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_kill (void) */ /* OBSOLETE { */ /* OBSOLETE */ /* OBSOLETE #if 0 */ /* OBSOLETE /* */ /* OBSOLETE UDIStop does not really work as advertised. It causes the TIP to close it's */ /* OBSOLETE connection, which usually results in GDB dying with a SIGPIPE. For now, we */ /* OBSOLETE just invoke udi_close, which seems to get things right. */ /* OBSOLETE */ */ /* OBSOLETE UDIStop (); */ /* OBSOLETE */ /* OBSOLETE udi_session_id = -1; */ /* OBSOLETE inferior_ptid = null_ptid; */ /* OBSOLETE */ /* OBSOLETE if (from_tty) */ /* OBSOLETE printf_unfiltered ("Target has been stopped."); */ /* OBSOLETE #endif /* 0 */ */ /* OBSOLETE #if 0 */ /* OBSOLETE udi_close (0); */ /* OBSOLETE pop_target (); */ /* OBSOLETE #endif /* 0 */ */ /* OBSOLETE */ /* OBSOLETE /* Keep the target around, e.g. so "run" can do the right thing when */ /* OBSOLETE we are already debugging something. */ */ /* OBSOLETE */ /* OBSOLETE if (UDIDisconnect (udi_session_id, UDITerminateSession)) */ /* OBSOLETE { */ /* OBSOLETE warning ("UDIDisconnect() failed"); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* Do not try to close udi_session_id again, later in the program. */ */ /* OBSOLETE udi_session_id = -1; */ /* OBSOLETE inferior_ptid = null_ptid; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* */ /* OBSOLETE Load a program into the target. Args are: `program {options}'. The options */ /* OBSOLETE are used to control loading of the program, and are NOT passed onto the */ /* OBSOLETE loaded code as arguments. (You need to use the `run' command to do that.) */ /* OBSOLETE */ /* OBSOLETE The options are: */ /* OBSOLETE -ms %d Set mem stack size to %d */ /* OBSOLETE -rs %d Set regular stack size to %d */ /* OBSOLETE -i send init info (default) */ /* OBSOLETE -noi don't send init info */ /* OBSOLETE -[tT] Load Text section */ /* OBSOLETE -[dD] Load Data section */ /* OBSOLETE -[bB] Load BSS section */ /* OBSOLETE -[lL] Load Lit section */ /* OBSOLETE */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE download (char *load_arg_string, int from_tty) */ /* OBSOLETE { */ /* OBSOLETE #define DEFAULT_MEM_STACK_SIZE 0x6000 */ /* OBSOLETE #define DEFAULT_REG_STACK_SIZE 0x2000 */ /* OBSOLETE */ /* OBSOLETE char *token; */ /* OBSOLETE char *filename; */ /* OBSOLETE asection *section; */ /* OBSOLETE bfd *pbfd; */ /* OBSOLETE UDIError err; */ /* OBSOLETE int load_text = 1, load_data = 1, load_bss = 1, load_lit = 1; */ /* OBSOLETE */ /* OBSOLETE address_ranges[0].Space = UDI29KIRAMSpace; */ /* OBSOLETE address_ranges[0].Offset = 0xffffffff; */ /* OBSOLETE address_ranges[0].Size = 0; */ /* OBSOLETE */ /* OBSOLETE address_ranges[1].Space = UDI29KDRAMSpace; */ /* OBSOLETE address_ranges[1].Offset = 0xffffffff; */ /* OBSOLETE address_ranges[1].Size = 0; */ /* OBSOLETE */ /* OBSOLETE stack_sizes[0] = DEFAULT_REG_STACK_SIZE; */ /* OBSOLETE stack_sizes[1] = DEFAULT_MEM_STACK_SIZE; */ /* OBSOLETE */ /* OBSOLETE dont_repeat (); */ /* OBSOLETE */ /* OBSOLETE filename = strtok (load_arg_string, " \t"); */ /* OBSOLETE if (!filename) */ /* OBSOLETE error ("Must specify at least a file name with the load command"); */ /* OBSOLETE */ /* OBSOLETE filename = tilde_expand (filename); */ /* OBSOLETE make_cleanup (xfree, filename); */ /* OBSOLETE */ /* OBSOLETE while (token = strtok (NULL, " \t")) */ /* OBSOLETE { */ /* OBSOLETE if (token[0] == '-') */ /* OBSOLETE { */ /* OBSOLETE token++; */ /* OBSOLETE */ /* OBSOLETE if (STREQ (token, "ms")) */ /* OBSOLETE stack_sizes[1] = atol (strtok (NULL, " \t")); */ /* OBSOLETE else if (STREQ (token, "rs")) */ /* OBSOLETE stack_sizes[0] = atol (strtok (NULL, " \t")); */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE load_text = load_data = load_bss = load_lit = 0; */ /* OBSOLETE */ /* OBSOLETE while (*token) */ /* OBSOLETE { */ /* OBSOLETE switch (*token++) */ /* OBSOLETE { */ /* OBSOLETE case 't': */ /* OBSOLETE case 'T': */ /* OBSOLETE load_text = 1; */ /* OBSOLETE break; */ /* OBSOLETE case 'd': */ /* OBSOLETE case 'D': */ /* OBSOLETE load_data = 1; */ /* OBSOLETE break; */ /* OBSOLETE case 'b': */ /* OBSOLETE case 'B': */ /* OBSOLETE load_bss = 1; */ /* OBSOLETE break; */ /* OBSOLETE case 'l': */ /* OBSOLETE case 'L': */ /* OBSOLETE load_lit = 1; */ /* OBSOLETE break; */ /* OBSOLETE default: */ /* OBSOLETE error ("Unknown UDI load option -%s", token - 1); */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE pbfd = bfd_openr (filename, gnutarget); */ /* OBSOLETE */ /* OBSOLETE if (!pbfd) */ /* OBSOLETE /* FIXME: should be using bfd_errmsg, not assuming it was */ /* OBSOLETE bfd_error_system_call. */ */ /* OBSOLETE perror_with_name (filename); */ /* OBSOLETE */ /* OBSOLETE /* FIXME: should be checking for errors from bfd_close (for one thing, */ /* OBSOLETE on error it does not free all the storage associated with the */ /* OBSOLETE bfd). */ */ /* OBSOLETE make_cleanup_bfd_close (pbfd); */ /* OBSOLETE */ /* OBSOLETE QUIT; */ /* OBSOLETE immediate_quit++; */ /* OBSOLETE */ /* OBSOLETE if (!bfd_check_format (pbfd, bfd_object)) */ /* OBSOLETE error ("It doesn't seem to be an object file"); */ /* OBSOLETE */ /* OBSOLETE for (section = pbfd->sections; section; section = section->next) */ /* OBSOLETE { */ /* OBSOLETE if (bfd_get_section_flags (pbfd, section) & SEC_ALLOC) */ /* OBSOLETE { */ /* OBSOLETE UDIResource To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE unsigned long section_size, section_end; */ /* OBSOLETE const char *section_name; */ /* OBSOLETE */ /* OBSOLETE section_name = bfd_get_section_name (pbfd, section); */ /* OBSOLETE if (STREQ (section_name, ".text") && !load_text) */ /* OBSOLETE continue; */ /* OBSOLETE else if (STREQ (section_name, ".data") && !load_data) */ /* OBSOLETE continue; */ /* OBSOLETE else if (STREQ (section_name, ".bss") && !load_bss) */ /* OBSOLETE continue; */ /* OBSOLETE else if (STREQ (section_name, ".lit") && !load_lit) */ /* OBSOLETE continue; */ /* OBSOLETE */ /* OBSOLETE To.Offset = bfd_get_section_vma (pbfd, section); */ /* OBSOLETE section_size = bfd_section_size (pbfd, section); */ /* OBSOLETE section_end = To.Offset + section_size; */ /* OBSOLETE */ /* OBSOLETE if (section_size == 0) */ /* OBSOLETE /* This is needed at least in the BSS case, where the code */ /* OBSOLETE below starts writing before it even checks the size. */ */ /* OBSOLETE continue; */ /* OBSOLETE */ /* OBSOLETE printf_unfiltered ("[Loading section %s at %x (%d bytes)]\n", */ /* OBSOLETE section_name, */ /* OBSOLETE To.Offset, */ /* OBSOLETE section_size); */ /* OBSOLETE */ /* OBSOLETE if (bfd_get_section_flags (pbfd, section) & SEC_CODE) */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KIRAMSpace; */ /* OBSOLETE */ /* OBSOLETE address_ranges[0].Offset = min (address_ranges[0].Offset, */ /* OBSOLETE To.Offset); */ /* OBSOLETE address_ranges[0].Size = max (address_ranges[0].Size, */ /* OBSOLETE section_end */ /* OBSOLETE - address_ranges[0].Offset); */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KDRAMSpace; */ /* OBSOLETE */ /* OBSOLETE address_ranges[1].Offset = min (address_ranges[1].Offset, */ /* OBSOLETE To.Offset); */ /* OBSOLETE address_ranges[1].Size = max (address_ranges[1].Size, */ /* OBSOLETE section_end */ /* OBSOLETE - address_ranges[1].Offset); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (bfd_get_section_flags (pbfd, section) & SEC_LOAD) /* Text, data or lit */ */ /* OBSOLETE { */ /* OBSOLETE file_ptr fptr; */ /* OBSOLETE */ /* OBSOLETE fptr = 0; */ /* OBSOLETE */ /* OBSOLETE while (section_size > 0) */ /* OBSOLETE { */ /* OBSOLETE char buffer[1024]; */ /* OBSOLETE */ /* OBSOLETE Count = min (section_size, 1024); */ /* OBSOLETE */ /* OBSOLETE bfd_get_section_contents (pbfd, section, buffer, fptr, */ /* OBSOLETE Count); */ /* OBSOLETE */ /* OBSOLETE err = UDIWrite ((UDIHostMemPtr) buffer, /* From */ */ /* OBSOLETE To, /* To */ */ /* OBSOLETE Count, /* Count */ */ /* OBSOLETE (UDISizeT) 1, /* Size */ */ /* OBSOLETE &Count, /* CountDone */ */ /* OBSOLETE (UDIBool) 0); /* HostEndian */ */ /* OBSOLETE if (err) */ /* OBSOLETE error ("UDIWrite failed, error = %d", err); */ /* OBSOLETE */ /* OBSOLETE To.Offset += Count; */ /* OBSOLETE fptr += Count; */ /* OBSOLETE section_size -= Count; */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE /* BSS */ */ /* OBSOLETE { */ /* OBSOLETE UDIResource From; */ /* OBSOLETE unsigned long zero = 0; */ /* OBSOLETE */ /* OBSOLETE /* Write a zero byte at the vma */ */ /* OBSOLETE /* FIXME: Broken for sections of 1-3 bytes (we test for */ /* OBSOLETE zero above). */ */ /* OBSOLETE err = UDIWrite ((UDIHostMemPtr) & zero, /* From */ */ /* OBSOLETE To, /* To */ */ /* OBSOLETE (UDICount) 1, /* Count */ */ /* OBSOLETE (UDISizeT) 4, /* Size */ */ /* OBSOLETE &Count, /* CountDone */ */ /* OBSOLETE (UDIBool) 0); /* HostEndian */ */ /* OBSOLETE if (err) */ /* OBSOLETE error ("UDIWrite failed, error = %d", err); */ /* OBSOLETE */ /* OBSOLETE From = To; */ /* OBSOLETE To.Offset += 4; */ /* OBSOLETE */ /* OBSOLETE /* Now, duplicate it for the length of the BSS */ */ /* OBSOLETE err = UDICopy (From, /* From */ */ /* OBSOLETE To, /* To */ */ /* OBSOLETE (UDICount) (section_size / 4 - 1), /* Count */ */ /* OBSOLETE (UDISizeT) 4, /* Size */ */ /* OBSOLETE &Count, /* CountDone */ */ /* OBSOLETE (UDIBool) 1); /* Direction */ */ /* OBSOLETE if (err) */ /* OBSOLETE { */ /* OBSOLETE char message[100]; */ /* OBSOLETE int xerr; */ /* OBSOLETE */ /* OBSOLETE xerr = UDIGetErrorMsg (err, 100, message, &Count); */ /* OBSOLETE if (!xerr) */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "Error is %s\n", message); */ /* OBSOLETE else */ /* OBSOLETE fprintf_unfiltered (gdb_stderr, "xerr is %d\n", xerr); */ /* OBSOLETE error ("UDICopy failed, error = %d", err); */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE entry.Space = UDI29KIRAMSpace; */ /* OBSOLETE entry.Offset = bfd_get_start_address (pbfd); */ /* OBSOLETE */ /* OBSOLETE immediate_quit--; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* Function to download an image into the remote target. */ */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE udi_load (char *args, int from_tty) */ /* OBSOLETE { */ /* OBSOLETE download (args, from_tty); */ /* OBSOLETE */ /* OBSOLETE /* As a convenience, pick up any symbol info that is in the program */ /* OBSOLETE being loaded. Note that we assume that the program is the``mainline''; */ /* OBSOLETE if this is not always true, then this code will need to be augmented. */ */ /* OBSOLETE symbol_file_add (strtok (args, " \t"), from_tty, NULL, 1, 0); */ /* OBSOLETE */ /* OBSOLETE /* Getting new symbols may change our opinion about what is */ /* OBSOLETE frameless. */ */ /* OBSOLETE reinit_frame_cache (); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /*************************************************** UDI_WRITE_INFERIOR_MEMORY */ /* OBSOLETE ** Copy LEN bytes of data from debugger memory at MYADDR */ /* OBSOLETE to inferior's memory at MEMADDR. Returns number of bytes written. */ */ /* OBSOLETE static int */ /* OBSOLETE udi_write_inferior_memory (CORE_ADDR memaddr, char *myaddr, int len) */ /* OBSOLETE { */ /* OBSOLETE int nwritten = 0; */ /* OBSOLETE UDIUInt32 *From; */ /* OBSOLETE UDIResource To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE UDISizeT Size = 1; */ /* OBSOLETE UDICount CountDone = 0; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE */ /* OBSOLETE To.Space = udi_memory_space (memaddr); */ /* OBSOLETE From = (UDIUInt32 *) myaddr; */ /* OBSOLETE */ /* OBSOLETE while (nwritten < len) */ /* OBSOLETE { */ /* OBSOLETE Count = len - nwritten; */ /* OBSOLETE if (Count > MAXDATA) */ /* OBSOLETE Count = MAXDATA; */ /* OBSOLETE To.Offset = memaddr + nwritten; */ /* OBSOLETE if (UDIWrite (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE { */ /* OBSOLETE error ("UDIWrite() failed in udi_write_inferior_memory"); */ /* OBSOLETE break; */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE nwritten += CountDone; */ /* OBSOLETE From += CountDone; */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE return (nwritten); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /**************************************************** UDI_READ_INFERIOR_MEMORY */ /* OBSOLETE ** Read LEN bytes from inferior memory at MEMADDR. Put the result */ /* OBSOLETE at debugger address MYADDR. Returns number of bytes read. */ */ /* OBSOLETE static int */ /* OBSOLETE udi_read_inferior_memory (CORE_ADDR memaddr, char *myaddr, int len) */ /* OBSOLETE { */ /* OBSOLETE int nread = 0; */ /* OBSOLETE UDIResource From; */ /* OBSOLETE UDIUInt32 *To; */ /* OBSOLETE UDICount Count; */ /* OBSOLETE UDISizeT Size = 1; */ /* OBSOLETE UDICount CountDone = 0; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE UDIError err; */ /* OBSOLETE */ /* OBSOLETE From.Space = udi_memory_space (memaddr); */ /* OBSOLETE To = (UDIUInt32 *) myaddr; */ /* OBSOLETE */ /* OBSOLETE while (nread < len) */ /* OBSOLETE { */ /* OBSOLETE Count = len - nread; */ /* OBSOLETE if (Count > MAXDATA) */ /* OBSOLETE Count = MAXDATA; */ /* OBSOLETE From.Offset = memaddr + nread; */ /* OBSOLETE if (err = UDIRead (From, To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE { */ /* OBSOLETE error ("UDIRead() failed in udi_read_inferior_memory"); */ /* OBSOLETE break; */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE nread += CountDone; */ /* OBSOLETE To += CountDone; */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE return (nread); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /********************************************************************* WARNING */ /* OBSOLETE */ */ /* OBSOLETE udi_warning (int num) */ /* OBSOLETE { */ /* OBSOLETE error ("ERROR while loading program into remote TIP: $d\n", num); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE */ /* OBSOLETE /*****************************************************************************/ */ /* OBSOLETE /* Fetch a single register indicatated by 'regno'. */ /* OBSOLETE * Returns 0/-1 on success/failure. */ /* OBSOLETE */ */ /* OBSOLETE static void */ /* OBSOLETE fetch_register (int regno) */ /* OBSOLETE { */ /* OBSOLETE UDIResource From; */ /* OBSOLETE UDIUInt32 To; */ /* OBSOLETE UDICount Count = 1; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE UDIError err; */ /* OBSOLETE int result; */ /* OBSOLETE */ /* OBSOLETE if (regno == GR1_REGNUM) */ /* OBSOLETE { */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = 1; */ /* OBSOLETE } */ /* OBSOLETE else if (regno >= GR96_REGNUM && regno < GR96_REGNUM + 32) */ /* OBSOLETE { */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = (regno - GR96_REGNUM) + 96;; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE #if defined(GR64_REGNUM) */ /* OBSOLETE */ /* OBSOLETE else if (regno >= GR64_REGNUM && regno < GR64_REGNUM + 32) */ /* OBSOLETE { */ /* OBSOLETE From.Space = UDI29KGlobalRegs; */ /* OBSOLETE From.Offset = (regno - GR64_REGNUM) + 64; */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE #endif /* GR64_REGNUM */ */ /* OBSOLETE */ /* OBSOLETE else if (regno >= LR0_REGNUM && regno < LR0_REGNUM + 128) */ /* OBSOLETE { */ /* OBSOLETE From.Space = UDI29KLocalRegs; */ /* OBSOLETE From.Offset = (regno - LR0_REGNUM); */ /* OBSOLETE } */ /* OBSOLETE else if (regno >= FPE_REGNUM && regno <= EXO_REGNUM) */ /* OBSOLETE { */ /* OBSOLETE int val = -1; */ /* OBSOLETE /*supply_register(160 + (regno - FPE_REGNUM),(char *) &val); */ */ /* OBSOLETE supply_register (regno, (char *) &val); */ /* OBSOLETE return; /* Pretend Success */ */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ /* OBSOLETE From.Space = UDI29KSpecialRegs; */ /* OBSOLETE From.Offset = regnum_to_srnum (regno); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (err = UDIRead (From, &To, Count, Size, &CountDone, HostEndian)) */ /* OBSOLETE error ("UDIRead() failed in udi_fetch_registers"); */ /* OBSOLETE */ /* OBSOLETE supply_register (regno, (char *) &To); */ /* OBSOLETE */ /* OBSOLETE if (remote_debug) */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, "Fetching register %s = 0x%x\n", */ /* OBSOLETE REGISTER_NAME (regno), To); */ /* OBSOLETE } */ /* OBSOLETE /*****************************************************************************/ */ /* OBSOLETE /* Store a single register indicated by 'regno'. */ /* OBSOLETE * Returns 0/-1 on success/failure. */ /* OBSOLETE */ */ /* OBSOLETE static int */ /* OBSOLETE store_register (int regno) */ /* OBSOLETE { */ /* OBSOLETE int result; */ /* OBSOLETE UDIUInt32 From; */ /* OBSOLETE UDIResource To; */ /* OBSOLETE UDICount Count = 1; */ /* OBSOLETE UDISizeT Size = 4; */ /* OBSOLETE UDICount CountDone; */ /* OBSOLETE UDIBool HostEndian = 0; */ /* OBSOLETE */ /* OBSOLETE From = read_register (regno); /* get data value */ */ /* OBSOLETE */ /* OBSOLETE if (remote_debug) */ /* OBSOLETE fprintf_unfiltered (gdb_stdlog, "Storing register %s = 0x%x\n", */ /* OBSOLETE REGISTER_NAME (regno), From); */ /* OBSOLETE */ /* OBSOLETE if (regno == GR1_REGNUM) */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = 1; */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE /* Setting GR1 changes the numbers of all the locals, so invalidate the */ /* OBSOLETE * register cache. Do this *after* calling read_register, because we want */ /* OBSOLETE * read_register to return the value that write_register has just stuffed */ /* OBSOLETE * into the registers array, not the value of the register fetched from */ /* OBSOLETE * the inferior. */ /* OBSOLETE */ */ /* OBSOLETE registers_changed (); */ /* OBSOLETE } */ /* OBSOLETE #if defined(GR64_REGNUM) */ /* OBSOLETE else if (regno >= GR64_REGNUM && regno < GR64_REGNUM + 32) */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = (regno - GR64_REGNUM) + 64; */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE } */ /* OBSOLETE #endif /* GR64_REGNUM */ */ /* OBSOLETE else if (regno >= GR96_REGNUM && regno < GR96_REGNUM + 32) */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KGlobalRegs; */ /* OBSOLETE To.Offset = (regno - GR96_REGNUM) + 96; */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE } */ /* OBSOLETE else if (regno >= LR0_REGNUM && regno < LR0_REGNUM + 128) */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KLocalRegs; */ /* OBSOLETE To.Offset = (regno - LR0_REGNUM); */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE } */ /* OBSOLETE else if (regno >= FPE_REGNUM && regno <= EXO_REGNUM) */ /* OBSOLETE return 0; /* Pretend Success */ */ /* OBSOLETE else if (regno == PC_REGNUM) */ /* OBSOLETE { */ /* OBSOLETE /* PC1 via UDI29KPC */ */ /* OBSOLETE */ /* OBSOLETE To.Space = UDI29KPC; */ /* OBSOLETE To.Offset = 0; /* PC1 */ */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE */ /* OBSOLETE /* Writing to this loc actually changes the values of pc0 & pc1 */ */ /* OBSOLETE */ /* OBSOLETE register_valid[PC_REGNUM] = 0; /* pc1 */ */ /* OBSOLETE register_valid[NPC_REGNUM] = 0; /* pc0 */ */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE /* An unprotected or protected special register */ */ /* OBSOLETE { */ /* OBSOLETE To.Space = UDI29KSpecialRegs; */ /* OBSOLETE To.Offset = regnum_to_srnum (regno); */ /* OBSOLETE result = UDIWrite (&From, To, Count, Size, &CountDone, HostEndian); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE if (result != 0) */ /* OBSOLETE error ("UDIWrite() failed in store_registers"); */ /* OBSOLETE */ /* OBSOLETE return 0; */ /* OBSOLETE } */ /* OBSOLETE /********************************************************** REGNUM_TO_SRNUM */ */ /* OBSOLETE /* */ /* OBSOLETE * Convert a gdb special register number to a 29000 special register number. */ /* OBSOLETE */ */ /* OBSOLETE static int */ /* OBSOLETE regnum_to_srnum (int regno) */ /* OBSOLETE { */ /* OBSOLETE switch (regno) */ /* OBSOLETE { */ /* OBSOLETE case VAB_REGNUM: */ /* OBSOLETE return (0); */ /* OBSOLETE case OPS_REGNUM: */ /* OBSOLETE return (1); */ /* OBSOLETE case CPS_REGNUM: */ /* OBSOLETE return (2); */ /* OBSOLETE case CFG_REGNUM: */ /* OBSOLETE return (3); */ /* OBSOLETE case CHA_REGNUM: */ /* OBSOLETE return (4); */ /* OBSOLETE case CHD_REGNUM: */ /* OBSOLETE return (5); */ /* OBSOLETE case CHC_REGNUM: */ /* OBSOLETE return (6); */ /* OBSOLETE case RBP_REGNUM: */ /* OBSOLETE return (7); */ /* OBSOLETE case TMC_REGNUM: */ /* OBSOLETE return (8); */ /* OBSOLETE case TMR_REGNUM: */ /* OBSOLETE return (9); */ /* OBSOLETE case NPC_REGNUM: */ /* OBSOLETE return (USE_SHADOW_PC ? (20) : (10)); */ /* OBSOLETE case PC_REGNUM: */ /* OBSOLETE return (USE_SHADOW_PC ? (21) : (11)); */ /* OBSOLETE case PC2_REGNUM: */ /* OBSOLETE return (USE_SHADOW_PC ? (22) : (12)); */ /* OBSOLETE case MMU_REGNUM: */ /* OBSOLETE return (13); */ /* OBSOLETE case LRU_REGNUM: */ /* OBSOLETE return (14); */ /* OBSOLETE case IPC_REGNUM: */ /* OBSOLETE return (128); */ /* OBSOLETE case IPA_REGNUM: */ /* OBSOLETE return (129); */ /* OBSOLETE case IPB_REGNUM: */ /* OBSOLETE return (130); */ /* OBSOLETE case Q_REGNUM: */ /* OBSOLETE return (131); */ /* OBSOLETE case ALU_REGNUM: */ /* OBSOLETE return (132); */ /* OBSOLETE case BP_REGNUM: */ /* OBSOLETE return (133); */ /* OBSOLETE case FC_REGNUM: */ /* OBSOLETE return (134); */ /* OBSOLETE case CR_REGNUM: */ /* OBSOLETE return (135); */ /* OBSOLETE case FPE_REGNUM: */ /* OBSOLETE return (160); */ /* OBSOLETE case INTE_REGNUM: */ /* OBSOLETE return (161); */ /* OBSOLETE case FPS_REGNUM: */ /* OBSOLETE return (162); */ /* OBSOLETE case EXO_REGNUM: */ /* OBSOLETE return (164); */ /* OBSOLETE default: */ /* OBSOLETE return (255); /* Failure ? */ */ /* OBSOLETE } */ /* OBSOLETE } */ /* OBSOLETE /****************************************************************************/ */ /* OBSOLETE /* */ /* OBSOLETE * Determine the Target memory space qualifier based on the addr. */ /* OBSOLETE * FIXME: Can't distinguis I_ROM/D_ROM. */ /* OBSOLETE * FIXME: Doesn't know anything about I_CACHE/D_CACHE. */ /* OBSOLETE */ */ /* OBSOLETE static CPUSpace */ /* OBSOLETE udi_memory_space (CORE_ADDR addr) */ /* OBSOLETE { */ /* OBSOLETE UDIUInt32 tstart = IMemStart; */ /* OBSOLETE UDIUInt32 tend = tstart + IMemSize; */ /* OBSOLETE UDIUInt32 dstart = DMemStart; */ /* OBSOLETE UDIUInt32 dend = tstart + DMemSize; */ /* OBSOLETE UDIUInt32 rstart = RMemStart; */ /* OBSOLETE UDIUInt32 rend = tstart + RMemSize; */ /* OBSOLETE */ /* OBSOLETE if (((UDIUInt32) addr >= tstart) && ((UDIUInt32) addr < tend)) */ /* OBSOLETE { */ /* OBSOLETE return UDI29KIRAMSpace; */ /* OBSOLETE } */ /* OBSOLETE else if (((UDIUInt32) addr >= dstart) && ((UDIUInt32) addr < dend)) */ /* OBSOLETE { */ /* OBSOLETE return UDI29KDRAMSpace; */ /* OBSOLETE } */ /* OBSOLETE else if (((UDIUInt32) addr >= rstart) && ((UDIUInt32) addr < rend)) */ /* OBSOLETE { */ /* OBSOLETE /* FIXME: how do we determine between D_ROM and I_ROM */ */ /* OBSOLETE return UDI29KIROMSpace; */ /* OBSOLETE } */ /* OBSOLETE else /* FIXME: what do me do now? */ */ /* OBSOLETE return UDI29KDRAMSpace; /* Hmmm! */ */ /* OBSOLETE } */ /* OBSOLETE /*********************************************************************** STUBS */ /* OBSOLETE */ */ /* OBSOLETE */ /* OBSOLETE void */ /* OBSOLETE convert16 (void) */ /* OBSOLETE {; */ /* OBSOLETE } */ /* OBSOLETE void */ /* OBSOLETE convert32 (void) */ /* OBSOLETE {; */ /* OBSOLETE } */ /* OBSOLETE struct ui_file *EchoFile = 0; /* used for debugging */ */ /* OBSOLETE int QuietMode = 0; /* used for debugging */ */ /* OBSOLETE */ /* OBSOLETE #ifdef NO_HIF_SUPPORT */ /* OBSOLETE service_HIF (union msg_t *msg) */ /* OBSOLETE { */ /* OBSOLETE return (0); /* Emulate a failure */ */ /* OBSOLETE } */ /* OBSOLETE #endif */ /* OBSOLETE */ /* OBSOLETE /* Target_ops vector. Not static because there does not seem to be */ /* OBSOLETE any portable way to do a forward declaration of a static variable. */ /* OBSOLETE The RS/6000 doesn't like "extern" followed by "static"; SunOS */ /* OBSOLETE /bin/cc doesn't like "static" twice. */ */ /* OBSOLETE */ /* OBSOLETE struct target_ops udi_ops; */ /* OBSOLETE */ /* OBSOLETE static void */ /* OBSOLETE init_udi_ops (void) */ /* OBSOLETE { */ /* OBSOLETE udi_ops.to_shortname = "udi"; */ /* OBSOLETE udi_ops.to_longname = "Remote UDI connected TIP"; */ /* OBSOLETE udi_ops.to_doc = "Remote debug an AMD 29k using UDI socket connection to TIP process.\n\ */ /* OBSOLETE Arguments are\n\ */ /* OBSOLETE `configuration-id AF_INET hostname port-number'\n\ */ /* OBSOLETE To connect via the network, where hostname and port-number specify the\n\ */ /* OBSOLETE host and port where you can connect via UDI.\n\ */ /* OBSOLETE configuration-id is unused.\n\ */ /* OBSOLETE \n\ */ /* OBSOLETE `configuration-id AF_UNIX socket-name tip-program'\n\ */ /* OBSOLETE To connect using a local connection to the \"tip.exe\" program which is\n\ */ /* OBSOLETE supplied by AMD. If socket-name specifies an AF_UNIX socket then the\n\ */ /* OBSOLETE tip program must already be started; connect to it using that socket.\n\ */ /* OBSOLETE If not, start up tip-program, which should be the name of the tip\n\ */ /* OBSOLETE program. If appropriate, the PATH environment variable is searched.\n\ */ /* OBSOLETE configuration-id is unused.\n\ */ /* OBSOLETE \n\ */ /* OBSOLETE `configuration-id'\n\ */ /* OBSOLETE Look up the configuration in ./udi_soc or /etc/udi_soc, which\n\ */ /* OBSOLETE are files containing lines in the above formats. configuration-id is\n\ */ /* OBSOLETE used to pick which line of the file to use."; */ /* OBSOLETE udi_ops.to_open = udi_open; */ /* OBSOLETE udi_ops.to_close = udi_close; */ /* OBSOLETE udi_ops.to_attach = udi_attach; */ /* OBSOLETE udi_ops.to_detach = udi_detach; */ /* OBSOLETE udi_ops.to_resume = udi_resume; */ /* OBSOLETE udi_ops.to_wait = udi_wait; */ /* OBSOLETE udi_ops.to_fetch_registers = udi_fetch_registers; */ /* OBSOLETE udi_ops.to_store_registers = udi_store_registers; */ /* OBSOLETE udi_ops.to_prepare_to_store = udi_prepare_to_store; */ /* OBSOLETE udi_ops.to_xfer_memory = udi_xfer_inferior_memory; */ /* OBSOLETE udi_ops.to_files_info = udi_files_info; */ /* OBSOLETE udi_ops.to_insert_breakpoint = udi_insert_breakpoint; */ /* OBSOLETE udi_ops.to_remove_breakpoint = udi_remove_breakpoint; */ /* OBSOLETE udi_ops.to_terminal_init = 0; */ /* OBSOLETE udi_ops.to_terminal_inferior = 0; */ /* OBSOLETE udi_ops.to_terminal_ours_for_output = 0; */ /* OBSOLETE udi_ops.to_terminal_ours = 0; */ /* OBSOLETE udi_ops.to_terminal_info = 0; */ /* OBSOLETE udi_ops.to_kill = udi_kill; */ /* OBSOLETE udi_ops.to_load = udi_load; */ /* OBSOLETE udi_ops.to_lookup_symbol = 0; */ /* OBSOLETE udi_ops.to_create_inferior = udi_create_inferior; */ /* OBSOLETE udi_ops.to_mourn_inferior = udi_mourn; */ /* OBSOLETE udi_ops.to_can_run = 0; */ /* OBSOLETE udi_ops.to_notice_signals = 0; */ /* OBSOLETE udi_ops.to_thread_alive = 0; */ /* OBSOLETE udi_ops.to_stop = 0; */ /* OBSOLETE udi_ops.to_stratum = process_stratum; */ /* OBSOLETE udi_ops.DONT_USE = 0; */ /* OBSOLETE udi_ops.to_has_all_memory = 1; */ /* OBSOLETE udi_ops.to_has_memory = 1; */ /* OBSOLETE udi_ops.to_has_stack = 1; */ /* OBSOLETE udi_ops.to_has_registers = 1; */ /* OBSOLETE udi_ops.to_has_execution = 1; */ /* OBSOLETE udi_ops.to_sections = 0; */ /* OBSOLETE udi_ops.to_sections_end = 0; */ /* OBSOLETE udi_ops.to_magic = OPS_MAGIC; */ /* OBSOLETE }; */ /* OBSOLETE */ /* OBSOLETE void */ /* OBSOLETE _initialize_remote_udi (void) */ /* OBSOLETE { */ /* OBSOLETE init_udi_ops (); */ /* OBSOLETE add_target (&udi_ops); */ /* OBSOLETE } */