vfprintf.c
上传用户:nvosite88
上传日期:2007-01-17
资源大小:4983k
文件大小:5k
源码类别:

VxWorks

开发平台:

C/C++

  1. /* vfprintf.c - print to a file. stdio.h */
  2. /* Copyright 1992-1993 Wind River Systems, Inc. */
  3. /*
  4. modification history
  5. --------------------
  6. 01c,05mar93,jdi  documentation cleanup for 5.1.
  7. 01b,20sep92,smb  documentation additions
  8. 01a,29jul92,jcf  Added OBJ_VERIFY, use fioFormatV()
  9.    +smb  taken from UCB stdio
  10. */
  11. /*
  12. DESCRIPTION
  13.  * Copyright (c) 1990 The Regents of the University of California.
  14.  * All rights reserved.
  15.  *
  16.  * This code is derived from software contributed to Berkeley by
  17.  * Chris Torek.
  18.  *
  19.  * Redistribution and use in source and binary forms, with or without
  20.  * modification, are permitted provided that the following conditions
  21.  * are met:
  22.  * 1. Redistributions of source code must retain the above copyright
  23.  *    notice, this list of conditions and the following disclaimer.
  24.  * 2. Redistributions in binary form must reproduce the above copyright
  25.  *    notice, this list of conditions and the following disclaimer in the
  26.  *    documentation and/or other materials provided with the distribution.
  27.  * 3. All advertising materials mentioning features or use of this software
  28.  *    must display the following acknowledgement:
  29.  * This product includes software developed by the University of
  30.  * California, Berkeley and its contributors.
  31.  * 4. Neither the name of the University nor the names of its contributors
  32.  *    may be used to endorse or promote products derived from this software
  33.  *    without specific prior written permission.
  34.  *
  35.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  36.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  37.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  38.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  39.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  40.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  41.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  42.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  43.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  44.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  45.  * SUCH DAMAGE.
  46. INCLUDE FILE: stdio.h, stdarg.h
  47. SEE ALSO: American National Standard X3.159-1989
  48. NOMANUAL
  49. */
  50. #include "vxWorks.h"
  51. #include "stdarg.h"
  52. #include "fioLib.h"
  53. #include "objLib.h"
  54. #include "private/stdioP.h"
  55. /* forward declarations */
  56. LOCAL STATUS putbuf (char *buffer, int nbytes, FILE *fp);
  57. /*******************************************************************************
  58. *
  59. * vfprintf - write a formatted string to a stream (ANSI)
  60. *
  61. * This routine is equivalent to fprintf(), except that it takes the variable
  62. * arguments to be formatted from a list <vaList> of type `va_list' rather
  63. * than from in-line arguments.
  64. *
  65. * INCLUDE FILES: stdio.h 
  66. *
  67. * RETURNS:
  68. * The number of characters written, or a negative value if an
  69. * output error occurs.
  70. *
  71. * SEE ALSO: fprintf()
  72. */
  73. int vfprintf
  74.     (
  75.     FILE *   fp, /* stream to write to */
  76.     const char *  fmt, /* format string */
  77.     va_list       vaList /* arguments to format string */
  78.     )
  79.     {
  80.     uchar_t localbuf[BUFSIZE];
  81.     int     ret;
  82.     FILE    fake;
  83.     if (OBJ_VERIFY (fp, fpClassId) != OK)
  84. return (EOF);
  85.     if (cantwrite (fp))
  86. return (EOF);
  87.     if ((fp->_flags & (__SNBF|__SWR|__SRW)) == (__SNBF|__SWR) && fp->_file >= 0)
  88. {
  89. /* 
  90.  * This optimizes an fprintf to unbuffered unix file by creating a
  91.  * temporary buffer.  This avoids worries about ungetc buffers and
  92.  * so forth.  It is particularly useful for stderr.
  93.  */
  94. fake._flags  = fp->_flags & ~__SNBF; /* turn on buffering */
  95. fake._file   = fp->_file; /* store fd */
  96. fake._bf._base = fake._p = localbuf; /* set up the buffer */
  97. fake._bf._size = fake._w = sizeof(localbuf); /* initialize size */
  98. fake._lbfsize = 0; /* init to be safe */
  99. fake._r = 0; /* init to be safe */
  100. fake._ub._base = NULL; /* init to be safe */
  101. fake._ub._size = 0; /* init to be safe */
  102. fake._lb._base = NULL; /* init to be safe */
  103. fake._lb._size = 0; /* init to be safe */
  104. objCoreInit (&fake.objCore, fpClassId); /* validate fake fp */
  105.         ret = fioFormatV (fmt, vaList, putbuf, (int) &fake);
  106. if ((ret >= 0) && fflush (&fake))
  107.     ret = EOF;
  108. if (fake._flags & __SERR)
  109.     fp->_flags |= __SERR;
  110. objCoreTerminate (&fake.objCore); /* invalidate fp */
  111. }
  112.     else
  113. {
  114. ret = fioFormatV (fmt, vaList, putbuf, (int) fp);
  115.      ret = (ferror (fp)) ? EOF : ret;
  116.         }
  117.     return (ret);
  118.     }
  119. /*******************************************************************************
  120. *
  121. * putbuf - put a buffer on an output stream
  122. * NOMANUAL
  123. */
  124. LOCAL STATUS putbuf
  125.     (
  126.     char * buffer,       /* source */
  127.     int    nbytes,       /* number of bytes in source */
  128.     FILE * fp            /* stream */
  129.     )
  130.     {
  131.     FAST int ix;
  132.     for (ix = 0; ix < nbytes; ix++)
  133. putc (buffer [ix], fp);
  134.     return (OK);
  135.     }