/* $NetBSD: svr4_32_stat.c,v 1.35 2008/04/28 20:23:46 martin Exp $ */ /*- * Copyright (c) 1994, 2008 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Christos Zoulas. * * 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. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. 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 FOUNDATION 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. */ #include __KERNEL_RCSID(0, "$NetBSD: svr4_32_stat.c,v 1.35 2008/04/28 20:23:46 martin Exp $"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #if defined(__sparc__) || defined(__sparc_v9__) || defined(__sparc64__) /* * Solaris-2.4 on the sparc has the old stat call using the new * stat data structure... */ # define SVR4_NO_OSTAT #endif static void bsd_to_svr4_32_xstat(struct stat *, struct svr4_32_xstat *); static void bsd_to_svr4_32_stat64(struct stat *, struct svr4_32_stat64 *); static int svr4_32_to_bsd_pathconf(int); /* * SVR4 uses named pipes as named sockets, so we tell programs * that sockets are named pipes with mode 0 */ #define BSD_TO_SVR4_MODE(mode) (S_ISSOCK(mode) ? S_IFIFO : (mode)) #ifndef SVR4_NO_OSTAT static void bsd_to_svr4_32_stat(struct stat *, struct svr4_32_stat *); static void bsd_to_svr4_32_stat(struct stat *st, struct svr4_32_stat *st4) { memset(st4, 0, sizeof(*st4)); st4->st_dev = bsd_to_svr4_odev_t(st->st_dev); st4->st_ino = st->st_ino; st4->st_mode = BSD_TO_SVR4_MODE(st->st_mode); st4->st_nlink = st->st_nlink; st4->st_uid = st->st_uid; st4->st_gid = st->st_gid; st4->st_rdev = bsd_to_svr4_odev_t(st->st_rdev); st4->st_size = st->st_size; st4->st_atim = st->st_atimespec.tv_sec; st4->st_mtim = st->st_mtimespec.tv_sec; st4->st_ctim = st->st_ctimespec.tv_sec; } #endif static void bsd_to_svr4_32_xstat(struct stat *st, struct svr4_32_xstat *st4) { memset(st4, 0, sizeof(*st4)); st4->st_dev = bsd_to_svr4_dev_t(st->st_dev); st4->st_ino = st->st_ino; st4->st_mode = BSD_TO_SVR4_MODE(st->st_mode); st4->st_nlink = st->st_nlink; st4->st_uid = st->st_uid; st4->st_gid = st->st_gid; st4->st_rdev = bsd_to_svr4_dev_t(st->st_rdev); st4->st_size = st->st_size; st4->st_atim.tv_sec = st->st_atimespec.tv_sec; st4->st_atim.tv_nsec = st->st_atimespec.tv_nsec; st4->st_mtim.tv_sec = st->st_mtimespec.tv_sec; st4->st_mtim.tv_nsec = st->st_mtimespec.tv_nsec; st4->st_ctim.tv_sec = st->st_ctimespec.tv_sec; st4->st_ctim.tv_nsec = st->st_ctimespec.tv_nsec; st4->st_blksize = st->st_blksize; st4->st_blocks = st->st_blocks; strlcpy(st4->st_fstype, "unknown", sizeof(st4->st_fstype)); } static void bsd_to_svr4_32_stat64(struct stat *st, struct svr4_32_stat64 *st4) { memset(st4, 0, sizeof(*st4)); st4->st_dev = bsd_to_svr4_dev_t(st->st_dev); st4->st_ino = st->st_ino; st4->st_mode = BSD_TO_SVR4_MODE(st->st_mode); st4->st_nlink = st->st_nlink; st4->st_uid = st->st_uid; st4->st_gid = st->st_gid; st4->st_rdev = bsd_to_svr4_dev_t(st->st_rdev); st4->st_size = st->st_size; st4->st_atim.tv_sec = st->st_atimespec.tv_sec; st4->st_atim.tv_nsec = st->st_atimespec.tv_nsec; st4->st_mtim.tv_sec = st->st_mtimespec.tv_sec; st4->st_mtim.tv_nsec = st->st_mtimespec.tv_nsec; st4->st_ctim.tv_sec = st->st_ctimespec.tv_sec; st4->st_ctim.tv_nsec = st->st_ctimespec.tv_nsec; st4->st_blocks = st->st_blocks; strlcpy(st4->st_fstype, "unknown", sizeof(st4->st_fstype)); } int svr4_32_sys_stat(struct lwp *l, const struct svr4_32_sys_stat_args *uap, register_t *retval) { #ifdef SVR4_NO_OSTAT struct svr4_32_sys_xstat_args cup; SCARG(&cup, two) = 2; SCARG(&cup, path) = SCARG(uap, path); SCARG(&cup, ub) = SCARG(uap, ub); return svr4_32_sys_xstat(l, &cup, retval); #else struct stat st; struct svr4_32_stat svr4_st; int error; error = do_sys_stat(SCARG(&cup, path), FOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_stat(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(p, SCARG(&cup, path), &st); return copyout(&svr4_st, SCARG_P32(uap, ub), sizeof svr4_st); #endif } int svr4_32_sys_lstat(struct lwp *l, const struct svr4_32_sys_lstat_args *uap, register_t *retval) { #ifdef SVR4_NO_OSTAT struct svr4_32_sys_lxstat_args cup; SCARG(&cup, two) = 2; SCARG(&cup, path) = SCARG(uap, path); SCARG(&cup, ub) = SCARG(uap, ub); return svr4_32_sys_lxstat(l, &cup, retval); #else struct stat st; struct svr4_32_stat svr4_st; int error; error = do_sys_stat(SCARG(&cup, path), NOFOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_stat(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(p, SCARG(&cup, path), &st); return copyout(&svr4_st, SCARG_P32(uap, ub), sizeof svr4_st); #endif } int svr4_32_sys_fstat(struct lwp *l, const struct svr4_32_sys_fstat_args *uap, register_t *retval) { #ifdef SVR4_NO_OSTAT struct svr4_32_sys_fxstat_args cup; SCARG(&cup, two) = 2; SCARG(&cup, fd) = SCARG(uap, fd); SCARG(&cup, sb) = SCARG(uap, sb); return svr4_32_sys_fxstat(l, &cup, retval); #else struct stat st; struct svr4_32_stat svr4_st; int error; error = do_sys_fstat(SCARG(uap, fd), &st); if (error != 0) return error; bsd_to_svr4_32_stat(&st, &svr4_st); return copyout(&svr4_st, SCARG_P32(uap, ub), sizeof svr4_st); #endif } int svr4_32_sys_xstat(struct lwp *l, const struct svr4_32_sys_xstat_args *uap, register_t *retval) { struct stat st; struct svr4_32_xstat svr4_st; int error; const char *path = SCARG_P32(uap, path); error = do_sys_stat(path, FOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_xstat(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(l->l_proc, path, &st); return copyout(&svr4_st, SCARG_P32(uap, ub), sizeof svr4_st); } int svr4_32_sys_lxstat(struct lwp *l, const struct svr4_32_sys_lxstat_args *uap, register_t *retval) { struct stat st; struct svr4_32_xstat svr4_st; int error; const char *path = SCARG_P32(uap, path); error = do_sys_stat(path, NOFOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_xstat(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(l->l_proc, path, &st); return copyout(&svr4_st, SCARG_P32(uap, ub), sizeof svr4_st); } int svr4_32_sys_fxstat(struct lwp *l, const struct svr4_32_sys_fxstat_args *uap, register_t *retval) { struct stat st; struct svr4_32_xstat svr4_st; int error; error = do_sys_fstat(SCARG(uap, fd), &st); if (error != 0) return error; bsd_to_svr4_32_xstat(&st, &svr4_st); return copyout(&svr4_st, SCARG_P32(uap, sb), sizeof svr4_st); } int svr4_32_sys_stat64(struct lwp *l, const struct svr4_32_sys_stat64_args *uap, register_t *retval) { struct stat st; struct svr4_32_stat64 svr4_st; int error; const char *path = SCARG_P32(uap, path); error = do_sys_stat(path, FOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_stat64(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(l->l_proc, path, &st); return copyout(&svr4_st, SCARG_P32(uap, sb), sizeof svr4_st); } int svr4_32_sys_lstat64(struct lwp *l, const struct svr4_32_sys_lstat64_args *uap, register_t *retval) { struct stat st; struct svr4_32_stat64 svr4_st; int error; const char *path = SCARG_P32(uap, path); error = do_sys_stat(path, NOFOLLOW, &st); if (error != 0) return error; bsd_to_svr4_32_stat64(&st, &svr4_st); if (S_ISSOCK(st.st_mode)) (void) svr4_add_socket(l->l_proc, path, &st); return copyout(&svr4_st, SCARG_P32(uap, sb), sizeof svr4_st); } int svr4_32_sys_fstat64(struct lwp *l, const struct svr4_32_sys_fstat64_args *uap, register_t *retval) { struct stat st; struct svr4_32_stat64 svr4_st; int error; error = do_sys_fstat(SCARG(uap, fd), &st); if (error != 0) return error; bsd_to_svr4_32_stat64(&st, &svr4_st); return copyout(&svr4_st, SCARG_P32(uap, sb), sizeof svr4_st); } struct svr4_32_ustat_args { syscallarg(svr4_dev_t) dev; syscallarg(svr4_32_ustatp) name; }; static int svr4_32_ustat(struct lwp *l, const struct svr4_32_ustat_args *uap, register_t *retval) { /* { syscallarg(svr4_dev_t) dev; syscallarg(svr4_32_ustatp) name; } */ struct svr4_32_ustat us; int error; memset(&us, 0, sizeof us); /* * XXX: should set f_tfree and f_tinode at least * How do we translate dev -> fstat? (and then to svr4_32_ustat) */ if ((error = copyout(&us, SCARG_P32(uap, name), sizeof us)) != 0) return (error); return 0; } int svr4_32_sys_uname(struct lwp *l, const struct svr4_32_sys_uname_args *uap, register_t *retval) { struct svr4_utsname sut; memset(&sut, 0, sizeof(sut)); strncpy(sut.sysname, ostype, sizeof(sut.sysname)); sut.sysname[sizeof(sut.sysname) - 1] = '\0'; strncpy(sut.nodename, hostname, sizeof(sut.nodename)); sut.nodename[sizeof(sut.nodename) - 1] = '\0'; strncpy(sut.release, osrelease, sizeof(sut.release)); sut.release[sizeof(sut.release) - 1] = '\0'; strncpy(sut.version, version, sizeof(sut.version)); sut.version[sizeof(sut.version) - 1] = '\0'; strncpy(sut.machine, machine, sizeof(sut.machine)); sut.machine[sizeof(sut.machine) - 1] = '\0'; return copyout((void *) &sut, SCARG_P32(uap, name), sizeof(struct svr4_utsname)); } int svr4_32_sys_systeminfo(struct lwp *l, const struct svr4_32_sys_systeminfo_args *uap, register_t *retval) { const char *str = NULL; int name[2]; int error; size_t len; char buf[256]; u_int rlen = SCARG(uap, len); switch (SCARG(uap, what)) { case SVR4_SI_SYSNAME: str = ostype; break; case SVR4_SI_HOSTNAME: str = hostname; break; case SVR4_SI_RELEASE: str = osrelease; break; case SVR4_SI_VERSION: str = version; break; case SVR4_SI_MACHINE: str = "sun4m"; /* Lie, pretend we are 4m */ break; case SVR4_SI_ARCHITECTURE: #if defined(__sparc__) str = "sparc"; #else str = machine_arch; #endif break; case SVR4_SI_ISALIST: #if defined(__sparc__) str = "sparcv8 sparcv8-fsmuld sparcv7 sparc"; #elif defined(__i386__) str = "i386"; #else str = "unknown"; #endif break; case SVR4_SI_HW_SERIAL: snprintf(buf, sizeof(buf), "%lu", hostid); str = buf; break; case SVR4_SI_HW_PROVIDER: str = ostype; break; case SVR4_SI_SRPC_DOMAIN: str = domainname; break; case SVR4_SI_PLATFORM: #if defined(__i386__) str = "i86pc"; #elif defined(__sparc__) { extern char machine_model[]; str = machine_model; } #else str = "unknown"; #endif break; case SVR4_SI_KERB_REALM: str = "unsupported"; break; case SVR4_SI_SET_HOSTNAME: name[1] = KERN_HOSTNAME; break; case SVR4_SI_SET_SRPC_DOMAIN: name[1] = KERN_DOMAINNAME; break; case SVR4_SI_SET_KERB_REALM: return 0; default: DPRINTF(("Bad systeminfo command %d\n", SCARG(uap, what))); return ENOSYS; } if (str) { len = strlen(str) + 1; if (len < rlen) rlen = len; if (SCARG_P32(uap, buf)) { error = copyout(str, SCARG_P32(uap, buf), rlen); if (error) return error; if (rlen > 0) { /* make sure we are NULL terminated */ buf[0] = '\0'; error = copyout(buf, &(((char *) SCARG_P32(uap, buf))[rlen - 1]), 1); } } else error = 0; } else { error = copyinstr(SCARG_P32(uap, buf), buf, sizeof(buf), &len); if (error) return error; name[0] = CTL_KERN; error = old_sysctl(&name[0], 1, 0, 0, buf, len, NULL); } *retval = len; return error; } int svr4_32_sys_utssys(struct lwp *l, const struct svr4_32_sys_utssys_args *uap, register_t *retval) { switch (SCARG(uap, sel)) { case 0: /* uname(2) */ { struct svr4_32_sys_uname_args ua; SCARG(&ua, name) = SCARG(uap, a1); return svr4_32_sys_uname(l, &ua, retval); } case 2: /* ustat(2) */ { struct svr4_32_ustat_args ua; SCARG(&ua, dev) = (uintptr_t)SCARG_P32(uap, a2); SCARG(&ua, name) = SCARG(uap, a1); return svr4_32_ustat(l, &ua, retval); } case 3: /* fusers(2) */ return ENOSYS; default: return ENOSYS; } return ENOSYS; } int svr4_32_sys_utime(struct lwp *l, const struct svr4_32_sys_utime_args *uap, register_t *retval) { struct svr4_32_utimbuf ub; struct timeval tbuf[2], *tvp; int error; if (SCARG_P32(uap, ubuf)) { if ((error = copyin(SCARG_P32(uap, ubuf), &ub, sizeof(ub))) != 0) return error; tbuf[0].tv_sec = ub.actime; tbuf[0].tv_usec = 0; tbuf[1].tv_sec = ub.modtime; tbuf[1].tv_usec = 0; tvp = tbuf; } else tvp = NULL; return do_sys_utimes(l, NULL, SCARG_P32(uap, path), FOLLOW, tvp, UIO_SYSSPACE); } int svr4_32_sys_utimes(struct lwp *l, const struct svr4_32_sys_utimes_args *uap, register_t *retval) { struct sys_utimes_args ua; SCARG(&ua, path) = SCARG_P32(uap, path); SCARG(&ua, tptr) = SCARG_P32(uap, tptr); return sys_utimes(l, &ua, retval); } static int svr4_32_to_bsd_pathconf(int name) { switch (name) { case SVR4_PC_LINK_MAX: return _PC_LINK_MAX; case SVR4_PC_MAX_CANON: return _PC_MAX_CANON; case SVR4_PC_MAX_INPUT: return _PC_MAX_INPUT; case SVR4_PC_NAME_MAX: return _PC_NAME_MAX; case SVR4_PC_PATH_MAX: return _PC_PATH_MAX; case SVR4_PC_PIPE_BUF: return _PC_PIPE_BUF; case SVR4_PC_NO_TRUNC: return _PC_NO_TRUNC; case SVR4_PC_VDISABLE: return _PC_VDISABLE; case SVR4_PC_CHOWN_RESTRICTED: return _PC_CHOWN_RESTRICTED; case SVR4_PC_SYNC_IO: return _PC_SYNC_IO; case SVR4_PC_FILESIZEBITS: return _PC_FILESIZEBITS; case SVR4_PC_ASYNC_IO: case SVR4_PC_PRIO_IO: /* Not supported */ return 0; default: /* Invalid */ return -1; } } int svr4_32_sys_pathconf(struct lwp *l, const struct svr4_32_sys_pathconf_args *uap, register_t *retval) { struct sys_pathconf_args /* { syscallarg(char *) path; syscallarg(int) name; } */ ua; SCARG(&ua, path) = SCARG_P32(uap, path); SCARG(&ua, name) = svr4_32_to_bsd_pathconf(SCARG(&ua, name)); switch (SCARG(&ua, name)) { case -1: *retval = -1; return EINVAL; case 0: *retval = 0; return 0; default: return sys_pathconf(l, &ua, retval); } } int svr4_32_sys_fpathconf(struct lwp *l, const struct svr4_32_sys_fpathconf_args *uap, register_t *retval) { struct sys_fpathconf_args ua; SCARG(&ua, fd) = SCARG(uap, fd); SCARG(&ua, name) = svr4_32_to_bsd_pathconf(SCARG(uap, name)); switch (SCARG(&ua, name)) { case -1: *retval = -1; return EINVAL; case 0: *retval = 0; return 0; default: return sys_fpathconf(l, &ua, retval); } }