Changed errno to SOCKET_ERRNO/SOCKET_SET_ERRNO for Mac OT SocketsLib
[krb5.git] / src / lib / krb5 / os / net_read.c
1 /*
2  * lib/krb5/os/net_read.c
3  *
4  * Copyright 1987, 1988, 1990 by the Massachusetts Institute of Technology.
5  * All Rights Reserved.
6  *
7  * Export of this software from the United States of America may
8  *   require a specific license from the United States Government.
9  *   It is the responsibility of any person or organization contemplating
10  *   export to obtain such a license before exporting.
11  * 
12  * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
13  * distribute this software and its documentation for any purpose and
14  * without fee is hereby granted, provided that the above copyright
15  * notice appear in all copies and that both that copyright notice and
16  * this permission notice appear in supporting documentation, and that
17  * the name of M.I.T. not be used in advertising or publicity pertaining
18  * to distribution of the software without specific, written prior
19  * permission.  M.I.T. makes no representations about the suitability of
20  * this software for any purpose.  It is provided "as is" without express
21  * or implied warranty.
22  * 
23  */
24
25 #define NEED_LOWLEVEL_IO
26 #define NEED_SOCKETS
27 #include "k5-int.h"
28
29 /*
30  * krb5_net_read() reads from the file descriptor "fd" to the buffer
31  * "buf", until either 1) "len" bytes have been read or 2) cannot
32  * read anymore from "fd".  It returns the number of bytes read
33  * or a read() error.  (The calling interface is identical to
34  * read(2).)
35  *
36  * XXX must not use non-blocking I/O
37  */
38
39 int
40 krb5_net_read(context, fd, buf, len)
41     krb5_context context;
42     int fd;
43     register char *buf;
44     register int len;
45 {
46     int cc, len2 = 0;
47
48     do {
49         cc = SOCKET_READ((SOCKET)fd, buf, len);
50         if (cc < 0) {
51             if (SOCKET_ERRNO == SOCKET_EINTR)
52                 continue;
53                 
54                 /* XXX this interface sucks! */
55         errno = SOCKET_ERRNO;    
56                
57             return(cc);          /* errno is already set */
58         }               
59         else if (cc == 0) {
60             return(len2);
61         } else {
62             buf += cc;
63             len2 += cc;
64             len -= cc;
65         }
66     } while (len > 0);
67     return(len2);
68 }