Return to _stropen.c CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libc / XSTDIO

coherent

/*
 * libc/stdio/_stropen.c
 * ANSI-compliant C standard i/o library internals.
 * _stropen()
 * Open string stream.
 * Called by sprintf(), sscanf(), vsprintf().
 */

#include <stdio.h>
#include <limits.h>

extern	int	_fputstr();

/* length is -1 for output to string, strlen(string) for input from string. */
FILE *
_stropen(string, length, fp) char *string; int length; register FILE *fp;
{
	register _FILE2 *f2p;

	f2p = fp->_f2p;
	f2p->_bp = fp->_cp = string;
	fp->_mode = _MODE_STR;
	if (length < 0) {
		fp->_ff1 |= _FWONLY;
		fp->_cc = INT_MAX;
		f2p->_pt = &_fputstr;
		f2p->_gt = &_fgete;
	} else {
		fp->_ff1 |= _FRONLY;
		fp->_cc = length;
		f2p->_pt = &_fpute;
		f2p->_gt = &_fgetstr;
	}
	return fp;
}

/*
 * _fputstr() is static;
 * _fgetstr() (in _fgetstr.c) is not, because it must be visible to ungetc().
 */
static
int
_fputstr(c, fp) int c; register FILE *fp;
{
	return (*fp->_cp++ = (unsigned char)c);
}

/* end of libc/stdio/_stropen.c */

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.