Add locks from time to time.

[netwatch.git] / aseg-paging / main.c

diff --git a/aseg-paging/main.c b/aseg-paging/main.c
index 7b5c09350cf87b5005421a312260fe57e188f854..9b9bc3aad5090fd040a876a429deb7a09447744f 100644 (file)
--- a/aseg-paging/main.c
+++ b/aseg-paging/main.c
@@ -4,25 +4,45 @@
 #include <minilib.h>
 #include <smi.h>
 #include <pci-bother.h>
+#include <fb.h>
+#include <output.h>
 #include "../net/net.h"
 #include "vga-overlay.h"
 #include "../aseg/packet.h"
-#include "../aseg/keyboard.h"
+#include "keyboard.h"
 
 unsigned int lastctr = 0;
 extern unsigned int counter;
 
+static int _ibf_ready = 0;
+static int _waiting_for_data = 0;
 static int curdev = 0;
+static int adding_locks_from_time_to_time = 0;
 
-static void cause_kbd_irq()
+static int _inject_ready()
 {
-       outl(0x844, 0x0);
-       outl(0x848, 0x0);
-       while (inb(0x64) & 0x1)
-               inb(0x60);
-       outb(0x60, 0xee);       /* Cause an IRQ. */
-       while (inb(0x60) != 0xEE)
-               ;
+       return _ibf_ready && !_waiting_for_data;
+}
+
+void _try_inject()
+{
+       if (kbd_has_injected_scancode() && _inject_ready())
+       {
+               smi_disable_event(SMI_EVENT_DEVTRAP_KBC);
+               int i = 1000;
+               while (inb(0x64) & 0x02)        /* Busy? */
+                       ;
+               outb(0x64, 0xD2);       /* "Inject, please!" */
+               while (inb(0x64) & 0x02)        /* Busy? */
+                       ;
+               outb(0x60, kbd_get_injected_scancode());        /* data */
+               while ((inb(0x64) & 0x02) && i--)       /* wait for completion */
+                       ;
+               outl(0x844, 0x1000);
+               adding_locks_from_time_to_time++;
+               smi_enable_event(SMI_EVENT_DEVTRAP_KBC);
+       } else if (kbd_has_injected_scancode())
+               outputf("Would like to inject, but %d %d", _ibf_ready, _waiting_for_data);
 }
 
 void pci_dump() {
@@ -43,39 +63,30 @@ void pci_dump() {
                case 0x64:
                        /* Read the real hardware and mask in our OBF if need be. */
                        b = inb(0x64);
-                       if (kbd_has_injected_scancode())
-                       {
-                               dologf("OS wants to know; we have data");
-                               lastctr = counter;
-                               b |= 0x01;
-                               b &= ~0x20;     /* no mouse for you! */
-                               curdev = 0;
-                       } else 
-                               curdev = (b & 0x20) ? 1 : 0;
-                       *(unsigned char*)0xAFFD0 /* EAX */ = b;
+                       
+                       curdev = (b & 0x20 /* KBD_STAT_MOUSE_OBF */) ? 1 : 0;
+                       
+                       if ((curdev == 0) && kbd_has_injected_scancode())
+                               b |= 0x1;
+
+                       _ibf_ready = (b & 0x2 /* IBF */) ? 0 : 1;
+                       
                        break;
                case 0x60:
-                       if (kbd_has_injected_scancode())
-                       {
+                       if ((curdev == 0) && kbd_has_injected_scancode() && !adding_locks_from_time_to_time)
                                b = kbd_get_injected_scancode();
-                               lastctr = counter;
-                               while (inb(0x64) & 0x1)
-                                       inb(0x60);
-                       } else
+                       else
                                b = inb(0x60);
+                       if (adding_locks_from_time_to_time)
+                               adding_locks_from_time_to_time--;
                        if ((curdev == 0) && (b == 0x01)) {     /* Escape */
                                outb(0xCF9, 0x4);       /* Reboot */
                                return;
                        }
-                       
-                       /* If there is more nus to come, generate another IRQ. */
-                       if (kbd_has_injected_scancode())
-                               cause_kbd_irq();
-                       
-                       *(unsigned char*)0xAFFD0 /* EAX */ = b;
                        break;
                }
-
+               
+               dologf("READ : %08x (%02x)", cts, b);
                *(unsigned char*)0xAFFD0 /* EAX */ = b;
                break;
        }
@@ -85,6 +96,18 @@ void pci_dump() {
                
                b = *(unsigned char*)0xAFFD0 /* EAX */;
                dologf("WRITE: %08x (%02x)", cts, b);
+               if ((cts & 0xFFFF) == 0x64)
+                       switch(b)
+                       {
+                       case 0x60 /*KBD_CCMD_WRITE_MODE*/:
+                       case 0xD2 /*KBD_CCMD_WRITE_OBUF*/:
+                       case 0xD3 /*KBD_CCMD_WRITE_AUX_OBUF*/:
+                       case 0xD4 /*KBD_CCMD_WRITE_MOUSE*/:
+                       case 0xD1 /*KBD_CCMD_WRITE_OUTPORT*/:
+                               _waiting_for_data = 1;  /* These all should not be interrupted. */
+                       }
+               else if ((cts & 0xFFFF) == 0x60)
+                       _waiting_for_data = 0;
                outb(cts & 0xFFFF, b);
                break;
        }
@@ -104,17 +127,12 @@ void timer_handler(smi_event_t ev)
        smi_disable_event(SMI_EVENT_FAST_TIMER);
        smi_enable_event(SMI_EVENT_FAST_TIMER);
        
-       if (kbd_has_injected_scancode() && (counter > (lastctr + 2)))
-       {
-               smi_disable_event(SMI_EVENT_DEVTRAP_KBC);
-               dolog("Kicking timer");
-               cause_kbd_irq();
-               smi_enable_event(SMI_EVENT_DEVTRAP_KBC);
-       }
+       _try_inject();
        
        outb(0x80, (ticks++) & 0xFF);
        
-       outlog();
+       if (!fb || fb->curmode.text)
+               outlog();
 }
 
 void kbc_handler(smi_event_t ev)
@@ -135,13 +153,14 @@ void gbl_rls_handler(smi_event_t ev)
                return;
        }
 
-       dologf("Got packet: type %08x", packet->type);
+       outputf("Got packet: type %08x", packet->type);
 
        if (packet->type == 42) {
                dump_log((char *)packet->data);
                *(unsigned long*)0xAFFD4 = 42;
        } else if (packet->type == 0xAA) {
-               kbd_inject_key('A');
+               kbd_inject_keysym('A', 1);
+               kbd_inject_keysym('A', 0);
        } else {
                *(unsigned long*)0xAFFD4 = 0x2BADD00D;
        }