2 * Debugger register handling
4 * Copyright 1995 Alexandre Julliard
10 #include "selectors.h"
13 CONTEXT DEBUG_context
;
15 /***********************************************************************
18 * Set a register value.
20 void DEBUG_SetRegister( enum debug_regs reg
, int val
)
25 case REG_EAX
: EAX_reg(&DEBUG_context
) = val
; break;
26 case REG_EBX
: EBX_reg(&DEBUG_context
) = val
; break;
27 case REG_ECX
: ECX_reg(&DEBUG_context
) = val
; break;
28 case REG_EDX
: EDX_reg(&DEBUG_context
) = val
; break;
29 case REG_ESI
: ESI_reg(&DEBUG_context
) = val
; break;
30 case REG_EDI
: EDI_reg(&DEBUG_context
) = val
; break;
31 case REG_EBP
: EBP_reg(&DEBUG_context
) = val
; break;
32 case REG_EFL
: EFL_reg(&DEBUG_context
) = val
; break;
33 case REG_EIP
: EIP_reg(&DEBUG_context
) = val
; break;
34 case REG_ESP
: ESP_reg(&DEBUG_context
) = val
; break;
35 case REG_CS
: CS_reg(&DEBUG_context
) = val
; break;
36 case REG_DS
: DS_reg(&DEBUG_context
) = val
; break;
37 case REG_ES
: ES_reg(&DEBUG_context
) = val
; break;
38 case REG_SS
: SS_reg(&DEBUG_context
) = val
; break;
39 case REG_FS
: FS_reg(&DEBUG_context
) = val
; break;
40 case REG_GS
: GS_reg(&DEBUG_context
) = val
; break;
41 case REG_AX
: SET_LOWORD(EAX_reg(&DEBUG_context
),val
); break;
42 case REG_BX
: SET_LOWORD(EBX_reg(&DEBUG_context
),val
); break;
43 case REG_CX
: SET_LOWORD(ECX_reg(&DEBUG_context
),val
); break;
44 case REG_DX
: SET_LOWORD(EDX_reg(&DEBUG_context
),val
); break;
45 case REG_SI
: SET_LOWORD(ESI_reg(&DEBUG_context
),val
); break;
46 case REG_DI
: SET_LOWORD(EDI_reg(&DEBUG_context
),val
); break;
47 case REG_BP
: SET_LOWORD(EBP_reg(&DEBUG_context
),val
); break;
48 case REG_FL
: SET_LOWORD(EFL_reg(&DEBUG_context
),val
); break;
49 case REG_IP
: SET_LOWORD(EIP_reg(&DEBUG_context
),val
); break;
50 case REG_SP
: SET_LOWORD(ESP_reg(&DEBUG_context
),val
); break;
57 DEBUG_PrintRegister(enum debug_regs reg
)
62 case REG_EAX
: fprintf(stderr
, "%%eax"); break;
63 case REG_EBX
: fprintf(stderr
, "%%ebx"); break;
64 case REG_ECX
: fprintf(stderr
, "%%ecx"); break;
65 case REG_EDX
: fprintf(stderr
, "%%edx"); break;
66 case REG_ESI
: fprintf(stderr
, "%%esi"); break;
67 case REG_EDI
: fprintf(stderr
, "%%edi"); break;
68 case REG_EBP
: fprintf(stderr
, "%%ebp"); break;
69 case REG_EFL
: fprintf(stderr
, "%%efl"); break;
70 case REG_EIP
: fprintf(stderr
, "%%eip"); break;
71 case REG_ESP
: fprintf(stderr
, "%%esp"); break;
72 case REG_AX
: fprintf(stderr
, "%%ax"); break;
73 case REG_BX
: fprintf(stderr
, "%%bx"); break;
74 case REG_CX
: fprintf(stderr
, "%%cx"); break;
75 case REG_DX
: fprintf(stderr
, "%%dx"); break;
76 case REG_SI
: fprintf(stderr
, "%%si"); break;
77 case REG_DI
: fprintf(stderr
, "%%di"); break;
78 case REG_BP
: fprintf(stderr
, "%%bp"); break;
79 case REG_FL
: fprintf(stderr
, "%%fl"); break;
80 case REG_IP
: fprintf(stderr
, "%%ip"); break;
81 case REG_SP
: fprintf(stderr
, "%%sp"); break;
82 case REG_CS
: fprintf(stderr
, "%%cs"); break;
83 case REG_DS
: fprintf(stderr
, "%%ds"); break;
84 case REG_ES
: fprintf(stderr
, "%%es"); break;
85 case REG_SS
: fprintf(stderr
, "%%ss"); break;
86 case REG_FS
: fprintf(stderr
, "%%fs"); break;
87 case REG_GS
: fprintf(stderr
, "%%gs"); break;
95 /***********************************************************************
98 * Get a register value.
100 int DEBUG_GetRegister( enum debug_regs reg
)
105 case REG_EAX
: return EAX_reg(&DEBUG_context
);
106 case REG_EBX
: return EBX_reg(&DEBUG_context
);
107 case REG_ECX
: return ECX_reg(&DEBUG_context
);
108 case REG_EDX
: return EDX_reg(&DEBUG_context
);
109 case REG_ESI
: return ESI_reg(&DEBUG_context
);
110 case REG_EDI
: return EDI_reg(&DEBUG_context
);
111 case REG_EBP
: return EBP_reg(&DEBUG_context
);
112 case REG_EFL
: return EFL_reg(&DEBUG_context
);
113 case REG_EIP
: return EIP_reg(&DEBUG_context
);
114 case REG_ESP
: return ESP_reg(&DEBUG_context
);
115 case REG_CS
: return CS_reg(&DEBUG_context
);
116 case REG_DS
: return DS_reg(&DEBUG_context
);
117 case REG_ES
: return ES_reg(&DEBUG_context
);
118 case REG_SS
: return SS_reg(&DEBUG_context
);
119 case REG_FS
: return FS_reg(&DEBUG_context
);
120 case REG_GS
: return GS_reg(&DEBUG_context
);
121 case REG_AX
: return LOWORD(EAX_reg(&DEBUG_context
));
122 case REG_BX
: return LOWORD(EBX_reg(&DEBUG_context
));
123 case REG_CX
: return LOWORD(ECX_reg(&DEBUG_context
));
124 case REG_DX
: return LOWORD(EDX_reg(&DEBUG_context
));
125 case REG_SI
: return LOWORD(ESI_reg(&DEBUG_context
));
126 case REG_DI
: return LOWORD(EDI_reg(&DEBUG_context
));
127 case REG_BP
: return LOWORD(EBP_reg(&DEBUG_context
));
128 case REG_FL
: return LOWORD(EFL_reg(&DEBUG_context
));
129 case REG_IP
: return LOWORD(EIP_reg(&DEBUG_context
));
130 case REG_SP
: return LOWORD(ESP_reg(&DEBUG_context
));
133 return 0; /* should not happen */
137 /***********************************************************************
140 * Return Flag String.
142 char *DEBUG_Flags( DWORD flag
, char *buf
)
146 strcpy( buf
, " - 00 - - - " );
147 pt
= buf
+ strlen( buf
);
148 if ( buf
>= pt
-- ) return( buf
);
149 if ( flag
& 0x00000001 ) *pt
= 'C'; /* Carry Falg */
150 if ( buf
>= pt
-- ) return( buf
);
151 if ( flag
& 0x00000002 ) *pt
= '1';
152 if ( buf
>= pt
-- ) return( buf
);
153 if ( flag
& 0x00000004 ) *pt
= 'P'; /* Parity Flag */
154 if ( buf
>= pt
-- ) return( buf
);
155 if ( flag
& 0x00000008 ) *pt
= '-';
156 if ( buf
>= pt
-- ) return( buf
);
157 if ( flag
& 0x00000010 ) *pt
= 'A'; /* Auxiliary Carry Flag */
158 if ( buf
>= pt
-- ) return( buf
);
159 if ( flag
& 0x00000020 ) *pt
= '-';
160 if ( buf
>= pt
-- ) return( buf
);
161 if ( flag
& 0x00000040 ) *pt
= 'Z'; /* Zero Flag */
162 if ( buf
>= pt
-- ) return( buf
);
163 if ( flag
& 0x00000080 ) *pt
= 'S'; /* Sign Flag */
164 if ( buf
>= pt
-- ) return( buf
);
165 if ( flag
& 0x00000100 ) *pt
= 'T'; /* Trap/Trace Flag */
166 if ( buf
>= pt
-- ) return( buf
);
167 if ( flag
& 0x00000200 ) *pt
= 'I'; /* Interupt Enable Flag */
168 if ( buf
>= pt
-- ) return( buf
);
169 if ( flag
& 0x00000400 ) *pt
= 'D'; /* Direction Indicator */
170 if ( buf
>= pt
-- ) return( buf
);
171 if ( flag
& 0x00000800 ) *pt
= 'O'; /* Overflow Flag */
172 if ( buf
>= pt
-- ) return( buf
);
173 if ( flag
& 0x00001000 ) *pt
= '1'; /* I/O Privilage Level */
174 if ( buf
>= pt
-- ) return( buf
);
175 if ( flag
& 0x00002000 ) *pt
= '1'; /* I/O Privilage Level */
176 if ( buf
>= pt
-- ) return( buf
);
177 if ( flag
& 0x00004000 ) *pt
= 'N'; /* Nested Task Flag */
178 if ( buf
>= pt
-- ) return( buf
);
179 if ( flag
& 0x00008000 ) *pt
= '-';
180 if ( buf
>= pt
-- ) return( buf
);
181 if ( flag
& 0x00010000 ) *pt
= 'R'; /* Resume Flag */
182 if ( buf
>= pt
-- ) return( buf
);
183 if ( flag
& 0x00020000 ) *pt
= 'V'; /* Vritual Mode Flag */
184 if ( buf
>= pt
-- ) return( buf
);
185 if ( flag
& 0x00040000 ) *pt
= 'a'; /* Alignment Check Flag */
186 if ( buf
>= pt
-- ) return( buf
);
191 /***********************************************************************
192 * DEBUG_InfoRegisters
194 * Display registers information.
196 void DEBUG_InfoRegisters(void)
198 fprintf(stderr
,"Register dump:\n");
201 /* First get the segment registers out of the way */
202 fprintf( stderr
," CS:%04x SS:%04x DS:%04x ES:%04x FS:%04x GS:%04x",
203 (WORD
)CS_reg(&DEBUG_context
), (WORD
)SS_reg(&DEBUG_context
),
204 (WORD
)DS_reg(&DEBUG_context
), (WORD
)ES_reg(&DEBUG_context
),
205 (WORD
)FS_reg(&DEBUG_context
), (WORD
)GS_reg(&DEBUG_context
) );
210 fprintf( stderr
,"\n IP:%04x SP:%04x BP:%04x FLAGS:%04x(%s)\n",
211 LOWORD(EIP_reg(&DEBUG_context
)), LOWORD(ESP_reg(&DEBUG_context
)),
212 LOWORD(EBP_reg(&DEBUG_context
)), LOWORD(EFL_reg(&DEBUG_context
)),
213 DEBUG_Flags(LOWORD(EFL_reg(&DEBUG_context
)), flag
));
214 fprintf( stderr
," AX:%04x BX:%04x CX:%04x DX:%04x SI:%04x DI:%04x\n",
215 AX_reg(&DEBUG_context
), BX_reg(&DEBUG_context
),
216 CX_reg(&DEBUG_context
), DX_reg(&DEBUG_context
),
217 SI_reg(&DEBUG_context
), DI_reg(&DEBUG_context
) );
219 else /* 32-bit mode */
223 fprintf( stderr
, "\n EIP:%08lx ESP:%08lx EBP:%08lx EFLAGS:%08lx(%s)\n",
224 EIP_reg(&DEBUG_context
), ESP_reg(&DEBUG_context
),
225 EBP_reg(&DEBUG_context
), EFL_reg(&DEBUG_context
),
226 DEBUG_Flags(EFL_reg(&DEBUG_context
), flag
));
227 fprintf( stderr
, " EAX:%08lx EBX:%08lx ECX:%08lx EDX:%08lx\n",
228 EAX_reg(&DEBUG_context
), EBX_reg(&DEBUG_context
),
229 ECX_reg(&DEBUG_context
), EDX_reg(&DEBUG_context
) );
230 fprintf( stderr
, " ESI:%08lx EDI:%08lx\n",
231 ESI_reg(&DEBUG_context
), EDI_reg(&DEBUG_context
) );
237 /***********************************************************************
238 * DEBUG_ValidateRegisters
240 * Make sure all registers have a correct value for returning from
241 * the signal handler.
243 BOOL
DEBUG_ValidateRegisters(void)
248 if (ISV86(&DEBUG_context
)) return TRUE
;
250 /* Check that a selector is a valid ring-3 LDT selector, or a NULL selector */
251 #define CHECK_SEG(seg,name) \
252 if (((seg) & ~3) && \
253 ((((seg) & 7) != 7) || IS_LDT_ENTRY_FREE(SELECTOR_TO_ENTRY(seg)))) \
255 fprintf( stderr, "*** Invalid value for %s register: %04x\n", \
256 (name), (WORD)(seg) ); \
262 if (CS_reg(&DEBUG_context
) != cs
) CHECK_SEG(CS_reg(&DEBUG_context
), "CS");
263 if (SS_reg(&DEBUG_context
) != ds
) CHECK_SEG(SS_reg(&DEBUG_context
), "SS");
264 if (DS_reg(&DEBUG_context
) != ds
) CHECK_SEG(DS_reg(&DEBUG_context
), "DS");
265 if (ES_reg(&DEBUG_context
) != ds
) CHECK_SEG(ES_reg(&DEBUG_context
), "ES");
266 if (FS_reg(&DEBUG_context
) != ds
) CHECK_SEG(FS_reg(&DEBUG_context
), "FS");
267 if (GS_reg(&DEBUG_context
) != ds
) CHECK_SEG(GS_reg(&DEBUG_context
), "GS");
269 /* Check that CS and SS are not NULL */
271 if (!ISV86(&DEBUG_context
))
272 if (!(CS_reg(&DEBUG_context
) & ~3))
274 fprintf( stderr
, "*** Invalid value for CS register: %04x\n",
275 (WORD
)CS_reg(&DEBUG_context
) );
278 if (!(SS_reg(&DEBUG_context
) & ~3))
280 fprintf( stderr
, "*** Invalid value for SS register: %04x\n",
281 (WORD
)SS_reg(&DEBUG_context
) );