Loading...
stdio/FreeBSD/freopen.c Libc-1725.40.4 Libc-320
--- Libc/Libc-1725.40.4/stdio/FreeBSD/freopen.c
+++ Libc/Libc-320/stdio/FreeBSD/freopen.c
@@ -13,6 +13,10 @@
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *	This product includes software developed by the University of
+ *	California, Berkeley and its contributors.
  * 4. Neither the name of the University nor the names of its contributors
  *    may be used to endorse or promote products derived from this software
  *    without specific prior written permission.
@@ -34,21 +38,19 @@
 static char sccsid[] = "@(#)freopen.c	8.1 (Berkeley) 6/4/93";
 #endif /* LIBC_SCCS and not lint */
 #include <sys/cdefs.h>
-__FBSDID("$FreeBSD: src/lib/libc/stdio/freopen.c,v 1.21 2008/04/17 22:17:54 jhb Exp $");
+__FBSDID("$FreeBSD: src/lib/libc/stdio/freopen.c,v 1.12 2003/01/26 11:45:54 tjr Exp $");
 
 #include "namespace.h"
 #include <sys/types.h>
 #include <sys/stat.h>
 #include <fcntl.h>
 #include <errno.h>
-#include <limits.h>
 #include <unistd.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include "un-namespace.h"
 #include "libc_private.h"
 #include "local.h"
-#include "libc_hooks_impl.h"
 
 /*
  * Re-direct an existing, open (probably) file to some other file.
@@ -56,25 +58,23 @@
  * all possible, no matter what.
  */
 FILE *
-freopen(const char * __restrict file, const char * __restrict mode, FILE *fp)
+freopen(file, mode, fp)
+	const char * __restrict file;
+	const char * __restrict mode;
+	FILE *fp;
 {
 	int f;
 	int dflags, flags, isopen, oflags, sverrno, wantfd;
 
-	libc_hooks_will_read_cstring(file);
-	libc_hooks_will_read_cstring(mode);
-	libc_hooks_will_write(fp, sizeof(*fp));
-
 	if ((flags = __sflags(mode, &oflags)) == 0) {
-		sverrno = errno;
 		(void) fclose(fp);
-		errno = sverrno;
 		return (NULL);
 	}
 
-	pthread_once(&__sdidinit, __sinit);
-	
 	FLOCKFILE(fp);
+
+	if (!__sdidinit)
+		__sinit();
 
 	/*
 	 * If the filename is a NULL pointer, the caller is asking us to
@@ -99,11 +99,9 @@
 		    (oflags & O_ACCMODE)) {
 			fclose(fp);
 			FUNLOCKFILE(fp);
-			errno = EBADF;
-			return (NULL);
-		}
-		if (fp->_flags & __SWR)
-			(void) __sflush(fp);
+			errno = EINVAL;
+			return (NULL);
+		}
 		if ((oflags ^ dflags) & O_APPEND) {
 			dflags &= ~O_APPEND;
 			dflags |= oflags & O_APPEND;
@@ -116,9 +114,15 @@
 			}
 		}
 		if (oflags & O_TRUNC)
-			(void) ftruncate(fp->_file, (off_t)0);
-		if (!(oflags & O_APPEND))
-			(void) _sseek(fp, (fpos_t)0, SEEK_SET);
+			ftruncate(fp->_file, 0);
+		if (_fseeko(fp, 0, oflags & O_APPEND ? SEEK_END : SEEK_SET,
+		    0) < 0 && errno != ESPIPE) {
+			sverrno = errno;
+			fclose(fp);
+			FUNLOCKFILE(fp);
+			errno = sverrno;
+			return (NULL);
+		}
 		f = fp->_file;
 		isopen = 0;
 		wantfd = -1;
@@ -132,8 +136,6 @@
 	 * descriptor (if any) was associated with it.  If it was attached to
 	 * a descriptor, defer closing it; freopen("/dev/stdin", "r", stdin)
 	 * should work.  This is unnecessary if it was not a Unix file.
-	 *
-	 * For UNIX03, we always close if it was open.
 	 */
 	if (fp->_flags == 0) {
 		fp->_flags = __SEOF;	/* hold on to it */
@@ -144,18 +146,11 @@
 		if (fp->_flags & __SWR)
 			(void) __sflush(fp);
 		/* if close is NULL, closing is a no-op, hence pointless */
-#if __DARWIN_UNIX03
-		if (fp->_close)
-			(void) (*fp->_close)(fp->_cookie);
-		isopen = 0;
-		wantfd = -1;
-#else /* !__DARWIN_UNIX03 */
 		isopen = fp->_close != NULL;
 		if ((wantfd = fp->_file) < 0 && isopen) {
 			(void) (*fp->_close)(fp->_cookie);
 			isopen = 0;
 		}
-#endif /* __DARWIN_UNIX03 */
 	}
 
 	/* Get a new descriptor to refer to the new file. */
@@ -192,13 +187,12 @@
 	if (HASLB(fp))
 		FREELB(fp);
 	fp->_lb._size = 0;
-	fp->_orientation = 0;
-	memset(&fp->_mbstate, 0, sizeof(mbstate_t));
+	fp->_extra->orientation = 0;
 
 	if (f < 0) {			/* did not get it after all */
+		fp->_flags = 0;		/* set it free */
+		errno = sverrno;	/* restore in case _close clobbered */
 		FUNLOCKFILE(fp);
-		__sfprelease(fp);	/* set it free */
-		errno = sverrno;	/* restore in case _close clobbered */
 		return (NULL);
 	}
 
@@ -212,20 +206,6 @@
 			(void)_close(f);
 			f = wantfd;
 		}
-	}
-
-	/*
-	 * File descriptors are a full int, but _file is only a short.
-	 * If we get a valid file descriptor that is greater than
-	 * SHRT_MAX, then the fd will get sign-extended into an
-	 * invalid file descriptor.  Handle this case by failing the
-	 * open.
-	 */
-	if (f > SHRT_MAX) {
-		FUNLOCKFILE(fp);
-		__sfprelease(fp);	/* set it free */
-		errno = EMFILE;
-		return (NULL);
 	}
 
 	fp->_flags = flags;
@@ -235,16 +215,6 @@
 	fp->_write = __swrite;
 	fp->_seek = __sseek;
 	fp->_close = __sclose;
-	/*
-	 * When opening in append mode, even though we use O_APPEND,
-	 * we need to seek to the end so that ftell() gets the right
-	 * answer.  If the user then alters the seek pointer, or
-	 * the file extends, this will fail, but there is not much
-	 * we can do about this.  (We could set __SAPP and check in
-	 * fseek and ftell.)
-	 */
-	if (oflags & O_APPEND)
-		(void) _sseek(fp, (fpos_t)0, SEEK_END);
 	FUNLOCKFILE(fp);
 	return (fp);
 }