diff options
Diffstat (limited to 'usr/src/lib/libbc/libc/sys/sys5/fcntl.c')
| -rw-r--r-- | usr/src/lib/libbc/libc/sys/sys5/fcntl.c | 181 |
1 files changed, 181 insertions, 0 deletions
diff --git a/usr/src/lib/libbc/libc/sys/sys5/fcntl.c b/usr/src/lib/libbc/libc/sys/sys5/fcntl.c new file mode 100644 index 0000000000..3d8342ba4c --- /dev/null +++ b/usr/src/lib/libbc/libc/sys/sys5/fcntl.c @@ -0,0 +1,181 @@ +/* + * CDDL HEADER START + * + * The contents of this file are subject to the terms of the + * Common Development and Distribution License, Version 1.0 only + * (the "License"). You may not use this file except in compliance + * with the License. + * + * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE + * or http://www.opensolaris.org/os/licensing. + * See the License for the specific language governing permissions + * and limitations under the License. + * + * When distributing Covered Code, include this CDDL HEADER in each + * file and include the License file at usr/src/OPENSOLARIS.LICENSE. + * If applicable, add the following below this CDDL HEADER, with the + * fields enclosed by brackets "[]" replaced with your own identifying + * information: Portions Copyright [yyyy] [name of copyright owner] + * + * CDDL HEADER END + */ +/* + * Copyright (c) 1990-1996 by Sun Microsystems, Inc. + * All rights reserved. + */ + +#ident "%Z%%M% %I% %E% SMI" + +#include <sys/syscall.h> +#include <sys/fcntl.h> +#include <sys/errno.h> +#include <sys/filio.h> +#include <sys/ioccom.h> +#include <unistd.h> + +/* The following is an array of fcntl commands. The numbers listed + * below are from SVR4. Array is indexed with SunOS 4.1 numbers to + * obtain the SVR4 numbers. + */ +int cmd_op[14] = {0, 1, 2, 3, 4, 23, 24, 14, 6, 7, 21, 20, -1, 22}; + +/* SVR4/SunOS 5.0 equivalent modes */ +#define N_O_NDELAY 0x04 +#define N_O_SYNC 0x10 +#define N_O_NONBLOCK 0x80 +#define N_O_CREAT 0x100 +#define N_O_TRUNC 0x200 +#define N_O_EXCL 0x400 + +#define S5_FASYNC 0x1000 + +/* from SVR4 stropts.h */ +#define S5_S_RDNORM 0x0040 +#define S5_S_WRNORM 0x0004 +#define S5_S_RDBAND 0x0080 +#define S5_S_BANDURG 0x0200 +#define S5_I_SETSIG (('S'<<8)|011) +#define S5_I_GETSIG (('S'<<8)|012) + +/* Mask corresponding to the bits above in SunOS 4.x */ +#define FLAGS_MASK (O_SYNC|O_NONBLOCK|O_CREAT|O_TRUNC|O_EXCL \ + |O_NDELAY|FASYNC) +#define N_FLAGS_MASK (N_O_NDELAY|N_O_SYNC|N_O_NONBLOCK|N_O_CREAT \ + |N_O_TRUNC|N_O_EXCL|S5_FASYNC) + +struct n_flock { + short l_type; + short l_whence; + long l_start; + long l_len; /* len == 0 means until end of file */ + long l_sysid; + long l_pid; + long pad[4]; /* reserve area */ +} ; + +int fcntl(fd, cmd, arg) +int fd, cmd, arg; +{ + return(bc_fcntl(fd, cmd, arg)); +} + +int bc_fcntl(fd, cmd, arg) +int fd, cmd, arg; +{ + int fds, ret; + struct flock *savarg; + struct n_flock nfl; + extern int errno; + int narg, i; + + if ((cmd == F_SETOWN) || (cmd == F_GETOWN)) { + ret = _s_fcntl(fd, cmd_op[cmd], arg); + if ((ret != -1) || (errno != EINVAL)) + return (ret); + else { + if (cmd == F_GETOWN) { + if (_ioctl(fd, S5_I_GETSIG, &i) < 0) { + if (errno == EINVAL) + i = 0; + else + return (-1); + } + if (i & (S5_S_RDBAND|S5_S_BANDURG| + S5_S_RDNORM|S5_S_WRNORM)) + return (getpid()); + return (0); + } else { /* cmd == F_SETOWN */ + i = S5_S_RDNORM|S5_S_WRNORM|S5_S_RDBAND|S5_S_BANDURG; + return (ioctl(fd, S5_I_SETSIG, i)); + } + } + } + if (cmd == F_SETFL) { + if (arg & FLAGS_MASK) { + narg = arg & ~FLAGS_MASK; + if (arg & FASYNC) + narg |= S5_FASYNC; + if (arg & O_SYNC) + narg |= N_O_SYNC; + if (arg & O_CREAT) + narg |= N_O_CREAT; + if (arg & O_TRUNC) + narg |= N_O_TRUNC; + if (arg & O_EXCL) + narg |= N_O_EXCL; + if (arg & (O_NDELAY)) + narg |= N_O_NDELAY; + if (arg & O_NONBLOCK) + narg |= N_O_NONBLOCK; + arg = narg; + } + } else if (cmd == F_SETLK || cmd == F_SETLKW || cmd == F_GETLK) { + if (arg == 0 || arg == -1) { + errno = EFAULT; + return(-1); + } + savarg = (struct flock *)arg; + arg = (int) &nfl; + nfl.l_type = savarg->l_type; + nfl.l_whence = savarg->l_whence; + nfl.l_start = savarg->l_start; + nfl.l_len = savarg->l_len; + nfl.l_pid = savarg->l_pid; + } + + ret = _s_fcntl(fd, cmd_op[cmd], arg); + + if (ret != -1) { + if (cmd == F_DUPFD) { + if ((fds = fd_get(fd)) != -1) + fd_add(ret, fds); + } else if (cmd == F_GETFL) { + if (ret & N_FLAGS_MASK) { + narg = ret & ~N_FLAGS_MASK; + if (ret & S5_FASYNC) + narg |= FASYNC; + if (ret & N_O_SYNC) + narg |= O_SYNC; + if (ret & N_O_NONBLOCK) + narg |= O_NONBLOCK; + if (ret & N_O_CREAT) + narg |= O_CREAT; + if (ret & N_O_TRUNC) + narg |= O_TRUNC; + if (ret & N_O_EXCL) + narg |= O_EXCL; + if (ret & (N_O_NDELAY)) + narg |= O_NDELAY; + ret = narg; + } + } else if (cmd == F_SETLK || cmd == F_SETLKW || + cmd == F_GETLK) { + savarg->l_type = nfl.l_type; + savarg->l_whence = nfl.l_whence; + savarg->l_start = nfl.l_start; + savarg->l_len = nfl.l_len; + savarg->l_pid = nfl.l_pid; + } + } + return(ret); +} |