Bochs/bochs/iodev/devices.cc
Kevin Lawton 414e97bc32 Enhanced the repeat IO accelerations (enabled by --enable-repeat-speedups)
to request bulk IO operations to IO devices which are bulk IO aware.
Currently, I modified only harddrv.cc to be aware.  I added some
fields to the bx_devices_c class for the IO instructions to
place requests and receive responses from the IO device emulation.
Devices except the hard drive, don't monitor these fields so they
respond as normal.  The hard drive now monitors these fields for
bulk requests, and if enabled, it memcpy()'s data straight from
the disk buffer to memory.  This eliminates numerous inp/outp calling
sequences per disk sector.

I used the fields in bx_devices_c so that I would not have to
disrupt most IO device modules.  Enhancements can be made to
other devices if they use high-bandwidth IO via in/out instructions.
2002-09-09 16:56:56 +00:00

537 lines
13 KiB
C++

/////////////////////////////////////////////////////////////////////////
// $Id: devices.cc,v 1.30 2002-09-09 16:56:55 kevinlawton Exp $
/////////////////////////////////////////////////////////////////////////
//
// Copyright (C) 2002 MandrakeSoft S.A.
//
// MandrakeSoft S.A.
// 43, rue d'Aboukir
// 75002 Paris - France
// http://www.linux-mandrake.com/
// http://www.mandrakesoft.com/
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#include "bochs.h"
#define LOG_THIS bx_devices.
/* main memory size (in Kbytes)
* subtract 1k for extended BIOS area
* report only base memory, not extended mem
*/
#define BASE_MEMORY_IN_K 640
bx_devices_c bx_devices;
// constructor for bx_devices_c
bx_devices_c::bx_devices_c(void)
{
put("DEV");
settype(DEVLOG);
#if BX_PCI_SUPPORT
pci = NULL;
#endif
pit = NULL;
keyboard = NULL;
dma = NULL;
floppy = NULL;
biosdev = NULL;
cmos = NULL;
serial = NULL;
parallel = NULL;
unmapped = NULL;
vga = NULL;
pic = NULL;
hard_drive = NULL;
sb16 = NULL;
ne2k = NULL;
g2h = NULL;
#if BX_IODEBUG_SUPPORT
iodebug = NULL;
#endif
}
bx_devices_c::~bx_devices_c(void)
{
// nothing needed for now
BX_DEBUG(("Exit."));
}
void
bx_devices_c::init(BX_MEM_C *newmem)
{
unsigned i;
BX_DEBUG(("Init $Id: devices.cc,v 1.30 2002-09-09 16:56:55 kevinlawton Exp $"));
mem = newmem;
/* no read / write handlers defined */
num_read_handles = 0;
num_write_handles = 0;
/* set unused elements to appropriate values */
for (i=0; i < BX_MAX_IO_DEVICES; i++) {
io_read_handler[i].funct = NULL;
io_write_handler[i].funct = NULL;
}
for (i=0; i < 0x10000; i++) {
read_handler_id[i] = BX_MAX_IO_DEVICES; // not assigned
write_handler_id[i] = BX_MAX_IO_DEVICES; // not assigned
}
for (i=0; i < BX_MAX_IRQS; i++) {
irq_handler_name[i] = NULL;
}
timer_handle = BX_NULL_TIMER_HANDLE;
// Start with all IO port address registered to unmapped handler
// MUST be called first
unmapped = &bx_unmapped;
unmapped->init(this);
#if BX_PCI_SUPPORT
// PCI logic (i440FX)
pci = & bx_pci;
pci->init(this);
#endif
#if BX_SUPPORT_APIC
// I/O APIC 82093AA
ioapic = & bx_ioapic;
ioapic->init ();
ioapic->set_id (BX_IOAPIC_DEFAULT_ID);
#endif
// BIOS log
biosdev = &bx_biosdev;
biosdev->init(this);
// CMOS RAM & RTC
cmos = &bx_cmos;
cmos->init(this);
/*--- 8237 DMA ---*/
dma = &bx_dma;
dma->init(this);
/*--- HARD DRIVE ---*/
hard_drive = &bx_hard_drive;
hard_drive->init(this, cmos);
//--- FLOPPY ---
floppy = &bx_floppy;
floppy->init(this, cmos);
#if BX_SUPPORT_SB16
//--- SOUND ---
sb16 = &bx_sb16;
sb16->init(this);
#endif
#if BX_SUPPORT_VGA
/*--- VGA adapter ---*/
vga = & bx_vga;
vga->init(this, cmos);
#else
/*--- HGA adapter ---*/
bx_init_hga_hardware(cmos);
#endif
/*--- 8259A PIC ---*/
pic = & bx_pic;
pic->init(this);
/*--- 8254 PIT ---*/
pit = & bx_pit;
pit->init(this);
#if BX_USE_SLOWDOWN_TIMER
bx_slowdown_timer.init();
#endif
keyboard = &bx_keyboard;
keyboard->init(this, cmos);
#if BX_IODEBUG_SUPPORT
iodebug = &bx_iodebug;
iodebug->init(this);
#endif
/*--- PARALLEL PORT ---*/
parallel = &bx_parallel;
parallel->init(this);
/*--- SERIAL PORT ---*/
serial = &bx_serial;
serial->init(this);
#if BX_NE2K_SUPPORT
// NE2000 NIC
ne2k = &bx_ne2k;
ne2k->init(this);
BX_DEBUG(("ne2k"));
#endif // #if BX_NE2K_SUPPORT
#if 0
// Guest to Host interface. Used with special guest drivers
// which move data to/from the host environment.
g2h = &bx_g2h;
g2h->init(this);
#endif
// system hardware
register_io_read_handler( this,
&read_handler,
0x0092,
"Port 92h System Control" );
register_io_write_handler(this,
&write_handler,
0x0092,
"Port 92h System Control" );
// misc. CMOS
Bit16u extended_memory_in_k = mem->get_memory_in_k() - 1024;
cmos->s.reg[0x15] = (Bit8u) BASE_MEMORY_IN_K;
cmos->s.reg[0x16] = (Bit8u) (BASE_MEMORY_IN_K >> 8);
cmos->s.reg[0x17] = (Bit8u) extended_memory_in_k;
cmos->s.reg[0x18] = (Bit8u) (extended_memory_in_k >> 8);
cmos->s.reg[0x30] = (Bit8u) extended_memory_in_k;
cmos->s.reg[0x31] = (Bit8u) (extended_memory_in_k >> 8);
/* now perform checksum of CMOS memory */
cmos->checksum_cmos();
timer_handle = bx_pc_system.register_timer( this, timer_handler,
(unsigned) BX_IODEV_HANDLER_PERIOD, 1, 1);
// Clear fields for bulk IO acceleration transfers.
bulkIOHostAddr = 0;
bulkIOQuantumsRequested = 0;
bulkIOQuantumsTransferred = 0;
}
void
bx_devices_c::reset(unsigned type)
{
#if BX_PCI_SUPPORT
pci->reset(type);
#endif
#if BX_SUPPORT_IOAPIC
ioapic->reset (type);
#endif
biosdev->reset(type);
cmos->reset(type);
dma->reset(type);
hard_drive->reset(type);
floppy->reset(type);
#if BX_SUPPORT_SB16
sb16->reset(type);
#endif
#if BX_SUPPORT_VGA
vga->reset(type);
#else
// reset hga hardware?
#endif
pic->reset(type);
pit->reset(type);
#if BX_USE_SLOWDOWN_TIMER
bx_slowdown_timer.reset(type);
#endif
keyboard->reset(type);
#if BX_IODEBUG_SUPPORT
iodebug->reset(type);
#endif
parallel->reset(type);
serial->reset(type);
#if BX_NE2K_SUPPORT
ne2k->reset(type);
#endif
}
Bit32u
bx_devices_c::read_handler(void *this_ptr, Bit32u address, unsigned io_len)
{
#if !BX_USE_DEV_SMF
bx_devices_c *class_ptr = (bx_devices_c *) this_ptr;
return( class_ptr->port92_read(address, io_len) );
}
Bit32u
bx_devices_c::port92_read(Bit32u address, unsigned io_len)
{
#else
UNUSED(this_ptr);
#endif // !BX_USE_DEV_SMF
if (io_len > 1)
BX_PANIC(("port 92h: io read from address %08x, len=%u",
(unsigned) address, (unsigned) io_len));
BX_DEBUG(("port92h read partially supported!!!"));
BX_DEBUG((" returning %02x", (unsigned) (BX_GET_ENABLE_A20() << 1)));
return(BX_GET_ENABLE_A20() << 1);
}
void
bx_devices_c::write_handler(void *this_ptr, Bit32u address, Bit32u value, unsigned io_len)
{
#if !BX_USE_DEV_SMF
bx_devices_c *class_ptr = (bx_devices_c *) this_ptr;
class_ptr->port92_write(address, value, io_len);
}
void
bx_devices_c::port92_write(Bit32u address, Bit32u value, unsigned io_len)
{
#else
UNUSED(this_ptr);
#endif // !BX_USE_DEV_SMF
Boolean bx_cpu_reset;
if (io_len > 1)
BX_PANIC(("port 92h: io read from address %08x, len=%u",
(unsigned) address, (unsigned) io_len));
BX_DEBUG(("port92h write of %02x partially supported!!!",
(unsigned) value));
BX_DEBUG(("A20: set_enable_a20() called"));
BX_SET_ENABLE_A20( (value & 0x02) >> 1 );
BX_DEBUG(("A20: now %u", (unsigned) BX_GET_ENABLE_A20()));
bx_cpu_reset = (value & 0x01); /* high speed reset */
if (bx_cpu_reset) {
BX_PANIC(("PORT 92h write: CPU reset requested!"));
}
}
void
bx_devices_c::timer_handler(void *this_ptr)
{
bx_devices_c *class_ptr = (bx_devices_c *) this_ptr;
class_ptr->timer();
}
void
bx_devices_c::timer()
{
unsigned retval;
#if (BX_USE_NEW_PIT==0)
if ( pit->periodic( BX_IODEV_HANDLER_PERIOD ) ) {
// This is a hack to make the IRQ0 work
pic->lower_irq(0);
pic->raise_irq(0);
}
#endif
retval = keyboard->periodic( BX_IODEV_HANDLER_PERIOD );
if (retval & 0x01)
pic->raise_irq(1);
if (retval & 0x02)
pic->raise_irq(12);
#if BX_SUPPORT_APIC
// update local APIC timers
for (int i=0; i<BX_SMP_PROCESSORS; i++) {
BX_CPU(i)->local_apic.periodic (BX_IODEV_HANDLER_PERIOD);
}
#endif
}
Boolean
bx_devices_c::register_irq(unsigned irq, const char *name)
{
if (irq >= BX_MAX_IRQS) {
BX_PANIC(("IO device %s registered with IRQ=%d above %u",
name, irq, (unsigned) BX_MAX_IRQS-1));
return false;
}
if (irq_handler_name[irq]) {
BX_PANIC(("IRQ %u conflict, %s with %s", irq,
irq_handler_name[irq], name));
return false;
}
irq_handler_name[irq] = name;
return true;
}
Boolean
bx_devices_c::unregister_irq(unsigned irq, const char *name)
{
if (irq >= BX_MAX_IRQS) {
BX_PANIC(("IO device %s tried to unregister IRQ %d above %u",
name, irq, (unsigned) BX_MAX_IRQS-1));
return false;
}
if (!irq_handler_name[irq]) {
BX_INFO(("IO device %s tried to unregister IRQ %d, not registered",
name, irq));
return false;
}
if (strcmp(irq_handler_name[irq], name)) {
BX_INFO(("IRQ %u not registered to %s but to %s", irq,
name, irq_handler_name[irq]));
return false;
}
irq_handler_name[irq] = NULL;
return true;
}
Boolean
bx_devices_c::register_io_read_handler( void *this_ptr, bx_read_handler_t f,
Bit32u addr, const char *name )
{
unsigned handle;
addr &= 0x0000ffff;
/* first find existing handle for function or create new one */
for (handle=0; handle < num_read_handles; handle++) {
if (io_read_handler[handle].funct == f) break;
}
if (handle >= num_read_handles) {
/* no existing handle found, create new one */
if (num_read_handles >= BX_MAX_IO_DEVICES) {
BX_INFO(("too many IO devices installed."));
BX_PANIC((" try increasing BX_MAX_IO_DEVICES"));
}
num_read_handles++;
io_read_handler[handle].funct = f;
io_read_handler[handle].this_ptr = this_ptr;
io_read_handler[handle].handler_name = name;
}
/* change table to reflect new handler id for that address */
if (read_handler_id[addr] < BX_MAX_IO_DEVICES) {
// another handler is already registered for that address
// if it is not the Unmapped port handler, bail
if ( strcmp( io_read_handler[read_handler_id[addr]].handler_name, "Unmapped" ) ) {
BX_INFO(("IO device address conflict(read) at IO address %Xh",
(unsigned) addr));
BX_INFO((" conflicting devices: %s & %s",
io_read_handler[handle].handler_name, io_read_handler[read_handler_id[addr]].handler_name));
return false; // address not available, return false.
}
}
read_handler_id[addr] = handle;
return true; // address mapped successfully
}
Boolean
bx_devices_c::register_io_write_handler( void *this_ptr, bx_write_handler_t f,
Bit32u addr, const char *name )
{
unsigned handle;
addr &= 0x0000ffff;
/* first find existing handle for function or create new one */
for (handle=0; handle < num_write_handles; handle++) {
if (io_write_handler[handle].funct == f) break;
}
if (handle >= num_write_handles) {
/* no existing handle found, create new one */
if (num_write_handles >= BX_MAX_IO_DEVICES) {
BX_INFO(("too many IO devices installed."));
BX_PANIC((" try increasing BX_MAX_IO_DEVICES"));
}
num_write_handles++;
io_write_handler[handle].funct = f;
io_write_handler[handle].this_ptr = this_ptr;
io_write_handler[handle].handler_name = name;
}
/* change table to reflect new handler id for that address */
if (write_handler_id[addr] < BX_MAX_IO_DEVICES) {
// another handler is already registered for that address
// if it is not the Unmapped port handler, bail
if ( strcmp( io_write_handler[write_handler_id[addr]].handler_name, "Unmapped" ) ) {
BX_INFO(("IO device address conflict(write) at IO address %Xh",
(unsigned) addr));
BX_INFO((" conflicting devices: %s & %s",
io_write_handler[handle].handler_name, io_write_handler[write_handler_id[addr]].handler_name));
return false; //unable to map iodevice.
}
}
write_handler_id[addr] = handle;
return true; // done!
}
/*
* Read a byte of data from the IO memory address space
*/
Bit32u
bx_devices_c::inp(Bit16u addr, unsigned io_len)
{
Bit8u handle;
Bit32u ret;
BX_INSTR_INP(addr, io_len);
handle = read_handler_id[addr];
ret = (* io_read_handler[handle].funct)(io_read_handler[handle].this_ptr,
(Bit32u) addr, io_len);
BX_INSTR_INP2(addr, io_len, ret);
BX_DBG_IO_REPORT(addr, io_len, BX_READ, ret);
return(ret);
}
/*
* Write a byte of data to the IO memory address space.
*/
void
bx_devices_c::outp(Bit16u addr, Bit32u value, unsigned io_len)
{
Bit8u handle;
BX_INSTR_OUTP(addr, io_len);
BX_INSTR_OUTP2(addr, io_len, value);
BX_DBG_IO_REPORT(addr, io_len, BX_WRITE, value);
handle = write_handler_id[addr];
(* io_write_handler[handle].funct)(io_write_handler[handle].this_ptr,
(Bit32u) addr, value, io_len);
}