arch/um/kernel/skas/mmu.c

   1 /*
   2  * Copyright (C) 2002 - 2007 Jeff Dike (jdike@{addtoit,linux.intel}.com)
   3  * Licensed under the GPL
   4  */
   5
   6 #include "linux/mm.h"
   7 #include "linux/sched.h"
   8 #include "asm/pgalloc.h"
   9 #include "asm/pgtable.h"
  10 #include "as-layout.h"
  11 #include "os.h"
  12 #include "skas.h"
  13
  14 extern int __syscall_stub_start;
  15
  16 static int init_stub_pte(struct mm_struct *mm, unsigned long proc,
  17                          unsigned long kernel)
  18 {
  19         pgd_t *pgd;
  20         pud_t *pud;
  21         pmd_t *pmd;
  22         pte_t *pte;
  23
  24         pgd = pgd_offset(mm, proc);
  25         pud = pud_alloc(mm, pgd, proc);
  26         if (!pud)
  27                 goto out;
  28
  29         pmd = pmd_alloc(mm, pud, proc);
  30         if (!pmd)
  31                 goto out_pmd;
  32
  33         pte = pte_alloc_map(mm, pmd, proc);
  34         if (!pte)
  35                 goto out_pte;
  36
  37         *pte = mk_pte(virt_to_page(kernel), __pgprot(_PAGE_PRESENT));
  38         *pte = pte_mkread(*pte);
  39         return 0;
  40
  41  out_pmd:
  42         pud_free(mm, pud);
  43  out_pte:
  44         pmd_free(mm, pmd);
  45  out:
  46         return -ENOMEM;
  47 }
  48
  49 int init_new_context(struct task_struct *task, struct mm_struct *mm)
  50 {
  51         struct mm_context *from_mm = NULL;
  52         struct mm_context *to_mm = &mm->context;
  53         unsigned long stack = 0;
  54         int ret = -ENOMEM;
  55
  56         if (skas_needs_stub) {
  57                 stack = get_zeroed_page(GFP_KERNEL);
  58                 if (stack == 0)
  59                         goto out;
  60         }
  61
  62         to_mm->id.stack = stack;
  63         if (current->mm != NULL && current->mm != &init_mm)
  64                 from_mm = &current->mm->context;
  65
  66         if (proc_mm) {
  67                 ret = new_mm(stack);
  68                 if (ret < 0) {
  69                         printk(KERN_ERR "init_new_context_skas - "
  70                                "new_mm failed, errno = %d\n", ret);
  71                         goto out_free;
  72                 }
  73                 to_mm->id.u.mm_fd = ret;
  74         }
  75         else {
  76                 if (from_mm)
  77                         to_mm->id.u.pid = copy_context_skas0(stack,
  78                                                              from_mm->id.u.pid);
  79                 else to_mm->id.u.pid = start_userspace(stack);
  80
  81                 if (to_mm->id.u.pid < 0) {
  82                         ret = to_mm->id.u.pid;
  83                         goto out_free;
  84                 }
  85         }
  86
  87         ret = init_new_ldt(to_mm, from_mm);
  88         if (ret < 0) {
  89                 printk(KERN_ERR "init_new_context_skas - init_ldt"
  90                        " failed, errno = %d\n", ret);
  91                 goto out_free;
  92         }
  93
  94         return 0;
  95
  96  out_free:
  97         if (to_mm->id.stack != 0)
  98                 free_page(to_mm->id.stack);
  99  out:
 100         return ret;
 101 }
 102
 103 void arch_dup_mmap(struct mm_struct *oldmm, struct mm_struct *mm)
 104 {
 105         struct page **pages;
 106         int err, ret;
 107
 108         if (!skas_needs_stub)
 109                 return;
 110
 111         ret = init_stub_pte(mm, STUB_CODE,
 112                             (unsigned long) &__syscall_stub_start);
 113         if (ret)
 114                 goto out;
 115
 116         ret = init_stub_pte(mm, STUB_DATA, mm->context.id.stack);
 117         if (ret)
 118                 goto out;
 119
 120         pages = kmalloc(2 * sizeof(struct page *), GFP_KERNEL);
 121         if (pages == NULL) {
 122                 printk(KERN_ERR "arch_dup_mmap failed to allocate 2 page "
 123                        "pointers\n");
 124                 goto out;
 125         }
 126
 127         pages[0] = virt_to_page(&__syscall_stub_start);
 128         pages[1] = virt_to_page(mm->context.id.stack);
 129
 130         /* dup_mmap already holds mmap_sem */
 131         err = install_special_mapping(mm, STUB_START, STUB_END - STUB_START,
 132                                       VM_READ | VM_MAYREAD | VM_EXEC |
 133                                       VM_MAYEXEC | VM_DONTCOPY, pages);
 134         if (err) {
 135                 printk(KERN_ERR "install_special_mapping returned %d\n", err);
 136                 goto out_free;
 137         }
 138         return;
 139
 140 out_free:
 141         kfree(pages);
 142 out:
 143         force_sigsegv(SIGSEGV, current);
 144 }
 145
 146 void arch_exit_mmap(struct mm_struct *mm)
 147 {
 148         pte_t *pte;
 149
 150         pte = virt_to_pte(mm, STUB_CODE);
 151         if (pte != NULL)
 152                 pte_clear(mm, STUB_CODE, pte);
 153
 154         pte = virt_to_pte(mm, STUB_DATA);
 155         if (pte == NULL)
 156                 return;
 157
 158         pte_clear(mm, STUB_DATA, pte);
 159 }
 160
 161 void destroy_context(struct mm_struct *mm)
 162 {
 163         struct mm_context *mmu = &mm->context;
 164
 165         if (proc_mm)
 166                 os_close_file(mmu->id.u.mm_fd);
 167         else {
 168                 /*
 169                  * If init_new_context wasn't called, this will be
 170                  * zero, resulting in a kill(0), which will result in the
 171                  * whole UML suddenly dying.  Also, cover negative and
 172                  * 1 cases, since they shouldn't happen either.
 173                  */
 174                 if (mmu->id.u.pid < 2) {
 175                         printk(KERN_ERR "corrupt mm_context - pid = %d\n",
 176                                mmu->id.u.pid);
 177                         return;
 178                 }
 179                 os_kill_ptraced_process(mmu->id.u.pid, 1);
 180         }
 181
 182         if (skas_needs_stub)
 183                 free_page(mmu->id.stack);
 184
 185         free_ldt(mmu);
 186 }