/*-
 * Copyright (c) 1982, 1986, 1989, 1993
 *      The Regents of the University of California.  All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Mike Karels at Berkeley Software Design, Inc.
 *
 * Quite extensively rewritten by Poul-Henning Kamp of the FreeBSD
 * project, to make these variables more userfriendly.
 *
 * 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.
 * 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. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 REGENTS OR CONTRIBUTORS 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.
 *
 *      @(#)kern_sysctl.c       8.4 (Berkeley) 4/14/94
 * $FreeBSD: src/sys/kern/kern_mib.c,v 1.29.2.4 2001/07/30 23:28:00 peter Exp $
 */

#include <sys/param.h>
#include <sys/kernel.h>
#include <sys/systm.h>
#include <sys/sysctl.h>
#include <sys/proc.h>
#include <sys/lockf.h>
#include <sys/jail.h>
#include <sys/unistd.h>
#include <machine/tls.h>
#include <machine/smp.h>

SYSCTL_NODE(, 0,          sysctl, CTLFLAG_RW, 0,
        "Sysctl internal magic");
SYSCTL_NODE(, CTL_KERN,   kern,   CTLFLAG_RW, 0,
        "High kernel, proc, limits &c");
SYSCTL_NODE(, CTL_VM,     vm,     CTLFLAG_RW, 0,
        "Virtual memory");
SYSCTL_NODE(, CTL_VFS,    vfs,     CTLFLAG_RW, 0,
        "File system");
SYSCTL_NODE(, CTL_NET,    net,    CTLFLAG_RW, 0,
        "Network, (see socket.h)");
SYSCTL_NODE(, CTL_DEBUG,  debug,  CTLFLAG_RW, 0,
        "Debugging");
SYSCTL_NODE(_debug, OID_AUTO,  sizeof,  CTLFLAG_RW, 0,
        "Size of various kernel data structures");
SYSCTL_NODE(, CTL_HW,     hw,     CTLFLAG_RW, 0,
        "hardware");
SYSCTL_NODE(, CTL_MACHDEP, machdep, CTLFLAG_RW, 0,
        "machine dependent");
SYSCTL_NODE(, CTL_USER,   user,   CTLFLAG_RW, 0,
        "user-level");
SYSCTL_NODE(, CTL_P1003_1B,  p1003_1b,   CTLFLAG_RW, 0,
        "p1003_1b, (see p1003_1b.h)");
SYSCTL_NODE(, CTL_LWKT,  lwkt,   CTLFLAG_RW, 0,
        "light weight kernel threads");

SYSCTL_NODE(, OID_AUTO,  compat, CTLFLAG_RW, 0,
        "Compatibility code");
SYSCTL_NODE(, OID_AUTO,  security,   CTLFLAG_RW, 0,
        "Security");

SYSCTL_STRING(_kern, OID_AUTO, ident, CTLFLAG_RD | CTLFLAG_NOLOCK,
    kern_ident, 0, "Kernel identifier");

SYSCTL_STRING(_kern, KERN_OSRELEASE, osrelease, CTLFLAG_RD | CTLFLAG_NOLOCK,
    osrelease, 0, "Operating system type");

SYSCTL_INT(_kern, KERN_OSREV, osrevision, CTLFLAG_RD, 
    0, __DragonFly_version, "Operating system revision");

SYSCTL_STRING(_kern, KERN_VERSION, version, CTLFLAG_RD | CTLFLAG_NOLOCK,
    version, 0, "Kernel version");

SYSCTL_STRING(_kern, KERN_OSTYPE, ostype, CTLFLAG_RD | CTLFLAG_NOLOCK,
    ostype, 0, "Operating system type");

SYSCTL_INT(_kern, KERN_OSRELDATE, osreldate, CTLFLAG_RD,
    &osreldate, 0, "Operating system release date");

/*
 * Disable build-id for vkernel(7) because it doesn't use a linker script,
 * and it's not easy to implement it (e.g., need to parse the loaded ELF
 * and walk the program headers).
 */
#ifndef _KERNEL_VIRTUAL

/*
 * The build-id is copied from the ELF section .note.gnu.build-id.  The linker
 * script defines two variables to expose the beginning and end.
 */
extern char __build_id_start[];
extern char __build_id_end[];

#define BUILD_ID_HEADER_LEN     0x10
#define BUILD_ID_HASH_MAXLEN    0x14 /* SHA-1 */

static int
sysctl_build_id(SYSCTL_HANDLER_ARGS)
{
        uintptr_t sectionlen = (uintptr_t)(__build_id_end - __build_id_start);
        int hashlen;
        char buf[2*BUILD_ID_HASH_MAXLEN+1];

        /*
         * The ELF note section has a four byte length for the vendor name,
         * four byte length for the value, and a four byte vendor specific
         * type.  The name for the build id is "GNU\0".  We skip the first 16
         * bytes to read the build hash.  We will return the remaining bytes up
         * to 20 (SHA-1) hash size.  If the hash happens to be a custom number
         * of bytes we will pad the value with zeros, as the section should be
         * four byte aligned.
         */
        if (sectionlen <= BUILD_ID_HEADER_LEN ||
            sectionlen > (BUILD_ID_HEADER_LEN + BUILD_ID_HASH_MAXLEN)) {
                return (ENOENT);
        }

        hashlen = sectionlen - BUILD_ID_HEADER_LEN;
        for (int i = 0; i < hashlen; i++) {
                uint8_t c = __build_id_start[i+BUILD_ID_HEADER_LEN];
                ksnprintf(&buf[2*i], 3, "%02x", c);
        }

        return (SYSCTL_OUT(req, buf, strlen(buf) + 1));
}

SYSCTL_PROC(_kern, OID_AUTO, build_id,
    CTLTYPE_STRING | CTLFLAG_RD,
    NULL, 0, sysctl_build_id, "A", "Operating system build-id");

#endif /* _KERNEL_VIRTUAL */

static int tls_extra = RTLD_STATIC_TLS_EXTRA_DEFAULT;
SYSCTL_INT(_kern, KERN_STATIC_TLS_EXTRA, tls_extra, CTLFLAG_RW | CTLFLAG_NOLOCK,
    &tls_extra, 0, "Extra static tls space for libraries");

SYSCTL_INT(_kern, KERN_MAXPROC, maxproc, CTLFLAG_RD, 
    &maxproc, 0, "Maximum number of processes");

SYSCTL_INT(_kern, KERN_MAXPROCPERUID, maxprocperuid, CTLFLAG_RW, 
    &maxprocperuid, 0, "Maximum processes allowed per userid");

SYSCTL_INT(_kern, KERN_MAXPOSIXLOCKSPERUID, maxposixlocksperuid, CTLFLAG_RW,
    &maxposixlocksperuid, 0, "Maximum number of POSIX-type locks per user id");

SYSCTL_INT(_kern, OID_AUTO, maxusers, CTLFLAG_RD, 
    &maxusers, 0, "Hint for kernel tuning");

SYSCTL_INT(_kern, KERN_ARGMAX, argmax, CTLFLAG_RD, 
    0, ARG_MAX, "Maximum bytes of argument to execve(2)");

SYSCTL_INT(_kern, KERN_POSIX1, posix1version, CTLFLAG_RD, 
    0, _POSIX_VERSION, "Version of POSIX attempting to comply to");

SYSCTL_INT(_kern, KERN_NGROUPS, ngroups, CTLFLAG_RD, 
    0, NGROUPS_MAX, "Maximum number of groups a user can belong to");

SYSCTL_INT(_kern, KERN_JOB_CONTROL, job_control, CTLFLAG_RD, 
    0, 1, "Whether job control is available");

#ifdef _POSIX_SAVED_IDS
SYSCTL_INT(_kern, KERN_SAVED_IDS, saved_ids, CTLFLAG_RD, 
    0, 1, "Whether saved set-group/user ID is available");
#else
SYSCTL_INT(_kern, KERN_SAVED_IDS, saved_ids, CTLFLAG_RD, 
    0, 0, "Whether saved set-group/user ID is available");
#endif

char kernelname[MAXPATHLEN] = "/kernel";        /* XXX bloat */

SYSCTL_STRING(_kern, KERN_BOOTFILE, bootfile, CTLFLAG_RW, 
    kernelname, sizeof kernelname, "Name of kernel file booted");

SYSCTL_INT(_hw, HW_NCPU, ncpu, CTLFLAG_RD, 
    &ncpus, 0, "Number of active CPUs");

SYSCTL_INT(_hw, HW_BYTEORDER, byteorder, CTLFLAG_RD, 
    0, BYTE_ORDER, "System byte order");

SYSCTL_INT(_hw, HW_PAGESIZE, pagesize, CTLFLAG_RD, 
    0, PAGE_SIZE, "System memory page size");

static char     platform[] = MACHINE_PLATFORM;
SYSCTL_STRING(_hw, HW_MACHINE_PLATFORM, platform, CTLFLAG_RD | CTLFLAG_NOLOCK,
    platform, 0, "Platform architecture");

static char     machine_arch[] = MACHINE_ARCH;
SYSCTL_STRING(_hw, HW_MACHINE_ARCH, machine_arch, CTLFLAG_RD | CTLFLAG_NOLOCK,
    machine_arch, 0, "Cpu architecture");

char hostname[MAXHOSTNAMELEN];

/*
 * Hostname sysctl handler.  We use CTLFLAG_NOLOCK to avoid acquiring
 * the per-oid lock.  The per-cpu SLOCK is still acquired, so to interlock
 * against setting the hostname we relock with XLOCK.  The result is
 * that the critical path (just reading the hostname) gets one less lock
 * and will have improved performance.
 */
static int
sysctl_hostname(SYSCTL_HANDLER_ARGS)
{
        struct thread *td = req->td;
        struct proc *p = td ? td->td_proc : NULL;
        struct prison *pr;
        int error;

        if (req->newptr) {
                SYSCTL_SUNLOCK();
                SYSCTL_XLOCK();
        }
        if (p)
                pr = p->p_ucred->cr_prison;
        if (p && pr) {
                if (!PRISON_CAP_ISSET(pr->pr_caps,
                        PRISON_CAP_SYS_SET_HOSTNAME) && req->newptr)
                        return(EPERM);
                error = sysctl_handle_string(oidp,
                    p->p_ucred->cr_prison->pr_host,
                    sizeof p->p_ucred->cr_prison->pr_host, req);
        } else {
                error = sysctl_handle_string(oidp,
                    hostname, sizeof hostname, req);
        }
        if (req->newptr) {
                SYSCTL_XUNLOCK();
                SYSCTL_SLOCK();
        }
        return (error);
}

SYSCTL_PROC(_kern, KERN_HOSTNAME, hostname,
       CTLTYPE_STRING | CTLFLAG_RW | CTLFLAG_PRISON | CTLFLAG_NOLOCK,
       0, 0, sysctl_hostname, "A", "Hostname");

int securelevel = -1;
int kernel_mem_readonly = 0;

static int
sysctl_kern_securelvl(SYSCTL_HANDLER_ARGS)
{
                int error, level;

                level = securelevel;
                error = sysctl_handle_int(oidp, &level, 0, req);
                if (error || !req->newptr)
                        return (error);
                if (level < securelevel)
                        return (EPERM);
                securelevel = level;
                return (error);
}

SYSCTL_PROC(_kern, KERN_SECURELVL, securelevel, CTLTYPE_INT|CTLFLAG_RW,
    0, 0, sysctl_kern_securelvl, "I", "Current secure level");

char domainname[MAXHOSTNAMELEN];
SYSCTL_STRING(_kern, KERN_NISDOMAINNAME, domainname, CTLFLAG_RW,
    &domainname, sizeof(domainname), "Name of the current YP/NIS domain");

unsigned long hostid;
SYSCTL_ULONG(_kern, KERN_HOSTID, hostid, CTLFLAG_RW, &hostid, 0, "Host ID");

/*
 * This is really cheating.  These actually live in the libc, something
 * which I'm not quite sure is a good idea anyway, but in order for 
 * getnext and friends to actually work, we define dummies here.
 */
SYSCTL_STRING(_user, USER_CS_PATH, cs_path, CTLFLAG_RD, 
    "", 0, "PATH that finds all the standard utilities");
SYSCTL_INT(_user, USER_BC_BASE_MAX, bc_base_max, CTLFLAG_RD, 
    0, 0, "Max ibase/obase values in bc(1)");
SYSCTL_INT(_user, USER_BC_DIM_MAX, bc_dim_max, CTLFLAG_RD, 
    0, 0, "Max array size in bc(1)");
SYSCTL_INT(_user, USER_BC_SCALE_MAX, bc_scale_max, CTLFLAG_RD, 
    0, 0, "Max scale value in bc(1)");
SYSCTL_INT(_user, USER_BC_STRING_MAX, bc_string_max, CTLFLAG_RD, 
    0, 0, "Max string length in bc(1)");
SYSCTL_INT(_user, USER_COLL_WEIGHTS_MAX, coll_weights_max, CTLFLAG_RD, 
    0, 0, "Maximum number of weights assigned to an LC_COLLATE locale entry");
SYSCTL_INT(_user, USER_EXPR_NEST_MAX, expr_nest_max, CTLFLAG_RD, 0, 0, "");
SYSCTL_INT(_user, USER_LINE_MAX, line_max, CTLFLAG_RD, 
    0, 0, "Max length (bytes) of a text-processing utility's input line");
SYSCTL_INT(_user, USER_RE_DUP_MAX, re_dup_max, CTLFLAG_RD, 
    0, 0, "Maximum number of repeats of a regexp permitted");
SYSCTL_INT(_user, USER_POSIX2_VERSION, posix2_version, CTLFLAG_RD, 
    0, 0, 
    "The version of POSIX 1003.2 with which the system attempts to comply");
SYSCTL_INT(_user, USER_POSIX2_C_BIND, posix2_c_bind, CTLFLAG_RD, 
    0, 0, "Whether C development supports the C bindings option");
SYSCTL_INT(_user, USER_POSIX2_C_DEV, posix2_c_dev, CTLFLAG_RD, 
    0, 0, "Whether system supports the C development utilities option");
SYSCTL_INT(_user, USER_POSIX2_CHAR_TERM, posix2_char_term, CTLFLAG_RD, 
    0, 0, "");
SYSCTL_INT(_user, USER_POSIX2_FORT_DEV, posix2_fort_dev, CTLFLAG_RD, 
    0, 0, "Whether system supports FORTRAN development utilities");
SYSCTL_INT(_user, USER_POSIX2_FORT_RUN, posix2_fort_run, CTLFLAG_RD, 
    0, 0, "Whether system supports FORTRAN runtime utilities");
SYSCTL_INT(_user, USER_POSIX2_LOCALEDEF, posix2_localedef, CTLFLAG_RD, 
    0, 0, "Whether system supports creation of locales");
SYSCTL_INT(_user, USER_POSIX2_SW_DEV, posix2_sw_dev, CTLFLAG_RD, 
    0, 0, "Whether system supports software development utilities");
SYSCTL_INT(_user, USER_POSIX2_UPE, posix2_upe, CTLFLAG_RD, 
    0, 0, "Whether system supports the user portability utilities");
SYSCTL_INT(_user, USER_STREAM_MAX, stream_max, CTLFLAG_RD, 
    0, 0, "Min Maximum number of streams a process may have open at one time");
SYSCTL_INT(_user, USER_TZNAME_MAX, tzname_max, CTLFLAG_RD, 
    0, 0, "Min Maximum number of types supported for timezone names");

#include <sys/vnode.h>
SYSCTL_INT(_debug_sizeof, OID_AUTO, vnode, CTLFLAG_RD, 
    0, sizeof(struct vnode), "sizeof(struct vnode)");

SYSCTL_INT(_debug_sizeof, OID_AUTO, proc, CTLFLAG_RD, 
    0, sizeof(struct proc), "sizeof(struct proc)");

#include <sys/conf.h>
SYSCTL_INT(_debug_sizeof, OID_AUTO, cdev, CTLFLAG_RD,
    0, sizeof(struct cdev), "sizeof(struct cdev)");

SYSCTL_NODE(_kern, OID_AUTO, features, CTLFLAG_RD, 0, "Kernel Features");