/*
 * This version writes directly to the buffer rather than looping on putc.
 * Ptr args aren't checked for NULL because the program would be a
 * catastrophic mess anyway.  Better to abort than just to return NULL.
 */
#include <stdio.h>
#include "stdiom.h"

extern char *memccpy();

int
fputs(ptr, iop)
char *ptr;
register FILE *iop;
{
	register int ndone = 0, n;
	register unsigned char *cptr, *bufend;
	char *p;

	if (_WRTCHK(iop))
		return (0);
	bufend = _bufend(iop);

	for ( ; ; ptr += n) {
		while ((n = bufend - (cptr = iop->_ptr)) <= 0)  /* full buf */
			if (_xflsbuf(iop) == EOF)
				return(EOF);
		if ((p = memccpy((char *) cptr, ptr, '\0', n)) != NULL)
			n = (p - (char *) cptr) - 1;
		iop->_cnt -= n;
		iop->_ptr += n;
		_BUFSYNC(iop);
		ndone += n;
		if (p != NULL)  { /* done; flush buffer if "unbuffered" or if
				     line-buffered */
			if (iop->_flag & (_IONBF | _IOLBF))
				if (_xflsbuf(iop) == EOF)
					return(EOF);
			return(ndone);
		}
	}
}