1*b30d1939SAndy Fiddaman /*********************************************************************** 2*b30d1939SAndy Fiddaman * * 3*b30d1939SAndy Fiddaman * This software is part of the ast package * 4*b30d1939SAndy Fiddaman * Copyright (c) 1985-2011 AT&T Intellectual Property * 5*b30d1939SAndy Fiddaman * and is licensed under the * 6*b30d1939SAndy Fiddaman * Eclipse Public License, Version 1.0 * 7*b30d1939SAndy Fiddaman * by AT&T Intellectual Property * 8*b30d1939SAndy Fiddaman * * 9*b30d1939SAndy Fiddaman * A copy of the License is available at * 10*b30d1939SAndy Fiddaman * http://www.eclipse.org/org/documents/epl-v10.html * 11*b30d1939SAndy Fiddaman * (with md5 checksum b35adb5213ca9657e911e9befb180842) * 12*b30d1939SAndy Fiddaman * * 13*b30d1939SAndy Fiddaman * Information and Software Systems Research * 14*b30d1939SAndy Fiddaman * AT&T Research * 15*b30d1939SAndy Fiddaman * Florham Park NJ * 16*b30d1939SAndy Fiddaman * * 17*b30d1939SAndy Fiddaman * Glenn Fowler <gsf@research.att.com> * 18*b30d1939SAndy Fiddaman * David Korn <dgk@research.att.com> * 19*b30d1939SAndy Fiddaman * Phong Vo <kpv@research.att.com> * 20*b30d1939SAndy Fiddaman * * 21*b30d1939SAndy Fiddaman ***********************************************************************/ 22*b30d1939SAndy Fiddaman #pragma prototyped 23*b30d1939SAndy Fiddaman 24*b30d1939SAndy Fiddaman /* 25*b30d1939SAndy Fiddaman * -last fcntl 26*b30d1939SAndy Fiddaman */ 27*b30d1939SAndy Fiddaman 28*b30d1939SAndy Fiddaman #include <ast.h> 29*b30d1939SAndy Fiddaman 30*b30d1939SAndy Fiddaman #ifndef fcntl 31*b30d1939SAndy Fiddaman 32*b30d1939SAndy Fiddaman NoN(fcntl) 33*b30d1939SAndy Fiddaman 34*b30d1939SAndy Fiddaman #else 35*b30d1939SAndy Fiddaman 36*b30d1939SAndy Fiddaman #include <ls.h> 37*b30d1939SAndy Fiddaman #include <ast_tty.h> 38*b30d1939SAndy Fiddaman #include <error.h> 39*b30d1939SAndy Fiddaman 40*b30d1939SAndy Fiddaman #if F_SETFD >= _ast_F_LOCAL 41*b30d1939SAndy Fiddaman #if _sys_filio 42*b30d1939SAndy Fiddaman #include <sys/filio.h> 43*b30d1939SAndy Fiddaman #endif 44*b30d1939SAndy Fiddaman #endif 45*b30d1939SAndy Fiddaman 46*b30d1939SAndy Fiddaman #if _lib_fcntl 47*b30d1939SAndy Fiddaman #undef fcntl 48*b30d1939SAndy Fiddaman extern int fcntl(int, int, ...); 49*b30d1939SAndy Fiddaman #endif 50*b30d1939SAndy Fiddaman 51*b30d1939SAndy Fiddaman int 52*b30d1939SAndy Fiddaman _ast_fcntl(int fd, int op, ...) 53*b30d1939SAndy Fiddaman { 54*b30d1939SAndy Fiddaman int n; 55*b30d1939SAndy Fiddaman int save_errno; 56*b30d1939SAndy Fiddaman struct stat st; 57*b30d1939SAndy Fiddaman va_list ap; 58*b30d1939SAndy Fiddaman 59*b30d1939SAndy Fiddaman save_errno = errno; 60*b30d1939SAndy Fiddaman va_start(ap, op); 61*b30d1939SAndy Fiddaman if (op >= _ast_F_LOCAL) switch (op) 62*b30d1939SAndy Fiddaman { 63*b30d1939SAndy Fiddaman #if F_DUPFD >= _ast_F_LOCAL 64*b30d1939SAndy Fiddaman case F_DUPFD: 65*b30d1939SAndy Fiddaman n = va_arg(ap, int); 66*b30d1939SAndy Fiddaman op = dup2(fd, n); 67*b30d1939SAndy Fiddaman break; 68*b30d1939SAndy Fiddaman #endif 69*b30d1939SAndy Fiddaman #if F_GETFL >= _ast_F_LOCAL 70*b30d1939SAndy Fiddaman case F_GETFL: 71*b30d1939SAndy Fiddaman op = fstat(fd, &st); 72*b30d1939SAndy Fiddaman break; 73*b30d1939SAndy Fiddaman #endif 74*b30d1939SAndy Fiddaman #if F_SETFD >= _ast_F_LOCAL && defined(FIOCLEX) 75*b30d1939SAndy Fiddaman case F_SETFD: 76*b30d1939SAndy Fiddaman n = va_arg(ap, int); 77*b30d1939SAndy Fiddaman op = ioctl(fd, n == FD_CLOEXEC ? FIOCLEX : FIONCLEX, 0); 78*b30d1939SAndy Fiddaman break; 79*b30d1939SAndy Fiddaman #endif 80*b30d1939SAndy Fiddaman default: 81*b30d1939SAndy Fiddaman errno = EINVAL; 82*b30d1939SAndy Fiddaman op = -1; 83*b30d1939SAndy Fiddaman break; 84*b30d1939SAndy Fiddaman } 85*b30d1939SAndy Fiddaman else 86*b30d1939SAndy Fiddaman #if _lib_fcntl 87*b30d1939SAndy Fiddaman op = fcntl(fd, op, va_arg(ap, int)); 88*b30d1939SAndy Fiddaman #else 89*b30d1939SAndy Fiddaman { 90*b30d1939SAndy Fiddaman errno = EINVAL; 91*b30d1939SAndy Fiddaman op = -1; 92*b30d1939SAndy Fiddaman } 93*b30d1939SAndy Fiddaman #endif 94*b30d1939SAndy Fiddaman va_end(ap); 95*b30d1939SAndy Fiddaman return(op); 96*b30d1939SAndy Fiddaman } 97*b30d1939SAndy Fiddaman 98*b30d1939SAndy Fiddaman #endif 99