| // Copyright 2017 The Fuchsia Authors. All rights reserved. |
| // Use of this source code is governed by a BSD-style license that can be |
| // found in the LICENSE file. |
| |
| #include <hypervisor/vcpu.h> |
| |
| #include <limits.h> |
| #include <stdio.h> |
| #include <string.h> |
| |
| #include <fbl/auto_lock.h> |
| #include <fbl/string_buffer.h> |
| #include <hypervisor/guest.h> |
| #include <hypervisor/io.h> |
| #include <zircon/process.h> |
| #include <zircon/syscalls.h> |
| #include <zircon/syscalls/hypervisor.h> |
| #include <zircon/syscalls/port.h> |
| |
| #ifdef __x86_64__ |
| #include <hypervisor/x86/decode.h> |
| #endif |
| |
| #if __aarch64__ |
| static zx_status_t handle_mmio_arm(const zx_packet_guest_mem_t* mem, uint64_t trap_key, |
| uint64_t* reg) { |
| IoValue mmio = {mem->access_size, {.u64 = mem->data}}; |
| if (!mem->read) |
| return trap_key_to_mapping(trap_key)->Write(mem->addr, mmio); |
| |
| zx_status_t status = trap_key_to_mapping(trap_key)->Read(mem->addr, &mmio); |
| if (status != ZX_OK) |
| return status; |
| *reg = mmio.u64; |
| if (mem->sign_extend && *reg & (1ul << (mmio.access_size * CHAR_BIT - 1))) |
| *reg |= UINT64_MAX << mmio.access_size; |
| return ZX_OK; |
| } |
| #elif __x86_64__ |
| static zx_status_t handle_mmio_x86(const zx_packet_guest_mem_t* mem, uint64_t trap_key, |
| const instruction_t* inst) { |
| zx_status_t status; |
| IoValue mmio = {inst->access_size, {.u64 = 0}}; |
| switch (inst->type) { |
| case INST_MOV_WRITE: |
| switch (inst->access_size) { |
| case 1: |
| status = inst_write8(inst, &mmio.u8); |
| break; |
| case 2: |
| status = inst_write16(inst, &mmio.u16); |
| break; |
| case 4: |
| status = inst_write32(inst, &mmio.u32); |
| break; |
| default: |
| return ZX_ERR_NOT_SUPPORTED; |
| } |
| if (status != ZX_OK) |
| return status; |
| return trap_key_to_mapping(trap_key)->Write(mem->addr, mmio); |
| |
| case INST_MOV_READ: |
| status = trap_key_to_mapping(trap_key)->Read(mem->addr, &mmio); |
| if (status != ZX_OK) |
| return status; |
| switch (inst->access_size) { |
| case 1: |
| return inst_read8(inst, mmio.u8); |
| case 2: |
| return inst_read16(inst, mmio.u16); |
| case 4: |
| return inst_read32(inst, mmio.u32); |
| default: |
| return ZX_ERR_NOT_SUPPORTED; |
| } |
| |
| case INST_TEST: |
| status = trap_key_to_mapping(trap_key)->Read(mem->addr, &mmio); |
| if (status != ZX_OK) |
| return status; |
| switch (inst->access_size) { |
| case 1: |
| return inst_test8(inst, static_cast<uint8_t>(inst->imm), mmio.u8); |
| default: |
| return ZX_ERR_NOT_SUPPORTED; |
| } |
| |
| default: |
| return ZX_ERR_INVALID_ARGS; |
| } |
| } |
| #endif |
| |
| static zx_status_t handle_mem(Vcpu* vcpu, const zx_packet_guest_mem_t* mem, uint64_t trap_key) { |
| zx_vcpu_state_t vcpu_state; |
| zx_status_t status; |
| #if __aarch64__ |
| if (mem->read) |
| #endif |
| { |
| status = vcpu->ReadState(ZX_VCPU_STATE, &vcpu_state, sizeof(vcpu_state)); |
| if (status != ZX_OK) |
| return status; |
| } |
| |
| bool do_write = false; |
| #if __aarch64__ |
| do_write = mem->read; |
| status = handle_mmio_arm(mem, trap_key, &vcpu_state.x[mem->xt]); |
| #elif __x86_64__ |
| instruction_t inst; |
| status = inst_decode(mem->inst_buf, mem->inst_len, &vcpu_state, &inst); |
| if (status != ZX_OK) { |
| fprintf(stderr, "Unsupported instruction:"); |
| for (uint8_t i = 0; i < mem->inst_len; i++) |
| fprintf(stderr, " %x", mem->inst_buf[i]); |
| fprintf(stderr, "\n"); |
| } else { |
| status = handle_mmio_x86(mem, trap_key, &inst); |
| // If there was an attempt to read or test memory, update the GPRs. |
| do_write = inst.type == INST_MOV_READ || inst.type == INST_TEST; |
| } |
| #endif // __x86_64__ |
| |
| if (status == ZX_OK && do_write) |
| return vcpu->WriteState(ZX_VCPU_STATE, &vcpu_state, sizeof(vcpu_state)); |
| |
| return status; |
| } |
| |
| #if __x86_64__ |
| static zx_status_t handle_input(Vcpu* vcpu, const zx_packet_guest_io_t* io, uint64_t trap_key) { |
| IoValue value = {}; |
| value.access_size = io->access_size; |
| zx_status_t status = trap_key_to_mapping(trap_key)->Read(io->port, &value); |
| if (status != ZX_OK) { |
| fprintf(stderr, "Failed to handle port in %#x: %d\n", io->port, status); |
| return status; |
| } |
| |
| zx_vcpu_io_t vcpu_io; |
| memset(&vcpu_io, 0, sizeof(vcpu_io)); |
| vcpu_io.access_size = value.access_size; |
| vcpu_io.u32 = value.u32; |
| if (vcpu_io.access_size != io->access_size) { |
| fprintf(stderr, "Unexpected size (%u != %u) for port in %#x\n", vcpu_io.access_size, |
| io->access_size, io->port); |
| return ZX_ERR_IO_DATA_INTEGRITY; |
| } |
| return vcpu->WriteState(ZX_VCPU_IO, &vcpu_io, sizeof(vcpu_io)); |
| } |
| |
| static zx_status_t handle_output(Vcpu* vcpu, const zx_packet_guest_io_t* io, uint64_t trap_key) { |
| IoValue value; |
| value.access_size = io->access_size; |
| value.u32 = io->u32; |
| zx_status_t status = trap_key_to_mapping(trap_key)->Write(io->port, value); |
| if (status != ZX_OK) { |
| fprintf(stderr, "Failed to handle port out %#x: %d\n", io->port, status); |
| } |
| return status; |
| } |
| |
| static zx_status_t handle_io(Vcpu* vcpu, const zx_packet_guest_io_t* io, uint64_t trap_key) { |
| return io->input ? handle_input(vcpu, io, trap_key) : handle_output(vcpu, io, trap_key); |
| } |
| #endif // __x86_64__ |
| |
| static zx_status_t handle_vcpu(Vcpu* vcpu, const zx_packet_guest_vcpu_t* packet, |
| uint64_t trap_key) { |
| fprintf(stderr, "Got VCPU packet with addr = %lx, apic_id = %ld\n", packet->addr, packet->id); |
| return vcpu->StartSecondaryProcessor(packet->addr, packet->id); |
| } |
| |
| struct Vcpu::ThreadEntryArgs { |
| Guest* guest; |
| Vcpu* vcpu; |
| zx_vaddr_t entry; |
| }; |
| |
| zx_status_t Vcpu::Create(Guest* guest, zx_vaddr_t entry, uint64_t id) { |
| guest_ = guest; |
| id_ = id; |
| ThreadEntryArgs args = { |
| .guest = guest, |
| .vcpu = this, |
| .entry = entry, |
| }; |
| fbl::StringBuffer<ZX_MAX_NAME_LEN> name_buffer; |
| name_buffer.AppendPrintf("vcpu-%lu", id); |
| auto thread_entry = [](void* arg) { |
| ThreadEntryArgs* thread_args = reinterpret_cast<ThreadEntryArgs*>(arg); |
| return thread_args->vcpu->ThreadEntry(thread_args); |
| }; |
| int ret = thrd_create_with_name(&thread_, thread_entry, &args, name_buffer.c_str()); |
| if (ret != thrd_success) { |
| return ZX_ERR_INTERNAL; |
| } |
| |
| fbl::AutoLock lock(&mutex_); |
| WaitForStateChangeLocked(State::UNINITIALIZED); |
| if (state_ != State::WAITING_TO_START) { |
| return ZX_ERR_BAD_STATE; |
| } |
| return ZX_OK; |
| } |
| |
| zx_status_t Vcpu::ThreadEntry(const ThreadEntryArgs* args) { |
| { |
| fbl::AutoLock lock(&mutex_); |
| if (state_ != State::UNINITIALIZED) { |
| return ZX_ERR_BAD_STATE; |
| } |
| |
| zx_status_t status = zx_vcpu_create(args->guest->handle(), 0, args->entry, &vcpu_); |
| if (status != ZX_OK) { |
| SetStateLocked(State::ERROR_FAILED_TO_CREATE); |
| return status; |
| } |
| |
| SetStateLocked(State::WAITING_TO_START); |
| WaitForStateChangeLocked(State::WAITING_TO_START); |
| if (state_ != State::STARTING) { |
| return ZX_ERR_BAD_STATE; |
| } |
| |
| if (initial_vcpu_state_ != nullptr) { |
| status = WriteState(ZX_VCPU_STATE, initial_vcpu_state_, sizeof(*initial_vcpu_state_)); |
| if (status != ZX_OK) { |
| SetStateLocked(State::ERROR_FAILED_TO_START); |
| return status; |
| } |
| } |
| |
| SetStateLocked(State::STARTED); |
| } |
| |
| return Loop(); |
| } |
| |
| void Vcpu::SetStateLocked(State new_state) { |
| state_ = new_state; |
| cnd_signal(&state_cnd_); |
| } |
| |
| void Vcpu::WaitForStateChangeLocked(State initial_state) { |
| while (state_ == initial_state) { |
| cnd_wait(&state_cnd_, mutex_.GetInternal()); |
| } |
| } |
| |
| static zx_status_t handle_packet(Vcpu* vcpu, zx_port_packet_t* packet) { |
| switch (packet->type) { |
| case ZX_PKT_TYPE_GUEST_MEM: |
| return handle_mem(vcpu, &packet->guest_mem, packet->key); |
| #if __x86_64__ |
| case ZX_PKT_TYPE_GUEST_IO: |
| return handle_io(vcpu, &packet->guest_io, packet->key); |
| #endif // __x86_64__ |
| case ZX_PKT_TYPE_GUEST_VCPU: |
| return handle_vcpu(vcpu, &packet->guest_vcpu, packet->key); |
| default: |
| fprintf(stderr, "Unhandled guest packet %d\n", packet->type); |
| return ZX_ERR_NOT_SUPPORTED; |
| } |
| } |
| |
| zx_status_t Vcpu::Loop() { |
| zx_port_packet_t packet; |
| while (true) { |
| zx_status_t status = zx_vcpu_resume(vcpu_, &packet); |
| if (status != ZX_OK) { |
| fprintf(stderr, "Failed to resume VCPU-%lu: %d\n", id_, status); |
| fbl::AutoLock lock(&mutex_); |
| SetStateLocked(State::ERROR_FAILED_TO_RESUME); |
| return status; |
| } |
| status = handle_packet(this, &packet); |
| if (status == ZX_ERR_STOP) { |
| fbl::AutoLock lock(&mutex_); |
| SetStateLocked(State::TERMINATED); |
| return ZX_OK; |
| } |
| if (status != ZX_OK) { |
| fprintf(stderr, "Failed to handle guest packet %d: %d\n", packet.type, status); |
| fbl::AutoLock lock(&mutex_); |
| SetStateLocked(State::ERROR_ABORTED); |
| return status; |
| } |
| } |
| } |
| |
| zx_status_t Vcpu::Start(zx_vcpu_state_t* initial_vcpu_state) { |
| fbl::AutoLock lock(&mutex_); |
| if (state_ != State::WAITING_TO_START) { |
| return ZX_ERR_BAD_STATE; |
| } |
| |
| // Place the VCPU in the |STARTING| state which will cause the VCPU to |
| // write the initial state and begin VCPU execution. |
| initial_vcpu_state_ = initial_vcpu_state; |
| SetStateLocked(State::STARTING); |
| WaitForStateChangeLocked(State::STARTING); |
| if (state_ != State::STARTED) { |
| return ZX_ERR_BAD_STATE; |
| } |
| return ZX_OK; |
| } |
| |
| zx_status_t Vcpu::Join() { |
| zx_status_t vcpu_result = ZX_ERR_INTERNAL; |
| int ret = thrd_join(thread_, &vcpu_result); |
| return ret == thrd_success ? vcpu_result : ZX_ERR_INTERNAL; |
| } |
| |
| zx_status_t Vcpu::Interrupt(uint32_t vector) { |
| return zx_vcpu_interrupt(vcpu_, vector); |
| } |
| |
| zx_status_t Vcpu::ReadState(uint32_t kind, void* buffer, uint32_t len) const { |
| return zx_vcpu_read_state(vcpu_, kind, buffer, len); |
| } |
| |
| zx_status_t Vcpu::WriteState(uint32_t kind, const void* buffer, uint32_t len) { |
| return zx_vcpu_write_state(vcpu_, kind, buffer, len); |
| } |
| |
| zx_status_t Vcpu::StartSecondaryProcessor(uintptr_t entry, uint64_t id) { |
| if (id_ != 0) { |
| fprintf(stderr, "Application processors must be started by the base processor\n"); |
| return ZX_ERR_BAD_STATE; |
| } |
| return guest_->StartVcpu(entry, id); |
| } |
