e3669c3393
count is 0, wait for use count to drain before finishing the close. This is necessary in order for multiple processes to safely share file descriptor tables.
335 lines
8.8 KiB
C
335 lines
8.8 KiB
C
/* $NetBSD: hpux_net.c,v 1.17 1999/05/05 20:01:02 thorpej Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1988 University of Utah.
|
|
* Copyright (c) 1990, 1993
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to Berkeley by
|
|
* the Systems Programming Group of the University of Utah Computer
|
|
* Science Department.
|
|
*
|
|
* 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. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the University of
|
|
* California, Berkeley and its contributors.
|
|
* 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.
|
|
*
|
|
* from: Utah $Hdr: hpux_net.c 1.8 93/08/02$
|
|
*
|
|
* @(#)hpux_net.c 8.2 (Berkeley) 9/9/93
|
|
*/
|
|
|
|
/*
|
|
* Network related HP-UX compatibility routines
|
|
*/
|
|
|
|
#include "opt_ktrace.h"
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/time.h>
|
|
#include <sys/errno.h>
|
|
#include <sys/proc.h>
|
|
#include <sys/file.h>
|
|
#include <sys/filedesc.h>
|
|
#include <sys/mbuf.h>
|
|
#include <sys/mount.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/socketvar.h>
|
|
#include <sys/uio.h>
|
|
#include <sys/ktrace.h>
|
|
#include <sys/syscallargs.h>
|
|
|
|
#include <compat/hpux/hpux.h>
|
|
#include <compat/hpux/hpux_syscallargs.h>
|
|
#include <compat/hpux/hpux_util.h>
|
|
|
|
|
|
struct hpux_sys_setsockopt_args {
|
|
syscallarg(int) s;
|
|
syscallarg(int) level;
|
|
syscallarg(int) name;
|
|
syscallarg(caddr_t) val;
|
|
syscallarg(int) valsize;
|
|
};
|
|
|
|
struct hpux_sys_getsockopt_args {
|
|
syscallarg(int) s;
|
|
syscallarg(int) level;
|
|
syscallarg(int) name;
|
|
syscallarg(caddr_t) val;
|
|
syscallarg(int *) avalsize;
|
|
};
|
|
|
|
int hpux_sys_setsockopt __P((struct proc *, void *, register_t *));
|
|
int hpux_sys_getsockopt __P((struct proc *, void *, register_t *));
|
|
|
|
void socksetsize __P((int, struct mbuf *));
|
|
|
|
|
|
#define MINBSDIPCCODE 0x3EE
|
|
#define NUMBSDIPC 32
|
|
|
|
/*
|
|
* HPUX netioctl() to BSD syscall map.
|
|
* Indexed by callno - MINBSDIPCCODE
|
|
*/
|
|
|
|
struct hpuxtobsdipc {
|
|
int (*rout) __P((struct proc *, void *, register_t *));
|
|
int nargs;
|
|
} hpuxtobsdipc[NUMBSDIPC] = {
|
|
{ sys_socket, 3 }, /* 3ee */
|
|
{ sys_listen, 2 }, /* 3ef */
|
|
{ sys_bind, 3 }, /* 3f0 */
|
|
{ compat_43_sys_accept, 3 }, /* 3f1 */
|
|
{ sys_connect, 3 }, /* 3f2 */
|
|
{ compat_43_sys_recv, 4 }, /* 3f3 */
|
|
{ compat_43_sys_send, 4 }, /* 3f4 */
|
|
{ sys_shutdown, 2 }, /* 3f5 */
|
|
{ compat_43_sys_getsockname, 3 }, /* 3f6 */
|
|
{ hpux_sys_setsockopt, 5 }, /* 3f7 */
|
|
{ sys_sendto, 6 }, /* 3f8 */
|
|
{ compat_43_sys_recvfrom, 6 }, /* 3f9 */
|
|
{ compat_43_sys_getpeername, 3 }, /* 3fa */
|
|
{ NULL, 0 }, /* 3fb */
|
|
{ NULL, 0 }, /* 3fc */
|
|
{ NULL, 0 }, /* 3fd */
|
|
{ NULL, 0 }, /* 3fe */
|
|
{ NULL, 0 }, /* 3ff */
|
|
{ NULL, 0 }, /* 400 */
|
|
{ NULL, 0 }, /* 401 */
|
|
{ NULL, 0 }, /* 402 */
|
|
{ NULL, 0 }, /* 403 */
|
|
{ NULL, 0 }, /* 404 */
|
|
{ NULL, 0 }, /* 405 */
|
|
{ NULL, 0 }, /* 406 */
|
|
{ NULL, 0 }, /* 407 */
|
|
{ NULL, 0 }, /* 408 */
|
|
{ NULL, 0 }, /* 409 */
|
|
{ NULL, 0 }, /* 40a */
|
|
{ hpux_sys_getsockopt, 5 }, /* 40b */
|
|
{ NULL, 0 }, /* 40c */
|
|
{ NULL, 0 }, /* 40d */
|
|
};
|
|
|
|
/*
|
|
* Single system call entry to BSD style IPC.
|
|
* Gleened from disassembled libbsdipc.a syscall entries.
|
|
*/
|
|
int
|
|
hpux_sys_netioctl(p, v, retval)
|
|
struct proc *p;
|
|
void *v;
|
|
register_t *retval;
|
|
{
|
|
struct hpux_sys_netioctl_args *uap = v;
|
|
int *args, i;
|
|
int code;
|
|
int error;
|
|
|
|
args = SCARG(uap, args);
|
|
code = SCARG(uap, call) - MINBSDIPCCODE;
|
|
if (code < 0 || code >= NUMBSDIPC || hpuxtobsdipc[code].rout == NULL)
|
|
return (EINVAL);
|
|
if ((i = hpuxtobsdipc[code].nargs * sizeof (int)) &&
|
|
(error = copyin((caddr_t)args, (caddr_t)uap, (u_int)i))) {
|
|
#ifdef KTRACE
|
|
if (KTRPOINT(p, KTR_SYSCALL))
|
|
ktrsyscall(p->p_tracep, code + MINBSDIPCCODE,
|
|
hpuxtobsdipc[code].nargs,
|
|
(register_t *)uap);
|
|
#endif
|
|
return (error);
|
|
}
|
|
#ifdef KTRACE
|
|
if (KTRPOINT(p, KTR_SYSCALL))
|
|
ktrsyscall(p->p_tracep, code + MINBSDIPCCODE,
|
|
hpuxtobsdipc[code].nargs,
|
|
(register_t *)uap);
|
|
#endif
|
|
return ((*hpuxtobsdipc[code].rout)(p, uap, retval));
|
|
}
|
|
|
|
void
|
|
socksetsize(size, m)
|
|
int size;
|
|
struct mbuf *m;
|
|
{
|
|
int tmp;
|
|
|
|
if (size < sizeof(int)) {
|
|
switch(size) {
|
|
case 1:
|
|
tmp = (int) *mtod(m, char *);
|
|
break;
|
|
case 2:
|
|
tmp = (int) *mtod(m, short *);
|
|
break;
|
|
case 3:
|
|
default: /* XXX uh, what if sizeof(int) > 4? */
|
|
tmp = (((int) *mtod(m, int *)) >> 8) & 0xffffff;
|
|
break;
|
|
}
|
|
*mtod(m, int *) = tmp;
|
|
m->m_len = sizeof(int);
|
|
} else {
|
|
m->m_len = size;
|
|
}
|
|
}
|
|
|
|
/* ARGSUSED */
|
|
int
|
|
hpux_sys_setsockopt(p, v, retval)
|
|
struct proc *p;
|
|
void *v;
|
|
register_t *retval;
|
|
{
|
|
struct hpux_sys_setsockopt_args *uap = v;
|
|
struct file *fp;
|
|
struct mbuf *m = NULL;
|
|
int tmp, error;
|
|
|
|
/* getsock() will use the descriptor for us */
|
|
if ((error = getsock(p->p_fd, SCARG(uap, s), &fp)))
|
|
return (error);
|
|
if (SCARG(uap, valsize) > MLEN) {
|
|
error = EINVAL;
|
|
goto out;
|
|
}
|
|
if (SCARG(uap, val)) {
|
|
m = m_get(M_WAIT, MT_SOOPTS);
|
|
if ((error = copyin(SCARG(uap, val), mtod(m, caddr_t),
|
|
(u_int)SCARG(uap, valsize)))) {
|
|
(void) m_free(m);
|
|
goto out;
|
|
}
|
|
if (SCARG(uap, name) == SO_LINGER) {
|
|
tmp = *mtod(m, int *);
|
|
mtod(m, struct linger *)->l_onoff = 1;
|
|
mtod(m, struct linger *)->l_linger = tmp;
|
|
m->m_len = sizeof(struct linger);
|
|
} else
|
|
socksetsize(SCARG(uap, valsize), m);
|
|
} else if (SCARG(uap, name) == ~SO_LINGER) {
|
|
SCARG(uap, name) = SO_LINGER;
|
|
m = m_get(M_WAIT, MT_SOOPTS);
|
|
mtod(m, struct linger *)->l_onoff = 0;
|
|
m->m_len = sizeof(struct linger);
|
|
}
|
|
|
|
error = sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
|
|
SCARG(uap, name), m);
|
|
out:
|
|
FILE_UNUSE(fp);
|
|
return (error);
|
|
}
|
|
|
|
/* ARGSUSED */
|
|
int
|
|
hpux_sys_setsockopt2(p, v, retval)
|
|
struct proc *p;
|
|
void *v;
|
|
register_t *retval;
|
|
{
|
|
struct hpux_sys_setsockopt2_args *uap = v;
|
|
struct file *fp;
|
|
struct mbuf *m = NULL;
|
|
int error;
|
|
|
|
/* getsock() will use the descriptor for us */
|
|
if ((error = getsock(p->p_fd, SCARG(uap, s), &fp)))
|
|
return (error);
|
|
if (SCARG(uap, valsize) > MLEN) {
|
|
error = EINVAL;
|
|
goto out;
|
|
}
|
|
if (SCARG(uap, val)) {
|
|
m = m_get(M_WAIT, MT_SOOPTS);
|
|
if ((error = copyin(SCARG(uap, val), mtod(m, caddr_t),
|
|
(u_int)SCARG(uap, valsize)))) {
|
|
(void) m_free(m);
|
|
goto out;
|
|
}
|
|
socksetsize(SCARG(uap, valsize), m);
|
|
}
|
|
|
|
error = sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
|
|
SCARG(uap, name), m);
|
|
out:
|
|
FILE_UNUSE(fp);
|
|
return (error);
|
|
}
|
|
|
|
int
|
|
hpux_sys_getsockopt(p, v, retval)
|
|
struct proc *p;
|
|
void *v;
|
|
register_t *retval;
|
|
{
|
|
struct hpux_sys_getsockopt_args *uap = v;
|
|
struct file *fp;
|
|
struct mbuf *m = NULL;
|
|
int valsize, error;
|
|
|
|
/* getsock() will use the descriptor for us */
|
|
if ((error = getsock(p->p_fd, SCARG(uap, s), &fp)))
|
|
return (error);
|
|
if (SCARG(uap, val)) {
|
|
if ((error = copyin((caddr_t)SCARG(uap, avalsize),
|
|
(caddr_t)&valsize, sizeof (valsize))))
|
|
goto out;
|
|
} else
|
|
valsize = 0;
|
|
if ((error = sogetopt((struct socket *)fp->f_data, SCARG(uap, level),
|
|
SCARG(uap, name), &m)))
|
|
goto bad;
|
|
if (SCARG(uap, val) && valsize && m != NULL) {
|
|
if (SCARG(uap, name) == SO_LINGER) {
|
|
if (mtod(m, struct linger *)->l_onoff)
|
|
*mtod(m, int *) =
|
|
mtod(m, struct linger *)->l_linger;
|
|
else
|
|
*mtod(m, int *) = 0;
|
|
m->m_len = sizeof(int);
|
|
}
|
|
if (valsize > m->m_len)
|
|
valsize = m->m_len;
|
|
error = copyout(mtod(m, caddr_t), SCARG(uap, val),
|
|
(u_int)valsize);
|
|
if (error == 0)
|
|
error = copyout((caddr_t)&valsize,
|
|
(caddr_t)SCARG(uap, avalsize), sizeof (valsize));
|
|
}
|
|
bad:
|
|
if (m != NULL)
|
|
(void) m_free(m);
|
|
out:
|
|
FILE_UNUSE(fp);
|
|
return (error);
|
|
}
|