Home | History | Annotate | Download | only in lib
      1 /* Formatted output to a stream.
      2    Copyright (C) 2004, 2006-2012 Free Software Foundation, Inc.
      3 
      4    This program is free software: you can redistribute it and/or modify
      5    it under the terms of the GNU General Public License as published by
      6    the Free Software Foundation; either version 3 of the License, or
      7    (at your option) any later version.
      8 
      9    This program is distributed in the hope that it will be useful,
     10    but WITHOUT ANY WARRANTY; without even the implied warranty of
     11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     12    GNU General Public License for more details.
     13 
     14    You should have received a copy of the GNU General Public License
     15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
     16 
     17 #if 1
     18 # include <config.h>
     19 #endif
     20 
     21 /* Specification.  */
     22 #include <stdio.h>
     23 
     24 #include <errno.h>
     25 #include <limits.h>
     26 #include <stdarg.h>
     27 #include <stdlib.h>
     28 
     29 #include "fseterr.h"
     30 #include "vasnprintf.h"
     31 
     32 /* Print formatted output to the stream FP.
     33    Return string length of formatted string.  On error, return a negative
     34    value.  */
     35 int
     36 vfprintf (FILE *fp, const char *format, va_list args)
     37 {
     38   char buf[2000];
     39   char *output;
     40   size_t len;
     41   size_t lenbuf = sizeof (buf);
     42 
     43   output = vasnprintf (buf, &lenbuf, format, args);
     44   len = lenbuf;
     45 
     46   if (!output)
     47     {
     48       fseterr (fp);
     49       return -1;
     50     }
     51 
     52   if (fwrite (output, 1, len, fp) < len)
     53     {
     54       if (output != buf)
     55         {
     56           int saved_errno = errno;
     57           free (output);
     58           errno = saved_errno;
     59         }
     60       return -1;
     61     }
     62 
     63   if (output != buf)
     64     free (output);
     65 
     66   if (len > INT_MAX)
     67     {
     68       errno = EOVERFLOW;
     69       fseterr (fp);
     70       return -1;
     71     }
     72 
     73   return len;
     74 }
     75