keyboard.d

module architecture.keyboard;

import architecture.cpu;

import kernel.arch.x86_64.core.pic;
import kernel.arch.x86_64.core.ioapic;
import kernel.arch.x86_64.core.lapic;
import kernel.arch.x86_64.core.idt;

import kernel.core.error;
import kernel.core.kprintf;

import user.keycodes;

class KeyboardImplementation {
static:
	ErrorVal initialize(void function(Key, bool) keyProc) {
		ubyte mode;
		ubyte status;

		_keyProc = keyProc;

/*		status = Cpu.ioIn!(ubyte, "0x64")();
		while((status & 0x1) == 1) {
			Cpu.ioIn!(ubyte, "0x60")();
			status = Cpu.ioIn!(ubyte, "0x64")();
		}
*/
		ubyte ack;

		// write the command byte to enable keyboard interrupts without translation
//		Cpu.ioOut!(byte, "0x60")(0x01);
		
		status = Cpu.ioIn!(ubyte, "0x64")();
		while((status & 0x1) == 1) {
			Cpu.ioIn!(ubyte, "0x60")();
			status = Cpu.ioIn!(ubyte, "0x64")();
		}

		// read P1 (input port)
		//Cpu.ioOut!(ubyte, "64h")(0xC0);
		//ubyte P1 = Cpu.ioIn!(ubyte, "60h")();
		//kdebugfln!(DEBUG_KBD, "Keyboard - P1: {}")(P1);

		// read P2 (output port)
		//Cpu.ioOut!(ubyte, "64h")(0xD0);
		//ubyte P2 = Cpu.ioIn!(ubyte, "60h")();
		//kdebugfln!(DEBUG_KBD, "Keyboard - P2: {}")(P2);

		// schematics of P1
		// ----------------------
		// bit 0 - Keyboard Data In
		// bit 1 - Mouse Data In
		// bit 2 - Keyboard Power (0: normal, 1: no power)
		// bit 3 - Unused
		// bit 4 - RAM (0: 512KB, 1: 256KB)
		// bit 5 - Manufacturing Jumper (0: installed, 1: not installed) 
		//   With jumper BIOS runs an infinite diagnostic loop.
		// bit 6 - Display (0: CGA, 1: MDA)
		// bit 7 - Keyboard Lock (0: locked, 1: unlocked)

		// schematics of P2
		// ----------------------
		// bit 0 - Reset (0: reset CPU, 1: do not reset CPU)
		// bit 1 - A20 (0: line is forced, 1: A20 enabled)
		// bit 2 - Mouse Data
		// bit 3 - Mouse Clock
		// bit 4 - IRQ 1 (0: active, 1: inactive)	
		//   commonly Keyboard IRQ, tells whether or not the IRQ is currently firing
		// bit 5 - IRQ 12 (0: active, 1: inactive)	// commonly Mouse IRQ
		// bit 6 - Keyboard Clock
		// bit 7 - Keyboard Data

		PIC.EOI(1);
		LocalAPIC.EOI();
		IDT.assignHandler(&keyboardHandler, 33);
		IOAPIC.unmaskIRQ(1, 0);
		PIC.EOI(1);
		LocalAPIC.EOI();

		status = Cpu.ioIn!(ubyte, "0x64")();
		while((status & 0x1) == 1) {
			Cpu.ioIn!(ubyte, "0x60")();
			status = Cpu.ioIn!(ubyte, "0x64")();
		}
/*		Cpu.ioOut!(ubyte, "0x64")(0xAE);
		status = Cpu.ioIn!(ubyte, "0x64")();
		while((status & 0x1) == 1) {
			Cpu.ioIn!(ubyte, "0x60")();
			status = Cpu.ioIn!(ubyte, "0x64")();
		}*/
		Cpu.ioOut!(ubyte, "0x60")(0xF4);

/*		status = Cpu.ioIn!(ubyte, "0x64")();
		while((status & 0x1) == 1) {
			Cpu.ioIn!(ubyte, "0x60")();
			status = Cpu.ioIn!(ubyte, "0x64")();
		}*/

		return ErrorVal.Success;
	}

private:

	static void function(Key, bool) _keyProc;

	synchronized void keyboardHandler(InterruptStack* stack) {
		// Read in byte

		static uint makeState = 0;
		static bool upState = false;

		ubyte data = Cpu.ioIn!(ubyte, "0x60")();
		if (data == 0x00) {
			return;
		}
		
		Key key = Key.Null;

		if (data == 0xe0) {
			// make code from extended set
			makeState = 1;
		}
		else {
		   	if (data & 0x80) {
				data &= 0x7f;
				upState = true;
			}

			if (makeState == 0) {
				key = set2translate[data];
			}
			else if (makeState == 1) {
				key = set2translateExtra[data];
			}

			// PUT KEY IN BUFFER
			_keyProc(key, upState);

			makeState = 0;
			upState = false;
		}

		PIC.EOI(1);
		LocalAPIC.EOI();
	}

	Key set2translate[256] =
		[
		0x1E: Key.A,
		0x30: Key.B,
		0x2E: Key.C,
		0x20: Key.D,
		0x12: Key.E,
		0x21: Key.F,
		0x22: Key.G,
		0x23: Key.H,
		0x17: Key.I,
		0x24: Key.J,
		0x25: Key.K,
		0x26: Key.L,
		0x32: Key.M,
		0x31: Key.N,
		0x18: Key.O,
		0x19: Key.P,
		0x10: Key.Q,
		0x13: Key.R,
		0x1F: Key.S,
		0x14: Key.T,
		0x16: Key.U,
		0x2F: Key.V,
		0x11: Key.W,
		0x2D: Key.X,
		0x15: Key.Y,
		0x2C: Key.Z,
		0x02: Key.Num1,
		0x03: Key.Num2,
		0x04: Key.Num3,
		0x05: Key.Num4,
		0x06: Key.Num5,
		0x07: Key.Num6,
		0x08: Key.Num7,
		0x09: Key.Num8,
		0x0A: Key.Num9,
		0x0B: Key.Num0,
		0x29: Key.Quote,
		0x0C: Key.Minus,
		0x0D: Key.Equals,
		0x35: Key.Slash,
		0x0E: Key.Backspace,
		0x39: Key.Space,
		0x0F: Key.Tab,
		0x3A: Key.Capslock,
		0x2A: Key.LeftShift,
		0x1D: Key.LeftControl,
		0x38: Key.LeftAlt,
		0x36: Key.RightShift,
		0x1C: Key.Return,
		0x01: Key.Escape,
		0x3B: Key.F1,
		0x3C: Key.F2,
		0x3D: Key.F3,
		0x3E: Key.F4,
		0x3F: Key.F5,
		0x40: Key.F6,
		0x41: Key.F7,
		0x42: Key.F8,
		0x43: Key.F9,
		0x44: Key.F10,
		0x57: Key.F11,
		0x58: Key.F12,
		0x46: Key.ScrollLock,
		0x1A: Key.LeftBracket,
		0x1B: Key.RightBracket,
		0x45: Key.NumLock,
		0x37: Key.KeypadAsterisk,
		0x4A: Key.KeypadMinus,
		0x4E: Key.KeypadPlus,
		0x53: Key.KeypadPeriod,
		0x52: Key.Keypad0,
		0x4F: Key.Keypad1,
		0x50: Key.Keypad2,
		0x51: Key.Keypad3,
		0x4B: Key.Keypad4,
		0x4C: Key.Keypad5,
		0x4D: Key.Keypad6,
		0x47: Key.Keypad7,
		0x48: Key.Keypad8,
		0x49: Key.Keypad9,
		0x27: Key.Semicolon,
		0x28: Key.Apostrophe,
		0x33: Key.Comma,
		0x34: Key.Period,
		0x2B: Key.Backslash
			];

	Key set2translateExtra[256] =
		[
		0x5B: Key.LeftMeta,
		0x1D: Key.RightControl,
		0x5C: Key.RightMeta,
		0x38: Key.RightAlt,
		0x52: Key.Insert,
		0x47: Key.Home,
		0x49: Key.PageUp,
		0x53: Key.Delete,
		0x4F: Key.End,
		0x51: Key.PageDown,
		0x48: Key.Up,
		0x4B: Key.Left,
		0x50: Key.Down,
		0x4D: Key.Right,
		0x35: Key.KeypadSlash,
		0x1C: Key.KeypadReturn,

		/*0xff: Key.Application,
		0x4d: Key.Next,
		0x15: Key.Previous,
		0x3b: Key.Stop,
		0x34: Key.Play,
		0x23: Key.Mute,
		0x32: Key.VolumeUp,
		0x21: Key.VolumeDown,
		0x50: Key.Media,
		0x48: Key.EMail,
		0x2b: Key.Calculator,
		0x40: Key.Computer,
		0x10: Key.WebSearch,
		0x3a: Key.WebHome,
		0x38: Key.WebBack,
		0x30: Key.WebForward,
		0x28: Key.WebStop,
		0x20: Key.WebRefresh,
		0x18: Key.WebFavorites*/
			];
}