LXR qemu/tests/qtest/tpm-crb-test.c

   1/*
   2 * QTest testcase for TPM CRB
   3 *
   4 * Copyright (c) 2018 Red Hat, Inc.
   5 *
   6 * Authors:
   7 *   Marc-André Lureau <marcandre.lureau@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 "qemu/osdep.h"
  14#include <glib/gstdio.h>
  15
  16#include "hw/acpi/tpm.h"
  17#include "io/channel-socket.h"
  18#include "libqtest-single.h"
  19#include "qemu/module.h"
  20#include "tpm-emu.h"
  21
  22/* Not used but needed for linking */
  23uint64_t tpm_tis_base_addr = TPM_TIS_ADDR_BASE;
  24
  25#define TPM_CMD "\x80\x01\x00\x00\x00\x0c\x00\x00\x01\x44\x00\x00"
  26
  27static void tpm_crb_test(const void *data)
  28{
  29    const TPMTestState *s = data;
  30    uint32_t intfid = readl(TPM_CRB_ADDR_BASE + A_CRB_INTF_ID);
  31    uint32_t csize = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_CMD_SIZE);
  32    uint64_t caddr = readq(TPM_CRB_ADDR_BASE + A_CRB_CTRL_CMD_LADDR);
  33    uint32_t rsize = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_RSP_SIZE);
  34    uint64_t raddr = readq(TPM_CRB_ADDR_BASE + A_CRB_CTRL_RSP_ADDR);
  35    uint8_t locstate = readb(TPM_CRB_ADDR_BASE + A_CRB_LOC_STATE);
  36    uint32_t locctrl = readl(TPM_CRB_ADDR_BASE + A_CRB_LOC_CTRL);
  37    uint32_t locsts = readl(TPM_CRB_ADDR_BASE + A_CRB_LOC_STS);
  38    uint32_t sts = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_STS);
  39
  40    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, InterfaceType), ==, 1);
  41    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, InterfaceVersion), ==, 1);
  42    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, CapLocality), ==, 0);
  43    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, CapCRBIdleBypass), ==, 0);
  44    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, CapDataXferSizeSupport),
  45                    ==, 3);
  46    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, CapFIFO), ==, 0);
  47    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, CapCRB), ==, 1);
  48    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, InterfaceSelector), ==, 1);
  49    g_assert_cmpint(FIELD_EX32(intfid, CRB_INTF_ID, RID), ==, 0);
  50
  51    g_assert_cmpint(csize, >=, 128);
  52    g_assert_cmpint(rsize, >=, 128);
  53    g_assert_cmpint(caddr, >, TPM_CRB_ADDR_BASE);
  54    g_assert_cmpint(raddr, >, TPM_CRB_ADDR_BASE);
  55
  56    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmEstablished), ==, 1);
  57    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, locAssigned), ==, 0);
  58    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, activeLocality), ==, 0);
  59    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, reserved), ==, 0);
  60    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmRegValidSts), ==, 1);
  61
  62    g_assert_cmpint(locctrl, ==, 0);
  63
  64    g_assert_cmpint(FIELD_EX32(locsts, CRB_LOC_STS, Granted), ==, 0);
  65    g_assert_cmpint(FIELD_EX32(locsts, CRB_LOC_STS, beenSeized), ==, 0);
  66
  67    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmIdle), ==, 1);
  68    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmSts), ==, 0);
  69
  70    /* request access to locality 0 */
  71    writeb(TPM_CRB_ADDR_BASE + A_CRB_LOC_CTRL, 1);
  72
  73    /* granted bit must be set now */
  74    locsts = readl(TPM_CRB_ADDR_BASE + A_CRB_LOC_STS);
  75    g_assert_cmpint(FIELD_EX32(locsts, CRB_LOC_STS, Granted), ==, 1);
  76    g_assert_cmpint(FIELD_EX32(locsts, CRB_LOC_STS, beenSeized), ==, 0);
  77
  78    /* we must have an assigned locality */
  79    locstate = readb(TPM_CRB_ADDR_BASE + A_CRB_LOC_STATE);
  80    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmEstablished), ==, 1);
  81    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, locAssigned), ==, 1);
  82    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, activeLocality), ==, 0);
  83    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, reserved), ==, 0);
  84    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmRegValidSts), ==, 1);
  85
  86    /* set into ready state */
  87    writel(TPM_CRB_ADDR_BASE + A_CRB_CTRL_REQ, 1);
  88
  89    /* TPM must not be in the idle state */
  90    sts = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_STS);
  91    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmIdle), ==, 0);
  92    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmSts), ==, 0);
  93
  94    memwrite(caddr, TPM_CMD, sizeof(TPM_CMD));
  95
  96    uint32_t start = 1;
  97    uint64_t end_time = g_get_monotonic_time() + 5 * G_TIME_SPAN_SECOND;
  98    writel(TPM_CRB_ADDR_BASE + A_CRB_CTRL_START, start);
  99    do {
 100        start = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_START);
 101        if ((start & 1) == 0) {
 102            break;
 103        }
 104    } while (g_get_monotonic_time() < end_time);
 105    start = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_START);
 106    g_assert_cmpint(start & 1, ==, 0);
 107
 108    /* TPM must still not be in the idle state */
 109    sts = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_STS);
 110    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmIdle), ==, 0);
 111    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmSts), ==, 0);
 112
 113    struct tpm_hdr tpm_msg;
 114    memread(raddr, &tpm_msg, sizeof(tpm_msg));
 115    g_assert_cmpmem(&tpm_msg, sizeof(tpm_msg), s->tpm_msg, sizeof(*s->tpm_msg));
 116
 117    /* set TPM into idle state */
 118    writel(TPM_CRB_ADDR_BASE + A_CRB_CTRL_REQ, 2);
 119
 120    /* idle state must be indicated now */
 121    sts = readl(TPM_CRB_ADDR_BASE + A_CRB_CTRL_STS);
 122    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmIdle), ==, 1);
 123    g_assert_cmpint(FIELD_EX32(sts, CRB_CTRL_STS, tpmSts), ==, 0);
 124
 125    /* relinquish locality */
 126    writel(TPM_CRB_ADDR_BASE + A_CRB_LOC_CTRL, 2);
 127
 128    /* Granted flag must be cleared */
 129    sts = readl(TPM_CRB_ADDR_BASE + A_CRB_LOC_STS);
 130    g_assert_cmpint(FIELD_EX32(sts, CRB_LOC_STS, Granted), ==, 0);
 131    g_assert_cmpint(FIELD_EX32(sts, CRB_LOC_STS, beenSeized), ==, 0);
 132
 133    /* no locality may be assigned */
 134    locstate = readb(TPM_CRB_ADDR_BASE + A_CRB_LOC_STATE);
 135    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmEstablished), ==, 1);
 136    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, locAssigned), ==, 0);
 137    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, activeLocality), ==, 0);
 138    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, reserved), ==, 0);
 139    g_assert_cmpint(FIELD_EX32(locstate, CRB_LOC_STATE, tpmRegValidSts), ==, 1);
 140
 141}
 142
 143int main(int argc, char **argv)
 144{
 145    int ret;
 146    char *args, *tmp_path = g_dir_make_tmp("qemu-tpm-crb-test.XXXXXX", NULL);
 147    GThread *thread;
 148    TPMTestState test;
 149
 150    module_call_init(MODULE_INIT_QOM);
 151    g_test_init(&argc, &argv, NULL);
 152
 153    test.addr = g_new0(SocketAddress, 1);
 154    test.addr->type = SOCKET_ADDRESS_TYPE_UNIX;
 155    test.addr->u.q_unix.path = g_build_filename(tmp_path, "sock", NULL);
 156    g_mutex_init(&test.data_mutex);
 157    g_cond_init(&test.data_cond);
 158    test.data_cond_signal = false;
 159    test.tpm_version = TPM_VERSION_2_0;
 160
 161    thread = g_thread_new(NULL, tpm_emu_ctrl_thread, &test);
 162    tpm_emu_test_wait_cond(&test);
 163
 164    args = g_strdup_printf(
 165        "-chardev socket,id=chr,path=%s "
 166        "-tpmdev emulator,id=dev,chardev=chr "
 167        "-device tpm-crb,tpmdev=dev",
 168        test.addr->u.q_unix.path);
 169    qtest_start(args);
 170
 171    qtest_add_data_func("/tpm-crb/test", &test, tpm_crb_test);
 172    ret = g_test_run();
 173
 174    qtest_end();
 175
 176    g_thread_join(thread);
 177    g_unlink(test.addr->u.q_unix.path);
 178    qapi_free_SocketAddress(test.addr);
 179    g_rmdir(tmp_path);
 180    g_free(tmp_path);
 181    g_free(args);
 182    return ret;
 183}
 184