Fix miscellanious size_t related compiler warnings.
[dragonfly.git] / usr.sbin / timed / timedc / cmds.c
CommitLineData
984263bc
MD
1/*-
2 * Copyright (c) 1985, 1993
3 * The Regents of the University of California. 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
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
1de703da
MD
32 *
33 * @(#)cmds.c 8.1 (Berkeley) 6/6/93
34 * $FreeBSD: src/usr.sbin/timed/timedc/cmds.c,v 1.6.2.2 2001/08/31 08:02:06 kris Exp $
71126e33 35 * $DragonFly: src/usr.sbin/timed/timedc/cmds.c,v 1.4 2004/12/18 22:48:14 swildner Exp $
984263bc
MD
36 */
37
984263bc
MD
38#include "timedc.h"
39#include <sys/file.h>
40
41#include <netinet/in_systm.h>
42#include <netinet/ip.h>
43#include <netinet/ip_icmp.h>
44
45#include <err.h>
46#include <stdlib.h>
3b383b4e 47#include <string.h>
984263bc
MD
48#include <unistd.h>
49
50#define TSPTYPES
51#include <protocols/timed.h>
52
53#ifdef sgi
54#include <bstring.h>
55#include <sys/clock.h>
56#else
57#define SECHR (60*60)
58#define SECDAY (24*SECHR)
59#endif /* sgi */
60
61# define DATE_PROTO "udp"
62# define DATE_PORT "time"
63
64
65int sock;
66int sock_raw;
67char myname[MAXHOSTNAMELEN];
68struct hostent *hp;
69struct sockaddr_in server;
70struct sockaddr_in dayaddr;
71extern int measure_delta;
72
73void bytenetorder(struct tsp *);
74void bytehostorder(struct tsp *);
75
76
77#define BU (2208988800UL) /* seconds before UNIX epoch */
78
79
80/* compute the difference between our date and another machine
81 */
82static int /* difference in days from our time */
320b887a 83daydiff(char *hostname)
984263bc
MD
84{
85 int i;
86 int trials;
87 struct timeval tout, now;
88 fd_set ready;
89 struct sockaddr from;
90 int fromlen;
91 unsigned long sec;
92
984263bc
MD
93 /* wait 2 seconds between 10 tries */
94 tout.tv_sec = 2;
95 tout.tv_usec = 0;
96 for (trials = 0; trials < 10; trials++) {
97 /* ask for the time */
98 sec = 0;
99 if (sendto(sock, &sec, sizeof(sec), 0,
100 (struct sockaddr*)&dayaddr, sizeof(dayaddr)) < 0) {
101 warn("sendto(sock)");
102 return 0;
103 }
104
105 for (;;) {
106 FD_ZERO(&ready);
107 FD_SET(sock, &ready);
60233e58 108 i = select(sock+1, &ready, NULL, NULL, &tout);
984263bc
MD
109 if (i < 0) {
110 if (errno == EINTR)
111 continue;
112 warn("select(date read)");
113 return 0;
114 }
115 if (0 == i)
116 break;
117
118 fromlen = sizeof(from);
119 if (recvfrom(sock,&sec,sizeof(sec),0,
120 &from,&fromlen) < 0) {
121 warn("recvfrom(date read)");
122 return 0;
123 }
124
125 sec = ntohl(sec);
126 if (sec < BU) {
127 warnx("%s says it is before 1970: %lu",
128 hostname, sec);
129 return 0;
130 }
131 sec -= BU;
132
60233e58 133 gettimeofday(&now, NULL);
984263bc
MD
134 return (sec - now.tv_sec);
135 }
136 }
137
138 /* if we get here, we tried too many times */
139 warnx("%s will not tell us the date", hostname);
140 return 0;
141}
142
143
144/*
145 * Clockdiff computes the difference between the time of the machine on
146 * which it is called and the time of the machines given as argument.
147 * The time differences measured by clockdiff are obtained using a sequence
148 * of ICMP TSTAMP messages which are returned to the sender by the IP module
149 * in the remote machine.
150 * In order to compare clocks of machines in different time zones, the time
151 * is transmitted (as a 32-bit value) in milliseconds since midnight UT.
152 * If a hosts uses a different time format, it should set the high order
153 * bit of the 32-bit quantity it transmits.
154 * However, VMS apparently transmits the time in milliseconds since midnight
155 * local time (rather than GMT) without setting the high order bit.
156 * Furthermore, it does not understand daylight-saving time. This makes
157 * clockdiff behaving inconsistently with hosts running VMS.
158 *
159 * In order to reduce the sensitivity to the variance of message transmission
160 * time, clockdiff sends a sequence of messages. Yet, measures between
161 * two `distant' hosts can be affected by a small error. The error can,
162 * however, be reduced by increasing the number of messages sent in each
163 * measurement.
164 */
165void
320b887a 166clockdiff(int argc, char *argv[])
984263bc
MD
167{
168 int measure_status;
169 extern int measure(u_long, u_long, char *, struct sockaddr_in*, int);
320b887a
EN
170 int avg_cnt;
171 long avg;
984263bc
MD
172 struct servent *sp;
173
174 if (argc < 2) {
175 printf("usage: timedc clockdiff host ...\n");
176 return;
177 }
178
179 if (gethostname(myname, sizeof(myname) - 1) < 0)
180 err(1, "gethostname");
181
182 /* get the address for the date ready */
183 sp = getservbyname(DATE_PORT, DATE_PROTO);
184 if (!sp) {
185 warnx("%s/%s is an unknown service", DATE_PORT, DATE_PROTO);
186 dayaddr.sin_port = 0;
187 } else {
188 dayaddr.sin_port = sp->s_port;
189 }
190
191 while (argc > 1) {
192 argc--; argv++;
193 hp = gethostbyname(*argv);
194 if (hp == NULL) {
195 warnx("%s: %s", *argv, hstrerror(h_errno));
196 continue;
197 }
198
199 server.sin_family = hp->h_addrtype;
200 bcopy(hp->h_addr, &server.sin_addr.s_addr, hp->h_length);
201 for (avg_cnt = 0, avg = 0; avg_cnt < 16; avg_cnt++) {
202 measure_status = measure(10000,100, *argv, &server, 1);
203 if (measure_status != GOOD)
204 break;
205 avg += measure_delta;
206 }
207 if (measure_status == GOOD)
208 measure_delta = avg/avg_cnt;
209
210 switch (measure_status) {
211 case HOSTDOWN:
212 printf("%s is down\n", hp->h_name);
213 continue;
214 case NONSTDTIME:
215 printf("%s transmitts a non-standard time format\n",
216 hp->h_name);
217 continue;
218 case UNREACHABLE:
219 printf("%s is unreachable\n", hp->h_name);
220 continue;
221 }
222
223 /*
224 * Try to get the date only after using ICMP timestamps to
225 * get the time. This is because the date protocol
226 * is optional.
227 */
228 if (dayaddr.sin_port != 0) {
229 dayaddr.sin_family = hp->h_addrtype;
230 bcopy(hp->h_addr, &dayaddr.sin_addr.s_addr,
231 hp->h_length);
232 avg = daydiff(*argv);
233 if (avg > SECDAY) {
234 printf("time on %s is %ld days ahead %s\n",
235 hp->h_name, avg/SECDAY, myname);
236 continue;
237 } else if (avg < -SECDAY) {
238 printf("time on %s is %ld days behind %s\n",
239 hp->h_name, -avg/SECDAY, myname);
240 continue;
241 }
242 }
243
244 if (measure_delta > 0) {
245 printf("time on %s is %d ms. ahead of time on %s\n",
246 hp->h_name, measure_delta, myname);
247 } else if (measure_delta == 0) {
248 printf("%s and %s have the same time\n",
249 hp->h_name, myname);
250 } else {
251 printf("time on %s is %d ms. behind time on %s\n",
252 hp->h_name, -measure_delta, myname);
253 }
254 }
255 return;
256}
257
258
259/*
260 * finds location of master timedaemon
261 */
262void
320b887a 263msite(int argc, char *argv[])
984263bc
MD
264{
265 int cc;
266 fd_set ready;
267 struct sockaddr_in dest;
268 int i, length;
269 struct sockaddr_in from;
270 struct timeval tout;
271 struct tsp msg;
272 struct servent *srvp;
273 char *tgtname;
274
275 if (argc < 1) {
276 printf("usage: timedc msite [host ...]\n");
277 return;
278 }
279
280 srvp = getservbyname("timed", "udp");
281 if (srvp == 0) {
282 warnx("udp/timed: unknown service");
283 return;
284 }
285 dest.sin_port = srvp->s_port;
286 dest.sin_family = AF_INET;
287
288 if (gethostname(myname, sizeof(myname) - 1) < 0)
289 err(1, "gethostname");
290 i = 1;
291 do {
292 tgtname = (i >= argc) ? myname : argv[i];
293 hp = gethostbyname(tgtname);
294 if (hp == 0) {
295 warnx("%s: %s", tgtname, hstrerror(h_errno));
296 continue;
297 }
298 bcopy(hp->h_addr, &dest.sin_addr.s_addr, hp->h_length);
299
71126e33 300 strlcpy(msg.tsp_name, myname, sizeof(msg.tsp_name));
984263bc
MD
301 msg.tsp_type = TSP_MSITE;
302 msg.tsp_vers = TSPVERSION;
303 bytenetorder(&msg);
304 if (sendto(sock, &msg, sizeof(struct tsp), 0,
305 (struct sockaddr*)&dest,
306 sizeof(struct sockaddr)) < 0) {
307 warn("sendto");
308 continue;
309 }
310
311 tout.tv_sec = 15;
312 tout.tv_usec = 0;
313 FD_ZERO(&ready);
314 FD_SET(sock, &ready);
60233e58 315 if (select(FD_SETSIZE, &ready, NULL, NULL, &tout)) {
984263bc
MD
316 length = sizeof(from);
317 cc = recvfrom(sock, &msg, sizeof(struct tsp), 0,
318 (struct sockaddr *)&from, &length);
319 if (cc < 0) {
320 warn("recvfrom");
321 continue;
322 }
323 /*
324 * The 4.3BSD protocol spec had a 32-byte tsp_name field, and
325 * this is still OS-dependent. Demand that the packet is at
326 * least long enough to hold a 4.3BSD packet.
327 */
328 if (cc < (sizeof(struct tsp) - MAXHOSTNAMELEN + 32)) {
329 fprintf(stderr,
424e8382 330 "short packet (%d/%zu bytes) from %s\n",
984263bc
MD
331 cc, sizeof(struct tsp) - MAXHOSTNAMELEN + 32,
332 inet_ntoa(from.sin_addr));
333 continue;
334 }
335 bytehostorder(&msg);
336 if (msg.tsp_type == TSP_ACK) {
337 printf("master timedaemon at %s is %s\n",
338 tgtname, msg.tsp_name);
339 } else {
340 if (msg.tsp_type >= TSPTYPENUMBER)
341 printf("unknown ack received: %u\n",
342 msg.tsp_type);
343 else
344 printf("wrong ack received: %s\n",
345 tsptype[msg.tsp_type]);
346 }
347 } else {
348 printf("communication error with %s\n", tgtname);
349 }
350 } while (++i < argc);
351}
352
353/*
354 * quits timedc
355 */
356void
320b887a 357quit(void)
984263bc 358{
320b887a 359
984263bc
MD
360 exit(0);
361}
362
363
364/*
365 * Causes the election timer to expire on the selected hosts
366 * It sends just one udp message per machine, relying on
367 * reliability of communication channel.
368 */
369void
320b887a 370testing(int argc, char *argv[])
984263bc
MD
371{
372 struct servent *srvp;
373 struct sockaddr_in sin;
374 struct tsp msg;
375
376 if (argc < 2) {
377 printf("usage: timedc election host1 [host2 ...]\n");
378 return;
379 }
380
381 srvp = getservbyname("timed", "udp");
382 if (srvp == 0) {
383 warnx("udp/timed: unknown service");
384 return;
385 }
386
387 while (argc > 1) {
388 argc--; argv++;
389 hp = gethostbyname(*argv);
390 if (hp == NULL) {
391 warnx("%s: %s", *argv, hstrerror(h_errno));
392 argc--; argv++;
393 continue;
394 }
395 sin.sin_port = srvp->s_port;
396 sin.sin_family = hp->h_addrtype;
397 bcopy(hp->h_addr, &sin.sin_addr.s_addr, hp->h_length);
398
399 msg.tsp_type = TSP_TEST;
400 msg.tsp_vers = TSPVERSION;
401 if (gethostname(myname, sizeof(myname) - 1) < 0)
402 err(1, "gethostname");
71126e33 403 strlcpy(msg.tsp_name, myname, sizeof(msg.tsp_name));
984263bc
MD
404 bytenetorder(&msg);
405 if (sendto(sock, &msg, sizeof(struct tsp), 0,
406 (struct sockaddr*)&sin,
407 sizeof(struct sockaddr)) < 0) {
408 warn("sendto");
409 }
410 }
411}
412
413
414/*
415 * Enables or disables tracing on local timedaemon
416 */
417void
320b887a 418tracing(int argc, char *argv[])
984263bc
MD
419{
420 int onflag;
421 int length;
422 int cc;
423 fd_set ready;
424 struct sockaddr_in dest;
425 struct sockaddr_in from;
426 struct timeval tout;
427 struct tsp msg;
428 struct servent *srvp;
429
430 if (argc != 2) {
431 printf("usage: timedc trace { on | off }\n");
432 return;
433 }
434
435 srvp = getservbyname("timed", "udp");
436 if (srvp == 0) {
437 warnx("udp/timed: unknown service");
438 return;
439 }
440 dest.sin_port = srvp->s_port;
441 dest.sin_family = AF_INET;
442
443 if (gethostname(myname, sizeof(myname) - 1) < 0)
444 err(1, "gethostname");
445 hp = gethostbyname(myname);
446 bcopy(hp->h_addr, &dest.sin_addr.s_addr, hp->h_length);
447
448 if (strcmp(argv[1], "on") == 0) {
449 msg.tsp_type = TSP_TRACEON;
450 onflag = ON;
451 } else {
452 msg.tsp_type = TSP_TRACEOFF;
453 onflag = OFF;
454 }
455
71126e33 456 strcpy(msg.tsp_name, myname);
984263bc
MD
457 msg.tsp_vers = TSPVERSION;
458 bytenetorder(&msg);
459 if (sendto(sock, &msg, sizeof(struct tsp), 0,
460 (struct sockaddr*)&dest, sizeof(struct sockaddr)) < 0) {
461 warn("sendto");
462 return;
463 }
464
465 tout.tv_sec = 5;
466 tout.tv_usec = 0;
467 FD_ZERO(&ready);
468 FD_SET(sock, &ready);
60233e58 469 if (select(FD_SETSIZE, &ready, NULL, NULL, &tout)) {
984263bc
MD
470 length = sizeof(from);
471 cc = recvfrom(sock, &msg, sizeof(struct tsp), 0,
472 (struct sockaddr *)&from, &length);
473 if (cc < 0) {
474 warn("recvfrom");
475 return;
476 }
477 /*
478 * The 4.3BSD protocol spec had a 32-byte tsp_name field, and
479 * this is still OS-dependent. Demand that the packet is at
480 * least long enough to hold a 4.3BSD packet.
481 */
482 if (cc < (sizeof(struct tsp) - MAXHOSTNAMELEN + 32)) {
424e8382 483 fprintf(stderr, "short packet (%d/%zu bytes) from %s\n",
984263bc
MD
484 cc, sizeof(struct tsp) - MAXHOSTNAMELEN + 32,
485 inet_ntoa(from.sin_addr));
486 return;
487 }
488 bytehostorder(&msg);
489 if (msg.tsp_type == TSP_ACK)
490 if (onflag)
491 printf("timed tracing enabled\n");
492 else
493 printf("timed tracing disabled\n");
494 else {
495 if (msg.tsp_type >= TSPTYPENUMBER)
496 printf("unknown ack received: %u\n",
497 msg.tsp_type);
498 else
499 printf("wrong ack received: %s\n",
500 tsptype[msg.tsp_type]);
501 }
502 } else
503 printf("communication error\n");
504}
505
506int
320b887a 507priv_resources(void)
984263bc
MD
508{
509 int port;
510 struct sockaddr_in sin;
511
512 sock = socket(AF_INET, SOCK_DGRAM, 0);
513 if (sock < 0) {
514 warn("opening socket");
515 return(-1);
516 }
517
518 sin.sin_family = AF_INET;
519 sin.sin_addr.s_addr = 0;
520 for (port = IPPORT_RESERVED - 1; port > IPPORT_RESERVED / 2; port--) {
521 sin.sin_port = htons((u_short)port);
522 if (bind(sock, (struct sockaddr*)&sin, sizeof (sin)) >= 0)
523 break;
524 if (errno != EADDRINUSE && errno != EADDRNOTAVAIL) {
525 warn("bind");
71126e33 526 close(sock);
984263bc
MD
527 return(-1);
528 }
529 }
530 if (port == IPPORT_RESERVED / 2) {
531 warnx("all reserved ports in use");
71126e33 532 close(sock);
984263bc
MD
533 return(-1);
534 }
535
536 sock_raw = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP);
537 if (sock_raw < 0) {
538 warn("opening raw socket");
71126e33 539 close(sock);
984263bc
MD
540 return(-1);
541 }
542 return(1);
543}