rtime.c 3.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149
  1. /*
  2. * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
  3. * unrestricted use provided that this legend is included on all tape
  4. * media and as a part of the software program in whole or part. Users
  5. * may copy or modify Sun RPC without charge, but are not authorized
  6. * to license or distribute it to anyone else except as part of a product or
  7. * program developed by the user.
  8. *
  9. * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
  10. * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
  11. * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
  12. *
  13. * Sun RPC is provided with no support and without any obligation on the
  14. * part of Sun Microsystems, Inc. to assist in its use, correction,
  15. * modification or enhancement.
  16. *
  17. * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
  18. * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
  19. * OR ANY PART THEREOF.
  20. *
  21. * In no event will Sun Microsystems, Inc. be liable for any lost revenue
  22. * or profits or other special, indirect and consequential damages, even if
  23. * Sun has been advised of the possibility of such damages.
  24. *
  25. * Sun Microsystems, Inc.
  26. * 2550 Garcia Avenue
  27. * Mountain View, California 94043
  28. */
  29. #if 0
  30. static char sccsid[] = "@(#)rtime.c 2.2 88/08/10 4.0 RPCSRC; from 1.8 88/02/08 SMI";
  31. #endif
  32. /*
  33. * Copyright (c) 1988 by Sun Microsystems, Inc.
  34. */
  35. /*
  36. * rtime - get time from remote machine
  37. *
  38. * gets time, obtaining value from host
  39. * on the udp/time socket. Since timeserver returns
  40. * with time of day in seconds since Jan 1, 1900, must
  41. * subtract seconds before Jan 1, 1970 to get
  42. * what unix uses.
  43. */
  44. #define __FORCE_GLIBC
  45. #include <features.h>
  46. #include <stdio.h>
  47. #include <unistd.h>
  48. #include <rpc/rpc.h>
  49. #include <rpc/clnt.h>
  50. #include <sys/types.h>
  51. #include <sys/poll.h>
  52. #include <sys/socket.h>
  53. #include <sys/time.h>
  54. #include <rpc/auth_des.h>
  55. #include <errno.h>
  56. #include <netinet/in.h>
  57. #define NYEARS (u_long)(1970 - 1900)
  58. #define TOFFSET (u_long)(60*60*24*(365*NYEARS + (NYEARS/4)))
  59. static void do_close (int);
  60. static void
  61. do_close (int s)
  62. {
  63. int save;
  64. save = errno;
  65. __close (s);
  66. __set_errno (save);
  67. }
  68. int
  69. rtime (struct sockaddr_in *addrp, struct rpc_timeval *timep,
  70. struct rpc_timeval *timeout)
  71. {
  72. int s;
  73. struct pollfd fd;
  74. int milliseconds;
  75. int res;
  76. unsigned long thetime;
  77. struct sockaddr_in from;
  78. int fromlen;
  79. int type;
  80. if (timeout == NULL)
  81. type = SOCK_STREAM;
  82. else
  83. type = SOCK_DGRAM;
  84. s = socket (AF_INET, type, 0);
  85. if (s < 0)
  86. return (-1);
  87. addrp->sin_family = AF_INET;
  88. addrp->sin_port = htons (IPPORT_TIMESERVER);
  89. if (type == SOCK_DGRAM)
  90. {
  91. res = sendto (s, (char *) &thetime, sizeof (thetime), 0,
  92. (struct sockaddr *) addrp, sizeof (*addrp));
  93. if (res < 0)
  94. {
  95. do_close (s);
  96. return -1;
  97. }
  98. milliseconds = (timeout->tv_sec * 1000) + (timeout->tv_usec / 1000);
  99. fd.fd = s;
  100. fd.events = POLLIN;
  101. do
  102. res = poll (&fd, 1, milliseconds);
  103. while (res < 0 && errno == EINTR);
  104. if (res <= 0)
  105. {
  106. if (res == 0)
  107. __set_errno (ETIMEDOUT);
  108. do_close (s);
  109. return (-1);
  110. }
  111. fromlen = sizeof (from);
  112. res = recvfrom (s, (char *) &thetime, sizeof (thetime), 0,
  113. (struct sockaddr *) &from, &fromlen);
  114. do_close (s);
  115. if (res < 0)
  116. return -1;
  117. }
  118. else
  119. {
  120. if (connect (s, (struct sockaddr *) addrp, sizeof (*addrp)) < 0)
  121. {
  122. do_close (s);
  123. return -1;
  124. }
  125. res = __read (s, (char *) &thetime, sizeof (thetime));
  126. do_close (s);
  127. if (res < 0)
  128. return (-1);
  129. }
  130. if (res != sizeof (thetime))
  131. {
  132. __set_errno (EIO);
  133. return -1;
  134. }
  135. thetime = ntohl (thetime);
  136. timep->tv_sec = thetime - TOFFSET;
  137. timep->tv_usec = 0;
  138. return 0;
  139. }