arch/arm/mm/mmap.c

   1 /*
   2  *  linux/arch/arm/mm/mmap.c
   3  */
   4 #include <linux/fs.h>
   5 #include <linux/mm.h>
   6 #include <linux/mman.h>
   7 #include <linux/shm.h>
   8 #include <linux/sched.h>
   9 #include <linux/io.h>
  10 #include <linux/personality.h>
  11 #include <linux/random.h>
  12 #include <asm/cachetype.h>
  13
  14 static inline unsigned long COLOUR_ALIGN_DOWN(unsigned long addr,
  15                                               unsigned long pgoff)
  16 {
  17         unsigned long base = addr & ~(SHMLBA-1);
  18         unsigned long off = (pgoff << PAGE_SHIFT) & (SHMLBA-1);
  19
  20         if (base + off <= addr)
  21                 return base + off;
  22
  23         return base - off;
  24 }
  25
  26 #define COLOUR_ALIGN(addr,pgoff)                \
  27         ((((addr)+SHMLBA-1)&~(SHMLBA-1)) +      \
  28          (((pgoff)<<PAGE_SHIFT) & (SHMLBA-1)))
  29
  30 /* gap between mmap and stack */
  31 #define MIN_GAP (128*1024*1024UL)
  32 #define MAX_GAP ((TASK_SIZE)/6*5)
  33
  34 static int mmap_is_legacy(void)
  35 {
  36         if (current->personality & ADDR_COMPAT_LAYOUT)
  37                 return 1;
  38
  39         if (rlimit(RLIMIT_STACK) == RLIM_INFINITY)
  40                 return 1;
  41
  42         return sysctl_legacy_va_layout;
  43 }
  44
  45 static unsigned long mmap_base(unsigned long rnd)
  46 {
  47         unsigned long gap = rlimit(RLIMIT_STACK);
  48
  49         if (gap < MIN_GAP)
  50                 gap = MIN_GAP;
  51         else if (gap > MAX_GAP)
  52                 gap = MAX_GAP;
  53
  54         return PAGE_ALIGN(TASK_SIZE - gap - rnd);
  55 }
  56
  57 /*
  58  * We need to ensure that shared mappings are correctly aligned to
  59  * avoid aliasing issues with VIPT caches.  We need to ensure that
  60  * a specific page of an object is always mapped at a multiple of
  61  * SHMLBA bytes.
  62  *
  63  * We unconditionally provide this function for all cases, however
  64  * in the VIVT case, we optimise out the alignment rules.
  65  */
  66 unsigned long
  67 arch_get_unmapped_area(struct file *filp, unsigned long addr,
  68                 unsigned long len, unsigned long pgoff, unsigned long flags)
  69 {
  70         struct mm_struct *mm = current->mm;
  71         struct vm_area_struct *vma;
  72         unsigned long start_addr;
  73         int do_align = 0;
  74         int aliasing = cache_is_vipt_aliasing();
  75
  76         /*
  77          * We only need to do colour alignment if either the I or D
  78          * caches alias.
  79          */
  80         if (aliasing)
  81                 do_align = filp || (flags & MAP_SHARED);
  82
  83         /*
  84          * We enforce the MAP_FIXED case.
  85          */
  86         if (flags & MAP_FIXED) {
  87                 if (aliasing && flags & MAP_SHARED &&
  88                     (addr - (pgoff << PAGE_SHIFT)) & (SHMLBA - 1))
  89                         return -EINVAL;
  90                 return addr;
  91         }
  92
  93         if (len > TASK_SIZE)
  94                 return -ENOMEM;
  95
  96         if (addr) {
  97                 if (do_align)
  98                         addr = COLOUR_ALIGN(addr, pgoff);
  99                 else
 100                         addr = PAGE_ALIGN(addr);
 101
 102                 vma = find_vma(mm, addr);
 103                 if (TASK_SIZE - len >= addr &&
 104                     (!vma || addr + len <= vma->vm_start))
 105                         return addr;
 106         }
 107         if (len > mm->cached_hole_size) {
 108                 start_addr = addr = mm->free_area_cache;
 109         } else {
 110                 start_addr = addr = mm->mmap_base;
 111                 mm->cached_hole_size = 0;
 112         }
 113
 114 full_search:
 115         if (do_align)
 116                 addr = COLOUR_ALIGN(addr, pgoff);
 117         else
 118                 addr = PAGE_ALIGN(addr);
 119
 120         for (vma = find_vma(mm, addr); ; vma = vma->vm_next) {
 121                 /* At this point:  (!vma || addr < vma->vm_end). */
 122                 if (TASK_SIZE - len < addr) {
 123                         /*
 124                          * Start a new search - just in case we missed
 125                          * some holes.
 126                          */
 127                         if (start_addr != TASK_UNMAPPED_BASE) {
 128                                 start_addr = addr = TASK_UNMAPPED_BASE;
 129                                 mm->cached_hole_size = 0;
 130                                 goto full_search;
 131                         }
 132                         return -ENOMEM;
 133                 }
 134                 if (!vma || addr + len <= vma->vm_start) {
 135                         /*
 136                          * Remember the place where we stopped the search:
 137                          */
 138                         mm->free_area_cache = addr + len;
 139                         return addr;
 140                 }
 141                 if (addr + mm->cached_hole_size < vma->vm_start)
 142                         mm->cached_hole_size = vma->vm_start - addr;
 143                 addr = vma->vm_end;
 144                 if (do_align)
 145                         addr = COLOUR_ALIGN(addr, pgoff);
 146         }
 147 }
 148
 149 unsigned long
 150 arch_get_unmapped_area_topdown(struct file *filp, const unsigned long addr0,
 151                         const unsigned long len, const unsigned long pgoff,
 152                         const unsigned long flags)
 153 {
 154         struct vm_area_struct *vma;
 155         struct mm_struct *mm = current->mm;
 156         unsigned long addr = addr0;
 157         int do_align = 0;
 158         int aliasing = cache_is_vipt_aliasing();
 159
 160         /*
 161          * We only need to do colour alignment if either the I or D
 162          * caches alias.
 163          */
 164         if (aliasing)
 165                 do_align = filp || (flags & MAP_SHARED);
 166
 167         /* requested length too big for entire address space */
 168         if (len > TASK_SIZE)
 169                 return -ENOMEM;
 170
 171         if (flags & MAP_FIXED) {
 172                 if (aliasing && flags & MAP_SHARED &&
 173                     (addr - (pgoff << PAGE_SHIFT)) & (SHMLBA - 1))
 174                         return -EINVAL;
 175                 return addr;
 176         }
 177
 178         /* requesting a specific address */
 179         if (addr) {
 180                 if (do_align)
 181                         addr = COLOUR_ALIGN(addr, pgoff);
 182                 else
 183                         addr = PAGE_ALIGN(addr);
 184                 vma = find_vma(mm, addr);
 185                 if (TASK_SIZE - len >= addr &&
 186                                 (!vma || addr + len <= vma->vm_start))
 187                         return addr;
 188         }
 189
 190         /* check if free_area_cache is useful for us */
 191         if (len <= mm->cached_hole_size) {
 192                 mm->cached_hole_size = 0;
 193                 mm->free_area_cache = mm->mmap_base;
 194         }
 195
 196         /* either no address requested or can't fit in requested address hole */
 197         addr = mm->free_area_cache;
 198         if (do_align) {
 199                 unsigned long base = COLOUR_ALIGN_DOWN(addr - len, pgoff);
 200                 addr = base + len;
 201         }
 202
 203         /* make sure it can fit in the remaining address space */
 204         if (addr > len) {
 205                 vma = find_vma(mm, addr-len);
 206                 if (!vma || addr <= vma->vm_start)
 207                         /* remember the address as a hint for next time */
 208                         return (mm->free_area_cache = addr-len);
 209         }
 210
 211         if (mm->mmap_base < len)
 212                 goto bottomup;
 213
 214         addr = mm->mmap_base - len;
 215         if (do_align)
 216                 addr = COLOUR_ALIGN_DOWN(addr, pgoff);
 217
 218         do {
 219                 /*
 220                  * Lookup failure means no vma is above this address,
 221                  * else if new region fits below vma->vm_start,
 222                  * return with success:
 223                  */
 224                 vma = find_vma(mm, addr);
 225                 if (!vma || addr+len <= vma->vm_start)
 226                         /* remember the address as a hint for next time */
 227                         return (mm->free_area_cache = addr);
 228
 229                 /* remember the largest hole we saw so far */
 230                 if (addr + mm->cached_hole_size < vma->vm_start)
 231                         mm->cached_hole_size = vma->vm_start - addr;
 232
 233                 /* try just below the current vma->vm_start */
 234                 addr = vma->vm_start - len;
 235                 if (do_align)
 236                         addr = COLOUR_ALIGN_DOWN(addr, pgoff);
 237         } while (len < vma->vm_start);
 238
 239 bottomup:
 240         /*
 241          * A failed mmap() very likely causes application failure,
 242          * so fall back to the bottom-up function here. This scenario
 243          * can happen with large stack limits and large mmap()
 244          * allocations.
 245          */
 246         mm->cached_hole_size = ~0UL;
 247         mm->free_area_cache = TASK_UNMAPPED_BASE;
 248         addr = arch_get_unmapped_area(filp, addr0, len, pgoff, flags);
 249         /*
 250          * Restore the topdown base:
 251          */
 252         mm->free_area_cache = mm->mmap_base;
 253         mm->cached_hole_size = ~0UL;
 254
 255         return addr;
 256 }
 257
 258 void arch_pick_mmap_layout(struct mm_struct *mm)
 259 {
 260         unsigned long random_factor = 0UL;
 261
 262         /* 8 bits of randomness in 20 address space bits */
 263         if ((current->flags & PF_RANDOMIZE) &&
 264             !(current->personality & ADDR_NO_RANDOMIZE))
 265                 random_factor = (get_random_int() % (1 << 8)) << PAGE_SHIFT;
 266
 267         if (mmap_is_legacy()) {
 268                 mm->mmap_base = TASK_UNMAPPED_BASE + random_factor;
 269                 mm->get_unmapped_area = arch_get_unmapped_area;
 270                 mm->unmap_area = arch_unmap_area;
 271         } else {
 272                 mm->mmap_base = mmap_base(random_factor);
 273                 mm->get_unmapped_area = arch_get_unmapped_area_topdown;
 274                 mm->unmap_area = arch_unmap_area_topdown;
 275         }
 276 }
 277
 278 /*
 279  * You really shouldn't be using read() or write() on /dev/mem.  This
 280  * might go away in the future.
 281  */
 282 int valid_phys_addr_range(unsigned long addr, size_t size)
 283 {
 284         if (addr < PHYS_OFFSET)
 285                 return 0;
 286         if (addr + size > __pa(high_memory - 1) + 1)
 287                 return 0;
 288
 289         return 1;
 290 }
 291
 292 /*
 293  * We don't use supersection mappings for mmap() on /dev/mem, which
 294  * means that we can't map the memory area above the 4G barrier into
 295  * userspace.
 296  */
 297 int valid_mmap_phys_addr_range(unsigned long pfn, size_t size)
 298 {
 299         return !(pfn + (size >> PAGE_SHIFT) > 0x00100000);
 300 }
 301
 302 #ifdef CONFIG_STRICT_DEVMEM
 303
 304 #include <linux/ioport.h>
 305
 306 /*
 307  * devmem_is_allowed() checks to see if /dev/mem access to a certain
 308  * address is valid. The argument is a physical page number.
 309  * We mimic x86 here by disallowing access to system RAM as well as
 310  * device-exclusive MMIO regions. This effectively disable read()/write()
 311  * on /dev/mem.
 312  */
 313 int devmem_is_allowed(unsigned long pfn)
 314 {
 315         if (iomem_is_exclusive(pfn << PAGE_SHIFT))
 316                 return 0;
 317         if (!page_is_ram(pfn))
 318                 return 1;
 319         return 0;
 320 }
 321
 322 #endif