43 lines
971 B
C
43 lines
971 B
C
/*
|
|
* 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);
|
|
}
|
|
}
|
|
}
|