]> git.sesse.net Git - pistorm/blob - platforms/amiga/pistorm-dev/pistorm-dev.c
91e631c31e89825e0c867001374249ea55afcf2f
[pistorm] / platforms / amiga / pistorm-dev / pistorm-dev.c
1 // SPDX-License-Identifier: MIT
2
3 #include <stdio.h>
4 #include <stdlib.h>
5 #include <string.h>
6 #include <time.h>
7
8 #include "pistorm-dev.h"
9 #include "pistorm-dev-enums.h"
10 #include "platforms/platforms.h"
11 #include "gpio/ps_protocol.h"
12 #include "platforms/amiga/rtg/rtg.h"
13 #include "platforms/amiga/piscsi/piscsi.h"
14 #include "platforms/amiga/net/pi-net.h"
15
16 #include <linux/reboot.h>
17 #include <sys/reboot.h>
18
19 #define DEBUG_PISTORM_DEVICE
20
21 #ifdef DEBUG_PISTORM_DEVICE
22 #define DEBUG printf
23
24 #define PIDEV_SWREV 0x0105
25
26 static const char *op_type_names[4] = {
27     "BYTE",
28     "WORD",
29     "LONGWORD",
30     "MEM",
31 };
32 #else
33 #define DEBUG(...)
34 #endif
35
36 extern uint32_t pistorm_dev_base;
37 extern uint32_t do_reset;
38
39 extern void adjust_ranges_amiga(struct emulator_config *cfg);
40 extern uint8_t rtg_enabled, rtg_on, pinet_enabled, piscsi_enabled, load_new_config, end_signal;
41 extern struct emulator_config *cfg;
42
43 char cfg_filename[256] = "default.cfg";
44 char tmp_string[256];
45
46 static uint8_t pi_byte[8];
47 static uint16_t pi_word[4];
48 static uint32_t pi_longword[4];
49 static uint32_t pi_string[4];
50 static uint32_t pi_ptr[4];
51
52 static uint32_t pi_dbg_val[4];
53 static uint32_t pi_dbg_string[4];
54
55 static uint32_t pi_cmd_result = 0, shutdown_confirm = 0xFFFFFFFF;
56
57 int32_t grab_amiga_string(uint32_t addr, uint8_t *dest, uint32_t str_max_len) {
58     int32_t r = get_mapped_item_by_address(cfg, addr);
59     uint32_t index = 0;
60
61     if (r == -1) {
62         DEBUG("[GRAB_AMIGA_STRING] No mapped range found for address $%.8X. Grabbing string data over the bus.\n", addr);
63         do {
64             dest[index] = read8(addr + index);
65             index++;
66         } while (dest[index - 1] != 0x00 && index < str_max_len);
67     }
68     else {
69         uint8_t *src = cfg->map_data[r] + (addr - cfg->map_offset[r]);
70         do {
71             dest[index] = src[index];
72             index++;
73         } while (dest[index - 1] != 0x00 && index < str_max_len);
74     }
75     if (index == str_max_len) {
76         memset(dest, 0x00, str_max_len + 1);
77         return -1;
78     }
79     DEBUG("[GRAB_AMIGA_STRING] Grabbed string: %s\n", dest);
80     return (int32_t)strlen((const char*)dest);
81 }
82
83 int32_t amiga_transfer_file(uint32_t addr, char *filename) {
84     FILE *in = fopen(filename, "rb");
85     if (in == NULL) {
86         DEBUG("[AMIGA_TRANSFER_FILE] Failed to open file %s for reading.\n", filename);
87         return -1;
88     }
89     fseek(in, 0, SEEK_END);
90
91     int32_t r = get_mapped_item_by_address(cfg, addr);
92     uint32_t filesize = ftell(in);
93
94     fseek(in, 0, SEEK_SET);
95     if (r == -1) {
96         DEBUG("[GRAB_AMIGA_STRING] No mapped range found for address $%.8X. Transferring file data over the bus.\n", addr);
97         uint8_t tmp_read = 0;
98
99         for (uint32_t i = 0; i < filesize; i++) {
100             tmp_read = (uint8_t)fgetc(in);
101             write8(addr + i, tmp_read);
102         }
103     } else {
104         uint8_t *dst = cfg->map_data[r] + (addr - cfg->map_offset[r]);
105         fread(dst, filesize, 1, in);
106     }
107     fclose(in);
108     DEBUG("[AMIGA_TRANSFER_FILE] Copied %d bytes to address $%.8X.\n", filesize, addr);
109
110     return 0;
111 }
112
113 char *get_pistorm_devcfg_filename() {
114     return cfg_filename;
115 }
116
117 void set_pistorm_devcfg_filename(char *filename) {
118     strcpy(cfg_filename, filename);
119 }
120
121 void handle_pistorm_dev_write(uint32_t addr_, uint32_t val, uint8_t type) {
122     uint32_t addr = (addr_ & 0xFFFF);
123
124     switch((addr)) {
125         case PI_DBG_MSG:
126             // Output debug message based on value written and data in val/str registers.
127             break;
128         case PI_DBG_VAL1: case PI_DBG_VAL2: case PI_DBG_VAL3: case PI_DBG_VAL4:
129         case PI_DBG_VAL5: case PI_DBG_VAL6: case PI_DBG_VAL7: case PI_DBG_VAL8:
130             DEBUG("[PISTORM-DEV] Set DEBUG VALUE %d to %d ($%.8X)\n", (addr - PI_DBG_VAL1) / 4, val, val);
131             pi_dbg_val[(addr - PI_DBG_VAL1) / 4] = val;
132             break;
133         case PI_DBG_STR1: case PI_DBG_STR2: case PI_DBG_STR3: case PI_DBG_STR4:
134             DEBUG("[PISTORM-DEV] Set DEBUG STRING POINTER %d to $%.8X\n", (addr - PI_DBG_STR1) / 4, val);
135             pi_dbg_string[(addr - PI_DBG_STR1) / 4] = val;
136             break;
137
138         case PI_BYTE1: case PI_BYTE2: case PI_BYTE3: case PI_BYTE4:
139         case PI_BYTE5: case PI_BYTE6: case PI_BYTE7: case PI_BYTE8:
140             DEBUG("[PISTORM-DEV] Set BYTE %d to %d ($%.2X)\n", addr - PI_BYTE1, (val & 0xFF), (val & 0xFF));
141             pi_byte[addr - PI_BYTE1] = (val & 0xFF);
142             break;
143         case PI_WORD1: case PI_WORD2: case PI_WORD3: case PI_WORD4:
144             DEBUG("[PISTORM-DEV] Set WORD %d to %d ($%.4X)\n", (addr - PI_WORD1) / 2, (val & 0xFFFF), (val & 0xFFFF));
145             pi_word[(addr - PI_WORD1) / 2] = (val & 0xFFFF);
146             break;
147         case PI_LONGWORD1: case PI_LONGWORD2: case PI_LONGWORD3: case PI_LONGWORD4:
148             DEBUG("[PISTORM-DEV] Set LONGWORD %d to %d ($%.8X)\n", (addr - PI_LONGWORD1) / 4, val, val);
149             pi_longword[(addr - PI_LONGWORD1) / 4] = val;
150             break;
151         case PI_STR1: case PI_STR2: case PI_STR3: case PI_STR4:
152             DEBUG("[PISTORM-DEV] Set STRING POINTER %d to $%.8X\n", (addr - PI_STR1) / 4, val);
153             pi_string[(addr - PI_STR1) / 4] = val;
154             break;
155         case PI_PTR1: case PI_PTR2: case PI_PTR3: case PI_PTR4:
156             DEBUG("[PISTORM-DEV] Set DATA POINTER %d to $%.8X\n", (addr - PI_PTR1) / 4, val);
157             pi_ptr[(addr - PI_PTR1) / 4] = val;
158             break;
159
160         case PI_CMD_TRANSFERFILE:
161             DEBUG("[PISTORM-DEV] Write to TRANSFERFILE.\n");
162             if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)tmp_string, 255) == -1)  {
163                 printf("[PISTORM-DEV] No or invalid filename for TRANSFERFILE. Aborting.\n");
164                 pi_cmd_result = PI_RES_INVALIDVALUE;
165             } else if (pi_ptr[0] == 0) {
166                 printf("[PISTORM-DEV] Null pointer specified for TRANSFERFILE destination. Aborting.\n");
167                 pi_cmd_result = PI_RES_INVALIDVALUE;
168             } else {
169                 if (amiga_transfer_file(pi_ptr[0], tmp_string) == -1) {
170                     pi_cmd_result = PI_RES_FAILED;
171                 } else {
172                     pi_cmd_result = PI_RES_OK;
173                 }
174             }
175             pi_string[0] = 0;
176             pi_ptr[0] = 0;
177             break;
178         case PI_CMD_MEMCPY:
179             DEBUG("[PISTORM-DEV} Write to MEMCPY: %d (%.8X)\n", val, val);
180             if (pi_ptr[0] == 0 || pi_ptr[1] == 0) {
181                 printf("[PISTORM-DEV] MEMCPY from/to null pointer not allowed. Aborting.\n");
182                 pi_cmd_result = PI_RES_INVALIDVALUE;
183             } else if (val == 0) {
184                 printf("[PISTORM-DEV] MEMCPY called with size 0. Aborting.\n");
185                 pi_cmd_result = PI_RES_INVALIDVALUE;
186             } else {
187                 int32_t src = get_mapped_item_by_address(cfg, pi_ptr[0]);
188                 int32_t dst = get_mapped_item_by_address(cfg, pi_ptr[1]);
189                 if (dst != -1 && src != -1) {
190                     printf("doing super memcpy\n");
191                     uint8_t *src_ptr = &cfg->map_data[src][(pi_ptr[0] - cfg->map_offset[src])];
192                     uint8_t *dst_ptr = &cfg->map_data[dst][(pi_ptr[1] - cfg->map_offset[dst])];
193                     memcpy(dst_ptr, src_ptr, val);
194                 } else {
195                     printf("doing manual memcpy\n");
196                     uint8_t tmp = 0;
197                     for (uint32_t i = 0; i < val; i++) {
198                         if (src == -1) tmp = read8(pi_ptr[0] + i);
199                         else tmp = cfg->map_data[src][pi_ptr[0] - cfg->map_offset[src]];
200                         
201                         if (dst == -1) write8(pi_ptr[1] + i, tmp);
202                         else cfg->map_data[dst][pi_ptr[1] - cfg->map_offset[dst]] = tmp;
203                     }
204                 }
205                 DEBUG("[PISTORM-DEV] Copied %d bytes from $%.8X to $%.8X\n", val, pi_ptr[0], pi_ptr[1]);
206             }
207             break;
208
209         case PI_CMD_RTGSTATUS:
210             DEBUG("[PISTORM-DEV] Write to RTGSTATUS: %d\n", val);
211             if (val == 1 && !rtg_enabled) {
212                 init_rtg_data();
213                 rtg_enabled = 1;
214                 pi_cmd_result = PI_RES_OK;
215             } else if (val == 0 && rtg_enabled) {
216                 if (!rtg_on) {
217                     shutdown_rtg();
218                     rtg_enabled = 0;
219                     pi_cmd_result = PI_RES_OK;
220                 } else {
221                     // Refuse to disable RTG if it's currently in use.
222                     pi_cmd_result = PI_RES_FAILED;
223                 }
224             } else {
225                 pi_cmd_result = PI_RES_NOCHANGE;
226             }
227             adjust_ranges_amiga(cfg);
228             break;
229         case PI_CMD_NETSTATUS:
230             DEBUG("[PISTORM-DEV] Write to NETSTATUS: %d\n", val);
231             if (val == 1 && !pinet_enabled) {
232                 pinet_init(NULL);
233                 pinet_enabled = 1;
234                 pi_cmd_result = PI_RES_OK;
235             } else if (val == 0 && pinet_enabled) {
236                 pinet_shutdown();
237                 pinet_enabled = 0;
238                 pi_cmd_result = PI_RES_OK;
239             } else {
240                 pi_cmd_result = PI_RES_NOCHANGE;
241             }
242             adjust_ranges_amiga(cfg);
243             break;
244         case PI_CMD_PISCSI_CTRL:
245             DEBUG("[PISTORM-DEV] Write to PISCSI_CTRL: ");
246             switch(val) {
247                 case PISCSI_CTRL_DISABLE:
248                     DEBUG("DISABLE\n");
249                     if (piscsi_enabled) {
250                         piscsi_shutdown();
251                         piscsi_enabled = 0;
252                         // Probably not OK... depends on if you booted from floppy, I guess.
253                         pi_cmd_result = PI_RES_OK;
254                     } else {
255                         pi_cmd_result = PI_RES_NOCHANGE;
256                     }
257                     break;
258                 case PISCSI_CTRL_ENABLE:
259                     DEBUG("ENABLE\n");
260                     if (!piscsi_enabled) {
261                         piscsi_init();
262                         piscsi_enabled = 1;
263                         piscsi_refresh_drives();
264                         pi_cmd_result = PI_RES_OK;
265                     } else {
266                         pi_cmd_result = PI_RES_NOCHANGE;
267                     }
268                     break;
269                 case PISCSI_CTRL_MAP:
270                     DEBUG("MAP\n");
271                     if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)tmp_string, 255) == -1)  {
272                         printf("[PISTORM-DEV] Failed to grab string for PISCSI drive filename. Aborting.\n");
273                         pi_cmd_result = PI_RES_FAILED;
274                     } else {
275                         FILE *tmp = fopen(tmp_string, "rb");
276                         if (tmp == NULL) {
277                             printf("[PISTORM-DEV] Failed to open file %s for PISCSI drive mapping. Aborting.\n", tmp_string);
278                             pi_cmd_result = PI_RES_FILENOTFOUND;
279                         } else {
280                             fclose(tmp);
281                             printf("[PISTORM-DEV] Attempting to map file %s as PISCSI drive %d...\n", tmp_string, pi_word[0]);
282                             piscsi_unmap_drive(pi_word[0]);
283                             piscsi_map_drive(tmp_string, pi_word[0]);
284                             pi_cmd_result = PI_RES_OK;
285                         }
286                     }
287                     pi_string[0] = 0;
288                     break;
289                 case PISCSI_CTRL_UNMAP:
290                     DEBUG("UNMAP\n");
291                     if (pi_word[0] > 7) {
292                         printf("[PISTORM-DEV] Invalid drive ID %d for PISCSI unmap command.", pi_word[0]);
293                         pi_cmd_result = PI_RES_INVALIDVALUE;
294                     } else {
295                         if (piscsi_get_dev(pi_word[0])->fd != -1) {
296                             piscsi_unmap_drive(pi_word[0]);
297                             pi_cmd_result = PI_RES_OK;
298                         } else {
299                             pi_cmd_result = PI_RES_NOCHANGE;
300                         }
301                     }
302                     break;
303                 case PISCSI_CTRL_EJECT:
304                     DEBUG("EJECT (NYI)\n");
305                     pi_cmd_result = PI_RES_NOCHANGE;
306                     break;
307                 case PISCSI_CTRL_INSERT:
308                     DEBUG("INSERT (NYI)\n");
309                     pi_cmd_result = PI_RES_NOCHANGE;
310                     break;
311                 default:
312                     DEBUG("UNKNOWN/UNHANDLED. Aborting.\n");
313                     pi_cmd_result = PI_RES_INVALIDVALUE;
314                     break;
315             }
316             adjust_ranges_amiga(cfg);
317             break;
318         
319         case PI_CMD_KICKROM:
320             DEBUG("[PISTORM-DEV] Write to KICKROM.\n");
321             if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)tmp_string, 255) == -1)  {
322                 printf("[PISTORM-DEV] Failed to grab string KICKROM filename. Aborting.\n");
323                 pi_cmd_result = PI_RES_FAILED;
324             } else {
325                 FILE *tmp = fopen(tmp_string, "rb");
326                 if (tmp == NULL) {
327                     printf("[PISTORM-DEV] Failed to open file %s for KICKROM mapping. Aborting.\n", tmp_string);
328                     pi_cmd_result = PI_RES_FILENOTFOUND;
329                 } else {
330                     fclose(tmp);
331                     if (get_named_mapped_item(cfg, "kickstart") != -1) {
332                         uint32_t index = get_named_mapped_item(cfg, "kickstart");
333                         free(cfg->map_data[index]);
334                         free(cfg->map_id[index]);
335                         cfg->map_type[index] = MAPTYPE_NONE;
336                         // Dirty hack, I am sleepy and lazy.
337                         add_mapping(cfg, MAPTYPE_ROM, cfg->map_offset[index], cfg->map_size[index], 0, tmp_string, "kickstart");
338                         pi_cmd_result = PI_RES_OK;
339                         do_reset = 1;
340                     } else {
341                         printf ("[PISTORM-DEV] Could not find mapped range 'kickstart', cannot remap KICKROM.\n");
342                         pi_cmd_result = PI_RES_FAILED;
343                     }
344                 }
345             }
346             adjust_ranges_amiga(cfg);
347             pi_string[0] = 0;
348             break;
349         case PI_CMD_EXTROM:
350             DEBUG("[PISTORM-DEV] Write to EXTROM.\n");
351             if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)tmp_string, 255) == -1)  {
352                 printf("[PISTORM-DEV] Failed to grab string EXTROM filename. Aborting.\n");
353                 pi_cmd_result = PI_RES_FAILED;
354             } else {
355                 FILE *tmp = fopen(tmp_string, "rb");
356                 if (tmp == NULL) {
357                     printf("[PISTORM-DEV] Failed to open file %s for EXTROM mapping. Aborting.\n", tmp_string);
358                     pi_cmd_result = PI_RES_FILENOTFOUND;
359                 } else {
360                     fclose(tmp);
361                     if (get_named_mapped_item(cfg, "extended") != -1) {
362                         uint32_t index = get_named_mapped_item(cfg, "extended");
363                         free(cfg->map_data[index]);
364                         free(cfg->map_id[index]);
365                         cfg->map_type[index] = MAPTYPE_NONE;
366                         // Dirty hack, I am tired and lazy.
367                         add_mapping(cfg, MAPTYPE_ROM, cfg->map_offset[index], cfg->map_size[index], 0, tmp_string, "extended");
368                         pi_cmd_result = PI_RES_OK;
369                         do_reset = 1;
370                     } else {
371                         printf ("[PISTORM-DEV] Could not find mapped range 'extrom', cannot remap EXTROM.\n");
372                         pi_cmd_result = PI_RES_FAILED;
373                     }
374                 }
375             }
376             adjust_ranges_amiga(cfg);
377             pi_string[0] = 0;
378             break;
379
380         case PI_CMD_RESET:
381             DEBUG("[PISTORM-DEV] System reset called, code %d\n", (val & 0xFFFF));
382             do_reset = 1;
383             break;
384         case PI_CMD_SHUTDOWN:
385             DEBUG("[PISTORM-DEV] Shutdown requested. Confirm by replying with return value to CONFIRMSHUTDOWN.\n");
386             shutdown_confirm = rand() % 0xFFFF;
387             pi_cmd_result = shutdown_confirm;
388             break;
389         case PI_CMD_CONFIRMSHUTDOWN:
390             if (val != shutdown_confirm) {
391                 DEBUG("[PISTORM-DEV] Attempted shutdown with wrong shutdown confirm value. Not shutting down.\n");
392                 shutdown_confirm = 0xFFFFFFFF;
393                 pi_cmd_result = PI_RES_FAILED;
394             } else {
395                 printf("[PISTORM-DEV] Shutting down the PiStorm. Good night, fight well, until we meet again.\n");
396                 reboot(LINUX_REBOOT_CMD_POWER_OFF);
397                 pi_cmd_result = PI_RES_OK;
398                 end_signal = 1;
399             }
400             break;
401         case PI_CMD_SWITCHCONFIG:
402             DEBUG("[PISTORM-DEV] Config switch called, command: ");
403             switch (val) {
404                 case PICFG_LOAD:
405                     DEBUG("LOAD\n");
406                     if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)cfg_filename, 255) == -1) {
407                         printf("[PISTORM-DEV] Failed to grab string for CONFIG filename. Aborting.\n");
408                         pi_cmd_result = PI_RES_FAILED;
409                     } else {
410                         FILE *tmp = fopen(cfg_filename, "rb");
411                         if (tmp == NULL) {
412                             printf("[PISTORM-DEV] Failed to open CONFIG file %s for reading. Aborting.\n", cfg_filename);
413                             pi_cmd_result = PI_RES_FILENOTFOUND;
414                         } else {
415                             fclose(tmp);
416                             printf("[PISTORM-DEV] Attempting to load config file %s...\n", cfg_filename);
417                             load_new_config = val + 1;
418                             pi_cmd_result = PI_RES_OK;
419                         }
420                     }
421                     pi_string[0] = 0;
422                     break;
423                 case PICFG_RELOAD:
424                     DEBUG("RELOAD\n");
425                     printf("[PISTORM-DEV] Reloading current config file (%s)...\n", cfg_filename);
426                     load_new_config = val + 1;
427                     break;
428                 case PICFG_DEFAULT:
429                     DEBUG("DEFAULT\n");
430                     printf("[PISTORM-DEV] Loading default.cfg...\n");
431                     load_new_config = val + 1;
432                     break;
433                 default:
434                     DEBUG("UNKNOWN/UNHANDLED. Command ignored.\n");
435                     pi_cmd_result = PI_RES_INVALIDVALUE;
436                     break;
437             }
438             break;
439         default:
440             DEBUG("[PISTORM-DEV] WARN: Unhandled %s register write to %.4X: %d\n", op_type_names[type], addr - pistorm_dev_base, val);
441             pi_cmd_result = PI_RES_INVALIDCMD;
442             break;
443     }
444 }
445  
446 uint32_t handle_pistorm_dev_read(uint32_t addr_, uint8_t type) {
447     uint32_t addr = (addr_ & 0xFFFF);
448
449     switch((addr)) {
450         case PI_CMD_FILESIZE:
451             DEBUG("[PISTORM-DEV] %s read from FILESIZE.\n", op_type_names[type]);
452             if (pi_string[0] == 0 || grab_amiga_string(pi_string[0], (uint8_t *)tmp_string, 255) == -1)  {
453                 DEBUG("[PISTORM-DEV] Failed to grab string for FILESIZE command. Aborting.\n");
454                 pi_cmd_result = PI_RES_FAILED;
455                 pi_longword[0] = 0;
456                 return 0;
457             } else {
458                 FILE *tmp = fopen(tmp_string, "rb");
459                 if (tmp == NULL) {
460                     DEBUG("[PISTORM-DEV] Failed to open file %s for FILESIZE command. Aborting.\n", tmp_string);
461                     pi_longword[0] = 0;
462                     pi_cmd_result = PI_RES_FILENOTFOUND;
463                 } else {
464                     fseek(tmp, 0, SEEK_END);
465                     pi_longword[0] = ftell(tmp);
466                     DEBUG("[PISTORM-DEV] Returning file size for file %s: %d bytes.\n", tmp_string, pi_longword[0]);
467                     fclose(tmp);
468                     pi_cmd_result = PI_RES_OK;
469                 }
470             }
471             pi_string[0] = 0;
472             return pi_longword[0];
473             break;
474
475         case PI_CMD_HWREV:
476             // Probably replace this with some read from the CPLD to get a simple hardware revision.
477             DEBUG("[PISTORM-DEV] %s Read from HWREV\n", op_type_names[type]);
478             return 0x0101; // 1.1
479             break;
480         case PI_CMD_SWREV:
481             DEBUG("[PISTORM-DEV] %s Read from SWREV\n", op_type_names[type]);
482             return PIDEV_SWREV;
483             break;
484         case PI_CMD_RTGSTATUS:
485             DEBUG("[PISTORM-DEV] %s Read from RTGSTATUS\n", op_type_names[type]);
486             return (rtg_on << 1) | rtg_enabled;
487             break;
488         case PI_CMD_NETSTATUS:
489             DEBUG("[PISTORM-DEV] %s Read from NETSTATUS\n", op_type_names[type]);
490             return pinet_enabled;
491             break;
492         case PI_CMD_PISCSI_CTRL:
493             DEBUG("[PISTORM-DEV] %s Read from PISCSI_CTRL\n", op_type_names[type]);
494             return piscsi_enabled;
495             break;
496         case PI_CMD_GET_FB:
497             DEBUG("[PISTORM-DEV] %s read from GET_FB: %.8X\n", op_type_names[type], rtg_get_fb());
498             return rtg_get_fb();
499
500         case PI_DBG_VAL1: case PI_DBG_VAL2: case PI_DBG_VAL3: case PI_DBG_VAL4:
501         case PI_DBG_VAL5: case PI_DBG_VAL6: case PI_DBG_VAL7: case PI_DBG_VAL8:
502             DEBUG("[PISTORM-DEV] Read DEBUG VALUE %d (%d / $%.8X)\n", (addr - PI_DBG_VAL1) / 4, pi_dbg_val[(addr - PI_DBG_VAL1) / 4], pi_dbg_val[(addr - PI_DBG_VAL1) / 4]);
503             return pi_dbg_val[(addr - PI_DBG_VAL1) / 4];
504             break;
505
506         case PI_BYTE1: case PI_BYTE2: case PI_BYTE3: case PI_BYTE4:
507         case PI_BYTE5: case PI_BYTE6: case PI_BYTE7: case PI_BYTE8:
508             DEBUG("[PISTORM-DEV] Read BYTE %d (%d / $%.2X)\n", addr - PI_BYTE1, pi_byte[addr - PI_BYTE1], pi_byte[addr - PI_BYTE1]);
509             return pi_byte[addr - PI_BYTE1];
510             break;
511         case PI_WORD1: case PI_WORD2: case PI_WORD3: case PI_WORD4:
512             DEBUG("[PISTORM-DEV] Read WORD %d (%d / $%.4X)\n", (addr - PI_WORD1) / 2, pi_word[(addr - PI_WORD1) / 2], pi_word[(addr - PI_WORD1) / 2]);
513             return pi_word[(addr - PI_WORD1) / 2];
514             break;
515         case PI_LONGWORD1: case PI_LONGWORD2: case PI_LONGWORD3: case PI_LONGWORD4:
516             DEBUG("[PISTORM-DEV] Read LONGWORD %d (%d / $%.8X)\n", (addr - PI_LONGWORD1) / 4, pi_longword[(addr - PI_LONGWORD1) / 4], pi_longword[(addr - PI_LONGWORD1) / 4]);
517             return pi_longword[(addr - PI_LONGWORD1) / 4];
518             break;
519
520         case PI_CMDRESULT:
521             DEBUG("[PISTORM-DEV] %s Read from CMDRESULT: %d\n", op_type_names[type], pi_cmd_result);
522             return pi_cmd_result;
523             break;
524
525         default:
526             DEBUG("[PISTORM-DEV] WARN: Unhandled %s register read from %.4X\n", op_type_names[type], addr - pistorm_dev_base);
527             break;
528     }
529     return 0;
530 }