[deliverable/linux.git] / arch / x86 / vdso / vdso32-setup.c

/*
 * (C) Copyright 2002 Linus Torvalds
 * Portions based on the vdso-randomization code from exec-shield:
 * Copyright(C) 2005-2006, Red Hat, Inc., Ingo Molnar
 *
 * This file contains the needed initializations to support sysenter.
 */

#include <linux/init.h>
#include <linux/smp.h>
#include <linux/thread_info.h>
#include <linux/sched.h>
#include <linux/gfp.h>
#include <linux/string.h>
#include <linux/elf.h>
#include <linux/mm.h>
#include <linux/err.h>
#include <linux/module.h>

#include <asm/cpufeature.h>
#include <asm/msr.h>
#include <asm/pgtable.h>
#include <asm/unistd.h>
#include <asm/elf.h>
#include <asm/tlbflush.h>
#include <asm/vdso.h>
#include <asm/proto.h>

enum {
	VDSO_DISABLED = 0,
	VDSO_ENABLED = 1,
	VDSO_COMPAT = 2,
};

#ifdef CONFIG_COMPAT_VDSO
#define VDSO_DEFAULT	VDSO_COMPAT
#else
#define VDSO_DEFAULT	VDSO_ENABLED
#endif

#ifdef CONFIG_X86_64
#define vdso_enabled			sysctl_vsyscall32
#define arch_setup_additional_pages	syscall32_setup_pages
#endif

/*
 * This is the difference between the prelinked addresses in the vDSO images
 * and the VDSO_HIGH_BASE address where CONFIG_COMPAT_VDSO places the vDSO
 * in the user address space.
 */
#define VDSO_ADDR_ADJUST	(VDSO_HIGH_BASE - (unsigned long)VDSO32_PRELINK)

/*
 * Should the kernel map a VDSO page into processes and pass its
 * address down to glibc upon exec()?
 */
unsigned int __read_mostly vdso_enabled = VDSO_DEFAULT;

static int __init vdso_setup(char *s)
{
	vdso_enabled = simple_strtoul(s, NULL, 0);

	return 1;
}

/*
 * For consistency, the argument vdso32=[012] affects the 32-bit vDSO
 * behavior on both 64-bit and 32-bit kernels.
 * On 32-bit kernels, vdso=[012] means the same thing.
 */
__setup("vdso32=", vdso_setup);

#ifdef CONFIG_X86_32
__setup_param("vdso=", vdso32_setup, vdso_setup, 0);

EXPORT_SYMBOL_GPL(vdso_enabled);
#endif

static __init void reloc_symtab(Elf32_Ehdr *ehdr,
				unsigned offset, unsigned size)
{
	Elf32_Sym *sym = (void *)ehdr + offset;
	unsigned nsym = size / sizeof(*sym);
	unsigned i;

	for(i = 0; i < nsym; i++, sym++) {
		if (sym->st_shndx == SHN_UNDEF ||
		    sym->st_shndx == SHN_ABS)
			continue;  /* skip */

		if (sym->st_shndx > SHN_LORESERVE) {
			printk(KERN_INFO "VDSO: unexpected st_shndx %x\n",
			       sym->st_shndx);
			continue;
		}

		switch(ELF_ST_TYPE(sym->st_info)) {
		case STT_OBJECT:
		case STT_FUNC:
		case STT_SECTION:
		case STT_FILE:
			sym->st_value += VDSO_ADDR_ADJUST;
		}
	}
}

static __init void reloc_dyn(Elf32_Ehdr *ehdr, unsigned offset)
{
	Elf32_Dyn *dyn = (void *)ehdr + offset;

	for(; dyn->d_tag != DT_NULL; dyn++)
		switch(dyn->d_tag) {
		case DT_PLTGOT:
		case DT_HASH:
		case DT_STRTAB:
		case DT_SYMTAB:
		case DT_RELA:
		case DT_INIT:
		case DT_FINI:
		case DT_REL:
		case DT_DEBUG:
		case DT_JMPREL:
		case DT_VERSYM:
		case DT_VERDEF:
		case DT_VERNEED:
		case DT_ADDRRNGLO ... DT_ADDRRNGHI:
			/* definitely pointers needing relocation */
			dyn->d_un.d_ptr += VDSO_ADDR_ADJUST;
			break;

		case DT_ENCODING ... OLD_DT_LOOS-1:
		case DT_LOOS ... DT_HIOS-1:
			/* Tags above DT_ENCODING are pointers if
			   they're even */
			if (dyn->d_tag >= DT_ENCODING &&
			    (dyn->d_tag & 1) == 0)
				dyn->d_un.d_ptr += VDSO_ADDR_ADJUST;
			break;

		case DT_VERDEFNUM:
		case DT_VERNEEDNUM:
		case DT_FLAGS_1:
		case DT_RELACOUNT:
		case DT_RELCOUNT:
		case DT_VALRNGLO ... DT_VALRNGHI:
			/* definitely not pointers */
			break;

		case OLD_DT_LOOS ... DT_LOOS-1:
		case DT_HIOS ... DT_VALRNGLO-1:
		default:
			if (dyn->d_tag > DT_ENCODING)
				printk(KERN_INFO "VDSO: unexpected DT_tag %x\n",
				       dyn->d_tag);
			break;
		}
}

static __init void relocate_vdso(Elf32_Ehdr *ehdr)
{
	Elf32_Phdr *phdr;
	Elf32_Shdr *shdr;
	int i;

	BUG_ON(memcmp(ehdr->e_ident, ELFMAG, SELFMAG) != 0 ||
	       !elf_check_arch_ia32(ehdr) ||
	       ehdr->e_type != ET_DYN);

	ehdr->e_entry += VDSO_ADDR_ADJUST;

	/* rebase phdrs */
	phdr = (void *)ehdr + ehdr->e_phoff;
	for (i = 0; i < ehdr->e_phnum; i++) {
		phdr[i].p_vaddr += VDSO_ADDR_ADJUST;

		/* relocate dynamic stuff */
		if (phdr[i].p_type == PT_DYNAMIC)
			reloc_dyn(ehdr, phdr[i].p_offset);
	}

	/* rebase sections */
	shdr = (void *)ehdr + ehdr->e_shoff;
	for(i = 0; i < ehdr->e_shnum; i++) {
		if (!(shdr[i].sh_flags & SHF_ALLOC))
			continue;

		shdr[i].sh_addr += VDSO_ADDR_ADJUST;

		if (shdr[i].sh_type == SHT_SYMTAB ||
		    shdr[i].sh_type == SHT_DYNSYM)
			reloc_symtab(ehdr, shdr[i].sh_offset,
				     shdr[i].sh_size);
	}
}

static struct page *vdso32_pages[1];

#ifdef CONFIG_X86_64

#define	vdso32_sysenter()	(boot_cpu_has(X86_FEATURE_SYSENTER32))
#define	vdso32_syscall()	(boot_cpu_has(X86_FEATURE_SYSCALL32))

/* May not be __init: called during resume */
void syscall32_cpu_init(void)
{
	/* Load these always in case some future AMD CPU supports
	   SYSENTER from compat mode too. */
	wrmsrl_safe(MSR_IA32_SYSENTER_CS, (u64)__KERNEL_CS);
	wrmsrl_safe(MSR_IA32_SYSENTER_ESP, 0ULL);
	wrmsrl_safe(MSR_IA32_SYSENTER_EIP, (u64)ia32_sysenter_target);

	wrmsrl(MSR_CSTAR, ia32_cstar_target);
}

#define compat_uses_vma		1

static inline void map_compat_vdso(int map)
{
}

#else  /* CONFIG_X86_32 */

#define vdso32_sysenter()	(boot_cpu_has(X86_FEATURE_SEP))
#define vdso32_syscall()	(0)

void enable_sep_cpu(void)
{
	int cpu = get_cpu();
	struct tss_struct *tss = &per_cpu(init_tss, cpu);

	if (!boot_cpu_has(X86_FEATURE_SEP)) {
		put_cpu();
		return;
	}

	tss->x86_tss.ss1 = __KERNEL_CS;
	tss->x86_tss.sp1 = sizeof(struct tss_struct) + (unsigned long) tss;
	wrmsr(MSR_IA32_SYSENTER_CS, __KERNEL_CS, 0);
	wrmsr(MSR_IA32_SYSENTER_ESP, tss->x86_tss.sp1, 0);
	wrmsr(MSR_IA32_SYSENTER_EIP, (unsigned long) ia32_sysenter_target, 0);
	put_cpu();	
}

static struct vm_area_struct gate_vma;

static int __init gate_vma_init(void)
{
	gate_vma.vm_mm = NULL;
	gate_vma.vm_start = FIXADDR_USER_START;
	gate_vma.vm_end = FIXADDR_USER_END;
	gate_vma.vm_flags = VM_READ | VM_MAYREAD | VM_EXEC | VM_MAYEXEC;
	gate_vma.vm_page_prot = __P101;

	return 0;
}

#define compat_uses_vma		0

static void map_compat_vdso(int map)
{
	static int vdso_mapped;

	if (map == vdso_mapped)
		return;

	vdso_mapped = map;

	__set_fixmap(FIX_VDSO, page_to_pfn(vdso32_pages[0]) << PAGE_SHIFT,
		     map ? PAGE_READONLY_EXEC : PAGE_NONE);

	/* flush stray tlbs */
	flush_tlb_all();
}

#endif	/* CONFIG_X86_64 */

int __init sysenter_setup(void)
{
	void *syscall_page = (void *)get_zeroed_page(GFP_ATOMIC);
	const void *vsyscall;
	size_t vsyscall_len;

	vdso32_pages[0] = virt_to_page(syscall_page);

#ifdef CONFIG_X86_32
	gate_vma_init();
#endif

	if (vdso32_syscall()) {
		vsyscall = &vdso32_syscall_start;
		vsyscall_len = &vdso32_syscall_end - &vdso32_syscall_start;
	} else if (vdso32_sysenter()){
		vsyscall = &vdso32_sysenter_start;
		vsyscall_len = &vdso32_sysenter_end - &vdso32_sysenter_start;
	} else {
		vsyscall = &vdso32_int80_start;
		vsyscall_len = &vdso32_int80_end - &vdso32_int80_start;
	}

	memcpy(syscall_page, vsyscall, vsyscall_len);
	relocate_vdso(syscall_page);

	return 0;
}

/* Setup a VMA at program startup for the vsyscall page */
int arch_setup_additional_pages(struct linux_binprm *bprm, int uses_interp)
{
	struct mm_struct *mm = current->mm;
	unsigned long addr;
	int ret = 0;
	bool compat;

#ifdef CONFIG_X86_X32_ABI
	if (test_thread_flag(TIF_X32))
		return x32_setup_additional_pages(bprm, uses_interp);
#endif

	if (vdso_enabled == VDSO_DISABLED)
		return 0;

	down_write(&mm->mmap_sem);

	/* Test compat mode once here, in case someone
	   changes it via sysctl */
	compat = (vdso_enabled == VDSO_COMPAT);

	map_compat_vdso(compat);

	if (compat)
		addr = VDSO_HIGH_BASE;
	else {
		addr = get_unmapped_area(NULL, 0, PAGE_SIZE, 0, 0);
		if (IS_ERR_VALUE(addr)) {
			ret = addr;
			goto up_fail;
		}
	}

	current->mm->context.vdso = (void *)addr;

	if (compat_uses_vma || !compat) {
		/*
		 * MAYWRITE to allow gdb to COW and set breakpoints
		 */
		ret = install_special_mapping(mm, addr, PAGE_SIZE,
					      VM_READ|VM_EXEC|
					      VM_MAYREAD|VM_MAYWRITE|VM_MAYEXEC,
					      vdso32_pages);

		if (ret)
			goto up_fail;
	}

	current_thread_info()->sysenter_return =
		VDSO32_SYMBOL(addr, SYSENTER_RETURN);

  up_fail:
	if (ret)
		current->mm->context.vdso = NULL;

	up_write(&mm->mmap_sem);

	return ret;
}

#ifdef CONFIG_X86_64

subsys_initcall(sysenter_setup);

#ifdef CONFIG_SYSCTL
/* Register vsyscall32 into the ABI table */
#include <linux/sysctl.h>

static ctl_table abi_table2[] = {
	{
		.procname	= "vsyscall32",
		.data		= &sysctl_vsyscall32,
		.maxlen		= sizeof(int),
		.mode		= 0644,
		.proc_handler	= proc_dointvec
	},
	{}
};

static ctl_table abi_root_table2[] = {
	{
		.procname = "abi",
		.mode = 0555,
		.child = abi_table2
	},
	{}
};

static __init int ia32_binfmt_init(void)
{
	register_sysctl_table(abi_root_table2);
	return 0;
}
__initcall(ia32_binfmt_init);
#endif

#else  /* CONFIG_X86_32 */

const char *arch_vma_name(struct vm_area_struct *vma)
{
	if (vma->vm_mm && vma->vm_start == (long)vma->vm_mm->context.vdso)
		return "[vdso]";
	return NULL;
}

struct vm_area_struct *get_gate_vma(struct mm_struct *mm)
{
	/*
	 * Check to see if the corresponding task was created in compat vdso
	 * mode.
	 */
	if (mm && mm->context.vdso == (void *)VDSO_HIGH_BASE)
		return &gate_vma;
	return NULL;
}

int in_gate_area(struct mm_struct *mm, unsigned long addr)
{
	const struct vm_area_struct *vma = get_gate_vma(mm);

	return vma && addr >= vma->vm_start && addr < vma->vm_end;
}

int in_gate_area_no_mm(unsigned long addr)
{
	return 0;
}

#endif	/* CONFIG_X86_64 */
Commit	Line	Data
1da177e4	1	/*
1da177e4	2	* (C) Copyright 2002 Linus Torvalds
e6e5494c IM	3	* Portions based on the vdso-randomization code from exec-shield:
e6e5494c IM	4	* Copyright(C) 2005-2006, Red Hat, Inc., Ingo Molnar
1da177e4 LT	5	*
	6	* This file contains the needed initializations to support sysenter.
	7	*/
	8
	9	#include <linux/init.h>
	10	#include <linux/smp.h>
	11	#include <linux/thread_info.h>
	12	#include <linux/sched.h>
	13	#include <linux/gfp.h>
	14	#include <linux/string.h>
	15	#include <linux/elf.h>
e6e5494c	16	#include <linux/mm.h>
4e950f6f	17	#include <linux/err.h>
e6e5494c	18	#include <linux/module.h>
1da177e4 LT	19
	20	#include <asm/cpufeature.h>
	21	#include <asm/msr.h>
	22	#include <asm/pgtable.h>
	23	#include <asm/unistd.h>
d4f7a2c1	24	#include <asm/elf.h>
1dbf527c	25	#include <asm/tlbflush.h>
6c3652ef	26	#include <asm/vdso.h>
af65d648	27	#include <asm/proto.h>
1dbf527c JF	28
	29	enum {
	30	VDSO_DISABLED = 0,
	31	VDSO_ENABLED = 1,
	32	VDSO_COMPAT = 2,
	33	};
	34
	35	#ifdef CONFIG_COMPAT_VDSO
	36	#define VDSO_DEFAULT VDSO_COMPAT
	37	#else
	38	#define VDSO_DEFAULT VDSO_ENABLED
	39	#endif
1da177e4	40
af65d648 RM	41	#ifdef CONFIG_X86_64
	42	#define vdso_enabled sysctl_vsyscall32
	43	#define arch_setup_additional_pages syscall32_setup_pages
	44	#endif
	45
	46	/*
	47	* This is the difference between the prelinked addresses in the vDSO images
	48	* and the VDSO_HIGH_BASE address where CONFIG_COMPAT_VDSO places the vDSO
	49	* in the user address space.
	50	*/
	51	#define VDSO_ADDR_ADJUST (VDSO_HIGH_BASE - (unsigned long)VDSO32_PRELINK)
	52
e6e5494c IM	53	/*
	54	* Should the kernel map a VDSO page into processes and pass its
	55	* address down to glibc upon exec()?
	56	*/
1dbf527c	57	unsigned int __read_mostly vdso_enabled = VDSO_DEFAULT;
e6e5494c	58
e6e5494c IM	59	static int __init vdso_setup(char *s)
	60	{
	61	vdso_enabled = simple_strtoul(s, NULL, 0);
	62
	63	return 1;
	64	}
	65
af65d648 RM	66	/*
	67	* For consistency, the argument vdso32=[012] affects the 32-bit vDSO
	68	* behavior on both 64-bit and 32-bit kernels.
	69	* On 32-bit kernels, vdso=[012] means the same thing.
	70	*/
	71	__setup("vdso32=", vdso_setup);
e6e5494c	72
af65d648 RM	73	#ifdef CONFIG_X86_32
	74	__setup_param("vdso=", vdso32_setup, vdso_setup, 0);
	75
	76	EXPORT_SYMBOL_GPL(vdso_enabled);
	77	#endif
1da177e4	78
d4f7a2c1 JF	79	static __init void reloc_symtab(Elf32_Ehdr *ehdr,
	80	unsigned offset, unsigned size)
	81	{
	82	Elf32_Sym sym = (void )ehdr + offset;
	83	unsigned nsym = size / sizeof(*sym);
	84	unsigned i;
	85
	86	for(i = 0; i < nsym; i++, sym++) {
	87	if (sym->st_shndx == SHN_UNDEF \|\|
	88	sym->st_shndx == SHN_ABS)
	89	continue; /* skip */
	90
	91	if (sym->st_shndx > SHN_LORESERVE) {
	92	printk(KERN_INFO "VDSO: unexpected st_shndx %x\n",
	93	sym->st_shndx);
	94	continue;
	95	}
	96
	97	switch(ELF_ST_TYPE(sym->st_info)) {
	98	case STT_OBJECT:
	99	case STT_FUNC:
	100	case STT_SECTION:
	101	case STT_FILE:
af65d648	102	sym->st_value += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	103	}
	104	}
	105	}
	106
	107	static __init void reloc_dyn(Elf32_Ehdr *ehdr, unsigned offset)
	108	{
	109	Elf32_Dyn dyn = (void )ehdr + offset;
	110
	111	for(; dyn->d_tag != DT_NULL; dyn++)
	112	switch(dyn->d_tag) {
	113	case DT_PLTGOT:
	114	case DT_HASH:
	115	case DT_STRTAB:
	116	case DT_SYMTAB:
	117	case DT_RELA:
	118	case DT_INIT:
	119	case DT_FINI:
	120	case DT_REL:
	121	case DT_DEBUG:
	122	case DT_JMPREL:
	123	case DT_VERSYM:
	124	case DT_VERDEF:
	125	case DT_VERNEED:
	126	case DT_ADDRRNGLO ... DT_ADDRRNGHI:
	127	/* definitely pointers needing relocation */
af65d648	128	dyn->d_un.d_ptr += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	129	break;
	130
	131	case DT_ENCODING ... OLD_DT_LOOS-1:
	132	case DT_LOOS ... DT_HIOS-1:
	133	/* Tags above DT_ENCODING are pointers if
	134	they're even */
	135	if (dyn->d_tag >= DT_ENCODING &&
	136	(dyn->d_tag & 1) == 0)
af65d648	137	dyn->d_un.d_ptr += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	138	break;
	139
	140	case DT_VERDEFNUM:
	141	case DT_VERNEEDNUM:
	142	case DT_FLAGS_1:
	143	case DT_RELACOUNT:
	144	case DT_RELCOUNT:
	145	case DT_VALRNGLO ... DT_VALRNGHI:
	146	/* definitely not pointers */
	147	break;
	148
	149	case OLD_DT_LOOS ... DT_LOOS-1:
	150	case DT_HIOS ... DT_VALRNGLO-1:
	151	default:
	152	if (dyn->d_tag > DT_ENCODING)
	153	printk(KERN_INFO "VDSO: unexpected DT_tag %x\n",
	154	dyn->d_tag);
	155	break;
	156	}
	157	}
	158
	159	static __init void relocate_vdso(Elf32_Ehdr *ehdr)
	160	{
	161	Elf32_Phdr *phdr;
	162	Elf32_Shdr *shdr;
	163	int i;
	164
ecb783ea	165	BUG_ON(memcmp(ehdr->e_ident, ELFMAG, SELFMAG) != 0 \|\|
af65d648	166	!elf_check_arch_ia32(ehdr) \|\|
d4f7a2c1 JF	167	ehdr->e_type != ET_DYN);
d4f7a2c1 JF	168
af65d648	169	ehdr->e_entry += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	170
	171	/* rebase phdrs */
	172	phdr = (void *)ehdr + ehdr->e_phoff;
	173	for (i = 0; i < ehdr->e_phnum; i++) {
af65d648	174	phdr[i].p_vaddr += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	175
	176	/* relocate dynamic stuff */
	177	if (phdr[i].p_type == PT_DYNAMIC)
	178	reloc_dyn(ehdr, phdr[i].p_offset);
	179	}
	180
	181	/* rebase sections */
	182	shdr = (void *)ehdr + ehdr->e_shoff;
	183	for(i = 0; i < ehdr->e_shnum; i++) {
	184	if (!(shdr[i].sh_flags & SHF_ALLOC))
	185	continue;
	186
af65d648	187	shdr[i].sh_addr += VDSO_ADDR_ADJUST;
d4f7a2c1 JF	188
	189	if (shdr[i].sh_type == SHT_SYMTAB \|\|
	190	shdr[i].sh_type == SHT_DYNSYM)
	191	reloc_symtab(ehdr, shdr[i].sh_offset,
	192	shdr[i].sh_size);
	193	}
	194	}
d4f7a2c1	195
af65d648 RM	196	static struct page *vdso32_pages[1];
	197
	198	#ifdef CONFIG_X86_64
	199
b6ad92d4	200	#define vdso32_sysenter() (boot_cpu_has(X86_FEATURE_SYSENTER32))
6a52e4b1	201	#define vdso32_syscall() (boot_cpu_has(X86_FEATURE_SYSCALL32))
af65d648 RM	202
	203	/* May not be __init: called during resume */
	204	void syscall32_cpu_init(void)
	205	{
af65d648 RM	206	/* Load these always in case some future AMD CPU supports
af65d648 RM	207	SYSENTER from compat mode too. */
715c85b1 PA	208	wrmsrl_safe(MSR_IA32_SYSENTER_CS, (u64)__KERNEL_CS);
	209	wrmsrl_safe(MSR_IA32_SYSENTER_ESP, 0ULL);
	210	wrmsrl_safe(MSR_IA32_SYSENTER_EIP, (u64)ia32_sysenter_target);
af65d648 RM	211
	212	wrmsrl(MSR_CSTAR, ia32_cstar_target);
	213	}
	214
	215	#define compat_uses_vma 1
	216
	217	static inline void map_compat_vdso(int map)
	218	{
	219	}
	220
	221	#else /* CONFIG_X86_32 */
	222
	223	#define vdso32_sysenter() (boot_cpu_has(X86_FEATURE_SEP))
6a52e4b1	224	#define vdso32_syscall() (0)
af65d648	225
6fe940d6	226	void enable_sep_cpu(void)
1da177e4 LT	227	{
	228	int cpu = get_cpu();
	229	struct tss_struct *tss = &per_cpu(init_tss, cpu);
	230
6fe940d6 LS	231	if (!boot_cpu_has(X86_FEATURE_SEP)) {
	232	put_cpu();
	233	return;
	234	}
	235
a75c54f9	236	tss->x86_tss.ss1 = __KERNEL_CS;
faca6227	237	tss->x86_tss.sp1 = sizeof(struct tss_struct) + (unsigned long) tss;
1da177e4	238	wrmsr(MSR_IA32_SYSENTER_CS, __KERNEL_CS, 0);
faca6227	239	wrmsr(MSR_IA32_SYSENTER_ESP, tss->x86_tss.sp1, 0);
0aa97fb2	240	wrmsr(MSR_IA32_SYSENTER_EIP, (unsigned long) ia32_sysenter_target, 0);
1da177e4 LT	241	put_cpu();
	242	}
	243
1dbf527c JF	244	static struct vm_area_struct gate_vma;
	245
	246	static int __init gate_vma_init(void)
	247	{
	248	gate_vma.vm_mm = NULL;
	249	gate_vma.vm_start = FIXADDR_USER_START;
	250	gate_vma.vm_end = FIXADDR_USER_END;
	251	gate_vma.vm_flags = VM_READ \| VM_MAYREAD \| VM_EXEC \| VM_MAYEXEC;
	252	gate_vma.vm_page_prot = __P101;
909af768	253
1dbf527c JF	254	return 0;
	255	}
	256
af65d648	257	#define compat_uses_vma 0
1da177e4	258
1dbf527c JF	259	static void map_compat_vdso(int map)
	260	{
	261	static int vdso_mapped;
	262
	263	if (map == vdso_mapped)
	264	return;
	265
	266	vdso_mapped = map;
	267
af65d648	268	__set_fixmap(FIX_VDSO, page_to_pfn(vdso32_pages[0]) << PAGE_SHIFT,
1dbf527c JF	269	map ? PAGE_READONLY_EXEC : PAGE_NONE);
	270
	271	/* flush stray tlbs */
	272	flush_tlb_all();
	273	}
	274
af65d648 RM	275	#endif /* CONFIG_X86_64 */
af65d648 RM	276
a6c4e076	277	int __init sysenter_setup(void)
1da177e4	278	{
7d91d531	279	void syscall_page = (void )get_zeroed_page(GFP_ATOMIC);
d4f7a2c1 JF	280	const void *vsyscall;
	281	size_t vsyscall_len;
	282
af65d648	283	vdso32_pages[0] = virt_to_page(syscall_page);
1da177e4	284
af65d648	285	#ifdef CONFIG_X86_32
1dbf527c	286	gate_vma_init();
af65d648	287	#endif
1da177e4	288
6a52e4b1 JF	289	if (vdso32_syscall()) {
	290	vsyscall = &vdso32_syscall_start;
	291	vsyscall_len = &vdso32_syscall_end - &vdso32_syscall_start;
	292	} else if (vdso32_sysenter()){
af65d648 RM	293	vsyscall = &vdso32_sysenter_start;
af65d648 RM	294	vsyscall_len = &vdso32_sysenter_end - &vdso32_sysenter_start;
6a52e4b1 JF	295	} else {
	296	vsyscall = &vdso32_int80_start;
	297	vsyscall_len = &vdso32_int80_end - &vdso32_int80_start;
1da177e4 LT	298	}
1da177e4 LT	299
d4f7a2c1 JF	300	memcpy(syscall_page, vsyscall, vsyscall_len);
d4f7a2c1 JF	301	relocate_vdso(syscall_page);
1da177e4	302
1da177e4 LT	303	return 0;
1da177e4 LT	304	}
e6e5494c	305
e6e5494c	306	/* Setup a VMA at program startup for the vsyscall page */
fc5243d9	307	int arch_setup_additional_pages(struct linux_binprm *bprm, int uses_interp)
e6e5494c	308	{
e6e5494c IM	309	struct mm_struct *mm = current->mm;
e6e5494c IM	310	unsigned long addr;
752783c0	311	int ret = 0;
1dbf527c	312	bool compat;
e6e5494c	313
1a21d4e0	314	#ifdef CONFIG_X86_X32_ABI
1a21d4e0	315	if (test_thread_flag(TIF_X32))
22e842d4	316	return x32_setup_additional_pages(bprm, uses_interp);
1a21d4e0 L	317	#endif
1a21d4e0 L	318
5de253cc RM	319	if (vdso_enabled == VDSO_DISABLED)
	320	return 0;
	321
e6e5494c	322	down_write(&mm->mmap_sem);
e6e5494c	323
1dbf527c JF	324	/* Test compat mode once here, in case someone
	325	changes it via sysctl */
	326	compat = (vdso_enabled == VDSO_COMPAT);
	327
	328	map_compat_vdso(compat);
	329
	330	if (compat)
	331	addr = VDSO_HIGH_BASE;
	332	else {
	333	addr = get_unmapped_area(NULL, 0, PAGE_SIZE, 0, 0);
	334	if (IS_ERR_VALUE(addr)) {
	335	ret = addr;
	336	goto up_fail;
	337	}
af65d648	338	}
1dbf527c	339
f7b6eb3f PZ	340	current->mm->context.vdso = (void *)addr;
f7b6eb3f PZ	341
af65d648	342	if (compat_uses_vma \|\| !compat) {
1dbf527c JF	343	/*
1dbf527c JF	344	* MAYWRITE to allow gdb to COW and set breakpoints
1dbf527c JF	345	*/
	346	ret = install_special_mapping(mm, addr, PAGE_SIZE,
	347	VM_READ\|VM_EXEC\|
909af768	348	VM_MAYREAD\|VM_MAYWRITE\|VM_MAYEXEC,
af65d648	349	vdso32_pages);
1dbf527c JF	350
	351	if (ret)
	352	goto up_fail;
	353	}
e6e5494c	354
e6e5494c	355	current_thread_info()->sysenter_return =
6c3652ef	356	VDSO32_SYMBOL(addr, SYSENTER_RETURN);
1dbf527c JF	357
1dbf527c JF	358	up_fail:
f7b6eb3f PZ	359	if (ret)
	360	current->mm->context.vdso = NULL;
	361
e6e5494c	362	up_write(&mm->mmap_sem);
1dbf527c	363
e6e5494c	364	return ret;
e6e5494c IM	365	}
e6e5494c IM	366
af65d648 RM	367	#ifdef CONFIG_X86_64
af65d648 RM	368
d7a0380d	369	subsys_initcall(sysenter_setup);
af65d648	370
a97f52e6 RM	371	#ifdef CONFIG_SYSCTL
	372	/* Register vsyscall32 into the ABI table */
	373	#include <linux/sysctl.h>
	374
	375	static ctl_table abi_table2[] = {
	376	{
	377	.procname = "vsyscall32",
	378	.data = &sysctl_vsyscall32,
	379	.maxlen = sizeof(int),
	380	.mode = 0644,
	381	.proc_handler = proc_dointvec
	382	},
	383	{}
	384	};
	385
	386	static ctl_table abi_root_table2[] = {
	387	{
a97f52e6 RM	388	.procname = "abi",
	389	.mode = 0555,
	390	.child = abi_table2
	391	},
	392	{}
	393	};
	394
	395	static __init int ia32_binfmt_init(void)
	396	{
	397	register_sysctl_table(abi_root_table2);
	398	return 0;
	399	}
	400	__initcall(ia32_binfmt_init);
	401	#endif
	402
af65d648 RM	403	#else /* CONFIG_X86_32 */
af65d648 RM	404
e6e5494c IM	405	const char arch_vma_name(struct vm_area_struct vma)
	406	{
	407	if (vma->vm_mm && vma->vm_start == (long)vma->vm_mm->context.vdso)
	408	return "[vdso]";
	409	return NULL;
	410	}
	411
31db58b3	412	struct vm_area_struct get_gate_vma(struct mm_struct mm)
e6e5494c	413	{
31db58b3 SW	414	/*
	415	* Check to see if the corresponding task was created in compat vdso
	416	* mode.
	417	*/
1dbf527c JF	418	if (mm && mm->context.vdso == (void *)VDSO_HIGH_BASE)
1dbf527c JF	419	return &gate_vma;
e6e5494c IM	420	return NULL;
	421	}
	422
83b964bb	423	int in_gate_area(struct mm_struct *mm, unsigned long addr)
e6e5494c	424	{
83b964bb	425	const struct vm_area_struct *vma = get_gate_vma(mm);
2f30c007 JB	426
2f30c007 JB	427	return vma && addr >= vma->vm_start && addr < vma->vm_end;
e6e5494c IM	428	}
e6e5494c IM	429
cae5d390	430	int in_gate_area_no_mm(unsigned long addr)
e6e5494c IM	431	{
	432	return 0;
	433	}
af65d648 RM	434
af65d648 RM	435	#endif /* CONFIG_X86_64 */