9895b5ca9d
- DTrace scripts to check for errors, performance, ... they serve mostly as examples of what you can do with the static probe;s with moderate load the scripts may be overwhelmed, excessive lock-tracing may influence program behavior (see the last design decission) Design decissions: - use "linuxulator" as the provider for the native bitsize; add the bitsize for the non-native emulation (e.g. "linuxuator32" on amd64) - Add probes only for locks which are acquired in one function and released in another function. Locks which are aquired and released in the same function should be easy to pair in the code, inter-function locking is more easy to verify in DTrace. - Probes for locks should be fired after locking and before releasing to prevent races (to provide data/function stability in DTrace, see the man-page of "dtrace -v ..." and the corresponding DTrace docs).
858 lines
24 KiB
C
858 lines
24 KiB
C
/*-
|
|
* Copyright (c) 1999 Marcel Moolenaar
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer
|
|
* in this position and unchanged.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. The name of the author may not be used to endorse or promote products
|
|
* derived from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#include "opt_compat.h"
|
|
#include "opt_kdtrace.h"
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/sdt.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/sysctl.h>
|
|
#include <sys/proc.h>
|
|
#include <sys/malloc.h>
|
|
#include <sys/mount.h>
|
|
#include <sys/jail.h>
|
|
#include <sys/lock.h>
|
|
#include <sys/mutex.h>
|
|
#include <sys/sx.h>
|
|
|
|
#ifdef COMPAT_LINUX32
|
|
#include <machine/../linux32/linux.h>
|
|
#else
|
|
#include <machine/../linux/linux.h>
|
|
#endif
|
|
#include <compat/linux/linux_dtrace.h>
|
|
#include <compat/linux/linux_mib.h>
|
|
|
|
/* DTrace init */
|
|
LIN_SDT_PROVIDER_DECLARE(LINUX_DTRACE);
|
|
|
|
/**
|
|
* DTrace probes in this module.
|
|
*/
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_sysctl_osname, entry);
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_osname, sysctl_string_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_osname, return, "int");
|
|
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_sysctl_osrelease, entry);
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_osrelease, sysctl_string_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_osrelease, return, "int");
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_sysctl_oss_version, entry);
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_oss_version, sysctl_string_error,
|
|
"int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_sysctl_oss_version, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_map_osrel, entry, "char *", "int *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_map_osrel, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_get_prison, entry, "struct prison *",
|
|
"struct prison **");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_get_prison, return, "struct linux_prison *");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_alloc_prison, entry, "struct prison *",
|
|
"struct linux_prison **");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_alloc_prison, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_prison_create, entry, "void *", "void *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_create, vfs_copyopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_create, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_prison_check, entry, "void *", "void *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_check, vfs_copyopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_check, vfs_getopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_check, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_prison_set, entry, "void *", "void *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_set, vfs_copyopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_set, vfs_getopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_set, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_prison_get, entry, "void *", "void *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_get, vfs_setopt_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_get, vfs_setopts_error, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_get, return, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_prison_destructor, entry, "void *");
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_prison_destructor, return);
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_osd_jail_register, entry);
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_osd_jail_register, return);
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_osd_jail_deregister, entry);
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_osd_jail_deregister, return);
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_get_osname, entry, "struct thread *",
|
|
"char *");
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_get_osname, return);
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_set_osname, entry, "struct thread *",
|
|
"char *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_set_osname, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_get_osrelease, entry, "struct thread *",
|
|
"char *");
|
|
LIN_SDT_PROBE_DEFINE0(mib, linux_get_osrelease, return);
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_kernver, entry, "struct thread *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_kernver, return, "int");
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_set_osrelease, entry, "struct thread *",
|
|
"char *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_set_osrelease, return, "int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_get_oss_version, entry, "struct thread *");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_get_oss_version, return, "int");
|
|
|
|
LIN_SDT_PROBE_DEFINE2(mib, linux_set_oss_version, entry, "struct thread *",
|
|
"int");
|
|
LIN_SDT_PROBE_DEFINE1(mib, linux_set_oss_version, return, "int");
|
|
|
|
struct linux_prison {
|
|
char pr_osname[LINUX_MAX_UTSNAME];
|
|
char pr_osrelease[LINUX_MAX_UTSNAME];
|
|
int pr_oss_version;
|
|
int pr_osrel;
|
|
};
|
|
|
|
static struct linux_prison lprison0 = {
|
|
.pr_osname = "Linux",
|
|
.pr_osrelease = "2.6.16",
|
|
.pr_oss_version = 0x030600,
|
|
.pr_osrel = 2006016
|
|
};
|
|
|
|
static unsigned linux_osd_jail_slot;
|
|
|
|
static SYSCTL_NODE(_compat, OID_AUTO, linux, CTLFLAG_RW, 0,
|
|
"Linux mode");
|
|
|
|
static int linux_set_osname(struct thread *td, char *osname);
|
|
static int linux_set_osrelease(struct thread *td, char *osrelease);
|
|
static int linux_set_oss_version(struct thread *td, int oss_version);
|
|
|
|
static int
|
|
linux_sysctl_osname(SYSCTL_HANDLER_ARGS)
|
|
{
|
|
char osname[LINUX_MAX_UTSNAME];
|
|
int error;
|
|
|
|
LIN_SDT_PROBE0(mib, linux_sysctl_osname, entry);
|
|
|
|
linux_get_osname(req->td, osname);
|
|
error = sysctl_handle_string(oidp, osname, LINUX_MAX_UTSNAME, req);
|
|
if (error != 0 || req->newptr == NULL) {
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osname, sysctl_string_error,
|
|
error);
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osname, return, error);
|
|
return (error);
|
|
}
|
|
error = linux_set_osname(req->td, osname);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osname, return, error);
|
|
return (error);
|
|
}
|
|
|
|
SYSCTL_PROC(_compat_linux, OID_AUTO, osname,
|
|
CTLTYPE_STRING | CTLFLAG_RW | CTLFLAG_PRISON | CTLFLAG_MPSAFE,
|
|
0, 0, linux_sysctl_osname, "A",
|
|
"Linux kernel OS name");
|
|
|
|
static int
|
|
linux_sysctl_osrelease(SYSCTL_HANDLER_ARGS)
|
|
{
|
|
char osrelease[LINUX_MAX_UTSNAME];
|
|
int error;
|
|
|
|
LIN_SDT_PROBE0(mib, linux_sysctl_osrelease, entry);
|
|
|
|
linux_get_osrelease(req->td, osrelease);
|
|
error = sysctl_handle_string(oidp, osrelease, LINUX_MAX_UTSNAME, req);
|
|
if (error != 0 || req->newptr == NULL) {
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osrelease, sysctl_string_error,
|
|
error);
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osrelease, return, error);
|
|
return (error);
|
|
}
|
|
error = linux_set_osrelease(req->td, osrelease);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_osrelease, return, error);
|
|
return (error);
|
|
}
|
|
|
|
SYSCTL_PROC(_compat_linux, OID_AUTO, osrelease,
|
|
CTLTYPE_STRING | CTLFLAG_RW | CTLFLAG_PRISON | CTLFLAG_MPSAFE,
|
|
0, 0, linux_sysctl_osrelease, "A",
|
|
"Linux kernel OS release");
|
|
|
|
static int
|
|
linux_sysctl_oss_version(SYSCTL_HANDLER_ARGS)
|
|
{
|
|
int oss_version;
|
|
int error;
|
|
|
|
LIN_SDT_PROBE0(mib, linux_sysctl_oss_version, entry);
|
|
|
|
oss_version = linux_get_oss_version(req->td);
|
|
error = sysctl_handle_int(oidp, &oss_version, 0, req);
|
|
if (error != 0 || req->newptr == NULL) {
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_oss_version,
|
|
sysctl_string_error, error);
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_oss_version, return, error);
|
|
return (error);
|
|
}
|
|
error = linux_set_oss_version(req->td, oss_version);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_sysctl_oss_version, return, error);
|
|
return (error);
|
|
}
|
|
|
|
SYSCTL_PROC(_compat_linux, OID_AUTO, oss_version,
|
|
CTLTYPE_INT | CTLFLAG_RW | CTLFLAG_PRISON | CTLFLAG_MPSAFE,
|
|
0, 0, linux_sysctl_oss_version, "I",
|
|
"Linux OSS version");
|
|
|
|
/*
|
|
* Map the osrelease into integer
|
|
*/
|
|
static int
|
|
linux_map_osrel(char *osrelease, int *osrel)
|
|
{
|
|
char *sep, *eosrelease;
|
|
int len, v0, v1, v2, v;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_map_osrel, entry, osrelease, osrel);
|
|
|
|
len = strlen(osrelease);
|
|
eosrelease = osrelease + len;
|
|
v0 = strtol(osrelease, &sep, 10);
|
|
if (osrelease == sep || sep + 1 >= eosrelease || *sep != '.') {
|
|
LIN_SDT_PROBE1(mib, linux_map_osrel, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
osrelease = sep + 1;
|
|
v1 = strtol(osrelease, &sep, 10);
|
|
if (osrelease == sep || sep + 1 >= eosrelease || *sep != '.') {
|
|
LIN_SDT_PROBE1(mib, linux_map_osrel, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
osrelease = sep + 1;
|
|
v2 = strtol(osrelease, &sep, 10);
|
|
if (osrelease == sep || sep != eosrelease) {
|
|
LIN_SDT_PROBE1(mib, linux_map_osrel, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
|
|
v = v0 * 1000000 + v1 * 1000 + v2;
|
|
if (v < 1000000) {
|
|
LIN_SDT_PROBE1(mib, linux_map_osrel, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
|
|
*osrel = v;
|
|
|
|
LIN_SDT_PROBE1(mib, linux_map_osrel, return, 0);
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* Find a prison with Linux info.
|
|
* Return the Linux info and the (locked) prison.
|
|
*/
|
|
static struct linux_prison *
|
|
linux_find_prison(struct prison *spr, struct prison **prp)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_get_prison, entry, spr, prp);
|
|
|
|
if (!linux_osd_jail_slot)
|
|
/* In case osd_register failed. */
|
|
spr = &prison0;
|
|
for (pr = spr;; pr = pr->pr_parent) {
|
|
mtx_lock(&pr->pr_mtx);
|
|
lpr = (pr == &prison0)
|
|
? &lprison0
|
|
: osd_jail_get(pr, linux_osd_jail_slot);
|
|
if (lpr != NULL)
|
|
break;
|
|
mtx_unlock(&pr->pr_mtx);
|
|
}
|
|
*prp = pr;
|
|
|
|
LIN_SDT_PROBE1(mib, linux_get_prison, return, lpr);
|
|
return (lpr);
|
|
}
|
|
|
|
/*
|
|
* Ensure a prison has its own Linux info. If lprp is non-null, point it to
|
|
* the Linux info and lock the prison.
|
|
*/
|
|
static int
|
|
linux_alloc_prison(struct prison *pr, struct linux_prison **lprp)
|
|
{
|
|
struct prison *ppr;
|
|
struct linux_prison *lpr, *nlpr;
|
|
int error;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_alloc_prison, entry, pr, lprp);
|
|
|
|
/* If this prison already has Linux info, return that. */
|
|
error = 0;
|
|
lpr = linux_find_prison(pr, &ppr);
|
|
if (ppr == pr)
|
|
goto done;
|
|
/*
|
|
* Allocate a new info record. Then check again, in case something
|
|
* changed during the allocation.
|
|
*/
|
|
mtx_unlock(&ppr->pr_mtx);
|
|
nlpr = malloc(sizeof(struct linux_prison), M_PRISON, M_WAITOK);
|
|
lpr = linux_find_prison(pr, &ppr);
|
|
if (ppr == pr) {
|
|
free(nlpr, M_PRISON);
|
|
goto done;
|
|
}
|
|
/* Inherit the initial values from the ancestor. */
|
|
mtx_lock(&pr->pr_mtx);
|
|
error = osd_jail_set(pr, linux_osd_jail_slot, nlpr);
|
|
if (error == 0) {
|
|
bcopy(lpr, nlpr, sizeof(*lpr));
|
|
lpr = nlpr;
|
|
} else {
|
|
free(nlpr, M_PRISON);
|
|
lpr = NULL;
|
|
}
|
|
mtx_unlock(&ppr->pr_mtx);
|
|
done:
|
|
if (lprp != NULL)
|
|
*lprp = lpr;
|
|
else
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_alloc_prison, return, error);
|
|
return (error);
|
|
}
|
|
|
|
/*
|
|
* Jail OSD methods for Linux prison data.
|
|
*/
|
|
static int
|
|
linux_prison_create(void *obj, void *data)
|
|
{
|
|
struct prison *pr = obj;
|
|
struct vfsoptlist *opts = data;
|
|
int jsys, error;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_prison_create, entry, obj, data);
|
|
|
|
error = vfs_copyopt(opts, "linux", &jsys, sizeof(jsys));
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_create, vfs_copyopt_error,
|
|
error);
|
|
} else if (jsys == JAIL_SYS_INHERIT) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_create, return, 0);
|
|
return (0);
|
|
}
|
|
/*
|
|
* Inherit a prison's initial values from its parent
|
|
* (different from JAIL_SYS_INHERIT which also inherits changes).
|
|
*/
|
|
error = linux_alloc_prison(pr, NULL);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_prison_create, return, error);
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
linux_prison_check(void *obj __unused, void *data)
|
|
{
|
|
struct vfsoptlist *opts = data;
|
|
char *osname, *osrelease;
|
|
int error, jsys, len, osrel, oss_version;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_prison_check, entry, obj, data);
|
|
|
|
/* Check that the parameters are correct. */
|
|
error = vfs_copyopt(opts, "linux", &jsys, sizeof(jsys));
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, vfs_copyopt_error,
|
|
error);
|
|
}
|
|
if (error != ENOENT) {
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, error);
|
|
return (error);
|
|
}
|
|
if (jsys != JAIL_SYS_NEW && jsys != JAIL_SYS_INHERIT) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
}
|
|
error = vfs_getopt(opts, "linux.osname", (void **)&osname, &len);
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, vfs_getopt_error,
|
|
error);
|
|
}
|
|
if (error != ENOENT) {
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, error);
|
|
return (error);
|
|
}
|
|
if (len == 0 || osname[len - 1] != '\0') {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
if (len > LINUX_MAX_UTSNAME) {
|
|
vfs_opterror(opts, "linux.osname too long");
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return,
|
|
ENAMETOOLONG);
|
|
return (ENAMETOOLONG);
|
|
}
|
|
}
|
|
error = vfs_getopt(opts, "linux.osrelease", (void **)&osrelease, &len);
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, vfs_getopt_error,
|
|
error);
|
|
}
|
|
if (error != ENOENT) {
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, error);
|
|
return (error);
|
|
}
|
|
if (len == 0 || osrelease[len - 1] != '\0') {
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, EINVAL);
|
|
return (EINVAL);
|
|
}
|
|
if (len > LINUX_MAX_UTSNAME) {
|
|
vfs_opterror(opts, "linux.osrelease too long");
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return,
|
|
ENAMETOOLONG);
|
|
return (ENAMETOOLONG);
|
|
}
|
|
error = linux_map_osrel(osrelease, &osrel);
|
|
if (error != 0) {
|
|
vfs_opterror(opts, "linux.osrelease format error");
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, error);
|
|
return (error);
|
|
}
|
|
}
|
|
error = vfs_copyopt(opts, "linux.oss_version", &oss_version,
|
|
sizeof(oss_version));
|
|
if (error != 0)
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, vfs_copyopt_error, error);
|
|
|
|
if (error == ENOENT)
|
|
error = 0;
|
|
LIN_SDT_PROBE1(mib, linux_prison_check, return, error);
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
linux_prison_set(void *obj, void *data)
|
|
{
|
|
struct linux_prison *lpr;
|
|
struct prison *pr = obj;
|
|
struct vfsoptlist *opts = data;
|
|
char *osname, *osrelease;
|
|
int error, gotversion, jsys, len, oss_version;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_prison_set, entry, obj, data);
|
|
|
|
/* Set the parameters, which should be correct. */
|
|
error = vfs_copyopt(opts, "linux", &jsys, sizeof(jsys));
|
|
if (error != 0)
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, vfs_copyopt_error, error);
|
|
if (error == ENOENT)
|
|
jsys = -1;
|
|
error = vfs_getopt(opts, "linux.osname", (void **)&osname, &len);
|
|
if (error != 0)
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, vfs_getopt_error, error);
|
|
if (error == ENOENT)
|
|
osname = NULL;
|
|
else
|
|
jsys = JAIL_SYS_NEW;
|
|
error = vfs_getopt(opts, "linux.osrelease", (void **)&osrelease, &len);
|
|
if (error != 0)
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, vfs_getopt_error, error);
|
|
if (error == ENOENT)
|
|
osrelease = NULL;
|
|
else
|
|
jsys = JAIL_SYS_NEW;
|
|
error = vfs_copyopt(opts, "linux.oss_version", &oss_version,
|
|
sizeof(oss_version));
|
|
if (error != 0)
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, vfs_copyopt_error, error);
|
|
if (error == ENOENT)
|
|
gotversion = 0;
|
|
else {
|
|
gotversion = 1;
|
|
jsys = JAIL_SYS_NEW;
|
|
}
|
|
switch (jsys) {
|
|
case JAIL_SYS_INHERIT:
|
|
/* "linux=inherit": inherit the parent's Linux info. */
|
|
mtx_lock(&pr->pr_mtx);
|
|
osd_jail_del(pr, linux_osd_jail_slot);
|
|
mtx_unlock(&pr->pr_mtx);
|
|
break;
|
|
case JAIL_SYS_NEW:
|
|
/*
|
|
* "linux=new" or "linux.*":
|
|
* the prison gets its own Linux info.
|
|
*/
|
|
error = linux_alloc_prison(pr, &lpr);
|
|
if (error) {
|
|
mtx_unlock(&pr->pr_mtx);
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, return, error);
|
|
return (error);
|
|
}
|
|
if (osrelease) {
|
|
error = linux_map_osrel(osrelease, &lpr->pr_osrel);
|
|
if (error) {
|
|
mtx_unlock(&pr->pr_mtx);
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, return,
|
|
error);
|
|
return (error);
|
|
}
|
|
strlcpy(lpr->pr_osrelease, osrelease,
|
|
LINUX_MAX_UTSNAME);
|
|
}
|
|
if (osname)
|
|
strlcpy(lpr->pr_osname, osname, LINUX_MAX_UTSNAME);
|
|
if (gotversion)
|
|
lpr->pr_oss_version = oss_version;
|
|
mtx_unlock(&pr->pr_mtx);
|
|
}
|
|
|
|
LIN_SDT_PROBE1(mib, linux_prison_set, return, 0);
|
|
return (0);
|
|
}
|
|
|
|
SYSCTL_JAIL_PARAM_SYS_NODE(linux, CTLFLAG_RW, "Jail Linux parameters");
|
|
SYSCTL_JAIL_PARAM_STRING(_linux, osname, CTLFLAG_RW, LINUX_MAX_UTSNAME,
|
|
"Jail Linux kernel OS name");
|
|
SYSCTL_JAIL_PARAM_STRING(_linux, osrelease, CTLFLAG_RW, LINUX_MAX_UTSNAME,
|
|
"Jail Linux kernel OS release");
|
|
SYSCTL_JAIL_PARAM(_linux, oss_version, CTLTYPE_INT | CTLFLAG_RW,
|
|
"I", "Jail Linux OSS version");
|
|
|
|
static int
|
|
linux_prison_get(void *obj, void *data)
|
|
{
|
|
struct linux_prison *lpr;
|
|
struct prison *ppr;
|
|
struct prison *pr = obj;
|
|
struct vfsoptlist *opts = data;
|
|
int error, i;
|
|
|
|
static int version0;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_prison_get, entry, obj, data);
|
|
|
|
/* See if this prison is the one with the Linux info. */
|
|
lpr = linux_find_prison(pr, &ppr);
|
|
i = (ppr == pr) ? JAIL_SYS_NEW : JAIL_SYS_INHERIT;
|
|
error = vfs_setopt(opts, "linux", &i, sizeof(i));
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopt_error, error);
|
|
if (error != ENOENT)
|
|
goto done;
|
|
}
|
|
if (i) {
|
|
error = vfs_setopts(opts, "linux.osname", lpr->pr_osname);
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopts_error,
|
|
error);
|
|
if (error != ENOENT)
|
|
goto done;
|
|
}
|
|
error = vfs_setopts(opts, "linux.osrelease", lpr->pr_osrelease);
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopts_error,
|
|
error);
|
|
if (error != ENOENT)
|
|
goto done;
|
|
}
|
|
error = vfs_setopt(opts, "linux.oss_version",
|
|
&lpr->pr_oss_version, sizeof(lpr->pr_oss_version));
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopt_error,
|
|
error);
|
|
if(error != ENOENT)
|
|
goto done;
|
|
}
|
|
} else {
|
|
/*
|
|
* If this prison is inheriting its Linux info, report
|
|
* empty/zero parameters.
|
|
*/
|
|
error = vfs_setopts(opts, "linux.osname", "");
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopts_error,
|
|
error);
|
|
if(error != ENOENT)
|
|
goto done;
|
|
}
|
|
error = vfs_setopts(opts, "linux.osrelease", "");
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopts_error,
|
|
error);
|
|
if(error != ENOENT)
|
|
goto done;
|
|
}
|
|
error = vfs_setopt(opts, "linux.oss_version", &version0,
|
|
sizeof(lpr->pr_oss_version));
|
|
if (error != 0) {
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, vfs_setopt_error,
|
|
error);
|
|
if(error != ENOENT)
|
|
goto done;
|
|
}
|
|
}
|
|
error = 0;
|
|
|
|
done:
|
|
mtx_unlock(&ppr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_prison_get, return, error);
|
|
return (error);
|
|
}
|
|
|
|
static void
|
|
linux_prison_destructor(void *data)
|
|
{
|
|
|
|
LIN_SDT_PROBE1(mib, linux_prison_destructor, entry, data);
|
|
free(data, M_PRISON);
|
|
LIN_SDT_PROBE0(mib, linux_prison_destructor, return);
|
|
}
|
|
|
|
void
|
|
linux_osd_jail_register(void)
|
|
{
|
|
struct prison *pr;
|
|
osd_method_t methods[PR_MAXMETHOD] = {
|
|
[PR_METHOD_CREATE] = linux_prison_create,
|
|
[PR_METHOD_GET] = linux_prison_get,
|
|
[PR_METHOD_SET] = linux_prison_set,
|
|
[PR_METHOD_CHECK] = linux_prison_check
|
|
};
|
|
|
|
LIN_SDT_PROBE0(mib, linux_osd_jail_register, entry);
|
|
|
|
linux_osd_jail_slot =
|
|
osd_jail_register(linux_prison_destructor, methods);
|
|
if (linux_osd_jail_slot > 0) {
|
|
/* Copy the system linux info to any current prisons. */
|
|
sx_xlock(&allprison_lock);
|
|
TAILQ_FOREACH(pr, &allprison, pr_list)
|
|
(void)linux_alloc_prison(pr, NULL);
|
|
sx_xunlock(&allprison_lock);
|
|
}
|
|
|
|
LIN_SDT_PROBE0(mib, linux_osd_jail_register, return);
|
|
}
|
|
|
|
void
|
|
linux_osd_jail_deregister(void)
|
|
{
|
|
|
|
LIN_SDT_PROBE0(mib, linux_osd_jail_register, entry);
|
|
|
|
if (linux_osd_jail_slot)
|
|
osd_jail_deregister(linux_osd_jail_slot);
|
|
|
|
LIN_SDT_PROBE0(mib, linux_osd_jail_register, return);
|
|
}
|
|
|
|
void
|
|
linux_get_osname(struct thread *td, char *dst)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_get_osname, entry, td, dst);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
bcopy(lpr->pr_osname, dst, LINUX_MAX_UTSNAME);
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE0(mib, linux_get_osname, return);
|
|
}
|
|
|
|
static int
|
|
linux_set_osname(struct thread *td, char *osname)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_set_osname, entry, td, osname);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
strlcpy(lpr->pr_osname, osname, LINUX_MAX_UTSNAME);
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_set_osname, return, 0);
|
|
return (0);
|
|
}
|
|
|
|
void
|
|
linux_get_osrelease(struct thread *td, char *dst)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_get_osrelease, entry, td, dst);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
bcopy(lpr->pr_osrelease, dst, LINUX_MAX_UTSNAME);
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE0(mib, linux_get_osrelease, return);
|
|
}
|
|
|
|
int
|
|
linux_kernver(struct thread *td)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
int osrel;
|
|
|
|
LIN_SDT_PROBE1(mib, linux_kernver, entry, td);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
osrel = lpr->pr_osrel;
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_kernver, return, osrel);
|
|
return (osrel);
|
|
}
|
|
|
|
static int
|
|
linux_set_osrelease(struct thread *td, char *osrelease)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
int error;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_set_osrelease, entry, td, osrelease);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
error = linux_map_osrel(osrelease, &lpr->pr_osrel);
|
|
if (error == 0)
|
|
strlcpy(lpr->pr_osrelease, osrelease, LINUX_MAX_UTSNAME);
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_set_osrelease, return, error);
|
|
return (error);
|
|
}
|
|
|
|
int
|
|
linux_get_oss_version(struct thread *td)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
int version;
|
|
|
|
LIN_SDT_PROBE1(mib, linux_get_oss_version, entry, td);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
version = lpr->pr_oss_version;
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_get_oss_version, return, version);
|
|
return (version);
|
|
}
|
|
|
|
static int
|
|
linux_set_oss_version(struct thread *td, int oss_version)
|
|
{
|
|
struct prison *pr;
|
|
struct linux_prison *lpr;
|
|
|
|
LIN_SDT_PROBE2(mib, linux_set_oss_version, entry, td, oss_version);
|
|
|
|
lpr = linux_find_prison(td->td_ucred->cr_prison, &pr);
|
|
lpr->pr_oss_version = oss_version;
|
|
mtx_unlock(&pr->pr_mtx);
|
|
|
|
LIN_SDT_PROBE1(mib, linux_set_oss_version, return, 0);
|
|
return (0);
|
|
}
|
|
|
|
#if defined(DEBUG) || defined(KTR)
|
|
/* XXX: can be removed when every ldebug(...) and KTR stuff are removed. */
|
|
|
|
u_char linux_debug_map[howmany(LINUX_SYS_MAXSYSCALL, sizeof(u_char))];
|
|
|
|
static int
|
|
linux_debug(int syscall, int toggle, int global)
|
|
{
|
|
|
|
if (global) {
|
|
char c = toggle ? 0 : 0xff;
|
|
|
|
memset(linux_debug_map, c, sizeof(linux_debug_map));
|
|
return (0);
|
|
}
|
|
if (syscall < 0 || syscall >= LINUX_SYS_MAXSYSCALL)
|
|
return (EINVAL);
|
|
if (toggle)
|
|
clrbit(linux_debug_map, syscall);
|
|
else
|
|
setbit(linux_debug_map, syscall);
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* Usage: sysctl linux.debug=<syscall_nr>.<0/1>
|
|
*
|
|
* E.g.: sysctl linux.debug=21.0
|
|
*
|
|
* As a special case, syscall "all" will apply to all syscalls globally.
|
|
*/
|
|
#define LINUX_MAX_DEBUGSTR 16
|
|
static int
|
|
linux_sysctl_debug(SYSCTL_HANDLER_ARGS)
|
|
{
|
|
char value[LINUX_MAX_DEBUGSTR], *p;
|
|
int error, sysc, toggle;
|
|
int global = 0;
|
|
|
|
value[0] = '\0';
|
|
error = sysctl_handle_string(oidp, value, LINUX_MAX_DEBUGSTR, req);
|
|
if (error || req->newptr == NULL)
|
|
return (error);
|
|
for (p = value; *p != '\0' && *p != '.'; p++);
|
|
if (*p == '\0')
|
|
return (EINVAL);
|
|
*p++ = '\0';
|
|
sysc = strtol(value, NULL, 0);
|
|
toggle = strtol(p, NULL, 0);
|
|
if (strcmp(value, "all") == 0)
|
|
global = 1;
|
|
error = linux_debug(sysc, toggle, global);
|
|
return (error);
|
|
}
|
|
|
|
SYSCTL_PROC(_compat_linux, OID_AUTO, debug,
|
|
CTLTYPE_STRING | CTLFLAG_RW,
|
|
0, 0, linux_sysctl_debug, "A",
|
|
"Linux debugging control");
|
|
|
|
#endif /* DEBUG || KTR */
|