217 lines
6.2 KiB
C
217 lines
6.2 KiB
C
/*
|
|
* Copyright (c) 1994, 1995 Scott Bartram
|
|
* Copyright (c) 1994 Arne H Juul
|
|
* 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. 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/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/proc.h>
|
|
#include <sys/file.h>
|
|
#include <sys/filedesc.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/termios.h>
|
|
#include <sys/tty.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/sysproto.h>
|
|
#include <net/if.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/sysctl.h>
|
|
|
|
#include <i386/ibcs2/ibcs2_socksys.h>
|
|
#include <i386/ibcs2/ibcs2_util.h>
|
|
|
|
/* Local structures */
|
|
struct getipdomainname_args {
|
|
char *ipdomainname;
|
|
int len;
|
|
};
|
|
|
|
struct setipdomainname_args {
|
|
char *ipdomainname;
|
|
int len;
|
|
};
|
|
|
|
/* Local prototypes */
|
|
static int ibcs2_getipdomainname __P((struct proc *,
|
|
struct getipdomainname_args *, int *));
|
|
static int ibcs2_setipdomainname __P((struct proc *,
|
|
struct setipdomainname_args *, int *));
|
|
|
|
/*
|
|
* iBCS2 socksys calls.
|
|
*/
|
|
|
|
int
|
|
ibcs2_socksys(p, uap, retval)
|
|
register struct proc *p;
|
|
register struct ibcs2_socksys_args *uap;
|
|
int *retval;
|
|
{
|
|
int error;
|
|
int realargs[7]; /* 1 for command, 6 for recvfrom */
|
|
void *passargs;
|
|
|
|
/*
|
|
* SOCKET should only be legal on /dev/socksys.
|
|
* GETIPDOMAINNAME should only be legal on /dev/socksys ?
|
|
* The others are (and should be) only legal on sockets.
|
|
*/
|
|
|
|
if (error = copyin(uap->argsp, (caddr_t)realargs, sizeof(realargs)))
|
|
return error;
|
|
DPRINTF(("ibcs2_socksys: %08x %08x %08x %08x %08x %08x %08x\n",
|
|
realargs[0], realargs[1], realargs[2], realargs[3],
|
|
realargs[4], realargs[5], realargs[6]));
|
|
|
|
passargs = (void *)(realargs + 1);
|
|
switch (realargs[0]) {
|
|
case SOCKSYS_ACCEPT:
|
|
return accept(p, passargs, retval);
|
|
case SOCKSYS_BIND:
|
|
return bind(p, passargs, retval);
|
|
case SOCKSYS_CONNECT:
|
|
return connect(p, passargs, retval);
|
|
case SOCKSYS_GETPEERNAME:
|
|
return getpeername(p, passargs, retval);
|
|
case SOCKSYS_GETSOCKNAME:
|
|
return getsockname(p, passargs, retval);
|
|
case SOCKSYS_GETSOCKOPT:
|
|
return getsockopt(p, passargs, retval);
|
|
case SOCKSYS_LISTEN:
|
|
return listen(p, passargs, retval);
|
|
case SOCKSYS_RECV:
|
|
realargs[5] = realargs[6] = 0;
|
|
/* FALLTHROUGH */
|
|
case SOCKSYS_RECVFROM:
|
|
return recvfrom(p, passargs, retval);
|
|
case SOCKSYS_SEND:
|
|
realargs[5] = realargs[6] = 0;
|
|
/* FALLTHROUGH */
|
|
case SOCKSYS_SENDTO:
|
|
return sendto(p, passargs, retval);
|
|
case SOCKSYS_SETSOCKOPT:
|
|
return setsockopt(p, passargs, retval);
|
|
case SOCKSYS_SHUTDOWN:
|
|
return shutdown(p, passargs, retval);
|
|
case SOCKSYS_SOCKET:
|
|
return socket(p, passargs, retval);
|
|
case SOCKSYS_SELECT:
|
|
return select(p, passargs, retval);
|
|
case SOCKSYS_GETIPDOMAIN:
|
|
return ibcs2_getipdomainname(p, passargs, retval);
|
|
case SOCKSYS_SETIPDOMAIN:
|
|
return ibcs2_setipdomainname(p, passargs, retval);
|
|
case SOCKSYS_ADJTIME:
|
|
return adjtime(p, passargs, retval);
|
|
case SOCKSYS_SETREUID:
|
|
return setreuid(p, passargs, retval);
|
|
case SOCKSYS_SETREGID:
|
|
return setregid(p, passargs, retval);
|
|
case SOCKSYS_GETTIME:
|
|
return gettimeofday(p, passargs, retval);
|
|
case SOCKSYS_SETTIME:
|
|
return settimeofday(p, passargs, retval);
|
|
case SOCKSYS_GETITIMER:
|
|
return getitimer(p, passargs, retval);
|
|
case SOCKSYS_SETITIMER:
|
|
return setitimer(p, passargs, retval);
|
|
|
|
default:
|
|
printf("socksys unknown %08x %08x %08x %08x %08x %08x %08x\n",
|
|
realargs[0], realargs[1], realargs[2], realargs[3],
|
|
realargs[4], realargs[5], realargs[6]);
|
|
return EINVAL;
|
|
}
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
/* ARGSUSED */
|
|
static int
|
|
ibcs2_getipdomainname(p, uap, retval)
|
|
struct proc *p;
|
|
struct getipdomainname_args *uap;
|
|
int *retval;
|
|
{
|
|
char hname[MAXHOSTNAMELEN], *dptr;
|
|
int len;
|
|
|
|
/* Get the domain name */
|
|
strcpy(hname, hostname);
|
|
dptr = index(hname, '.');
|
|
if ( dptr )
|
|
dptr++;
|
|
else
|
|
/* Make it effectively an empty string */
|
|
dptr = hname + strlen(hname);
|
|
|
|
len = strlen(dptr) + 1;
|
|
if ((u_int)uap->len > len + 1)
|
|
uap->len = len + 1;
|
|
return (copyout((caddr_t)dptr, (caddr_t)uap->ipdomainname, uap->len));
|
|
}
|
|
|
|
/* ARGSUSED */
|
|
static int
|
|
ibcs2_setipdomainname(p, uap, retval)
|
|
struct proc *p;
|
|
struct setipdomainname_args *uap;
|
|
int *retval;
|
|
{
|
|
char hname[MAXHOSTNAMELEN], *ptr;
|
|
int error, sctl[2], hlen;
|
|
|
|
if ((error = suser(p->p_ucred, &p->p_acflag)))
|
|
return (error);
|
|
|
|
/* W/out a hostname a domain-name is nonsense */
|
|
if ( strlen(hostname) == 0 )
|
|
return EINVAL;
|
|
|
|
/* Get the host's unqualified name (strip off the domain) */
|
|
strcpy(hname, hostname);
|
|
ptr = index(hname, '.');
|
|
if ( ptr != NULL ) {
|
|
ptr++;
|
|
*ptr = '\0';
|
|
} else
|
|
strcat(hname, ".");
|
|
|
|
/* Set ptr to the end of the string so we can append to it */
|
|
hlen = strlen(hname);
|
|
ptr = hname + hlen;
|
|
if ((u_int)uap->len > (sizeof (hname) - hlen - 1))
|
|
return EINVAL;
|
|
|
|
/* Append the ipdomain to the end */
|
|
error = copyin((caddr_t)uap->ipdomainname, ptr, uap->len);
|
|
if (error)
|
|
return (error);
|
|
|
|
/* 'sethostname' with the new information */
|
|
sctl[0] = CTL_KERN;
|
|
sctl[1] = KERN_HOSTNAME;
|
|
hlen = strlen(hname) + 1;
|
|
return (kernel_sysctl(p, sctl, 2, 0, 0, hname, hlen, 0));
|
|
}
|