summaryrefslogtreecommitdiffstats
path: root/sys/amd64
diff options
context:
space:
mode:
authormarcel <marcel@FreeBSD.org>2004-07-11 01:47:26 +0000
committermarcel <marcel@FreeBSD.org>2004-07-11 01:47:26 +0000
commit1a65a2060a2262e120c5eff2469817075342e795 (patch)
tree50fb87e6f1e03cd909ef29a3047a8b1a667cac09 /sys/amd64
parent547077c748f1530957c37985d5500fa98ceb5acb (diff)
downloadFreeBSD-src-1a65a2060a2262e120c5eff2469817075342e795.zip
FreeBSD-src-1a65a2060a2262e120c5eff2469817075342e795.tar.gz
Remove the now unused GDB stubs. See src/sys/gdb/* for the new KDB
backend.
Diffstat (limited to 'sys/amd64')
-rw-r--r--sys/amd64/amd64/amd64-gdbstub.c614
1 files changed, 0 insertions, 614 deletions
diff --git a/sys/amd64/amd64/amd64-gdbstub.c b/sys/amd64/amd64/amd64-gdbstub.c
deleted file mode 100644
index ac001cd..0000000
--- a/sys/amd64/amd64/amd64-gdbstub.c
+++ /dev/null
@@ -1,614 +0,0 @@
-/****************************************************************************
-
- THIS SOFTWARE IS NOT COPYRIGHTED
-
- HP offers the following for use in the public domain. HP makes no
- warranty with regard to the software or its performance and the
- user accepts the software "AS IS" with all faults.
-
- HP DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD
- TO THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES
- OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
-
-****************************************************************************/
-
-#include <sys/cdefs.h>
-__FBSDID("$FreeBSD$");
-
-/****************************************************************************
- * Header: remcom.c,v 1.34 91/03/09 12:29:49 glenne Exp $
- *
- * Module name: remcom.c $
- * Revision: 1.34 $
- * Date: 91/03/09 12:29:49 $
- * Contributor: Lake Stevens Instrument Division$
- *
- * Description: low level support for gdb debugger. $
- *
- * Considerations: only works on target hardware $
- *
- * Written by: Glenn Engel $
- * ModuleState: Experimental $
- *
- * NOTES: See Below $
- *
- * Modified for FreeBSD by Stu Grossman.
- *
- * To enable debugger support, two things need to happen. One, a
- * call to set_debug_traps() is necessary in order to allow any breakpoints
- * or error conditions to be properly intercepted and reported to gdb.
- * Two, a breakpoint needs to be generated to begin communication. This
- * is most easily accomplished by a call to breakpoint(). Breakpoint()
- * simulates a breakpoint by executing a trap #1.
- *
- * The external function exceptionHandler() is
- * used to attach a specific handler to a specific 386 vector number.
- * It should use the same privilege level it runs at. It should
- * install it as an interrupt gate so that interrupts are masked
- * while the handler runs.
- * Also, need to assign exceptionHook and oldExceptionHook.
- *
- * Because gdb will sometimes write to the stack area to execute function
- * calls, this program cannot rely on using the supervisor stack so it
- * uses its own stack area reserved in the int array remcomStack.
- *
- *************
- *
- * The following gdb commands are supported:
- *
- * command function Return value
- *
- * g return the value of the CPU registers hex data or ENN
- * G set the value of the CPU registers OK or ENN
- *
- * mAA..AA,LLLL Read LLLL bytes at address AA..AA hex data or ENN
- * MAA..AA,LLLL: Write LLLL bytes at address AA.AA OK or ENN
- *
- * c Resume at current address SNN ( signal NN)
- * cAA..AA Continue at address AA..AA SNN
- *
- * s Step one instruction SNN
- * sAA..AA Step one instruction from AA..AA SNN
- *
- * k kill
- *
- * ? What was the last sigval ? SNN (signal NN)
- *
- * D detach OK
- *
- * All commands and responses are sent with a packet which includes a
- * checksum. A packet consists of
- *
- * $<packet info>#<checksum>.
- *
- * where
- * <packet info> :: <characters representing the command or response>
- * <checksum> :: < two hex digits computed as modulo 256 sum of <packetinfo>>
- *
- * When a packet is received, it is first acknowledged with either '+' or '-'.
- * '+' indicates a successful transfer. '-' indicates a failed transfer.
- *
- * Example:
- *
- * Host: Reply:
- * $m0,10#2a +$00010203040506070809101112131415#42
- *
- ****************************************************************************/
-
-#include <sys/param.h>
-#include <sys/reboot.h>
-#include <sys/systm.h>
-#include <sys/cons.h>
-
-#include <ddb/ddb.h>
-
-#include <machine/setjmp.h>
-
-#include "opt_ddb.h"
-
-int gdb_handle_exception (db_regs_t *, int, int);
-
-/************************************************************************/
-
-extern jmp_buf db_jmpbuf;
-
-/************************************************************************/
-/* BUFMAX defines the maximum number of characters in inbound/outbound buffers*/
-/* at least NUMREGBYTES*2 are needed for register packets */
-#define BUFMAX 400
-
-/* Create private copies of common functions used by the stub. This prevents
- nasty interactions between app code and the stub (for instance if user steps
- into strlen, etc..) */
-
-static int
-gdb_strlen (const char *s)
-{
- const char *s1 = s;
-
- while (*s1++ != '\000');
-
- return s1 - s;
-}
-
-static char *
-gdb_strcpy (char *dst, const char *src)
-{
- char *retval = dst;
-
- while ((*dst++ = *src++) != '\000');
-
- return retval;
-}
-
-static int
-putDebugChar (int c) /* write a single character */
-{
- if (gdb_arg == NULL)
- return 0;
- (*gdb_putc)(gdb_arg, c);
- return 1;
-}
-
-static int
-getDebugChar (void) /* read and return a single char */
-{
- if (gdb_arg == NULL)
- return -1;
- return (*gdb_getc)(gdb_arg);
-}
-
-static const char hexchars[]="0123456789abcdef";
-
-static int
-hex(char ch)
-{
- if ((ch >= 'a') && (ch <= 'f')) return (ch-'a'+10);
- if ((ch >= '0') && (ch <= '9')) return (ch-'0');
- if ((ch >= 'A') && (ch <= 'F')) return (ch-'A'+10);
- return (-1);
-}
-
-/* scan for the sequence $<data>#<checksum> */
-static void
-getpacket (char *buffer)
-{
- unsigned char checksum;
- unsigned char xmitcsum;
- int i;
- int count;
- unsigned char ch;
-
- do
- {
- /* wait around for the start character, ignore all other characters */
-
- while ((ch = (getDebugChar () & 0x7f)) != '$');
-
- checksum = 0;
- xmitcsum = -1;
-
- count = 0;
-
- /* now, read until a # or end of buffer is found */
-
- while (count < BUFMAX)
- {
- ch = getDebugChar () & 0x7f;
- if (ch == '#')
- break;
- checksum = checksum + ch;
- buffer[count] = ch;
- count = count + 1;
- }
- buffer[count] = 0;
-
- if (ch == '#')
- {
- xmitcsum = hex (getDebugChar () & 0x7f) << 4;
- xmitcsum += hex (getDebugChar () & 0x7f);
-
- if (checksum != xmitcsum)
- putDebugChar ('-'); /* failed checksum */
- else
- {
- putDebugChar ('+'); /* successful transfer */
- /* if a sequence char is present, reply the sequence ID */
- if (buffer[2] == ':')
- {
- putDebugChar (buffer[0]);
- putDebugChar (buffer[1]);
-
- /* remove sequence chars from buffer */
-
- count = gdb_strlen (buffer);
- for (i=3; i <= count; i++)
- buffer[i-3] = buffer[i];
- }
- }
- }
- }
- while (checksum != xmitcsum);
-}
-
-/* send the packet in buffer. */
-
-static void
-putpacket (char *buffer)
-{
- unsigned char checksum;
- int count;
- unsigned char ch;
-
- /* $<packet info>#<checksum>. */
- do
- {
-/*
- * This is a non-standard hack to allow use of the serial console for
- * operation as well as debugging. Simply turn on 'remotechat' in gdb.
- *
- * This extension is not part of the Cygnus protocol, is kinda gross,
- * but gets the job done.
- */
-#ifdef GDB_REMOTE_CHAT
- putDebugChar ('|');
- putDebugChar ('|');
- putDebugChar ('|');
- putDebugChar ('|');
-#endif
- putDebugChar ('$');
- checksum = 0;
- count = 0;
-
- while ((ch=buffer[count]) != 0)
- {
- putDebugChar (ch);
- checksum += ch;
- count += 1;
- }
-
- putDebugChar ('#');
- putDebugChar (hexchars[checksum >> 4]);
- putDebugChar (hexchars[checksum & 0xf]);
- }
- while ((getDebugChar () & 0x7f) != '+');
-}
-
-static char remcomInBuffer[BUFMAX];
-static char remcomOutBuffer[BUFMAX];
-
-static int
-get_char (vm_offset_t addr)
-{
- char data;
-
- if (setjmp (db_jmpbuf))
- return -1;
-
- db_read_bytes (addr, 1, &data);
-
- return data & 0xff;
-}
-
-static int
-set_char (vm_offset_t addr, int val)
-{
- char data;
-
- if (setjmp (db_jmpbuf))
- return -1;
-
- data = val;
-
- db_write_bytes (addr, 1, &data);
- return 0;
-}
-
-/* convert the memory pointed to by mem into hex, placing result in buf */
-/* return a pointer to the last char put in buf (null) */
-
-static char *
-mem2hex (vm_offset_t mem, char *buf, int count)
-{
- int i;
- int ch;
-
- for (i=0;i<count;i++) {
- ch = get_char (mem++);
- if (ch == -1)
- return NULL;
- *buf++ = hexchars[ch >> 4];
- *buf++ = hexchars[ch % 16];
- }
- *buf = 0;
- return(buf);
-}
-
-/* convert the hex array pointed to by buf into binary to be placed in mem */
-/* return a pointer to the character AFTER the last byte written */
-static char *
-hex2mem (char *buf, vm_offset_t mem, int count)
-{
- int i;
- int ch;
- int rv;
-
- for (i=0;i<count;i++) {
- ch = hex(*buf++) << 4;
- ch = ch + hex(*buf++);
- rv = set_char (mem++, ch);
- if (rv == -1)
- return NULL;
- }
- return(buf);
-}
-
-/* this function takes the 386 exception vector and attempts to
- translate this number into a unix compatible signal value */
-static int
-computeSignal (int exceptionVector)
-{
- int sigval;
- switch (exceptionVector & ~T_USER)
- {
- case 0: sigval = 8; break; /* divide by zero */
- case 1: sigval = 5; break; /* debug exception */
- case 3: sigval = 5; break; /* breakpoint */
- case 4: sigval = 16; break; /* into instruction (overflow) */
- case 5: sigval = 16; break; /* bound instruction */
- case 6: sigval = 4; break; /* Invalid opcode */
- case 7: sigval = 8; break; /* coprocessor not available */
- case 8: sigval = 7; break; /* double fault */
- case 9: sigval = 11; break; /* coprocessor segment overrun */
- case 10: sigval = 5; break; /* Invalid TSS (also single-step) */
- case 11: sigval = 11; break; /* Segment not present */
- case 12: sigval = 11; break; /* stack exception */
- case 13: sigval = 11; break; /* general protection */
- case 14: sigval = 11; break; /* page fault */
- case 16: sigval = 7; break; /* coprocessor error */
- default:
- sigval = 7; /* "software generated"*/
- }
- return (sigval);
-}
-
-/*
- * While we find nice hex chars, build an int.
- * Return number of chars processed.
- */
-
-static int
-hexToInt(char **ptr, int *intValue)
-{
- int numChars = 0;
- int hexValue;
-
- *intValue = 0;
-
- while (**ptr)
- {
- hexValue = hex(**ptr);
- if (hexValue >=0)
- {
- *intValue = (*intValue <<4) | hexValue;
- numChars ++;
- }
- else
- break;
-
- (*ptr)++;
- }
-
- return (numChars);
-}
-
-#define NUMREGBYTES (sizeof registers)
-#define PC 8
-#define SP 4
-#define FP 5
-#define NUM_REGS 14
-
-/*
- * This function does all command procesing for interfacing to gdb.
- */
-int
-gdb_handle_exception (db_regs_t *raw_regs, int type, int code)
-{
- int sigval;
- int addr, length;
- char * ptr;
- struct i386regs {
- unsigned int rax;
- unsigned int rcx;
- unsigned int rdx;
- unsigned int rbx;
- unsigned int rsp;
- unsigned int rbp;
- unsigned int rsi;
- unsigned int rdi;
- unsigned int rip;
- unsigned int rflags;
- unsigned int cs;
- unsigned int ss;
- unsigned int ds;
- unsigned int es;
- };
- struct i386regs registers;
-
- registers.rax = raw_regs->tf_rax;
- registers.rbx = raw_regs->tf_rbx;
- registers.rcx = raw_regs->tf_rcx;
- registers.rdx = raw_regs->tf_rdx;
-
- registers.rsp = raw_regs->tf_rsp;
- registers.rbp = raw_regs->tf_rbp;
- registers.rsi = raw_regs->tf_rsi;
- registers.rdi = raw_regs->tf_rdi;
-
- registers.rip = raw_regs->tf_rip;
- registers.rflags = raw_regs->tf_rflags;
-
- registers.cs = raw_regs->tf_cs;
- registers.ss = raw_regs->tf_ss;
- registers.ds = 0; /* XXX rds() */
- registers.es = 0; /* XXX res() */
-
- /* reply to host that an exception has occurred */
- sigval = computeSignal (type);
- ptr = remcomOutBuffer;
-
- *ptr++ = 'T';
- *ptr++ = hexchars[sigval >> 4];
- *ptr++ = hexchars[sigval & 0xf];
-
- *ptr++ = hexchars[PC >> 4];
- *ptr++ = hexchars[PC & 0xf];
- *ptr++ = ':';
- ptr = mem2hex ((vm_offset_t)&registers.rip, ptr, 4);
- *ptr++ = ';';
-
- *ptr++ = hexchars[FP >> 4];
- *ptr++ = hexchars[FP & 0xf];
- *ptr++ = ':';
- ptr = mem2hex ((vm_offset_t)&registers.rbp, ptr, 4);
- *ptr++ = ';';
-
- *ptr++ = hexchars[SP >> 4];
- *ptr++ = hexchars[SP & 0xf];
- *ptr++ = ':';
- ptr = mem2hex ((vm_offset_t)&registers.rsp, ptr, 4);
- *ptr++ = ';';
-
- *ptr++ = 0;
-
- putpacket (remcomOutBuffer);
-
- while (1)
- {
- if (gdb_arg == NULL)
- return 1; /* somebody has removed the gdb device */
- remcomOutBuffer[0] = 0;
-
- getpacket (remcomInBuffer);
- switch (remcomInBuffer[0])
- {
- case '?':
- remcomOutBuffer[0] = 'S';
- remcomOutBuffer[1] = hexchars[sigval >> 4];
- remcomOutBuffer[2] = hexchars[sigval % 16];
- remcomOutBuffer[3] = 0;
- break;
-
- case 'D': /* detach; say OK and turn off gdb */
- putpacket(remcomOutBuffer);
- boothowto &= ~RB_GDB;
- return 0;
-
- case 'g': /* return the value of the CPU registers */
- mem2hex ((vm_offset_t)&registers, remcomOutBuffer, NUMREGBYTES);
- break;
-
- case 'G': /* set the value of the CPU registers - return OK */
- hex2mem (&remcomInBuffer[1], (vm_offset_t)&registers, NUMREGBYTES);
- gdb_strcpy (remcomOutBuffer, "OK");
- break;
-
- case 'P': /* Set the value of one register */
- {
- int regno;
-
- ptr = &remcomInBuffer[1];
-
- if (hexToInt (&ptr, &regno)
- && *ptr++ == '='
- && regno < NUM_REGS)
- {
- hex2mem (ptr, (vm_offset_t)&registers + regno * 4, 4);
- gdb_strcpy(remcomOutBuffer,"OK");
- }
- else
- gdb_strcpy (remcomOutBuffer, "P01");
- break;
- }
- case 'm': /* mAA..AA,LLLL Read LLLL bytes at address AA..AA */
- /* Try to read %x,%x. */
-
- ptr = &remcomInBuffer[1];
-
- if (hexToInt (&ptr, &addr)
- && *(ptr++) == ','
- && hexToInt (&ptr, &length))
- {
- if (mem2hex((vm_offset_t) addr, remcomOutBuffer, length) == NULL)
- gdb_strcpy (remcomOutBuffer, "E03");
- break;
- }
- else
- gdb_strcpy (remcomOutBuffer, "E01");
- break;
-
- case 'M': /* MAA..AA,LLLL: Write LLLL bytes at address AA.AA return OK */
-
- /* Try to read '%x,%x:'. */
-
- ptr = &remcomInBuffer[1];
-
- if (hexToInt(&ptr,&addr)
- && *(ptr++) == ','
- && hexToInt(&ptr, &length)
- && *(ptr++) == ':')
- {
- if (hex2mem(ptr, (vm_offset_t) addr, length) == NULL)
- gdb_strcpy (remcomOutBuffer, "E03");
- else
- gdb_strcpy (remcomOutBuffer, "OK");
- }
- else
- gdb_strcpy (remcomOutBuffer, "E02");
- break;
-
- /* cAA..AA Continue at address AA..AA(optional) */
- /* sAA..AA Step one instruction from AA..AA(optional) */
- case 'c' :
- case 's' :
- /* try to read optional parameter, pc unchanged if no parm */
-
- ptr = &remcomInBuffer[1];
- if (hexToInt(&ptr,&addr))
- registers.rip = addr;
-
-
- /* set the trace bit if we're stepping */
- if (remcomInBuffer[0] == 's')
- registers.rflags |= PSL_T;
- else
- registers.rflags &= ~PSL_T;
-
- raw_regs->tf_rax = registers.rax;
- raw_regs->tf_rbx = registers.rbx;
- raw_regs->tf_rcx = registers.rcx;
- raw_regs->tf_rdx = registers.rdx;
-
- raw_regs->tf_rsp = registers.rsp;
- raw_regs->tf_rbp = registers.rbp;
- raw_regs->tf_rsi = registers.rsi;
- raw_regs->tf_rdi = registers.rdi;
-
- raw_regs->tf_rip = registers.rip;
- raw_regs->tf_rflags = registers.rflags;
-
- raw_regs->tf_cs = registers.cs;
- raw_regs->tf_ss = registers.ss;
-#if 0
- raw_regs->tf_ds = registers.ds;
- raw_regs->tf_es = registers.es;
-#endif
- return 0;
-
- } /* switch */
-
- /* reply to the request */
- putpacket (remcomOutBuffer);
- }
- return 0;
-}
OpenPOWER on IntegriCloud