2 * Debugger break-points handling
4 * Copyright 1994 Martin von Loewis
5 * Copyright 1995 Alexandre Julliard
6 * Copyright 1999,2000 Eric Pouech
13 #define DR7_CONTROL_SHIFT 16
14 #define DR7_CONTROL_SIZE 4
16 #define DR7_RW_EXECUTE (0x0)
17 #define DR7_RW_WRITE (0x1)
18 #define DR7_RW_READ (0x3)
20 #define DR7_LEN_1 (0x0)
21 #define DR7_LEN_2 (0x4)
22 #define DR7_LEN_4 (0xC)
24 #define DR7_LOCAL_ENABLE_SHIFT 0
25 #define DR7_GLOBAL_ENABLE_SHIFT 1
26 #define DR7_ENABLE_SIZE 2
28 #define DR7_LOCAL_ENABLE_MASK (0x55)
29 #define DR7_GLOBAL_ENABLE_MASK (0xAA)
31 #define DR7_CONTROL_RESERVED (0xFC00)
32 #define DR7_LOCAL_SLOWDOWN (0x100)
33 #define DR7_GLOBAL_SLOWDOWN (0x200)
35 #define DR7_ENABLE_MASK(dr) (1<<(DR7_LOCAL_ENABLE_SHIFT+DR7_ENABLE_SIZE*(dr)))
36 #define IS_DR7_SET(ctrl,dr) ((ctrl)&DR7_ENABLE_MASK(dr))
37 #define INT3 0xcc /* int 3 opcode */
40 #define MAX_BREAKPOINTS 100
42 static DBG_BREAKPOINT breakpoints
[MAX_BREAKPOINTS
];
44 static int next_bp
= 1; /* breakpoint 0 is reserved for step-over */
46 /***********************************************************************
47 * DEBUG_IsStepOverInstr
49 * Determine if the instruction at CS:EIP is an instruction that
50 * we need to step over (like a call or a repetitive string move).
52 static BOOL
DEBUG_IsStepOverInstr(void)
59 addr
.seg
= DEBUG_context
.SegCs
;
60 addr
.off
= DEBUG_context
.Eip
;
61 /* FIXME: old code was using V86BASE(DEBUG_context)
62 * instead of passing thru DOSMEM_MemoryBase
64 instr
= (BYTE
*)DEBUG_ToLinear(&addr
);
68 if (!DEBUG_READ_MEM(instr
, &ch
, sizeof(ch
)))
73 /* Skip all prefixes */
81 case 0x66: /* opcode size prefix */
82 case 0x67: /* addr size prefix */
84 case 0xf2: /* repne */
89 /* Handle call instructions */
91 case 0xcd: /* int <intno> */
92 case 0xe8: /* call <offset> */
93 case 0x9a: /* lcall <seg>:<off> */
96 case 0xff: /* call <regmodrm> */
97 if (!DEBUG_READ_MEM(instr
+ 1, &ch
, sizeof(ch
)))
99 return (((ch
& 0x38) == 0x10) || ((ch
& 0x38) == 0x18));
101 /* Handle string instructions */
103 case 0x6c: /* insb */
104 case 0x6d: /* insw */
105 case 0x6e: /* outsb */
106 case 0x6f: /* outsw */
107 case 0xa4: /* movsb */
108 case 0xa5: /* movsw */
109 case 0xa6: /* cmpsb */
110 case 0xa7: /* cmpsw */
111 case 0xaa: /* stosb */
112 case 0xab: /* stosw */
113 case 0xac: /* lodsb */
114 case 0xad: /* lodsw */
115 case 0xae: /* scasb */
116 case 0xaf: /* scasw */
129 /***********************************************************************
132 * Determine if the instruction at CS:EIP is an instruction that
133 * is a function return.
135 BOOL
DEBUG_IsFctReturn(void)
142 addr
.seg
= DEBUG_context
.SegCs
;
143 addr
.off
= DEBUG_context
.Eip
;
144 /* FIXME: old code was using V86BASE(DEBUG_context)
145 * instead of passing thru DOSMEM_MemoryBase
147 instr
= (BYTE
*)DEBUG_ToLinear(&addr
);
149 if (!DEBUG_READ_MEM(instr
, &ch
, sizeof(ch
)))
152 return (ch
== 0xc2) || (ch
== 0xc3);
159 /***********************************************************************
160 * DEBUG_SetBreakpoints
162 * Set or remove all the breakpoints.
164 void DEBUG_SetBreakpoints( BOOL set
)
169 DEBUG_context
.Dr7
&= ~DR7_LOCAL_ENABLE_MASK
;
172 for (i
= 0; i
< next_bp
; i
++)
174 if (!(breakpoints
[i
].refcount
&& breakpoints
[i
].enabled
))
177 switch (breakpoints
[i
].type
) {
181 char ch
= set
? INT3
: breakpoints
[i
].u
.b
.opcode
;
183 if (!DEBUG_WRITE_MEM( (void*)DEBUG_ToLinear(&breakpoints
[i
].addr
),
186 DEBUG_Printf(DBG_CHN_MESG
, "Invalid address for breakpoint %d, disabling it\n", i
);
187 breakpoints
[i
].enabled
= FALSE
;
197 int reg
= breakpoints
[i
].u
.w
.reg
;
202 case 0: lpdr
= &DEBUG_context
.Dr0
; break;
203 case 1: lpdr
= &DEBUG_context
.Dr1
; break;
204 case 2: lpdr
= &DEBUG_context
.Dr2
; break;
205 case 3: lpdr
= &DEBUG_context
.Dr3
; break;
206 default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR
, 0, 0, NULL
);
209 *lpdr
= DEBUG_ToLinear(&breakpoints
[i
].addr
);
210 bits
= (breakpoints
[i
].u
.w
.rw
) ? DR7_RW_WRITE
: DR7_RW_READ
;
211 switch (breakpoints
[i
].u
.w
.len
+ 1)
213 case 4: bits
|= DR7_LEN_4
; break;
214 case 2: bits
|= DR7_LEN_2
; break;
215 case 1: bits
|= DR7_LEN_1
; break;
216 default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR
, 0, 0, NULL
);
219 DEBUG_context
.Dr7
&= ~(0x0F << (DR7_CONTROL_SHIFT
+ DR7_CONTROL_SIZE
* reg
));
220 DEBUG_context
.Dr7
|= bits
<< (DR7_CONTROL_SHIFT
+ DR7_CONTROL_SIZE
* reg
);
221 DEBUG_context
.Dr7
|= DR7_ENABLE_MASK(reg
) | DR7_LOCAL_SLOWDOWN
;
229 /***********************************************************************
230 * DEBUG_FindBreakpoint
232 * Find the breakpoint for a given address. Return the breakpoint
233 * number or -1 if none.
234 * If type is DBG_BREAKPOINT, addr is a complete addr
235 * If type is DBG_WATCHPOINT, only addr.off is meaningful and contains
238 static int DEBUG_FindBreakpoint( const DBG_ADDR
*addr
, int type
)
242 for (i
= 0; i
< next_bp
; i
++)
244 if (breakpoints
[i
].refcount
&& breakpoints
[i
].enabled
&&
245 breakpoints
[i
].type
== type
)
247 if ((type
== DBG_BREAK
&&
248 breakpoints
[i
].addr
.seg
== addr
->seg
&&
249 breakpoints
[i
].addr
.off
== addr
->off
) ||
250 (type
== DBG_WATCH
&&
251 DEBUG_ToLinear(&breakpoints
[i
].addr
) == addr
->off
))
258 /***********************************************************************
261 * Find an empty slot in BP table to add a new break/watch point
263 static int DEBUG_InitXPoint(int type
, DBG_ADDR
* addr
)
267 for (num
= (next_bp
< MAX_BREAKPOINTS
) ? next_bp
++ : 1;
268 num
< MAX_BREAKPOINTS
; num
++)
270 if (breakpoints
[num
].refcount
== 0)
272 breakpoints
[num
].refcount
= 1;
273 breakpoints
[num
].enabled
= TRUE
;
274 breakpoints
[num
].type
= type
;
275 breakpoints
[num
].skipcount
= 0;
276 breakpoints
[num
].addr
= *addr
;
277 breakpoints
[num
].is32
= 1;
281 switch (DEBUG_GetSelectorType( addr
->seg
))
284 case 16: breakpoints
[num
].is32
= 0; break;
285 default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR
, 0, 0, NULL
);
293 DEBUG_Printf( DBG_CHN_MESG
, "Too many breakpoints. Please delete some.\n" );
297 /***********************************************************************
298 * DEBUG_GetWatchedValue
300 * Returns the value watched by watch point 'num'.
302 static BOOL
DEBUG_GetWatchedValue( int num
, LPDWORD val
)
306 if (!DEBUG_READ_MEM((void*)DEBUG_ToLinear(&breakpoints
[num
].addr
),
307 buf
, breakpoints
[num
].u
.w
.len
+ 1))
310 switch (breakpoints
[num
].u
.w
.len
+ 1)
312 case 4: *val
= *(DWORD
*)buf
; break;
313 case 2: *val
= *(WORD
*)buf
; break;
314 case 1: *val
= *(BYTE
*)buf
; break;
315 default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR
, 0, 0, NULL
);
320 /***********************************************************************
321 * DEBUG_AddBreakpoint
325 void DEBUG_AddBreakpoint( const DBG_VALUE
*_value
, BOOL (*func
)(void) )
327 DBG_VALUE value
= *_value
;
332 assert(_value
->cookie
== DV_TARGET
|| _value
->cookie
== DV_HOST
);
335 DEBUG_FixAddress( &value
.addr
, DEBUG_context
.SegCs
);
338 if( value
.type
!= NULL
&& value
.type
== DEBUG_TypeIntConst
)
341 * We know that we have the actual offset stored somewhere
342 * else in 32-bit space. Grab it, and we
345 seg2
= value
.addr
.seg
;
347 value
.addr
.off
= DEBUG_GetExprValue(&value
, NULL
);
348 value
.addr
.seg
= seg2
;
351 if ((num
= DEBUG_FindBreakpoint(&value
.addr
, DBG_BREAK
)) >= 1)
353 breakpoints
[num
].refcount
++;
357 if (!DEBUG_READ_MEM_VERBOSE((void*)DEBUG_ToLinear( &value
.addr
), &ch
, sizeof(ch
)))
360 if ((num
= DEBUG_InitXPoint(DBG_BREAK
, &value
.addr
)) == -1)
363 breakpoints
[num
].u
.b
.opcode
= ch
;
364 breakpoints
[num
].u
.b
.func
= func
;
366 DEBUG_Printf( DBG_CHN_MESG
, "Breakpoint %d at ", num
);
367 DEBUG_PrintAddress( &breakpoints
[num
].addr
, breakpoints
[num
].is32
? 32 : 16,
369 DEBUG_Printf( DBG_CHN_MESG
, "\n" );
373 /***********************************************************************
374 * DEBUG_AddWatchpoint
378 void DEBUG_AddWatchpoint( const DBG_VALUE
*_value
, BOOL is_write
)
380 DBG_VALUE value
= *_value
;
385 assert(_value
->cookie
== DV_TARGET
|| _value
->cookie
== DV_HOST
);
388 DEBUG_FixAddress( &value
.addr
, DEBUG_context
.SegCs
);
391 if ( value
.type
!= NULL
&& value
.type
== DEBUG_TypeIntConst
)
394 * We know that we have the actual offset stored somewhere
395 * else in 32-bit space. Grab it, and we
398 seg2
= value
.addr
.seg
;
400 value
.addr
.off
= DEBUG_GetExprValue(&value
, NULL
);
401 value
.addr
.seg
= seg2
;
404 for (num
= 1; num
< next_bp
; num
++)
406 if (breakpoints
[num
].refcount
&& breakpoints
[num
].enabled
&&
407 breakpoints
[num
].type
== DBG_WATCH
) {
408 mask
|= (1 << breakpoints
[num
].u
.w
.reg
);
412 for (reg
= 0; reg
< 4 && (mask
& (1 << reg
)); reg
++);
415 DEBUG_Printf(DBG_CHN_MESG
, "All i386 hardware watchpoints have been set. Delete some\n");
420 if ((num
= DEBUG_InitXPoint(DBG_WATCH
, &value
.addr
)) == -1)
423 breakpoints
[num
].u
.w
.len
= 4 - 1;
424 if (_value
->type
&& DEBUG_GetObjectSize(_value
->type
) < 4)
425 breakpoints
[num
].u
.w
.len
= 2 - 1;
427 if (!DEBUG_GetWatchedValue( num
, &breakpoints
[num
].u
.w
.oldval
))
429 DEBUG_Printf(DBG_CHN_MESG
, "Bad address. Watchpoint not set\n");
430 breakpoints
[num
].refcount
= 0;
433 breakpoints
[num
].u
.w
.rw
= (is_write
) ? TRUE
: FALSE
;
434 breakpoints
[reg
].u
.w
.reg
= reg
;
436 DEBUG_Printf( DBG_CHN_MESG
, "Watchpoint %d at ", num
);
437 DEBUG_PrintAddress( &breakpoints
[num
].addr
, breakpoints
[num
].is32
? 32:16, TRUE
);
438 DEBUG_Printf( DBG_CHN_MESG
, "\n" );
441 /***********************************************************************
442 * DEBUG_DelBreakpoint
444 * Delete a breakpoint.
446 void DEBUG_DelBreakpoint( int num
)
448 if ((num
<= 0) || (num
>= next_bp
) || breakpoints
[num
].refcount
== 0)
450 DEBUG_Printf( DBG_CHN_MESG
, "Invalid breakpoint number %d\n", num
);
454 if (--breakpoints
[num
].refcount
> 0)
457 if( breakpoints
[num
].condition
!= NULL
)
459 DEBUG_FreeExpr(breakpoints
[num
].condition
);
460 breakpoints
[num
].condition
= NULL
;
463 breakpoints
[num
].enabled
= FALSE
;
464 breakpoints
[num
].refcount
= 0;
465 breakpoints
[num
].skipcount
= 0;
468 /***********************************************************************
469 * DEBUG_EnableBreakpoint
471 * Enable or disable a break point.
473 void DEBUG_EnableBreakpoint( int num
, BOOL enable
)
475 if ((num
<= 0) || (num
>= next_bp
) || breakpoints
[num
].refcount
== 0)
477 DEBUG_Printf( DBG_CHN_MESG
, "Invalid breakpoint number %d\n", num
);
480 breakpoints
[num
].enabled
= (enable
) ? TRUE
: FALSE
;
481 breakpoints
[num
].skipcount
= 0;
485 /***********************************************************************
486 * DEBUG_FindTriggeredWatchpoint
488 * Lookup the watchpoints to see if one has been triggered
489 * Return >= (watch point index) if one is found and *oldval is set to
490 * the value watched before the TRAP
491 * Return -1 if none found (*oldval is undetermined)
493 * Unfortunately, Linux does *NOT* (A REAL PITA) report with ptrace
494 * the DR6 register value, so we have to look with our own need the
498 static int DEBUG_FindTriggeredWatchpoint(LPDWORD oldval
)
503 /* Method 1 => get triggered watchpoint from context (doesn't work on Linux
506 for (i
= 0; i
< next_bp
; i
++)
511 if (breakpoints
[i
].refcount
&& breakpoints
[i
].enabled
&&
512 breakpoints
[i
].type
== DBG_WATCH
&&
513 (DEBUG_context
.Dr6
& (1 << breakpoints
[i
].u
.w
.reg
)))
515 DEBUG_context
.Dr6
&= ~(1 << breakpoints
[i
].u
.w
.reg
);
517 *oldval
= breakpoints
[i
].u
.w
.oldval
;
518 if (DEBUG_GetWatchedValue(i
, &val
)) {
519 breakpoints
[i
].u
.w
.oldval
= val
;
526 /* Method 1 failed, trying method2 */
528 /* Method 2 => check if value has changed among registered watchpoints
529 * this really sucks, but this is how gdb 4.18 works on my linux box
532 for (i
= 0; i
< next_bp
; i
++)
537 if (breakpoints
[i
].refcount
&& breakpoints
[i
].enabled
&&
538 breakpoints
[i
].type
== DBG_WATCH
&&
539 DEBUG_GetWatchedValue(i
, &val
))
541 *oldval
= breakpoints
[i
].u
.w
.oldval
;
544 DEBUG_context
.Dr6
&= ~(1 << breakpoints
[i
].u
.w
.reg
);
545 breakpoints
[i
].u
.w
.oldval
= val
;
547 /* cannot break, because two watch points may have been triggered on
549 * only one will be reported to the user (FIXME ?)
558 /***********************************************************************
559 * DEBUG_InfoBreakpoints
561 * Display break points information.
563 void DEBUG_InfoBreakpoints(void)
567 DEBUG_Printf( DBG_CHN_MESG
, "Breakpoints:\n" );
568 for (i
= 1; i
< next_bp
; i
++)
570 if (breakpoints
[i
].refcount
&& breakpoints
[i
].type
== DBG_BREAK
)
572 DEBUG_Printf( DBG_CHN_MESG
, "%d: %c ", i
, breakpoints
[i
].enabled
? 'y' : 'n');
573 DEBUG_PrintAddress( &breakpoints
[i
].addr
,
574 breakpoints
[i
].is32
? 32 : 16, TRUE
);
575 DEBUG_Printf( DBG_CHN_MESG
, " (%u)\n", breakpoints
[i
].refcount
);
576 if( breakpoints
[i
].condition
!= NULL
)
578 DEBUG_Printf(DBG_CHN_MESG
, "\t\tstop when ");
579 DEBUG_DisplayExpr(breakpoints
[i
].condition
);
580 DEBUG_Printf(DBG_CHN_MESG
, "\n");
584 DEBUG_Printf( DBG_CHN_MESG
, "Watchpoints:\n" );
585 for (i
= 1; i
< next_bp
; i
++)
587 if (breakpoints
[i
].refcount
&& breakpoints
[i
].type
== DBG_WATCH
)
589 DEBUG_Printf( DBG_CHN_MESG
, "%d: %c ", i
, breakpoints
[i
].enabled
? 'y' : 'n');
590 DEBUG_PrintAddress( &breakpoints
[i
].addr
,
591 breakpoints
[i
].is32
? 32 : 16, TRUE
);
592 DEBUG_Printf( DBG_CHN_MESG
, " on %d byte%s (%c)\n",
593 breakpoints
[i
].u
.w
.len
+ 1,
594 breakpoints
[i
].u
.w
.len
> 0 ? "s" : "",
595 breakpoints
[i
].u
.w
.rw
? 'W' : 'R');
596 if( breakpoints
[i
].condition
!= NULL
)
598 DEBUG_Printf(DBG_CHN_MESG
, "\t\tstop when ");
599 DEBUG_DisplayExpr(breakpoints
[i
].condition
);
600 DEBUG_Printf(DBG_CHN_MESG
, "\n");
606 /***********************************************************************
609 * Check whether or not the condition (bp / skipcount) of a break/watch
612 static BOOL
DEBUG_ShallBreak( int bpnum
)
614 if ( breakpoints
[bpnum
].condition
!= NULL
)
616 DBG_VALUE value
= DEBUG_EvalExpr(breakpoints
[bpnum
].condition
);
618 if ( value
.type
== NULL
)
621 * Something wrong - unable to evaluate this expression.
623 DEBUG_Printf(DBG_CHN_MESG
, "Unable to evaluate expression ");
624 DEBUG_DisplayExpr(breakpoints
[bpnum
].condition
);
625 DEBUG_Printf(DBG_CHN_MESG
, "\nTurning off condition\n");
626 DEBUG_AddBPCondition(bpnum
, NULL
);
628 else if( !DEBUG_GetExprValue( &value
, NULL
) )
634 if ( breakpoints
[bpnum
].skipcount
> 0 && --breakpoints
[bpnum
].skipcount
> 0 )
637 return (breakpoints
[bpnum
].u
.b
.func
) ? (breakpoints
[bpnum
].u
.b
.func
)() : TRUE
;
640 /***********************************************************************
641 * DEBUG_ShouldContinue
643 * Determine if we should continue execution after a SIGTRAP signal when
644 * executing in the given mode.
646 BOOL
DEBUG_ShouldContinue( DWORD code
, enum exec_mode mode
, int * count
)
653 struct symbol_info syminfo
;
656 /* If not single-stepping, back up over the int3 instruction */
657 if (code
== EXCEPTION_BREAKPOINT
)
661 DEBUG_GetCurrentAddress( &addr
);
662 bpnum
= DEBUG_FindBreakpoint( &addr
, DBG_BREAK
);
663 breakpoints
[0].enabled
= FALSE
; /* disable the step-over breakpoint */
665 if ((bpnum
!= 0) && (bpnum
!= -1))
667 if (!DEBUG_ShallBreak(bpnum
)) return TRUE
;
669 DEBUG_Printf( DBG_CHN_MESG
, "Stopped on breakpoint %d at ", bpnum
);
670 syminfo
= DEBUG_PrintAddress( &breakpoints
[bpnum
].addr
,
671 breakpoints
[bpnum
].is32
? 32 : 16, TRUE
);
672 DEBUG_Printf( DBG_CHN_MESG
, "\n" );
674 if( syminfo
.list
.sourcefile
!= NULL
)
675 DEBUG_List(&syminfo
.list
, NULL
, 0);
679 wpnum
= DEBUG_FindTriggeredWatchpoint(&oldval
);
680 if ((wpnum
!= 0) && (wpnum
!= -1))
682 /* If not single-stepping, do not back up over the int3 instruction */
683 if (code
== EXCEPTION_BREAKPOINT
)
690 if (!DEBUG_ShallBreak(wpnum
)) return TRUE
;
693 addrlen
= !addr
.seg
? 32 : DEBUG_GetSelectorType( addr
.seg
);
695 DEBUG_Printf(DBG_CHN_MESG
, "Stopped on watchpoint %d at ", wpnum
);
696 syminfo
= DEBUG_PrintAddress( &addr
, addrlen
, TRUE
);
698 DEBUG_Printf(DBG_CHN_MESG
, " values: old=%lu new=%lu\n",
699 oldval
, breakpoints
[wpnum
].u
.w
.oldval
);
700 if (syminfo
.list
.sourcefile
!= NULL
)
701 DEBUG_List(&syminfo
.list
, NULL
, 0);
706 * If our mode indicates that we are stepping line numbers,
707 * get the current function, and figure out if we are exactly
708 * on a line number or not.
710 if( mode
== EXEC_STEP_OVER
|| mode
== EXEC_STEP_INSTR
)
712 if( DEBUG_CheckLinenoStatus(&addr
) == AT_LINENUMBER
)
717 else if( mode
== EXEC_STEPI_OVER
|| mode
== EXEC_STEPI_INSTR
)
722 if( *count
> 0 || mode
== EXEC_FINISH
)
725 * We still need to execute more instructions.
731 * If we are about to stop, then print out the source line if we
734 if (mode
!= EXEC_CONT
&& mode
!= EXEC_PASS
&& mode
!= EXEC_FINISH
)
736 DEBUG_FindNearestSymbol( &addr
, TRUE
, NULL
, 0, &syminfo
.list
);
737 if( syminfo
.list
.sourcefile
!= NULL
)
739 DEBUG_List(&syminfo
.list
, NULL
, 0);
744 /* If there's no breakpoint and we are not single-stepping, then we */
745 /* must have encountered an int3 in the Windows program; let's skip it. */
746 if ((bpnum
== -1) && code
== EXCEPTION_BREAKPOINT
)
750 /* no breakpoint, continue if in continuous mode */
751 return (mode
== EXEC_CONT
|| mode
== EXEC_PASS
|| mode
== EXEC_FINISH
);
754 /***********************************************************************
755 * DEBUG_SuspendExecution
757 * Remove all breakpoints before entering the debug loop
759 void DEBUG_SuspendExecution( void )
761 DEBUG_SetBreakpoints( FALSE
);
762 breakpoints
[0] = DEBUG_CurrThread
->stepOverBP
;
765 /***********************************************************************
766 * DEBUG_RestartExecution
768 * Set the breakpoints to the correct state to restart execution
771 enum exec_mode
DEBUG_RestartExecution( enum exec_mode mode
, int count
)
778 enum exec_mode ret_mode
;
782 DEBUG_GetCurrentAddress( &addr
);
785 * This is the mode we will be running in after we finish. We would like
786 * to be able to modify this in certain cases.
790 bp
= DEBUG_FindBreakpoint( &addr
, DBG_BREAK
);
791 if ( bp
!= -1 && bp
!= 0)
794 * If we have set a new value, then save it in the BP number.
796 if( count
!= 0 && mode
== EXEC_CONT
)
798 breakpoints
[bp
].skipcount
= count
;
800 mode
= EXEC_STEPI_INSTR
; /* If there's a breakpoint, skip it */
804 if( mode
== EXEC_CONT
&& count
> 1 )
806 DEBUG_Printf(DBG_CHN_MESG
, "Not stopped at any breakpoint; argument ignored.\n");
810 if( mode
== EXEC_FINISH
&& DEBUG_IsFctReturn() )
812 mode
= ret_mode
= EXEC_STEPI_INSTR
;
815 instr
= DEBUG_ToLinear( &addr
);
816 DEBUG_READ_MEM((void*)instr
, &ch
, sizeof(ch
));
818 * See if the function we are stepping into has debug info
819 * and line numbers. If not, then we step over it instead.
820 * FIXME - we need to check for things like thunks or trampolines,
821 * as the actual function may in fact have debug info.
825 DEBUG_READ_MEM((void*)(instr
+ 1), &delta
, sizeof(delta
));
827 DEBUG_Disasm(&addr2
, FALSE
);
830 status
= DEBUG_CheckLinenoStatus(&addr2
);
832 * Anytime we have a trampoline, step over it.
834 if( ((mode
== EXEC_STEP_OVER
) || (mode
== EXEC_STEPI_OVER
))
835 && status
== FUNC_IS_TRAMPOLINE
)
838 DEBUG_Printf(DBG_CHN_MESG
, "Not stepping into trampoline at %x (no lines)\n",
841 mode
= EXEC_STEP_OVER_TRAMPOLINE
;
844 if( mode
== EXEC_STEP_INSTR
&& status
== FUNC_HAS_NO_LINES
)
847 DEBUG_Printf(DBG_CHN_MESG
, "Not stepping into function at %x (no lines)\n",
850 mode
= EXEC_STEP_OVER
;
855 if( mode
== EXEC_STEP_INSTR
)
857 if( DEBUG_CheckLinenoStatus(&addr
) == FUNC_HAS_NO_LINES
)
859 DEBUG_Printf(DBG_CHN_MESG
, "Single stepping until exit from function, \n");
860 DEBUG_Printf(DBG_CHN_MESG
, "which has no line number information.\n");
862 ret_mode
= mode
= EXEC_FINISH
;
868 case EXEC_CONT
: /* Continuous execution */
869 case EXEC_PASS
: /* Continue, passing exception */
871 DEBUG_context
.EFlags
&= ~STEP_FLAG
;
873 DEBUG_SetBreakpoints( TRUE
);
876 case EXEC_STEP_OVER_TRAMPOLINE
:
878 * This is the means by which we step over our conversion stubs
879 * in callfrom*.s and callto*.s. We dig the appropriate address
880 * off the stack, and we set the breakpoint there instead of the
881 * address just after the call.
884 DEBUG_READ_MEM((void*)(DEBUG_context
.Esp
+
885 2 * sizeof(unsigned int)),
886 &addr
.off
, sizeof(addr
.off
));
887 DEBUG_context
.EFlags
&= ~STEP_FLAG
;
889 breakpoints
[0].addr
= addr
;
890 breakpoints
[0].enabled
= TRUE
;
891 breakpoints
[0].refcount
= 1;
892 breakpoints
[0].skipcount
= 0;
893 DEBUG_READ_MEM((void*)DEBUG_ToLinear( &addr
), &breakpoints
[0].u
.b
.opcode
,
895 DEBUG_SetBreakpoints( TRUE
);
899 case EXEC_STEPI_OVER
: /* Stepping over a call */
900 case EXEC_STEP_OVER
: /* Stepping over a call */
901 if (DEBUG_IsStepOverInstr())
904 DEBUG_context
.EFlags
&= ~STEP_FLAG
;
906 DEBUG_Disasm(&addr
, FALSE
);
907 breakpoints
[0].addr
= addr
;
908 breakpoints
[0].enabled
= TRUE
;
909 breakpoints
[0].refcount
= 1;
910 breakpoints
[0].skipcount
= 0;
911 DEBUG_READ_MEM((void*)DEBUG_ToLinear( &addr
), &breakpoints
[0].u
.b
.opcode
,
913 DEBUG_SetBreakpoints( TRUE
);
916 /* else fall through to single-stepping */
918 case EXEC_STEP_INSTR
: /* Single-stepping an instruction */
919 case EXEC_STEPI_INSTR
: /* Single-stepping an instruction */
921 DEBUG_context
.EFlags
|= STEP_FLAG
;
927 RaiseException(DEBUG_STATUS_INTERNAL_ERROR
, 0, 0, NULL
);
929 DEBUG_CurrThread
->stepOverBP
= breakpoints
[0];
934 DEBUG_AddBPCondition(int num
, struct expr
* exp
)
936 if ((num
<= 0) || (num
>= next_bp
) || !breakpoints
[num
].refcount
)
938 DEBUG_Printf( DBG_CHN_MESG
, "Invalid breakpoint number %d\n", num
);
942 if( breakpoints
[num
].condition
!= NULL
)
944 DEBUG_FreeExpr(breakpoints
[num
].condition
);
945 breakpoints
[num
].condition
= NULL
;
950 breakpoints
[num
].condition
= DEBUG_CloneExpr(exp
);