Google Git
Sign in
fuchsia / third_party / binutils-gdb / 694b26b8e881dd7336e3c0634731f2eee1c1cda6 / . / gdb / remote-udi.c
blob: f7863a81395144fe0bc93ad7a030a82ec88524a2 [file] [log] [blame]
/* 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 *) &registers[4 * PC_REGNUM], */
/* OBSOLETE *(int *) &registers[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 } */