This commit was generated by cvs2svn to track changes on a CVS vendor
[unix-history] / lib / libpthread / stdio / fopen.c
CommitLineData
8f953e65
CP
1/*-
2 * Copyright (c) 1990 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Chris Torek.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37#if defined(LIBC_SCCS) && !defined(lint)
38/*static char *sccsid = "from: @(#)fopen.c 5.5 (Berkeley) 2/5/91";*/
39static char *rcsid = "$Id: fopen.c,v 1.15 1994/01/27 06:08:45 proven Exp $";
40#endif /* LIBC_SCCS and not lint */
41
42#include <pthread.h>
43#include <sys/types.h>
44#include <sys/stat.h>
45#include <fcntl.h>
46#include <stdio.h>
47#include <errno.h>
48#include "local.h"
49
50extern pthread_mutex_t __sfp_mutex;
51extern pthread_cond_t __sfp_cond;
52extern int __sfp_state;
53
54FILE *fopen(const char *file, const char *mode)
55{
56 register FILE *fp;
57 register int f;
58 int flags, oflags;
59
60 if ((flags = __sflags(mode, &oflags)) == 0)
61 return (NULL);
62 if ((f = open(file, oflags, 0666)) < 0) {
63 return (NULL);
64 }
65
66 pthread_once(&__sdidinit, __sinit);
67 pthread_mutex_lock(&__sfp_mutex);
68 while (__sfp_state) {
69 pthread_cond_wait(&__sfp_cond, &__sfp_mutex);
70 }
71
72 if (fp = __sfp()) {
73 fp->_file = f;
74 fp->_flags = flags;
75
76 /*
77 * When opening in append mode, even though we use O_APPEND,
78 * we need to seek to the end so that ftell() gets the right
79 * answer. If the user then alters the seek pointer, or
80 * the file extends, this will fail, but there is not much
81 * we can do about this. (We could set __SAPP and check in
82 * fseek and ftell.)
83 */
84 if (oflags & O_APPEND)
85 (void) __sseek((void *)fp, (fpos_t)0, SEEK_END);
86 }
87 pthread_mutex_unlock(&__sfp_mutex);
88 return (fp);
89}