Emulator: separated terminal and status windows

pat80-emulator/CMakeLists.txt

@@ -5,3 +5,7 @@ add_executable(pat80-emulator main.c)
 
 find_package(Z80 REQUIRED)
 target_link_libraries(pat80-emulator Z80)
+
+find_package(Curses REQUIRED)
+include_directories(${CURSES_INCLUDE_DIR})
+target_link_libraries(pat80-emulator ${CURSES_LIBRARIES})

pat80-emulator/main.c

@@ -1,14 +1,21 @@
+/**
+ * PAT80 Emulator
+ *
+ * Emulates a PAT80.
+ */
+
 #include <Z/constants/pointer.h> /* Z_NULL */
 #include <Z80.h>
 #include <string.h>
-#include <stdio.h>
 #include <stdlib.h>
+#include <ncurses.h>
 
-#define CYCLES_PER_FRAME 69888
-#define CYCLES_AT_INT    24
-#define CYCLES_PER_INT   32
 #define ROM_SIZE         0x8000 /* 32 KiB */
 #define MEMORY_SIZE      0xFFFF /* 64 KiB */
+#define TERMINAL_WIDTH   60
+#define TERMINAL_HEIGHT  25
+#define SPACING_BETWEEN_WINDOWS 3
+#define INSTRUCTION_WINDOW_HEIGHT 3
 
 typedef struct {
         void* context;
@@ -20,8 +27,8 @@ typedef struct {
         zusize  cycles;
         zuint8  memory[65536];
         Z80     cpu;
-        Device* devices;
-        zusize  device_count;
+        WINDOW  *terminal_win;
+        WINDOW  *status_win;
 } Machine;
 
 
@@ -45,46 +52,60 @@ static zuint8 machine_cpu_in(Machine *self, zuint16 port) {
         int decoded = port & bitmask;
 	if (decoded <= 0x1F) {
 		// Port 0 (0x00 to 0x1F): terminal
-		//printf("TERMINAL_READ");
-                //return 'H';
-                return 0x00;
+		// Read char from stin
+                char c = getch();
+                // Intercept emulator commands
+                switch (c) {
+                        case 27:
+                                // ESC: shutdown emulator
+                                exit(0);        // TODO: Shutdown ncurses and emulator cleanly
+                                return 0;
+                        default:
+                                // Deliver keypress to pat80
+                                return c;
+                }
         }
         if (decoded <=  0x3F) {
                 // Port 1 (0x20 to 0x3F): sound card (sn76489)
-		printf("\nsound_cmd[IN]: Not supported!\n");
+		wprintw(self->status_win, "sound_cmd[IN]: Not supported!\n");
                 return 0x00;
         }
         if (decoded <=  0x5F) {
                 // Port 2 (0x40 to 0x5F)
-                printf("IO_ERROR_IN: No device at port 2\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 2\n");
                 return 0x00;
         }
         if (decoded <=  0x7F) {
                 // Port 3 (0x60 to 0x7F)
-                printf("IO_ERROR_IN: No device at port 3\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 3\n");
                 return 0x00;
         }
         if (decoded <=  0x9F) {
                 // Port 4 (0x80 to 0x9F)
-                printf("IO_ERROR_IN: No device at port 4\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 4\n");
                 return 0x00;
         }
         if (decoded <=  0x5F) {
                 // Port 5 (0xA0 to 0xBF)
-                printf("IO_ERROR_IN: No device at port 5\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 5\n");
                 return 0x00;
         }
         if (decoded <=  0x5F) {
                 // Port 6 (0xC0 to 0xDF)
-                printf("IO_ERROR_IN: No device at port 6\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 6\n");
                 return 0x00;
         }
         if (decoded <=  0x5F) {
                 // Port 7 (0xE0 to 0xFF)
-                printf("IO_ERROR_IN: No device at port 7\n");
+                wprintw(self->status_win, "IO_ERROR_IN: No device at port 7\n");
         } else {
-                printf("IO_ERROR_IN: Invalid port address: %#04x\n", port);
+                wprintw(self->status_win, "IO_ERROR_IN: Invalid port address: %#04x\n", port);
         }
+
+        // TODO: place this in a refresh cycle between CPU instructions
+        refresh();
+        wrefresh(self->terminal_win);
+        wrefresh(self->status_win);
 }
 
 
@@ -97,31 +118,36 @@ static void machine_cpu_out(Machine *self, zuint16 port, zuint8 value) {
         int decoded = port & bitmask;
 	if (decoded <= 0x1F) {
 		// Port 0 (0x00 to 0x1F): terminal
-		printf("%c", value);
+		wprintw(self->terminal_win, "%c", value);
 	} else if (decoded <= 0x3F) {
                 // Port 1 (0x20 to 0x3F): sound card (sn76489)
-		printf("\nsound_cmd[%#04x]\n", value);
+		wprintw(self->status_win, "sound_cmd[%#04x]\n", value);
         } else if (decoded <= 0x5F) {
                 // Port 2 (0x40 to 0x5F)
-                printf("IO_ERROR_OUT: No device at port 2\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 2\n");
         } else if (decoded <= 0x7F) {
                 // Port 3 (0x60 to 0x7F)
-                printf("IO_ERROR_OUT: No device at port 3\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 3\n");
         } else if (decoded <= 0x9F) {
                 // Port 4 (0x80 to 0x9F)
-                printf("IO_ERROR_OUT: No device at port 4\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 4\n");
         } else if (decoded <= 0x5F) {
                 // Port 5 (0xA0 to 0xBF)
-                printf("IO_ERROR_OUT: No device at port 5\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 5\n");
         } else if (decoded <= 0x5F) {
                 // Port 6 (0xC0 to 0xDF)
-                printf("IO_ERROR_OUT: No device at port 6\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 6\n");
         } else if (decoded <= 0x5F) {
                 // Port 7 (0xE0 to 0xFF)
-                printf("IO_ERROR_OUT: No device at port 7\n");
+                wprintw(self->status_win, "IO_ERROR_OUT: No device at port 7\n");
         } else {
-                printf("IO_ERROR_OUT: Invalid port address: %#04x\n", port);
+                wprintw(self->status_win, "IO_ERROR_OUT: Invalid port address: %#04x\n", port);
         }
+
+        // TODO: place this in a refresh cycle between CPU instructions
+        refresh();
+        wrefresh(self->terminal_win);
+        wrefresh(self->status_win);
 }
 
 
@@ -145,8 +171,6 @@ void machine_initialize(Machine *self) {
         self->cpu.hook         = Z_NULL;
         self->cpu.illegal      = Z_NULL;
         self->cpu.options      = Z80_MODEL_ZILOG_NMOS;
-
-        /* Create and initialize devices... */
 }
 
 
@@ -169,47 +193,6 @@ void machine_run(Machine *self) {
         z80_run(&self->cpu, Z80_MAXIMUM_CYCLES);
 }
 
-
-// void machine_run_frame(Machine *self)
-//         {
-//         /* CPU cycles before the INT signal */
-//         self->cycles += z80_execute(&self->cpu, CYCLES_AT_INT - self->cycles);
-
-//         /* CPU cycles during the INT signal */
-//         z80_int(&self->cpu, Z_TRUE);
-//         self->cycles += z80_run(&self->cpu, (CYCLES_AT_INT + CYCLES_PER_INT) - self->cycles);
-//         z80_int(&self->cpu, Z_FALSE);
-
-//         /* CPU cycles after the INT signal */
-//         self->cycles += z80_execute(&self->cpu, CYCLES_PER_FRAME - self->cycles);
-
-//         self->cycles -= CYCLES_PER_FRAME;
-//         }
-
-
-
-
-// TEST IMPLEM DEVICE
-
-zuint8 device_terminal_read(void *context) {
-        return 'H';
-        //return 0;
-}
-
-void device_terminal_write(void *context, zuint8 value) {
-        printf("%c", value);
-}
-
-zuint8 device_sound_read(void *context) {
-        return 0;
-}
-
-void device_sound_write(void *context, zuint8 value) {
-        printf("sound[%c]\n", value);
-}
-
-// TEST IMPLEM DEVICE
-
 int main(int argc, char *argv[]) {
         // Parse arguments
         if (argc < 2) {
@@ -218,13 +201,36 @@ int main(int argc, char *argv[]) {
         }
         char* romFilePath = argv[1];
 
+
+        // Init ncurses
+	initscr();			// Start curses mode
+	raw();				// Line buffering disabled (get character without waiting for ENTER key)
+	keypad(stdscr, TRUE);		// We get F1, F2 etc..
+	noecho();			// Don't echo() while we do getch
+        start_color();                  // Use colors
+        init_pair(1, COLOR_WHITE, COLOR_BLUE); // Terminal window color
+        init_pair(2, COLOR_YELLOW, COLOR_BLACK); // Status window color
+        int x,y;
+        getmaxyx(stdscr, y,x);
+
         // Setup virtual Pat80 computer
         Z80 pat80Cpu = {};
         Machine pat80 = {
-                /*zusize*/  .cycles = 100000,
-                /*Z80*/     .cpu = pat80Cpu
+                /*zusize*/  .cycles = 0,
+                /*Z80*/     .cpu = pat80Cpu,
+                .terminal_win = newwin(TERMINAL_HEIGHT, TERMINAL_WIDTH, INSTRUCTION_WINDOW_HEIGHT, 0),
+                .status_win = newwin(y, x - TERMINAL_WIDTH - SPACING_BETWEEN_WINDOWS, INSTRUCTION_WINDOW_HEIGHT, TERMINAL_WIDTH + SPACING_BETWEEN_WINDOWS)
         };
 
+        wbkgd(pat80.terminal_win, COLOR_PAIR(1));       // Ncurses: set terminal window color
+        wbkgd(pat80.status_win, COLOR_PAIR(2));
+        scrollok(pat80.terminal_win, TRUE);             // Ncurses: Allow scrolling when reached end of window
+        scrollok(pat80.status_win, TRUE);
+        attron(A_BOLD);                                 // Print instructions
+        printw("Emulator commands\n");
+        attroff(A_BOLD);
+        printw("ESC: Exit");
+
         machine_initialize(&pat80);
         machine_power(&pat80, Z_TRUE);
 
@@ -238,23 +244,13 @@ int main(int argc, char *argv[]) {
         fread(&pat80.memory,ROM_SIZE,1,romFile); // load rom from file into memory, up >
         fclose(romFile);
 
-	// Declare system devices
-	Device patoTerminal = {
-                .read = *device_terminal_read,
-                .write = *device_terminal_write,
-        };
-        Device patoSound = {
-                .read = *device_sound_read,
-                .write = *device_sound_write,
-        };
-
-	Device patoDevices[2] = {
-                patoTerminal,   // Port 0 (0x00 to 0x1F)
-                patoSound       // Port 1 (0x20 to 0x3F)
-        };
-	pat80.devices = patoDevices;
-        pat80.device_count = 2;
-
+        // Start emulated computer
         machine_reset(&pat80);
         machine_run(&pat80);
+
+        // Stop ncurses
+        delwin(pat80.terminal_win);
+        delwin(pat80.status_win);
+        endwin();
+        return 0;
 }