X-Git-Url: http://git.joshuawise.com/netwatch.git/blobdiff_plain/015cd976c6ff9a00fded2edbc617daf85b7b3ca1..f603a589b9b53692e539c6976fb5e65b16aa4439:/aseg/counter.c

diff --git a/aseg/counter.c b/aseg/counter.c
index edad021..b6bdcf4 100644
--- a/aseg/counter.c
+++ b/aseg/counter.c
@@ -1,11 +1,150 @@
-char counter = 0;
+#include <io.h>
 
-#define outb(port, val) \
-({ asm volatile("outb %0, %%dx" : : "a" ((unsigned char)(val)) , "d" ((unsigned short)(port))); })
+unsigned int counter = 0;
+unsigned long pcisave;
+unsigned char vgasave;
+unsigned char thestr[512];
+unsigned char logents[4][41] = {0};
+
+unsigned char vgaread(unsigned char idx)
+{
+	outb(0x3D4, idx);
+	inb(0x3D5);
+}
+
+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;
+	
+	smramc = pci_read8(0, 0, 0, 0x70);
+	pci_write8(0, 0, 0, 0x70, (smramc & 0xF3) | 0x08);
+	while (*src)
+	{
+		*(destp++) = *(src++);
+		*(destp++) = 0x1F;
+	}
+	pci_write8(0, 0, 0, 0x70, smramc);
+}
+
+void outlog()
+{
+	int y, x;
+	unsigned char smramc;
+	unsigned char *basep = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1));
+	
+	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);
+	
+	for (y = 0; y < 4; y++)
+		strblit(logents[y], y, 40);
+	
+}
+
+void dolog(char *s)
+{
+	memmove(logents[0], logents[1], sizeof(logents[0])*3);
+	strcpy(logents[3], s);
+}
 
 void __start (void)
 {
+	unsigned char smramc;
+	static int first = 1;
+	
+	pcisave = inl(0xCF8);
+	vgasave = inb(0x3D4);
+	
+	if (first)
+	{
+		first = 0;
+		dolog("NetWatch running...");
+	}
+
 	counter++;
-	outb (0x80, counter);
+	outb(0x80, (counter & 0xFF));
+	
+	strcpy(thestr, "15-412! xxxxxxxx xxxxxxxx");
+	tohex(thestr + 8, inl(0x0834));
+	tohex(thestr + 17, counter);
+	strblit(thestr, 0, 0);
+	
+	if (inl(0x834) & 0x20)
+		dolog("Warning: unhandled APM access");
+	if (inl(0x834) & 0x1000)
+	{
+		if (inl(0x844) & 0x1000)	/* devact_sts */
+		{
+			unsigned char s[40];
+			unsigned long cts;
+			static int curdev = 0;	/* 0 if kbd, 1 if mouse */
+			
+			cts = inl(0x84C);
+			
+			outl(0x848, 0x0);
+			
+			switch(cts&0xF0000)
+			{
+			case 0x20000:
+			{
+				unsigned char b;
+				strcpy(s, "READxxxxxxxxxxxxxxxx");
+				tohex(s+4, cts);
+				b = inb(cts & 0xFFFF);
+				tohex(s+12, b);
+				if ((cts & 0xFFFF) == 0x64)
+					curdev = (b & 0x20) ? 1 : 0;
+				if ((curdev == 0) && ((cts & 0xFFFF) == 0x60) && (b == 0x01))
+					outb(0xCF9, 0x4);
+				dolog(s);
+				*(unsigned char*)0xAFFD0 /* EAX */ = b;
+				break;
+			}
+			case 0x30000:
+			{
+				unsigned char b;
+				
+				strcpy(s, "WRITxxxxxxxxxxxxxxxx");
+				b = *(unsigned char*)0xAFFD0 /* EAX */;
+				tohex(s+4, cts);
+				tohex(s+12, b);
+				dolog(s);
+				outb(cts & 0xFFFF, b);
+				break;
+			}
+			default:
+				dolog("Unhandled PCI cycle");
+			}
+			outl(0x848, 0x1000);
+			outl(0x844, 0x1000);
+		}
+	}
+	if (inl(0x834) & 0x4000)
+		dolog("Long periodic timer");
+	if (inl(0x834) & ~(0x4160))
+	{
+		unsigned char s[40];
+		strcpy(s, "Unknown: xxxxxxxx");
+		tohex(s + 9, inl(0x834) & ~(0x140));
+		dolog(s);
+	}
+	
+	outlog();
+	
+	outl(0xCF8, pcisave);
+	outb(0x3D4, vgasave);
+	
+	outl(0x848, 0x1000);
+	outl(0x834, /*0x40*/0xFFFF);	// ack the periodic IRQ
+	outb(0x830, (inb(0x830) | 0x2) & ~0x40);
+	outb(0x830, inb(0x830) | 0x40);
+	
 }