diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2012-08-17 12:38:04 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2012-08-17 12:38:04 +0300 |
commit | e6b05afd9971b457c0b46907a91185b66be8ff4e (patch) | |
tree | e7d3b6fce47a2ac7b32cdf923ceb6e50db9fe441 /posix/gawkmisc.c | |
parent | 3b23e177cd166e96c700379491b4a99bddf9aa4d (diff) | |
parent | 76cc4d241f328876b18e48639d631823c3d304d6 (diff) | |
download | egawk-e6b05afd9971b457c0b46907a91185b66be8ff4e.tar.gz egawk-e6b05afd9971b457c0b46907a91185b66be8ff4e.tar.bz2 egawk-e6b05afd9971b457c0b46907a91185b66be8ff4e.zip |
Merge branch 'extgawk'
Diffstat (limited to 'posix/gawkmisc.c')
-rw-r--r-- | posix/gawkmisc.c | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/posix/gawkmisc.c b/posix/gawkmisc.c index 3baf852e..ebcee8a0 100644 --- a/posix/gawkmisc.c +++ b/posix/gawkmisc.c @@ -204,6 +204,34 @@ os_isdir(int fd) return (fstat(fd, &sbuf) == 0 && S_ISDIR(sbuf.st_mode)); } +/* os_isreadable --- fd can be read from */ + +int +os_isreadable(const IOBUF_PUBLIC *iobuf, bool *isdir) +{ + *isdir = false; + + if (iobuf->fd == INVALID_HANDLE) + return false; + + switch (iobuf->sbuf.st_mode & S_IFMT) { + case S_IFREG: + case S_IFCHR: /* ttys, /dev/null, .. */ +#ifdef S_IFSOCK + case S_IFSOCK: +#endif +#ifdef S_IFIFO + case S_IFIFO: +#endif + return true; + case S_IFDIR: + *isdir = true; + /* fall through */ + default: + return false; + } +} + /* os_is_setuid --- true if running setuid root */ int |