xref: /netbsd-src/lib/libc/stdio/flags.c (revision aaf4ece63a859a04e37cf3a7229b5fab0157cc06)
1 /*	$NetBSD: flags.c,v 1.14 2003/08/07 16:43:23 agc Exp $	*/
2 
3 /*-
4  * Copyright (c) 1990, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * This code is derived from software contributed to Berkeley by
8  * Chris Torek.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #include <sys/cdefs.h>
36 #if defined(LIBC_SCCS) && !defined(lint)
37 #if 0
38 static char sccsid[] = "@(#)flags.c	8.1 (Berkeley) 6/4/93";
39 #else
40 __RCSID("$NetBSD: flags.c,v 1.14 2003/08/07 16:43:23 agc Exp $");
41 #endif
42 #endif /* LIBC_SCCS and not lint */
43 
44 #include <sys/types.h>
45 #include <assert.h>
46 #include <fcntl.h>
47 #include <stdio.h>
48 #include <errno.h>
49 #include "reentrant.h"
50 #include "local.h"
51 
52 /*
53  * Return the (stdio) flags for a given mode.  Store the flags
54  * to be passed to an open() syscall through *optr.
55  * Return 0 on error.
56  */
57 int
58 __sflags(mode, optr)
59 	const char *mode;
60 	int *optr;
61 {
62 	int ret, m, o;
63 
64 	_DIAGASSERT(mode != NULL);
65 
66 	switch (*mode++) {
67 
68 	case 'r':	/* open for reading */
69 		ret = __SRD;
70 		m = O_RDONLY;
71 		o = 0;
72 		break;
73 
74 	case 'w':	/* open for writing */
75 		ret = __SWR;
76 		m = O_WRONLY;
77 		o = O_CREAT | O_TRUNC;
78 		break;
79 
80 	case 'a':	/* open for appending */
81 		ret = __SWR;
82 		m = O_WRONLY;
83 		o = O_CREAT | O_APPEND;
84 		break;
85 
86 	default:	/* illegal mode */
87 		errno = EINVAL;
88 		return (0);
89 	}
90 
91 	/*
92 	 * [rwa]\+ or [rwa]b\+ means read and write
93 	 * f means open only plain files.
94 	 */
95 	for (; *mode; mode++)
96 		switch (*mode) {
97 		case '+':
98 			ret = __SRW;
99 			m = O_RDWR;
100 			break;
101 		case 'f':
102 			o |= O_NONBLOCK;
103 			break;
104 		case 'b':
105 			break;
106 		default:	/* We could produce a warning here */
107 			break;
108 		}
109 
110 	*optr = m | o;
111 	return (ret);
112 }
113