Loading...
1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * flexible mmap layout support
4 *
5 * Copyright 2003-2004 Red Hat Inc., Durham, North Carolina.
6 * All Rights Reserved.
7 *
8 * Started by Ingo Molnar <mingo@elte.hu>
9 */
10
11#include <linux/elf-randomize.h>
12#include <linux/personality.h>
13#include <linux/mm.h>
14#include <linux/mman.h>
15#include <linux/sched/signal.h>
16#include <linux/sched/mm.h>
17#include <linux/random.h>
18#include <linux/compat.h>
19#include <linux/security.h>
20#include <asm/elf.h>
21
22static unsigned long stack_maxrandom_size(void)
23{
24 if (!(current->flags & PF_RANDOMIZE))
25 return 0;
26 return STACK_RND_MASK << PAGE_SHIFT;
27}
28
29static inline int mmap_is_legacy(struct rlimit *rlim_stack)
30{
31 if (current->personality & ADDR_COMPAT_LAYOUT)
32 return 1;
33 if (rlim_stack->rlim_cur == RLIM_INFINITY)
34 return 1;
35 return sysctl_legacy_va_layout;
36}
37
38unsigned long arch_mmap_rnd(void)
39{
40 return (get_random_u32() & MMAP_RND_MASK) << PAGE_SHIFT;
41}
42
43static unsigned long mmap_base_legacy(unsigned long rnd)
44{
45 return TASK_UNMAPPED_BASE + rnd;
46}
47
48static inline unsigned long mmap_base(unsigned long rnd,
49 struct rlimit *rlim_stack)
50{
51 unsigned long gap = rlim_stack->rlim_cur;
52 unsigned long pad = stack_maxrandom_size() + stack_guard_gap;
53 unsigned long gap_min, gap_max;
54
55 /* Values close to RLIM_INFINITY can overflow. */
56 if (gap + pad > gap)
57 gap += pad;
58
59 /*
60 * Top of mmap area (just below the process stack).
61 * Leave at least a ~128 MB hole.
62 */
63 gap_min = SZ_128M;
64 gap_max = (STACK_TOP / 6) * 5;
65
66 if (gap < gap_min)
67 gap = gap_min;
68 else if (gap > gap_max)
69 gap = gap_max;
70
71 return PAGE_ALIGN(STACK_TOP - gap - rnd);
72}
73
74unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
75 unsigned long len, unsigned long pgoff,
76 unsigned long flags)
77{
78 struct mm_struct *mm = current->mm;
79 struct vm_area_struct *vma;
80 struct vm_unmapped_area_info info;
81
82 if (len > TASK_SIZE - mmap_min_addr)
83 return -ENOMEM;
84
85 if (flags & MAP_FIXED)
86 goto check_asce_limit;
87
88 if (addr) {
89 addr = PAGE_ALIGN(addr);
90 vma = find_vma(mm, addr);
91 if (TASK_SIZE - len >= addr && addr >= mmap_min_addr &&
92 (!vma || addr + len <= vm_start_gap(vma)))
93 goto check_asce_limit;
94 }
95
96 info.flags = 0;
97 info.length = len;
98 info.low_limit = mm->mmap_base;
99 info.high_limit = TASK_SIZE;
100 if (filp || (flags & MAP_SHARED))
101 info.align_mask = MMAP_ALIGN_MASK << PAGE_SHIFT;
102 else
103 info.align_mask = 0;
104 info.align_offset = pgoff << PAGE_SHIFT;
105 addr = vm_unmapped_area(&info);
106 if (offset_in_page(addr))
107 return addr;
108
109check_asce_limit:
110 return check_asce_limit(mm, addr, len);
111}
112
113unsigned long arch_get_unmapped_area_topdown(struct file *filp, unsigned long addr,
114 unsigned long len, unsigned long pgoff,
115 unsigned long flags)
116{
117 struct vm_area_struct *vma;
118 struct mm_struct *mm = current->mm;
119 struct vm_unmapped_area_info info;
120
121 /* requested length too big for entire address space */
122 if (len > TASK_SIZE - mmap_min_addr)
123 return -ENOMEM;
124
125 if (flags & MAP_FIXED)
126 goto check_asce_limit;
127
128 /* requesting a specific address */
129 if (addr) {
130 addr = PAGE_ALIGN(addr);
131 vma = find_vma(mm, addr);
132 if (TASK_SIZE - len >= addr && addr >= mmap_min_addr &&
133 (!vma || addr + len <= vm_start_gap(vma)))
134 goto check_asce_limit;
135 }
136
137 info.flags = VM_UNMAPPED_AREA_TOPDOWN;
138 info.length = len;
139 info.low_limit = max(PAGE_SIZE, mmap_min_addr);
140 info.high_limit = mm->mmap_base;
141 if (filp || (flags & MAP_SHARED))
142 info.align_mask = MMAP_ALIGN_MASK << PAGE_SHIFT;
143 else
144 info.align_mask = 0;
145 info.align_offset = pgoff << PAGE_SHIFT;
146 addr = vm_unmapped_area(&info);
147
148 /*
149 * A failed mmap() very likely causes application failure,
150 * so fall back to the bottom-up function here. This scenario
151 * can happen with large stack limits and large mmap()
152 * allocations.
153 */
154 if (offset_in_page(addr)) {
155 VM_BUG_ON(addr != -ENOMEM);
156 info.flags = 0;
157 info.low_limit = TASK_UNMAPPED_BASE;
158 info.high_limit = TASK_SIZE;
159 addr = vm_unmapped_area(&info);
160 if (offset_in_page(addr))
161 return addr;
162 }
163
164check_asce_limit:
165 return check_asce_limit(mm, addr, len);
166}
167
168/*
169 * This function, called very early during the creation of a new
170 * process VM image, sets up which VM layout function to use:
171 */
172void arch_pick_mmap_layout(struct mm_struct *mm, struct rlimit *rlim_stack)
173{
174 unsigned long random_factor = 0UL;
175
176 if (current->flags & PF_RANDOMIZE)
177 random_factor = arch_mmap_rnd();
178
179 /*
180 * Fall back to the standard layout if the personality
181 * bit is set, or if the expected stack growth is unlimited:
182 */
183 if (mmap_is_legacy(rlim_stack)) {
184 mm->mmap_base = mmap_base_legacy(random_factor);
185 mm->get_unmapped_area = arch_get_unmapped_area;
186 } else {
187 mm->mmap_base = mmap_base(random_factor, rlim_stack);
188 mm->get_unmapped_area = arch_get_unmapped_area_topdown;
189 }
190}
191
192static const pgprot_t protection_map[16] = {
193 [VM_NONE] = PAGE_NONE,
194 [VM_READ] = PAGE_RO,
195 [VM_WRITE] = PAGE_RO,
196 [VM_WRITE | VM_READ] = PAGE_RO,
197 [VM_EXEC] = PAGE_RX,
198 [VM_EXEC | VM_READ] = PAGE_RX,
199 [VM_EXEC | VM_WRITE] = PAGE_RX,
200 [VM_EXEC | VM_WRITE | VM_READ] = PAGE_RX,
201 [VM_SHARED] = PAGE_NONE,
202 [VM_SHARED | VM_READ] = PAGE_RO,
203 [VM_SHARED | VM_WRITE] = PAGE_RW,
204 [VM_SHARED | VM_WRITE | VM_READ] = PAGE_RW,
205 [VM_SHARED | VM_EXEC] = PAGE_RX,
206 [VM_SHARED | VM_EXEC | VM_READ] = PAGE_RX,
207 [VM_SHARED | VM_EXEC | VM_WRITE] = PAGE_RWX,
208 [VM_SHARED | VM_EXEC | VM_WRITE | VM_READ] = PAGE_RWX
209};
210DECLARE_VM_GET_PAGE_PROT
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 <linux/random.h>
31#include <asm/pgalloc.h>
32#include <asm/compat.h>
33
34static unsigned long stack_maxrandom_size(void)
35{
36 if (!(current->flags & PF_RANDOMIZE))
37 return 0;
38 if (current->personality & ADDR_NO_RANDOMIZE)
39 return 0;
40 return STACK_RND_MASK << PAGE_SHIFT;
41}
42
43/*
44 * Top of mmap area (just below the process stack).
45 *
46 * Leave at least a ~32 MB hole.
47 */
48#define MIN_GAP (32*1024*1024)
49#define MAX_GAP (STACK_TOP/6*5)
50
51static inline int mmap_is_legacy(void)
52{
53 if (current->personality & ADDR_COMPAT_LAYOUT)
54 return 1;
55 if (rlimit(RLIMIT_STACK) == RLIM_INFINITY)
56 return 1;
57 return sysctl_legacy_va_layout;
58}
59
60static unsigned long mmap_rnd(void)
61{
62 if (!(current->flags & PF_RANDOMIZE))
63 return 0;
64 /* 8MB randomization for mmap_base */
65 return (get_random_int() & 0x7ffUL) << PAGE_SHIFT;
66}
67
68static inline unsigned long mmap_base(void)
69{
70 unsigned long gap = rlimit(RLIMIT_STACK);
71
72 if (gap < MIN_GAP)
73 gap = MIN_GAP;
74 else if (gap > MAX_GAP)
75 gap = MAX_GAP;
76 gap &= PAGE_MASK;
77 return STACK_TOP - stack_maxrandom_size() - mmap_rnd() - gap;
78}
79
80#ifndef CONFIG_64BIT
81
82/*
83 * This function, called very early during the creation of a new
84 * process VM image, sets up which VM layout function to use:
85 */
86void arch_pick_mmap_layout(struct mm_struct *mm)
87{
88 /*
89 * Fall back to the standard layout if the personality
90 * bit is set, or if the expected stack growth is unlimited:
91 */
92 if (mmap_is_legacy()) {
93 mm->mmap_base = TASK_UNMAPPED_BASE;
94 mm->get_unmapped_area = arch_get_unmapped_area;
95 mm->unmap_area = arch_unmap_area;
96 } else {
97 mm->mmap_base = mmap_base();
98 mm->get_unmapped_area = arch_get_unmapped_area_topdown;
99 mm->unmap_area = arch_unmap_area_topdown;
100 }
101}
102EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
103
104#else
105
106int s390_mmap_check(unsigned long addr, unsigned long len)
107{
108 if (!is_compat_task() &&
109 len >= TASK_SIZE && TASK_SIZE < (1UL << 53))
110 return crst_table_upgrade(current->mm, 1UL << 53);
111 return 0;
112}
113
114static unsigned long
115s390_get_unmapped_area(struct file *filp, unsigned long addr,
116 unsigned long len, unsigned long pgoff, unsigned long flags)
117{
118 struct mm_struct *mm = current->mm;
119 unsigned long area;
120 int rc;
121
122 area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
123 if (!(area & ~PAGE_MASK))
124 return area;
125 if (area == -ENOMEM && !is_compat_task() && TASK_SIZE < (1UL << 53)) {
126 /* Upgrade the page table to 4 levels and retry. */
127 rc = crst_table_upgrade(mm, 1UL << 53);
128 if (rc)
129 return (unsigned long) rc;
130 area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
131 }
132 return area;
133}
134
135static unsigned long
136s390_get_unmapped_area_topdown(struct file *filp, const unsigned long addr,
137 const unsigned long len, const unsigned long pgoff,
138 const unsigned long flags)
139{
140 struct mm_struct *mm = current->mm;
141 unsigned long area;
142 int rc;
143
144 area = arch_get_unmapped_area_topdown(filp, addr, len, pgoff, flags);
145 if (!(area & ~PAGE_MASK))
146 return area;
147 if (area == -ENOMEM && !is_compat_task() && TASK_SIZE < (1UL << 53)) {
148 /* Upgrade the page table to 4 levels and retry. */
149 rc = crst_table_upgrade(mm, 1UL << 53);
150 if (rc)
151 return (unsigned long) rc;
152 area = arch_get_unmapped_area_topdown(filp, addr, len,
153 pgoff, flags);
154 }
155 return area;
156}
157/*
158 * This function, called very early during the creation of a new
159 * process VM image, sets up which VM layout function to use:
160 */
161void arch_pick_mmap_layout(struct mm_struct *mm)
162{
163 /*
164 * Fall back to the standard layout if the personality
165 * bit is set, or if the expected stack growth is unlimited:
166 */
167 if (mmap_is_legacy()) {
168 mm->mmap_base = TASK_UNMAPPED_BASE;
169 mm->get_unmapped_area = s390_get_unmapped_area;
170 mm->unmap_area = arch_unmap_area;
171 } else {
172 mm->mmap_base = mmap_base();
173 mm->get_unmapped_area = s390_get_unmapped_area_topdown;
174 mm->unmap_area = arch_unmap_area_topdown;
175 }
176}
177EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
178
179#endif