ReactOS  0.4.13-dev-39-g8b6696f
rtime.c
Go to the documentation of this file.
1 /*
2  * Copyright (c) 2009, Sun Microsystems, Inc.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions are met:
7  * - Redistributions of source code must retain the above copyright notice,
8  * this list of conditions and the following disclaimer.
9  * - Redistributions in binary form must reproduce the above copyright notice,
10  * this list of conditions and the following disclaimer in the documentation
11  * and/or other materials provided with the distribution.
12  * - Neither the name of Sun Microsystems, Inc. nor the names of its
13  * contributors may be used to endorse or promote products derived
14  * from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
20  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26  * POSSIBILITY OF SUCH DAMAGE.
27  */
28 
29 /*
30  * Copyright (c) 1988 by Sun Microsystems, Inc.
31 
32  */
33 
34 /*
35  * rtime - get time from remote machine
36  *
37  * gets time, obtaining value from host
38  * on the udp/time socket. Since timeserver returns
39  * with time of day in seconds since Jan 1, 1900, must
40  * subtract seconds before Jan 1, 1970 to get
41  * what unix uses.
42  */
43 #include <wintirpc.h>
44 //#include <pthread.h>
45 #include <stdlib.h>
46 #include <string.h>
47 //#include <unistd.h>
48 #include <errno.h>
49 #include <sys/types.h>
50 //#include <sys/socket.h>
51 //#include <sys/time.h>
52 //#include <netinet/in.h>
53 #include <stdio.h>
54 //#include <netdb.h>
55 //#include <sys/select.h>
56 
57 extern int _rpc_dtablesize( void );
58 
59 #define NYEARS (unsigned long)(1970 - 1900)
60 #define TOFFSET (unsigned long)(60*60*24*(365*NYEARS + (NYEARS/4)))
61 
62 #ifndef __REACTOS__
63 static void do_close( SOCKET );
64 #else
65 static void do_close( int );
66 #endif
67 
68 int
69 rtime(addrp, timep, timeout)
70  struct sockaddr_in *addrp;
71  struct timeval *timep;
72  struct timeval *timeout;
73 {
74  SOCKET s;
75  fd_set readfds;
76  int res;
77  unsigned long thetime;
78  struct sockaddr_in from;
79  int fromlen;
80  int type;
81  struct servent *serv;
82 
83  if (timeout == NULL) {
84  type = SOCK_STREAM;
85  } else {
86  type = SOCK_DGRAM;
87  }
88  s = socket(AF_INET, type, 0);
89  if (s == INVALID_SOCKET) {
90  return(-1);
91  }
92  addrp->sin_family = AF_INET;
93 
94  /* TCP and UDP port are the same in this case */
95  if ((serv = getservbyname("time", "tcp")) == NULL) {
96  return(-1);
97  }
98 
99  addrp->sin_port = serv->s_port;
100 
101  if (type == SOCK_DGRAM) {
102  res = sendto(s, (char *)&thetime, sizeof(thetime), 0,
103  (struct sockaddr *)addrp, sizeof(*addrp));
104  if (res == SOCKET_ERROR) {
105  do_close(s);
106  return(-1);
107  }
108  do {
109  FD_ZERO(&readfds);
110  FD_SET(s, &readfds);
111  res = select(_rpc_dtablesize(), &readfds,
112  (fd_set *)NULL, (fd_set *)NULL, timeout);
113  } while (res == SOCKET_ERROR && WSAGetLastError() == WSAEINTR);
114  if (res == 0 || res == SOCKET_ERROR) {
115  if (res == 0) {
117  }
118  do_close(s);
119  return(-1);
120  }
121  fromlen = sizeof(from);
122  res = recvfrom(s, (char *)&thetime, sizeof(thetime), 0,
123  (struct sockaddr *)&from, &fromlen);
124  do_close(s);
125  if (res == SOCKET_ERROR) {
126  return(-1);
127  }
128  } else {
129  if (connect(s, (struct sockaddr *)addrp, sizeof(*addrp)) == SOCKET_ERROR) {
130  do_close(s);
131  return(-1);
132  }
133  res = recv(s, (char *)&thetime, sizeof(thetime), 0);
134  do_close(s);
135  if (res == SOCKET_ERROR) {
136  return(-1);
137  }
138  }
139  if (res != sizeof(thetime)) {
140  errno = EIO;
141  return(-1);
142  }
143  thetime = ntohl(thetime);
144  timep->tv_sec = thetime - TOFFSET;
145  timep->tv_usec = 0;
146  return(0);
147 }
148 
149 static void
151  int s;
152 {
153  int save;
154 
155  save = errno;
156  (void)closesocket(s);
157  errno = save;
158 }
Definition: winsock.h:66
#define SOCKET_ERROR
Definition: winsock.h:333
INT WSAAPI recvfrom(IN SOCKET s, OUT CHAR FAR *buf, IN INT len, IN INT flags, OUT LPSOCKADDR from, IN OUT INT FAR *fromlen)
Definition: recv.c:87
struct png_info_def **typedef void(__cdecl typeof(png_destroy_read_struct))(struct png_struct_def **
Definition: typeof.h:49
SOCKET WSAAPI socket(IN INT af, IN INT type, IN INT protocol)
Definition: socklife.c:143
u_short sin_port
Definition: winsock.h:511
unsigned long tv_sec
Definition: linux.h:1738
GLuint GLuint GLsizei GLenum type
Definition: gl.h:1545
Definition: dhcpd.h:245
int errno
#define FD_ZERO(set)
Definition: winsock.h:96
#define FD_SET(fd, set)
Definition: winsock.h:89
INT WSAAPI connect(IN SOCKET s, IN CONST struct sockaddr *name, IN INT namelen)
Definition: sockctrl.c:23
GLbitfield GLuint64 timeout
Definition: glext.h:7164
#define TOFFSET
Definition: rtime.c:60
#define closesocket
Definition: main.c:39
INT WSAAPI select(IN INT s, IN OUT LPFD_SET readfds, IN OUT LPFD_SET writefds, IN OUT LPFD_SET exceptfds, IN CONST struct timeval *timeout)
Definition: select.c:41
static void do_close(SOCKET)
smooth NULL
Definition: ftsmooth.c:416
unsigned long tv_usec
Definition: linux.h:1739
#define WSAETIMEDOUT
Definition: winerror.h:1973
INT WSAAPI WSAGetLastError(VOID)
Definition: dllmain.c:112
PSERVENT WSAAPI getservbyname(IN const char FAR *name, IN const char FAR *proto)
Definition: getxbyxx.c:500
#define INVALID_SOCKET
Definition: winsock.h:332
GLdouble s
Definition: gl.h:2039
int rtime(struct sockaddr_in *addrp, struct timeval *timep, struct timeval *timeout)
Definition: rtime.c:69
short s_port
Definition: winsock.h:165
Definition: arc.h:40
INT WSAAPI sendto(IN SOCKET s, IN CONST CHAR FAR *buf, IN INT len, IN INT flags, IN CONST struct sockaddr *to, IN INT tolen)
Definition: send.c:82
GLuint res
Definition: glext.h:9613
#define AF_INET
Definition: tcpip.h:117
UINT_PTR SOCKET
Definition: winsock.h:47
#define SOCK_STREAM
Definition: tcpip.h:118
CardRegion * from
Definition: spigame.cpp:19
#define SOCK_DGRAM
Definition: winsock.h:336
int _rpc_dtablesize(void)
INT WSAAPI recv(IN SOCKET s, OUT CHAR FAR *buf, IN INT len, IN INT flags)
Definition: recv.c:23
short sin_family
Definition: winsock.h:510
#define WSAEINTR
Definition: winerror.h:1942
#define ntohl(x)
Definition: module.h:203