2 * bootptest.c - Test out a bootp server.
4 * This simple program was put together from pieces taken from
5 * various places, including the CMU BOOTP client and server.
6 * The packet printing routine is from the Berkeley "tcpdump"
7 * program with some enhancements I added. The print-bootp.c
8 * file was shared with my copy of "tcpdump" and therefore uses
9 * some unusual utility routines that would normally be provided
10 * by various parts of the tcpdump program. Gordon W. Ross
14 * This program includes software developed by the University of
15 * California, Lawrence Berkeley Laboratory and its contributors.
16 * (See the copyright notice in print-bootp.c)
18 * The remainder of this program is public domain. You may do
19 * whatever you like with it except claim that you wrote it.
21 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
22 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
23 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
27 * 12/02/93 Released version 1.4 (with bootp-2.3.2)
28 * 11/05/93 Released version 1.3
29 * 10/14/93 Released version 1.2
30 * 10/11/93 Released version 1.1
31 * 09/28/93 Released version 1.0
32 * 09/93 Original developed by Gordon W. Ross <gwr@mc.com>
34 * $FreeBSD: src/libexec/bootpd/tools/bootptest/bootptest.c,v 1.7 1999/08/28 00:09:25 peter Exp $
35 * $DragonFly: src/libexec/bootpd/tools/bootptest/bootptest.c,v 1.2 2003/06/17 04:27:07 dillon Exp $
38 char *usage = "bootptest [-h] server-name [vendor-data-template-file]";
40 #include <sys/types.h>
41 #include <sys/socket.h>
42 #include <sys/ioctl.h>
46 #include <sys/utsname.h>
49 #include <netinet/in.h>
50 #include <arpa/inet.h> /* inet_ntoa */
66 #include "bootptest.h"
70 #include "patchlevel.h"
72 static void send_request();
83 unsigned char *packetp;
84 unsigned char *snapend;
89 * IP port numbers for client and server obtained from /etc/services
92 u_short bootps_port, bootpc_port;
96 * Internet socket and interface config structures
99 struct sockaddr_in sin_server; /* where to send requests */
100 struct sockaddr_in sin_client; /* for bind and listen */
101 struct sockaddr_in sin_from; /* Packet source */
102 u_char eaddr[16]; /* Ethernet address */
108 int debug = 1; /* Debugging flag (level) */
109 char *sndbuf; /* Send packet buffer */
110 char *rcvbuf; /* Receive packet buffer */
112 struct utsname my_uname;
116 * Vendor magic cookies for CMU and RFC1048
119 unsigned char vm_cmu[4] = VM_CMU;
120 unsigned char vm_rfc1048[4] = VM_RFC1048;
121 short secs; /* How long client has waited */
124 extern void bootp_print();
127 * Initialization such as command-line processing is done, then
128 * the receiver loop is started. Die when interrupted.
132 main(int argc, char **argv)
138 char *servername = NULL;
139 char *vendor_file = NULL;
140 char *bp_file = NULL;
141 int32 server_addr; /* inet addr, network order */
142 int s; /* Socket file descriptor */
143 int n, fromlen, recvcnt;
148 progname = strrchr(argv[0], '/');
157 printf("%s: version %s.%d\n", progname, VERSION, PATCHLEVEL);
160 * Verify that "struct bootp" has the correct official size.
161 * (Catch evil compilers that do struct padding.)
163 assert(sizeof(struct bootp) == BP_MINPKTSZ);
165 if (uname(&my_uname) < 0) {
166 fprintf(stderr, "%s: can't get hostname\n", argv[0]);
169 hostname = my_uname.nodename;
171 sndbuf = malloc(BUFLEN);
172 rcvbuf = malloc(BUFLEN);
173 if (!sndbuf || !rcvbuf) {
174 printf("malloc failed\n");
178 /* default magic number */
179 bcopy(vm_rfc1048, (char*)&vend_magic, 4);
181 /* Handle option switches. */
183 if (argv[0][0] != '-')
185 switch (argv[0][1]) {
187 case 'f': /* File name to reqest. */
194 case 'h': /* Use hardware address. */
198 case 'm': /* Magic number value. */
202 vend_magic = inet_addr(*argv);
215 /* Get server name (or address) for query. */
221 /* Get optional vendor-data-template-file. */
228 printf("missing server name.\n");
235 if ((s = socket(AF_INET, SOCK_DGRAM, 0)) < 0) {
240 * Get server's listening port number
242 sep = getservbyname("bootps", "udp");
244 bootps_port = ntohs((u_short) sep->s_port);
246 fprintf(stderr, "udp/bootps: unknown service -- using port %d\n",
248 bootps_port = (u_short) IPPORT_BOOTPS;
252 * Set up server socket address (for send)
255 if (isdigit(servername[0]))
256 server_addr = inet_addr(servername);
258 hep = gethostbyname(servername);
260 fprintf(stderr, "%s: unknown host\n", servername);
263 bcopy(hep->h_addr, &server_addr, sizeof(server_addr));
266 /* Get broadcast address */
268 server_addr = INADDR_ANY;
270 sin_server.sin_family = AF_INET;
271 sin_server.sin_port = htons(bootps_port);
272 sin_server.sin_addr.s_addr = server_addr;
275 * Get client's listening port number
277 sep = getservbyname("bootpc", "udp");
279 bootpc_port = ntohs(sep->s_port);
281 fprintf(stderr, "udp/bootpc: unknown service -- using port %d\n",
283 bootpc_port = (u_short) IPPORT_BOOTPC;
287 * Set up client socket address (for listen)
289 sin_client.sin_family = AF_INET;
290 sin_client.sin_port = htons(bootpc_port);
291 sin_client.sin_addr.s_addr = INADDR_ANY;
294 * Bind client socket to BOOTPC port.
296 if (bind(s, (struct sockaddr *) &sin_client, sizeof(sin_client)) < 0) {
297 perror("bind BOOTPC port");
299 fprintf(stderr, "You need to run this as root\n");
305 bp = (struct bootp *) sndbuf;
306 bzero(bp, sizeof(*bp));
307 bp->bp_op = BOOTREQUEST;
308 xid = (int32) getpid();
309 bp->bp_xid = (u_int32) htonl(xid);
311 strncpy(bp->bp_file, bp_file, BP_FILE_LEN);
314 * Fill in the hardware address (or client IP address)
319 ifr = getif(s, &sin_server.sin_addr);
321 printf("No interface for %s\n", servername);
324 if (getether(ifr->ifr_name, (char*)eaddr)) {
325 printf("Can not get ether addr for %s\n", ifr->ifr_name);
328 /* Copy Ethernet address into request packet. */
331 bcopy(eaddr, bp->bp_chaddr, bp->bp_hlen);
333 /* Fill in the client IP address. */
334 hep = gethostbyname(hostname);
336 printf("Can not get my IP address\n");
339 bcopy(hep->h_addr, &bp->bp_ciaddr, hep->h_length);
343 * Copy in the default vendor data.
345 bcopy((char*)&vend_magic, bp->bp_vend, 4);
347 bp->bp_vend[4] = TAG_END;
350 * Read in the "options" part of the request.
351 * This also determines the size of the packet.
353 snaplen = sizeof(*bp);
355 int fd = open(vendor_file, 0);
360 /* Compute actual space for options. */
361 n = BUFLEN - sizeof(*bp) + BP_VEND_LEN;
362 n = read(fd, bp->bp_vend, n);
368 printf("read %d bytes of vendor template\n", n);
369 if (n > BP_VEND_LEN) {
370 printf("warning: extended options in use (len > %d)\n",
372 snaplen += (n - BP_VEND_LEN);
376 * Set globals needed by print_bootp
377 * (called by send_request)
379 packetp = (unsigned char *) eaddr;
380 snapend = (unsigned char *) sndbuf + snaplen;
382 /* Send a request once per second while waiting for replies. */
384 bp->bp_secs = secs = 0;
390 tv.tv_sec = WAITSECS;
393 n = select(s + 1, (fd_set *) & readfds, NULL, NULL, &tv);
400 * We have not received a response in the last second.
401 * If we have ever received any responses, exit now.
402 * Otherwise, bump the "wait time" field and re-send.
409 bp->bp_secs = htons(secs);
413 fromlen = sizeof(sin_from);
414 n = recvfrom(s, rcvbuf, BUFLEN, 0,
415 (struct sockaddr *) &sin_from, &fromlen);
419 if (n < sizeof(struct bootp)) {
420 printf("received short packet\n");
425 /* Print the received packet. */
426 printf("Recvd from %s", inet_ntoa(sin_from.sin_addr));
427 /* set globals needed by bootp_print() */
429 snapend = (unsigned char *) rcvbuf + snaplen;
430 bootp_print(rcvbuf, n, sin_from.sin_port, 0);
433 * This no longer exits immediately after receiving
434 * one response because it is useful to know if the
435 * client might get multiple responses. This code
436 * will now listen for one second after a response.
439 fprintf(stderr, "no response from %s\n", servername);
446 /* Print the request packet. */
447 printf("Sending to %s", inet_ntoa(sin_server.sin_addr));
448 bootp_print(sndbuf, snaplen, sin_from.sin_port, 0);
451 /* Send the request packet. */
452 if (sendto(s, sndbuf, snaplen, 0,
453 (struct sockaddr *) &sin_server,
454 sizeof(sin_server)) < 0)
456 perror("sendto server");
462 * Print out a filename (or other ascii string).
463 * Return true if truncated.
466 printfn(u_char *s, u_char *ep)
471 while ((c = *s++) != '\0') {
482 c ^= 0x40; /* DEL to ?, others to alpha */
492 * Convert an IP addr to a string.
493 * (like inet_ntoa, but ina is a pointer)
496 ipaddr_string(struct in_addr *ina)
502 snprintf(b, sizeof(b), "%d.%d.%d.%d", p[0], p[1], p[2], p[3]);
510 * c-argdecl-indent: 4
511 * c-continued-statement-offset: 4
512 * c-continued-brace-offset: -4