/*
|
/*
|
* Handling of different ABIs (personalities).
|
* Handling of different ABIs (personalities).
|
*
|
*
|
* We group personalities into execution domains which have their
|
* We group personalities into execution domains which have their
|
* own handlers for kernel entry points, signal mapping, etc...
|
* own handlers for kernel entry points, signal mapping, etc...
|
*
|
*
|
* 2001-05-06 Complete rewrite, Christoph Hellwig (hch@infradead.org)
|
* 2001-05-06 Complete rewrite, Christoph Hellwig (hch@infradead.org)
|
*/
|
*/
|
|
|
#include <linux/config.h>
|
#include <linux/config.h>
|
#include <linux/init.h>
|
#include <linux/init.h>
|
#include <linux/kernel.h>
|
#include <linux/kernel.h>
|
#include <linux/kmod.h>
|
#include <linux/kmod.h>
|
#include <linux/module.h>
|
#include <linux/module.h>
|
#include <linux/personality.h>
|
#include <linux/personality.h>
|
#include <linux/sched.h>
|
#include <linux/sched.h>
|
#include <linux/sysctl.h>
|
#include <linux/sysctl.h>
|
#include <linux/types.h>
|
#include <linux/types.h>
|
|
|
|
|
static void default_handler(int, struct pt_regs *);
|
static void default_handler(int, struct pt_regs *);
|
|
|
static struct exec_domain *exec_domains = &default_exec_domain;
|
static struct exec_domain *exec_domains = &default_exec_domain;
|
static rwlock_t exec_domains_lock = RW_LOCK_UNLOCKED;
|
static rwlock_t exec_domains_lock = RW_LOCK_UNLOCKED;
|
|
|
|
|
static u_long ident_map[32] = {
|
static u_long ident_map[32] = {
|
0, 1, 2, 3, 4, 5, 6, 7,
|
0, 1, 2, 3, 4, 5, 6, 7,
|
8, 9, 10, 11, 12, 13, 14, 15,
|
8, 9, 10, 11, 12, 13, 14, 15,
|
16, 17, 18, 19, 20, 21, 22, 23,
|
16, 17, 18, 19, 20, 21, 22, 23,
|
24, 25, 26, 27, 28, 29, 30, 31
|
24, 25, 26, 27, 28, 29, 30, 31
|
};
|
};
|
|
|
struct exec_domain default_exec_domain = {
|
struct exec_domain default_exec_domain = {
|
"Linux", /* name */
|
"Linux", /* name */
|
default_handler, /* lcall7 causes a seg fault. */
|
default_handler, /* lcall7 causes a seg fault. */
|
0, 0, /* PER_LINUX personality. */
|
0, 0, /* PER_LINUX personality. */
|
ident_map, /* Identity map signals. */
|
ident_map, /* Identity map signals. */
|
ident_map, /* - both ways. */
|
ident_map, /* - both ways. */
|
};
|
};
|
|
|
|
|
static void
|
static void
|
default_handler(int segment, struct pt_regs *regp)
|
default_handler(int segment, struct pt_regs *regp)
|
{
|
{
|
u_long pers = 0;
|
u_long pers = 0;
|
|
|
/*
|
/*
|
* This may have been a static linked SVr4 binary, so we would
|
* This may have been a static linked SVr4 binary, so we would
|
* have the personality set incorrectly. Or it might have been
|
* have the personality set incorrectly. Or it might have been
|
* a Solaris/x86 binary. We can tell which because the former
|
* a Solaris/x86 binary. We can tell which because the former
|
* uses lcall7, while the latter used lcall 0x27.
|
* uses lcall7, while the latter used lcall 0x27.
|
* Try to find or load the appropriate personality, and fall back
|
* Try to find or load the appropriate personality, and fall back
|
* to just forcing a SEGV.
|
* to just forcing a SEGV.
|
*
|
*
|
* XXX: this is IA32-specific and should be moved to the MD-tree.
|
* XXX: this is IA32-specific and should be moved to the MD-tree.
|
*/
|
*/
|
switch (segment) {
|
switch (segment) {
|
#ifdef __i386__
|
#ifdef __i386__
|
case 0x07:
|
case 0x07:
|
pers = abi_defhandler_lcall7;
|
pers = abi_defhandler_lcall7;
|
break;
|
break;
|
case 0x27:
|
case 0x27:
|
pers = PER_SOLARIS;
|
pers = PER_SOLARIS;
|
break;
|
break;
|
#endif
|
#endif
|
}
|
}
|
set_personality(pers);
|
set_personality(pers);
|
|
|
if (current->exec_domain->handler != default_handler)
|
if (current->exec_domain->handler != default_handler)
|
current->exec_domain->handler(segment, regp);
|
current->exec_domain->handler(segment, regp);
|
else
|
else
|
send_sig(SIGSEGV, current, 1);
|
send_sig(SIGSEGV, current, 1);
|
}
|
}
|
|
|
static struct exec_domain *
|
static struct exec_domain *
|
lookup_exec_domain(u_long personality)
|
lookup_exec_domain(u_long personality)
|
{
|
{
|
struct exec_domain * ep;
|
struct exec_domain * ep;
|
u_long pers = personality(personality);
|
u_long pers = personality(personality);
|
|
|
read_lock(&exec_domains_lock);
|
read_lock(&exec_domains_lock);
|
for (ep = exec_domains; ep; ep = ep->next) {
|
for (ep = exec_domains; ep; ep = ep->next) {
|
if (pers >= ep->pers_low && pers <= ep->pers_high)
|
if (pers >= ep->pers_low && pers <= ep->pers_high)
|
if (try_inc_mod_count(ep->module))
|
if (try_inc_mod_count(ep->module))
|
goto out;
|
goto out;
|
}
|
}
|
|
|
#ifdef CONFIG_KMOD
|
#ifdef CONFIG_KMOD
|
read_unlock(&exec_domains_lock);
|
read_unlock(&exec_domains_lock);
|
{
|
{
|
char buffer[30];
|
char buffer[30];
|
sprintf(buffer, "personality-%ld", pers);
|
sprintf(buffer, "personality-%ld", pers);
|
request_module(buffer);
|
request_module(buffer);
|
}
|
}
|
read_lock(&exec_domains_lock);
|
read_lock(&exec_domains_lock);
|
|
|
for (ep = exec_domains; ep; ep = ep->next) {
|
for (ep = exec_domains; ep; ep = ep->next) {
|
if (pers >= ep->pers_low && pers <= ep->pers_high)
|
if (pers >= ep->pers_low && pers <= ep->pers_high)
|
if (try_inc_mod_count(ep->module))
|
if (try_inc_mod_count(ep->module))
|
goto out;
|
goto out;
|
}
|
}
|
#endif
|
#endif
|
|
|
ep = &default_exec_domain;
|
ep = &default_exec_domain;
|
out:
|
out:
|
read_unlock(&exec_domains_lock);
|
read_unlock(&exec_domains_lock);
|
return (ep);
|
return (ep);
|
}
|
}
|
|
|
int
|
int
|
register_exec_domain(struct exec_domain *ep)
|
register_exec_domain(struct exec_domain *ep)
|
{
|
{
|
struct exec_domain *tmp;
|
struct exec_domain *tmp;
|
int err = -EBUSY;
|
int err = -EBUSY;
|
|
|
if (ep == NULL)
|
if (ep == NULL)
|
return -EINVAL;
|
return -EINVAL;
|
|
|
if (ep->next != NULL)
|
if (ep->next != NULL)
|
return -EBUSY;
|
return -EBUSY;
|
|
|
write_lock(&exec_domains_lock);
|
write_lock(&exec_domains_lock);
|
for (tmp = exec_domains; tmp; tmp = tmp->next) {
|
for (tmp = exec_domains; tmp; tmp = tmp->next) {
|
if (tmp == ep)
|
if (tmp == ep)
|
goto out;
|
goto out;
|
}
|
}
|
|
|
ep->next = exec_domains;
|
ep->next = exec_domains;
|
exec_domains = ep;
|
exec_domains = ep;
|
err = 0;
|
err = 0;
|
|
|
out:
|
out:
|
write_unlock(&exec_domains_lock);
|
write_unlock(&exec_domains_lock);
|
return (err);
|
return (err);
|
}
|
}
|
|
|
int
|
int
|
unregister_exec_domain(struct exec_domain *ep)
|
unregister_exec_domain(struct exec_domain *ep)
|
{
|
{
|
struct exec_domain **epp;
|
struct exec_domain **epp;
|
|
|
epp = &exec_domains;
|
epp = &exec_domains;
|
write_lock(&exec_domains_lock);
|
write_lock(&exec_domains_lock);
|
for (epp = &exec_domains; *epp; epp = &(*epp)->next) {
|
for (epp = &exec_domains; *epp; epp = &(*epp)->next) {
|
if (ep == *epp)
|
if (ep == *epp)
|
goto unregister;
|
goto unregister;
|
}
|
}
|
write_unlock(&exec_domains_lock);
|
write_unlock(&exec_domains_lock);
|
return -EINVAL;
|
return -EINVAL;
|
|
|
unregister:
|
unregister:
|
*epp = ep->next;
|
*epp = ep->next;
|
ep->next = NULL;
|
ep->next = NULL;
|
write_unlock(&exec_domains_lock);
|
write_unlock(&exec_domains_lock);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
int
|
int
|
__set_personality(u_long personality)
|
__set_personality(u_long personality)
|
{
|
{
|
struct exec_domain *ep, *oep;
|
struct exec_domain *ep, *oep;
|
|
|
ep = lookup_exec_domain(personality);
|
ep = lookup_exec_domain(personality);
|
if (ep == current->exec_domain) {
|
if (ep == current->exec_domain) {
|
current->personality = personality;
|
current->personality = personality;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
if (atomic_read(¤t->fs->count) != 1) {
|
if (atomic_read(¤t->fs->count) != 1) {
|
struct fs_struct *fsp, *ofsp;
|
struct fs_struct *fsp, *ofsp;
|
|
|
fsp = copy_fs_struct(current->fs);
|
fsp = copy_fs_struct(current->fs);
|
if (fsp == NULL) {
|
if (fsp == NULL) {
|
put_exec_domain(ep);
|
put_exec_domain(ep);
|
return -ENOMEM;;
|
return -ENOMEM;;
|
}
|
}
|
|
|
task_lock(current);
|
task_lock(current);
|
ofsp = current->fs;
|
ofsp = current->fs;
|
current->fs = fsp;
|
current->fs = fsp;
|
task_unlock(current);
|
task_unlock(current);
|
|
|
put_fs_struct(ofsp);
|
put_fs_struct(ofsp);
|
}
|
}
|
|
|
/*
|
/*
|
* At that point we are guaranteed to be the sole owner of
|
* At that point we are guaranteed to be the sole owner of
|
* current->fs.
|
* current->fs.
|
*/
|
*/
|
|
|
current->personality = personality;
|
current->personality = personality;
|
oep = current->exec_domain;
|
oep = current->exec_domain;
|
current->exec_domain = ep;
|
current->exec_domain = ep;
|
set_fs_altroot();
|
set_fs_altroot();
|
|
|
put_exec_domain(oep);
|
put_exec_domain(oep);
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
int
|
int
|
get_exec_domain_list(char *page)
|
get_exec_domain_list(char *page)
|
{
|
{
|
struct exec_domain *ep;
|
struct exec_domain *ep;
|
int len = 0;
|
int len = 0;
|
|
|
read_lock(&exec_domains_lock);
|
read_lock(&exec_domains_lock);
|
for (ep = exec_domains; ep && len < PAGE_SIZE - 80; ep = ep->next)
|
for (ep = exec_domains; ep && len < PAGE_SIZE - 80; ep = ep->next)
|
len += sprintf(page + len, "%d-%d\t%-16s\t[%s]\n",
|
len += sprintf(page + len, "%d-%d\t%-16s\t[%s]\n",
|
ep->pers_low, ep->pers_high, ep->name,
|
ep->pers_low, ep->pers_high, ep->name,
|
ep->module ? ep->module->name : "kernel");
|
ep->module ? ep->module->name : "kernel");
|
read_unlock(&exec_domains_lock);
|
read_unlock(&exec_domains_lock);
|
return (len);
|
return (len);
|
}
|
}
|
|
|
asmlinkage long
|
asmlinkage long
|
sys_personality(u_long personality)
|
sys_personality(u_long personality)
|
{
|
{
|
u_long old = current->personality;;
|
u_long old = current->personality;;
|
|
|
if (personality != 0xffffffff) {
|
if (personality != 0xffffffff) {
|
set_personality(personality);
|
set_personality(personality);
|
if (current->personality != personality)
|
if (current->personality != personality)
|
return -EINVAL;
|
return -EINVAL;
|
}
|
}
|
|
|
return (long)old;
|
return (long)old;
|
}
|
}
|
|
|
|
|
EXPORT_SYMBOL(register_exec_domain);
|
EXPORT_SYMBOL(register_exec_domain);
|
EXPORT_SYMBOL(unregister_exec_domain);
|
EXPORT_SYMBOL(unregister_exec_domain);
|
EXPORT_SYMBOL(__set_personality);
|
EXPORT_SYMBOL(__set_personality);
|
|
|
/*
|
/*
|
* We have to have all sysctl handling for the Linux-ABI
|
* We have to have all sysctl handling for the Linux-ABI
|
* in one place as the dynamic registration of sysctls is
|
* in one place as the dynamic registration of sysctls is
|
* horribly crufty in Linux <= 2.4.
|
* horribly crufty in Linux <= 2.4.
|
*
|
*
|
* I hope the new sysctl schemes discussed for future versions
|
* I hope the new sysctl schemes discussed for future versions
|
* will obsolete this.
|
* will obsolete this.
|
*
|
*
|
* --hch
|
* --hch
|
*/
|
*/
|
|
|
u_long abi_defhandler_coff = PER_SCOSVR3;
|
u_long abi_defhandler_coff = PER_SCOSVR3;
|
u_long abi_defhandler_elf = PER_LINUX;
|
u_long abi_defhandler_elf = PER_LINUX;
|
u_long abi_defhandler_lcall7 = PER_SVR4;
|
u_long abi_defhandler_lcall7 = PER_SVR4;
|
u_long abi_defhandler_libcso = PER_SVR4;
|
u_long abi_defhandler_libcso = PER_SVR4;
|
u_int abi_traceflg;
|
u_int abi_traceflg;
|
int abi_fake_utsname;
|
int abi_fake_utsname;
|
|
|
static struct ctl_table abi_table[] = {
|
static struct ctl_table abi_table[] = {
|
{ABI_DEFHANDLER_COFF, "defhandler_coff", &abi_defhandler_coff,
|
{ABI_DEFHANDLER_COFF, "defhandler_coff", &abi_defhandler_coff,
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
{ABI_DEFHANDLER_ELF, "defhandler_elf", &abi_defhandler_elf,
|
{ABI_DEFHANDLER_ELF, "defhandler_elf", &abi_defhandler_elf,
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
{ABI_DEFHANDLER_LCALL7, "defhandler_lcall7", &abi_defhandler_lcall7,
|
{ABI_DEFHANDLER_LCALL7, "defhandler_lcall7", &abi_defhandler_lcall7,
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
{ABI_DEFHANDLER_LIBCSO, "defhandler_libcso", &abi_defhandler_libcso,
|
{ABI_DEFHANDLER_LIBCSO, "defhandler_libcso", &abi_defhandler_libcso,
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
sizeof(int), 0644, NULL, &proc_doulongvec_minmax},
|
{ABI_TRACE, "trace", &abi_traceflg,
|
{ABI_TRACE, "trace", &abi_traceflg,
|
sizeof(u_int), 0644, NULL, &proc_dointvec},
|
sizeof(u_int), 0644, NULL, &proc_dointvec},
|
{ABI_FAKE_UTSNAME, "fake_utsname", &abi_fake_utsname,
|
{ABI_FAKE_UTSNAME, "fake_utsname", &abi_fake_utsname,
|
sizeof(int), 0644, NULL, &proc_dointvec},
|
sizeof(int), 0644, NULL, &proc_dointvec},
|
{0}
|
{0}
|
};
|
};
|
|
|
static struct ctl_table abi_root_table[] = {
|
static struct ctl_table abi_root_table[] = {
|
{CTL_ABI, "abi", NULL, 0, 0555, abi_table},
|
{CTL_ABI, "abi", NULL, 0, 0555, abi_table},
|
{0}
|
{0}
|
};
|
};
|
|
|
static int __init
|
static int __init
|
abi_register_sysctl(void)
|
abi_register_sysctl(void)
|
{
|
{
|
register_sysctl_table(abi_root_table, 1);
|
register_sysctl_table(abi_root_table, 1);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
__initcall(abi_register_sysctl);
|
__initcall(abi_register_sysctl);
|
|
|
|
|
EXPORT_SYMBOL(abi_defhandler_coff);
|
EXPORT_SYMBOL(abi_defhandler_coff);
|
EXPORT_SYMBOL(abi_defhandler_elf);
|
EXPORT_SYMBOL(abi_defhandler_elf);
|
EXPORT_SYMBOL(abi_defhandler_lcall7);
|
EXPORT_SYMBOL(abi_defhandler_lcall7);
|
EXPORT_SYMBOL(abi_defhandler_libcso);
|
EXPORT_SYMBOL(abi_defhandler_libcso);
|
EXPORT_SYMBOL(abi_traceflg);
|
EXPORT_SYMBOL(abi_traceflg);
|
EXPORT_SYMBOL(abi_fake_utsname);
|
EXPORT_SYMBOL(abi_fake_utsname);
|
|
|
