arch/powerpc/kvm/book3s_64_vio.c

   1 /*
   2  * This program is free software; you can redistribute it and/or modify
   3  * it under the terms of the GNU General Public License, version 2, as
   4  * published by the Free Software Foundation.
   5  *
   6  * This program is distributed in the hope that it will be useful,
   7  * but WITHOUT ANY WARRANTY; without even the implied warranty of
   8  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   9  * GNU General Public License for more details.
  10  *
  11  * You should have received a copy of the GNU General Public License
  12  * along with this program; if not, write to the Free Software
  13  * Foundation, 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  14  *
  15  * Copyright 2010 Paul Mackerras, IBM Corp. <paulus@au1.ibm.com>
  16  * Copyright 2011 David Gibson, IBM Corporation <dwg@au1.ibm.com>
  17  * Copyright 2016 Alexey Kardashevskiy, IBM Corporation <aik@au1.ibm.com>
  18  */
  19
  20 #include <linux/types.h>
  21 #include <linux/string.h>
  22 #include <linux/kvm.h>
  23 #include <linux/kvm_host.h>
  24 #include <linux/highmem.h>
  25 #include <linux/gfp.h>
  26 #include <linux/slab.h>
  27 #include <linux/hugetlb.h>
  28 #include <linux/list.h>
  29 #include <linux/anon_inodes.h>
  30
  31 #include <asm/tlbflush.h>
  32 #include <asm/kvm_ppc.h>
  33 #include <asm/kvm_book3s.h>
  34 #include <asm/book3s/64/mmu-hash.h>
  35 #include <asm/hvcall.h>
  36 #include <asm/synch.h>
  37 #include <asm/ppc-opcode.h>
  38 #include <asm/kvm_host.h>
  39 #include <asm/udbg.h>
  40 #include <asm/iommu.h>
  41 #include <asm/tce.h>
  42
  43 static unsigned long kvmppc_tce_pages(unsigned long iommu_pages)
  44 {
  45         return ALIGN(iommu_pages * sizeof(u64), PAGE_SIZE) / PAGE_SIZE;
  46 }
  47
  48 static unsigned long kvmppc_stt_pages(unsigned long tce_pages)
  49 {
  50         unsigned long stt_bytes = sizeof(struct kvmppc_spapr_tce_table) +
  51                         (tce_pages * sizeof(struct page *));
  52
  53         return tce_pages + ALIGN(stt_bytes, PAGE_SIZE) / PAGE_SIZE;
  54 }
  55
  56 static long kvmppc_account_memlimit(unsigned long stt_pages, bool inc)
  57 {
  58         long ret = 0;
  59
  60         if (!current || !current->mm)
  61                 return ret; /* process exited */
  62
  63         down_write(&current->mm->mmap_sem);
  64
  65         if (inc) {
  66                 unsigned long locked, lock_limit;
  67
  68                 locked = current->mm->locked_vm + stt_pages;
  69                 lock_limit = rlimit(RLIMIT_MEMLOCK) >> PAGE_SHIFT;
  70                 if (locked > lock_limit && !capable(CAP_IPC_LOCK))
  71                         ret = -ENOMEM;
  72                 else
  73                         current->mm->locked_vm += stt_pages;
  74         } else {
  75                 if (WARN_ON_ONCE(stt_pages > current->mm->locked_vm))
  76                         stt_pages = current->mm->locked_vm;
  77
  78                 current->mm->locked_vm -= stt_pages;
  79         }
  80
  81         pr_debug("[%d] RLIMIT_MEMLOCK KVM %c%ld %ld/%ld%s\n", current->pid,
  82                         inc ? '+' : '-',
  83                         stt_pages << PAGE_SHIFT,
  84                         current->mm->locked_vm << PAGE_SHIFT,
  85                         rlimit(RLIMIT_MEMLOCK),
  86                         ret ? " - exceeded" : "");
  87
  88         up_write(&current->mm->mmap_sem);
  89
  90         return ret;
  91 }
  92
  93 static void release_spapr_tce_table(struct rcu_head *head)
  94 {
  95         struct kvmppc_spapr_tce_table *stt = container_of(head,
  96                         struct kvmppc_spapr_tce_table, rcu);
  97         unsigned long i, npages = kvmppc_tce_pages(stt->size);
  98
  99         for (i = 0; i < npages; i++)
 100                 __free_page(stt->pages[i]);
 101
 102         kfree(stt);
 103 }
 104
 105 static int kvm_spapr_tce_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
 106 {
 107         struct kvmppc_spapr_tce_table *stt = vma->vm_file->private_data;
 108         struct page *page;
 109
 110         if (vmf->pgoff >= kvmppc_tce_pages(stt->size))
 111                 return VM_FAULT_SIGBUS;
 112
 113         page = stt->pages[vmf->pgoff];
 114         get_page(page);
 115         vmf->page = page;
 116         return 0;
 117 }
 118
 119 static const struct vm_operations_struct kvm_spapr_tce_vm_ops = {
 120         .fault = kvm_spapr_tce_fault,
 121 };
 122
 123 static int kvm_spapr_tce_mmap(struct file *file, struct vm_area_struct *vma)
 124 {
 125         vma->vm_ops = &kvm_spapr_tce_vm_ops;
 126         return 0;
 127 }
 128
 129 static int kvm_spapr_tce_release(struct inode *inode, struct file *filp)
 130 {
 131         struct kvmppc_spapr_tce_table *stt = filp->private_data;
 132
 133         list_del_rcu(&stt->list);
 134
 135         kvm_put_kvm(stt->kvm);
 136
 137         kvmppc_account_memlimit(
 138                 kvmppc_stt_pages(kvmppc_tce_pages(stt->size)), false);
 139         call_rcu(&stt->rcu, release_spapr_tce_table);
 140
 141         return 0;
 142 }
 143
 144 static const struct file_operations kvm_spapr_tce_fops = {
 145         .mmap           = kvm_spapr_tce_mmap,
 146         .release        = kvm_spapr_tce_release,
 147 };
 148
 149 long kvm_vm_ioctl_create_spapr_tce(struct kvm *kvm,
 150                                    struct kvm_create_spapr_tce_64 *args)
 151 {
 152         struct kvmppc_spapr_tce_table *stt = NULL;
 153         unsigned long npages, size;
 154         int ret = -ENOMEM;
 155         int i;
 156
 157         if (!args->size)
 158                 return -EINVAL;
 159
 160         /* Check this LIOBN hasn't been previously allocated */
 161         list_for_each_entry(stt, &kvm->arch.spapr_tce_tables, list) {
 162                 if (stt->liobn == args->liobn)
 163                         return -EBUSY;
 164         }
 165
 166         size = args->size;
 167         npages = kvmppc_tce_pages(size);
 168         ret = kvmppc_account_memlimit(kvmppc_stt_pages(npages), true);
 169         if (ret) {
 170                 stt = NULL;
 171                 goto fail;
 172         }
 173
 174         ret = -ENOMEM;
 175         stt = kzalloc(sizeof(*stt) + npages * sizeof(struct page *),
 176                       GFP_KERNEL);
 177         if (!stt)
 178                 goto fail;
 179
 180         stt->liobn = args->liobn;
 181         stt->page_shift = args->page_shift;
 182         stt->offset = args->offset;
 183         stt->size = size;
 184         stt->kvm = kvm;
 185
 186         for (i = 0; i < npages; i++) {
 187                 stt->pages[i] = alloc_page(GFP_KERNEL | __GFP_ZERO);
 188                 if (!stt->pages[i])
 189                         goto fail;
 190         }
 191
 192         kvm_get_kvm(kvm);
 193
 194         mutex_lock(&kvm->lock);
 195         list_add_rcu(&stt->list, &kvm->arch.spapr_tce_tables);
 196
 197         mutex_unlock(&kvm->lock);
 198
 199         return anon_inode_getfd("kvm-spapr-tce", &kvm_spapr_tce_fops,
 200                                 stt, O_RDWR | O_CLOEXEC);
 201
 202 fail:
 203         if (stt) {
 204                 for (i = 0; i < npages; i++)
 205                         if (stt->pages[i])
 206                                 __free_page(stt->pages[i]);
 207
 208                 kfree(stt);
 209         }
 210         return ret;
 211 }
 212
 213 long kvmppc_h_put_tce(struct kvm_vcpu *vcpu, unsigned long liobn,
 214                       unsigned long ioba, unsigned long tce)
 215 {
 216         struct kvmppc_spapr_tce_table *stt;
 217         long ret;
 218
 219         /* udbg_printf("H_PUT_TCE(): liobn=0x%lx ioba=0x%lx, tce=0x%lx\n", */
 220         /*          liobn, ioba, tce); */
 221
 222         stt = kvmppc_find_table(vcpu->kvm, liobn);
 223         if (!stt)
 224                 return H_TOO_HARD;
 225
 226         ret = kvmppc_ioba_validate(stt, ioba, 1);
 227         if (ret != H_SUCCESS)
 228                 return ret;
 229
 230         ret = kvmppc_tce_validate(stt, tce);
 231         if (ret != H_SUCCESS)
 232                 return ret;
 233
 234         kvmppc_tce_put(stt, ioba >> stt->page_shift, tce);
 235
 236         return H_SUCCESS;
 237 }
 238 EXPORT_SYMBOL_GPL(kvmppc_h_put_tce);
 239
 240 long kvmppc_h_put_tce_indirect(struct kvm_vcpu *vcpu,
 241                 unsigned long liobn, unsigned long ioba,
 242                 unsigned long tce_list, unsigned long npages)
 243 {
 244         struct kvmppc_spapr_tce_table *stt;
 245         long i, ret = H_SUCCESS, idx;
 246         unsigned long entry, ua = 0;
 247         u64 __user *tces;
 248         u64 tce;
 249
 250         stt = kvmppc_find_table(vcpu->kvm, liobn);
 251         if (!stt)
 252                 return H_TOO_HARD;
 253
 254         entry = ioba >> stt->page_shift;
 255         /*
 256          * SPAPR spec says that the maximum size of the list is 512 TCEs
 257          * so the whole table fits in 4K page
 258          */
 259         if (npages > 512)
 260                 return H_PARAMETER;
 261
 262         if (tce_list & (SZ_4K - 1))
 263                 return H_PARAMETER;
 264
 265         ret = kvmppc_ioba_validate(stt, ioba, npages);
 266         if (ret != H_SUCCESS)
 267                 return ret;
 268
 269         idx = srcu_read_lock(&vcpu->kvm->srcu);
 270         if (kvmppc_gpa_to_ua(vcpu->kvm, tce_list, &ua, NULL)) {
 271                 ret = H_TOO_HARD;
 272                 goto unlock_exit;
 273         }
 274         tces = (u64 __user *) ua;
 275
 276         for (i = 0; i < npages; ++i) {
 277                 if (get_user(tce, tces + i)) {
 278                         ret = H_TOO_HARD;
 279                         goto unlock_exit;
 280                 }
 281                 tce = be64_to_cpu(tce);
 282
 283                 ret = kvmppc_tce_validate(stt, tce);
 284                 if (ret != H_SUCCESS)
 285                         goto unlock_exit;
 286
 287                 kvmppc_tce_put(stt, entry + i, tce);
 288         }
 289
 290 unlock_exit:
 291         srcu_read_unlock(&vcpu->kvm->srcu, idx);
 292
 293         return ret;
 294 }
 295 EXPORT_SYMBOL_GPL(kvmppc_h_put_tce_indirect);
 296
 297 long kvmppc_h_stuff_tce(struct kvm_vcpu *vcpu,
 298                 unsigned long liobn, unsigned long ioba,
 299                 unsigned long tce_value, unsigned long npages)
 300 {
 301         struct kvmppc_spapr_tce_table *stt;
 302         long i, ret;
 303
 304         stt = kvmppc_find_table(vcpu->kvm, liobn);
 305         if (!stt)
 306                 return H_TOO_HARD;
 307
 308         ret = kvmppc_ioba_validate(stt, ioba, npages);
 309         if (ret != H_SUCCESS)
 310                 return ret;
 311
 312         /* Check permission bits only to allow userspace poison TCE for debug */
 313         if (tce_value & (TCE_PCI_WRITE | TCE_PCI_READ))
 314                 return H_PARAMETER;
 315
 316         for (i = 0; i < npages; ++i, ioba += (1ULL << stt->page_shift))
 317                 kvmppc_tce_put(stt, ioba >> stt->page_shift, tce_value);
 318
 319         return H_SUCCESS;
 320 }
 321 EXPORT_SYMBOL_GPL(kvmppc_h_stuff_tce);