tpm.c

   1 /*
   2  * TPM configuration
   3  *
   4  * Copyright (C) 2011-2013 IBM Corporation
   5  *
   6  * Authors:
   7  *  Stefan Berger    <stefanb@us.ibm.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  * Based on net.c
  13  */
  14 #include "qemu/osdep.h"
  15
  16 #include "qapi/qmp/qerror.h"
  17 #include "sysemu/tpm_backend.h"
  18 #include "sysemu/tpm.h"
  19 #include "qemu/config-file.h"
  20 #include "qemu/error-report.h"
  21 #include "qmp-commands.h"
  22
  23 static QLIST_HEAD(, TPMBackend) tpm_backends =
  24     QLIST_HEAD_INITIALIZER(tpm_backends);
  25
  26 static bool tpm_models[TPM_MODEL__MAX];
  27
  28 void tpm_register_model(enum TpmModel model)
  29 {
  30     tpm_models[model] = true;
  31 }
  32
  33 #ifdef CONFIG_TPM
  34
  35 static const TPMBackendClass *
  36 tpm_be_find_by_type(enum TpmType type)
  37 {
  38     ObjectClass *oc;
  39     char *typename = g_strdup_printf("tpm-%s", TpmType_str(type));
  40
  41     oc = object_class_by_name(typename);
  42     g_free(typename);
  43
  44     if (!object_class_dynamic_cast(oc, TYPE_TPM_BACKEND)) {
  45         return NULL;
  46     }
  47
  48     return TPM_BACKEND_CLASS(oc);
  49 }
  50
  51 /*
  52  * Walk the list of available TPM backend drivers and display them on the
  53  * screen.
  54  */
  55 static void tpm_display_backend_drivers(void)
  56 {
  57     int i;
  58
  59     fprintf(stderr, "Supported TPM types (choose only one):\n");
  60
  61     for (i = 0; i < TPM_TYPE__MAX; i++) {
  62         const TPMBackendClass *bc = tpm_be_find_by_type(i);
  63         if (!bc) {
  64             continue;
  65         }
  66         fprintf(stderr, "%12s   %s\n", TpmType_str(i), bc->desc);
  67     }
  68     fprintf(stderr, "\n");
  69 }
  70
  71 /*
  72  * Find the TPM with the given Id
  73  */
  74 TPMBackend *qemu_find_tpm(const char *id)
  75 {
  76     TPMBackend *drv;
  77
  78     if (id) {
  79         QLIST_FOREACH(drv, &tpm_backends, list) {
  80             if (!strcmp(drv->id, id)) {
  81                 return drv;
  82             }
  83         }
  84     }
  85
  86     return NULL;
  87 }
  88
  89 static int configure_tpm(QemuOpts *opts)
  90 {
  91     const char *value;
  92     const char *id;
  93     const TPMBackendClass *be;
  94     TPMBackend *drv;
  95     Error *local_err = NULL;
  96     int i;
  97
  98     if (!QLIST_EMPTY(&tpm_backends)) {
  99         error_report("Only one TPM is allowed.");
 100         return 1;
 101     }
 102
 103     id = qemu_opts_id(opts);
 104     if (id == NULL) {
 105         error_report(QERR_MISSING_PARAMETER, "id");
 106         return 1;
 107     }
 108
 109     value = qemu_opt_get(opts, "type");
 110     if (!value) {
 111         error_report(QERR_MISSING_PARAMETER, "type");
 112         tpm_display_backend_drivers();
 113         return 1;
 114     }
 115
 116     i = qapi_enum_parse(&TpmType_lookup, value, -1, NULL);
 117     be = i >= 0 ? tpm_be_find_by_type(i) : NULL;
 118     if (be == NULL) {
 119         error_report(QERR_INVALID_PARAMETER_VALUE,
 120                      "type", "a TPM backend type");
 121         tpm_display_backend_drivers();
 122         return 1;
 123     }
 124
 125     /* validate backend specific opts */
 126     qemu_opts_validate(opts, be->opts, &local_err);
 127     if (local_err) {
 128         error_report_err(local_err);
 129         return 1;
 130     }
 131
 132     drv = be->create(opts, id);
 133     if (!drv) {
 134         return 1;
 135     }
 136
 137     tpm_backend_open(drv, &local_err);
 138     if (local_err) {
 139         error_report_err(local_err);
 140         return 1;
 141     }
 142
 143     QLIST_INSERT_HEAD(&tpm_backends, drv, list);
 144
 145     return 0;
 146 }
 147
 148 static int tpm_init_tpmdev(void *dummy, QemuOpts *opts, Error **errp)
 149 {
 150     return configure_tpm(opts);
 151 }
 152
 153 /*
 154  * Walk the list of TPM backend drivers that are in use and call their
 155  * destroy function to have them cleaned up.
 156  */
 157 void tpm_cleanup(void)
 158 {
 159     TPMBackend *drv, *next;
 160
 161     QLIST_FOREACH_SAFE(drv, &tpm_backends, list, next) {
 162         QLIST_REMOVE(drv, list);
 163         object_unref(OBJECT(drv));
 164     }
 165 }
 166
 167 /*
 168  * Initialize the TPM. Process the tpmdev command line options describing the
 169  * TPM backend.
 170  */
 171 int tpm_init(void)
 172 {
 173     if (qemu_opts_foreach(qemu_find_opts("tpmdev"),
 174                           tpm_init_tpmdev, NULL, NULL)) {
 175         return -1;
 176     }
 177
 178     return 0;
 179 }
 180
 181 /*
 182  * Parse the TPM configuration options.
 183  * To display all available TPM backends the user may use '-tpmdev help'
 184  */
 185 int tpm_config_parse(QemuOptsList *opts_list, const char *optarg)
 186 {
 187     QemuOpts *opts;
 188
 189     if (!strcmp(optarg, "help")) {
 190         tpm_display_backend_drivers();
 191         return -1;
 192     }
 193     opts = qemu_opts_parse_noisily(opts_list, optarg, true);
 194     if (!opts) {
 195         return -1;
 196     }
 197     return 0;
 198 }
 199
 200 #endif /* CONFIG_TPM */
 201
 202 /*
 203  * Walk the list of active TPM backends and collect information about them
 204  * following the schema description in qapi-schema.json.
 205  */
 206 TPMInfoList *qmp_query_tpm(Error **errp)
 207 {
 208     TPMBackend *drv;
 209     TPMInfoList *info, *head = NULL, *cur_item = NULL;
 210
 211     QLIST_FOREACH(drv, &tpm_backends, list) {
 212         if (!tpm_models[drv->fe_model]) {
 213             continue;
 214         }
 215         info = g_new0(TPMInfoList, 1);
 216         info->value = tpm_backend_query_tpm(drv);
 217
 218         if (!cur_item) {
 219             head = cur_item = info;
 220         } else {
 221             cur_item->next = info;
 222             cur_item = info;
 223         }
 224     }
 225
 226     return head;
 227 }
 228
 229 TpmTypeList *qmp_query_tpm_types(Error **errp)
 230 {
 231     unsigned int i = 0;
 232     TpmTypeList *head = NULL, *prev = NULL, *cur_item;
 233
 234     for (i = 0; i < TPM_TYPE__MAX; i++) {
 235         if (!tpm_be_find_by_type(i)) {
 236             continue;
 237         }
 238         cur_item = g_new0(TpmTypeList, 1);
 239         cur_item->value = i;
 240
 241         if (prev) {
 242             prev->next = cur_item;
 243         }
 244         if (!head) {
 245             head = cur_item;
 246         }
 247         prev = cur_item;
 248     }
 249
 250     return head;
 251 }
 252
 253 TpmModelList *qmp_query_tpm_models(Error **errp)
 254 {
 255     unsigned int i = 0;
 256     TpmModelList *head = NULL, *prev = NULL, *cur_item;
 257
 258     for (i = 0; i < TPM_MODEL__MAX; i++) {
 259         if (!tpm_models[i]) {
 260             continue;
 261         }
 262         cur_item = g_new0(TpmModelList, 1);
 263         cur_item->value = i;
 264
 265         if (prev) {
 266             prev->next = cur_item;
 267         }
 268         if (!head) {
 269             head = cur_item;
 270         }
 271         prev = cur_item;
 272     }
 273
 274     return head;
 275 }