gen/FreeBSD/sysctl.c

   1 /*-
   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.
  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
  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>
  34 __FBSDID("$FreeBSD: src/lib/libc/gen/sysctl.c,v 1.6 2007/01/09 00:27:55 imp Exp $");
  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>
  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);
  48
  49 int
  50 sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp, void *newp, size_t newlen)
  51 __attribute__((disable_tail_calls))
  52 {
  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                 }
  79                 return (__sysctl(name, namelen, oldp, oldlenp, newp, newlen));
  80         }
  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:
  93                 if (oldp && *oldlenp < sizeof(_PATH_STDPATH)) {
  94                         errno = ENOMEM;
  95                         return -1;
  96                 }
  97                 *oldlenp = sizeof(_PATH_STDPATH);
  98                 if (oldp != NULL)
  99                         memmove(oldp, _PATH_STDPATH, sizeof(_PATH_STDPATH));
 100                 return (0);
 101         }
 102
 103         if (oldp && *oldlenp < sizeof(int)) {
 104                 errno = ENOMEM;
 105                 return (-1);
 106         }
 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 }