X-Git-Url: http://git.joshuawise.com/netwatch.git/blobdiff_plain/31be35cda26f033fe62db673a8a973f0b15c9de7..113df320fe8e5e3f069c974546162d9329da8e31:/aseg/counter.c

diff --git a/aseg/counter.c b/aseg/counter.c
index 7fe4cef..ab200c1 100644
--- a/aseg/counter.c
+++ b/aseg/counter.c
@@ -1,102 +1,178 @@
 #include <io.h>
+#include <smram.h>
+#include <video_defines.h>
 #include <minilib.h>
+#include <smi.h>
+#include <pci-bother.h>
+#include "../net/net.h"
+#include "vga-overlay.h"
+#include "packet.h"
+#include "keyboard.h"
 
 unsigned int counter = 0;
+unsigned int lastctr = 0;
 unsigned long pcisave;
 unsigned char vgasave;
-unsigned char thestr[512];
-unsigned char logents[4][41] = {0};
+static int curdev = 0;	/* 0 if kbd, 1 if mouse */
 
-unsigned char vgaread(unsigned char idx)
+static void cause_kbd_irq()
 {
-	outb(0x3D4, idx);
-	inb(0x3D5);
+	outl(0x844, 0x0);
+	outl(0x848, 0x0);
+	while (inb(0x64) & 0x1)
+		inb(0x60);
+	outb(0x60, 0xee);	/* Cause an IRQ. */
+	while (inb(0x60) != 0xEE)
+		;
 }
 
-void strblit(char *src, int r, int c)
-{
-	char *destp = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1)) + r*80*2 + c*2;
-	unsigned char smramc;
+void pci_dump() {
+	unsigned long cts;
+		
+	cts = inl(0x84C);
 	
-	smramc = pci_read8(0, 0, 0, 0x70);
-	pci_write8(0, 0, 0, 0x70, (smramc & 0xF3) | 0x08);
-	while (*src)
+	outl(0x840, 0x0);
+	outl(0x848, 0x0);
+	switch(cts&0xF0000)
+	{
+	case 0x20000:
 	{
-		*(destp++) = *(src++);
-		*(destp++) = 0x1F;
+		unsigned char b;
+		
+		switch (cts & 0xFFFF)
+		{
+		case 0x64:
+			/* Read the real hardware and mask in our OBF if need be. */
+			b = inb(0x64);
+			if (kbd_has_injected_scancode())
+			{
+				dologf("OS wants to know; we have data");
+				lastctr = counter;
+				b |= 0x01;
+				b &= ~0x20;	/* no mouse for you! */
+				curdev = 0;
+			} else 
+				curdev = (b & 0x20) ? 1 : 0;
+			*(unsigned char*)0xAFFD0 /* EAX */ = b;
+			break;
+		case 0x60:
+			if (kbd_has_injected_scancode())
+			{
+				b = kbd_get_injected_scancode();
+				lastctr = counter;
+				while (inb(0x64) & 0x1)
+					inb(0x60);
+			} else
+				b = inb(0x60);
+			if ((curdev == 0) && (b == 0x01)) {	/* Escape */
+				outb(0xCF9, 0x4);	/* Reboot */
+				return;
+			}
+			
+			/* If there is more nus to come, generate another IRQ. */
+			if (kbd_has_injected_scancode())
+				cause_kbd_irq();
+			
+			*(unsigned char*)0xAFFD0 /* EAX */ = b;
+			break;
+		}
+
+		*(unsigned char*)0xAFFD0 /* EAX */ = b;
+		break;
 	}
-	pci_write8(0, 0, 0, 0x70, smramc);
+	case 0x30000:
+	{
+		unsigned char b;
+		
+		b = *(unsigned char*)0xAFFD0 /* EAX */;
+		dologf("WRITE: %08x (%02x)", cts, b);
+		outb(cts & 0xFFFF, b);
+		break;
+	}
+	default:
+		dolog("Unhandled PCI cycle");
+	}
+	
+	outl(0x840, 0x0);
+	outl(0x844, 0x1000);
+	outl(0x848, 0x1000);
 }
 
-void outlog()
+void timer_handler(smi_event_t ev)
 {
-	int y, x;
-	unsigned char smramc;
-	unsigned char *basep = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1));
+	static unsigned int ticks = 0;
 	
-	smramc = pci_read8(0, 0, 0, 0x70);
-	pci_write8(0, 0, 0, 0x70, (smramc & 0xF3) | 0x08);
-	for (y = 0; y < 4; y++)
-		for (x = 40; x < 80; x++)
-		{
-			basep[y*80*2+x*2] = ' ';
-			basep[y*80*2+x*2+1] = 0x1F;
-		}
-	pci_write8(0, 0, 0, 0x70, smramc);
+	smi_disable_event(SMI_EVENT_FAST_TIMER);
+	smi_enable_event(SMI_EVENT_FAST_TIMER);
+	
+	if (kbd_has_injected_scancode() && (counter > (lastctr + 2)))
+	{
+		smi_disable_event(SMI_EVENT_DEVTRAP_KBC);
+		dolog("Kicking timer");
+		cause_kbd_irq();
+		smi_enable_event(SMI_EVENT_DEVTRAP_KBC);
+	}
 	
-	for (y = 0; y < 4; y++)
-		strblit(logents[y], y, 40);
+	outb(0x80, (ticks++) & 0xFF);
 	
+	outlog();
 }
 
-void dolog(char *s)
+void kbc_handler(smi_event_t ev)
 {
-	memmove(logents[0], logents[1], sizeof(logents[0])*3);
-	strcpy(logents[3], s);
+	pci_dump();
 }
 
-void __start (void)
+void gbl_rls_handler(smi_event_t ev)
 {
-	unsigned char smramc;
-	static int first = 1;
+	unsigned long ecx;
 	
-	pcisave = inl(0xCF8);
-	vgasave = inb(0x3D4);
-	
-	if (first)
+	ecx = *(unsigned long*)0xAFFD4;
+
+	packet_t * packet = check_packet(ecx);
+	if (!packet)
 	{
-		first = 0;
-		dolog("NetWatch running...");
+		dologf("WARN: bad packet at %08x", ecx);
+		return;
+	}
+
+	dologf("Got packet: type %08x", packet->type);
+
+	if (packet->type == 42) {
+		dump_log((char *)packet->data);
+		*(unsigned long*)0xAFFD4 = 42;
+	} else if (packet->type == 0xAA) {
+		kbd_inject_key('A');
+	} else {
+		*(unsigned long*)0xAFFD4 = 0x2BADD00D;
 	}
+}
 
+void smi_entry(void)
+{
+	char statstr[512];
+	
+	pcisave = inl(0xCF8);
+	vgasave = inb(0x3D4);
+	pci_unbother_all();
+	
 	counter++;
-	outb(0x80, (counter & 0xFF));
+	sprintf(statstr, "15-412! %08x %08x", smi_status(), counter);
+	strblit(statstr, 0, 0);
 	
-	strcpy(thestr, "15-412! xxxxxxxx xxxxxxxx");
-	tohex(thestr + 8, inl(0x0834));
-	tohex(thestr + 17, counter);
-	strblit(thestr, 0, 0);
+	eth_poll();
 	
-	if (inl(0x834) & 0x20)
-		dolog("Warning: unhandled APM access");
-	if (inl(0x834) & 0x4000)
-		dolog("Long periodic timer");
-	if (inl(0x834) & ~(0x4160))
+	if (inl(0x840) & 0x1000)
 	{
-		unsigned char s[40];
-		strcpy(s, "Unknown: xxxxxxxx");
-		tohex(s + 9, inl(0x834) & ~(0x140));
-		dolog(s);
+		pci_dump();
+		outl(0x840, 0x1100);
+		outl(0x840, 0x0100);
 	}
+
+	smi_poll();
 	
-	outlog();
-	
+	pci_bother_all();
 	outl(0xCF8, pcisave);
 	outb(0x3D4, vgasave);
-	
-	outl(0x834, /*0x40*/0xFFFF);	// ack the periodic IRQ
-	outb(0x830, (inb(0x830) | 0x2) & ~0x40);
-	outb(0x830, inb(0x830) | 0x40);
-	
 }