Machine code restructure, models are now machines instead and the init functions are in the machine files rather than in machine.c (former model.c), also moved the machine stuff into the machine/ subdirectory.

2017-09-02 20:39:57 +02:00
parent be16ee33ba
commit 3e10570bbd
90 changed files with 2390 additions and 2388 deletions
--- a/src/machine/machine_europc.c
+++ b/src/machine/machine_europc.c
@@ -0,0 +1,144 @@
+/* Copyright holders: Sarah Walker
+   see COPYING for more details
+*/
+#include <stdio.h>
+#include <string.h>
+
+#include "../ibm.h"
+
+#include "../cpu/cpu.h"
+#include "../io.h"
+#include "../device.h"
+#include "../gameport.h"
+#include "../keyboard_xt.h"
+#include "../lpt.h"
+#include "../mem.h"
+#include "../nmi.h"
+#include "../rom.h"
+
+#include "machine_common.h"
+#include "machine_europc.h"
+
+
+uint8_t europcdat[16];
+
+struct 
+{
+        uint8_t dat[16];
+        uint8_t stat;
+        uint8_t addr;
+} europc_rtc;
+
+
+static uint8_t jim_load_nvr(void)
+{
+	FILE *f;
+
+	f = nvrfopen(L"europc_jim.nvr", L"rb");
+	if (f)
+	{
+		fread(europcdat, 1, 16, f);
+		fread(europc_rtc.dat, 1, 16, f);
+		fclose(f);
+		f = NULL;
+		return 1;
+	}
+	return 0;
+}
+
+
+void jim_save_nvr(void)
+{
+	FILE *f;
+
+	f = nvrfopen(L"europc_jim.nvr", L"wb");
+	if (f)
+	{
+		fwrite(europcdat, 1, 16, f);
+		fwrite(europc_rtc.dat, 1, 16, f);
+		fclose(f);
+		f = NULL;
+	}
+}
+
+
+static void writejim(uint16_t addr, uint8_t val, void *p)
+{
+        if ((addr&0xFF0)==0x250) europcdat[addr&0xF]=val;
+        switch (addr)
+        {
+                case 0x25A:
+                switch (europc_rtc.stat)
+                {
+                        case 0:
+                        europc_rtc.addr=val&0xF;
+                        europc_rtc.stat++;
+                        break;
+                        case 1:
+                        europc_rtc.dat[europc_rtc.addr]=(europc_rtc.dat[europc_rtc.addr]&0xF)|(val<<4);
+                        europc_rtc.stat++;
+                        break;
+                        case 2:
+                        europc_rtc.dat[europc_rtc.addr]=(europc_rtc.dat[europc_rtc.addr]&0xF0)|(val&0xF);
+                        europc_rtc.stat=0;
+                        break;
+                }
+                break;
+        }
+}
+
+
+static uint8_t readjim(uint16_t addr, void *p)
+{
+        switch (addr)
+        {
+                case 0x250: case 0x251: case 0x252: case 0x253: return 0;
+                case 0x254: case 0x255: case 0x256: case 0x257: return europcdat[addr&0xF];
+                case 0x25A:
+                if (europc_rtc.stat==1)
+                {
+                        europc_rtc.stat=2;
+                        return europc_rtc.dat[europc_rtc.addr]>>4;
+                }
+                if (europc_rtc.stat==2)
+                {
+                        europc_rtc.stat=0;
+                        return europc_rtc.dat[europc_rtc.addr]&0xF;
+                }
+                return 0;
+        }
+        return 0;
+}
+
+
+static void jim_init(void)
+{
+        uint8_t viddat;
+        memset(europc_rtc.dat,0,16);
+	if (!jim_load_nvr())
+	{
+	        europc_rtc.dat[0xF]=1;
+        	europc_rtc.dat[3]=1;
+	        europc_rtc.dat[4]=1;
+        	europc_rtc.dat[5]=0x88;
+	}
+        if (gfxcard==GFX_CGA || gfxcard == GFX_COLORPLUS) viddat=0x12;
+       	else if (gfxcard==GFX_MDA || gfxcard==GFX_HERCULES || gfxcard==GFX_INCOLOR) viddat=3;
+        else viddat=0x10;
+        europc_rtc.dat[0xB]=viddat;
+        europc_rtc.dat[0xD]=viddat; /*Checksum*/
+        io_sethandler(0x250, 0x10, readjim, NULL, NULL, writejim, NULL, NULL, NULL);
+}
+
+
+void machine_europc_init(void)
+{
+        machine_common_init();
+	mem_add_bios();
+	lpt3_init(0x3bc);
+        jim_init();
+        keyboard_xt_init();
+	nmi_init();
+	if (joystick_type != 7)
+		device_add(&gameport_device);
+}