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