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