1 #include "../platforms.h"
2 #include "amiga-autoconf.h"
7 static unsigned char ac_fast_ram_rom[] = {
8 0xe, AC_MEM_SIZE_8MB, // 00/02, link into memory free list, 8 MB
9 0x6, 0x9, // 04/06, product id
10 0x8, 0x0, // 08/0a, preference to 8 MB space
11 0x0, 0x0, // 0c/0e, reserved
12 0x0, 0x7, 0xd, 0xb, // 10/12/14/16, mfg id
13 0x0, 0x0, 0x0, 0x0, 0x0, 0x4, 0x2, 0x0 // 18/.../26, serial
16 static unsigned char ac_a314_rom[] = {
17 0xc, AC_MEM_SIZE_64KB, // 00/02, 64 kB
18 0xa, 0x3, // 04/06, product id
19 0x0, 0x0, // 08/0a, any space okay
20 0x0, 0x0, // 0c/0e, reserved
21 0x0, 0x7, 0xd, 0xb, // 10/12/14/16, mfg id
22 0xa, 0x3, 0x1, 0x4, 0x0, 0x0, 0x0, 0x0 // 18/.../26, serial
25 int ac_z2_current_pic = 0;
26 int ac_z2_pic_count = 0;
28 int ac_z2_type[AC_PIC_LIMIT];
29 int ac_z2_index[AC_PIC_LIMIT];
30 unsigned int ac_base[AC_PIC_LIMIT];
32 int ac_z3_current_pic = 0;
33 int ac_z3_pic_count = 0;
35 int ac_z3_type[AC_PIC_LIMIT];
36 int ac_z3_index[AC_PIC_LIMIT];
39 unsigned char get_autoconf_size(int size) {
40 if (size == 8 * SIZE_MEGA)
41 return AC_MEM_SIZE_8MB;
42 if (size == 4 * SIZE_MEGA)
43 return AC_MEM_SIZE_4MB;
44 if (size == 2 * SIZE_MEGA)
45 return AC_MEM_SIZE_2MB;
47 return AC_MEM_SIZE_64KB;
50 unsigned char get_autoconf_size_ext(int size) {
51 if (size == 16 * SIZE_MEGA)
52 return AC_MEM_SIZE_EXT_16MB;
53 if (size == 32 * SIZE_MEGA)
54 return AC_MEM_SIZE_EXT_32MB;
55 if (size == 64 * SIZE_MEGA)
56 return AC_MEM_SIZE_EXT_64MB;
57 if (size == 128 * SIZE_MEGA)
58 return AC_MEM_SIZE_EXT_128MB;
59 if (size == 256 * SIZE_MEGA)
60 return AC_MEM_SIZE_EXT_256MB;
61 if (size == 512 * SIZE_MEGA)
62 return AC_MEM_SIZE_EXT_512MB;
63 if (size == 1024 * SIZE_MEGA)
64 return AC_MEM_SIZE_EXT_1024MB;
66 return AC_MEM_SIZE_EXT_64MB;
69 extern void adjust_ranges_amiga(struct emulator_config *cfg);
71 unsigned int autoconfig_read_memory_z3_8(struct emulator_config *cfg, unsigned int address_) {
72 int address = address_ - AC_Z3_BASE;
73 int index = ac_z3_index[ac_z3_current_pic];
74 unsigned char val = 0;
76 if ((address & 0xFF) >= AC_Z3_REG_RES50 && (address & 0xFF) <= AC_Z3_REG_RES7C)
79 switch(address & 0xFF) {
80 case AC_Z3_REG_ER_TYPE:
82 if (cfg->map_type[index] == MAPTYPE_RAM)
83 val |= BOARDTYPE_FREEMEM;
84 if (cfg->map_size[index] > 8 * SIZE_MEGA)
85 val |= get_autoconf_size_ext(cfg->map_size[index]);
87 val |= get_autoconf_size(cfg->map_size[index]);
88 if (ac_z3_current_pic + 1 < ac_z3_pic_count)
89 val |= BOARDTYPE_LINKED;
90 // Pre-invert this value, since it's the only value not physically complemented
94 case AC_Z3_REG_ER_PRODUCT:
98 case AC_Z3_REG_ER_FLAGS:
99 if (cfg->map_type[index] == MAPTYPE_RAM)
100 val |= Z3_FLAGS_MEMORY;
101 if (cfg->map_size[index] > 8 * SIZE_MEGA)
102 val |= Z3_FLAGS_EXTENSION;
103 val |= Z3_FLAGS_RESERVED;
104 // Bottom four bits are zero, useless unles you want really odd RAM sizes.
106 // Manufacturer ID low/high bytes.
107 case AC_Z3_REG_MAN_LO:
108 val = PISTORM_MANUF_ID & 0x00FF;
110 case AC_Z3_REG_MAN_HI:
111 val = (PISTORM_MANUF_ID >> 8);
113 case AC_Z3_REG_SER_BYTE0:
114 case AC_Z3_REG_SER_BYTE1:
115 case AC_Z3_REG_SER_BYTE2:
116 case AC_Z3_REG_SER_BYTE3:
117 // Expansion board serial assigned by manufacturer.
120 case AC_Z3_REG_INIT_DIAG_VEC_LO:
121 case AC_Z3_REG_INIT_DIAG_VEC_HI:
122 // 16-bit offset to boot ROM in assigned memory range.
125 // Additional reserved/unused registers.
126 case AC_Z3_REG_ER_RES03:
127 case AC_Z3_REG_ER_RES0D:
128 case AC_Z3_REG_ER_RES0E:
129 case AC_Z3_REG_ER_RES0F:
130 case AC_Z3_REG_ER_Z2_INT:
136 //printf("Read byte %d from Z3 autoconf for PIC %d (%.2X).\n", address, ac_z3_current_pic, val);
137 return (address & 0x100) ? (val << 4) ^ 0xFF : (val & 0xF0) ^ 0xFF;
142 void autoconfig_write_memory_z3_8(struct emulator_config *cfg, unsigned int address_, unsigned int value) {
143 int address = address_ - AC_Z3_BASE;
144 int index = ac_z3_index[ac_z3_current_pic];
145 unsigned char val = (unsigned char)value;
148 switch(address & 0xFF) {
149 case AC_Z3_REG_WR_ADDR_LO:
151 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0xFF0F0000) | ((val & 0xF0) << 16);
155 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0xFF000000) | (val << 16);
157 case AC_Z3_REG_WR_ADDR_HI:
159 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0x0FFF0000) | ((val & 0xF0) << 24);
162 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0x00FF0000) | (val << 24);
165 case AC_Z3_REG_WR_ADDR_NIB_LO:
166 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0xFFF00000) | ((val & 0xF0) << 12);
169 case AC_Z3_REG_WR_ADDR_NIB_HI:
170 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0xF0FF0000) | ((val & 0xF0) << 20);
173 case AC_Z3_REG_SHUTUP:
174 //printf("Write to Z3 shutup register for PIC %d.\n", ac_z3_current_pic);
183 printf("Address of Z3 autoconf RAM assigned to $%.8x\n", ac_base[ac_z3_current_pic]);
184 cfg->map_offset[index] = ac_base[ac_z3_current_pic];
185 cfg->map_high[index] = cfg->map_offset[index] + cfg->map_size[index];
187 if (ac_z3_current_pic == ac_z3_pic_count) {
189 adjust_ranges_amiga(cfg);
196 void autoconfig_write_memory_z3_16(struct emulator_config *cfg, unsigned int address_, unsigned int value) {
197 int address = address_ - AC_Z3_BASE;
198 int index = ac_z3_index[ac_z3_current_pic];
199 unsigned short val = (unsigned short)value;
202 switch(address & 0xFF) {
203 case AC_Z3_REG_WR_ADDR_HI:
204 // This is, as far as I know, the only regiter it should write a 16-bit value to.
205 ac_base[ac_z3_current_pic] = (ac_base[ac_z3_current_pic] & 0x00000000) | (val << 16);
209 printf("Unknown WORD write to Z3 autoconf address $%.2X", address & 0xFF);
210 //stop_cpu_emulation();
215 printf("Address of Z3 autoconf RAM assigned to $%.8x\n", ac_base[ac_z3_current_pic]);
216 cfg->map_offset[index] = ac_base[ac_z3_current_pic];
218 if (ac_z3_current_pic == ac_z3_pic_count)
225 unsigned int autoconfig_read_memory_8(struct emulator_config *cfg, unsigned int address_) {
226 unsigned char *rom = NULL;
227 int address = address_ - AC_Z2_BASE;
228 unsigned char val = 0;
230 switch(ac_z2_type[ac_z2_current_pic]) {
231 case ACTYPE_MAPFAST_Z2:
232 rom = ac_fast_ram_rom;
243 if ((address & 1) == 0 && (address / 2) < (int)sizeof(ac_fast_ram_rom)) {
244 if (ac_z2_type[ac_z2_current_pic] == ACTYPE_MAPFAST_Z2 && address / 2 == 1) {
245 val = get_autoconf_size(cfg->map_size[ac_z2_index[ac_z2_current_pic]]);
246 if (ac_z2_current_pic + 1 < ac_z2_pic_count)
247 val |= BOARDTYPE_LINKED;
250 val = rom[address / 2];
251 //printf("Read byte %d from Z2 autoconf for PIC %d (%.2X).\n", address/2, ac_z2_current_pic, val);
254 if (address != 0 && address != 2 && address != 40 && address != 42)
257 return (unsigned int)val;
260 void autoconfig_write_memory_8(struct emulator_config *cfg, unsigned int address_, unsigned int value) {
261 int address = address_ - AC_Z2_BASE;
263 int index = ac_z2_index[ac_z2_current_pic];
265 unsigned int *base = NULL;
267 switch(ac_z2_type[ac_z2_current_pic]) {
268 case ACTYPE_MAPFAST_Z2:
269 base = &ac_base[ac_z2_current_pic];
279 //printf("Failed to set up the base for autoconfig PIC %d.\n", ac_z2_current_pic);
283 if (address == 0x4a) { // base[19:16]
284 *base = (value & 0xf0) << (16 - 4);
285 } else if (address == 0x48) { // base[23:20]
287 *base |= (value & 0xf0) << (20 - 4);
289 if (ac_z2_type[ac_z2_current_pic] == ACTYPE_MAPFAST_Z2) { // fast ram
290 //a314_set_mem_base_size(*base, cfg->map_size[ac_index[ac_z2_current_pic]]);
293 } else if (address == 0x4c) { // shut up
294 //printf("Write to Z2 shutup register for PIC %d.\n", ac_z2_current_pic);
300 printf("Address of Z2 autoconf RAM assigned to $%.8x\n", ac_base[ac_z2_current_pic]);
301 cfg->map_offset[index] = ac_base[ac_z2_current_pic];
302 cfg->map_high[index] = cfg->map_offset[index] + cfg->map_size[index];
303 printf("Z2 PIC %d at $%.8lX-%.8lX, Size: %d MB\n", ac_z2_current_pic, cfg->map_offset[index], cfg->map_high[index], cfg->map_size[index] / SIZE_MEGA);
305 if (ac_z2_current_pic == ac_z2_pic_count) {
307 adjust_ranges_amiga(cfg);