arch/x86/kernel/sys_x86_64.c

   1 #include <linux/errno.h>
   2 #include <linux/sched.h>
   3 #include <linux/syscalls.h>
   4 #include <linux/mm.h>
   5 #include <linux/fs.h>
   6 #include <linux/smp.h>
   7 #include <linux/sem.h>
   8 #include <linux/msg.h>
   9 #include <linux/shm.h>
  10 #include <linux/stat.h>
  11 #include <linux/mman.h>
  12 #include <linux/file.h>
  13 #include <linux/utsname.h>
  14 #include <linux/personality.h>
  15 #include <linux/random.h>
  16 #include <linux/uaccess.h>
  17 #include <linux/elf.h>
  18
  19 #include <asm/compat.h>
  20 #include <asm/ia32.h>
  21 #include <asm/syscalls.h>
  22
  23 /*
  24  * Align a virtual address to avoid aliasing in the I$ on AMD F15h.
  25  */
  26 static unsigned long get_align_mask(void)
  27 {
  28         /* handle 32- and 64-bit case with a single conditional */
  29         if (va_align.flags < 0 || !(va_align.flags & (2 - mmap_is_ia32())))
  30                 return 0;
  31
  32         if (!(current->flags & PF_RANDOMIZE))
  33                 return 0;
  34
  35         return va_align.mask;
  36 }
  37
  38 /*
  39  * To avoid aliasing in the I$ on AMD F15h, the bits defined by the
  40  * va_align.bits, [12:upper_bit), are set to a random value instead of
  41  * zeroing them. This random value is computed once per boot. This form
  42  * of ASLR is known as "per-boot ASLR".
  43  *
  44  * To achieve this, the random value is added to the info.align_offset
  45  * value before calling vm_unmapped_area() or ORed directly to the
  46  * address.
  47  */
  48 static unsigned long get_align_bits(void)
  49 {
  50         return va_align.bits & get_align_mask();
  51 }
  52
  53 unsigned long align_vdso_addr(unsigned long addr)
  54 {
  55         unsigned long align_mask = get_align_mask();
  56         addr = (addr + align_mask) & ~align_mask;
  57         return addr | get_align_bits();
  58 }
  59
  60 static int __init control_va_addr_alignment(char *str)
  61 {
  62         /* guard against enabling this on other CPU families */
  63         if (va_align.flags < 0)
  64                 return 1;
  65
  66         if (*str == 0)
  67                 return 1;
  68
  69         if (!strcmp(str, "32"))
  70                 va_align.flags = ALIGN_VA_32;
  71         else if (!strcmp(str, "64"))
  72                 va_align.flags = ALIGN_VA_64;
  73         else if (!strcmp(str, "off"))
  74                 va_align.flags = 0;
  75         else if (!strcmp(str, "on"))
  76                 va_align.flags = ALIGN_VA_32 | ALIGN_VA_64;
  77         else
  78                 pr_warn("invalid option value: 'align_va_addr=%s'\n", str);
  79
  80         return 1;
  81 }
  82 __setup("align_va_addr=", control_va_addr_alignment);
  83
  84 SYSCALL_DEFINE6(mmap, unsigned long, addr, unsigned long, len,
  85                 unsigned long, prot, unsigned long, flags,
  86                 unsigned long, fd, unsigned long, off)
  87 {
  88         long error;
  89         error = -EINVAL;
  90         if (off & ~PAGE_MASK)
  91                 goto out;
  92
  93         error = sys_mmap_pgoff(addr, len, prot, flags, fd, off >> PAGE_SHIFT);
  94 out:
  95         return error;
  96 }
  97
  98 static void find_start_end(unsigned long flags, unsigned long *begin,
  99                            unsigned long *end)
 100 {
 101         if (!in_compat_syscall() && (flags & MAP_32BIT)) {
 102                 /* This is usually used needed to map code in small
 103                    model, so it needs to be in the first 31bit. Limit
 104                    it to that.  This means we need to move the
 105                    unmapped base down for this case. This can give
 106                    conflicts with the heap, but we assume that glibc
 107                    malloc knows how to fall back to mmap. Give it 1GB
 108                    of playground for now. -AK */
 109                 *begin = 0x40000000;
 110                 *end = 0x80000000;
 111                 if (current->flags & PF_RANDOMIZE) {
 112                         *begin = randomize_page(*begin, 0x02000000);
 113                 }
 114         } else {
 115                 *begin = current->mm->mmap_legacy_base;
 116                 *end = TASK_SIZE;
 117         }
 118 }
 119
 120 unsigned long
 121 arch_get_unmapped_area(struct file *filp, unsigned long addr,
 122                 unsigned long len, unsigned long pgoff, unsigned long flags)
 123 {
 124         struct mm_struct *mm = current->mm;
 125         struct vm_area_struct *vma;
 126         struct vm_unmapped_area_info info;
 127         unsigned long begin, end;
 128
 129         if (flags & MAP_FIXED)
 130                 return addr;
 131
 132         find_start_end(flags, &begin, &end);
 133
 134         if (len > end)
 135                 return -ENOMEM;
 136
 137         if (addr) {
 138                 addr = PAGE_ALIGN(addr);
 139                 vma = find_vma(mm, addr);
 140                 if (end - len >= addr &&
 141                     (!vma || addr + len <= vm_start_gap(vma)))
 142                         return addr;
 143         }
 144
 145         info.flags = 0;
 146         info.length = len;
 147         info.low_limit = begin;
 148         info.high_limit = end;
 149         info.align_mask = 0;
 150         info.align_offset = pgoff << PAGE_SHIFT;
 151         if (filp) {
 152                 info.align_mask = get_align_mask();
 153                 info.align_offset += get_align_bits();
 154         }
 155         return vm_unmapped_area(&info);
 156 }
 157
 158 unsigned long
 159 arch_get_unmapped_area_topdown(struct file *filp, const unsigned long addr0,
 160                           const unsigned long len, const unsigned long pgoff,
 161                           const unsigned long flags)
 162 {
 163         struct vm_area_struct *vma;
 164         struct mm_struct *mm = current->mm;
 165         unsigned long addr = addr0;
 166         struct vm_unmapped_area_info info;
 167
 168         /* requested length too big for entire address space */
 169         if (len > TASK_SIZE)
 170                 return -ENOMEM;
 171
 172         if (flags & MAP_FIXED)
 173                 return addr;
 174
 175         /* for MAP_32BIT mappings we force the legacy mmap base */
 176         if (!in_compat_syscall() && (flags & MAP_32BIT))
 177                 goto bottomup;
 178
 179         /* requesting a specific address */
 180         if (addr) {
 181                 addr = PAGE_ALIGN(addr);
 182                 vma = find_vma(mm, addr);
 183                 if (TASK_SIZE - len >= addr &&
 184                                 (!vma || addr + len <= vm_start_gap(vma)))
 185                         return addr;
 186         }
 187
 188         info.flags = VM_UNMAPPED_AREA_TOPDOWN;
 189         info.length = len;
 190         info.low_limit = PAGE_SIZE;
 191         info.high_limit = mm->mmap_base;
 192         info.align_mask = 0;
 193         info.align_offset = pgoff << PAGE_SHIFT;
 194         if (filp) {
 195                 info.align_mask = get_align_mask();
 196                 info.align_offset += get_align_bits();
 197         }
 198         addr = vm_unmapped_area(&info);
 199         if (!(addr & ~PAGE_MASK))
 200                 return addr;
 201         VM_BUG_ON(addr != -ENOMEM);
 202
 203 bottomup:
 204         /*
 205          * A failed mmap() very likely causes application failure,
 206          * so fall back to the bottom-up function here. This scenario
 207          * can happen with large stack limits and large mmap()
 208          * allocations.
 209          */
 210         return arch_get_unmapped_area(filp, addr0, len, pgoff, flags);
 211 }