home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 7 / FreshFishVol7.bin / bbs / gnu / gdb-4.12-src.lha / GNU / src / amiga / gdb-4.12 / gdb / i386-stub.c < prev    next >
C/C++ Source or Header  |  1994-02-03  |  26KB  |  915 lines
  1. /****************************************************************************
  2.  
  3.         THIS SOFTWARE IS NOT COPYRIGHTED
  4.  
  5.    HP offers the following for use in the public domain.  HP makes no
  6.    warranty with regard to the software or it's performance and the
  7.    user accepts the software "AS IS" with all faults.
  8.  
  9.    HP DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD
  10.    TO THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES
  11.    OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  12.  
  13. ****************************************************************************/
  14.  
  15. /****************************************************************************
  16.  *  Header: remcom.c,v 1.34 91/03/09 12:29:49 glenne Exp $
  17.  *
  18.  *  Module name: remcom.c $
  19.  *  Revision: 1.34 $
  20.  *  Date: 91/03/09 12:29:49 $
  21.  *  Contributor:     Lake Stevens Instrument Division$
  22.  *
  23.  *  Description:     low level support for gdb debugger. $
  24.  *
  25.  *  Considerations:  only works on target hardware $
  26.  *
  27.  *  Written by:      Glenn Engel $
  28.  *  ModuleState:     Experimental $
  29.  *
  30.  *  NOTES:           See Below $
  31.  *
  32.  *  Modified for 386 by Jim Kingdon, Cygnus Support.
  33.  *
  34.  *  To enable debugger support, two things need to happen.  One, a
  35.  *  call to set_debug_traps() is necessary in order to allow any breakpoints
  36.  *  or error conditions to be properly intercepted and reported to gdb.
  37.  *  Two, a breakpoint needs to be generated to begin communication.  This
  38.  *  is most easily accomplished by a call to breakpoint().  Breakpoint()
  39.  *  simulates a breakpoint by executing a trap #1.
  40.  *
  41.  *  The external function exceptionHandler() is
  42.  *  used to attach a specific handler to a specific 386 vector number.
  43.  *  It should use the same privilege level it runs at.  It should
  44.  *  install it as an interrupt gate so that interrupts are masked
  45.  *  while the handler runs.
  46.  *  Also, need to assign exceptionHook and oldExceptionHook.
  47.  *
  48.  *  Because gdb will sometimes write to the stack area to execute function
  49.  *  calls, this program cannot rely on using the supervisor stack so it
  50.  *  uses it's own stack area reserved in the int array remcomStack.
  51.  *
  52.  *************
  53.  *
  54.  *    The following gdb commands are supported:
  55.  *
  56.  * command          function                               Return value
  57.  *
  58.  *    g             return the value of the CPU registers  hex data or ENN
  59.  *    G             set the value of the CPU registers     OK or ENN
  60.  *
  61.  *    mAA..AA,LLLL  Read LLLL bytes at address AA..AA      hex data or ENN
  62.  *    MAA..AA,LLLL: Write LLLL bytes at address AA.AA      OK or ENN
  63.  *
  64.  *    c             Resume at current address              SNN   ( signal NN)
  65.  *    cAA..AA       Continue at address AA..AA             SNN
  66.  *
  67.  *    s             Step one instruction                   SNN
  68.  *    sAA..AA       Step one instruction from AA..AA       SNN
  69.  *
  70.  *    k             kill
  71.  *
  72.  *    ?             What was the last sigval ?             SNN   (signal NN)
  73.  *
  74.  * All commands and responses are sent with a packet which includes a
  75.  * checksum.  A packet consists of
  76.  *
  77.  * $<packet info>#<checksum>.
  78.  *
  79.  * where
  80.  * <packet info> :: <characters representing the command or response>
  81.  * <checksum>    :: < two hex digits computed as modulo 256 sum of <packetinfo>>
  82.  *
  83.  * When a packet is received, it is first acknowledged with either '+' or '-'.
  84.  * '+' indicates a successful transfer.  '-' indicates a failed transfer.
  85.  *
  86.  * Example:
  87.  *
  88.  * Host:                  Reply:
  89.  * $m0,10#2a               +$00010203040506070809101112131415#42
  90.  *
  91.  ****************************************************************************/
  92.  
  93. #include <stdio.h>
  94. #include <string.h>
  95.  
  96. /************************************************************************
  97.  *
  98.  * external low-level support routines
  99.  */
  100. typedef void (*ExceptionHook)(int);   /* pointer to function with int parm */
  101. typedef void (*Function)();           /* pointer to a function */
  102.  
  103. extern putDebugChar();   /* write a single character      */
  104. extern getDebugChar();   /* read and return a single char */
  105.  
  106. extern Function exceptionHandler();  /* assign an exception handler */
  107. extern ExceptionHook exceptionHook;  /* hook variable for errors/exceptions */
  108.  
  109. /************************************************************************/
  110. /* BUFMAX defines the maximum number of characters in inbound/outbound buffers*/
  111. /* at least NUMREGBYTES*2 are needed for register packets */
  112. #define BUFMAX 400
  113.  
  114. static char initialized;  /* boolean flag. != 0 means we've been initialized */
  115.  
  116. int     remote_debug;
  117. /*  debug >  0 prints ill-formed commands in valid packets & checksum errors */
  118.  
  119. void waitabit();
  120.  
  121. static const char hexchars[]="0123456789abcdef";
  122.  
  123. /* Number of bytes of registers.  */
  124. #define NUMREGBYTES 64
  125. enum regnames {EAX, ECX, EDX, EBX, ESP, EBP, ESI, EDI,
  126.            PC /* also known as eip */,
  127.            PS /* also known as eflags */,
  128.            CS, SS, DS, ES, FS, GS};
  129.  
  130. /*
  131.  * these should not be static cuz they can be used outside this module
  132.  */
  133. int registers[NUMREGBYTES/4];
  134.  
  135. #define STACKSIZE 10000
  136. int remcomStack[STACKSIZE/sizeof(int)];
  137. static int* stackPtr = &remcomStack[STACKSIZE/sizeof(int) - 1];
  138.  
  139. /*
  140.  * In many cases, the system will want to continue exception processing
  141.  * when a continue command is given.
  142.  * oldExceptionHook is a function to invoke in this case.
  143.  */
  144.  
  145. static ExceptionHook oldExceptionHook;
  146.  
  147. /***************************  ASSEMBLY CODE MACROS *************************/
  148. /*                                        */
  149.  
  150. extern void
  151. return_to_prog ();
  152.  
  153. /* Restore the program's registers (including the stack pointer, which
  154.    means we get the right stack and don't have to worry about popping our
  155.    return address and any stack frames and so on) and return.  */
  156. asm(".text");
  157. asm(".globl _return_to_prog");
  158. asm("_return_to_prog:");
  159. asm("        movw _registers+44, %ss");
  160. asm("        movl _registers+16, %esp");
  161. asm("        movl _registers+4, %ecx");
  162. asm("        movl _registers+8, %edx");
  163. asm("        movl _registers+12, %ebx");
  164. asm("        movl _registers+20, %ebp");
  165. asm("        movl _registers+24, %esi");
  166. asm("        movl _registers+28, %edi");
  167. asm("        movw _registers+48, %ds");
  168. asm("        movw _registers+52, %es");
  169. asm("        movw _registers+56, %fs");
  170. asm("        movw _registers+60, %gs");
  171. asm("        movl _registers+36, %eax");
  172. asm("        pushl %eax");  /* saved eflags */
  173. asm("        movl _registers+40, %eax");
  174. asm("        pushl %eax");  /* saved cs */
  175. asm("        movl _registers+32, %eax");
  176. asm("        pushl %eax");  /* saved eip */
  177. asm("        movl _registers, %eax");
  178. /* use iret to restore pc and flags together so
  179.    that trace flag works right.  */
  180. asm("        iret");
  181.  
  182. #define BREAKPOINT() asm("   int $3");
  183.  
  184. /* Put the error code here just in case the user cares.  */
  185. int gdb_i386errcode;
  186. /* Likewise, the vector number here (since GDB only gets the signal
  187.    number through the usual means, and that's not very specific).  */
  188. int gdb_i386vector = -1;
  189.  
  190. /* GDB stores segment registers in 32-bit words (that's just the way
  191.    m-i386v.h is written).  So zero the appropriate areas in registers.  */
  192. #define SAVE_REGISTERS1() \
  193.   asm ("movl %eax, _registers");                                         \
  194.   asm ("movl %ecx, _registers+4");                           \
  195.   asm ("movl %edx, _registers+8");                           \
  196.   asm ("movl %ebx, _registers+12");                           \
  197.   asm ("movl %ebp, _registers+20");                           \
  198.   asm ("movl %esi, _registers+24");                           \
  199.   asm ("movl %edi, _registers+28");                           \
  200.   asm ("movw $0, %ax");                                 \
  201.   asm ("movw %ds, _registers+48");                           \
  202.   asm ("movw %ax, _registers+50");                         \
  203.   asm ("movw %es, _registers+52");                           \
  204.   asm ("movw %ax, _registers+54");                         \
  205.   asm ("movw %fs, _registers+56");                           \
  206.   asm ("movw %ax, _registers+58");                         \
  207.   asm ("movw %gs, _registers+60");                           \
  208.   asm ("movw %ax, _registers+62");
  209. #define SAVE_ERRCODE() \
  210.   asm ("popl %ebx");                                  \
  211.   asm ("movl %ebx, _gdb_i386errcode");
  212. #define SAVE_REGISTERS2() \
  213.   asm ("popl %ebx"); /* old eip */                           \
  214.   asm ("movl %ebx, _registers+32");                           \
  215.   asm ("popl %ebx");     /* old cs */                           \
  216.   asm ("movl %ebx, _registers+40");