[444] | 1 | /* |
---|
| 2 | * Copyright (c) 1990 Regents of the University of California. |
---|
| 3 | * All rights reserved. |
---|
| 4 | * |
---|
| 5 | * Redistribution and use in source and binary forms are permitted |
---|
| 6 | * provided that the above copyright notice and this paragraph are |
---|
| 7 | * duplicated in all such forms and that any documentation, |
---|
| 8 | * advertising materials, and other materials related to such |
---|
| 9 | * distribution and use acknowledge that the software was developed |
---|
| 10 | * by the University of California, Berkeley. The name of the |
---|
| 11 | * University may not be used to endorse or promote products derived |
---|
| 12 | * from this software without specific prior written permission. |
---|
| 13 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR |
---|
| 14 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED |
---|
| 15 | * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. |
---|
| 16 | */ |
---|
| 17 | /* No user fns here. Pesch 15apr92 */ |
---|
| 18 | |
---|
| 19 | #include <_ansi.h> |
---|
| 20 | #include <stdio.h> |
---|
| 21 | #include <time.h> |
---|
| 22 | #include <fcntl.h> |
---|
| 23 | #include <errno.h> |
---|
| 24 | #include <sys/types.h> |
---|
| 25 | |
---|
| 26 | /* |
---|
| 27 | * Return the (stdio) flags for a given mode. Store the flags |
---|
| 28 | * to be passed to an open() syscall through *optr. |
---|
| 29 | * Return 0 on error. |
---|
| 30 | */ |
---|
| 31 | |
---|
| 32 | int |
---|
| 33 | __sflags (struct _reent *ptr, |
---|
| 34 | register char *mode, |
---|
| 35 | int *optr) |
---|
| 36 | { |
---|
| 37 | register int ret, m, o; |
---|
| 38 | |
---|
| 39 | switch (mode[0]) |
---|
| 40 | { |
---|
| 41 | case 'r': /* open for reading */ |
---|
| 42 | ret = __SRD; |
---|
| 43 | m = O_RDONLY; |
---|
| 44 | o = 0; |
---|
| 45 | break; |
---|
| 46 | |
---|
| 47 | case 'w': /* open for writing */ |
---|
| 48 | ret = __SWR; |
---|
| 49 | m = O_WRONLY; |
---|
| 50 | o = O_CREAT | O_TRUNC; |
---|
| 51 | break; |
---|
| 52 | |
---|
| 53 | case 'a': /* open for appending */ |
---|
| 54 | ret = __SWR | __SAPP; |
---|
| 55 | m = O_WRONLY; |
---|
| 56 | o = O_CREAT | O_APPEND; |
---|
| 57 | break; |
---|
| 58 | default: /* illegal mode */ |
---|
| 59 | ptr->_errno = EINVAL; |
---|
| 60 | return (0); |
---|
| 61 | } |
---|
| 62 | while (*++mode) |
---|
| 63 | { |
---|
| 64 | switch (*mode) |
---|
| 65 | { |
---|
| 66 | case '+': |
---|
| 67 | ret = (ret & ~(__SRD | __SWR)) | __SRW; |
---|
| 68 | m = (m & ~O_ACCMODE) | O_RDWR; |
---|
| 69 | break; |
---|
| 70 | case 'b': |
---|
| 71 | #ifdef O_BINARY |
---|
| 72 | m |= O_BINARY; |
---|
| 73 | #endif |
---|
| 74 | break; |
---|
| 75 | #ifdef __CYGWIN__ |
---|
| 76 | case 't': |
---|
| 77 | m |= O_TEXT; |
---|
| 78 | break; |
---|
| 79 | #endif |
---|
| 80 | #if defined (O_CLOEXEC) && defined (_GLIBC_EXTENSION) |
---|
| 81 | case 'e': |
---|
| 82 | m |= O_CLOEXEC; |
---|
| 83 | break; |
---|
| 84 | #endif |
---|
| 85 | case 'x': |
---|
| 86 | m |= O_EXCL; |
---|
| 87 | break; |
---|
| 88 | default: |
---|
| 89 | break; |
---|
| 90 | } |
---|
| 91 | } |
---|
| 92 | #if defined (O_TEXT) && !defined (__CYGWIN__) |
---|
| 93 | if (!(m | O_BINARY)) |
---|
| 94 | m |= O_TEXT; |
---|
| 95 | #endif |
---|
| 96 | *optr = m | o; |
---|
| 97 | return ret; |
---|
| 98 | } |
---|