2005-04-16 16:20:36 -06:00
|
|
|
/*
|
|
|
|
* linux/arch/s390/mm/mmap.c
|
|
|
|
*
|
|
|
|
* flexible mmap layout support
|
|
|
|
*
|
|
|
|
* Copyright 2003-2004 Red Hat Inc., Durham, North Carolina.
|
|
|
|
* All Rights Reserved.
|
|
|
|
*
|
|
|
|
* This program is free software; you can redistribute it and/or modify
|
|
|
|
* it under the terms of the GNU General Public License as published by
|
|
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
|
|
* (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
*
|
|
|
|
*
|
|
|
|
* Started by Ingo Molnar <mingo@elte.hu>
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <linux/personality.h>
|
|
|
|
#include <linux/mm.h>
|
|
|
|
#include <linux/module.h>
|
2008-02-09 10:24:37 -07:00
|
|
|
#include <asm/pgalloc.h>
|
2009-06-12 02:26:25 -06:00
|
|
|
#include <asm/compat.h>
|
2005-04-16 16:20:36 -06:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Top of mmap area (just below the process stack).
|
|
|
|
*
|
|
|
|
* Leave an at least ~128 MB hole.
|
|
|
|
*/
|
|
|
|
#define MIN_GAP (128*1024*1024)
|
2009-03-18 06:27:36 -06:00
|
|
|
#define MAX_GAP (STACK_TOP/6*5)
|
2005-04-16 16:20:36 -06:00
|
|
|
|
|
|
|
static inline unsigned long mmap_base(void)
|
|
|
|
{
|
2010-01-13 12:44:33 -07:00
|
|
|
unsigned long gap = rlimit(RLIMIT_STACK);
|
2005-04-16 16:20:36 -06:00
|
|
|
|
|
|
|
if (gap < MIN_GAP)
|
|
|
|
gap = MIN_GAP;
|
|
|
|
else if (gap > MAX_GAP)
|
|
|
|
gap = MAX_GAP;
|
|
|
|
|
2009-03-18 06:27:36 -06:00
|
|
|
return STACK_TOP - (gap & PAGE_MASK);
|
2005-04-16 16:20:36 -06:00
|
|
|
}
|
|
|
|
|
|
|
|
static inline int mmap_is_legacy(void)
|
|
|
|
{
|
2006-01-06 01:19:28 -07:00
|
|
|
#ifdef CONFIG_64BIT
|
2005-04-16 16:20:36 -06:00
|
|
|
/*
|
|
|
|
* Force standard allocation for 64 bit programs.
|
|
|
|
*/
|
2009-06-12 02:26:25 -06:00
|
|
|
if (!is_compat_task())
|
2005-04-16 16:20:36 -06:00
|
|
|
return 1;
|
|
|
|
#endif
|
|
|
|
return sysctl_legacy_va_layout ||
|
|
|
|
(current->personality & ADDR_COMPAT_LAYOUT) ||
|
2010-01-13 12:44:33 -07:00
|
|
|
rlimit(RLIMIT_STACK) == RLIM_INFINITY;
|
2005-04-16 16:20:36 -06:00
|
|
|
}
|
|
|
|
|
2008-02-09 10:24:37 -07:00
|
|
|
#ifndef CONFIG_64BIT
|
|
|
|
|
2005-04-16 16:20:36 -06:00
|
|
|
/*
|
|
|
|
* This function, called very early during the creation of a new
|
|
|
|
* process VM image, sets up which VM layout function to use:
|
|
|
|
*/
|
|
|
|
void arch_pick_mmap_layout(struct mm_struct *mm)
|
|
|
|
{
|
|
|
|
/*
|
|
|
|
* Fall back to the standard layout if the personality
|
|
|
|
* bit is set, or if the expected stack growth is unlimited:
|
|
|
|
*/
|
|
|
|
if (mmap_is_legacy()) {
|
|
|
|
mm->mmap_base = TASK_UNMAPPED_BASE;
|
|
|
|
mm->get_unmapped_area = arch_get_unmapped_area;
|
|
|
|
mm->unmap_area = arch_unmap_area;
|
|
|
|
} else {
|
|
|
|
mm->mmap_base = mmap_base();
|
|
|
|
mm->get_unmapped_area = arch_get_unmapped_area_topdown;
|
|
|
|
mm->unmap_area = arch_unmap_area_topdown;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
|
|
|
|
|
2008-02-09 10:24:37 -07:00
|
|
|
#else
|
|
|
|
|
2009-03-18 06:27:37 -06:00
|
|
|
int s390_mmap_check(unsigned long addr, unsigned long len)
|
|
|
|
{
|
2009-06-12 02:26:25 -06:00
|
|
|
if (!is_compat_task() &&
|
2009-03-18 06:27:37 -06:00
|
|
|
len >= TASK_SIZE && TASK_SIZE < (1UL << 53))
|
|
|
|
return crst_table_upgrade(current->mm, 1UL << 53);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-02-09 10:24:37 -07:00
|
|
|
static unsigned long
|
|
|
|
s390_get_unmapped_area(struct file *filp, unsigned long addr,
|
|
|
|
unsigned long len, unsigned long pgoff, unsigned long flags)
|
|
|
|
{
|
|
|
|
struct mm_struct *mm = current->mm;
|
2009-03-18 06:27:37 -06:00
|
|
|
unsigned long area;
|
2008-02-09 10:24:37 -07:00
|
|
|
int rc;
|
|
|
|
|
2009-03-18 06:27:37 -06:00
|
|
|
area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
|
|
|
|
if (!(area & ~PAGE_MASK))
|
|
|
|
return area;
|
2009-06-12 02:26:25 -06:00
|
|
|
if (area == -ENOMEM && !is_compat_task() && TASK_SIZE < (1UL << 53)) {
|
2009-03-18 06:27:37 -06:00
|
|
|
/* Upgrade the page table to 4 levels and retry. */
|
|
|
|
rc = crst_table_upgrade(mm, 1UL << 53);
|
2008-02-09 10:24:37 -07:00
|
|
|
if (rc)
|
|
|
|
return (unsigned long) rc;
|
2009-03-18 06:27:37 -06:00
|
|
|
area = arch_get_unmapped_area(filp, addr, len, pgoff, flags);
|
2008-02-09 10:24:37 -07:00
|
|
|
}
|
2009-03-18 06:27:37 -06:00
|
|
|
return area;
|
2008-02-09 10:24:37 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static unsigned long
|
2009-03-18 06:27:37 -06:00
|
|
|
s390_get_unmapped_area_topdown(struct file *filp, const unsigned long addr,
|
2008-02-09 10:24:37 -07:00
|
|
|
const unsigned long len, const unsigned long pgoff,
|
|
|
|
const unsigned long flags)
|
|
|
|
{
|
|
|
|
struct mm_struct *mm = current->mm;
|
2009-03-18 06:27:37 -06:00
|
|
|
unsigned long area;
|
2008-02-09 10:24:37 -07:00
|
|
|
int rc;
|
|
|
|
|
2009-03-18 06:27:37 -06:00
|
|
|
area = arch_get_unmapped_area_topdown(filp, addr, len, pgoff, flags);
|
|
|
|
if (!(area & ~PAGE_MASK))
|
|
|
|
return area;
|
2009-06-12 02:26:25 -06:00
|
|
|
if (area == -ENOMEM && !is_compat_task() && TASK_SIZE < (1UL << 53)) {
|
2009-03-18 06:27:37 -06:00
|
|
|
/* Upgrade the page table to 4 levels and retry. */
|
|
|
|
rc = crst_table_upgrade(mm, 1UL << 53);
|
2008-02-09 10:24:37 -07:00
|
|
|
if (rc)
|
|
|
|
return (unsigned long) rc;
|
2009-03-18 06:27:37 -06:00
|
|
|
area = arch_get_unmapped_area_topdown(filp, addr, len,
|
|
|
|
pgoff, flags);
|
2008-02-09 10:24:37 -07:00
|
|
|
}
|
2009-03-18 06:27:37 -06:00
|
|
|
return area;
|
2008-02-09 10:24:37 -07:00
|
|
|
}
|
|
|
|
/*
|
|
|
|
* This function, called very early during the creation of a new
|
|
|
|
* process VM image, sets up which VM layout function to use:
|
|
|
|
*/
|
|
|
|
void arch_pick_mmap_layout(struct mm_struct *mm)
|
|
|
|
{
|
|
|
|
/*
|
|
|
|
* Fall back to the standard layout if the personality
|
|
|
|
* bit is set, or if the expected stack growth is unlimited:
|
|
|
|
*/
|
|
|
|
if (mmap_is_legacy()) {
|
|
|
|
mm->mmap_base = TASK_UNMAPPED_BASE;
|
|
|
|
mm->get_unmapped_area = s390_get_unmapped_area;
|
|
|
|
mm->unmap_area = arch_unmap_area;
|
|
|
|
} else {
|
|
|
|
mm->mmap_base = mmap_base();
|
|
|
|
mm->get_unmapped_area = s390_get_unmapped_area_topdown;
|
|
|
|
mm->unmap_area = arch_unmap_area_topdown;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
EXPORT_SYMBOL_GPL(arch_pick_mmap_layout);
|
|
|
|
|
|
|
|
#endif
|