vmm_dev.c revision 240922
1169695Skan/*- 2169695Skan * Copyright (c) 2011 NetApp, Inc. 3169695Skan * All rights reserved. 4169695Skan * 5169695Skan * Redistribution and use in source and binary forms, with or without 6169695Skan * modification, are permitted provided that the following conditions 7169695Skan * are met: 8169695Skan * 1. Redistributions of source code must retain the above copyright 9169695Skan * notice, this list of conditions and the following disclaimer. 10169695Skan * 2. Redistributions in binary form must reproduce the above copyright 11169695Skan * notice, this list of conditions and the following disclaimer in the 12169695Skan * documentation and/or other materials provided with the distribution. 13169695Skan * 14169695Skan * THIS SOFTWARE IS PROVIDED BY NETAPP, INC ``AS IS'' AND 15169695Skan * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16169695Skan * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17169695Skan * ARE DISCLAIMED. IN NO EVENT SHALL NETAPP, INC OR CONTRIBUTORS BE LIABLE 18169695Skan * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19169695Skan * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20169695Skan * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21169695Skan * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22169695Skan * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23169695Skan * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24169695Skan * SUCH DAMAGE. 25169695Skan * 26169695Skan * $FreeBSD$ 27169695Skan */ 28169695Skan 29169695Skan#include <sys/cdefs.h> 30169695Skan__FBSDID("$FreeBSD$"); 31169695Skan 32169695Skan#include <sys/param.h> 33169695Skan#include <sys/kernel.h> 34169695Skan#include <sys/queue.h> 35169695Skan#include <sys/lock.h> 36169695Skan#include <sys/mutex.h> 37169695Skan#include <sys/malloc.h> 38169695Skan#include <sys/conf.h> 39169695Skan#include <sys/sysctl.h> 40169695Skan#include <sys/libkern.h> 41169695Skan#include <sys/ioccom.h> 42169695Skan#include <sys/mman.h> 43169695Skan#include <sys/uio.h> 44169695Skan 45169695Skan#include <vm/vm.h> 46169695Skan#include <vm/pmap.h> 47169695Skan 48169695Skan#include <machine/pmap.h> 49169695Skan#include <machine/vmparam.h> 50169695Skan 51169695Skan#include <machine/vmm.h> 52169695Skan#include "vmm_lapic.h" 53169695Skan#include "vmm_stat.h" 54169695Skan#include "vmm_mem.h" 55169695Skan#include "io/ppt.h" 56169695Skan#include <machine/vmm_dev.h> 57169695Skan 58169695Skanstruct vmmdev_softc { 59169695Skan struct vm *vm; /* vm instance cookie */ 60169695Skan struct cdev *cdev; 61283010Spfg SLIST_ENTRY(vmmdev_softc) link; 62169695Skan}; 63169695Skanstatic SLIST_HEAD(, vmmdev_softc) head; 64169695Skan 65283010Spfgstatic struct mtx vmmdev_mtx; 66169695Skan 67169695Skanstatic MALLOC_DEFINE(M_VMMDEV, "vmmdev", "vmmdev"); 68169695Skan 69169695SkanSYSCTL_DECL(_hw_vmm); 70169695Skan 71169695Skanstatic struct vmmdev_softc * 72169695Skanvmmdev_lookup(const char *name) 73169695Skan{ 74169695Skan struct vmmdev_softc *sc; 75169695Skan 76169695Skan#ifdef notyet /* XXX kernel is not compiled with invariants */ 77169695Skan mtx_assert(&vmmdev_mtx, MA_OWNED); 78169695Skan#endif 79169695Skan 80169695Skan SLIST_FOREACH(sc, &head, link) { 81169695Skan if (strcmp(name, vm_name(sc->vm)) == 0) 82169695Skan break; 83169695Skan } 84169695Skan 85169695Skan return (sc); 86169695Skan} 87169695Skan 88169695Skanstatic struct vmmdev_softc * 89169695Skanvmmdev_lookup2(struct cdev *cdev) 90169695Skan{ 91169695Skan struct vmmdev_softc *sc; 92169695Skan 93169695Skan#ifdef notyet /* XXX kernel is not compiled with invariants */ 94169695Skan mtx_assert(&vmmdev_mtx, MA_OWNED); 95169695Skan#endif 96169695Skan 97169695Skan SLIST_FOREACH(sc, &head, link) { 98169695Skan if (sc->cdev == cdev) 99169695Skan break; 100169695Skan } 101169695Skan 102169695Skan return (sc); 103169695Skan} 104169695Skan 105169695Skanstatic int 106169695Skanvmmdev_rw(struct cdev *cdev, struct uio *uio, int flags) 107169695Skan{ 108169695Skan int error, off, c; 109169695Skan vm_paddr_t hpa, gpa; 110169695Skan struct vmmdev_softc *sc; 111169695Skan 112169695Skan static char zerobuf[PAGE_SIZE]; 113169695Skan 114169695Skan error = 0; 115169695Skan mtx_lock(&vmmdev_mtx); 116169695Skan sc = vmmdev_lookup2(cdev); 117169695Skan 118169695Skan while (uio->uio_resid > 0 && error == 0) { 119169695Skan gpa = uio->uio_offset; 120169695Skan off = gpa & PAGE_MASK; 121169695Skan c = min(uio->uio_resid, PAGE_SIZE - off); 122169695Skan 123169695Skan /* 124169695Skan * The VM has a hole in its physical memory map. If we want to 125169695Skan * use 'dd' to inspect memory beyond the hole we need to 126169695Skan * provide bogus data for memory that lies in the hole. 127169695Skan * 128169695Skan * Since this device does not support lseek(2), dd(1) will 129169695Skan * read(2) blocks of data to simulate the lseek(2). 130169695Skan */ 131169695Skan hpa = vm_gpa2hpa(sc->vm, gpa, c); 132283010Spfg if (hpa == (vm_paddr_t)-1) { 133169695Skan if (uio->uio_rw == UIO_READ) 134169695Skan error = uiomove(zerobuf, c, uio); 135169695Skan else 136169695Skan error = EFAULT; 137169695Skan } else 138169695Skan error = uiomove((void *)PHYS_TO_DMAP(hpa), c, uio); 139169695Skan } 140169695Skan 141169695Skan mtx_unlock(&vmmdev_mtx); 142169695Skan return (error); 143169695Skan} 144169695Skan 145169695Skanstatic int 146169695Skanvmmdev_ioctl(struct cdev *cdev, u_long cmd, caddr_t data, int fflag, 147169695Skan struct thread *td) 148169695Skan{ 149169695Skan int error, vcpu; 150169695Skan struct vmmdev_softc *sc; 151169695Skan struct vm_memory_segment *seg; 152169695Skan struct vm_register *vmreg; 153169695Skan struct vm_seg_desc* vmsegdesc; 154169695Skan struct vm_pin *vmpin; 155169695Skan struct vm_run *vmrun; 156169695Skan struct vm_event *vmevent; 157283010Spfg struct vm_lapic_irq *vmirq; 158169695Skan struct vm_capability *vmcap; 159169695Skan struct vm_pptdev *pptdev; 160169695Skan struct vm_pptdev_mmio *pptmmio; 161169695Skan struct vm_pptdev_msi *pptmsi; 162169695Skan struct vm_pptdev_msix *pptmsix; 163169695Skan struct vm_nmi *vmnmi; 164169695Skan struct vm_stats *vmstats; 165169695Skan struct vm_stat_desc *statdesc; 166169695Skan struct vm_x2apic *x2apic; 167169695Skan 168169695Skan mtx_lock(&vmmdev_mtx); 169169695Skan sc = vmmdev_lookup2(cdev); 170169695Skan if (sc == NULL) { 171169695Skan mtx_unlock(&vmmdev_mtx); 172169695Skan return (ENXIO); 173169695Skan } 174169695Skan 175169695Skan /* 176169695Skan * Some VMM ioctls can operate only on vcpus that are not running. 177169695Skan */ 178169695Skan switch (cmd) { 179169695Skan case VM_RUN: 180169695Skan case VM_SET_PINNING: 181169695Skan case VM_GET_REGISTER: 182169695Skan case VM_SET_REGISTER: 183169695Skan case VM_GET_SEGMENT_DESCRIPTOR: 184169695Skan case VM_SET_SEGMENT_DESCRIPTOR: 185169695Skan case VM_INJECT_EVENT: 186169695Skan case VM_GET_CAPABILITY: 187169695Skan case VM_SET_CAPABILITY: 188169695Skan case VM_PPTDEV_MSI: 189169695Skan case VM_SET_X2APIC_STATE: 190169695Skan /* 191169695Skan * XXX fragile, handle with care 192283010Spfg * Assumes that the first field of the ioctl data is the vcpu. 193283010Spfg */ 194283010Spfg vcpu = *(int *)data; 195283010Spfg if (vcpu < 0 || vcpu >= VM_MAXCPU) { 196283010Spfg error = EINVAL; 197283010Spfg goto done; 198283010Spfg } 199283010Spfg 200283010Spfg if (vcpu_is_running(sc->vm, vcpu, NULL)) { 201283010Spfg error = EBUSY; 202283010Spfg goto done; 203283010Spfg } 204283010Spfg break; 205283010Spfg default: 206283010Spfg break; 207283010Spfg } 208283010Spfg 209283010Spfg switch(cmd) { 210283010Spfg case VM_RUN: 211283010Spfg vmrun = (struct vm_run *)data; 212283010Spfg 213169695Skan vm_set_run_state(sc->vm, vmrun->cpuid, VCPU_RUNNING); 214169695Skan mtx_unlock(&vmmdev_mtx); 215169695Skan 216169695Skan error = vm_run(sc->vm, vmrun); 217169695Skan 218169695Skan mtx_lock(&vmmdev_mtx); 219169695Skan vm_set_run_state(sc->vm, vmrun->cpuid, VCPU_STOPPED); 220169695Skan break; 221169695Skan case VM_STAT_DESC: { 222169695Skan const char *desc; 223169695Skan statdesc = (struct vm_stat_desc *)data; 224169695Skan desc = vmm_stat_desc(statdesc->index); 225169695Skan if (desc != NULL) { 226169695Skan error = 0; 227169695Skan strlcpy(statdesc->desc, desc, sizeof(statdesc->desc)); 228169695Skan } else 229169695Skan error = EINVAL; 230169695Skan break; 231169695Skan } 232169695Skan case VM_STATS: { 233169695Skan CTASSERT(MAX_VM_STATS >= MAX_VMM_STAT_TYPES); 234169695Skan vmstats = (struct vm_stats *)data; 235169695Skan getmicrotime(&vmstats->tv); 236169695Skan error = vmm_stat_copy(sc->vm, vmstats->cpuid, 237169695Skan &vmstats->num_entries, vmstats->statbuf); 238169695Skan break; 239169695Skan } 240169695Skan case VM_PPTDEV_MSI: 241169695Skan pptmsi = (struct vm_pptdev_msi *)data; 242169695Skan error = ppt_setup_msi(sc->vm, pptmsi->vcpu, 243169695Skan pptmsi->bus, pptmsi->slot, pptmsi->func, 244169695Skan pptmsi->destcpu, pptmsi->vector, 245169695Skan pptmsi->numvec); 246169695Skan break; 247169695Skan case VM_PPTDEV_MSIX: 248169695Skan pptmsix = (struct vm_pptdev_msix *)data; 249169695Skan error = ppt_setup_msix(sc->vm, pptmsix->vcpu, 250169695Skan pptmsix->bus, pptmsix->slot, 251169695Skan pptmsix->func, pptmsix->idx, 252169695Skan pptmsix->msg, pptmsix->vector_control, 253169695Skan pptmsix->addr); 254169695Skan break; 255169695Skan case VM_MAP_PPTDEV_MMIO: 256169695Skan pptmmio = (struct vm_pptdev_mmio *)data; 257169695Skan error = ppt_map_mmio(sc->vm, pptmmio->bus, pptmmio->slot, 258169695Skan pptmmio->func, pptmmio->gpa, pptmmio->len, 259169695Skan pptmmio->hpa); 260169695Skan break; 261169695Skan case VM_BIND_PPTDEV: 262169695Skan pptdev = (struct vm_pptdev *)data; 263169695Skan error = ppt_assign_device(sc->vm, pptdev->bus, pptdev->slot, 264169695Skan pptdev->func); 265169695Skan break; 266169695Skan case VM_UNBIND_PPTDEV: 267169695Skan pptdev = (struct vm_pptdev *)data; 268169695Skan error = ppt_unassign_device(sc->vm, pptdev->bus, pptdev->slot, 269169695Skan pptdev->func); 270169695Skan break; 271169695Skan case VM_INJECT_EVENT: 272169695Skan vmevent = (struct vm_event *)data; 273169695Skan error = vm_inject_event(sc->vm, vmevent->cpuid, vmevent->type, 274169695Skan vmevent->vector, 275169695Skan vmevent->error_code, 276169695Skan vmevent->error_code_valid); 277169695Skan break; 278169695Skan case VM_INJECT_NMI: 279169695Skan vmnmi = (struct vm_nmi *)data; 280169695Skan error = vm_inject_nmi(sc->vm, vmnmi->cpuid); 281169695Skan break; 282169695Skan case VM_LAPIC_IRQ: 283169695Skan vmirq = (struct vm_lapic_irq *)data; 284169695Skan error = lapic_set_intr(sc->vm, vmirq->cpuid, vmirq->vector); 285169695Skan break; 286169695Skan case VM_SET_PINNING: 287169695Skan vmpin = (struct vm_pin *)data; 288169695Skan error = vm_set_pinning(sc->vm, vmpin->vm_cpuid, 289169695Skan vmpin->host_cpuid); 290169695Skan break; 291169695Skan case VM_GET_PINNING: 292169695Skan vmpin = (struct vm_pin *)data; 293169695Skan error = vm_get_pinning(sc->vm, vmpin->vm_cpuid, 294169695Skan &vmpin->host_cpuid); 295169695Skan break; 296169695Skan case VM_MAP_MEMORY: 297169695Skan seg = (struct vm_memory_segment *)data; 298169695Skan error = vm_malloc(sc->vm, seg->gpa, seg->len, &seg->hpa); 299169695Skan break; 300169695Skan case VM_GET_MEMORY_SEG: 301169695Skan seg = (struct vm_memory_segment *)data; 302169695Skan seg->hpa = seg->len = 0; 303169695Skan (void)vm_gpabase2memseg(sc->vm, seg->gpa, seg); 304169695Skan error = 0; 305169695Skan break; 306169695Skan case VM_GET_REGISTER: 307169695Skan vmreg = (struct vm_register *)data; 308169695Skan error = vm_get_register(sc->vm, vmreg->cpuid, vmreg->regnum, 309169695Skan &vmreg->regval); 310169695Skan break; 311 case VM_SET_REGISTER: 312 vmreg = (struct vm_register *)data; 313 error = vm_set_register(sc->vm, vmreg->cpuid, vmreg->regnum, 314 vmreg->regval); 315 break; 316 case VM_SET_SEGMENT_DESCRIPTOR: 317 vmsegdesc = (struct vm_seg_desc *)data; 318 error = vm_set_seg_desc(sc->vm, vmsegdesc->cpuid, 319 vmsegdesc->regnum, 320 &vmsegdesc->desc); 321 break; 322 case VM_GET_SEGMENT_DESCRIPTOR: 323 vmsegdesc = (struct vm_seg_desc *)data; 324 error = vm_get_seg_desc(sc->vm, vmsegdesc->cpuid, 325 vmsegdesc->regnum, 326 &vmsegdesc->desc); 327 break; 328 case VM_GET_CAPABILITY: 329 vmcap = (struct vm_capability *)data; 330 error = vm_get_capability(sc->vm, vmcap->cpuid, 331 vmcap->captype, 332 &vmcap->capval); 333 break; 334 case VM_SET_CAPABILITY: 335 vmcap = (struct vm_capability *)data; 336 error = vm_set_capability(sc->vm, vmcap->cpuid, 337 vmcap->captype, 338 vmcap->capval); 339 break; 340 case VM_SET_X2APIC_STATE: 341 x2apic = (struct vm_x2apic *)data; 342 error = vm_set_x2apic_state(sc->vm, 343 x2apic->cpuid, x2apic->state); 344 break; 345 case VM_GET_X2APIC_STATE: 346 x2apic = (struct vm_x2apic *)data; 347 error = vm_get_x2apic_state(sc->vm, 348 x2apic->cpuid, &x2apic->state); 349 break; 350 default: 351 error = ENOTTY; 352 break; 353 } 354done: 355 mtx_unlock(&vmmdev_mtx); 356 357 return (error); 358} 359 360static int 361vmmdev_mmap(struct cdev *cdev, vm_ooffset_t offset, vm_paddr_t *paddr, 362 int nprot, vm_memattr_t *memattr) 363{ 364 int error; 365 struct vmmdev_softc *sc; 366 367 error = -1; 368 mtx_lock(&vmmdev_mtx); 369 370 sc = vmmdev_lookup2(cdev); 371 if (sc != NULL && (nprot & PROT_EXEC) == 0) { 372 *paddr = vm_gpa2hpa(sc->vm, (vm_paddr_t)offset, PAGE_SIZE); 373 if (*paddr != (vm_paddr_t)-1) 374 error = 0; 375 } 376 377 mtx_unlock(&vmmdev_mtx); 378 379 return (error); 380} 381 382static void 383vmmdev_destroy(struct vmmdev_softc *sc) 384{ 385 386#ifdef notyet /* XXX kernel is not compiled with invariants */ 387 mtx_assert(&vmmdev_mtx, MA_OWNED); 388#endif 389 390 /* 391 * XXX must stop virtual machine instances that may be still 392 * running and cleanup their state. 393 */ 394 SLIST_REMOVE(&head, sc, vmmdev_softc, link); 395 destroy_dev(sc->cdev); 396 vm_destroy(sc->vm); 397 free(sc, M_VMMDEV); 398} 399 400static int 401sysctl_vmm_destroy(SYSCTL_HANDLER_ARGS) 402{ 403 int error; 404 char buf[VM_MAX_NAMELEN]; 405 struct vmmdev_softc *sc; 406 407 strlcpy(buf, "beavis", sizeof(buf)); 408 error = sysctl_handle_string(oidp, buf, sizeof(buf), req); 409 if (error != 0 || req->newptr == NULL) 410 return (error); 411 412 mtx_lock(&vmmdev_mtx); 413 sc = vmmdev_lookup(buf); 414 if (sc == NULL) { 415 mtx_unlock(&vmmdev_mtx); 416 return (EINVAL); 417 } 418 vmmdev_destroy(sc); 419 mtx_unlock(&vmmdev_mtx); 420 return (0); 421} 422SYSCTL_PROC(_hw_vmm, OID_AUTO, destroy, CTLTYPE_STRING | CTLFLAG_RW, 423 NULL, 0, sysctl_vmm_destroy, "A", NULL); 424 425static struct cdevsw vmmdevsw = { 426 .d_name = "vmmdev", 427 .d_version = D_VERSION, 428 .d_ioctl = vmmdev_ioctl, 429 .d_mmap = vmmdev_mmap, 430 .d_read = vmmdev_rw, 431 .d_write = vmmdev_rw, 432}; 433 434static int 435sysctl_vmm_create(SYSCTL_HANDLER_ARGS) 436{ 437 int error; 438 struct vm *vm; 439 struct vmmdev_softc *sc; 440 char buf[VM_MAX_NAMELEN]; 441 442 strlcpy(buf, "beavis", sizeof(buf)); 443 error = sysctl_handle_string(oidp, buf, sizeof(buf), req); 444 if (error != 0 || req->newptr == NULL) 445 return (error); 446 447 mtx_lock(&vmmdev_mtx); 448 449 sc = vmmdev_lookup(buf); 450 if (sc != NULL) { 451 mtx_unlock(&vmmdev_mtx); 452 return (EEXIST); 453 } 454 455 vm = vm_create(buf); 456 if (vm == NULL) { 457 mtx_unlock(&vmmdev_mtx); 458 return (EINVAL); 459 } 460 461 sc = malloc(sizeof(struct vmmdev_softc), M_VMMDEV, M_WAITOK | M_ZERO); 462 sc->vm = vm; 463 sc->cdev = make_dev(&vmmdevsw, 0, UID_ROOT, GID_WHEEL, 0600, 464 "vmm/%s", buf); 465 sc->cdev->si_drv1 = sc; 466 SLIST_INSERT_HEAD(&head, sc, link); 467 468 mtx_unlock(&vmmdev_mtx); 469 return (0); 470} 471SYSCTL_PROC(_hw_vmm, OID_AUTO, create, CTLTYPE_STRING | CTLFLAG_RW, 472 NULL, 0, sysctl_vmm_create, "A", NULL); 473 474static int 475sysctl_vmm_mem_total(SYSCTL_HANDLER_ARGS) 476{ 477 size_t val = vmm_mem_get_mem_total(); 478 return sysctl_handle_long(oidp, &val, 0, req); 479} 480SYSCTL_PROC(_hw_vmm, OID_AUTO, mem_total, CTLTYPE_LONG | CTLFLAG_RD, 481 0, 0, sysctl_vmm_mem_total, "LU", "Amount of Total memory"); 482 483static int 484sysctl_vmm_mem_free(SYSCTL_HANDLER_ARGS) 485{ 486 size_t val = vmm_mem_get_mem_free(); 487 return sysctl_handle_long(oidp, &val, 0, req); 488} 489SYSCTL_PROC(_hw_vmm, OID_AUTO, mem_free, CTLTYPE_LONG | CTLFLAG_RD, 490 0, 0, sysctl_vmm_mem_free, "LU", "Amount of Free memory"); 491 492void 493vmmdev_init(void) 494{ 495 mtx_init(&vmmdev_mtx, "vmm device mutex", NULL, MTX_DEF); 496} 497 498void 499vmmdev_cleanup(void) 500{ 501 struct vmmdev_softc *sc, *sc2; 502 503 mtx_lock(&vmmdev_mtx); 504 505 SLIST_FOREACH_SAFE(sc, &head, link, sc2) 506 vmmdev_destroy(sc); 507 508 mtx_unlock(&vmmdev_mtx); 509} 510