24 |
|
|
25 |
|
#include "mon.h" |
26 |
|
#include "mon_cmd.h" |
27 |
< |
#include "mon_ppc.h" |
28 |
< |
#include "mon_68k.h" |
29 |
< |
#include "mon_x86.h" |
30 |
< |
#include "mon_6502.h" |
31 |
< |
#include "mon_8080.h" |
27 |
> |
#include "mon_disass.h" |
28 |
> |
|
29 |
> |
#ifndef VERSION |
30 |
> |
#define VERSION "2" |
31 |
> |
#endif |
32 |
|
|
33 |
|
|
34 |
|
/* |
118 |
|
|
119 |
|
void version(void) |
120 |
|
{ |
121 |
< |
fprintf(monout, "mon V%d.%d\n", MON_VERSION_MAJOR, MON_VERSION_MINOR); |
121 |
> |
fprintf(monout, "mon V" VERSION "\n"); |
122 |
|
} |
123 |
|
|
124 |
|
|
264 |
|
|
265 |
|
|
266 |
|
/* |
267 |
+ |
* Binary dump |
268 |
+ |
* b [start [end]] |
269 |
+ |
*/ |
270 |
+ |
|
271 |
+ |
void binary_dump(void) |
272 |
+ |
{ |
273 |
+ |
uint32 adr, end_adr; |
274 |
+ |
uint8 str[9]; |
275 |
+ |
|
276 |
+ |
str[8] = 0; |
277 |
+ |
|
278 |
+ |
if (!range_args(&adr, &end_adr, 7)) // 8 lines unless end address specified |
279 |
+ |
return; |
280 |
+ |
|
281 |
+ |
while (adr <= end_adr && !mon_aborted()) { |
282 |
+ |
fprintf(monout, "%08x:", mon_use_real_mem ? adr : adr % mon_mem_size); |
283 |
+ |
uint8 b = mon_read_byte(adr); |
284 |
+ |
for (int m=0x80, i=0; i<8; m>>=1, i++) |
285 |
+ |
str[i] = (b & m) ? '*' : '.'; |
286 |
+ |
fprintf(monout, " '%s'\n", str); |
287 |
+ |
adr++; |
288 |
+ |
} |
289 |
+ |
|
290 |
+ |
mon_dot_address = adr; |
291 |
+ |
} |
292 |
+ |
|
293 |
+ |
|
294 |
+ |
/* |
295 |
|
* Disassemble |
296 |
|
* d [start [end]] |
297 |
|
* d65 [start [end]] |
305 |
|
CPU_6502, |
306 |
|
CPU_680x0, |
307 |
|
CPU_8080, |
308 |
< |
CPU_80x86 |
308 |
> |
CPU_80x86_32, |
309 |
> |
CPU_80x86_16 |
310 |
|
}; |
311 |
|
|
312 |
|
static void disassemble(CPUType type) |
338 |
|
|
339 |
|
case CPU_680x0: |
340 |
|
while (adr <= end_adr && !mon_aborted()) { |
312 |
– |
uint16 buf[8]; |
313 |
– |
buf[0] = mon_read_half(adr); |
314 |
– |
buf[1] = mon_read_half(adr + 2); |
315 |
– |
buf[2] = mon_read_half(adr + 4); |
316 |
– |
buf[3] = mon_read_half(adr + 6); |
317 |
– |
buf[4] = mon_read_half(adr + 8); |
318 |
– |
buf[5] = mon_read_half(adr + 10); |
319 |
– |
buf[6] = mon_read_half(adr + 12); |
320 |
– |
buf[7] = mon_read_half(adr + 14); |
341 |
|
fprintf(monout, "%08x: ", mon_use_real_mem ? adr : adr % mon_mem_size); |
342 |
< |
adr += disass_68k(monout, mon_use_real_mem ? adr : adr % mon_mem_size, buf); |
342 |
> |
adr += disass_68k(monout, mon_use_real_mem ? adr : adr % mon_mem_size); |
343 |
|
} |
344 |
|
break; |
345 |
|
|
353 |
|
} |
354 |
|
break; |
355 |
|
|
356 |
< |
case CPU_80x86: |
356 |
> |
case CPU_80x86_32: |
357 |
|
while (adr <= end_adr && !mon_aborted()) { |
338 |
– |
uint8 buf[16]; |
339 |
– |
for (int i=0; i<16; i++) |
340 |
– |
buf[i] = mon_read_byte(adr + i); |
358 |
|
fprintf(monout, "%08x: ", mon_use_real_mem ? adr : adr % mon_mem_size); |
359 |
< |
adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, buf); |
359 |
> |
adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, false); |
360 |
> |
} |
361 |
> |
break; |
362 |
> |
|
363 |
> |
case CPU_80x86_16: |
364 |
> |
while (adr <= end_adr && !mon_aborted()) { |
365 |
> |
fprintf(monout, "%08x: ", mon_use_real_mem ? adr : adr % mon_mem_size); |
366 |
> |
adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, true); |
367 |
|
} |
368 |
|
break; |
369 |
|
} |
391 |
|
disassemble(CPU_8080); |
392 |
|
} |
393 |
|
|
394 |
< |
void disassemble_80x86(void) |
394 |
> |
void disassemble_80x86_32(void) |
395 |
> |
{ |
396 |
> |
disassemble(CPU_80x86_32); |
397 |
> |
} |
398 |
> |
|
399 |
> |
void disassemble_80x86_16(void) |
400 |
|
{ |
401 |
< |
disassemble(CPU_80x86); |
401 |
> |
disassemble(CPU_80x86_16); |
402 |
|
} |
403 |
|
|
404 |
|
|