1 files changed, 118 insertions, 0 deletions
diff --git a/usr/src/lib/libc/port/print/fprintf.c b/usr/src/lib/libc/port/print/fprintf.c
new file mode 100644
index 0000000000..4cd86b66b4
--- /dev/null
+++ b/usr/src/lib/libc/port/print/fprintf.c
@@ -0,0 +1,118 @@
+/*
+ * CDDL HEADER START
+ *
+ * The contents of this file are subject to the terms of the
+ * Common Development and Distribution License, Version 1.0 only
+ * (the "License").  You may not use this file except in compliance
+ * with the License.
+ *
+ * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
+ * or http://www.opensolaris.org/os/licensing.
+ * See the License for the specific language governing permissions
+ * and limitations under the License.
+ *
+ * When distributing Covered Code, include this CDDL HEADER in each
+ * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
+ * If applicable, add the following below this CDDL HEADER, with the
+ * fields enclosed by brackets "[]" replaced with your own identifying
+ * information: Portions Copyright [yyyy] [name of copyright owner]
+ *
+ * CDDL HEADER END
+ */
+/*
+ * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
+ * Use is subject to license terms.
+ */
+
+#pragma ident	"%Z%%M%	%I%	%E% SMI"
+
+/*	Copyright (c) 1988 AT&T	*/
+/*	  All Rights Reserved  	*/
+
+
+/* This function should not be defined weak, but there might be */
+/* some program or libraries that may be interposing on this */
+#pragma weak fprintf = _fprintf
+
+#include "synonyms.h"
+#include <mtlib.h>
+#include <thread.h>
+#include <synch.h>
+#include <stdarg.h>
+#include <values.h>
+#include <errno.h>
+#include "print.h"
+#include <sys/types.h>
+#include "libc.h"
+#include "mse.h"
+
+/*VARARGS2*/
+int
+fprintf(FILE *iop, const char *format, ...)
+{
+	ssize_t count;
+	rmutex_t *lk;
+	va_list ap;
+
+	va_start(ap, format);
+
+	/* Use F*LOCKFILE() macros because fprintf() is not async-safe. */
+	FLOCKFILE(lk, iop);
+
+	_SET_ORIENTATION_BYTE(iop);
+
+	if (!(iop->_flag & _IOWRT)) {
+		/* if no write flag */
+		if (iop->_flag & _IORW) {
+			/* if ok, cause read-write */
+			iop->_flag |= _IOWRT;
+		} else {
+			/* else error */
+			FUNLOCKFILE(lk);
+			errno = EBADF;
+			return (EOF);
+		}
+	}
+	count = _ndoprnt(format, ap, iop, 0);
+
+	/* return EOF on error or EOF */
+	if (FERROR(iop) || count == EOF) {
+		FUNLOCKFILE(lk);
+		return (EOF);
+	}
+
+	FUNLOCKFILE(lk);
+
+	/* error on overflow */
+	if ((size_t)count > MAXINT) {
+		errno = EOVERFLOW;
+		return (EOF);
+	}
+	return ((int)count);
+}
+
+#ifndef _LP64
+
+/*
+ * 32-bit shadow function of fprintf().
+ * When using the c89 compiler to build 32-bit applications, the size
+ * of intmax_t is 32-bits, otherwise the size of intmax_t is 64-bits.
+ * The shadow function uses 32-bit size of intmax_t for %j conversion.
+ * The #pragma redefine_extname in <stdio.h> selects the proper routine
+ * at compile time for the user application.
+ * NOTE: this function only exists in the 32-bit library.
+ */
+
+int
+_fprintf_c89(FILE *iop, const char *format, ...)
+{
+	ssize_t count;
+	va_list ap;
+
+	va_start(ap, format);
+	count = _vfprintf_c89(iop, format, ap);
+	va_end(ap);
+	return ((int)count);
+}
+
+#endif  /* _LP64 */