177 lines
6.9 KiB
C
177 lines
6.9 KiB
C
#include "radeonfb.h"
|
|
#include "pci.h"
|
|
#include "x86emu.h"
|
|
#include "x86pcibios.h"
|
|
#include "x86emu_regs.h"
|
|
#include "bas_printf.h"
|
|
extern unsigned short offset_port;
|
|
|
|
#define DBG_PCIBIOS
|
|
#ifdef DBG_PCIBIOS
|
|
#define dbg(format, arg...) do { xprintf("DEBUG (%s()): " format, __FUNCTION__, ##arg);} while(0)
|
|
#else
|
|
#define dbg(format, arg...) do {;} while (0)
|
|
#endif /* DBG_PCIBIOS */
|
|
#define err(format, arg...) do { xprintf("ERROR (%s()): " format, __FUNCTION__, ##arg); } while(0);
|
|
|
|
|
|
int x86_pcibios_handler(struct X86EMU *emu)
|
|
{
|
|
int ret = 0;
|
|
unsigned long dev;
|
|
|
|
switch (emu->x86.R_AX)
|
|
{
|
|
case PCI_BIOS_PRESENT:
|
|
dbg("PCI_BIOS_PRESENT\r\n");
|
|
emu->x86.R_AH = 0x00; /* no config space/special cycle support */
|
|
emu->x86.R_AL = 0x01; /* config mechanism 1 */
|
|
emu->x86.R_EDX = 'P' | 'C' << 8 | 'I' << 16 | ' ' << 24;
|
|
emu->x86.R_EBX = 0x0210; /* Version 2.10 */
|
|
emu->x86.R_ECX = 0xFF00; /* FixME: Max bus number */
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case FIND_PCI_DEVICE:
|
|
dbg("FIND_PCI_DEVICE vendor = %04x, device = %04x\r\n", emu->x86.R_DX, emu->x86.R_CX);
|
|
dev = pci_find_device((unsigned long) emu->x86.R_DX, ((unsigned long) emu->x86.R_CX), 0);
|
|
|
|
if (dev != 0)
|
|
{
|
|
dbg("dev = %d\r\n", dev);
|
|
emu->x86.R_BH = PCI_BUS_FROM_HANDLE(dev);
|
|
//X86_BH = (char)(dev >> 16) / PCI_MAX_FUNCTION); // dev->bus->secondary;
|
|
emu->x86.R_BL = PCI_DEVICE_FROM_HANDLE(dev) << 3 | PCI_FUNCTION_FROM_HANDLE(dev);
|
|
//X86_BL = (char)dev; // dev->path.u.pci.devfn;
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
}
|
|
else
|
|
{
|
|
dbg("device not found\r\n");
|
|
emu->x86.R_AH = DEVICE_NOT_FOUND;
|
|
emu->x86.R_EFLG |= FB_CF; /* set carry flag */
|
|
ret = 0;
|
|
}
|
|
break;
|
|
|
|
case FIND_PCI_CLASS_CODE:
|
|
/* FixME: support SI != 0 */
|
|
dbg("FIND_PCI_CLASS_CODE %x", emu->x86.R_ECX);
|
|
dev = pci_find_classcode(emu->x86.R_ECX, 0);
|
|
if (dev != 0) {
|
|
dbg(" ...OK\r\n");
|
|
emu->x86.R_BH = PCI_BUS_FROM_HANDLE(dev);
|
|
emu->x86.R_BL = PCI_DEVICE_FROM_HANDLE(dev) << 3 | PCI_FUNCTION_FROM_HANDLE(dev);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
}
|
|
else
|
|
{
|
|
dbg(" ... error\r\n");
|
|
emu->x86.R_AH = DEVICE_NOT_FOUND;
|
|
emu->x86.R_EFLG |= FB_CF; /* set carry flag */
|
|
ret = 0;
|
|
}
|
|
break;
|
|
|
|
case READ_CONFIG_BYTE:
|
|
// bus, devfn
|
|
dbg("READ_CONFIG_BYTE bus = %x, devfn = %x, reg = %x\r\n", emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI);
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
emu->x86.R_CL = pci_read_config_byte(dev, emu->x86.R_DI);
|
|
dbg("value = %x\r\n", emu->x86.R_CL);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case READ_CONFIG_WORD:
|
|
// bus, devfn
|
|
dbg("READ_CONFIG_WORD bus = %x, devfn = %x, reg = %x\r\n", emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI);
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
if (emu->x86.R_DI == PCIBAR1)
|
|
emu->x86.R_CX = offset_port + 1;
|
|
else
|
|
emu->x86.R_CX = pci_read_config_word(dev, emu->x86.R_DI);
|
|
dbg("value = %x\r\n", emu->x86.R_CX);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case READ_CONFIG_DWORD:
|
|
// bus, devfn
|
|
dbg("READ_CONFIG_DWORD bus = %x, devfn = %x, reg = %x\r\n", emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI);
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
if (emu->x86.R_DI == PCIBAR1)
|
|
emu->x86.R_CX = (unsigned long) offset_port + 1;
|
|
else
|
|
emu->x86.R_ECX = pci_read_config_longword(dev, emu->x86.R_DI);
|
|
dbg("value = %x\r\n", emu->x86.R_ECX);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case WRITE_CONFIG_BYTE:
|
|
// bus, devfn
|
|
dbg("READ_CONFIG_BYTE bus = %x, devfn = %x, reg = %x, value = %x\r\n",
|
|
emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI, emu->x86.R_CL);
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
pci_write_config_byte(dev, emu->x86.R_DI, emu->x86.R_CL);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case WRITE_CONFIG_WORD:
|
|
// bus, devfn
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
dbg("WRITE_CONFIG_WORD bus = %x, devfn = %x, reg = %x, value = %x\r\n", emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI, emu->x86.R_CX);
|
|
if (emu->x86.R_DI == PCIBAR1)
|
|
{
|
|
offset_port = emu->x86.R_CX;
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
}
|
|
pci_write_config_word(dev, emu->x86.R_DI, emu->x86.R_CX);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
case WRITE_CONFIG_DWORD:
|
|
// bus, devfn
|
|
dev = PCI_HANDLE(emu->x86.R_BH, emu->x86.R_BL >> 3, emu->x86.R_BL & 3);
|
|
dbg("WRITE_CONFIG_DWORD bus = %x, devfn = %x, value = %x\r\n",
|
|
emu->x86.R_BH, emu->x86.R_BL, emu->x86.R_DI, emu->x86.R_ECX);
|
|
if (emu->x86.R_DI == PCIBAR1)
|
|
{
|
|
offset_port = (unsigned short) emu->x86.R_ECX & 0xFFFC;
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
}
|
|
pci_write_config_longword(dev, emu->x86.R_DI, emu->x86.R_ECX);
|
|
emu->x86.R_AH = SUCCESSFUL;
|
|
emu->x86.R_EFLG &= ~FB_CF; /* clear carry flag */
|
|
ret = 1;
|
|
break;
|
|
|
|
default:
|
|
dbg("PCI_BIOS FUNC_NOT_SUPPORTED\r\n");
|
|
emu->x86.R_AH = FUNC_NOT_SUPPORTED;
|
|
emu->x86.R_EFLG |= FB_CF;
|
|
break;
|
|
}
|
|
|
|
return ret;
|
|
}
|