861 lines
26 KiB
C
861 lines
26 KiB
C
/*
|
|
* Boot order test cases.
|
|
*
|
|
* Copyright (c) 2013 Red Hat Inc.
|
|
*
|
|
* Authors:
|
|
* Michael S. Tsirkin <mst@redhat.com>,
|
|
*
|
|
* This work is licensed under the terms of the GNU GPL, version 2 or later.
|
|
* See the COPYING file in the top-level directory.
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
#include <glib.h>
|
|
#include <glib/gstdio.h>
|
|
#include "qemu-common.h"
|
|
#include "libqtest.h"
|
|
#include "qemu/compiler.h"
|
|
#include "hw/acpi/acpi-defs.h"
|
|
#include "hw/i386/smbios.h"
|
|
#include "qemu/bitmap.h"
|
|
|
|
#define MACHINE_PC "pc"
|
|
#define MACHINE_Q35 "q35"
|
|
|
|
#define ACPI_REBUILD_EXPECTED_AML "TEST_ACPI_REBUILD_AML"
|
|
|
|
/* DSDT and SSDTs format */
|
|
typedef struct {
|
|
AcpiTableHeader header;
|
|
gchar *aml; /* aml bytecode from guest */
|
|
gsize aml_len;
|
|
gchar *aml_file;
|
|
gchar *asl; /* asl code generated from aml */
|
|
gsize asl_len;
|
|
gchar *asl_file;
|
|
bool tmp_files_retain; /* do not delete the temp asl/aml */
|
|
} QEMU_PACKED AcpiSdtTable;
|
|
|
|
typedef struct {
|
|
const char *machine;
|
|
const char *variant;
|
|
uint32_t rsdp_addr;
|
|
AcpiRsdpDescriptor rsdp_table;
|
|
AcpiRsdtDescriptorRev1 rsdt_table;
|
|
AcpiFadtDescriptorRev1 fadt_table;
|
|
AcpiFacsDescriptorRev1 facs_table;
|
|
uint32_t *rsdt_tables_addr;
|
|
int rsdt_tables_nr;
|
|
GArray *tables;
|
|
uint32_t smbios_ep_addr;
|
|
struct smbios_entry_point smbios_ep_table;
|
|
} test_data;
|
|
|
|
#define LOW(x) ((x) & 0xff)
|
|
#define HIGH(x) ((x) >> 8)
|
|
|
|
#define SIGNATURE 0xdead
|
|
#define SIGNATURE_OFFSET 0x10
|
|
#define BOOT_SECTOR_ADDRESS 0x7c00
|
|
|
|
#define ACPI_READ_FIELD(field, addr) \
|
|
do { \
|
|
switch (sizeof(field)) { \
|
|
case 1: \
|
|
field = readb(addr); \
|
|
break; \
|
|
case 2: \
|
|
field = readw(addr); \
|
|
break; \
|
|
case 4: \
|
|
field = readl(addr); \
|
|
break; \
|
|
case 8: \
|
|
field = readq(addr); \
|
|
break; \
|
|
default: \
|
|
g_assert(false); \
|
|
} \
|
|
addr += sizeof(field); \
|
|
} while (0);
|
|
|
|
#define ACPI_READ_ARRAY_PTR(arr, length, addr) \
|
|
do { \
|
|
int idx; \
|
|
for (idx = 0; idx < length; ++idx) { \
|
|
ACPI_READ_FIELD(arr[idx], addr); \
|
|
} \
|
|
} while (0);
|
|
|
|
#define ACPI_READ_ARRAY(arr, addr) \
|
|
ACPI_READ_ARRAY_PTR(arr, sizeof(arr)/sizeof(arr[0]), addr)
|
|
|
|
#define ACPI_READ_TABLE_HEADER(table, addr) \
|
|
do { \
|
|
ACPI_READ_FIELD((table)->signature, addr); \
|
|
ACPI_READ_FIELD((table)->length, addr); \
|
|
ACPI_READ_FIELD((table)->revision, addr); \
|
|
ACPI_READ_FIELD((table)->checksum, addr); \
|
|
ACPI_READ_ARRAY((table)->oem_id, addr); \
|
|
ACPI_READ_ARRAY((table)->oem_table_id, addr); \
|
|
ACPI_READ_FIELD((table)->oem_revision, addr); \
|
|
ACPI_READ_ARRAY((table)->asl_compiler_id, addr); \
|
|
ACPI_READ_FIELD((table)->asl_compiler_revision, addr); \
|
|
} while (0);
|
|
|
|
#define ACPI_ASSERT_CMP(actual, expected) do { \
|
|
uint32_t ACPI_ASSERT_CMP_le = cpu_to_le32(actual); \
|
|
char ACPI_ASSERT_CMP_str[5] = {}; \
|
|
memcpy(ACPI_ASSERT_CMP_str, &ACPI_ASSERT_CMP_le, 4); \
|
|
g_assert_cmpstr(ACPI_ASSERT_CMP_str, ==, expected); \
|
|
} while (0)
|
|
|
|
#define ACPI_ASSERT_CMP64(actual, expected) do { \
|
|
uint64_t ACPI_ASSERT_CMP_le = cpu_to_le64(actual); \
|
|
char ACPI_ASSERT_CMP_str[9] = {}; \
|
|
memcpy(ACPI_ASSERT_CMP_str, &ACPI_ASSERT_CMP_le, 8); \
|
|
g_assert_cmpstr(ACPI_ASSERT_CMP_str, ==, expected); \
|
|
} while (0)
|
|
|
|
/* Boot sector code: write SIGNATURE into memory,
|
|
* then halt.
|
|
* Q35 machine requires a minimum 0x7e000 bytes disk.
|
|
* (bug or feature?)
|
|
*/
|
|
static uint8_t boot_sector[0x7e000] = {
|
|
/* 7c00: mov $0xdead,%ax */
|
|
[0x00] = 0xb8,
|
|
[0x01] = LOW(SIGNATURE),
|
|
[0x02] = HIGH(SIGNATURE),
|
|
/* 7c03: mov %ax,0x7c10 */
|
|
[0x03] = 0xa3,
|
|
[0x04] = LOW(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET),
|
|
[0x05] = HIGH(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET),
|
|
/* 7c06: cli */
|
|
[0x06] = 0xfa,
|
|
/* 7c07: hlt */
|
|
[0x07] = 0xf4,
|
|
/* 7c08: jmp 0x7c07=0x7c0a-3 */
|
|
[0x08] = 0xeb,
|
|
[0x09] = LOW(-3),
|
|
/* We mov 0xdead here: set value to make debugging easier */
|
|
[SIGNATURE_OFFSET] = LOW(0xface),
|
|
[SIGNATURE_OFFSET + 1] = HIGH(0xface),
|
|
/* End of boot sector marker */
|
|
[0x1FE] = 0x55,
|
|
[0x1FF] = 0xAA,
|
|
};
|
|
|
|
static const char *disk = "tests/acpi-test-disk.raw";
|
|
static const char *data_dir = "tests/acpi-test-data";
|
|
#ifdef CONFIG_IASL
|
|
static const char *iasl = stringify(CONFIG_IASL);
|
|
#else
|
|
static const char *iasl;
|
|
#endif
|
|
|
|
static void free_test_data(test_data *data)
|
|
{
|
|
AcpiSdtTable *temp;
|
|
int i;
|
|
|
|
if (data->rsdt_tables_addr) {
|
|
g_free(data->rsdt_tables_addr);
|
|
}
|
|
|
|
for (i = 0; i < data->tables->len; ++i) {
|
|
temp = &g_array_index(data->tables, AcpiSdtTable, i);
|
|
if (temp->aml) {
|
|
g_free(temp->aml);
|
|
}
|
|
if (temp->aml_file) {
|
|
if (!temp->tmp_files_retain &&
|
|
g_strstr_len(temp->aml_file, -1, "aml-")) {
|
|
unlink(temp->aml_file);
|
|
}
|
|
g_free(temp->aml_file);
|
|
}
|
|
if (temp->asl) {
|
|
g_free(temp->asl);
|
|
}
|
|
if (temp->asl_file) {
|
|
if (!temp->tmp_files_retain) {
|
|
unlink(temp->asl_file);
|
|
}
|
|
g_free(temp->asl_file);
|
|
}
|
|
}
|
|
|
|
g_array_free(data->tables, false);
|
|
}
|
|
|
|
static uint8_t acpi_checksum(const uint8_t *data, int len)
|
|
{
|
|
int i;
|
|
uint8_t sum = 0;
|
|
|
|
for (i = 0; i < len; i++) {
|
|
sum += data[i];
|
|
}
|
|
|
|
return sum;
|
|
}
|
|
|
|
static void test_acpi_rsdp_address(test_data *data)
|
|
{
|
|
uint32_t off;
|
|
|
|
/* OK, now find RSDP */
|
|
for (off = 0xf0000; off < 0x100000; off += 0x10) {
|
|
uint8_t sig[] = "RSD PTR ";
|
|
int i;
|
|
|
|
for (i = 0; i < sizeof sig - 1; ++i) {
|
|
sig[i] = readb(off + i);
|
|
}
|
|
|
|
if (!memcmp(sig, "RSD PTR ", sizeof sig)) {
|
|
break;
|
|
}
|
|
}
|
|
|
|
g_assert_cmphex(off, <, 0x100000);
|
|
data->rsdp_addr = off;
|
|
}
|
|
|
|
static void test_acpi_rsdp_table(test_data *data)
|
|
{
|
|
AcpiRsdpDescriptor *rsdp_table = &data->rsdp_table;
|
|
uint32_t addr = data->rsdp_addr;
|
|
|
|
ACPI_READ_FIELD(rsdp_table->signature, addr);
|
|
ACPI_ASSERT_CMP64(rsdp_table->signature, "RSD PTR ");
|
|
|
|
ACPI_READ_FIELD(rsdp_table->checksum, addr);
|
|
ACPI_READ_ARRAY(rsdp_table->oem_id, addr);
|
|
ACPI_READ_FIELD(rsdp_table->revision, addr);
|
|
ACPI_READ_FIELD(rsdp_table->rsdt_physical_address, addr);
|
|
ACPI_READ_FIELD(rsdp_table->length, addr);
|
|
|
|
/* rsdp checksum is not for the whole table, but for the first 20 bytes */
|
|
g_assert(!acpi_checksum((uint8_t *)rsdp_table, 20));
|
|
}
|
|
|
|
static void test_acpi_rsdt_table(test_data *data)
|
|
{
|
|
AcpiRsdtDescriptorRev1 *rsdt_table = &data->rsdt_table;
|
|
uint32_t addr = data->rsdp_table.rsdt_physical_address;
|
|
uint32_t *tables;
|
|
int tables_nr;
|
|
uint8_t checksum;
|
|
|
|
/* read the header */
|
|
ACPI_READ_TABLE_HEADER(rsdt_table, addr);
|
|
ACPI_ASSERT_CMP(rsdt_table->signature, "RSDT");
|
|
|
|
/* compute the table entries in rsdt */
|
|
tables_nr = (rsdt_table->length - sizeof(AcpiRsdtDescriptorRev1)) /
|
|
sizeof(uint32_t);
|
|
g_assert_cmpint(tables_nr, >, 0);
|
|
|
|
/* get the addresses of the tables pointed by rsdt */
|
|
tables = g_new0(uint32_t, tables_nr);
|
|
ACPI_READ_ARRAY_PTR(tables, tables_nr, addr);
|
|
|
|
checksum = acpi_checksum((uint8_t *)rsdt_table, rsdt_table->length) +
|
|
acpi_checksum((uint8_t *)tables, tables_nr * sizeof(uint32_t));
|
|
g_assert(!checksum);
|
|
|
|
/* SSDT tables after FADT */
|
|
data->rsdt_tables_addr = tables;
|
|
data->rsdt_tables_nr = tables_nr;
|
|
}
|
|
|
|
static void test_acpi_fadt_table(test_data *data)
|
|
{
|
|
AcpiFadtDescriptorRev1 *fadt_table = &data->fadt_table;
|
|
uint32_t addr;
|
|
|
|
/* FADT table comes first */
|
|
addr = data->rsdt_tables_addr[0];
|
|
ACPI_READ_TABLE_HEADER(fadt_table, addr);
|
|
|
|
ACPI_READ_FIELD(fadt_table->firmware_ctrl, addr);
|
|
ACPI_READ_FIELD(fadt_table->dsdt, addr);
|
|
ACPI_READ_FIELD(fadt_table->model, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved1, addr);
|
|
ACPI_READ_FIELD(fadt_table->sci_int, addr);
|
|
ACPI_READ_FIELD(fadt_table->smi_cmd, addr);
|
|
ACPI_READ_FIELD(fadt_table->acpi_enable, addr);
|
|
ACPI_READ_FIELD(fadt_table->acpi_disable, addr);
|
|
ACPI_READ_FIELD(fadt_table->S4bios_req, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved2, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1a_evt_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1b_evt_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1a_cnt_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1b_cnt_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm2_cnt_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm_tmr_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->gpe0_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->gpe1_blk, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1_evt_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm1_cnt_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm2_cnt_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->pm_tmr_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->gpe0_blk_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->gpe1_blk_len, addr);
|
|
ACPI_READ_FIELD(fadt_table->gpe1_base, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved3, addr);
|
|
ACPI_READ_FIELD(fadt_table->plvl2_lat, addr);
|
|
ACPI_READ_FIELD(fadt_table->plvl3_lat, addr);
|
|
ACPI_READ_FIELD(fadt_table->flush_size, addr);
|
|
ACPI_READ_FIELD(fadt_table->flush_stride, addr);
|
|
ACPI_READ_FIELD(fadt_table->duty_offset, addr);
|
|
ACPI_READ_FIELD(fadt_table->duty_width, addr);
|
|
ACPI_READ_FIELD(fadt_table->day_alrm, addr);
|
|
ACPI_READ_FIELD(fadt_table->mon_alrm, addr);
|
|
ACPI_READ_FIELD(fadt_table->century, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved4, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved4a, addr);
|
|
ACPI_READ_FIELD(fadt_table->reserved4b, addr);
|
|
ACPI_READ_FIELD(fadt_table->flags, addr);
|
|
|
|
ACPI_ASSERT_CMP(fadt_table->signature, "FACP");
|
|
g_assert(!acpi_checksum((uint8_t *)fadt_table, fadt_table->length));
|
|
}
|
|
|
|
static void test_acpi_facs_table(test_data *data)
|
|
{
|
|
AcpiFacsDescriptorRev1 *facs_table = &data->facs_table;
|
|
uint32_t addr = data->fadt_table.firmware_ctrl;
|
|
|
|
ACPI_READ_FIELD(facs_table->signature, addr);
|
|
ACPI_READ_FIELD(facs_table->length, addr);
|
|
ACPI_READ_FIELD(facs_table->hardware_signature, addr);
|
|
ACPI_READ_FIELD(facs_table->firmware_waking_vector, addr);
|
|
ACPI_READ_FIELD(facs_table->global_lock, addr);
|
|
ACPI_READ_FIELD(facs_table->flags, addr);
|
|
ACPI_READ_ARRAY(facs_table->resverved3, addr);
|
|
|
|
ACPI_ASSERT_CMP(facs_table->signature, "FACS");
|
|
}
|
|
|
|
static void test_dst_table(AcpiSdtTable *sdt_table, uint32_t addr)
|
|
{
|
|
uint8_t checksum;
|
|
|
|
ACPI_READ_TABLE_HEADER(&sdt_table->header, addr);
|
|
|
|
sdt_table->aml_len = sdt_table->header.length - sizeof(AcpiTableHeader);
|
|
sdt_table->aml = g_malloc0(sdt_table->aml_len);
|
|
ACPI_READ_ARRAY_PTR(sdt_table->aml, sdt_table->aml_len, addr);
|
|
|
|
checksum = acpi_checksum((uint8_t *)sdt_table, sizeof(AcpiTableHeader)) +
|
|
acpi_checksum((uint8_t *)sdt_table->aml, sdt_table->aml_len);
|
|
g_assert(!checksum);
|
|
}
|
|
|
|
static void test_acpi_dsdt_table(test_data *data)
|
|
{
|
|
AcpiSdtTable dsdt_table;
|
|
uint32_t addr = data->fadt_table.dsdt;
|
|
|
|
memset(&dsdt_table, 0, sizeof(dsdt_table));
|
|
data->tables = g_array_new(false, true, sizeof(AcpiSdtTable));
|
|
|
|
test_dst_table(&dsdt_table, addr);
|
|
ACPI_ASSERT_CMP(dsdt_table.header.signature, "DSDT");
|
|
|
|
/* Place DSDT first */
|
|
g_array_append_val(data->tables, dsdt_table);
|
|
}
|
|
|
|
static void test_acpi_tables(test_data *data)
|
|
{
|
|
int tables_nr = data->rsdt_tables_nr - 1; /* fadt is first */
|
|
int i;
|
|
|
|
for (i = 0; i < tables_nr; i++) {
|
|
AcpiSdtTable ssdt_table;
|
|
|
|
memset(&ssdt_table, 0 , sizeof(ssdt_table));
|
|
uint32_t addr = data->rsdt_tables_addr[i + 1]; /* fadt is first */
|
|
test_dst_table(&ssdt_table, addr);
|
|
g_array_append_val(data->tables, ssdt_table);
|
|
}
|
|
}
|
|
|
|
static void dump_aml_files(test_data *data, bool rebuild)
|
|
{
|
|
AcpiSdtTable *sdt;
|
|
GError *error = NULL;
|
|
gchar *aml_file = NULL;
|
|
gint fd;
|
|
ssize_t ret;
|
|
int i;
|
|
|
|
for (i = 0; i < data->tables->len; ++i) {
|
|
const char *ext = data->variant ? data->variant : "";
|
|
sdt = &g_array_index(data->tables, AcpiSdtTable, i);
|
|
g_assert(sdt->aml);
|
|
|
|
if (rebuild) {
|
|
uint32_t signature = cpu_to_le32(sdt->header.signature);
|
|
aml_file = g_strdup_printf("%s/%s/%.4s%s", data_dir, data->machine,
|
|
(gchar *)&signature, ext);
|
|
fd = g_open(aml_file, O_WRONLY|O_TRUNC|O_CREAT,
|
|
S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP|S_IROTH);
|
|
} else {
|
|
fd = g_file_open_tmp("aml-XXXXXX", &sdt->aml_file, &error);
|
|
g_assert_no_error(error);
|
|
}
|
|
g_assert(fd >= 0);
|
|
|
|
ret = qemu_write_full(fd, sdt, sizeof(AcpiTableHeader));
|
|
g_assert(ret == sizeof(AcpiTableHeader));
|
|
ret = qemu_write_full(fd, sdt->aml, sdt->aml_len);
|
|
g_assert(ret == sdt->aml_len);
|
|
|
|
close(fd);
|
|
|
|
if (aml_file) {
|
|
g_free(aml_file);
|
|
}
|
|
}
|
|
}
|
|
|
|
static bool compare_signature(AcpiSdtTable *sdt, const char *signature)
|
|
{
|
|
return !memcmp(&sdt->header.signature, signature, 4);
|
|
}
|
|
|
|
static bool load_asl(GArray *sdts, AcpiSdtTable *sdt)
|
|
{
|
|
AcpiSdtTable *temp;
|
|
GError *error = NULL;
|
|
GString *command_line = g_string_new(iasl);
|
|
gint fd;
|
|
gchar *out, *out_err;
|
|
gboolean ret;
|
|
int i;
|
|
|
|
fd = g_file_open_tmp("asl-XXXXXX.dsl", &sdt->asl_file, &error);
|
|
g_assert_no_error(error);
|
|
close(fd);
|
|
|
|
/* build command line */
|
|
g_string_append_printf(command_line, " -p %s ", sdt->asl_file);
|
|
if (compare_signature(sdt, "DSDT") ||
|
|
compare_signature(sdt, "SSDT")) {
|
|
for (i = 0; i < sdts->len; ++i) {
|
|
temp = &g_array_index(sdts, AcpiSdtTable, i);
|
|
if (compare_signature(temp, "DSDT") ||
|
|
compare_signature(temp, "SSDT")) {
|
|
g_string_append_printf(command_line, "-e %s ", temp->aml_file);
|
|
}
|
|
}
|
|
}
|
|
g_string_append_printf(command_line, "-d %s", sdt->aml_file);
|
|
|
|
/* pass 'out' and 'out_err' in order to be redirected */
|
|
ret = g_spawn_command_line_sync(command_line->str, &out, &out_err, NULL, &error);
|
|
g_assert_no_error(error);
|
|
if (ret) {
|
|
ret = g_file_get_contents(sdt->asl_file, (gchar **)&sdt->asl,
|
|
&sdt->asl_len, &error);
|
|
g_assert(ret);
|
|
g_assert_no_error(error);
|
|
ret = (sdt->asl_len > 0);
|
|
}
|
|
|
|
g_free(out);
|
|
g_free(out_err);
|
|
g_string_free(command_line, true);
|
|
|
|
return !ret;
|
|
}
|
|
|
|
#define COMMENT_END "*/"
|
|
#define DEF_BLOCK "DefinitionBlock ("
|
|
#define BLOCK_NAME_END ".aml"
|
|
|
|
static GString *normalize_asl(gchar *asl_code)
|
|
{
|
|
GString *asl = g_string_new(asl_code);
|
|
gchar *comment, *block_name;
|
|
|
|
/* strip comments (different generation days) */
|
|
comment = g_strstr_len(asl->str, asl->len, COMMENT_END);
|
|
if (comment) {
|
|
comment += strlen(COMMENT_END);
|
|
while (*comment == '\n') {
|
|
comment++;
|
|
}
|
|
asl = g_string_erase(asl, 0, comment - asl->str);
|
|
}
|
|
|
|
/* strip def block name (it has file path in it) */
|
|
if (g_str_has_prefix(asl->str, DEF_BLOCK)) {
|
|
block_name = g_strstr_len(asl->str, asl->len, BLOCK_NAME_END);
|
|
g_assert(block_name);
|
|
asl = g_string_erase(asl, 0,
|
|
block_name + sizeof(BLOCK_NAME_END) - asl->str);
|
|
}
|
|
|
|
return asl;
|
|
}
|
|
|
|
static GArray *load_expected_aml(test_data *data)
|
|
{
|
|
int i;
|
|
AcpiSdtTable *sdt;
|
|
gchar *aml_file = NULL;
|
|
GError *error = NULL;
|
|
gboolean ret;
|
|
|
|
GArray *exp_tables = g_array_new(false, true, sizeof(AcpiSdtTable));
|
|
for (i = 0; i < data->tables->len; ++i) {
|
|
AcpiSdtTable exp_sdt;
|
|
uint32_t signature;
|
|
const char *ext = data->variant ? data->variant : "";
|
|
|
|
sdt = &g_array_index(data->tables, AcpiSdtTable, i);
|
|
|
|
memset(&exp_sdt, 0, sizeof(exp_sdt));
|
|
exp_sdt.header.signature = sdt->header.signature;
|
|
|
|
signature = cpu_to_le32(sdt->header.signature);
|
|
|
|
try_again:
|
|
aml_file = g_strdup_printf("%s/%s/%.4s%s", data_dir, data->machine,
|
|
(gchar *)&signature, ext);
|
|
if (data->variant && !g_file_test(aml_file, G_FILE_TEST_EXISTS)) {
|
|
g_free(aml_file);
|
|
ext = "";
|
|
goto try_again;
|
|
}
|
|
exp_sdt.aml_file = aml_file;
|
|
g_assert(g_file_test(aml_file, G_FILE_TEST_EXISTS));
|
|
ret = g_file_get_contents(aml_file, &exp_sdt.aml,
|
|
&exp_sdt.aml_len, &error);
|
|
g_assert(ret);
|
|
g_assert_no_error(error);
|
|
g_assert(exp_sdt.aml);
|
|
g_assert(exp_sdt.aml_len);
|
|
|
|
g_array_append_val(exp_tables, exp_sdt);
|
|
}
|
|
|
|
return exp_tables;
|
|
}
|
|
|
|
static void test_acpi_asl(test_data *data)
|
|
{
|
|
int i;
|
|
AcpiSdtTable *sdt, *exp_sdt;
|
|
test_data exp_data;
|
|
gboolean exp_err, err;
|
|
|
|
memset(&exp_data, 0, sizeof(exp_data));
|
|
exp_data.tables = load_expected_aml(data);
|
|
dump_aml_files(data, false);
|
|
for (i = 0; i < data->tables->len; ++i) {
|
|
GString *asl, *exp_asl;
|
|
|
|
sdt = &g_array_index(data->tables, AcpiSdtTable, i);
|
|
exp_sdt = &g_array_index(exp_data.tables, AcpiSdtTable, i);
|
|
|
|
err = load_asl(data->tables, sdt);
|
|
asl = normalize_asl(sdt->asl);
|
|
|
|
exp_err = load_asl(exp_data.tables, exp_sdt);
|
|
exp_asl = normalize_asl(exp_sdt->asl);
|
|
|
|
/* TODO: check for warnings */
|
|
g_assert(!err || exp_err);
|
|
|
|
if (g_strcmp0(asl->str, exp_asl->str)) {
|
|
if (exp_err) {
|
|
fprintf(stderr,
|
|
"Warning! iasl couldn't parse the expected aml\n");
|
|
} else {
|
|
uint32_t signature = cpu_to_le32(exp_sdt->header.signature);
|
|
sdt->tmp_files_retain = true;
|
|
exp_sdt->tmp_files_retain = true;
|
|
fprintf(stderr,
|
|
"acpi-test: Warning! %.4s mismatch. "
|
|
"Actual [asl:%s, aml:%s], Expected [asl:%s, aml:%s].\n",
|
|
(gchar *)&signature,
|
|
sdt->asl_file, sdt->aml_file,
|
|
exp_sdt->asl_file, exp_sdt->aml_file);
|
|
}
|
|
}
|
|
g_string_free(asl, true);
|
|
g_string_free(exp_asl, true);
|
|
}
|
|
|
|
free_test_data(&exp_data);
|
|
}
|
|
|
|
static bool smbios_ep_table_ok(test_data *data)
|
|
{
|
|
struct smbios_entry_point *ep_table = &data->smbios_ep_table;
|
|
uint32_t addr = data->smbios_ep_addr;
|
|
|
|
ACPI_READ_ARRAY(ep_table->anchor_string, addr);
|
|
if (memcmp(ep_table->anchor_string, "_SM_", 4)) {
|
|
return false;
|
|
}
|
|
ACPI_READ_FIELD(ep_table->checksum, addr);
|
|
ACPI_READ_FIELD(ep_table->length, addr);
|
|
ACPI_READ_FIELD(ep_table->smbios_major_version, addr);
|
|
ACPI_READ_FIELD(ep_table->smbios_minor_version, addr);
|
|
ACPI_READ_FIELD(ep_table->max_structure_size, addr);
|
|
ACPI_READ_FIELD(ep_table->entry_point_revision, addr);
|
|
ACPI_READ_ARRAY(ep_table->formatted_area, addr);
|
|
ACPI_READ_ARRAY(ep_table->intermediate_anchor_string, addr);
|
|
if (memcmp(ep_table->intermediate_anchor_string, "_DMI_", 5)) {
|
|
return false;
|
|
}
|
|
ACPI_READ_FIELD(ep_table->intermediate_checksum, addr);
|
|
ACPI_READ_FIELD(ep_table->structure_table_length, addr);
|
|
if (ep_table->structure_table_length == 0) {
|
|
return false;
|
|
}
|
|
ACPI_READ_FIELD(ep_table->structure_table_address, addr);
|
|
ACPI_READ_FIELD(ep_table->number_of_structures, addr);
|
|
if (ep_table->number_of_structures == 0) {
|
|
return false;
|
|
}
|
|
ACPI_READ_FIELD(ep_table->smbios_bcd_revision, addr);
|
|
if (acpi_checksum((uint8_t *)ep_table, sizeof *ep_table) ||
|
|
acpi_checksum((uint8_t *)ep_table + 0x10, sizeof *ep_table - 0x10)) {
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
static void test_smbios_entry_point(test_data *data)
|
|
{
|
|
uint32_t off;
|
|
|
|
/* find smbios entry point structure */
|
|
for (off = 0xf0000; off < 0x100000; off += 0x10) {
|
|
uint8_t sig[] = "_SM_";
|
|
int i;
|
|
|
|
for (i = 0; i < sizeof sig - 1; ++i) {
|
|
sig[i] = readb(off + i);
|
|
}
|
|
|
|
if (!memcmp(sig, "_SM_", sizeof sig)) {
|
|
/* signature match, but is this a valid entry point? */
|
|
data->smbios_ep_addr = off;
|
|
if (smbios_ep_table_ok(data)) {
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
g_assert_cmphex(off, <, 0x100000);
|
|
}
|
|
|
|
static inline bool smbios_single_instance(uint8_t type)
|
|
{
|
|
switch (type) {
|
|
case 0:
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
case 16:
|
|
case 32:
|
|
case 127:
|
|
return true;
|
|
default:
|
|
return false;
|
|
}
|
|
}
|
|
|
|
static void test_smbios_structs(test_data *data)
|
|
{
|
|
DECLARE_BITMAP(struct_bitmap, SMBIOS_MAX_TYPE+1) = { 0 };
|
|
struct smbios_entry_point *ep_table = &data->smbios_ep_table;
|
|
uint32_t addr = ep_table->structure_table_address;
|
|
int i, len, max_len = 0;
|
|
uint8_t type, prv, crt;
|
|
uint8_t required_struct_types[] = {0, 1, 3, 4, 16, 17, 19, 32, 127};
|
|
|
|
/* walk the smbios tables */
|
|
for (i = 0; i < ep_table->number_of_structures; i++) {
|
|
|
|
/* grab type and formatted area length from struct header */
|
|
type = readb(addr);
|
|
g_assert_cmpuint(type, <=, SMBIOS_MAX_TYPE);
|
|
len = readb(addr + 1);
|
|
|
|
/* single-instance structs must not have been encountered before */
|
|
if (smbios_single_instance(type)) {
|
|
g_assert(!test_bit(type, struct_bitmap));
|
|
}
|
|
set_bit(type, struct_bitmap);
|
|
|
|
/* seek to end of unformatted string area of this struct ("\0\0") */
|
|
prv = crt = 1;
|
|
while (prv || crt) {
|
|
prv = crt;
|
|
crt = readb(addr + len);
|
|
len++;
|
|
}
|
|
|
|
/* keep track of max. struct size */
|
|
if (max_len < len) {
|
|
max_len = len;
|
|
g_assert_cmpuint(max_len, <=, ep_table->max_structure_size);
|
|
}
|
|
|
|
/* start of next structure */
|
|
addr += len;
|
|
}
|
|
|
|
/* total table length and max struct size must match entry point values */
|
|
g_assert_cmpuint(ep_table->structure_table_length, ==,
|
|
addr - ep_table->structure_table_address);
|
|
g_assert_cmpuint(ep_table->max_structure_size, ==, max_len);
|
|
|
|
/* required struct types must all be present */
|
|
for (i = 0; i < ARRAY_SIZE(required_struct_types); i++) {
|
|
g_assert(test_bit(required_struct_types[i], struct_bitmap));
|
|
}
|
|
}
|
|
|
|
static void test_acpi_one(const char *params, test_data *data)
|
|
{
|
|
char *args;
|
|
uint8_t signature_low;
|
|
uint8_t signature_high;
|
|
uint16_t signature;
|
|
int i;
|
|
|
|
args = g_strdup_printf("-net none -display none %s "
|
|
"-drive id=hd0,if=none,file=%s,format=raw "
|
|
"-device ide-hd,drive=hd0 ",
|
|
params ? params : "", disk);
|
|
|
|
qtest_start(args);
|
|
|
|
/* Wait at most 1 minute */
|
|
#define TEST_DELAY (1 * G_USEC_PER_SEC / 10)
|
|
#define TEST_CYCLES MAX((60 * G_USEC_PER_SEC / TEST_DELAY), 1)
|
|
|
|
/* Poll until code has run and modified memory. Once it has we know BIOS
|
|
* initialization is done. TODO: check that IP reached the halt
|
|
* instruction.
|
|
*/
|
|
for (i = 0; i < TEST_CYCLES; ++i) {
|
|
signature_low = readb(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET);
|
|
signature_high = readb(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET + 1);
|
|
signature = (signature_high << 8) | signature_low;
|
|
if (signature == SIGNATURE) {
|
|
break;
|
|
}
|
|
g_usleep(TEST_DELAY);
|
|
}
|
|
g_assert_cmphex(signature, ==, SIGNATURE);
|
|
|
|
test_acpi_rsdp_address(data);
|
|
test_acpi_rsdp_table(data);
|
|
test_acpi_rsdt_table(data);
|
|
test_acpi_fadt_table(data);
|
|
test_acpi_facs_table(data);
|
|
test_acpi_dsdt_table(data);
|
|
test_acpi_tables(data);
|
|
|
|
if (iasl) {
|
|
if (getenv(ACPI_REBUILD_EXPECTED_AML)) {
|
|
dump_aml_files(data, true);
|
|
} else {
|
|
test_acpi_asl(data);
|
|
}
|
|
}
|
|
|
|
test_smbios_entry_point(data);
|
|
test_smbios_structs(data);
|
|
|
|
qtest_quit(global_qtest);
|
|
g_free(args);
|
|
}
|
|
|
|
static void test_acpi_piix4_tcg(void)
|
|
{
|
|
test_data data;
|
|
|
|
/* Supplying -machine accel argument overrides the default (qtest).
|
|
* This is to make guest actually run.
|
|
*/
|
|
memset(&data, 0, sizeof(data));
|
|
data.machine = MACHINE_PC;
|
|
test_acpi_one("-machine accel=tcg", &data);
|
|
free_test_data(&data);
|
|
}
|
|
|
|
static void test_acpi_piix4_tcg_bridge(void)
|
|
{
|
|
test_data data;
|
|
|
|
memset(&data, 0, sizeof(data));
|
|
data.machine = MACHINE_PC;
|
|
data.variant = ".bridge";
|
|
test_acpi_one("-machine accel=tcg -device pci-bridge,chassis_nr=1", &data);
|
|
free_test_data(&data);
|
|
}
|
|
|
|
static void test_acpi_q35_tcg(void)
|
|
{
|
|
test_data data;
|
|
|
|
memset(&data, 0, sizeof(data));
|
|
data.machine = MACHINE_Q35;
|
|
test_acpi_one("-machine q35,accel=tcg", &data);
|
|
free_test_data(&data);
|
|
}
|
|
|
|
static void test_acpi_q35_tcg_bridge(void)
|
|
{
|
|
test_data data;
|
|
|
|
memset(&data, 0, sizeof(data));
|
|
data.machine = MACHINE_Q35;
|
|
data.variant = ".bridge";
|
|
test_acpi_one("-machine q35,accel=tcg -device pci-bridge,chassis_nr=1",
|
|
&data);
|
|
free_test_data(&data);
|
|
}
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
const char *arch = qtest_get_arch();
|
|
FILE *f = fopen(disk, "w");
|
|
int ret;
|
|
|
|
if (!f) {
|
|
fprintf(stderr, "Couldn't open \"%s\": %s", disk, strerror(errno));
|
|
return 1;
|
|
}
|
|
fwrite(boot_sector, 1, sizeof boot_sector, f);
|
|
fclose(f);
|
|
|
|
g_test_init(&argc, &argv, NULL);
|
|
|
|
if (strcmp(arch, "i386") == 0 || strcmp(arch, "x86_64") == 0) {
|
|
qtest_add_func("acpi/piix4/tcg", test_acpi_piix4_tcg);
|
|
qtest_add_func("acpi/piix4/tcg/bridge", test_acpi_piix4_tcg_bridge);
|
|
qtest_add_func("acpi/q35/tcg", test_acpi_q35_tcg);
|
|
qtest_add_func("acpi/q35/tcg/bridge", test_acpi_q35_tcg_bridge);
|
|
}
|
|
ret = g_test_run();
|
|
unlink(disk);
|
|
return ret;
|
|
}
|