#include <io.h>
-char counter = 0;
+unsigned int counter = 0;
unsigned long pcisave;
unsigned char vgasave;
unsigned char thestr[512];
+unsigned char logents[4][41] = {0};
-void memcpy(char *dst, char *src, int c)
+unsigned char vgaread(unsigned char idx)
{
- while (c--)
- *(dst++) = *(src++);
+ outb(0x3D4, idx);
+ inb(0x3D5);
}
-void strcpy(char *dst, char *src)
+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)
- *(dst++) = *(src++);
+ {
+ *(destp++) = *(src++);
+ *(destp++) = 0x1F;
+ }
+ pci_write8(0, 0, 0, 0x70, smramc);
}
-unsigned char vgaread(unsigned char idx)
+void outlog()
{
- outb(0x3D4, idx);
- inb(0x3D5);
+ 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 strblit(char *src)
+void dolog(char *s)
{
- char *destp = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1));
- while (*src)
+ memmove(logents[0], logents[1], sizeof(logents[0])*3);
+ strcpy(logents[3], s);
+}
+
+void pci_dump() {
+ 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)
{
- *(destp++) = *(src++);
- *(destp++) = 0x1F;
+ 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");
}
}
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!");
+ strcpy(thestr, "15-412! xxxxxxxx xxxxxxxx");
+ tohex(thestr + 8, inl(0x0834));
+ tohex(thestr + 17, counter);
+ strblit(thestr, 0, 0);
- smramc = pci_read8(0, 0, 0, 0x70);
- pci_write8(0, 0, 0, 0x70, (smramc & 0xF3) | 0x08);
- strblit(thestr);
- pci_write8(0, 0, 0, 0x70, smramc);
+ if (inl(0x834) & 0x20)
+ dolog("Warning: unhandled APM access");
+ if (inl(0x834) & 0x1000)
+ {
+ if (inl(0x844) & 0x1000) /* devact_sts */
+ {
+ pci_dump();
+ outl(0x848, 0x1000);
+ outl(0x844, 0x1000);
+ }
+ }
+ if (inl(0x834) & 0x4000)
+ dolog("Long periodic timer");
+ if (inl(0x840) & 0x1000)
+ {
+ dolog("Caught device monitor trap");
+ pci_dump();
+ outl(0x840, 0x1100);
+ outl(0x840, 0x0100);
+ }
+ 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);
- outb(0x834, 0x40); // ack the periodic IRQ
+ outl(0x848, 0x1000);
+ outl(0x834, /*0x40*/0xFFFF); // ack the periodic IRQ
outb(0x830, (inb(0x830) | 0x2) & ~0x40);
outb(0x830, inb(0x830) | 0x40);