Merge

[netwatch.git] / aseg / counter.c

diff --git a/aseg/counter.c b/aseg/counter.c
index 7fe4cefe535f49ba40e64147aca002aa5a3c6f85..3484b95ba16ae5ccd94d392cb45ecc793b05bf76 100644 (file)
--- a/aseg/counter.c
+++ b/aseg/counter.c
@@ -1,52 +1,72 @@
 #include <io.h>
+#include <smram.h>
+#include <video_defines.h>
 #include <minilib.h>
 
 unsigned int counter = 0;
 unsigned long pcisave;
 unsigned char vgasave;
-unsigned char thestr[512];
-unsigned char logents[4][41] = {0};
+char thestr[512];
+char logents[4][41] = {{0}};
 
-unsigned char vgaread(unsigned char idx)
+#define VRAM_BASE              0xA0000UL
+#define TEXT_CONSOLE_OFFSET    0x18000UL 
+
+#define TEXT_CONSOLE_BASE      (VRAM_BASE + TEXT_CONSOLE_OFFSET)
+
+#define COLOR                  0x1F
+
+unsigned char vga_read(unsigned char idx)
+{
+       outb(CRTC_IDX_REG, idx);
+       return inb(CRTC_DATA_REG);
+}
+
+char * vga_base()
 {
-       outb(0x3D4, idx);
-       inb(0x3D5);
+       return (char *) (
+               TEXT_CONSOLE_BASE
+               | (((unsigned int) vga_read(CRTC_START_ADDR_LSB_IDX)) << 9)
+               | (((unsigned int) vga_read(CRTC_START_ADDR_MSB_IDX)) << 1)
+       );
 }
 
-void strblit(char *src, int r, int c)
+void strblit(char *src, int row, int col)
 {
-       char *destp = (char*)(0xB8000UL | (((unsigned int)vgaread(0xC)) << 9) | (((unsigned int)vgaread(0xD)) << 1)) + r*80*2 + c*2;
-       unsigned char smramc;
+       char *destp = vga_base() + row * 80 * 2 + col * 2;
+       smram_state_t old_state = smram_save_state();
+
+       smram_aseg_set_state(SMRAM_ASEG_SMMCODE);
        
-       smramc = pci_read8(0, 0, 0, 0x70);
-       pci_write8(0, 0, 0, 0x70, (smramc & 0xF3) | 0x08);
        while (*src)
        {
                *(destp++) = *(src++);
-               *(destp++) = 0x1F;
+               *(destp++) = COLOR;
        }
-       pci_write8(0, 0, 0, 0x70, smramc);
+
+       smram_restore_state(old_state);
 }
 
 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);
+       char *basep = vga_base();
+
+       smram_state_t old_state = smram_save_state();
+
+       smram_aseg_set_state(SMRAM_ASEG_SMMCODE);
+
        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);
-       
+
+       smram_restore_state(old_state);
+
        for (y = 0; y < 4; y++)
                strblit(logents[y], y, 40);
-       
 }
 
 void dolog(char *s)
@@ -55,9 +75,54 @@ void dolog(char *s)
        strcpy(logents[3], s);
 }
 
+void pci_dump() {
+       char s[40];
+       unsigned long cts;
+       static int curdev = 0;  /* 0 if kbd, 1 if mouse */
+               
+       cts = inl(0x84C);
+       
+       outl(0x848, 0x0);
+       outl(0x840, 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(0x840, 0x0100);
+}
+
 void __start (void)
 {
-       unsigned char smramc;
        static int first = 1;
        
        pcisave = inl(0xCF8);
@@ -79,21 +144,37 @@ void __start (void)
        
        if (inl(0x834) & 0x20)
                dolog("Warning: unhandled APM access");
+       if (inl(0x834) & 0x1000)
+       {
+               if (inl(0x844) & 0x1000)        /* devact_sts */
+               {
+                       pci_dump();
+                       outl(0x844, 0x1000);    /* ack it */
+               }
+       }
        if (inl(0x834) & 0x4000)
                dolog("Long periodic timer");
+       if (inl(0x840) & 0x1000)
+       {
+               pci_dump();
+               outl(0x840, 0x1100);
+               outl(0x840, 0x0100);
+       }
        if (inl(0x834) & ~(0x4160))
        {
-               unsigned char s[40];
+               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);