static void RemoveOneBP( brkp *bp )
{
if( bp->status.b.in_place && SectIsLoaded( bp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
bp->status.b.in_place = false;
RemoteRestoreBreak( bp->loc.addr, bp->item.ud );
}
}
static bool HaveHitBP( brkp *bp )
{
if( !bp->status.b.active ) return( FALSE );
if( !bp->status.b.in_place ) return( FALSE );
if( !SectIsLoaded( bp->loc.addr.sect_id, OVL_MAP_EXE ) ) return( FALSE );
if( AddrComp( bp->loc.addr, GetRegIP() ) != 0 ) return( FALSE );
return( TRUE );
}
static void RemoveOneWP( brkp *bp )
{
mad_type_info mti;
if( bp->status.b.in_place && SectIsLoaded( bp->loc.addr.sect_id,OVL_MAP_EXE ) ) {
bp->status.b.in_place = false;
MADTypeInfo( bp->th, &mti );
RemoteRestoreWatch( bp->loc.addr, mti.b.bits / BITS_PER_BYTE );
}
}
static bool InsertOneBP( brkp *bp, bool force )
{
bool at_ip;
at_ip = false;
if( bp->status.b.active ) {
if( !force && AddrComp( bp->loc.addr, GetRegIP() ) == 0 ) {
at_ip = true;
} else if( SectIsLoaded( bp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
bp->status.b.in_place = true;
bp->item.ud = RemoteSetBreak( bp->loc.addr );
}
}
return( at_ip );
}
void InsertWPs( void )
{
brkp *wp;
unsigned long mult;
mad_type_info mti;
for( wp = BrkList; wp != NULL; wp = wp->next ) {
if( wp->th == MAD_NIL_TYPE_HANDLE ) continue;
if( wp->status.b.active && SectIsLoaded( wp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
wp->status.b.in_place = TRUE;
MADTypeInfo( wp->th, &mti );
RemoteSetWatch( wp->loc.addr, mti.b.bits / BITS_PER_BYTE, &mult );
}
}
}
bool UpdateWPs( void )
{
brkp *wp;
bool have_active;
have_active = FALSE;
for( wp = BrkList; wp != NULL; wp = wp->next ) {
if( wp->th == MAD_NIL_TYPE_HANDLE ) continue;
wp->status.b.hit = FALSE;
wp->status.b.has_value = FALSE;
if( wp->status.b.active && SectIsLoaded( wp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
have_active = TRUE;
GetWPVal( wp );
}
}
return( have_active );
}
bool UpdateWPs( void )
{
brkp *wp;
bool have_active;
have_active = false;
for( wp = BrkList; wp != NULL; wp = wp->next ) {
if( IS_BP_EXECUTE( wp->th ) )
continue;
wp->status.b.hit = false;
wp->status.b.has_value = false;
if( wp->status.b.active && SectIsLoaded( wp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
have_active = true;
GetWPVal( wp );
}
}
return( have_active );
}
unsigned CheckBPs( unsigned conditions, unsigned run_conditions )
{
brkp *bp;
item_mach item;
bool hit, bphit, wphit;
bool state_set;
mad_type_info mti;
wphit = false;
state_set = false;
bphit = false;
for( bp = BrkList; bp != NULL; bp = bp->next ) {
if( !bp->status.b.active )
continue;
hit = false;
if( IS_BP_EXECUTE( bp->th ) ) {
if( HaveHitBP( bp ) ) {
hit = true;
}
} else {
if( SectIsLoaded( bp->loc.addr.sect_id, OVL_MAP_EXE ) ) {
MADTypeInfo( bp->th, &mti );
if( ItemGetMAD( &bp->loc.addr, &item, IT_NIL, bp->th ) ) {
/*
* If the breakpoint fires here because of a write, but the value hasn't changed then
* the breakpoint does not fire off!!!! The SupportsExactBreakpoints actually enables
* break on write, not break on change and allocates the exact data space - not plus
* or minus a few bytes...
*
*/
if( _IsOn( SW_BREAK_ON_WRITE ) && IsExactBreakpointsSupported() ) {
bool drop_hit = false;
if( ( UserTmpBrk.status.b.active ) || ( DbgTmpBrk.status.b.active ) ) {
if( HaveHitBP( &UserTmpBrk ) ) {
drop_hit = true;
}
if( HaveHitBP( &DbgTmpBrk ) ) {
drop_hit = true;
}
if( ! ( conditions & ( COND_BREAK | COND_WATCH | COND_TRACE | COND_USER | COND_EXCEPTION | COND_STOP ) ) ) {
drop_hit = true;
}
}
if( !drop_hit )
hit = true;
} else {
if( ( memcmp( &bp->item, &item, mti.b.bits / BITS_PER_BYTE ) != 0 ) || !bp->status.b.has_value ) {
hit = true;
}
}
} else if( bp->status.b.has_value ) {
if( conditions & ( COND_BREAK | COND_WATCH | COND_TRACE | COND_USER | COND_EXCEPTION | COND_STOP ) ) {
hit = true;
}
}
}
}
if( hit ) {
bp->total_hits++;
}
if( hit && bp->condition != NULL && bp->status.b.use_condition ) {
_SwitchOn( SW_ERR_IN_TXTBUFF );
if( !state_set ) {
/* gets all the registers updated */
SetProgState( run_conditions );
state_set = true;
}
if( SpawnP( TestExpression, bp ) == 0 ) {
if( !bp->status.b.expr_true ) {
hit = false;
} else {
bp->status.b.expr_true = false;
}
} else {
bp->status.b.expr_error = true;
bp->error = DupStr( TxtBuff );
hit = true;
}
_SwitchOff( SW_ERR_IN_TXTBUFF );
}
if( hit && bp->status.b.use_countdown && bp->countdown != 0 && !bp->status.b.expr_error ) {
if( --bp->countdown != 0 ) {
hit = false;
}
}
if( hit ) {
if( IS_BP_EXECUTE( bp->th ) ) {
bphit = true;
} else {
wphit = true;
}
bp->status.b.hit = true;
}
}
if( state_set ) {
/* we might have changed a register in eval'ing conditions */
WriteDbgRegs();
}
if( HaveHitBP( &UserTmpBrk ) ) {
bphit = true;
UserTmpBrk.status.b.hit = true;
}
if( HaveHitBP( &DbgTmpBrk ) ) {
bphit = true;
DbgTmpBrk.status.b.hit = true;
}
if( bphit )
return( COND_BREAK | ( conditions & ~COND_STOPPERS ) );
if( wphit )
return( COND_WATCH | ( conditions & ~COND_STOPPERS ) );
if( conditions & COND_BREAK ) {
unsigned max = TXT_LEN;
ReadDbgRegs();
if( MADUnexpectedBreak( &DbgRegs->mr, TxtBuff, &max ) == MS_OK ) {
WriteDbgRegs();
if( max == 0 ) {
conditions &= ~COND_STOPPERS;
if( _IsOff( SW_CONTINUE_UNEXPECTED_BREAK ) ) {
conditions |= COND_TRACE;
}
return( conditions );
} else if( SetMsgText( TxtBuff, &conditions ) ) {
DUIMsgBox( TxtBuff );
return( COND_TRACE | COND_MESSAGE | ( conditions & ~COND_STOPPERS ) );
} else {
return( conditions & ~COND_STOPPERS );
}
} else {
return( conditions & ~COND_STOPPERS );
}
} else if( conditions & COND_WATCH ) {
return( conditions & ~COND_STOPPERS );
}
return( conditions );
}
