1 /* 2 * Virtual Machine Generation ID Device 3 * 4 * Copyright (C) 2017 Skyport Systems. 5 * 6 * Author: Ben Warren <ben@skyportsystems.com> 7 * 8 * This work is licensed under the terms of the GNU GPL, version 2 or later. 9 * See the COPYING file in the top-level directory. 10 * 11 */ 12 13 #include "qemu/osdep.h" 14 #include "qmp-commands.h" 15 #include "hw/acpi/acpi.h" 16 #include "hw/acpi/aml-build.h" 17 #include "hw/acpi/vmgenid.h" 18 #include "hw/nvram/fw_cfg.h" 19 #include "sysemu/sysemu.h" 20 21 void vmgenid_build_acpi(VmGenIdState *vms, GArray *table_data, GArray *guid, 22 BIOSLinker *linker) 23 { 24 Aml *ssdt, *dev, *scope, *method, *addr, *if_ctx; 25 uint32_t vgia_offset; 26 QemuUUID guid_le; 27 28 /* Fill in the GUID values. These need to be converted to little-endian 29 * first, since that's what the guest expects 30 */ 31 g_array_set_size(guid, VMGENID_FW_CFG_SIZE - ARRAY_SIZE(guid_le.data)); 32 guid_le = vms->guid; 33 qemu_uuid_bswap(&guid_le); 34 /* The GUID is written at a fixed offset into the fw_cfg file 35 * in order to implement the "OVMF SDT Header probe suppressor" 36 * see docs/specs/vmgenid.txt for more details 37 */ 38 g_array_insert_vals(guid, VMGENID_GUID_OFFSET, guid_le.data, 39 ARRAY_SIZE(guid_le.data)); 40 41 /* Put this in a separate SSDT table */ 42 ssdt = init_aml_allocator(); 43 44 /* Reserve space for header */ 45 acpi_data_push(ssdt->buf, sizeof(AcpiTableHeader)); 46 47 /* Storage for the GUID address */ 48 vgia_offset = table_data->len + 49 build_append_named_dword(ssdt->buf, "VGIA"); 50 scope = aml_scope("\\_SB"); 51 dev = aml_device("VGEN"); 52 aml_append(dev, aml_name_decl("_HID", aml_string("QEMUVGID"))); 53 aml_append(dev, aml_name_decl("_CID", aml_string("VM_Gen_Counter"))); 54 aml_append(dev, aml_name_decl("_DDN", aml_string("VM_Gen_Counter"))); 55 56 /* Simple status method to check that address is linked and non-zero */ 57 method = aml_method("_STA", 0, AML_NOTSERIALIZED); 58 addr = aml_local(0); 59 aml_append(method, aml_store(aml_int(0xf), addr)); 60 if_ctx = aml_if(aml_equal(aml_name("VGIA"), aml_int(0))); 61 aml_append(if_ctx, aml_store(aml_int(0), addr)); 62 aml_append(method, if_ctx); 63 aml_append(method, aml_return(addr)); 64 aml_append(dev, method); 65 66 /* the ADDR method returns two 32-bit words representing the lower and 67 * upper halves * of the physical address of the fw_cfg blob 68 * (holding the GUID) 69 */ 70 method = aml_method("ADDR", 0, AML_NOTSERIALIZED); 71 72 addr = aml_local(0); 73 aml_append(method, aml_store(aml_package(2), addr)); 74 75 aml_append(method, aml_store(aml_add(aml_name("VGIA"), 76 aml_int(VMGENID_GUID_OFFSET), NULL), 77 aml_index(addr, aml_int(0)))); 78 aml_append(method, aml_store(aml_int(0), aml_index(addr, aml_int(1)))); 79 aml_append(method, aml_return(addr)); 80 81 aml_append(dev, method); 82 aml_append(scope, dev); 83 aml_append(ssdt, scope); 84 85 /* attach an ACPI notify */ 86 method = aml_method("\\_GPE._E05", 0, AML_NOTSERIALIZED); 87 aml_append(method, aml_notify(aml_name("\\_SB.VGEN"), aml_int(0x80))); 88 aml_append(ssdt, method); 89 90 g_array_append_vals(table_data, ssdt->buf->data, ssdt->buf->len); 91 92 /* Allocate guest memory for the Data fw_cfg blob */ 93 bios_linker_loader_alloc(linker, VMGENID_GUID_FW_CFG_FILE, guid, 4096, 94 false /* page boundary, high memory */); 95 96 /* Patch address of GUID fw_cfg blob into the ADDR fw_cfg blob 97 * so QEMU can write the GUID there. The address is expected to be 98 * < 4GB, but write 64 bits anyway. 99 * The address that is patched in is offset in order to implement 100 * the "OVMF SDT Header probe suppressor" 101 * see docs/specs/vmgenid.txt for more details. 102 */ 103 bios_linker_loader_write_pointer(linker, 104 VMGENID_ADDR_FW_CFG_FILE, 0, sizeof(uint64_t), 105 VMGENID_GUID_FW_CFG_FILE, VMGENID_GUID_OFFSET); 106 107 /* Patch address of GUID fw_cfg blob into the AML so OSPM can retrieve 108 * and read it. Note that while we provide storage for 64 bits, only 109 * the least-signficant 32 get patched into AML. 110 */ 111 bios_linker_loader_add_pointer(linker, 112 ACPI_BUILD_TABLE_FILE, vgia_offset, sizeof(uint32_t), 113 VMGENID_GUID_FW_CFG_FILE, 0); 114 115 build_header(linker, table_data, 116 (void *)(table_data->data + table_data->len - ssdt->buf->len), 117 "SSDT", ssdt->buf->len, 1, NULL, "VMGENID"); 118 free_aml_allocator(); 119 } 120 121 void vmgenid_add_fw_cfg(VmGenIdState *vms, FWCfgState *s, GArray *guid) 122 { 123 /* Create a read-only fw_cfg file for GUID */ 124 fw_cfg_add_file(s, VMGENID_GUID_FW_CFG_FILE, guid->data, 125 VMGENID_FW_CFG_SIZE); 126 /* Create a read-write fw_cfg file for Address */ 127 fw_cfg_add_file_callback(s, VMGENID_ADDR_FW_CFG_FILE, NULL, NULL, 128 vms->vmgenid_addr_le, 129 ARRAY_SIZE(vms->vmgenid_addr_le), false); 130 } 131 132 static void vmgenid_update_guest(VmGenIdState *vms) 133 { 134 Object *obj = object_resolve_path_type("", TYPE_ACPI_DEVICE_IF, NULL); 135 uint32_t vmgenid_addr; 136 QemuUUID guid_le; 137 138 if (obj) { 139 /* Write the GUID to guest memory */ 140 memcpy(&vmgenid_addr, vms->vmgenid_addr_le, sizeof(vmgenid_addr)); 141 vmgenid_addr = le32_to_cpu(vmgenid_addr); 142 /* A zero value in vmgenid_addr means that BIOS has not yet written 143 * the address 144 */ 145 if (vmgenid_addr) { 146 /* QemuUUID has the first three words as big-endian, and expect 147 * that any GUIDs passed in will always be BE. The guest, 148 * however, will expect the fields to be little-endian. 149 * Perform a byte swap immediately before writing. 150 */ 151 guid_le = vms->guid; 152 qemu_uuid_bswap(&guid_le); 153 /* The GUID is written at a fixed offset into the fw_cfg file 154 * in order to implement the "OVMF SDT Header probe suppressor" 155 * see docs/specs/vmgenid.txt for more details. 156 */ 157 cpu_physical_memory_write(vmgenid_addr, guid_le.data, 158 sizeof(guid_le.data)); 159 /* Send _GPE.E05 event */ 160 acpi_send_event(DEVICE(obj), ACPI_VMGENID_CHANGE_STATUS); 161 } 162 } 163 } 164 165 static void vmgenid_set_guid(Object *obj, const char *value, Error **errp) 166 { 167 VmGenIdState *vms = VMGENID(obj); 168 169 if (!strcmp(value, "auto")) { 170 qemu_uuid_generate(&vms->guid); 171 } else if (qemu_uuid_parse(value, &vms->guid) < 0) { 172 error_setg(errp, "'%s. %s': Failed to parse GUID string: %s", 173 object_get_typename(OBJECT(vms)), VMGENID_GUID, value); 174 return; 175 } 176 177 vmgenid_update_guest(vms); 178 } 179 180 /* After restoring an image, we need to update the guest memory and notify 181 * it of a potential change to VM Generation ID 182 */ 183 static int vmgenid_post_load(void *opaque, int version_id) 184 { 185 VmGenIdState *vms = opaque; 186 vmgenid_update_guest(vms); 187 return 0; 188 } 189 190 static const VMStateDescription vmstate_vmgenid = { 191 .name = "vmgenid", 192 .version_id = 1, 193 .minimum_version_id = 1, 194 .post_load = vmgenid_post_load, 195 .fields = (VMStateField[]) { 196 VMSTATE_UINT8_ARRAY(vmgenid_addr_le, VmGenIdState, sizeof(uint64_t)), 197 VMSTATE_END_OF_LIST() 198 }, 199 }; 200 201 static void vmgenid_handle_reset(void *opaque) 202 { 203 VmGenIdState *vms = VMGENID(opaque); 204 /* Clear the guest-allocated GUID address when the VM resets */ 205 memset(vms->vmgenid_addr_le, 0, ARRAY_SIZE(vms->vmgenid_addr_le)); 206 } 207 208 static Property vmgenid_properties[] = { 209 DEFINE_PROP_BOOL("x-write-pointer-available", VmGenIdState, 210 write_pointer_available, true), 211 DEFINE_PROP_END_OF_LIST(), 212 }; 213 214 static void vmgenid_realize(DeviceState *dev, Error **errp) 215 { 216 VmGenIdState *vms = VMGENID(dev); 217 218 if (!vms->write_pointer_available) { 219 error_setg(errp, "%s requires DMA write support in fw_cfg, " 220 "which this machine type does not provide", VMGENID_DEVICE); 221 return; 222 } 223 224 /* Given that this function is executing, there is at least one VMGENID 225 * device. Check if there are several. 226 */ 227 if (!find_vmgenid_dev()) { 228 error_setg(errp, "at most one %s device is permitted", VMGENID_DEVICE); 229 return; 230 } 231 232 qemu_register_reset(vmgenid_handle_reset, vms); 233 } 234 235 static void vmgenid_device_class_init(ObjectClass *klass, void *data) 236 { 237 DeviceClass *dc = DEVICE_CLASS(klass); 238 239 dc->vmsd = &vmstate_vmgenid; 240 dc->realize = vmgenid_realize; 241 dc->hotpluggable = false; 242 dc->props = vmgenid_properties; 243 244 object_class_property_add_str(klass, VMGENID_GUID, NULL, 245 vmgenid_set_guid, NULL); 246 object_class_property_set_description(klass, VMGENID_GUID, 247 "Set Global Unique Identifier " 248 "(big-endian) or auto for random value", 249 NULL); 250 } 251 252 static const TypeInfo vmgenid_device_info = { 253 .name = VMGENID_DEVICE, 254 .parent = TYPE_DEVICE, 255 .instance_size = sizeof(VmGenIdState), 256 .class_init = vmgenid_device_class_init, 257 }; 258 259 static void vmgenid_register_types(void) 260 { 261 type_register_static(&vmgenid_device_info); 262 } 263 264 type_init(vmgenid_register_types) 265 266 GuidInfo *qmp_query_vm_generation_id(Error **errp) 267 { 268 GuidInfo *info; 269 VmGenIdState *vms; 270 Object *obj = find_vmgenid_dev(); 271 272 if (!obj) { 273 error_setg(errp, "VM Generation ID device not found"); 274 return NULL; 275 } 276 vms = VMGENID(obj); 277 278 info = g_malloc0(sizeof(*info)); 279 info->guid = qemu_uuid_unparse_strdup(&vms->guid); 280 return info; 281 } 282