Add port tool

[netwatch.git] / aseg / counter.c

diff --git a/aseg/counter.c b/aseg/counter.c
index 8f807aae231f371ab7ed540f2679773d7dc9b4e6..b6bdcf411c1acb255d50656c1676b1a1f6b8a1b9 100644 (file)
--- a/aseg/counter.c
+++ b/aseg/counter.c
@@ -1,21 +1,10 @@
 #include <io.h>
 
-char counter = 0;
+unsigned int counter = 0;
 unsigned long pcisave;
 unsigned char vgasave;
 unsigned char thestr[512];
-
-void memcpy(char *dst, char *src, int c)
-{
-       while (c--)
-               *(dst++) = *(src++);
-}
-
-void strcpy(char *dst, char *src)
-{
-       while (*src)
-               *(dst++) = *(src++);
-}
+unsigned char logents[4][41] = {0};
 
 unsigned char vgaread(unsigned char idx)
 {
@@ -23,37 +12,137 @@ unsigned char vgaread(unsigned char idx)
        inb(0x3D5);
 }
 
-void strblit(char *src)
+void strblit(char *src, int r, int c)
 {
-       char *destp = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1));
+       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!");
+       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 */
+               {
+                       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);
        
-       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);