usr/src/lib/libc/port/print/vfprintf.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21
  22 /*
  23  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
  24  * Use is subject to license terms.
  25  */
  26
  27 /*      Copyright (c) 1988 AT&T */
  28 /*        All Rights Reserved   */
  29
  30 #pragma ident   "%Z%%M% %I%     %E% SMI"
  31
  32 #include "lint.h"
  33 #include <thread.h>
  34 #include <mtlib.h>
  35 #include <synch.h>
  36 #include <stdarg.h>
  37 #include <values.h>
  38 #include <errno.h>
  39 #include <sys/types.h>
  40 #include "print.h"
  41 #include "libc.h"
  42 #include "mse.h"
  43
  44 /*
  45  * 32-bit shadow function of vfprintf() is included here.
  46  * When using the c89 compiler to build 32-bit applications, the size
  47  * of intmax_t is 32-bits, otherwise the size of intmax_t is 64-bits.
  48  * The shadow function uses 32-bit size of intmax_t for %j conversion.
  49  * The #pragma redefine_extname in <stdio.h> selects the proper routine
  50  * at compile time for the user application.
  51  * NOTE: this function is only available in the 32-bit library.
  52  */
  53
  54 /*VARARGS2*/
  55 int
  56 #ifdef _C89_INTMAX32    /* _C89_INTMAX32 version in 32-bit libc only */
  57 _vfprintf_c89(FILE *iop, const char *format, va_list ap)
  58 #else
  59 vfprintf(FILE *iop, const char *format, va_list ap)
  60 #endif
  61 {
  62         ssize_t count;
  63         rmutex_t *lk;
  64
  65         /* Use F*LOCKFILE() macros because vfprintf() is not async-safe. */
  66         FLOCKFILE(lk, iop);
  67
  68         _SET_ORIENTATION_BYTE(iop);
  69
  70         if (!(iop->_flag & _IOWRT)) {
  71                 /* if no write flag */
  72                 if (iop->_flag & _IORW) {
  73                         /* if ok, cause read-write */
  74                         iop->_flag |= _IOWRT;
  75                 } else {
  76                         /* else error */
  77                         FUNLOCKFILE(lk);
  78                         errno = EBADF;
  79                         return (EOF);
  80                 }
  81         }
  82 #ifdef _C89_INTMAX32
  83         count = _ndoprnt(format, ap, iop, _F_INTMAX32);
  84 #else
  85         count = _ndoprnt(format, ap, iop, 0);
  86 #endif
  87
  88         /* check for error or EOF */
  89         if (FERROR(iop) || count == EOF) {
  90                 FUNLOCKFILE(lk);
  91                 return (EOF);
  92         }
  93
  94         FUNLOCKFILE(lk);
  95
  96         /* check for overflow */
  97         if ((size_t)count > MAXINT) {
  98                 errno = EOVERFLOW;
  99                 return (EOF);
 100         } else {
 101                 return ((int)count);
 102         }
 103 }