Home | History | Annotate | Line # | Download | only in netbsd32
netbsd32_compat_43.c revision 1.47
      1  1.47       dsl /*	$NetBSD: netbsd32_compat_43.c,v 1.47 2007/12/20 23:03:01 dsl Exp $	*/
      2   1.1       mrg 
      3   1.1       mrg /*
      4  1.19       mrg  * Copyright (c) 1998, 2001 Matthew R. Green
      5   1.1       mrg  * All rights reserved.
      6   1.1       mrg  *
      7   1.1       mrg  * Redistribution and use in source and binary forms, with or without
      8   1.1       mrg  * modification, are permitted provided that the following conditions
      9   1.1       mrg  * are met:
     10   1.1       mrg  * 1. Redistributions of source code must retain the above copyright
     11   1.1       mrg  *    notice, this list of conditions and the following disclaimer.
     12   1.1       mrg  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1       mrg  *    notice, this list of conditions and the following disclaimer in the
     14   1.1       mrg  *    documentation and/or other materials provided with the distribution.
     15   1.1       mrg  * 3. The name of the author may not be used to endorse or promote products
     16   1.1       mrg  *    derived from this software without specific prior written permission.
     17   1.1       mrg  *
     18   1.1       mrg  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     19   1.1       mrg  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     20   1.1       mrg  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     21   1.1       mrg  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     22   1.7       mrg  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     23   1.1       mrg  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     24   1.1       mrg  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     25   1.1       mrg  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     26   1.7       mrg  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     27   1.1       mrg  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     28   1.1       mrg  * SUCH DAMAGE.
     29   1.1       mrg  */
     30  1.20     lukem 
     31  1.20     lukem #include <sys/cdefs.h>
     32  1.47       dsl __KERNEL_RCSID(0, "$NetBSD: netbsd32_compat_43.c,v 1.47 2007/12/20 23:03:01 dsl Exp $");
     33  1.13      fvdl 
     34  1.17       mrg #if defined(_KERNEL_OPT)
     35  1.13      fvdl #include "opt_compat_43.h"
     36  1.13      fvdl #endif
     37   1.1       mrg 
     38   1.1       mrg #include <sys/param.h>
     39   1.1       mrg #include <sys/systm.h>
     40   1.1       mrg #include <sys/fcntl.h>
     41  1.41       dsl #include <sys/filedesc.h>
     42   1.1       mrg #include <sys/malloc.h>
     43  1.44       dsl #include <sys/mbuf.h>
     44   1.1       mrg #include <sys/mount.h>
     45  1.41       dsl #include <sys/namei.h>
     46  1.32       chs #include <sys/socket.h>
     47   1.1       mrg #include <sys/proc.h>
     48  1.44       dsl #include <sys/socket.h>
     49  1.44       dsl #include <sys/socketvar.h>
     50   1.1       mrg #include <sys/stat.h>
     51   1.1       mrg #include <sys/syscallargs.h>
     52   1.1       mrg #include <sys/time.h>
     53   1.1       mrg #include <sys/ucred.h>
     54  1.41       dsl #include <sys/vfs_syscalls.h>
     55  1.10       mrg #include <uvm/uvm_extern.h>
     56   1.1       mrg #include <sys/sysctl.h>
     57   1.3       mrg #include <sys/swap.h>
     58   1.1       mrg 
     59   1.5       mrg #include <compat/netbsd32/netbsd32.h>
     60   1.5       mrg #include <compat/netbsd32/netbsd32_syscallargs.h>
     61   1.1       mrg 
     62  1.31  christos #include <compat/sys/stat.h>
     63  1.31  christos #include <compat/sys/signal.h>
     64  1.31  christos #include <compat/sys/signalvar.h>
     65  1.33  christos #include <compat/sys/socket.h>
     66  1.31  christos 
     67  1.47       dsl #define SYS_DEF(foo) struct foo##_args; \
     68  1.47       dsl     int foo(struct lwp *, const struct foo##_args *, register_t *)
     69  1.47       dsl 
     70  1.47       dsl SYS_DEF(compat_43_netbsd32_sethostid);
     71  1.47       dsl SYS_DEF(compat_43_netbsd32_killpg);
     72  1.47       dsl SYS_DEF(compat_43_netbsd32_sigblock);
     73  1.47       dsl SYS_DEF(compat_43_netbsd32_sigblock);
     74  1.47       dsl SYS_DEF(compat_43_netbsd32_sigsetmask);
     75  1.47       dsl #undef SYS_DEF
     76   1.9       eeh 
     77  1.41       dsl static void
     78  1.41       dsl netbsd32_from_stat(const struct stat *sb, struct netbsd32_stat43 *sp32)
     79  1.41       dsl {
     80  1.41       dsl 
     81  1.41       dsl 	sp32->st_dev = sb->st_dev;
     82  1.41       dsl 	sp32->st_ino = sb->st_ino;
     83  1.41       dsl 	sp32->st_mode = sb->st_mode;
     84  1.41       dsl 	sp32->st_nlink = sb->st_nlink;
     85  1.41       dsl 	sp32->st_uid = sb->st_uid;
     86  1.41       dsl 	sp32->st_gid = sb->st_gid;
     87  1.41       dsl 	sp32->st_rdev = sb->st_rdev;
     88  1.41       dsl 	sp32->st_size = sb->st_size < (quad_t)1 << 32 ? sb->st_size : -2;
     89  1.41       dsl 	sp32->st_atimespec.tv_sec = sb->st_atimespec.tv_sec;
     90  1.41       dsl 	sp32->st_atimespec.tv_nsec = sb->st_atimespec.tv_nsec;
     91  1.41       dsl 	sp32->st_mtimespec.tv_sec = sb->st_mtimespec.tv_sec;
     92  1.41       dsl 	sp32->st_mtimespec.tv_nsec = sb->st_mtimespec.tv_nsec;
     93  1.41       dsl 	sp32->st_ctimespec.tv_sec = sb->st_ctimespec.tv_sec;
     94  1.41       dsl 	sp32->st_ctimespec.tv_nsec = sb->st_ctimespec.tv_nsec;
     95  1.41       dsl 	sp32->st_blksize = sb->st_blksize;
     96  1.41       dsl 	sp32->st_blocks = sb->st_blocks;
     97  1.41       dsl 	sp32->st_flags = sb->st_flags;
     98  1.41       dsl 	sp32->st_gen = sb->st_gen;
     99   1.1       mrg }
    100   1.1       mrg 
    101   1.1       mrg /* file system syscalls */
    102   1.1       mrg int
    103  1.47       dsl compat_43_netbsd32_ocreat(struct lwp *l, const struct compat_43_netbsd32_ocreat_args *uap, register_t *retval)
    104   1.1       mrg {
    105  1.47       dsl 	/* {
    106   1.5       mrg 		syscallarg(const netbsd32_charp) path;
    107   1.1       mrg 		syscallarg(mode_t) mode;
    108  1.47       dsl 	} */
    109   1.1       mrg 	struct sys_open_args  ua;
    110   1.1       mrg 
    111   1.6       mrg 	NETBSD32TOP_UAP(path, const char);
    112   1.6       mrg 	NETBSD32TO64_UAP(mode);
    113   1.1       mrg 	SCARG(&ua, flags) = O_WRONLY | O_CREAT | O_TRUNC;
    114   1.1       mrg 
    115  1.24   thorpej 	return (sys_open(l, &ua, retval));
    116   1.1       mrg }
    117   1.1       mrg 
    118   1.1       mrg int
    119  1.47       dsl compat_43_netbsd32_olseek(struct lwp *l, const struct compat_43_netbsd32_olseek_args *uap, register_t *retval)
    120   1.1       mrg {
    121  1.47       dsl 	/* {
    122   1.1       mrg 		syscallarg(int) fd;
    123   1.5       mrg 		syscallarg(netbsd32_long) offset;
    124   1.1       mrg 		syscallarg(int) whence;
    125  1.47       dsl 	} */
    126   1.1       mrg 	struct sys_lseek_args ua;
    127   1.1       mrg 	int rv;
    128   1.1       mrg 	off_t rt;
    129   1.1       mrg 
    130   1.1       mrg 	SCARG(&ua, fd) = SCARG(uap, fd);
    131   1.6       mrg 	NETBSD32TOX_UAP(offset, long);
    132   1.6       mrg 	NETBSD32TO64_UAP(whence);
    133  1.24   thorpej 	rv = sys_lseek(l, &ua, (register_t *)&rt);
    134  1.18       eeh 	*retval = rt;
    135   1.1       mrg 
    136   1.1       mrg 	return (rv);
    137   1.1       mrg }
    138   1.1       mrg 
    139   1.1       mrg int
    140  1.47       dsl compat_43_netbsd32_stat43(struct lwp *l, const struct compat_43_netbsd32_stat43_args *uap, register_t *retval)
    141   1.1       mrg {
    142  1.47       dsl 	/* {
    143   1.5       mrg 		syscallarg(const netbsd32_charp) path;
    144   1.5       mrg 		syscallarg(netbsd32_stat43p_t) ub;
    145  1.47       dsl 	} */
    146  1.41       dsl 	struct stat sb;
    147  1.15       mrg 	struct netbsd32_stat43 sb32;
    148  1.41       dsl 	int error;
    149   1.1       mrg 
    150  1.41       dsl 	error = do_sys_stat(l, SCARG_P32(uap, path), FOLLOW, &sb);
    151  1.41       dsl 	if (error == 0) {
    152  1.41       dsl 		netbsd32_from_stat(&sb, &sb32);
    153  1.41       dsl 		error = copyout(&sb32, SCARG_P32(uap, ub), sizeof(sb32));
    154  1.41       dsl 	}
    155  1.41       dsl 	return error;
    156   1.1       mrg }
    157   1.1       mrg 
    158   1.1       mrg int
    159  1.47       dsl compat_43_netbsd32_lstat43(struct lwp *l, const struct compat_43_netbsd32_lstat43_args *uap, register_t *retval)
    160   1.1       mrg {
    161  1.47       dsl 	/* {
    162   1.5       mrg 		syscallarg(const netbsd32_charp) path;
    163   1.5       mrg 		syscallarg(netbsd32_stat43p_t) ub;
    164  1.47       dsl 	} */
    165  1.41       dsl 	struct stat sb;
    166  1.15       mrg 	struct netbsd32_stat43 sb32;
    167  1.41       dsl 	int error;
    168   1.1       mrg 
    169  1.41       dsl 	error = do_sys_stat(l, SCARG_P32(uap, path), NOFOLLOW, &sb);
    170  1.41       dsl 	if (error == 0) {
    171  1.41       dsl 		netbsd32_from_stat(&sb, &sb32);
    172  1.41       dsl 		error = copyout(&sb32, SCARG_P32(uap, ub), sizeof(sb32));
    173  1.41       dsl 	}
    174  1.41       dsl 	return error;
    175   1.1       mrg }
    176   1.1       mrg 
    177   1.1       mrg int
    178  1.47       dsl compat_43_netbsd32_fstat43(struct lwp *l, const struct compat_43_netbsd32_fstat43_args *uap, register_t *retval)
    179   1.1       mrg {
    180  1.47       dsl 	/* {
    181   1.1       mrg 		syscallarg(int) fd;
    182   1.5       mrg 		syscallarg(netbsd32_stat43p_t) sb;
    183  1.47       dsl 	} */
    184  1.41       dsl 	struct stat sb;
    185  1.15       mrg 	struct netbsd32_stat43 sb32;
    186  1.41       dsl 	int error;
    187   1.1       mrg 
    188  1.41       dsl 	error = do_sys_fstat(l, SCARG(uap, fd), &sb);
    189  1.41       dsl 	if (error == 0) {
    190  1.41       dsl 		netbsd32_from_stat(&sb, &sb32);
    191  1.41       dsl 		error = copyout(&sb32, SCARG_P32(uap, sb), sizeof(sb32));
    192  1.41       dsl 	}
    193  1.41       dsl 	return error;
    194   1.1       mrg }
    195   1.1       mrg 
    196   1.1       mrg int
    197  1.47       dsl compat_43_netbsd32_otruncate(struct lwp *l, const struct compat_43_netbsd32_otruncate_args *uap, register_t *retval)
    198   1.1       mrg {
    199  1.47       dsl 	/* {
    200   1.5       mrg 		syscallarg(const netbsd32_charp) path;
    201   1.5       mrg 		syscallarg(netbsd32_long) length;
    202  1.47       dsl 	} */
    203   1.1       mrg 	struct sys_truncate_args ua;
    204   1.1       mrg 
    205   1.6       mrg 	NETBSD32TOP_UAP(path, const char);
    206   1.6       mrg 	NETBSD32TO64_UAP(length);
    207  1.47       dsl 	return (sys_truncate(l, &ua, retval));
    208   1.1       mrg }
    209   1.1       mrg 
    210   1.1       mrg int
    211  1.47       dsl compat_43_netbsd32_oftruncate(struct lwp *l, const struct compat_43_netbsd32_oftruncate_args *uap, register_t *retval)
    212   1.1       mrg {
    213  1.47       dsl 	/* {
    214   1.1       mrg 		syscallarg(int) fd;
    215   1.5       mrg 		syscallarg(netbsd32_long) length;
    216  1.47       dsl 	} */
    217   1.1       mrg 	struct sys_ftruncate_args ua;
    218   1.1       mrg 
    219   1.6       mrg 	NETBSD32TO64_UAP(fd);
    220   1.6       mrg 	NETBSD32TO64_UAP(length);
    221  1.24   thorpej 	return (sys_ftruncate(l, &ua, retval));
    222   1.1       mrg }
    223   1.1       mrg 
    224   1.1       mrg int
    225  1.47       dsl compat_43_netbsd32_ogetdirentries(struct lwp *l, const struct compat_43_netbsd32_ogetdirentries_args *uap, register_t *retval)
    226   1.1       mrg {
    227  1.47       dsl 	/* {
    228   1.1       mrg 		syscallarg(int) fd;
    229   1.5       mrg 		syscallarg(netbsd32_charp) buf;
    230   1.1       mrg 		syscallarg(u_int) count;
    231   1.5       mrg 		syscallarg(netbsd32_longp) basep;
    232  1.47       dsl 	} */
    233   1.1       mrg 	struct compat_43_sys_getdirentries_args ua;
    234   1.1       mrg 
    235   1.6       mrg 	NETBSD32TO64_UAP(fd);
    236   1.6       mrg 	NETBSD32TOP_UAP(buf, char);
    237   1.6       mrg 	NETBSD32TO64_UAP(count);
    238   1.6       mrg 	NETBSD32TOP_UAP(basep, long);
    239  1.24   thorpej 	return (compat_43_sys_getdirentries(l, &ua, retval));
    240   1.1       mrg }
    241   1.1       mrg 
    242   1.1       mrg /* kernel syscalls */
    243   1.1       mrg int
    244  1.47       dsl compat_43_netbsd32_ogetkerninfo(struct lwp *l, const struct compat_43_netbsd32_ogetkerninfo_args *uap, register_t *retval)
    245   1.1       mrg {
    246  1.47       dsl 	/* {
    247   1.1       mrg 		syscallarg(int) op;
    248   1.5       mrg 		syscallarg(netbsd32_charp) where;
    249   1.5       mrg 		syscallarg(netbsd32_intp) size;
    250   1.1       mrg 		syscallarg(int) arg;
    251  1.47       dsl 	} */
    252   1.1       mrg 	struct compat_43_sys_getkerninfo_args ua;
    253   1.1       mrg 
    254   1.6       mrg 	NETBSD32TO64_UAP(op);
    255   1.6       mrg 	NETBSD32TOP_UAP(where, char);
    256   1.6       mrg 	NETBSD32TOP_UAP(size, int);
    257   1.6       mrg 	NETBSD32TO64_UAP(arg);
    258  1.24   thorpej 	return (compat_43_sys_getkerninfo(l, &ua, retval));
    259   1.1       mrg }
    260   1.1       mrg 
    261   1.1       mrg int
    262  1.47       dsl compat_43_netbsd32_ogethostname(struct lwp *l, const struct compat_43_netbsd32_ogethostname_args *uap, register_t *retval)
    263   1.1       mrg {
    264  1.47       dsl 	/* {
    265   1.5       mrg 		syscallarg(netbsd32_charp) hostname;
    266   1.1       mrg 		syscallarg(u_int) len;
    267  1.47       dsl 	} */
    268  1.29    atatat 	int name[2];
    269   1.1       mrg 	size_t sz;
    270   1.1       mrg 
    271  1.29    atatat 	name[0] = CTL_KERN;
    272  1.29    atatat 	name[1] = KERN_HOSTNAME;
    273   1.1       mrg 	sz = SCARG(uap, len);
    274  1.29    atatat 	return (old_sysctl(&name[0], 2,
    275  1.39       dsl 	    SCARG_P32(uap, hostname), &sz, 0, 0, l));
    276   1.1       mrg }
    277   1.1       mrg 
    278   1.1       mrg int
    279  1.47       dsl compat_43_netbsd32_osethostname(struct lwp *l, const struct compat_43_netbsd32_osethostname_args *uap, register_t *retval)
    280   1.1       mrg {
    281  1.47       dsl 	/* {
    282   1.5       mrg 		syscallarg(netbsd32_charp) hostname;
    283   1.1       mrg 		syscallarg(u_int) len;
    284  1.47       dsl 	} */
    285  1.29    atatat 	int name[2];
    286   1.1       mrg 
    287  1.29    atatat 	name[0] = CTL_KERN;
    288  1.29    atatat 	name[1] = KERN_HOSTNAME;
    289  1.39       dsl 	return old_sysctl(&name[0], 2, 0, 0, (char *)SCARG_P32(uap,
    290  1.39       dsl 	    hostname), SCARG(uap, len), l);
    291   1.1       mrg }
    292   1.1       mrg 
    293   1.1       mrg int
    294  1.47       dsl compat_43_netbsd32_sethostid(struct lwp *l, const struct compat_43_netbsd32_sethostid_args *uap, register_t *retval)
    295   1.4       eeh {
    296  1.47       dsl 	/* {
    297   1.4       eeh 		syscallarg(int32_t) hostid;
    298  1.47       dsl 	} */
    299   1.4       eeh 	struct compat_43_sys_sethostid_args ua;
    300   1.4       eeh 
    301   1.6       mrg 	NETBSD32TO64_UAP(hostid);
    302  1.24   thorpej 	return (compat_43_sys_sethostid(l, &ua, retval));
    303   1.4       eeh }
    304   1.4       eeh 
    305   1.4       eeh int
    306  1.47       dsl compat_43_netbsd32_ogetrlimit(struct lwp *l, const struct compat_43_netbsd32_ogetrlimit_args *uap, register_t *retval)
    307   1.1       mrg {
    308  1.47       dsl 	/* {
    309   1.1       mrg 		syscallarg(int) which;
    310   1.5       mrg 		syscallarg(netbsd32_orlimitp_t) rlp;
    311  1.47       dsl 	} */
    312   1.1       mrg 	struct compat_43_sys_getrlimit_args ua;
    313   1.1       mrg 
    314   1.6       mrg 	NETBSD32TO64_UAP(which);
    315   1.6       mrg 	NETBSD32TOP_UAP(rlp, struct orlimit);
    316  1.24   thorpej 	return (compat_43_sys_getrlimit(l, &ua, retval));
    317   1.1       mrg }
    318   1.1       mrg 
    319   1.1       mrg int
    320  1.47       dsl compat_43_netbsd32_osetrlimit(struct lwp *l, const struct compat_43_netbsd32_osetrlimit_args *uap, register_t *retval)
    321   1.1       mrg {
    322  1.47       dsl 	/* {
    323   1.1       mrg 		syscallarg(int) which;
    324   1.5       mrg 		syscallarg(netbsd32_orlimitp_t) rlp;
    325  1.47       dsl 	} */
    326   1.1       mrg 	struct compat_43_sys_setrlimit_args ua;
    327   1.1       mrg 
    328   1.6       mrg 	NETBSD32TO64_UAP(which);
    329   1.6       mrg 	NETBSD32TOP_UAP(rlp, struct orlimit);
    330  1.24   thorpej 	return (compat_43_sys_setrlimit(l, &ua, retval));
    331   1.1       mrg }
    332   1.1       mrg 
    333   1.4       eeh int
    334  1.47       dsl compat_43_netbsd32_killpg(struct lwp *l, const struct compat_43_netbsd32_killpg_args *uap, register_t *retval)
    335   1.4       eeh {
    336  1.47       dsl 	/* {
    337   1.4       eeh 		syscallarg(int) pgid;
    338   1.4       eeh 		syscallarg(int) signum;
    339  1.47       dsl 	} */
    340   1.4       eeh 	struct compat_43_sys_killpg_args ua;
    341   1.4       eeh 
    342   1.6       mrg 	NETBSD32TO64_UAP(pgid);
    343   1.6       mrg 	NETBSD32TO64_UAP(signum);
    344  1.24   thorpej 	return (compat_43_sys_killpg(l, &ua, retval));
    345   1.4       eeh }
    346   1.4       eeh 
    347   1.1       mrg /* virtual memory syscalls */
    348   1.1       mrg int
    349  1.47       dsl compat_43_netbsd32_ommap(struct lwp *l, const struct compat_43_netbsd32_ommap_args *uap, register_t *retval)
    350   1.1       mrg {
    351  1.47       dsl 	/* {
    352  1.37  christos 		syscallarg(netbsd32_caddr_t) addr;
    353   1.5       mrg 		syscallarg(netbsd32_size_t) len;
    354   1.1       mrg 		syscallarg(int) prot;
    355   1.1       mrg 		syscallarg(int) flags;
    356   1.1       mrg 		syscallarg(int) fd;
    357   1.5       mrg 		syscallarg(netbsd32_long) pos;
    358  1.47       dsl 	} */
    359   1.1       mrg 	struct compat_43_sys_mmap_args ua;
    360   1.1       mrg 
    361  1.38       dsl 	NETBSD32TOP_UAP(addr, void *);
    362   1.6       mrg 	NETBSD32TOX_UAP(len, size_t);
    363   1.6       mrg 	NETBSD32TO64_UAP(prot);
    364   1.6       mrg 	NETBSD32TO64_UAP(flags);
    365   1.6       mrg 	NETBSD32TO64_UAP(fd);
    366   1.6       mrg 	NETBSD32TOX_UAP(pos, long);
    367  1.24   thorpej 	return (compat_43_sys_mmap(l, &ua, retval));
    368   1.4       eeh }
    369   1.4       eeh 
    370   1.1       mrg /* network syscalls */
    371   1.1       mrg int
    372  1.47       dsl compat_43_netbsd32_oaccept(struct lwp *l, const struct compat_43_netbsd32_oaccept_args *uap, register_t *retval)
    373   1.1       mrg {
    374  1.47       dsl 	/* {
    375   1.1       mrg 		syscallarg(int) s;
    376  1.37  christos 		syscallarg(netbsd32_caddr_t) name;
    377   1.5       mrg 		syscallarg(netbsd32_intp) anamelen;
    378  1.47       dsl 	} */
    379   1.1       mrg 	struct compat_43_sys_accept_args ua;
    380   1.1       mrg 
    381   1.6       mrg 	NETBSD32TOX_UAP(s, int);
    382  1.38       dsl 	NETBSD32TOP_UAP(name, void *);
    383   1.6       mrg 	NETBSD32TOP_UAP(anamelen, int);
    384  1.24   thorpej 	return (compat_43_sys_accept(l, &ua, retval));
    385   1.1       mrg }
    386   1.1       mrg 
    387   1.1       mrg int
    388  1.47       dsl compat_43_netbsd32_osend(struct lwp *l, const struct compat_43_netbsd32_osend_args *uap, register_t *retval)
    389   1.1       mrg {
    390  1.47       dsl 	/* {
    391   1.1       mrg 		syscallarg(int) s;
    392  1.37  christos 		syscallarg(netbsd32_caddr_t) buf;
    393   1.1       mrg 		syscallarg(int) len;
    394   1.1       mrg 		syscallarg(int) flags;
    395  1.47       dsl 	} */
    396   1.1       mrg 	struct compat_43_sys_send_args ua;
    397   1.1       mrg 
    398   1.6       mrg 	NETBSD32TO64_UAP(s);
    399  1.38       dsl 	NETBSD32TOP_UAP(buf, void *);
    400   1.6       mrg 	NETBSD32TO64_UAP(len);
    401   1.6       mrg 	NETBSD32TO64_UAP(flags);
    402  1.24   thorpej 	return (compat_43_sys_send(l, &ua, retval));
    403   1.1       mrg }
    404   1.1       mrg 
    405   1.1       mrg int
    406  1.47       dsl compat_43_netbsd32_orecv(struct lwp *l, const struct compat_43_netbsd32_orecv_args *uap, register_t *retval)
    407   1.1       mrg {
    408  1.47       dsl 	/* {
    409   1.1       mrg 		syscallarg(int) s;
    410  1.37  christos 		syscallarg(netbsd32_caddr_t) buf;
    411   1.1       mrg 		syscallarg(int) len;
    412   1.1       mrg 		syscallarg(int) flags;
    413  1.47       dsl 	} */
    414   1.1       mrg 	struct compat_43_sys_recv_args ua;
    415   1.1       mrg 
    416   1.6       mrg 	NETBSD32TO64_UAP(s);
    417  1.38       dsl 	NETBSD32TOP_UAP(buf, void *);
    418   1.6       mrg 	NETBSD32TO64_UAP(len);
    419   1.6       mrg 	NETBSD32TO64_UAP(flags);
    420  1.24   thorpej 	return (compat_43_sys_recv(l, &ua, retval));
    421   1.1       mrg }
    422   1.1       mrg 
    423   1.1       mrg /*
    424  1.44       dsl  * This is a brutal clone of compat_43_sys_recvmsg().
    425   1.1       mrg  */
    426   1.1       mrg int
    427  1.47       dsl compat_43_netbsd32_orecvmsg(struct lwp *l, const struct compat_43_netbsd32_orecvmsg_args *uap, register_t *retval)
    428   1.1       mrg {
    429  1.47       dsl 	/* {
    430   1.1       mrg 		syscallarg(int) s;
    431   1.5       mrg 		syscallarg(netbsd32_omsghdrp_t) msg;
    432   1.1       mrg 		syscallarg(int) flags;
    433  1.47       dsl 	} */
    434  1.44       dsl 	struct netbsd32_omsghdr omsg;
    435  1.44       dsl 	struct msghdr msg;
    436  1.44       dsl 	struct mbuf *from, *control;
    437  1.44       dsl 	struct iovec *iov, aiov[UIO_SMALLIOV];
    438  1.44       dsl 	int error;
    439  1.44       dsl 
    440  1.44       dsl 	error = copyin(SCARG_P32(uap, msg), &omsg, sizeof (struct omsghdr));
    441  1.44       dsl 	if (error)
    442  1.44       dsl 		return (error);
    443   1.1       mrg 
    444  1.44       dsl 	if (NETBSD32PTR64(omsg.msg_accrights) == NULL)
    445  1.44       dsl 		omsg.msg_accrightslen = 0;
    446  1.44       dsl 	/* it was this way in 4.4BSD */
    447  1.44       dsl 	if (omsg.msg_accrightslen > MLEN)
    448  1.44       dsl 		return EINVAL;
    449  1.44       dsl 
    450  1.44       dsl 	iov = netbsd32_get_iov(NETBSD32PTR64(omsg.msg_iov), omsg.msg_iovlen,
    451  1.44       dsl 	    aiov, __arraycount(aiov));
    452  1.44       dsl 	if (iov == NULL)
    453  1.44       dsl 		return EFAULT;
    454  1.44       dsl 
    455  1.44       dsl 	msg.msg_name	= NETBSD32PTR64(omsg.msg_name);
    456  1.44       dsl 	msg.msg_namelen = omsg.msg_namelen;
    457  1.44       dsl 	msg.msg_iovlen	= omsg.msg_iovlen;
    458  1.44       dsl 	msg.msg_iov	= iov;
    459  1.44       dsl 	msg.msg_flags	= SCARG(uap, flags) & MSG_USERFLAGS;
    460  1.44       dsl 
    461  1.44       dsl 	error = do_sys_recvmsg(l, SCARG(uap, s), &msg, &from,
    462  1.44       dsl 	    NETBSD32PTR64(omsg.msg_accrights) != NULL ? &control : NULL,
    463  1.44       dsl 	    retval);
    464  1.44       dsl 	if (error != 0)
    465  1.44       dsl 		return error;
    466   1.1       mrg 
    467  1.16       mrg 	/*
    468  1.44       dsl 	 * If there is any control information and it's SCM_RIGHTS,
    469  1.44       dsl 	 * pass it back to the program.
    470  1.44       dsl 	 * XXX: maybe there can be more than one chunk of control data?
    471  1.16       mrg 	 */
    472  1.44       dsl 	if (NETBSD32PTR64(omsg.msg_accrights) != NULL && control != NULL) {
    473  1.44       dsl 		struct cmsghdr *cmsg = mtod(control, void *);
    474  1.16       mrg 
    475  1.44       dsl 		if (cmsg->cmsg_level == SOL_SOCKET
    476  1.44       dsl 		    && cmsg->cmsg_type == SCM_RIGHTS
    477  1.44       dsl 		    && cmsg->cmsg_len < omsg.msg_accrightslen
    478  1.44       dsl 		    && copyout(CMSG_DATA(cmsg),
    479  1.44       dsl 			    NETBSD32PTR64(omsg.msg_accrights),
    480  1.44       dsl 			    cmsg->cmsg_len) == 0) {
    481  1.44       dsl 			omsg.msg_accrightslen = cmsg->cmsg_len;
    482  1.44       dsl 			free_control_mbuf(l, control, control->m_next);
    483  1.44       dsl 		} else {
    484  1.44       dsl 			omsg.msg_accrightslen = 0;
    485  1.44       dsl 			free_control_mbuf(l, control, control);
    486  1.44       dsl 		}
    487  1.44       dsl 	} else
    488  1.44       dsl 		omsg.msg_accrightslen = 0;
    489   1.1       mrg 
    490  1.44       dsl 	if (from != NULL)
    491  1.44       dsl 		/* convert from sockaddr sa_family to osockaddr one here */
    492  1.44       dsl 		mtod(from, struct osockaddr *)->sa_family =
    493  1.44       dsl 				    mtod(from, struct sockaddr *)->sa_family;
    494  1.44       dsl 
    495  1.44       dsl 	error = copyout_sockname(NETBSD32PTR64(omsg.msg_name),
    496  1.44       dsl 	    &omsg.msg_namelen, 0, from);
    497  1.44       dsl 	if (from != NULL)
    498  1.44       dsl 		m_free(from);
    499   1.1       mrg 
    500  1.44       dsl 	if (error != 0)
    501  1.44       dsl 		 error = copyout(&omsg, SCARG_P32(uap, msg), sizeof(omsg));
    502  1.16       mrg 
    503  1.44       dsl 	return error;
    504   1.1       mrg }
    505   1.1       mrg 
    506   1.1       mrg int
    507  1.47       dsl compat_43_netbsd32_osendmsg(struct lwp *l, const struct compat_43_netbsd32_osendmsg_args *uap, register_t *retval)
    508   1.1       mrg {
    509  1.47       dsl 	/* {
    510   1.1       mrg 		syscallarg(int) s;
    511  1.37  christos 		syscallarg(netbsd32_caddr_t) msg;
    512   1.1       mrg 		syscallarg(int) flags;
    513  1.47       dsl 	} */
    514  1.44       dsl 	struct iovec *iov, aiov[UIO_SMALLIOV];
    515  1.44       dsl 	struct netbsd32_omsghdr omsg;
    516  1.44       dsl 	struct msghdr msg;
    517  1.44       dsl 	int error;
    518  1.44       dsl 	struct mbuf *nam;
    519  1.44       dsl 	struct osockaddr *osa;
    520  1.44       dsl 	struct sockaddr *sa;
    521   1.1       mrg 
    522  1.44       dsl 	error = copyin(SCARG_P32(uap, msg), &omsg, sizeof (struct omsghdr));
    523  1.44       dsl 	if (error != 0)
    524  1.16       mrg 		return (error);
    525  1.16       mrg 
    526  1.44       dsl 	iov = netbsd32_get_iov(NETBSD32PTR64(omsg.msg_iov), omsg.msg_iovlen,
    527  1.44       dsl 	    aiov, __arraycount(aiov));
    528  1.44       dsl 	if (iov == NULL)
    529  1.44       dsl 		return EFAULT;
    530  1.44       dsl 
    531  1.44       dsl 	msg.msg_iovlen = omsg.msg_iovlen;
    532  1.44       dsl 	msg.msg_iov = iov;
    533  1.44       dsl 	msg.msg_flags = MSG_NAMEMBUF;
    534  1.44       dsl 
    535  1.44       dsl 	error = sockargs(&nam, NETBSD32PTR64(omsg.msg_name), omsg.msg_namelen,
    536  1.44       dsl 	    MT_SONAME);
    537  1.44       dsl 	if (error != 0)
    538  1.44       dsl 		goto out;
    539  1.44       dsl 
    540  1.44       dsl 	sa = mtod(nam, void *);
    541  1.44       dsl 	osa = mtod(nam, void *);
    542  1.44       dsl 	sa->sa_family = osa->sa_family;
    543  1.44       dsl 	sa->sa_len = omsg.msg_namelen;
    544  1.44       dsl 
    545  1.44       dsl 	msg.msg_name = nam;
    546  1.44       dsl 	msg.msg_namelen = omsg.msg_namelen;
    547  1.44       dsl 	error = compat43_set_accrights(&msg, NETBSD32PTR64(omsg.msg_accrights),
    548  1.44       dsl 	    omsg.msg_accrightslen);
    549  1.44       dsl 	if (error != 0) {
    550  1.44       dsl 		m_free(nam);
    551  1.44       dsl 		goto out;
    552   1.1       mrg 	}
    553   1.1       mrg 
    554  1.44       dsl 	error = do_sys_sendmsg(l, SCARG(uap, s), &msg, SCARG(uap, flags), retval);
    555  1.44       dsl 
    556  1.44       dsl     out:
    557  1.44       dsl 	if (iov != aiov)
    558  1.44       dsl 		free(iov, M_TEMP);
    559  1.44       dsl 	return (error);
    560   1.1       mrg }
    561   1.1       mrg 
    562   1.1       mrg int
    563  1.47       dsl compat_43_netbsd32_orecvfrom(struct lwp *l, const struct compat_43_netbsd32_orecvfrom_args *uap, register_t *retval)
    564   1.1       mrg {
    565  1.47       dsl 	/* {
    566   1.1       mrg 		syscallarg(int) s;
    567  1.37  christos 		syscallarg(netbsd32_caddr_t) buf;
    568   1.5       mrg 		syscallarg(netbsd32_size_t) len;
    569   1.1       mrg 		syscallarg(int) flags;
    570  1.37  christos 		syscallarg(netbsd32_caddr_t) from;
    571   1.5       mrg 		syscallarg(netbsd32_intp) fromlenaddr;
    572  1.47       dsl 	} */
    573   1.1       mrg 	struct compat_43_sys_recvfrom_args ua;
    574   1.1       mrg 
    575   1.6       mrg 	NETBSD32TO64_UAP(s);
    576  1.38       dsl 	NETBSD32TOP_UAP(buf, void *);
    577   1.6       mrg 	NETBSD32TOX_UAP(len, size_t);
    578   1.6       mrg 	NETBSD32TO64_UAP(flags);
    579  1.38       dsl 	NETBSD32TOP_UAP(from, void *);
    580   1.6       mrg 	NETBSD32TOP_UAP(fromlenaddr, int);
    581  1.24   thorpej 	return (compat_43_sys_recvfrom(l, &ua, retval));
    582   1.1       mrg }
    583   1.1       mrg 
    584   1.1       mrg int
    585  1.47       dsl compat_43_netbsd32_ogetsockname(struct lwp *l, const struct compat_43_netbsd32_ogetsockname_args *uap, register_t *retval)
    586   1.1       mrg {
    587  1.47       dsl 	/* {
    588   1.1       mrg 		syscallarg(int) fdec;
    589  1.37  christos 		syscallarg(netbsd32_caddr_t) asa;
    590   1.5       mrg 		syscallarg(netbsd32_intp) alen;
    591  1.47       dsl 	} */
    592   1.1       mrg 	struct compat_43_sys_getsockname_args ua;
    593   1.1       mrg 
    594   1.6       mrg 	NETBSD32TO64_UAP(fdec);
    595  1.38       dsl 	NETBSD32TOP_UAP(asa, void *);
    596  1.38       dsl 	NETBSD32TOP_UAP(alen, int *);
    597  1.24   thorpej 	return (compat_43_sys_getsockname(l, &ua, retval));
    598   1.1       mrg }
    599   1.1       mrg 
    600   1.1       mrg int
    601  1.47       dsl compat_43_netbsd32_ogetpeername(struct lwp *l, const struct compat_43_netbsd32_ogetpeername_args *uap, register_t *retval)
    602   1.1       mrg {
    603  1.47       dsl 	/* {
    604   1.1       mrg 		syscallarg(int) fdes;
    605  1.37  christos 		syscallarg(netbsd32_caddr_t) asa;
    606   1.5       mrg 		syscallarg(netbsd32_intp) alen;
    607  1.47       dsl 	} */
    608   1.1       mrg 	struct compat_43_sys_getpeername_args ua;
    609   1.1       mrg 
    610   1.6       mrg 	NETBSD32TO64_UAP(fdes);
    611  1.38       dsl 	NETBSD32TOP_UAP(asa, void *);
    612  1.38       dsl 	NETBSD32TOP_UAP(alen, int *);
    613  1.24   thorpej 	return (compat_43_sys_getpeername(l, &ua, retval));
    614   1.1       mrg }
    615   1.1       mrg 
    616   1.1       mrg /* signal syscalls */
    617   1.1       mrg int
    618  1.47       dsl compat_43_netbsd32_osigvec(struct lwp *l, const struct compat_43_netbsd32_osigvec_args *uap, register_t *retval)
    619   1.1       mrg {
    620  1.47       dsl 	/* {
    621   1.1       mrg 		syscallarg(int) signum;
    622   1.5       mrg 		syscallarg(netbsd32_sigvecp_t) nsv;
    623   1.5       mrg 		syscallarg(netbsd32_sigvecp_t) osv;
    624  1.47       dsl 	} */
    625  1.16       mrg 	struct netbsd32_sigvec sv32;
    626  1.43       dsl 	struct sigaction nsa, osa;
    627  1.43       dsl 	int error;
    628  1.43       dsl 
    629  1.43       dsl 	if (SCARG(uap, signum) >= 32)
    630  1.43       dsl 		return EINVAL;
    631   1.1       mrg 
    632  1.39       dsl 	if (SCARG_P32(uap, nsv)) {
    633  1.39       dsl 		error = copyin(SCARG_P32(uap, nsv), &sv32, sizeof(sv32));
    634  1.16       mrg 		if (error)
    635  1.43       dsl 			return error;
    636  1.43       dsl 		nsa.sa_handler = NETBSD32PTR64(sv32.sv_handler);
    637  1.43       dsl 		nsa.sa_mask.__bits[0] = sv32.sv_mask;
    638  1.43       dsl 		nsa.sa_mask.__bits[1] = 0;
    639  1.43       dsl 		nsa.sa_mask.__bits[2] = 0;
    640  1.43       dsl 		nsa.sa_mask.__bits[3] = 0;
    641  1.43       dsl 		nsa.sa_flags = sv32.sv_flags ^ SA_RESTART;
    642  1.43       dsl 		error = sigaction1(l, SCARG(uap, signum), &nsa, &osa, NULL, 0);
    643   1.1       mrg 	} else
    644  1.43       dsl 		error = sigaction1(l, SCARG(uap, signum), NULL, &osa, NULL, 0);
    645  1.43       dsl 	if (error)
    646  1.43       dsl 		return error;
    647   1.1       mrg 
    648  1.39       dsl 	if (SCARG_P32(uap, osv)) {
    649  1.43       dsl 		NETBSD32PTR32(sv32.sv_handler, osa.sa_handler);
    650  1.43       dsl 		sv32.sv_mask = osa.sa_mask.__bits[0];
    651  1.43       dsl 		sv32.sv_flags = osa.sa_flags ^ SA_RESTART;
    652  1.39       dsl 		error = copyout(&sv32, SCARG_P32(uap, osv), sizeof(sv32));
    653   1.1       mrg 	}
    654   1.1       mrg 
    655  1.43       dsl 	return error;
    656   1.4       eeh }
    657   1.4       eeh 
    658   1.4       eeh int
    659  1.47       dsl compat_43_netbsd32_sigblock(struct lwp *l, const struct compat_43_netbsd32_sigblock_args *uap, register_t *retval)
    660   1.4       eeh {
    661  1.47       dsl 	/* {
    662   1.4       eeh 		syscallarg(int) mask;
    663  1.47       dsl 	} */
    664   1.4       eeh 	struct compat_43_sys_sigblock_args ua;
    665   1.4       eeh 
    666   1.6       mrg 	NETBSD32TO64_UAP(mask);
    667  1.24   thorpej 	return (compat_43_sys_sigblock(l, &ua, retval));
    668   1.4       eeh }
    669   1.4       eeh 
    670   1.4       eeh int
    671  1.47       dsl compat_43_netbsd32_sigsetmask(struct lwp *l, const struct compat_43_netbsd32_sigsetmask_args *uap, register_t *retval)
    672   1.4       eeh {
    673  1.47       dsl 	/* {
    674   1.4       eeh 		syscallarg(int) mask;
    675  1.47       dsl 	} */
    676   1.4       eeh 	struct compat_43_sys_sigsetmask_args ua;
    677   1.4       eeh 
    678   1.6       mrg 	NETBSD32TO64_UAP(mask);
    679  1.24   thorpej 	return (compat_43_sys_sigsetmask(l, &ua, retval));
    680   1.1       mrg }
    681   1.1       mrg 
    682   1.1       mrg int
    683  1.47       dsl compat_43_netbsd32_osigstack(struct lwp *l, const struct compat_43_netbsd32_osigstack_args *uap, register_t *retval)
    684   1.1       mrg {
    685  1.47       dsl 	/* {
    686   1.5       mrg 		syscallarg(netbsd32_sigstackp_t) nss;
    687   1.5       mrg 		syscallarg(netbsd32_sigstackp_t) oss;
    688  1.47       dsl 	} */
    689  1.16       mrg 	struct netbsd32_sigstack ss32;
    690  1.43       dsl 	struct sigaltstack nsa, osa;
    691  1.43       dsl 	int error;
    692   1.1       mrg 
    693  1.39       dsl 	if (SCARG_P32(uap, nss)) {
    694  1.39       dsl 		error = copyin(SCARG_P32(uap, nss), &ss32, sizeof(ss32));
    695  1.16       mrg 		if (error)
    696  1.43       dsl 			return error;
    697  1.43       dsl 		nsa.ss_sp = NETBSD32PTR64(ss32.ss_sp);
    698  1.43       dsl 		nsa.ss_size = SIGSTKSZ; /* Use the recommended size */
    699  1.43       dsl 		nsa.ss_flags = ss32.ss_onstack ? SS_ONSTACK : 0;
    700  1.43       dsl 		error = sigaltstack1(l, &nsa, &osa);
    701   1.1       mrg 	} else
    702  1.43       dsl 		error = sigaltstack1(l, NULL, &osa);
    703  1.43       dsl 	if (error)
    704  1.43       dsl 		return error;
    705   1.1       mrg 
    706  1.39       dsl 	if (SCARG_P32(uap, oss)) {
    707  1.43       dsl 		NETBSD32PTR32(ss32.ss_sp, osa.ss_sp);
    708  1.43       dsl 		ss32.ss_onstack = (osa.ss_flags & SS_ONSTACK) != 0;
    709  1.39       dsl 		error = copyout(&ss32, SCARG_P32(uap, oss), sizeof(ss32));
    710   1.1       mrg 	}
    711   1.1       mrg 
    712  1.43       dsl 	return error;
    713   1.1       mrg }
    714