void mouse_init(void) /*Note that we are doing NO device initialization.
We are assuming that this was done suitably when the system
was booted and the standard mouse driver was installed. THis is very poor
programming practice! CW */
{
/* _go32_dpmi_lock_data(mousequeue,200); I'm not using these in this simple
demo so they are commented out. CW
_go32_dpmi_lock_data(&mousequeue,sizeof(mousequeue));*/
_go32_dpmi_lock_code(NewInt74,(unsigned long)(LOCKint74-NewInt74));
// This ensures that the handler is not placed into paged memory.
_go32_dpmi_get_protected_mode_interrupt_vector(0x74,&old_handler);
/* Reads the selector and offset of the old handler into a structure, so
that it can be restored later. */
/*Obtains the far pointer for the mouse ISR */
new_mousehandler.pm_selector=_go32_my_cs(); /* Note that _go32_my_cs()
returns the selector for the program's code.*/
new_mousehandler.pm_offset=(unsigned long)NewInt74;
_go32_dpmi_allocate_iret_wrapper(&new_mousehandler);
/* The wrapper saves the machine state using a series of PUSH instructions. */
_go32_dpmi_set_protected_mode_interrupt_vector(0x74,&new_mousehandler);
/* Places the ISR far pointer into a protected mode interrupt table. */
}
void key_init(void)
{
lo=hi=0;
new_key_handler.pm_offset = (int) key_handler;
new_key_handler.pm_selector = _go32_my_cs();
_go32_dpmi_get_protected_mode_interrupt_vector(0x9, &old_key_handler);
_go32_dpmi_allocate_iret_wrapper(&new_key_handler);
_go32_dpmi_set_protected_mode_interrupt_vector(0x9, &new_key_handler);
}
/**
* key_init
* This function initiates the interrupt for the keyboard. This was given
* as part of the VBETEST.C example.
**/
void key_init(void){
//Finds location of old handler
_go32_dpmi_lock_code(NewInt9, (unsigned long)(LOCKint9 - NewInt9));
_go32_dpmi_get_protected_mode_interrupt_vector(9, &old_handler);
//Set new handler
new_handler.pm_offset = (unsigned long)NewInt9;
new_handler.pm_selector = _go32_my_cs();
//Set in protected mode
_go32_dpmi_allocate_iret_wrapper(&new_handler);
_go32_dpmi_set_protected_mode_interrupt_vector(9, &new_handler);
}
int install_c_irq_handler(int irq, void (*irq_func)(void), _go32_dpmi_seginfo *old_irq) {
// endereço do handler original
_go32_dpmi_get_protected_mode_interrupt_vector(IRQ_VECTOR(irq), old_irq);
// instalação do handler na IDT
_go32_dpmi_seginfo new_irq;
new_irq.pm_selector = _go32_my_cs( ); // selector do código
new_irq.pm_offset = (unsigned long) irq_func; // endereço do novo handler
// prepara funcao assembly para chamar funcao C
_go32_dpmi_allocate_iret_wrapper(&new_irq);
_go32_dpmi_set_protected_mode_interrupt_vector(IRQ_VECTOR(irq), &new_irq);
return 0;
}
void key_init(void)
{
int i;
for (i=0;i<256;i++) keypush[i]=0; /*none key is pressed*/
extended_key_follows=FALSE;
update_leds();
raw_key_r=0;raw_key=0;
new_key_handler.pm_offset = (int) key_handler;
new_key_handler.pm_selector = _go32_my_cs();
_go32_dpmi_get_protected_mode_interrupt_vector(0x9, &old_key_handler);
_go32_dpmi_allocate_iret_wrapper(&new_key_handler);
_go32_dpmi_set_protected_mode_interrupt_vector(0x9, &new_key_handler);
keyboard_handler_replaced = TRUE;
}
int timer_init(TimerHandler handler)
{
/* Save old handler */
_go32_dpmi_get_protected_mode_interrupt_vector(TIMER_INT, &oldhandler);
/* Setup our handler */
real_handler = handler;
myhandler.pm_selector = _go32_my_cs();
myhandler.pm_offset = (unsigned long)timer_handler;
/* Allocate an IRET wrapper */
if(_go32_dpmi_allocate_iret_wrapper(&myhandler))
return 0;
/* Set our handler to be the new interrupt handler */
return _go32_dpmi_set_protected_mode_interrupt_vector(TIMER_INT, &myhandler);
}
int set_isr_c_wrapper(int irq, void (*isr)(void), _go32_dpmi_seginfo *prev_isr) {
int vector = irq_vector(irq);
if(_go32_dpmi_get_protected_mode_interrupt_vector(vector, prev_isr))
return -1;
_go32_dpmi_seginfo new_isr;
new_isr.pm_selector = _go32_my_cs();
new_isr.pm_offset=(unsigned long) isr;
/* prepara função assembly para chamar função C */
_go32_dpmi_allocate_iret_wrapper(&new_isr);
if(_go32_dpmi_set_protected_mode_interrupt_vector(vector, &new_isr))
return -1;
return 0;
}
static void install_isr(int portnum, struct port *p, int irq)
{
int x, baseaddr = p->baseaddr;
p->irq = irq;
/* Clear pending interrupts. */
do {
inportb(baseaddr + RBR);
inportb(baseaddr + LSR);
inportb(baseaddr + MSR);
x = inportb(baseaddr + IIR);
} while (!(x & 0x01));
/* Calculate vector from IRQ. */
if (p->irq <= 7) {
p->interrupt_enable_mask = ~(1 << p->irq); /* IMR is inverted */
p->vector_num = 8 + p->irq;
p->pic_imr = 0x21;
}
else {
p->interrupt_enable_mask = ~(1 << (p->irq - 8));
p->vector_num = 0x70 + (p->irq - 8);
p->pic_imr = 0xa1;
}
/* Install ISR into vector. */
p->new_vector.pm_selector = _go32_my_cs();
p->new_vector.pm_offset = (int)isr_wrapper_table[portnum];
_go32_dpmi_allocate_iret_wrapper(&p->new_vector);
disable();
_go32_dpmi_get_protected_mode_interrupt_vector(p->vector_num, &p->old_vector);
_go32_dpmi_set_protected_mode_interrupt_vector(p->vector_num, &p->new_vector);
/* Enable interrupts. */
outportb(baseaddr + MCR, 0x0f);
outportb(baseaddr + IER, 0x0f);
outportb(p->pic_imr, inportb(p->pic_imr) & p->interrupt_enable_mask);
enable();
}
void keyboard_int_install() {
// retrieve the current (old) keyboard handler
_go32_dpmi_get_protected_mode_interrupt_vector(9, &OldHandler);
// lock code and data from being paged
_go32_dpmi_lock_code(myKeyInt, (long)myKeyInt_Size);
_go32_dpmi_lock_data(&keyVal, (long)sizeof(keyVal));
// establish new seginfo struct
NewHandler.pm_offset = (long)myKeyInt;
NewHandler.pm_selector = _go32_my_cs();
// allocate the IRET wrapper
_go32_dpmi_allocate_iret_wrapper(&NewHandler);
// install the new keyboard ISR
_go32_dpmi_set_protected_mode_interrupt_vector(9, &NewHandler);
printf("new keyboard ISR installed\n");
}
PVI MIrq_SetHandler(UBYTE irqno, PVI handler)
{
#ifdef __DJGPP__
_go32_dpmi_seginfo seginfo;
#endif
PVI oldvect;
int vecno = (irqno > 7) ? irqno + 0x68 : irqno + 0x8;
#ifdef __DJGPP__
_go32_dpmi_get_protected_mode_interrupt_vector(vecno, &seginfo);
oldvect = seginfo.pm_offset;
seginfo.pm_offset = handler;
seginfo.pm_selector = _go32_my_cs();
_go32_dpmi_allocate_iret_wrapper(&seginfo);
_go32_dpmi_set_protected_mode_interrupt_vector(vecno, &seginfo);
#else
oldvect = _dos_getvect(vecno);
_dos_setvect(vecno, handler);
#endif
return oldvect;
}
/* Install our custom keyboard interrupt. */
void kbd_install(void)
{
int r;
static _go32_dpmi_seginfo my_kbd_handler_seginfo;
my_kbd_handler_seginfo.pm_offset = (int)my_kbd_interrupt_handler;
my_kbd_handler_seginfo.pm_selector = _go32_my_cs();
r = _go32_dpmi_allocate_iret_wrapper(&my_kbd_handler_seginfo);
if (r) {
log_error(LOG_DEFAULT, "Cannot allocate IRET wrapper for the keyboard interrupt.");
exit(-1);
}
r = _go32_dpmi_set_protected_mode_interrupt_vector(9, &my_kbd_handler_seginfo);
if (r) {
log_error(LOG_DEFAULT, "Cannot install the keyboard interrupt handler.");
exit(-1);
}
/* Initialize the keyboard matrix. */
keyboard_clear_keymatrix();
/* Reset modifier status. */
memset(&modifiers, 0, sizeof(modifiers));
}
static void ComPort_Enable(ComPort *p)
{
void (*isr)(void);
int n;
byte b;
if (p->enabled)
{
Con_Printf("Already enabled\n");
return;
}
// disable all UART interrupts
outportb (p->uart + INTERRUPT_ENABLE_REGISTER, 0);
// clear out any buffered uncoming data
while((inportb (p->uart + LINE_STATUS_REGISTER)) & LSR_DATA_READY)
inportb (p->uart + RECEIVE_BUFFER_REGISTER);
// get the current line and modem status
p->modemStatus = (inportb (p->uart + MODEM_STATUS_REGISTER) & MODEM_STATUS_MASK) | p->modemStatusIgnore;
p->lineStatus = inportb (p->uart + LINE_STATUS_REGISTER);
// clear any UART interrupts
do
{
n = inportb (p->uart + INTERRUPT_ID_REGISTER) & 7;
if (n == IIR_RX_DATA_READY_INTERRUPT)
inportb (p->uart + RECEIVE_BUFFER_REGISTER);
} while (!(n & 1));
if (p->uartType == UART_AUTO)
{
outportb (p->uart + FIFO_CONTROL_REGISTER, FCR_FIFO_ENABLE);
b = inportb (p->uart + INTERRUPT_ID_REGISTER);
if ((b & IIR_FIFO_ENABLED) == IIR_FIFO_ENABLED)
p->uartType = UART_16550;
else
p->uartType = UART_8250;
}
// save the old interrupt handler
_go32_dpmi_get_protected_mode_interrupt_vector(p->irq + 8, &p->protectedModeSaveInfo);
if (p->uartType == UART_8250)
{
outportb (p->uart + FIFO_CONTROL_REGISTER, 0);
if (p == handleToPort[0])
isr = COM1_ISR_8250;
else
isr = COM2_ISR_8250;
}
else
{
outportb (p->uart + FIFO_CONTROL_REGISTER, FCR_FIFO_ENABLE | FCR_RCVR_FIFO_RESET | FCR_XMIT_FIFO_RESET | FCR_TRIGGER_08);
if (p == handleToPort[0])
isr = COM1_ISR_16550;
else
isr = COM2_ISR_16550;
}
p->protectedModeInfo.pm_offset = (int)isr;
n = _go32_dpmi_allocate_iret_wrapper(&p->protectedModeInfo);
if (n)
{
Con_Printf("serial: protected mode callback allocation failed\n");
return;
}
// disable interrupts at the processor
disable();
// install our interrupt handlers now
_go32_dpmi_set_protected_mode_interrupt_vector(p->irq + 8, &p->protectedModeInfo);
// enable our interrupt at the PIC
outportb (0x21, inportb (0x21) & ~(1<<p->irq));
// enable interrupts at the processor
enable();
// enable interrupts at the PIC
outportb (0x20, 0xc2);
// set baud rate & line control
outportb (p->uart + LINE_CONTROL_REGISTER, LCR_DLAB | p->lineControl);
outportb (p->uart, p->baudBits);
outportb (p->uart + 1, 0);
outportb (p->uart + LINE_CONTROL_REGISTER, p->lineControl);
// set modem control register & enable uart interrupt generation
outportb(p->uart + MODEM_CONTROL_REGISTER, MCR_OUT2 | MCR_RTS | MCR_DTR);
// enable the individual interrupts at the uart
outportb (p->uart + INTERRUPT_ENABLE_REGISTER, IER_RX_DATA_READY | IER_TX_HOLDING_REGISTER_EMPTY | IER_LINE_STATUS | IER_MODEM_STATUS);
p->enabled = true;
}
void InitPort (void)
{
int mcr;
int temp;
if(port_initted)
return;
//
// Reset the output queue
//
outque.head = outque.tail = 0;
//
// find the irq and io address of the port
//
GetUart ();
//
// init com port settings
//
regs.x.ax = 0xf3; //f3= 9600 n 8 1
regs.x.dx = comport - 1;
int86 (0x14, ®s, ®s);
//
// check for a 16550
//
OUTPUT(uart + FIFO_CONTROL_REGISTER, FCR_FIFO_ENABLE + FCR_TRIGGER_04);
temp = INPUT(uart + INTERRUPT_ID_REGISTER);
if ((temp & 0xf8) == 0xc0)
{
uart_type = UART_16550;
usermsg ("UART is a 16550");
}
else
{
uart_type = UART_8250;
OUTPUT(uart + FIFO_CONTROL_REGISTER, 0);
usermsg("UART is an 8250");
}
//
// prepare for interrupts
//
OUTPUT(uart + INTERRUPT_ENABLE_REGISTER, 0);
mcr = INPUT(uart + MODEM_CONTROL_REGISTER);
mcr |= MCR_OUT2;
mcr &= ~MCR_LOOPBACK;
OUTPUT(uart + MODEM_CONTROL_REGISTER, mcr);
INPUT(uart); // Clear any pending interrupts
INPUT(uart + INTERRUPT_ID_REGISTER);
//
// hook the irq vector
//
irqintnum = irq + 8;
asm("cli"); // disable interrupts
_go32_dpmi_get_protected_mode_interrupt_vector(irqintnum, &oldirqvect);
newirqvect.pm_offset = (int)isr_8250;
newirqvect.pm_selector = _go32_my_cs();
_go32_dpmi_allocate_iret_wrapper(&newirqvect);
_go32_dpmi_set_protected_mode_interrupt_vector(irqintnum, &newirqvect);
asm("sti"); // enable interrupts
OUTPUT(0x20 + 1, INPUT(0x20 + 1) & ~(1<<irq));
asm("cli"); // disable again
// enable RX and TX interrupts at the uart
OUTPUT(uart + INTERRUPT_ENABLE_REGISTER,
IER_RX_DATA_READY + IER_TX_HOLDING_REGISTER_EMPTY);
// enable interrupts through the interrupt controller
OUTPUT(0x20, 0xc2);
// set DTR
OUTPUT(uart + MODEM_CONTROL_REGISTER
, INPUT(uart + MODEM_CONTROL_REGISTER) | MCR_DTR);
asm("sti"); // re-enable
port_initted = true;
}
