Return to netwrite.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / kerberosIV / krb

Annotation of 43BSDReno/kerberosIV/krb/netwrite.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * $Source: /mit/kerberos/src/lib/krb/RCS/netwrite.c,v $
                      3:  * $Author: jtkohl $
                      4:  *
                      5:  * Copyright 1987, 1988 by the Massachusetts Institute of Technology.
                      6:  *
                      7:  * For copying and distribution information, please see the file
                      8:  * <mit-copyright.h>.
                      9:  */
                     10: 
                     11: #ifndef        lint
                     12: static char rcsid_netwrite_c[] =
                     13: "$Header: netwrite.c,v 4.1 88/11/15 16:48:58 jtkohl Exp $";
                     14: #endif lint
                     15: 
                     16: #include <mit-copyright.h>
                     17: 
                     18: /*
                     19:  * krb_net_write() writes "len" bytes from "buf" to the file
                     20:  * descriptor "fd".  It returns the number of bytes written or
                     21:  * a write() error.  (The calling interface is identical to
                     22:  * write(2).)
                     23:  *
                     24:  * XXX must not use non-blocking I/O
                     25:  */
                     26: 
                     27: int
                     28: krb_net_write(fd, buf, len)
                     29: int fd;
                     30: register char *buf;
                     31: int len;
                     32: {
                     33:     int cc;
                     34:     register int wrlen = len;
                     35:     do {
                     36:        cc = write(fd, buf, wrlen);
                     37:        if (cc < 0)
                     38:            return(cc);
                     39:        else {
                     40:            buf += cc;
                     41:            wrlen -= cc;
                     42:        }
                     43:     } while (wrlen > 0);
                     44:     return(len);
                     45: }

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