[mirror_qemu.git] / tests / acpi-test.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/i386/acpi-defs.h"

#define MACHINE_PC "pc"
#define MACHINE_Q35 "q35"

#define ACPI_REBUILD_EXPECTED_AML "TEST_ACPI_REBUILD_AML"
#define ACPI_SSDT_SIGNATURE 0x54445353 /* SSDT */

/* 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 asl_file_retain;   /* do not delete the temp asl */
} QEMU_PACKED AcpiSdtTable;

typedef struct {
    const char *machine;
    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;
} 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);

/* 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 (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->asl_file_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);
    g_assert_cmphex(rsdp_table->signature, ==, ACPI_RSDP_SIGNATURE);

    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);
    g_assert_cmphex(rsdt_table->signature, ==, ACPI_RSDT_SIGNATURE);

    /* 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);

    g_assert_cmphex(fadt_table->signature, ==, ACPI_FACP_SIGNATURE);
    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);

    g_assert_cmphex(facs_table->signature, ==, ACPI_FACS_SIGNATURE);
}

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);
    g_assert_cmphex(dsdt_table.header.signature, ==, ACPI_DSDT_SIGNATURE);

    /* 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) {
        sdt = &g_array_index(data->tables, AcpiSdtTable, i);
        g_assert(sdt->aml);

        if (rebuild) {
            aml_file = g_strdup_printf("%s/%s/%.4s", data_dir, data->machine,
                                       (gchar *)&sdt->header.signature);
            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, uint32_t signature)
{
   return sdt->header.signature == signature;
}

static void 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, ACPI_DSDT_SIGNATURE) ||
        compare_signature(sdt, ACPI_SSDT_SIGNATURE)) {
        for (i = 0; i < sdts->len; ++i) {
            temp = &g_array_index(sdts, AcpiSdtTable, i);
            if (compare_signature(temp, ACPI_DSDT_SIGNATURE) ||
                compare_signature(temp, ACPI_SSDT_SIGNATURE)) {
                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 */
    g_spawn_command_line_sync(command_line->str, &out, &out_err, NULL, &error);
    g_assert_no_error(error);

    ret = g_file_get_contents(sdt->asl_file, (gchar **)&sdt->asl,
                              &sdt->asl_len, &error);
    g_assert(ret);
    g_assert_no_error(error);
    g_assert(sdt->asl_len);

    g_free(out);
    g_free(out_err);
    g_string_free(command_line, true);
}

#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) {
        asl = g_string_erase(asl, 0, comment + sizeof(COMMENT_END) - 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;
    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;
        sdt = &g_array_index(data->tables, AcpiSdtTable, i);

        memset(&exp_sdt, 0, sizeof(exp_sdt));
        exp_sdt.header.signature = sdt->header.signature;

        aml_file = g_strdup_printf("%s/%s/%.4s", data_dir, data->machine,
                                   (gchar *)&exp_sdt.header.signature);
        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;

    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);

        load_asl(data->tables, sdt);
        asl = normalize_asl(sdt->asl);

        load_asl(exp_data.tables, exp_sdt);
        exp_asl = normalize_asl(exp_sdt->asl);

        if (g_strcmp0(asl->str, exp_asl->str)) {
            sdt->asl_file_retain = true;
            exp_sdt->asl_file_retain = true;
            fprintf(stderr,
                    "acpi-test: Warning! %.4s mismatch. "
                    "Orig asl: %s, expected asl %s.\n",
                    (gchar *)&exp_sdt->header.signature,
                    sdt->asl_file, exp_sdt->asl_file);
        }
        g_string_free(asl, true);
        g_string_free(exp_asl, true);
    }

    free_test_data(&exp_data);
}

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;
    const char *device = "";

    if (!g_strcmp0(data->machine, MACHINE_Q35)) {
        device = ",id=hd -device ide-hd,drive=hd";
    }

    args = g_strdup_printf("-net none -display none %s -drive file=%s%s,",
                           params ? params : "", disk, device);
    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);
        }
    }

    qtest_quit(global_qtest);
    g_free(args);
}

static void test_acpi_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);

    memset(&data, 0, sizeof(data));
    data.machine = MACHINE_Q35;
    test_acpi_one("-machine q35,accel=tcg", &data);
    free_test_data(&data);
}

int main(int argc, char *argv[])
{
    const char *arch = qtest_get_arch();
    FILE *f = fopen(disk, "w");
    int ret;
    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/tcg", test_acpi_tcg);
    }
    ret = g_test_run();
    unlink(disk);
    return ret;
}
Commit	Line	Data
ad6423a7 MT	1	/*
	2	* Boot order test cases.
	3	*
	4	* Copyright (c) 2013 Red Hat Inc.
	5	*
	6	* Authors:
	7	* Michael S. Tsirkin <mst@redhat.com>,
	8	*
	9	* This work is licensed under the terms of the GNU GPL, version 2 or later.
	10	* See the COPYING file in the top-level directory.
	11	*/
	12
	13	#include <string.h>
	14	#include <stdio.h>
	15	#include <glib.h>
4500bc98	16	#include <glib/gstdio.h>
53333801	17	#include "qemu-common.h"
ad6423a7	18	#include "libqtest.h"
53333801 MA	19	#include "qemu/compiler.h"
53333801 MA	20	#include "hw/i386/acpi-defs.h"
ad6423a7	21
9e8458c0 MA	22	#define MACHINE_PC "pc"
	23	#define MACHINE_Q35 "q35"
	24
4500bc98	25	#define ACPI_REBUILD_EXPECTED_AML "TEST_ACPI_REBUILD_AML"
69d09245	26	#define ACPI_SSDT_SIGNATURE 0x54445353 /* SSDT */
4500bc98	27
53333801	28	/* DSDT and SSDTs format */
ad6423a7	29	typedef struct {
53333801	30	AcpiTableHeader header;
9e8458c0 MA	31	gchar aml; / aml bytecode from guest */
	32	gsize aml_len;
	33	gchar *aml_file;
	34	gchar asl; / asl code generated from aml */
	35	gsize asl_len;
	36	gchar *asl_file;
0651596c	37	bool asl_file_retain; /* do not delete the temp asl */
9e8458c0	38	} QEMU_PACKED AcpiSdtTable;
53333801 MA	39
53333801 MA	40	typedef struct {
9e8458c0	41	const char *machine;
53333801 MA	42	uint32_t rsdp_addr;
	43	AcpiRsdpDescriptor rsdp_table;
	44	AcpiRsdtDescriptorRev1 rsdt_table;
	45	AcpiFadtDescriptorRev1 fadt_table;
15650602	46	AcpiFacsDescriptorRev1 facs_table;
53333801 MA	47	uint32_t *rsdt_tables_addr;
53333801 MA	48	int rsdt_tables_nr;
a3a74ab9	49	GArray *tables;
53333801	50	} test_data;
ad6423a7 MT	51
	52	#define LOW(x) ((x) & 0xff)
	53	#define HIGH(x) ((x) >> 8)
	54
	55	#define SIGNATURE 0xdead
	56	#define SIGNATURE_OFFSET 0x10
	57	#define BOOT_SECTOR_ADDRESS 0x7c00
	58
53333801 MA	59	#define ACPI_READ_FIELD(field, addr) \
	60	do { \
	61	switch (sizeof(field)) { \
	62	case 1: \
	63	field = readb(addr); \
	64	break; \
	65	case 2: \
084137dd	66	field = readw(addr); \
53333801 MA	67	break; \
53333801 MA	68	case 4: \
084137dd	69	field = readl(addr); \
53333801 MA	70	break; \
53333801 MA	71	case 8: \
084137dd	72	field = readq(addr); \
53333801 MA	73	break; \
	74	default: \
	75	g_assert(false); \
	76	} \
	77	addr += sizeof(field); \
	78	} while (0);
	79
	80	#define ACPI_READ_ARRAY_PTR(arr, length, addr) \
	81	do { \
	82	int idx; \
	83	for (idx = 0; idx < length; ++idx) { \
	84	ACPI_READ_FIELD(arr[idx], addr); \
	85	} \
	86	} while (0);
	87
	88	#define ACPI_READ_ARRAY(arr, addr) \
	89	ACPI_READ_ARRAY_PTR(arr, sizeof(arr)/sizeof(arr[0]), addr)
	90
	91	#define ACPI_READ_TABLE_HEADER(table, addr) \
	92	do { \
	93	ACPI_READ_FIELD((table)->signature, addr); \
	94	ACPI_READ_FIELD((table)->length, addr); \
	95	ACPI_READ_FIELD((table)->revision, addr); \
	96	ACPI_READ_FIELD((table)->checksum, addr); \
	97	ACPI_READ_ARRAY((table)->oem_id, addr); \
	98	ACPI_READ_ARRAY((table)->oem_table_id, addr); \
	99	ACPI_READ_FIELD((table)->oem_revision, addr); \
	100	ACPI_READ_ARRAY((table)->asl_compiler_id, addr); \
	101	ACPI_READ_FIELD((table)->asl_compiler_revision, addr); \
	102	} while (0);
	103
ad6423a7 MT	104	/* Boot sector code: write SIGNATURE into memory,
ad6423a7 MT	105	* then halt.
9e8458c0 MA	106	* Q35 machine requires a minimum 0x7e000 bytes disk.
9e8458c0 MA	107	* (bug or feature?)
ad6423a7	108	*/
9e8458c0	109	static uint8_t boot_sector[0x7e000] = {
ad6423a7 MT	110	/* 7c00: mov $0xdead,%ax */
	111	[0x00] = 0xb8,
	112	[0x01] = LOW(SIGNATURE),
	113	[0x02] = HIGH(SIGNATURE),
	114	/* 7c03: mov %ax,0x7c10 */
	115	[0x03] = 0xa3,
	116	[0x04] = LOW(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET),
	117	[0x05] = HIGH(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET),
	118	/* 7c06: cli */
	119	[0x06] = 0xfa,
	120	/* 7c07: hlt */
	121	[0x07] = 0xf4,
	122	/* 7c08: jmp 0x7c07=0x7c0a-3 */
	123	[0x08] = 0xeb,
	124	[0x09] = LOW(-3),
	125	/* We mov 0xdead here: set value to make debugging easier */
	126	[SIGNATURE_OFFSET] = LOW(0xface),
	127	[SIGNATURE_OFFSET + 1] = HIGH(0xface),
	128	/* End of boot sector marker */
	129	[0x1FE] = 0x55,
	130	[0x1FF] = 0xAA,
	131	};
	132
	133	static const char *disk = "tests/acpi-test-disk.raw";
9e8458c0	134	static const char *data_dir = "tests/acpi-test-data";
cc8fa0e8 MA	135	#ifdef CONFIG_IASL
	136	static const char *iasl = stringify(CONFIG_IASL);
	137	#else
	138	static const char *iasl;
	139	#endif
ad6423a7	140
8ac2adf7 MA	141	static void free_test_data(test_data *data)
8ac2adf7 MA	142	{
9e8458c0	143	AcpiSdtTable *temp;
8ac2adf7 MA	144	int i;
8ac2adf7 MA	145
9e8458c0 MA	146	if (data->rsdt_tables_addr) {
	147	g_free(data->rsdt_tables_addr);
	148	}
	149
a3a74ab9 MA	150	for (i = 0; i < data->tables->len; ++i) {
a3a74ab9 MA	151	temp = &g_array_index(data->tables, AcpiSdtTable, i);
9e8458c0 MA	152	if (temp->aml) {
	153	g_free(temp->aml);
	154	}
	155	if (temp->aml_file) {
	156	if (g_strstr_len(temp->aml_file, -1, "aml-")) {
	157	unlink(temp->aml_file);
	158	}
	159	g_free(temp->aml_file);
	160	}
	161	if (temp->asl) {
	162	g_free(temp->asl);
	163	}
	164	if (temp->asl_file) {
0651596c	165	if (!temp->asl_file_retain) {
9e8458c0 MA	166	unlink(temp->asl_file);
	167	}
	168	g_free(temp->asl_file);
	169	}
8ac2adf7	170	}
9e8458c0	171
a3a74ab9	172	g_array_free(data->tables, false);
8ac2adf7 MA	173	}
8ac2adf7 MA	174
53333801 MA	175	static uint8_t acpi_checksum(const uint8_t *data, int len)
	176	{
	177	int i;
	178	uint8_t sum = 0;
	179
	180	for (i = 0; i < len; i++) {
	181	sum += data[i];
	182	}
	183
	184	return sum;
	185	}
	186
	187	static void test_acpi_rsdp_address(test_data *data)
	188	{
	189	uint32_t off;
	190
	191	/* OK, now find RSDP */
	192	for (off = 0xf0000; off < 0x100000; off += 0x10) {
	193	uint8_t sig[] = "RSD PTR ";
	194	int i;
	195
	196	for (i = 0; i < sizeof sig - 1; ++i) {
	197	sig[i] = readb(off + i);
	198	}
	199
	200	if (!memcmp(sig, "RSD PTR ", sizeof sig)) {
	201	break;
	202	}
	203	}
	204
	205	g_assert_cmphex(off, <, 0x100000);
	206	data->rsdp_addr = off;
	207	}
	208
	209	static void test_acpi_rsdp_table(test_data *data)
	210	{
	211	AcpiRsdpDescriptor *rsdp_table = &data->rsdp_table;
	212	uint32_t addr = data->rsdp_addr;
	213
	214	ACPI_READ_FIELD(rsdp_table->signature, addr);
	215	g_assert_cmphex(rsdp_table->signature, ==, ACPI_RSDP_SIGNATURE);
	216
	217	ACPI_READ_FIELD(rsdp_table->checksum, addr);
	218	ACPI_READ_ARRAY(rsdp_table->oem_id, addr);
	219	ACPI_READ_FIELD(rsdp_table->revision, addr);
	220	ACPI_READ_FIELD(rsdp_table->rsdt_physical_address, addr);
	221	ACPI_READ_FIELD(rsdp_table->length, addr);
	222
	223	/* rsdp checksum is not for the whole table, but for the first 20 bytes */
	224	g_assert(!acpi_checksum((uint8_t *)rsdp_table, 20));
	225	}
	226
	227	static void test_acpi_rsdt_table(test_data *data)
	228	{
	229	AcpiRsdtDescriptorRev1 *rsdt_table = &data->rsdt_table;
	230	uint32_t addr = data->rsdp_table.rsdt_physical_address;
	231	uint32_t *tables;
	232	int tables_nr;
	233	uint8_t checksum;
	234
	235	/* read the header */
	236	ACPI_READ_TABLE_HEADER(rsdt_table, addr);
	237	g_assert_cmphex(rsdt_table->signature, ==, ACPI_RSDT_SIGNATURE);
	238
239	/* compute the table entries in rsdt */
240	tables_nr = (rsdt_table->length - sizeof(AcpiRsdtDescriptorRev1)) /
241	sizeof(uint32_t);
242	g_assert_cmpint(tables_nr, >, 0);
243
244	/* get the addresses of the tables pointed by rsdt */
245	tables = g_new0(uint32_t, tables_nr);
246	ACPI_READ_ARRAY_PTR(tables, tables_nr, addr);
247
248	checksum = acpi_checksum((uint8_t *)rsdt_table, rsdt_table->length) +
249	acpi_checksum((uint8_t )tables, tables_nr sizeof(uint32_t));
250	g_assert(!checksum);
251
252	/* SSDT tables after FADT */
253	data->rsdt_tables_addr = tables;
254	data->rsdt_tables_nr = tables_nr;
255	}
256
257	static void test_acpi_fadt_table(test_data *data)
258	{
259	AcpiFadtDescriptorRev1 *fadt_table = &data->fadt_table;
260	uint32_t addr;
261
262	/* FADT table comes first */
263	addr = data->rsdt_tables_addr[0];
264	ACPI_READ_TABLE_HEADER(fadt_table, addr);
265
266	ACPI_READ_FIELD(fadt_table->firmware_ctrl, addr);
267	ACPI_READ_FIELD(fadt_table->dsdt, addr);
268	ACPI_READ_FIELD(fadt_table->model, addr);
269	ACPI_READ_FIELD(fadt_table->reserved1, addr);
270	ACPI_READ_FIELD(fadt_table->sci_int, addr);
271	ACPI_READ_FIELD(fadt_table->smi_cmd, addr);
272	ACPI_READ_FIELD(fadt_table->acpi_enable, addr);
273	ACPI_READ_FIELD(fadt_table->acpi_disable, addr);
274	ACPI_READ_FIELD(fadt_table->S4bios_req, addr);
275	ACPI_READ_FIELD(fadt_table->reserved2, addr);
276	ACPI_READ_FIELD(fadt_table->pm1a_evt_blk, addr);
277	ACPI_READ_FIELD(fadt_table->pm1b_evt_blk, addr);
278	ACPI_READ_FIELD(fadt_table->pm1a_cnt_blk, addr);
279	ACPI_READ_FIELD(fadt_table->pm1b_cnt_blk, addr);
280	ACPI_READ_FIELD(fadt_table->pm2_cnt_blk, addr);
281	ACPI_READ_FIELD(fadt_table->pm_tmr_blk, addr);
282	ACPI_READ_FIELD(fadt_table->gpe0_blk, addr);
283	ACPI_READ_FIELD(fadt_table->gpe1_blk, addr);
284	ACPI_READ_FIELD(fadt_table->pm1_evt_len, addr);
285	ACPI_READ_FIELD(fadt_table->pm1_cnt_len, addr);
286	ACPI_READ_FIELD(fadt_table->pm2_cnt_len, addr);
287	ACPI_READ_FIELD(fadt_table->pm_tmr_len, addr);
288	ACPI_READ_FIELD(fadt_table->gpe0_blk_len, addr);
289	ACPI_READ_FIELD(fadt_table->gpe1_blk_len, addr);
290	ACPI_READ_FIELD(fadt_table->gpe1_base, addr);
291	ACPI_READ_FIELD(fadt_table->reserved3, addr);
292	ACPI_READ_FIELD(fadt_table->plvl2_lat, addr);
293	ACPI_READ_FIELD(fadt_table->plvl3_lat, addr);
294	ACPI_READ_FIELD(fadt_table->flush_size, addr);
295	ACPI_READ_FIELD(fadt_table->flush_stride, addr);
296	ACPI_READ_FIELD(fadt_table->duty_offset, addr);
297	ACPI_READ_FIELD(fadt_table->duty_width, addr);
298	ACPI_READ_FIELD(fadt_table->day_alrm, addr);
299	ACPI_READ_FIELD(fadt_table->mon_alrm, addr);
300	ACPI_READ_FIELD(fadt_table->century, addr);
301	ACPI_READ_FIELD(fadt_table->reserved4, addr);
302	ACPI_READ_FIELD(fadt_table->reserved4a, addr);
303	ACPI_READ_FIELD(fadt_table->reserved4b, addr);
304	ACPI_READ_FIELD(fadt_table->flags, addr);
305
306	g_assert_cmphex(fadt_table->signature, ==, ACPI_FACP_SIGNATURE);
307	g_assert(!acpi_checksum((uint8_t *)fadt_table, fadt_table->length));
308	}
309
15650602 MA	310	static void test_acpi_facs_table(test_data *data)
	311	{
	312	AcpiFacsDescriptorRev1 *facs_table = &data->facs_table;
	313	uint32_t addr = data->fadt_table.firmware_ctrl;
	314
	315	ACPI_READ_FIELD(facs_table->signature, addr);
	316	ACPI_READ_FIELD(facs_table->length, addr);
	317	ACPI_READ_FIELD(facs_table->hardware_signature, addr);
	318	ACPI_READ_FIELD(facs_table->firmware_waking_vector, addr);
	319	ACPI_READ_FIELD(facs_table->global_lock, addr);
	320	ACPI_READ_FIELD(facs_table->flags, addr);
	321	ACPI_READ_ARRAY(facs_table->resverved3, addr);
	322
	323	g_assert_cmphex(facs_table->signature, ==, ACPI_FACS_SIGNATURE);
	324	}
	325
53333801 MA	326	static void test_dst_table(AcpiSdtTable *sdt_table, uint32_t addr)
	327	{
	328	uint8_t checksum;
	329
	330	ACPI_READ_TABLE_HEADER(&sdt_table->header, addr);
	331
	332	sdt_table->aml_len = sdt_table->header.length - sizeof(AcpiTableHeader);
	333	sdt_table->aml = g_malloc0(sdt_table->aml_len);
	334	ACPI_READ_ARRAY_PTR(sdt_table->aml, sdt_table->aml_len, addr);
	335
	336	checksum = acpi_checksum((uint8_t *)sdt_table, sizeof(AcpiTableHeader)) +
9e8458c0	337	acpi_checksum((uint8_t *)sdt_table->aml, sdt_table->aml_len);
53333801 MA	338	g_assert(!checksum);
	339	}
	340
	341	static void test_acpi_dsdt_table(test_data *data)
	342	{
9e8458c0	343	AcpiSdtTable dsdt_table;
53333801 MA	344	uint32_t addr = data->fadt_table.dsdt;
53333801 MA	345
9e8458c0	346	memset(&dsdt_table, 0, sizeof(dsdt_table));
a3a74ab9	347	data->tables = g_array_new(false, true, sizeof(AcpiSdtTable));
9e8458c0 MA	348
	349	test_dst_table(&dsdt_table, addr);
	350	g_assert_cmphex(dsdt_table.header.signature, ==, ACPI_DSDT_SIGNATURE);
	351
	352	/* Place DSDT first */
a3a74ab9	353	g_array_append_val(data->tables, dsdt_table);
53333801 MA	354	}
53333801 MA	355
a3a74ab9	356	static void test_acpi_tables(test_data *data)
53333801	357	{
a3a74ab9	358	int tables_nr = data->rsdt_tables_nr - 1; /* fadt is first */
53333801 MA	359	int i;
53333801 MA	360
a3a74ab9	361	for (i = 0; i < tables_nr; i++) {
8ac2adf7	362	AcpiSdtTable ssdt_table;
9e8458c0 MA	363
9e8458c0 MA	364	memset(&ssdt_table, 0 , sizeof(ssdt_table));
53333801	365	uint32_t addr = data->rsdt_tables_addr[i + 1]; /* fadt is first */
8ac2adf7	366	test_dst_table(&ssdt_table, addr);
a3a74ab9	367	g_array_append_val(data->tables, ssdt_table);
53333801	368	}
9e8458c0 MA	369	}
9e8458c0 MA	370
4500bc98	371	static void dump_aml_files(test_data *data, bool rebuild)
9e8458c0 MA	372	{
	373	AcpiSdtTable *sdt;
	374	GError *error = NULL;
4500bc98	375	gchar *aml_file = NULL;
9e8458c0 MA	376	gint fd;
	377	ssize_t ret;
	378	int i;
	379
a3a74ab9 MA	380	for (i = 0; i < data->tables->len; ++i) {
a3a74ab9 MA	381	sdt = &g_array_index(data->tables, AcpiSdtTable, i);
9e8458c0 MA	382	g_assert(sdt->aml);
9e8458c0 MA	383
4500bc98 MA	384	if (rebuild) {
	385	aml_file = g_strdup_printf("%s/%s/%.4s", data_dir, data->machine,
	386	(gchar *)&sdt->header.signature);
	387	fd = g_open(aml_file, O_WRONLY\|O_TRUNC\|O_CREAT,
	388	S_IRUSR\|S_IWUSR\|S_IRGRP\|S_IWGRP\|S_IROTH);
	389	} else {
	390	fd = g_file_open_tmp("aml-XXXXXX", &sdt->aml_file, &error);
	391	g_assert_no_error(error);
	392	}
	393	g_assert(fd >= 0);
9e8458c0 MA	394
	395	ret = qemu_write_full(fd, sdt, sizeof(AcpiTableHeader));
	396	g_assert(ret == sizeof(AcpiTableHeader));
	397	ret = qemu_write_full(fd, sdt->aml, sdt->aml_len);
	398	g_assert(ret == sdt->aml_len);
	399
	400	close(fd);
4500bc98 MA	401
	402	if (aml_file) {
	403	g_free(aml_file);
	404	}
9e8458c0 MA	405	}
	406	}
	407
69d09245 MA	408	static bool compare_signature(AcpiSdtTable *sdt, uint32_t signature)
	409	{
	410	return sdt->header.signature == signature;
	411	}
	412
9e8458c0 MA	413	static void load_asl(GArray sdts, AcpiSdtTable sdt)
	414	{
	415	AcpiSdtTable *temp;
	416	GError *error = NULL;
cc8fa0e8	417	GString *command_line = g_string_new(iasl);
9e8458c0 MA	418	gint fd;
	419	gchar out, out_err;
	420	gboolean ret;
	421	int i;
	422
	423	fd = g_file_open_tmp("asl-XXXXXX.dsl", &sdt->asl_file, &error);
	424	g_assert_no_error(error);
	425	close(fd);
	426
	427	/* build command line */
cc8fa0e8	428	g_string_append_printf(command_line, " -p %s ", sdt->asl_file);
69d09245 MA	429	if (compare_signature(sdt, ACPI_DSDT_SIGNATURE) \|\|
	430	compare_signature(sdt, ACPI_SSDT_SIGNATURE)) {
	431	for (i = 0; i < sdts->len; ++i) {
	432	temp = &g_array_index(sdts, AcpiSdtTable, i);
	433	if (compare_signature(temp, ACPI_DSDT_SIGNATURE) \|\|
	434	compare_signature(temp, ACPI_SSDT_SIGNATURE)) {
	435	g_string_append_printf(command_line, "-e %s ", temp->aml_file);
	436	}
	437	}
9e8458c0 MA	438	}
	439	g_string_append_printf(command_line, "-d %s", sdt->aml_file);
	440
	441	/* pass 'out' and 'out_err' in order to be redirected */
	442	g_spawn_command_line_sync(command_line->str, &out, &out_err, NULL, &error);
	443	g_assert_no_error(error);
	444
	445	ret = g_file_get_contents(sdt->asl_file, (gchar **)&sdt->asl,
	446	&sdt->asl_len, &error);
	447	g_assert(ret);
	448	g_assert_no_error(error);
	449	g_assert(sdt->asl_len);
	450
	451	g_free(out);
	452	g_free(out_err);
	453	g_string_free(command_line, true);
	454	}
	455
	456	#define COMMENT_END "*/"
	457	#define DEF_BLOCK "DefinitionBlock ("
	458	#define BLOCK_NAME_END ".aml"
	459
	460	static GString normalize_asl(gchar asl_code)
	461	{
	462	GString *asl = g_string_new(asl_code);
	463	gchar comment, block_name;
	464
	465	/* strip comments (different generation days) */
	466	comment = g_strstr_len(asl->str, asl->len, COMMENT_END);
	467	if (comment) {
	468	asl = g_string_erase(asl, 0, comment + sizeof(COMMENT_END) - asl->str);
	469	}
	470
	471	/* strip def block name (it has file path in it) */
	472	if (g_str_has_prefix(asl->str, DEF_BLOCK)) {
	473	block_name = g_strstr_len(asl->str, asl->len, BLOCK_NAME_END);
	474	g_assert(block_name);
	475	asl = g_string_erase(asl, 0,
	476	block_name + sizeof(BLOCK_NAME_END) - asl->str);
	477	}
	478
	479	return asl;
	480	}
	481
	482	static GArray load_expected_aml(test_data data)
	483	{
	484	int i;
	485	AcpiSdtTable *sdt;
	486	gchar *aml_file;
	487	GError *error = NULL;
	488	gboolean ret;
	489
a3a74ab9 MA	490	GArray *exp_tables = g_array_new(false, true, sizeof(AcpiSdtTable));
a3a74ab9 MA	491	for (i = 0; i < data->tables->len; ++i) {
9e8458c0	492	AcpiSdtTable exp_sdt;
a3a74ab9	493	sdt = &g_array_index(data->tables, AcpiSdtTable, i);
9e8458c0 MA	494
	495	memset(&exp_sdt, 0, sizeof(exp_sdt));
	496	exp_sdt.header.signature = sdt->header.signature;
	497
	498	aml_file = g_strdup_printf("%s/%s/%.4s", data_dir, data->machine,
	499	(gchar *)&exp_sdt.header.signature);
	500	exp_sdt.aml_file = aml_file;
	501	g_assert(g_file_test(aml_file, G_FILE_TEST_EXISTS));
	502	ret = g_file_get_contents(aml_file, &exp_sdt.aml,
	503	&exp_sdt.aml_len, &error);
	504	g_assert(ret);
	505	g_assert_no_error(error);
	506	g_assert(exp_sdt.aml);
	507	g_assert(exp_sdt.aml_len);
	508
a3a74ab9	509	g_array_append_val(exp_tables, exp_sdt);
9e8458c0 MA	510	}
9e8458c0 MA	511
a3a74ab9	512	return exp_tables;
9e8458c0 MA	513	}
	514
	515	static void test_acpi_asl(test_data *data)
	516	{
	517	int i;
	518	AcpiSdtTable sdt, exp_sdt;
	519	test_data exp_data;
	520
	521	memset(&exp_data, 0, sizeof(exp_data));
a3a74ab9	522	exp_data.tables = load_expected_aml(data);
4500bc98	523	dump_aml_files(data, false);
a3a74ab9	524	for (i = 0; i < data->tables->len; ++i) {
9e8458c0 MA	525	GString asl, exp_asl;
9e8458c0 MA	526
a3a74ab9 MA	527	sdt = &g_array_index(data->tables, AcpiSdtTable, i);
a3a74ab9 MA	528	exp_sdt = &g_array_index(exp_data.tables, AcpiSdtTable, i);
9e8458c0	529
a3a74ab9	530	load_asl(data->tables, sdt);
9e8458c0 MA	531	asl = normalize_asl(sdt->asl);
9e8458c0 MA	532
a3a74ab9	533	load_asl(exp_data.tables, exp_sdt);
9e8458c0 MA	534	exp_asl = normalize_asl(exp_sdt->asl);
9e8458c0 MA	535
0651596c MA	536	if (g_strcmp0(asl->str, exp_asl->str)) {
	537	sdt->asl_file_retain = true;
	538	exp_sdt->asl_file_retain = true;
	539	fprintf(stderr,
	540	"acpi-test: Warning! %.4s mismatch. "
	541	"Orig asl: %s, expected asl %s.\n",
	542	(gchar *)&exp_sdt->header.signature,
	543	sdt->asl_file, exp_sdt->asl_file);
	544	}
9e8458c0 MA	545	g_string_free(asl, true);
	546	g_string_free(exp_asl, true);
	547	}
	548
	549	free_test_data(&exp_data);
53333801 MA	550	}
53333801 MA	551
8ac2adf7	552	static void test_acpi_one(const char params, test_data data)
ad6423a7 MT	553	{
	554	char *args;
	555	uint8_t signature_low;
	556	uint8_t signature_high;
	557	uint16_t signature;
	558	int i;
9e8458c0	559	const char *device = "";
ad6423a7	560
9e8458c0 MA	561	if (!g_strcmp0(data->machine, MACHINE_Q35)) {
	562	device = ",id=hd -device ide-hd,drive=hd";
	563	}
	564
	565	args = g_strdup_printf("-net none -display none %s -drive file=%s%s,",
	566	params ? params : "", disk, device);
ad6423a7 MT	567	qtest_start(args);
	568
	569	/* Wait at most 1 minute */
	570	#define TEST_DELAY (1 * G_USEC_PER_SEC / 10)
	571	#define TEST_CYCLES MAX((60 * G_USEC_PER_SEC / TEST_DELAY), 1)
	572
	573	/* Poll until code has run and modified memory. Once it has we know BIOS
	574	* initialization is done. TODO: check that IP reached the halt
	575	* instruction.
	576	*/
	577	for (i = 0; i < TEST_CYCLES; ++i) {
	578	signature_low = readb(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET);
	579	signature_high = readb(BOOT_SECTOR_ADDRESS + SIGNATURE_OFFSET + 1);
	580	signature = (signature_high << 8) \| signature_low;
	581	if (signature == SIGNATURE) {
	582	break;
	583	}
	584	g_usleep(TEST_DELAY);
	585	}
	586	g_assert_cmphex(signature, ==, SIGNATURE);
	587
8ac2adf7 MA	588	test_acpi_rsdp_address(data);
	589	test_acpi_rsdp_table(data);
	590	test_acpi_rsdt_table(data);
	591	test_acpi_fadt_table(data);
15650602	592	test_acpi_facs_table(data);
8ac2adf7	593	test_acpi_dsdt_table(data);
a3a74ab9	594	test_acpi_tables(data);
ad6423a7	595
cc8fa0e8	596	if (iasl) {
4500bc98 MA	597	if (getenv(ACPI_REBUILD_EXPECTED_AML)) {
	598	dump_aml_files(data, true);
	599	} else {
	600	test_acpi_asl(data);
	601	}
9e8458c0 MA	602	}
9e8458c0 MA	603
ad6423a7 MT	604	qtest_quit(global_qtest);
	605	g_free(args);
	606	}
	607
	608	static void test_acpi_tcg(void)
	609	{
8ac2adf7 MA	610	test_data data;
8ac2adf7 MA	611
ad6423a7 MT	612	/* Supplying -machine accel argument overrides the default (qtest).
	613	* This is to make guest actually run.
	614	*/
9e8458c0 MA	615	memset(&data, 0, sizeof(data));
9e8458c0 MA	616	data.machine = MACHINE_PC;
8ac2adf7	617	test_acpi_one("-machine accel=tcg", &data);
9e8458c0	618	free_test_data(&data);
8ac2adf7	619
9e8458c0 MA	620	memset(&data, 0, sizeof(data));
	621	data.machine = MACHINE_Q35;
	622	test_acpi_one("-machine q35,accel=tcg", &data);
8ac2adf7	623	free_test_data(&data);
ad6423a7 MT	624	}
	625
	626	int main(int argc, char *argv[])
	627	{
	628	const char *arch = qtest_get_arch();
	629	FILE *f = fopen(disk, "w");
5862ad0f	630	int ret;
ad6423a7 MT	631	fwrite(boot_sector, 1, sizeof boot_sector, f);
	632	fclose(f);
	633
	634	g_test_init(&argc, &argv, NULL);
	635
	636	if (strcmp(arch, "i386") == 0 \|\| strcmp(arch, "x86_64") == 0) {
	637	qtest_add_func("acpi/tcg", test_acpi_tcg);
	638	}
5862ad0f FZ	639	ret = g_test_run();
	640	unlink(disk);
	641	return ret;
ad6423a7	642	}