1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
/*
Copyright 2013 Michael Pavone
This file is part of BlastEm.
BlastEm is free software distributed under the terms of the GNU General Public License version 3 or greater. See COPYING for full license text.
*/
#include "z80inst.h"
#include "z80_to_x86.h"
#include "mem.h"
#include "vdp.h"
#include <stdio.h>
#include <stdlib.h>
#include <stddef.h>
uint8_t z80_ram[0x2000];
uint8_t z80_unmapped_read(uint32_t location, void * context)
{
return 0xFF;
}
void * z80_unmapped_write(uint32_t location, void * context, uint8_t value)
{
return context;
}
const memmap_chunk z80_map[] = {
{ 0x0000, 0x4000, 0x1FFF, 0, MMAP_READ | MMAP_WRITE | MMAP_CODE, z80_ram, NULL, NULL, NULL, NULL },
{ 0x4000, 0x10000, 0xFFFF, 0, 0, NULL, NULL, NULL, z80_unmapped_read, z80_unmapped_write}
};
void z80_next_int_pulse(z80_context * context)
{
context->int_pulse_start = context->int_pulse_end = CYCLE_NEVER;
}
int main(int argc, char ** argv)
{
long filesize;
uint8_t *filebuf;
z80_options opts;
z80_context context;
char *fname = NULL;
uint8_t retranslate = 0;
for (int i = 1; i < argc; i++)
{
if (argv[i][0] == '-') {
switch(argv[i][1])
{
case 'r':
retranslate = 1;
break;
default:
fprintf(stderr, "Unrecognized switch -%c\n", argv[i][1]);
exit(1);
}
} else if (!fname) {
fname = argv[i];
}
}
if (!fname) {
fputs("usage: ztestrun zrom [cartrom]\n", stderr);
exit(1);
}
FILE * f = fopen(fname, "rb");
if (!f) {
fprintf(stderr, "unable to open file %s\n", fname);
exit(1);
}
fseek(f, 0, SEEK_END);
filesize = ftell(f);
fseek(f, 0, SEEK_SET);
filesize = filesize < sizeof(z80_ram) ? filesize : sizeof(z80_ram);
if (fread(z80_ram, 1, filesize, f) != filesize) {
fprintf(stderr, "error reading %s\n",fname);
exit(1);
}
fclose(f);
init_z80_opts(&opts, z80_map, 2, NULL, 0, 1);
init_z80_context(&context, &opts);
//Z80 RAM
context.mem_pointers[0] = z80_ram;
if (retranslate) {
//run core long enough to translate code
z80_run(&context, 1);
for (int i = 0; i < filesize; i++)
{
z80_handle_code_write(i, &context);
}
z80_assert_reset(&context, context.current_cycle);
z80_clear_reset(&context, context.current_cycle + 3);
z80_adjust_cycles(&context, context.current_cycle);
}
z80_run(&context, 1000);
printf("A: %X\nB: %X\nC: %X\nD: %X\nE: %X\nHL: %X\nIX: %X\nIY: %X\nSP: %X\n\nIM: %d, IFF1: %d, IFF2: %d\n",
context.regs[Z80_A], context.regs[Z80_B], context.regs[Z80_C],
context.regs[Z80_D], context.regs[Z80_E],
(context.regs[Z80_H] << 8) | context.regs[Z80_L],
(context.regs[Z80_IXH] << 8) | context.regs[Z80_IXL],
(context.regs[Z80_IYH] << 8) | context.regs[Z80_IYL],
context.sp, context.im, context.iff1, context.iff2);
printf("Flags: SZVNC\n"
" %d%d%d%d%d\n", context.flags[ZF_S], context.flags[ZF_Z], context.flags[ZF_PV], context.flags[ZF_N], context.flags[ZF_C]);
puts("--Alternate Regs--");
printf("A: %X\nB: %X\nC: %X\nD: %X\nE: %X\nHL: %X\n",
context.alt_regs[Z80_A], context.alt_regs[Z80_B], context.alt_regs[Z80_C],
context.alt_regs[Z80_D], context.alt_regs[Z80_E],
(context.alt_regs[Z80_H] << 8) | context.alt_regs[Z80_L]);
return 0;
}
|
