freebsd-src/eBones/lib/libkrb/netwrite.c
1997-02-22 14:40:44 +00:00

47 lines
839 B
C

/*
* Copyright 1987, 1988 by the Massachusetts Institute of Technology.
* For copying and distribution information, please see the file
* <Copyright.MIT>.
*
* from: netwrite.c,v 4.1 88/11/15 16:48:58 jtkohl Exp $";
* $Id$
*/
#if 0
#ifndef lint
static char rcsid[] =
"$Id$";
#endif lint
#endif
#include <unistd.h>
/*
* krb_net_write() writes "len" bytes from "buf" to the file
* descriptor "fd". It returns the number of bytes written or
* a write() error. (The calling interface is identical to
* write(2).)
*
* XXX must not use non-blocking I/O
*/
int
krb_net_write(fd, buf, len)
int fd;
register char *buf;
int len;
{
int cc;
register int wrlen = len;
do {
cc = write(fd, buf, wrlen);
if (cc < 0)
return(cc);
else {
buf += cc;
wrlen -= cc;
}
} while (wrlen > 0);
return(len);
}