Merge branch 'master' of git://git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux...
[linux-2.6] / arch / s390 / mm / mmap.c
1 /*
2  *  linux/arch/s390/mm/mmap.c
3  *
4  *  flexible mmap layout support
5  *
6  * Copyright 2003-2004 Red Hat Inc., Durham, North Carolina.
7  * All Rights Reserved.
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
22  *
23  *
24  * Started by Ingo Molnar <mingo@elte.hu>
25  */
26
27 #include <linux/personality.h>
28 #include <linux/mm.h>
29 #include <linux/module.h>
30 #include <asm/pgalloc.h>
31
32 /*
33  * Top of mmap area (just below the process stack).
34  *
35  * Leave an at least ~128 MB hole.
36  */
37 #define MIN_GAP (128*1024*1024)
38 #define MAX_GAP (STACK_TOP/6*5)
39
40 static inline unsigned long mmap_base(void)
41 {
42         unsigned long gap = current->signal->rlim[RLIMIT_STACK].rlim_cur;
43
44         if (gap < MIN_GAP)
45                 gap = MIN_GAP;
46         else if (gap > MAX_GAP)
47                 gap = MAX_GAP;
48
49         return STACK_TOP - (gap & PAGE_MASK);
50 }
51
52 static inline int mmap_is_legacy(void)
53 {
54 #ifdef CONFIG_64BIT
55         /*
56          * Force standard allocation for 64 bit programs.
57          */
58         if (!test_thread_flag(TIF_31BIT))
59                 return 1;
60 #endif
61         return sysctl_legacy_va_layout ||
62             (current->personality & ADDR_COMPAT_LAYOUT) ||
63             current->signal->rlim[RLIMIT_STACK].rlim_cur == RLIM_INFINITY;
64 }
65
66 #ifndef CONFIG_64BIT
67
68 /*
69  * This function, called very early during the creation of a new
70  * process VM image, sets up which VM layout function to use:
71  */
72 void arch_pick_mmap_layout(struct mm_struct *mm)
73 {
74         /*
75          * Fall back to the standard layout if the personality
76          * bit is set, or if the expected stack growth is unlimited:
77          */
78         if (mmap_is_legacy()) {
79                 mm->mmap_base = TASK_UNMAPPED_BASE;
80                 mm->get_unmapped_area = arch_get_unmapped_area;
81                 mm->unmap_area = arch_unmap_area;
82         } else {
83                 mm->mmap_base = mmap_base();
84                 mm->get_unmapped_area = arch_get_unmapped_area_topdown;
85                 mm->unmap_area = arch_unmap_area_topdown;
86         }
87 }
88 EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
89
90 #else
91
92 int s390_mmap_check(unsigned long addr, unsigned long len)
93 {
94         if (!test_thread_flag(TIF_31BIT) &&
95             len >= TASK_SIZE && TASK_SIZE < (1UL << 53))
96                 return crst_table_upgrade(current->mm, 1UL << 53);
97         return 0;
98 }
99
100 static unsigned long
101 s390_get_unmapped_area(struct file *filp, unsigned long addr,
102                 unsigned long len, unsigned long pgoff, unsigned long flags)
103 {
104         struct mm_struct *mm = current->mm;
105         unsigned long area;
106         int rc;
107
108         area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
109         if (!(area & ~PAGE_MASK))
110                 return area;
111         if (area == -ENOMEM &&
112             !test_thread_flag(TIF_31BIT) && TASK_SIZE < (1UL << 53)) {
113                 /* Upgrade the page table to 4 levels and retry. */
114                 rc = crst_table_upgrade(mm, 1UL << 53);
115                 if (rc)
116                         return (unsigned long) rc;
117                 area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
118         }
119         return area;
120 }
121
122 static unsigned long
123 s390_get_unmapped_area_topdown(struct file *filp, const unsigned long addr,
124                           const unsigned long len, const unsigned long pgoff,
125                           const unsigned long flags)
126 {
127         struct mm_struct *mm = current->mm;
128         unsigned long area;
129         int rc;
130
131         area = arch_get_unmapped_area_topdown(filp, addr, len, pgoff, flags);
132         if (!(area & ~PAGE_MASK))
133                 return area;
134         if (area == -ENOMEM &&
135             !test_thread_flag(TIF_31BIT) && TASK_SIZE < (1UL << 53)) {
136                 /* Upgrade the page table to 4 levels and retry. */
137                 rc = crst_table_upgrade(mm, 1UL << 53);
138                 if (rc)
139                         return (unsigned long) rc;
140                 area = arch_get_unmapped_area_topdown(filp, addr, len,
141                                                       pgoff, flags);
142         }
143         return area;
144 }
145 /*
146  * This function, called very early during the creation of a new
147  * process VM image, sets up which VM layout function to use:
148  */
149 void arch_pick_mmap_layout(struct mm_struct *mm)
150 {
151         /*
152          * Fall back to the standard layout if the personality
153          * bit is set, or if the expected stack growth is unlimited:
154          */
155         if (mmap_is_legacy()) {
156                 mm->mmap_base = TASK_UNMAPPED_BASE;
157                 mm->get_unmapped_area = s390_get_unmapped_area;
158                 mm->unmap_area = arch_unmap_area;
159         } else {
160                 mm->mmap_base = mmap_base();
161                 mm->get_unmapped_area = s390_get_unmapped_area_topdown;
162                 mm->unmap_area = arch_unmap_area_topdown;
163         }
164 }
165 EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
166
167 #endif