[apple/libc.git] / gen / FreeBSD / sysctl.c

/*-
 * Copyright (c) 1993
 *	The Regents of the University of California.  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.
 * 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.
 * 4. 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.
 */

#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)sysctl.c	8.2 (Berkeley) 1/4/94";
#endif /* LIBC_SCCS and not lint */
#include <sys/cdefs.h>
__FBSDID("$FreeBSD: src/lib/libc/gen/sysctl.c,v 1.6 2007/01/09 00:27:55 imp Exp $");

#include <sys/param.h>
#include <sys/sysctl.h>

#include <errno.h>
#include <limits.h>
#include <paths.h>
#include <stdio.h>
#include <unistd.h>
#include <string.h>

extern int __sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp,
    void *newp, size_t newlen);

int
sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp, void *newp, size_t newlen)
__attribute__((disable_tail_calls))
{
	if (name[0] != CTL_USER) {
		if (namelen == 2 && name[0] == CTL_KERN && name[1] == KERN_EXEC) {
			/*
			 * 7723306: intercept kern.exec and fake a return of
			 * a dummy string ("/" in this case)
			 */
			if (newp != NULL) {
				errno = EPERM;
				return -1;
			}
			if (oldp == NULL) {
				if (oldlenp != NULL) *oldlenp = 2;
				return 0;
			}
			if (oldlenp == NULL) {
				errno = EFAULT;
				return -1;
			}
			if (*oldlenp < 2) {
				errno = ENOMEM;
				return -1;
			}
			memmove(oldp, "/", 2);
			*oldlenp = 2;
			return 0;
		}
		return (__sysctl(name, namelen, oldp, oldlenp, newp, newlen));
	}

	if (newp != NULL) {
		errno = EPERM;
		return (-1);
	}
	if (namelen != 2) {
		errno = EINVAL;
		return (-1);
	}

	switch (name[1]) {
	case USER_CS_PATH:
		if (oldp && *oldlenp < sizeof(_PATH_STDPATH)) {
			errno = ENOMEM;
			return -1;
		}
		*oldlenp = sizeof(_PATH_STDPATH);
		if (oldp != NULL)
			memmove(oldp, _PATH_STDPATH, sizeof(_PATH_STDPATH));
		return (0);
	}

	if (oldp && *oldlenp < sizeof(int)) {
		errno = ENOMEM;
		return (-1);
	}
	*oldlenp = sizeof(int);
	if (oldp == NULL)
		return (0);

	switch (name[1]) {
	case USER_BC_BASE_MAX:
		*(int *)oldp = BC_BASE_MAX;
		return (0);
	case USER_BC_DIM_MAX:
		*(int *)oldp = BC_DIM_MAX;
		return (0);
	case USER_BC_SCALE_MAX:
		*(int *)oldp = BC_SCALE_MAX;
		return (0);
	case USER_BC_STRING_MAX:
		*(int *)oldp = BC_STRING_MAX;
		return (0);
	case USER_COLL_WEIGHTS_MAX:
		*(int *)oldp = COLL_WEIGHTS_MAX;
		return (0);
	case USER_EXPR_NEST_MAX:
		*(int *)oldp = EXPR_NEST_MAX;
		return (0);
	case USER_LINE_MAX:
		*(int *)oldp = LINE_MAX;
		return (0);
	case USER_RE_DUP_MAX:
		*(int *)oldp = RE_DUP_MAX;
		return (0);
	case USER_POSIX2_VERSION:
		*(int *)oldp = _POSIX2_VERSION;
		return (0);
	case USER_POSIX2_C_BIND:
#ifdef POSIX2_C_BIND
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_C_DEV:
#ifdef	POSIX2_C_DEV
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_CHAR_TERM:
#ifdef	POSIX2_CHAR_TERM
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_FORT_DEV:
#ifdef	POSIX2_FORT_DEV
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_FORT_RUN:
#ifdef	POSIX2_FORT_RUN
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_LOCALEDEF:
#ifdef	POSIX2_LOCALEDEF
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_SW_DEV:
#ifdef	POSIX2_SW_DEV
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_POSIX2_UPE:
#ifdef	POSIX2_UPE
		*(int *)oldp = 1;
#else
		*(int *)oldp = 0;
#endif
		return (0);
	case USER_STREAM_MAX:
		*(int *)oldp = FOPEN_MAX;
		return (0);
	case USER_TZNAME_MAX:
		*(int *)oldp = NAME_MAX;
		return (0);
	default:
		errno = EINVAL;
		return (-1);
	}
	/* NOTREACHED */
}
Commit	Line	Data
9385eb3d	1	/*-
e9ce8d39 A	2	* Copyright (c) 1993
	3	* The Regents of the University of California. All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
e9ce8d39 A	13	* 4. Neither the name of the University nor the names of its contributors
	14	* may be used to endorse or promote products derived from this software
	15	* without specific prior written permission.
	16	*
	17	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	18	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	19	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	20	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	21	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	22	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	23	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	24	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	25	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	26	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	27	* SUCH DAMAGE.
	28	*/
	29
9385eb3d A	30	#if defined(LIBC_SCCS) && !defined(lint)
	31	static char sccsid[] = "@(#)sysctl.c 8.2 (Berkeley) 1/4/94";
	32	#endif /* LIBC_SCCS and not lint */
	33	#include <sys/cdefs.h>
1f2f436a	34	__FBSDID("$FreeBSD: src/lib/libc/gen/sysctl.c,v 1.6 2007/01/09 00:27:55 imp Exp $");
e9ce8d39 A	35
	36	#include <sys/param.h>
	37	#include <sys/sysctl.h>
	38
	39	#include <errno.h>
	40	#include <limits.h>
	41	#include <paths.h>
	42	#include <stdio.h>
	43	#include <unistd.h>
9385eb3d A	44	#include <string.h>
	45
	46	extern int __sysctl(int name, u_int namelen, void oldp, size_t *oldlenp,
	47	void *newp, size_t newlen);
e9ce8d39 A	48
e9ce8d39 A	49	int
974e3884 A	50	sysctl(int name, u_int namelen, void oldp, size_t oldlenp, void newp, size_t newlen)
974e3884 A	51	__attribute__((disable_tail_calls))
e9ce8d39	52	{
ad3c9f2a A	53	if (name[0] != CTL_USER) {
	54	if (namelen == 2 && name[0] == CTL_KERN && name[1] == KERN_EXEC) {
	55	/*
	56	* 7723306: intercept kern.exec and fake a return of
	57	* a dummy string ("/" in this case)
	58	*/
	59	if (newp != NULL) {
	60	errno = EPERM;
	61	return -1;
	62	}
	63	if (oldp == NULL) {
	64	if (oldlenp != NULL) *oldlenp = 2;
	65	return 0;
	66	}
	67	if (oldlenp == NULL) {
	68	errno = EFAULT;
	69	return -1;
	70	}
	71	if (*oldlenp < 2) {
	72	errno = ENOMEM;
	73	return -1;
	74	}
	75	memmove(oldp, "/", 2);
	76	*oldlenp = 2;
	77	return 0;
	78	}
e9ce8d39	79	return (__sysctl(name, namelen, oldp, oldlenp, newp, newlen));
ad3c9f2a	80	}
e9ce8d39 A	81
	82	if (newp != NULL) {
	83	errno = EPERM;
	84	return (-1);
	85	}
	86	if (namelen != 2) {
	87	errno = EINVAL;
	88	return (-1);
	89	}
	90
	91	switch (name[1]) {
	92	case USER_CS_PATH:
9385eb3d A	93	if (oldp && *oldlenp < sizeof(_PATH_STDPATH)) {
	94	errno = ENOMEM;
	95	return -1;
	96	}
e9ce8d39 A	97	*oldlenp = sizeof(_PATH_STDPATH);
	98	if (oldp != NULL)
	99	memmove(oldp, _PATH_STDPATH, sizeof(_PATH_STDPATH));
	100	return (0);
	101	}
	102
9385eb3d A	103	if (oldp && *oldlenp < sizeof(int)) {
	104	errno = ENOMEM;
	105	return (-1);
	106	}
e9ce8d39 A	107	*oldlenp = sizeof(int);
	108	if (oldp == NULL)
	109	return (0);
	110
	111	switch (name[1]) {
	112	case USER_BC_BASE_MAX:
	113	(int )oldp = BC_BASE_MAX;
	114	return (0);
	115	case USER_BC_DIM_MAX:
	116	(int )oldp = BC_DIM_MAX;
	117	return (0);
	118	case USER_BC_SCALE_MAX:
	119	(int )oldp = BC_SCALE_MAX;
	120	return (0);
	121	case USER_BC_STRING_MAX:
	122	(int )oldp = BC_STRING_MAX;
	123	return (0);
	124	case USER_COLL_WEIGHTS_MAX:
	125	(int )oldp = COLL_WEIGHTS_MAX;
	126	return (0);
	127	case USER_EXPR_NEST_MAX:
	128	(int )oldp = EXPR_NEST_MAX;
	129	return (0);
	130	case USER_LINE_MAX:
	131	(int )oldp = LINE_MAX;
	132	return (0);
	133	case USER_RE_DUP_MAX:
	134	(int )oldp = RE_DUP_MAX;
	135	return (0);
	136	case USER_POSIX2_VERSION:
	137	(int )oldp = _POSIX2_VERSION;
	138	return (0);
	139	case USER_POSIX2_C_BIND:
	140	#ifdef POSIX2_C_BIND
	141	(int )oldp = 1;
	142	#else
	143	(int )oldp = 0;
	144	#endif
	145	return (0);
	146	case USER_POSIX2_C_DEV:
	147	#ifdef POSIX2_C_DEV
	148	(int )oldp = 1;
	149	#else
	150	(int )oldp = 0;
	151	#endif
	152	return (0);
	153	case USER_POSIX2_CHAR_TERM:
	154	#ifdef POSIX2_CHAR_TERM
	155	(int )oldp = 1;
	156	#else
	157	(int )oldp = 0;
	158	#endif
	159	return (0);
	160	case USER_POSIX2_FORT_DEV:
	161	#ifdef POSIX2_FORT_DEV
	162	(int )oldp = 1;
	163	#else
	164	(int )oldp = 0;
	165	#endif
	166	return (0);
	167	case USER_POSIX2_FORT_RUN:
	168	#ifdef POSIX2_FORT_RUN
	169	(int )oldp = 1;
	170	#else
171	(int )oldp = 0;
172	#endif
173	return (0);
174	case USER_POSIX2_LOCALEDEF:
175	#ifdef POSIX2_LOCALEDEF
176	(int )oldp = 1;
177	#else
178	(int )oldp = 0;
179	#endif
180	return (0);
181	case USER_POSIX2_SW_DEV:
182	#ifdef POSIX2_SW_DEV
183	(int )oldp = 1;
184	#else
185	(int )oldp = 0;
186	#endif
187	return (0);
188	case USER_POSIX2_UPE:
189	#ifdef POSIX2_UPE
190	(int )oldp = 1;
191	#else
192	(int )oldp = 0;
193	#endif
194	return (0);
195	case USER_STREAM_MAX:
196	(int )oldp = FOPEN_MAX;
197	return (0);
198	case USER_TZNAME_MAX:
199	(int )oldp = NAME_MAX;
200	return (0);
201	default:
202	errno = EINVAL;
203	return (-1);
204	}
205	/* NOTREACHED */
206	}