[thirdparty/bash.git] / lib / sh / vprint.c

/* vprint.c -- v[fs]printf() for 4.[23] BSD systems. */

/* Copyright (C) 1987,1989 Free Software Foundation, Inc.

   This file is part of GNU Bash, the Bourne Again SHell.

   Bash is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation, either version 3 of the License, or
   (at your option) any later version.

   Bash is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with Bash.  If not, see <http://www.gnu.org/licenses/>.
*/

#include <config.h>

#if defined (USE_VFPRINTF_EMULATION)

#include <stdio.h>

#if !defined (NULL)
#  if defined (__STDC__)
#    define NULL ((void *)0)
#  else
#    define NULL 0x0
#  endif /* __STDC__ */
#endif /* !NULL */

/*
 * Beware!  Don't trust the value returned by either of these functions; it
 * seems that pre-4.3-tahoe implementations of _doprnt () return the first
 * argument, i.e. a char *.
 */
#include <varargs.h>

int
vfprintf (iop, fmt, ap)
     FILE *iop;
     char *fmt;
     va_list ap;
{
  int len;
  char localbuf[BUFSIZ];

  if (iop->_flag & _IONBF)
    {
      iop->_flag &= ~_IONBF;
      iop->_ptr = iop->_base = localbuf;
      len = _doprnt (fmt, ap, iop);
      (void) fflush (iop);
      iop->_flag |= _IONBF;
      iop->_base = NULL;
      iop->_bufsiz = 0;
      iop->_cnt = 0;
    }
  else
    len = _doprnt (fmt, ap, iop);
  return (ferror (iop) ? EOF : len);
}

/*
 * Ditto for vsprintf
 */
int
vsprintf (str, fmt, ap)
     char *str, *fmt;
     va_list ap;
{
  FILE f;
  int len;

  f._flag = _IOWRT|_IOSTRG;
  f._ptr = str;
  f._cnt = 32767;
  len = _doprnt (fmt, ap, &f);
  *f._ptr = 0;
  return (len);
}
#endif /* USE_VFPRINTF_EMULATION */
Commit	Line	Data
	1	/* vprint.c -- v[fs]printf() for 4.[23] BSD systems. */
	2
	3	/* Copyright (C) 1987,1989 Free Software Foundation, Inc.
	4
	5	This file is part of GNU Bash, the Bourne Again SHell.
	6
	7	Bash is free software: you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as published by
	9	the Free Software Foundation, either version 3 of the License, or
	10	(at your option) any later version.
	11
	12	Bash is distributed in the hope that it will be useful,
	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with Bash. If not, see <http://www.gnu.org/licenses/>.
	19	*/
	20
	21	#include <config.h>
	22
	23	#if defined (USE_VFPRINTF_EMULATION)
	24
	25	#include <stdio.h>
	26
	27	#if !defined (NULL)
	28	# if defined (__STDC__)
	29	# define NULL ((void *)0)
	30	# else
	31	# define NULL 0x0
	32	# endif /* __STDC__ */
	33	#endif /* !NULL */
	34
	35	/*
	36	* Beware! Don't trust the value returned by either of these functions; it
	37	* seems that pre-4.3-tahoe implementations of _doprnt () return the first
	38	* argument, i.e. a char *.
	39	*/
	40	#include <varargs.h>
	41
	42	int
	43	vfprintf (iop, fmt, ap)
	44	FILE *iop;
	45	char *fmt;
	46	va_list ap;
	47	{
	48	int len;
	49	char localbuf[BUFSIZ];
	50
	51	if (iop->_flag & _IONBF)
	52	{
	53	iop->_flag &= ~_IONBF;
	54	iop->_ptr = iop->_base = localbuf;
	55	len = _doprnt (fmt, ap, iop);
	56	(void) fflush (iop);
	57	iop->_flag \|= _IONBF;
	58	iop->_base = NULL;
	59	iop->_bufsiz = 0;
	60	iop->_cnt = 0;
	61	}
	62	else
	63	len = _doprnt (fmt, ap, iop);
	64	return (ferror (iop) ? EOF : len);
	65	}
	66
	67	/*
	68	* Ditto for vsprintf
	69	*/
	70	int
	71	vsprintf (str, fmt, ap)
	72	char str, fmt;
	73	va_list ap;
	74	{
	75	FILE f;
	76	int len;
	77
	78	f._flag = _IOWRT\|_IOSTRG;
	79	f._ptr = str;
	80	f._cnt = 32767;
	81	len = _doprnt (fmt, ap, &f);
	82	*f._ptr = 0;
	83	return (len);
	84	}
	85	#endif /* USE_VFPRINTF_EMULATION */