Path from Roland McGrath <roland@baalperazim.frob.com>
[deliverable/binutils-gdb.git] / gdb / i386-stub.c
CommitLineData
c906108c
SS
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 */
100typedef void (*ExceptionHook)(int); /* pointer to function with int parm */
101typedef void (*Function)(); /* pointer to a function */
102
103extern void putDebugChar(); /* write a single character */
104extern int getDebugChar(); /* read and return a single char */
105
106extern Function exceptionHandler(); /* assign an exception handler */
107extern 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
114static char initialized; /* boolean flag. != 0 means we've been initialized */
115
116int remote_debug;
117/* debug > 0 prints ill-formed commands in valid packets & checksum errors */
118
c906108c
SS
119static const char hexchars[]="0123456789abcdef";
120
121/* Number of registers. */
122#define NUMREGS 16
123
124/* Number of bytes of registers. */
125#define NUMREGBYTES (NUMREGS * 4)
126
127enum regnames {EAX, ECX, EDX, EBX, ESP, EBP, ESI, EDI,
128 PC /* also known as eip */,
129 PS /* also known as eflags */,
130 CS, SS, DS, ES, FS, GS};
131
132/*
133 * these should not be static cuz they can be used outside this module
134 */
135int registers[NUMREGS];
136
137#define STACKSIZE 10000
138int remcomStack[STACKSIZE/sizeof(int)];
139static int* stackPtr = &remcomStack[STACKSIZE/sizeof(int) - 1];
140
141/*
142 * In many cases, the system will want to continue exception processing
143 * when a continue command is given.
144 * oldExceptionHook is a function to invoke in this case.
145 */
146
147static ExceptionHook oldExceptionHook;
148
149/*************************** ASSEMBLY CODE MACROS *************************/
150/* */
151
152extern void
153return_to_prog ();
154
155/* Restore the program's registers (including the stack pointer, which
156 means we get the right stack and don't have to worry about popping our
157 return address and any stack frames and so on) and return. */
158asm(".text");
159asm(".globl _return_to_prog");
160asm("_return_to_prog:");
161asm(" movw _registers+44, %ss");
162asm(" movl _registers+16, %esp");
163asm(" movl _registers+4, %ecx");
164asm(" movl _registers+8, %edx");
165asm(" movl _registers+12, %ebx");
166asm(" movl _registers+20, %ebp");
167asm(" movl _registers+24, %esi");
168asm(" movl _registers+28, %edi");
169asm(" movw _registers+48, %ds");
170asm(" movw _registers+52, %es");
171asm(" movw _registers+56, %fs");
172asm(" movw _registers+60, %gs");
173asm(" movl _registers+36, %eax");
174asm(" pushl %eax"); /* saved eflags */
175asm(" movl _registers+40, %eax");
176asm(" pushl %eax"); /* saved cs */
177asm(" movl _registers+32, %eax");
178asm(" pushl %eax"); /* saved eip */
179asm(" movl _registers, %eax");
180/* use iret to restore pc and flags together so
181 that trace flag works right. */
182asm(" iret");
183
184#define BREAKPOINT() asm(" int $3");
185
186/* Put the error code here just in case the user cares. */
187int gdb_i386errcode;
188/* Likewise, the vector number here (since GDB only gets the signal
189 number through the usual means, and that's not very specific). */
190int gdb_i386vector = -1;
191
192/* GDB stores segment registers in 32-bit words (that's just the way
193 m-i386v.h is written). So zero the appropriate areas in registers. */
194#define SAVE_REGISTERS1() \
195 asm ("movl %eax, _registers"); \
196 asm ("movl %ecx, _registers+4"); \
197 asm ("movl %edx, _registers+8"); \
198 asm ("movl %ebx, _registers+12"); \
199 asm ("movl %ebp, _registers+20"); \
200 asm ("movl %esi, _registers+24"); \
201 asm ("movl %edi, _registers+28"); \
202 asm ("movw $0, %ax"); \
203 asm ("movw %ds, _registers+48"); \
204 asm ("movw %ax, _registers+50"); \
205 asm ("movw %es, _registers+52"); \
206 asm ("movw %ax, _registers+54"); \
207 asm ("movw %fs, _registers+56"); \
208 asm ("movw %ax, _registers+58"); \
209 asm ("movw %gs, _registers+60"); \
210 asm ("movw %ax, _registers+62");
211#define SAVE_ERRCODE() \
212 asm ("popl %ebx"); \
213 asm ("movl %ebx, _gdb_i386errcode");
214#define SAVE_REGISTERS2() \
215 asm ("popl %ebx"); /* old eip */ \
216 asm ("movl %ebx, _registers+32"); \
217 asm ("popl %ebx"); /* old cs */ \
218 asm ("movl %ebx, _registers+40"); \
219 asm ("movw %ax, _registers+42"); \
220 asm ("popl %ebx"); /* old eflags */ \
221 asm ("movl %ebx, _registers+36"); \
222 /* Now that we've done the pops, we can save the stack pointer."); */ \
223 asm ("movw %ss, _registers+44"); \
224 asm ("movw %ax, _registers+46"); \
225 asm ("movl %esp, _registers+16");
226
227/* See if mem_fault_routine is set, if so just IRET to that address. */
228#define CHECK_FAULT() \
229 asm ("cmpl $0, _mem_fault_routine"); \
230 asm ("jne mem_fault");
231
232asm (".text");
233asm ("mem_fault:");
234/* OK to clobber temp registers; we're just going to end up in set_mem_err. */
235/* Pop error code from the stack and save it. */
236asm (" popl %eax");
237asm (" movl %eax, _gdb_i386errcode");
238
239asm (" popl %eax"); /* eip */
240/* We don't want to return there, we want to return to the function
241 pointed to by mem_fault_routine instead. */
242asm (" movl _mem_fault_routine, %eax");
243asm (" popl %ecx"); /* cs (low 16 bits; junk in hi 16 bits). */
244asm (" popl %edx"); /* eflags */
245
246/* Remove this stack frame; when we do the iret, we will be going to
247 the start of a function, so we want the stack to look just like it
248 would after a "call" instruction. */
249asm (" leave");
250
251/* Push the stuff that iret wants. */
252asm (" pushl %edx"); /* eflags */
253asm (" pushl %ecx"); /* cs */
254asm (" pushl %eax"); /* eip */
255
256/* Zero mem_fault_routine. */
257asm (" movl $0, %eax");
258asm (" movl %eax, _mem_fault_routine");
259
260asm ("iret");
261
262#define CALL_HOOK() asm("call _remcomHandler");
263
264/* This function is called when a i386 exception occurs. It saves
265 * all the cpu regs in the _registers array, munges the stack a bit,
266 * and invokes an exception handler (remcom_handler).
267 *
268 * stack on entry: stack on exit:
269 * old eflags vector number
270 * old cs (zero-filled to 32 bits)
271 * old eip
272 *
273 */
274extern void _catchException3();
275asm(".text");
276asm(".globl __catchException3");
277asm("__catchException3:");
278SAVE_REGISTERS1();
279SAVE_REGISTERS2();
280asm ("pushl $3");
281CALL_HOOK();
282
283/* Same thing for exception 1. */
284extern void _catchException1();
285asm(".text");
286asm(".globl __catchException1");
287asm("__catchException1:");
288SAVE_REGISTERS1();
289SAVE_REGISTERS2();
290asm ("pushl $1");
291CALL_HOOK();
292
293/* Same thing for exception 0. */
294extern void _catchException0();
295asm(".text");
296asm(".globl __catchException0");
297asm("__catchException0:");
298SAVE_REGISTERS1();
299SAVE_REGISTERS2();
300asm ("pushl $0");
301CALL_HOOK();
302
303/* Same thing for exception 4. */
304extern void _catchException4();
305asm(".text");
306asm(".globl __catchException4");
307asm("__catchException4:");
308SAVE_REGISTERS1();
309SAVE_REGISTERS2();
310asm ("pushl $4");
311CALL_HOOK();
312
313/* Same thing for exception 5. */
314extern void _catchException5();
315asm(".text");
316asm(".globl __catchException5");
317asm("__catchException5:");
318SAVE_REGISTERS1();
319SAVE_REGISTERS2();
320asm ("pushl $5");
321CALL_HOOK();
322
323/* Same thing for exception 6. */
324extern void _catchException6();
325asm(".text");
326asm(".globl __catchException6");
327asm("__catchException6:");
328SAVE_REGISTERS1();
329SAVE_REGISTERS2();
330asm ("pushl $6");
331CALL_HOOK();
332
333/* Same thing for exception 7. */
334extern void _catchException7();
335asm(".text");
336asm(".globl __catchException7");
337asm("__catchException7:");
338SAVE_REGISTERS1();
339SAVE_REGISTERS2();
340asm ("pushl $7");
341CALL_HOOK();
342
343/* Same thing for exception 8. */
344extern void _catchException8();
345asm(".text");
346asm(".globl __catchException8");
347asm("__catchException8:");
348SAVE_REGISTERS1();
349SAVE_ERRCODE();
350SAVE_REGISTERS2();
351asm ("pushl $8");
352CALL_HOOK();
353
354/* Same thing for exception 9. */
355extern void _catchException9();
356asm(".text");
357asm(".globl __catchException9");
358asm("__catchException9:");
359SAVE_REGISTERS1();
360SAVE_REGISTERS2();
361asm ("pushl $9");
362CALL_HOOK();
363
364/* Same thing for exception 10. */
365extern void _catchException10();
366asm(".text");
367asm(".globl __catchException10");
368asm("__catchException10:");
369SAVE_REGISTERS1();
370SAVE_ERRCODE();
371SAVE_REGISTERS2();
372asm ("pushl $10");
373CALL_HOOK();
374
375/* Same thing for exception 12. */
376extern void _catchException12();
377asm(".text");
378asm(".globl __catchException12");
379asm("__catchException12:");
380SAVE_REGISTERS1();
381SAVE_ERRCODE();
382SAVE_REGISTERS2();
383asm ("pushl $12");
384CALL_HOOK();
385
386/* Same thing for exception 16. */
387extern void _catchException16();
388asm(".text");
389asm(".globl __catchException16");
390asm("__catchException16:");
391SAVE_REGISTERS1();
392SAVE_REGISTERS2();
393asm ("pushl $16");
394CALL_HOOK();
395
396/* For 13, 11, and 14 we have to deal with the CHECK_FAULT stuff. */
397
398/* Same thing for exception 13. */
399extern void _catchException13 ();
400asm (".text");
401asm (".globl __catchException13");
402asm ("__catchException13:");
403CHECK_FAULT();
404SAVE_REGISTERS1();
405SAVE_ERRCODE();
406SAVE_REGISTERS2();
407asm ("pushl $13");
408CALL_HOOK();
409
410/* Same thing for exception 11. */
411extern void _catchException11 ();
412asm (".text");
413asm (".globl __catchException11");
414asm ("__catchException11:");
415CHECK_FAULT();
416SAVE_REGISTERS1();
417SAVE_ERRCODE();
418SAVE_REGISTERS2();
419asm ("pushl $11");
420CALL_HOOK();
421
422/* Same thing for exception 14. */
423extern void _catchException14 ();
424asm (".text");
425asm (".globl __catchException14");
426asm ("__catchException14:");
427CHECK_FAULT();
428SAVE_REGISTERS1();
429SAVE_ERRCODE();
430SAVE_REGISTERS2();
431asm ("pushl $14");
432CALL_HOOK();
433
434/*
435 * remcomHandler is a front end for handle_exception. It moves the
436 * stack pointer into an area reserved for debugger use.
437 */
438asm("_remcomHandler:");
439asm(" popl %eax"); /* pop off return address */
440asm(" popl %eax"); /* get the exception number */
441asm(" movl _stackPtr, %esp"); /* move to remcom stack area */
442asm(" pushl %eax"); /* push exception onto stack */
443asm(" call _handle_exception"); /* this never returns */
444
445void _returnFromException()
446{
447 return_to_prog ();
448}
449
450int hex(ch)
451char ch;
452{
453 if ((ch >= 'a') && (ch <= 'f')) return (ch-'a'+10);
454 if ((ch >= '0') && (ch <= '9')) return (ch-'0');
455 if ((ch >= 'A') && (ch <= 'F')) return (ch-'A'+10);
456 return (-1);
457}
458
459
460/* scan for the sequence $<data>#<checksum> */
461void getpacket(buffer)
462char * buffer;
463{
464 unsigned char checksum;
465 unsigned char xmitcsum;
466 int i;
467 int count;
468 char ch;
469
470 do {
471 /* wait around for the start character, ignore all other characters */
472 while ((ch = (getDebugChar() & 0x7f)) != '$');
473 checksum = 0;
474 xmitcsum = -1;
475
476 count = 0;
477
478 /* now, read until a # or end of buffer is found */
479 while (count < BUFMAX) {
480 ch = getDebugChar() & 0x7f;
481 if (ch == '#') break;
482 checksum = checksum + ch;
483 buffer[count] = ch;
484 count = count + 1;
485 }
486 buffer[count] = 0;
487
488 if (ch == '#') {
489 xmitcsum = hex(getDebugChar() & 0x7f) << 4;
490 xmitcsum += hex(getDebugChar() & 0x7f);
491 if ((remote_debug ) && (checksum != xmitcsum)) {
492 fprintf (stderr ,"bad checksum. My count = 0x%x, sent=0x%x. buf=%s\n",
493 checksum,xmitcsum,buffer);
494 }
495
496 if (checksum != xmitcsum) putDebugChar('-'); /* failed checksum */
497 else {
498 putDebugChar('+'); /* successful transfer */
499 /* if a sequence char is present, reply the sequence ID */
500 if (buffer[2] == ':') {
501 putDebugChar( buffer[0] );
502 putDebugChar( buffer[1] );
503 /* remove sequence chars from buffer */
504 count = strlen(buffer);
505 for (i=3; i <= count; i++) buffer[i-3] = buffer[i];
506 }
507 }
508 }
509 } while (checksum != xmitcsum);
510
511}
512
513/* send the packet in buffer. */
514
515
516void putpacket(buffer)
517char * buffer;
518{
519 unsigned char checksum;
520 int count;
521 char ch;
522
523 /* $<packet info>#<checksum>. */
524 do {
525 putDebugChar('$');
526 checksum = 0;
527 count = 0;
528
529 while (ch=buffer[count]) {
530 putDebugChar(ch);
531 checksum += ch;
532 count += 1;
533 }
534
535 putDebugChar('#');
536 putDebugChar(hexchars[checksum >> 4]);
537 putDebugChar(hexchars[checksum % 16]);
538
539 } while ((getDebugChar() & 0x7f) != '+');
540
541}
542
543char remcomInBuffer[BUFMAX];
544char remcomOutBuffer[BUFMAX];
545static short error;
546
547
548void debug_error(format, parm)
549char * format;
550char * parm;
551{
552 if (remote_debug) fprintf (stderr,format,parm);
553}
554
555/* Address of a routine to RTE to if we get a memory fault. */
556static void (*volatile mem_fault_routine)() = NULL;
557
558/* Indicate to caller of mem2hex or hex2mem that there has been an
559 error. */
560static volatile int mem_err = 0;
561
562void
563set_mem_err ()
564{
565 mem_err = 1;
566}
567
568/* These are separate functions so that they are so short and sweet
569 that the compiler won't save any registers (if there is a fault
570 to mem_fault, they won't get restored, so there better not be any
571 saved). */
572int
573get_char (addr)
574 char *addr;
575{
576 return *addr;
577}
578
579void
580set_char (addr, val)
581 char *addr;
582 int val;
583{
584 *addr = val;
585}
586
587/* convert the memory pointed to by mem into hex, placing result in buf */
588/* return a pointer to the last char put in buf (null) */
589/* If MAY_FAULT is non-zero, then we should set mem_err in response to
590 a fault; if zero treat a fault like any other fault in the stub. */
591char* mem2hex(mem, buf, count, may_fault)
592char* mem;
593char* buf;
594int count;
595int may_fault;
596{
597 int i;
598 unsigned char ch;
599
600 if (may_fault)
601 mem_fault_routine = set_mem_err;
602 for (i=0;i<count;i++) {
603 ch = get_char (mem++);
604 if (may_fault && mem_err)
605 return (buf);
606 *buf++ = hexchars[ch >> 4];
607 *buf++ = hexchars[ch % 16];
608 }
609 *buf = 0;
610 if (may_fault)
611 mem_fault_routine = NULL;
612 return(buf);
613}
614
615/* convert the hex array pointed to by buf into binary to be placed in mem */
616/* return a pointer to the character AFTER the last byte written */
617char* hex2mem(buf, mem, count, may_fault)
618char* buf;
619char* mem;
620int count;
621int may_fault;
622{
623 int i;
624 unsigned char ch;
625
626 if (may_fault)
627 mem_fault_routine = set_mem_err;
628 for (i=0;i<count;i++) {
629 ch = hex(*buf++) << 4;
630 ch = ch + hex(*buf++);
631 set_char (mem++, ch);
632 if (may_fault && mem_err)
633 return (mem);
634 }
635 if (may_fault)
636 mem_fault_routine = NULL;
637 return(mem);
638}
639
640/* this function takes the 386 exception vector and attempts to
641 translate this number into a unix compatible signal value */
642int computeSignal( exceptionVector )
643int exceptionVector;
644{
645 int sigval;
646 switch (exceptionVector) {
647 case 0 : sigval = 8; break; /* divide by zero */
648 case 1 : sigval = 5; break; /* debug exception */
649 case 3 : sigval = 5; break; /* breakpoint */
650 case 4 : sigval = 16; break; /* into instruction (overflow) */
651 case 5 : sigval = 16; break; /* bound instruction */
652 case 6 : sigval = 4; break; /* Invalid opcode */
653 case 7 : sigval = 8; break; /* coprocessor not available */
654 case 8 : sigval = 7; break; /* double fault */
655 case 9 : sigval = 11; break; /* coprocessor segment overrun */
656 case 10 : sigval = 11; break; /* Invalid TSS */
657 case 11 : sigval = 11; break; /* Segment not present */
658 case 12 : sigval = 11; break; /* stack exception */
659 case 13 : sigval = 11; break; /* general protection */
660 case 14 : sigval = 11; break; /* page fault */
661 case 16 : sigval = 7; break; /* coprocessor error */
662 default:
663 sigval = 7; /* "software generated"*/
664 }
665 return (sigval);
666}
667
668/**********************************************/
669/* WHILE WE FIND NICE HEX CHARS, BUILD AN INT */
670/* RETURN NUMBER OF CHARS PROCESSED */
671/**********************************************/
672int hexToInt(char **ptr, int *intValue)
673{
674 int numChars = 0;
675 int hexValue;
676
677 *intValue = 0;
678
679 while (**ptr)
680 {
681 hexValue = hex(**ptr);
682 if (hexValue >=0)
683 {
684 *intValue = (*intValue <<4) | hexValue;
685 numChars ++;
686 }
687 else
688 break;
689
690 (*ptr)++;
691 }
692
693 return (numChars);
694}
695
696/*
697 * This function does all command procesing for interfacing to gdb.
698 */
699void handle_exception(int exceptionVector)
700{
701 int sigval;
702 int addr, length;
703 char * ptr;
704 int newPC;
705
706 gdb_i386vector = exceptionVector;
707
708 if (remote_debug) printf("vector=%d, sr=0x%x, pc=0x%x\n",
709 exceptionVector,
710 registers[ PS ],
711 registers[ PC ]);
712
713 /* reply to host that an exception has occurred */
714 sigval = computeSignal( exceptionVector );
715 remcomOutBuffer[0] = 'S';
716 remcomOutBuffer[1] = hexchars[sigval >> 4];
717 remcomOutBuffer[2] = hexchars[sigval % 16];
718 remcomOutBuffer[3] = 0;
719
720 putpacket(remcomOutBuffer);
721
722 while (1==1) {
723 error = 0;
724 remcomOutBuffer[0] = 0;
725 getpacket(remcomInBuffer);
726 switch (remcomInBuffer[0]) {
727 case '?' : remcomOutBuffer[0] = 'S';
728 remcomOutBuffer[1] = hexchars[sigval >> 4];
729 remcomOutBuffer[2] = hexchars[sigval % 16];
730 remcomOutBuffer[3] = 0;
731 break;
732 case 'd' : remote_debug = !(remote_debug); /* toggle debug flag */
733 break;
734 case 'g' : /* return the value of the CPU registers */
735 mem2hex((char*) registers, remcomOutBuffer, NUMREGBYTES, 0);
736 break;
737 case 'G' : /* set the value of the CPU registers - return OK */
738 hex2mem(&remcomInBuffer[1], (char*) registers, NUMREGBYTES, 0);
739 strcpy(remcomOutBuffer,"OK");
740 break;
741 case 'P' : /* set the value of a single CPU register - return OK */
742 {
743 int regno;
744
745 ptr = &remcomInBuffer[1];
746 if (hexToInt (&ptr, &regno) && *ptr++ == '=')
747 if (regno >= 0 && regno < NUMREGS)
748 {
749 hex2mem (ptr, (char *)&registers[regno], 4, 0);
750 strcpy(remcomOutBuffer,"OK");
751 break;
752 }
753
754 strcpy (remcomOutBuffer, "E01");
755 break;
756 }
757
758 /* mAA..AA,LLLL Read LLLL bytes at address AA..AA */
759 case 'm' :
760 /* TRY TO READ %x,%x. IF SUCCEED, SET PTR = 0 */
761 ptr = &remcomInBuffer[1];
762 if (hexToInt(&ptr,&addr))
763 if (*(ptr++) == ',')
764 if (hexToInt(&ptr,&length))
765 {
766 ptr = 0;
767 mem_err = 0;
768 mem2hex((char*) addr, remcomOutBuffer, length, 1);
769 if (mem_err) {
770 strcpy (remcomOutBuffer, "E03");
771 debug_error ("memory fault");
772 }
773 }
774
775 if (ptr)
776 {
777 strcpy(remcomOutBuffer,"E01");
778 debug_error("malformed read memory command: %s",remcomInBuffer);
779 }
780 break;
781
782 /* MAA..AA,LLLL: Write LLLL bytes at address AA.AA return OK */
783 case 'M' :
784 /* TRY TO READ '%x,%x:'. IF SUCCEED, SET PTR = 0 */
785 ptr = &remcomInBuffer[1];
786 if (hexToInt(&ptr,&addr))
787 if (*(ptr++) == ',')
788 if (hexToInt(&ptr,&length))
789 if (*(ptr++) == ':')
790 {
791 mem_err = 0;
792 hex2mem(ptr, (char*) addr, length, 1);
793
794 if (mem_err) {
795 strcpy (remcomOutBuffer, "E03");
796 debug_error ("memory fault");
797 } else {
798 strcpy(remcomOutBuffer,"OK");
799 }
800
801 ptr = 0;
802 }
803 if (ptr)
804 {
805 strcpy(remcomOutBuffer,"E02");
806 debug_error("malformed write memory command: %s",remcomInBuffer);
807 }
808 break;
809
810 /* cAA..AA Continue at address AA..AA(optional) */
811 /* sAA..AA Step one instruction from AA..AA(optional) */
812 case 'c' :
813 case 's' :
814 /* try to read optional parameter, pc unchanged if no parm */
815 ptr = &remcomInBuffer[1];
816 if (hexToInt(&ptr,&addr))
817 registers[ PC ] = addr;
818
819 newPC = registers[ PC];
820
821 /* clear the trace bit */
822 registers[ PS ] &= 0xfffffeff;
823
824 /* set the trace bit if we're stepping */
825 if (remcomInBuffer[0] == 's') registers[ PS ] |= 0x100;
826
827 /*
828 * If we found a match for the PC AND we are not returning
829 * as a result of a breakpoint (33),
830 * trace exception (9), nmi (31), jmp to
831 * the old exception handler as if this code never ran.
832 */
833#if 0
834 /* Don't really think we need this, except maybe for protection
835 exceptions. */
836 /*
837 * invoke the previous handler.
838 */
839 if (oldExceptionHook)
840 (*oldExceptionHook) (frame->exceptionVector);
841 newPC = registers[ PC ]; /* pc may have changed */
842#endif /* 0 */
843
844 _returnFromException(); /* this is a jump */
845
846 break;
847
848 /* kill the program */
849 case 'k' : /* do nothing */
850#if 0
851 /* Huh? This doesn't look like "nothing".
852 m68k-stub.c and sparc-stub.c don't have it. */
853 BREAKPOINT();
854#endif
855 break;
856 } /* switch */
857
858 /* reply to the request */
859 putpacket(remcomOutBuffer);
860 }
861}
862
863/* this function is used to set up exception handlers for tracing and
864 breakpoints */
865void set_debug_traps()
866{
867extern void remcomHandler();
868int exception;
869
870 stackPtr = &remcomStack[STACKSIZE/sizeof(int) - 1];
871
872 exceptionHandler (0, _catchException0);
873 exceptionHandler (1, _catchException1);
874 exceptionHandler (3, _catchException3);
875 exceptionHandler (4, _catchException4);
876 exceptionHandler (5, _catchException5);
877 exceptionHandler (6, _catchException6);
878 exceptionHandler (7, _catchException7);
879 exceptionHandler (8, _catchException8);
880 exceptionHandler (9, _catchException9);
881 exceptionHandler (10, _catchException10);
882 exceptionHandler (11, _catchException11);
883 exceptionHandler (12, _catchException12);
884 exceptionHandler (13, _catchException13);
885 exceptionHandler (14, _catchException14);
886 exceptionHandler (16, _catchException16);
887
888 if (exceptionHook != remcomHandler)
889 {
890 oldExceptionHook = exceptionHook;
891 exceptionHook = remcomHandler;
892 }
893
c906108c 894 initialized = 1;
c906108c
SS
895}
896
897/* This function will generate a breakpoint exception. It is used at the
898 beginning of a program to sync up with a debugger and can be used
899 otherwise as a quick means to stop program execution and "break" into
900 the debugger. */
901
902void breakpoint()
903{
904 if (initialized)
c906108c 905 BREAKPOINT();
c906108c 906}
This page took 0.062397 seconds and 4 git commands to generate.