Remove the 'first' stuff. Rename the entry point to smi_entry.

[netwatch.git] / aseg / counter.c

diff --git a/aseg/counter.c b/aseg/counter.c
index 61f9b6fac9e18ffb1a3ac87bd2d54b87925d83b6..76022187d255736ec87a396eef2f9593a49296bf 100644 (file)
--- a/aseg/counter.c
+++ b/aseg/counter.c
@@ -1,59 +1,99 @@
 #include <io.h>
 #include <io.h>

+#include <smram.h>
+#include <video_defines.h>
+#include <minilib.h>
+#include <smi.h>

 
 

-char counter = 0;
-unsigned long pcisave;
-unsigned char vgasave;
-unsigned char thestr[512];
+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++);
-}
+#include "vga-overlay.h"

 
 

-unsigned char vgaread(unsigned char idx)
-{
-       outb(0x3D4, idx);
-       inb(0x3D5);
-}
+unsigned int counter = 0;
+unsigned long pcisave;
+unsigned char vgasave;

 
 

-void strblit(char *src)
-{
-       char *destp = (char*)(0xB8000 | (vgaread(0xC) << 5) | (vgaread(0xD) << 1));
-       while (*src)
+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)

        {
        {

-               *(destp++) = *(src++);
-               *(destp++) = 0x1F;
+       case 0x20000:
+       {
+               unsigned char b;
+               b = inb(cts & 0xFFFF);
+               dologf("READ: %08x (%02x)", cts, b);
+               if ((cts & 0xFFFF) == 0x64)
+                       curdev = (b & 0x20) ? 1 : 0;
+               if ((curdev == 0) && ((cts & 0xFFFF) == 0x60) && (b == 0x01))
+                       outb(0xCF9, 0x4);
+               *(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)
+void smi_entry(void)

 {
 {

-       unsigned char smramc;
-       

        pcisave = inl(0xCF8);
        vgasave = inb(0x3D4);
        pcisave = inl(0xCF8);
        vgasave = inb(0x3D4);

-
+       

        counter++;
        counter++;

-       outb(0x80, counter);
+       outb(0x80, (counter & 0xFF));

        
        

-       strcpy(thestr, "15-412!");
+       sprintf(thestr, "15-412! %08x %08x", smi_status(), 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(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))
+               dologf("Unknown: %08x", inl(0x834) & ~(0x140));
+
+       outlog();

        
        outl(0xCF8, pcisave);
        outb(0x3D4, vgasave);
        
        
        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);
        
        outb(0x830, (inb(0x830) | 0x2) & ~0x40);
        outb(0x830, inb(0x830) | 0x40);