debugger/registers.c

   1 /*
   2  * Debugger register handling
   3  *
   4  * Copyright 1995 Alexandre Julliard
   5  */
   6
   7 #include "config.h"
   8 #include <string.h>
   9 #include "debugger.h"
  10
  11 /***********************************************************************
  12  *           DEBUG_Flags
  13  *
  14  * Return Flag String.
  15  */
  16 char *DEBUG_Flags( DWORD flag, char *buf )
  17 {
  18 #ifdef __i386__
  19     char *pt;
  20
  21     strcpy( buf, "   - 00      - - - " );
  22     pt = buf + strlen( buf );
  23     if ( buf >= pt-- ) return( buf );
  24     if ( flag & 0x00000001 ) *pt = 'C'; /* Carry Falg */
  25     if ( buf >= pt-- ) return( buf );
  26     if ( flag & 0x00000002 ) *pt = '1';
  27     if ( buf >= pt-- ) return( buf );
  28     if ( flag & 0x00000004 ) *pt = 'P'; /* Parity Flag */
  29     if ( buf >= pt-- ) return( buf );
  30     if ( flag & 0x00000008 ) *pt = '-';
  31     if ( buf >= pt-- ) return( buf );
  32     if ( flag & 0x00000010 ) *pt = 'A'; /* Auxiliary Carry Flag */
  33     if ( buf >= pt-- ) return( buf );
  34     if ( flag & 0x00000020 ) *pt = '-';
  35     if ( buf >= pt-- ) return( buf );
  36     if ( flag & 0x00000040 ) *pt = 'Z'; /* Zero Flag */
  37     if ( buf >= pt-- ) return( buf );
  38     if ( flag & 0x00000080 ) *pt = 'S'; /* Sign Flag */
  39     if ( buf >= pt-- ) return( buf );
  40     if ( flag & 0x00000100 ) *pt = 'T'; /* Trap/Trace Flag */
  41     if ( buf >= pt-- ) return( buf );
  42     if ( flag & 0x00000200 ) *pt = 'I'; /* Interupt Enable Flag */
  43     if ( buf >= pt-- ) return( buf );
  44     if ( flag & 0x00000400 ) *pt = 'D'; /* Direction Indicator */
  45     if ( buf >= pt-- ) return( buf );
  46     if ( flag & 0x00000800 ) *pt = 'O'; /* Overflow Flag */
  47     if ( buf >= pt-- ) return( buf );
  48     if ( flag & 0x00001000 ) *pt = '1'; /* I/O Privilage Level */
  49     if ( buf >= pt-- ) return( buf );
  50     if ( flag & 0x00002000 ) *pt = '1'; /* I/O Privilage Level */
  51     if ( buf >= pt-- ) return( buf );
  52     if ( flag & 0x00004000 ) *pt = 'N'; /* Nested Task Flag */
  53     if ( buf >= pt-- ) return( buf );
  54     if ( flag & 0x00008000 ) *pt = '-';
  55     if ( buf >= pt-- ) return( buf );
  56     if ( flag & 0x00010000 ) *pt = 'R'; /* Resume Flag */
  57     if ( buf >= pt-- ) return( buf );
  58     if ( flag & 0x00020000 ) *pt = 'V'; /* Vritual Mode Flag */
  59     if ( buf >= pt-- ) return( buf );
  60     if ( flag & 0x00040000 ) *pt = 'a'; /* Alignment Check Flag */
  61     if ( buf >= pt-- ) return( buf );
  62     return( buf );
  63 #else
  64     strcpy(buf, "unknown CPU");
  65     return buf;
  66 #endif
  67 }
  68
  69
  70 /***********************************************************************
  71  *           DEBUG_InfoRegisters
  72  *
  73  * Display registers information.
  74  */
  75 void DEBUG_InfoRegisters(void)
  76 {
  77     DEBUG_Printf(DBG_CHN_MESG,"Register dump:\n");
  78
  79 #ifdef __i386__
  80     /* First get the segment registers out of the way */
  81     DEBUG_Printf( DBG_CHN_MESG," CS:%04x SS:%04x DS:%04x ES:%04x FS:%04x GS:%04x",
  82                   (WORD)DEBUG_context.SegCs, (WORD)DEBUG_context.SegSs,
  83                   (WORD)DEBUG_context.SegDs, (WORD)DEBUG_context.SegEs,
  84                   (WORD)DEBUG_context.SegFs, (WORD)DEBUG_context.SegGs );
  85     if (DEBUG_CurrThread->dbg_mode != MODE_32)
  86     {
  87         char flag[33];
  88
  89         DEBUG_Printf( DBG_CHN_MESG,"\n IP:%04x SP:%04x BP:%04x FLAGS:%04x(%s)\n",
  90                       LOWORD(DEBUG_context.Eip), LOWORD(DEBUG_context.Esp),
  91                       LOWORD(DEBUG_context.Ebp), LOWORD(DEBUG_context.EFlags),
  92                       DEBUG_Flags(LOWORD(DEBUG_context.EFlags), flag));
  93         DEBUG_Printf( DBG_CHN_MESG," AX:%04x BX:%04x CX:%04x DX:%04x SI:%04x DI:%04x\n",
  94                       LOWORD(DEBUG_context.Eax), LOWORD(DEBUG_context.Ebx),
  95                       LOWORD(DEBUG_context.Ecx), LOWORD(DEBUG_context.Edx),
  96                       LOWORD(DEBUG_context.Esi), LOWORD(DEBUG_context.Edi) );
  97     }
  98     else  /* 32-bit mode */
  99     {
 100         char flag[33];
 101
 102         DEBUG_Printf( DBG_CHN_MESG, "\n EIP:%08lx ESP:%08lx EBP:%08lx EFLAGS:%08lx(%s)\n",
 103                       DEBUG_context.Eip, DEBUG_context.Esp,
 104                       DEBUG_context.Ebp, DEBUG_context.EFlags,
 105                       DEBUG_Flags(DEBUG_context.EFlags, flag));
 106         DEBUG_Printf( DBG_CHN_MESG, " EAX:%08lx EBX:%08lx ECX:%08lx EDX:%08lx\n",
 107                       DEBUG_context.Eax, DEBUG_context.Ebx,
 108                       DEBUG_context.Ecx, DEBUG_context.Edx );
 109         DEBUG_Printf( DBG_CHN_MESG, " ESI:%08lx EDI:%08lx\n",
 110                       DEBUG_context.Esi, DEBUG_context.Edi );
 111     }
 112 #endif
 113 }
 114
 115
 116 /***********************************************************************
 117  *           DEBUG_ValidateRegisters
 118  *
 119  * Make sure all registers have a correct value for returning from
 120  * the signal handler.
 121  */
 122 BOOL DEBUG_ValidateRegisters(void)
 123 {
 124    DBG_ADDR     addr;
 125    char         ch;
 126
 127 #ifdef __i386__
 128     if (DEBUG_context.EFlags & V86_FLAG) return TRUE;
 129
 130 #if 0
 131 /* Check that a selector is a valid ring-3 LDT selector, or a NULL selector */
 132 #define CHECK_SEG(seg,name) \
 133     if (((seg) & ~3) && ((((seg) & 7) != 7) || !DEBUG_IsSelector(seg))) { \
 134         DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for %s register: %04x\n", \
 135                       (name), (WORD)(seg) ); \
 136         return FALSE; \
 137     }
 138
 139     cs = __get_cs();
 140     ds = __get_ds();
 141     if (DEBUG_context.SegCs != cs) CHECK_SEG(DEBUG_context.SegCs, "CS");
 142     if (DEBUG_context.SegSs != ds) CHECK_SEG(DEBUG_context.SegSs, "SS");
 143     if (DEBUG_context.SegDs != ds) CHECK_SEG(DEBUG_context.SegDs, "DS");
 144     if (DEBUG_context.SegEs != ds) CHECK_SEG(DEBUG_context.SegEs, "ES");
 145     if (DEBUG_context.SegFs != ds) CHECK_SEG(DEBUG_context.SegFs, "FS");
 146     if (DEBUG_context.SegGs != ds) CHECK_SEG(DEBUG_context.SegGs, "GS");
 147 #endif
 148
 149     /* Check that CS and SS are not NULL */
 150
 151     if (!(DEBUG_context.SegCs & ~3))
 152     {
 153         DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for CS register: %04x\n",
 154                       (WORD)DEBUG_context.SegCs );
 155         return FALSE;
 156     }
 157     if (!(DEBUG_context.SegSs & ~3))
 158     {
 159         DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for SS register: %04x\n",
 160                       (WORD)DEBUG_context.SegSs );
 161         return FALSE;
 162     }
 163
 164 #undef CHECK_SEG
 165 #else
 166     /* to be written */
 167 #endif
 168
 169     /* check if PC is correct */
 170     DEBUG_GetCurrentAddress(&addr);
 171     return DEBUG_READ_MEM_VERBOSE((void*)DEBUG_ToLinear(&addr), &ch, 1);
 172 }