mirror/86Box-probing-tools
1
0
Fork 0
mirror of https://github.com/86Box/probing-tools.git synced 2026-02-22 01:25:35 -07:00
Code Issues Packages Projects Releases Wiki Activity
Files
main
86Box-probing-tools/acpi/acpi.c
RichardG867 9df7eddf4d acpi: Add ALi I/O trap test
2023-05-03 19:15:05 -03:00

214 lines
8.9 KiB
C
Raw Permalink Blame History

/*
* 86Box A hypervisor and IBM PC system emulator that specializes in
* running old operating systems and software designed for IBM
* PC systems and compatibles from 1981 through fairly recent
* system designs based on the PCI bus.
*
* This file is part of the 86Box Probing Tools distribution.
*
* ACPI probing tool.
*
*
*
* Authors: RichardG, <richardg867@gmail.com>
*
* Copyright 2021 RichardG.
*
* ┌──────────────────────────────────────────────────────────────┐
* │ This file is UTF-8 encoded. If this text is surrounded by │
* │ garbage, please tell your editor to open this file as UTF-8. │
* └──────────────────────────────────────────────────────────────┘
*/
#include <inttypes.h>
#include <stdio.h>
#include "clib_pci.h"
#include "clib_sys.h"
#include "clib_term.h"
static void
try_sleep()
{
unsigned int port, type;
char dummy_buf[256];
/* Prompt for port address. */
printf("\nEnter port address to try: ");
scanf("%x%*c", &port);
/* Prompt for sleep type. */
printf("Enter hex sleep type to try: ");
scanf("%x%*c", &type);
/* Try sleep through selected port. */
printf("Press ENTER to try sleep %02X through register %04X...", type, port);
gets(dummy_buf);
outw(port, 0x2000 | (type << 10));
printf("Nothing?\n");
}
static void
probe_intel(uint8_t dev, uint8_t func)
{
uint8_t status;
uint16_t acpi_base, port, devctl;
/* Read and print ACPI I/O base and PMCNTRL value. */
pci_writew(0, dev, func, 0x40, 0x4001);
port = acpi_base & 0xffc0;
printf("ACPI base register = %04X PMCNTRL[%04X] Val[%04X]\n", acpi_base, port | 0x04, inw(port | 0x04));
acpi_base = port;
/* Read and print SMI trap status, ports and values. */
devctl = inl(acpi_base + 0x2e);
port = pci_readw(0, dev, func, 0x60);
status = pci_readb(0, dev, func, 0x62);
printf("SMI traps: Dev9 = %04X+%X Decode[%c] Trap[%c] Val[%04X]\n", port, status & 0x0f,
(status & 0x20) ? '√' : ' ', (devctl & 0x0008) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, func, 0x64);
status = pci_readb(0, dev, func, 0x66);
printf(" Dev10 = %04X+%X Decode[%c] Trap[%c] Val[%04X]\n", port, status & 0x0f,
(status & 0x20) ? '√' : ' ', (devctl & 0x0020) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, func, 0x68);
status = pci_readb(0, dev, func, 0x6a);
printf(" Dev12 = %04X+%X Decode[%c] Trap[%c] Val[%04X]\n", port, status & 0x0f,
(status & 0x10) ? '√' : ' ', (devctl & 0x0100) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, func, 0x70);
status = pci_readb(0, dev, func, 0x72);
printf(" Dev13 = %04X+%X Decode[%c] Trap[%c] Val[%04X]\n", port, status & 0x0f,
(status & 0x10) ? '√' : ' ', (devctl & 0x0200) ? '√' : ' ', inw(port));
/* Run interactive sequence. */
try_sleep();
}
static void
probe_via(uint8_t dev, uint8_t func, uint16_t dev_id)
{
uint8_t mask;
uint16_t acpi_base, port, glben, status;
/* Read and print ACPI I/O base and PMCNTRL value. */
acpi_base = pci_readw(0, dev, func, (dev_id == 0x3040) ? 0x20 : 0x48);
port = acpi_base & ((dev_id == 0x3040) ? 0xff00 : 0xff80);
printf("ACPI base register = %04X PMCNTRL[%04X] Val[%04X]\n", acpi_base, port | 0x04, inw(port | 0x04));
acpi_base = port;
/* Read and print SMI trap status, ports and values. */
if (dev_id >= 0x3050) {
glben = inw(acpi_base + 0x2a);
mask = pci_readb(0, dev, 0, 0x80);
if (dev_id == 0x3050) {
status = pci_readw(0, dev, 0, 0x76);
port = pci_readw(0, dev, 0, 0x78);
printf("SMI traps: PCS0 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, mask & 0x0f,
(status & 0x0010) ? '√' : ' ', (status & 0x1000) ? '√' : ' ', (glben & 0x4000) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, 0, 0x7a);
printf(" PCS1 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, (mask >> 4) & 0x0f,
(status & 0x0020) ? '√' : ' ', (status & 0x2000) ? '√' : ' ', (glben & 0x8000) ? '√' : ' ', inw(port));
} else {
status = pci_readw(0, dev, 0, 0x8b);
port = pci_readw(0, dev, 0, 0x78);
printf("SMI traps: PCS0 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, mask & 0x0f,
(status & 0x0100) ? '√' : ' ', (status & 0x1000) ? '√' : ' ', (glben & 0x4000) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, 0, 0x7a);
printf(" PCS1 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, (mask >> 4) & 0x0f,
(status & 0x0200) ? '√' : ' ', (status & 0x2000) ? '√' : ' ', (glben & 0x8000) ? '√' : ' ', inw(port));
glben = inw(acpi_base + 0x42); /* extended I/O traps */
mask = pci_readb(0, dev, 0, 0x8a);
port = pci_readw(0, dev, 0, 0x8c);
printf(" PCS2 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, mask & 0x0f,
(status & 0x0400) ? '√' : ' ', (status & 0x4000) ? '√' : ' ', (glben & 0x0001) ? '√' : ' ', inw(port));
port = pci_readw(0, dev, 0, 0x8e);
printf(" PCS3 = %04X+%X Decode[%c] IntIO[%c] Trap[%c] Val[%04X]\n", port, (mask >> 4) & 0x0f,
(status & 0x0800) ? '√' : ' ', (status & 0x8000) ? '√' : ' ', (glben & 0x0002) ? '√' : ' ', inw(port));
}
}
/* Run interactive sequence. */
try_sleep();
}
static void
probe_ali(uint8_t dev, uint8_t func)
{
uint16_t acpi_base, port;
/* Read and print ACPI I/O base and PMCNTRL value. */
acpi_base = pci_readw(0, dev, func, 0x10);
port = acpi_base & 0xffc0;
printf("ACPI base register = %04X PMCNTRL[%04X] Val[%04X]\n", acpi_base, port | 0x04, inw(port | 0x04));
acpi_base = port;
/* Read and print SMI trap status, ports and values. */
port = pci_readw(0, dev, func, 0xa4);
printf("SMI traps: IOGC = %04X+%X Trap[%c]\n", port & 0xfffc, (port & 0x0003) << 2,
(pci_readw(0, dev, func, 0x44) & 0x8000) ? '√' : ' ');
/* Run interactive sequence. */
try_sleep();
}
int
main(int argc, char **argv)
{
uint8_t dev, func;
uint16_t ven_id, dev_id;
uint32_t cf8;
/* Disable stdout buffering. */
term_unbuffer_stdout();
/* Initialize PCI, and exit in case of failure. */
if (!pci_init())
return 1;
/* Scan PCI bus 0. */
for (dev = 0; dev < 32; dev++) {
/* Determine and execute southbridge-specific function for ALi. */
ven_id = pci_readw(0, dev, 0, 0x00);
dev_id = pci_readw(0, dev, 0, 0x02);
if ((ven_id == 0x10b9) && (dev_id == 0x7101)) {
printf("Found ALi M7101 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 0, 0x08), dev, 0);
probe_ali(dev, 0);
return 0;
}
/* Single-function devices are definitely not other vendors' southbridges. */
if (!(pci_readb(0, dev, 0, 0x0e) & 0x80))
continue;
/* Determine and execute southbridge-specific function for other vendors. */
ven_id = pci_readw(0, dev, 3, 0x00);
dev_id = pci_readw(0, dev, 3, 0x02);
if ((ven_id == 0x8086) && (dev_id == 0x7113)) {
printf("Found PIIX4 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 3, 0x08), dev, 3);
probe_intel(dev, 3);
return 0;
} else if ((ven_id == 0x1055) && (dev_id == 0x9463)) {
printf("Found SLC90E66 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 3, 0x08), dev, 3);
probe_intel(dev, 3);
return 0;
} else if ((ven_id == 0x1106) && (dev_id == 0x3040)) {
printf("Found VT82C586 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 3, 0x08), dev, 3);
probe_via(dev, 3, dev_id);
return 0;
} else if ((ven_id == 0x1106) && (dev_id == 0x3050)) {
printf("Found VT82C596 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 3, 0x08), dev, 3);
probe_via(dev, 3, dev_id);
return 0;
} else {
ven_id = pci_readw(0, dev, 4, 0);
dev_id = pci_readw(0, dev, 4, 2);
if ((ven_id == 0x1106) && (dev_id == 0x3057)) {
printf("Found VT82C686 ACPI revision %02X at device %02X function %d\n", pci_readb(0, dev, 4, 0x08), dev, 4);
probe_via(dev, 4, dev_id);
return 0;
}
}
}
/* Nothing of interest found. */
printf("No ACPI device of interest found!\n");
return 1;
}
Reference in New Issue View Git Blame Copy Permalink