190996f538f87a84225a3f207a257275e25b9a7c
[linux-2.6.git] / arch / ia64 / mm / fault.c
1 /*
2  * MMU fault handling support.
3  *
4  * Copyright (C) 1998-2002 Hewlett-Packard Co
5  *      David Mosberger-Tang <davidm@hpl.hp.com>
6  */
7 #include <linux/sched.h>
8 #include <linux/kernel.h>
9 #include <linux/mm.h>
10 #include <linux/smp_lock.h>
11 #include <linux/interrupt.h>
12 #include <linux/vs_memory.h>
13
14 #include <asm/pgtable.h>
15 #include <asm/processor.h>
16 #include <asm/system.h>
17 #include <asm/uaccess.h>
18
19 extern void die (char *, struct pt_regs *, long);
20
21 /*
22  * This routine is analogous to expand_stack() but instead grows the
23  * register backing store (which grows towards higher addresses).
24  * Since the register backing store is access sequentially, we
25  * disallow growing the RBS by more than a page at a time.  Note that
26  * the VM_GROWSUP flag can be set on any VM area but that's fine
27  * because the total process size is still limited by RLIMIT_STACK and
28  * RLIMIT_AS.
29  */
30 static inline long
31 expand_backing_store (struct vm_area_struct *vma, unsigned long address)
32 {
33         unsigned long grow;
34
35         grow = PAGE_SIZE >> PAGE_SHIFT;
36         if (address - vma->vm_start > current->signal->rlim[RLIMIT_STACK].rlim_cur
37             || (((vma->vm_mm->total_vm + grow) << PAGE_SHIFT) >
38                 current->signal->rlim[RLIMIT_AS].rlim_cur))
39                 return -ENOMEM;
40         if (!vx_vmpages_avail(vma->vm_mm, grow) ||
41                 ((vma->vm_flags & VM_LOCKED) &&
42                 !vx_vmlocked_avail(vma->vm_mm, grow)))
43                 return -ENOMEM;
44         vma->vm_end += PAGE_SIZE;
45         // vma->vm_mm->total_vm += grow;
46         vx_vmpages_add(vma->vm_mm, grow);
47         if (vma->vm_flags & VM_LOCKED)
48                 // vma->vm_mm->locked_vm += grow;
49                 vx_vmlocked_add(vma->vm_mm, grow);
50         __vm_stat_account(vma->vm_mm, vma->vm_flags, vma->vm_file, grow);
51         return 0;
52 }
53
54 /*
55  * Return TRUE if ADDRESS points at a page in the kernel's mapped segment
56  * (inside region 5, on ia64) and that page is present.
57  */
58 static int
59 mapped_kernel_page_is_present (unsigned long address)
60 {
61         pgd_t *pgd;
62         pud_t *pud;
63         pmd_t *pmd;
64         pte_t *ptep, pte;
65
66         pgd = pgd_offset_k(address);
67         if (pgd_none(*pgd) || pgd_bad(*pgd))
68                 return 0;
69
70         pud = pud_offset(pgd, address);
71         if (pud_none(*pud) || pud_bad(*pud))
72                 return 0;
73
74         pmd = pmd_offset(pud, address);
75         if (pmd_none(*pmd) || pmd_bad(*pmd))
76                 return 0;
77
78         ptep = pte_offset_kernel(pmd, address);
79         if (!ptep)
80                 return 0;
81
82         pte = *ptep;
83         return pte_present(pte);
84 }
85
86 void
87 ia64_do_page_fault (unsigned long address, unsigned long isr, struct pt_regs *regs)
88 {
89         int signal = SIGSEGV, code = SEGV_MAPERR;
90         struct vm_area_struct *vma, *prev_vma;
91         struct mm_struct *mm = current->mm;
92         struct siginfo si;
93         unsigned long mask;
94
95         /*
96          * If we're in an interrupt or have no user context, we must not take the fault..
97          */
98         if (in_atomic() || !mm)
99                 goto no_context;
100
101 #ifdef CONFIG_VIRTUAL_MEM_MAP
102         /*
103          * If fault is in region 5 and we are in the kernel, we may already
104          * have the mmap_sem (pfn_valid macro is called during mmap). There
105          * is no vma for region 5 addr's anyway, so skip getting the semaphore
106          * and go directly to the exception handling code.
107          */
108
109         if ((REGION_NUMBER(address) == 5) && !user_mode(regs))
110                 goto bad_area_no_up;
111 #endif
112
113         down_read(&mm->mmap_sem);
114
115         vma = find_vma_prev(mm, address, &prev_vma);
116         if (!vma)
117                 goto bad_area;
118
119         /* find_vma_prev() returns vma such that address < vma->vm_end or NULL */
120         if (address < vma->vm_start)
121                 goto check_expansion;
122
123   good_area:
124         code = SEGV_ACCERR;
125
126         /* OK, we've got a good vm_area for this memory area.  Check the access permissions: */
127
128 #       define VM_READ_BIT      0
129 #       define VM_WRITE_BIT     1
130 #       define VM_EXEC_BIT      2
131
132 #       if (((1 << VM_READ_BIT) != VM_READ || (1 << VM_WRITE_BIT) != VM_WRITE) \
133             || (1 << VM_EXEC_BIT) != VM_EXEC)
134 #               error File is out of sync with <linux/mm.h>.  Please update.
135 #       endif
136
137         mask = (  (((isr >> IA64_ISR_X_BIT) & 1UL) << VM_EXEC_BIT)
138                 | (((isr >> IA64_ISR_W_BIT) & 1UL) << VM_WRITE_BIT)
139                 | (((isr >> IA64_ISR_R_BIT) & 1UL) << VM_READ_BIT));
140
141         if ((vma->vm_flags & mask) != mask)
142                 goto bad_area;
143
144   survive:
145         /*
146          * If for any reason at all we couldn't handle the fault, make
147          * sure we exit gracefully rather than endlessly redo the
148          * fault.
149          */
150         switch (handle_mm_fault(mm, vma, address, (mask & VM_WRITE) != 0)) {
151               case VM_FAULT_MINOR:
152                 ++current->min_flt;
153                 break;
154               case VM_FAULT_MAJOR:
155                 ++current->maj_flt;
156                 break;
157               case VM_FAULT_SIGBUS:
158                 /*
159                  * We ran out of memory, or some other thing happened
160                  * to us that made us unable to handle the page fault
161                  * gracefully.
162                  */
163                 signal = SIGBUS;
164                 goto bad_area;
165               case VM_FAULT_OOM:
166                 goto out_of_memory;
167               default:
168                 BUG();
169         }
170         up_read(&mm->mmap_sem);
171         return;
172
173   check_expansion:
174         if (!(prev_vma && (prev_vma->vm_flags & VM_GROWSUP) && (address == prev_vma->vm_end))) {
175                 if (!(vma->vm_flags & VM_GROWSDOWN))
176                         goto bad_area;
177                 if (REGION_NUMBER(address) != REGION_NUMBER(vma->vm_start)
178                     || REGION_OFFSET(address) >= RGN_MAP_LIMIT)
179                         goto bad_area;
180                 if (expand_stack(vma, address))
181                         goto bad_area;
182         } else {
183                 vma = prev_vma;
184                 if (REGION_NUMBER(address) != REGION_NUMBER(vma->vm_start)
185                     || REGION_OFFSET(address) >= RGN_MAP_LIMIT)
186                         goto bad_area;
187                 if (expand_backing_store(vma, address))
188                         goto bad_area;
189         }
190         goto good_area;
191
192   bad_area:
193         up_read(&mm->mmap_sem);
194 #ifdef CONFIG_VIRTUAL_MEM_MAP
195   bad_area_no_up:
196 #endif
197         if ((isr & IA64_ISR_SP)
198             || ((isr & IA64_ISR_NA) && (isr & IA64_ISR_CODE_MASK) == IA64_ISR_CODE_LFETCH))
199         {
200                 /*
201                  * This fault was due to a speculative load or lfetch.fault, set the "ed"
202                  * bit in the psr to ensure forward progress.  (Target register will get a
203                  * NaT for ld.s, lfetch will be canceled.)
204                  */
205                 ia64_psr(regs)->ed = 1;
206                 return;
207         }
208         if (user_mode(regs)) {
209                 si.si_signo = signal;
210                 si.si_errno = 0;
211                 si.si_code = code;
212                 si.si_addr = (void __user *) address;
213                 si.si_isr = isr;
214                 si.si_flags = __ISR_VALID;
215                 force_sig_info(signal, &si, current);
216                 return;
217         }
218
219   no_context:
220         if (isr & IA64_ISR_SP) {
221                 /*
222                  * This fault was due to a speculative load set the "ed" bit in the psr to
223                  * ensure forward progress (target register will get a NaT).
224                  */
225                 ia64_psr(regs)->ed = 1;
226                 return;
227         }
228
229         if (ia64_done_with_exception(regs))
230                 return;
231
232         /*
233          * Since we have no vma's for region 5, we might get here even if the address is
234          * valid, due to the VHPT walker inserting a non present translation that becomes
235          * stale. If that happens, the non present fault handler already purged the stale
236          * translation, which fixed the problem. So, we check to see if the translation is
237          * valid, and return if it is.
238          */
239         if (REGION_NUMBER(address) == 5 && mapped_kernel_page_is_present(address))
240                 return;
241
242         /*
243          * Oops. The kernel tried to access some bad page. We'll have to terminate things
244          * with extreme prejudice.
245          */
246         bust_spinlocks(1);
247
248         if (address < PAGE_SIZE)
249                 printk(KERN_ALERT "Unable to handle kernel NULL pointer dereference (address %016lx)\n", address);
250         else
251                 printk(KERN_ALERT "Unable to handle kernel paging request at "
252                        "virtual address %016lx\n", address);
253         die("Oops", regs, isr);
254         bust_spinlocks(0);
255         do_exit(SIGKILL);
256         return;
257
258   out_of_memory:
259         up_read(&mm->mmap_sem);
260         if (current->pid == 1) {
261                 yield();
262                 down_read(&mm->mmap_sem);
263                 goto survive;
264         }
265         printk(KERN_CRIT "VM: killing process %s\n", current->comm);
266         if (user_mode(regs))
267                 do_exit(SIGKILL);
268         goto no_context;
269 }