1 /* $NetBSD: nfs_bootdhcp.c,v 1.24 2003/06/29 22:32:14 fvdl Exp $ */
2
3 /*-
4 * Copyright (c) 1995, 1997 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Adam Glass and Gordon W. Ross.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Support for NFS diskless booting with BOOTP (RFC951, RFC1048)
41 *
42 * History:
43 *
44 * Tor Egge developed the initial version of this code based on
45 * the Sun RPC/bootparam sources nfs_boot.c and krpc_subr.c and
46 * submitted that work to NetBSD as bugreport "kern/2351" on
47 * 29 Apr 1996.
48 *
49 * Gordon Ross reorganized Tor's version into this form and
50 * integrated it into the NetBSD sources during Aug 1997.
51 */
52
53 #include <sys/cdefs.h>
54 __KERNEL_RCSID(0, "$NetBSD: nfs_bootdhcp.c,v 1.24 2003/06/29 22:32:14 fvdl Exp $");
55
56 #include "opt_nfs_boot.h"
57
58 #include <sys/param.h>
59 #include <sys/systm.h>
60 #include <sys/kernel.h>
61 #include <sys/device.h>
62 #include <sys/ioctl.h>
63 #include <sys/proc.h>
64 #include <sys/mount.h>
65 #include <sys/mbuf.h>
66 #include <sys/reboot.h>
67 #include <sys/socket.h>
68 #include <sys/socketvar.h>
69
70 #include <net/if.h>
71 #include <net/if_types.h>
72 #include <net/if_arp.h> /* ARPHRD_ETHER, etc. */
73 #include <net/if_dl.h>
74 #include <net/if_ether.h>
75 #include <net/route.h>
76
77 #include <netinet/in.h>
78 #include <netinet/if_inarp.h>
79
80 #include <nfs/rpcv2.h>
81
82 #include <nfs/nfsproto.h>
83 #include <nfs/nfs.h>
84 #include <nfs/nfsmount.h>
85 #include <nfs/nfsdiskless.h>
86
87 /*
88 * There are two implementations of NFS diskless boot.
89 * This implementation uses BOOTP (RFC951, RFC1048), and
90 * the other uses Sun RPC/bootparams (nfs_bootparam.c).
91 *
92 * This method gets everything it needs with one BOOTP
93 * request and reply. Note that this actually uses only
94 * the old BOOTP functionality subset of DHCP. It is not
95 * clear that DHCP provides any advantage over BOOTP for
96 * diskless boot. DHCP allows the server to assign an IP
97 * address without any a-priori knowledge of the client,
98 * but we require that the server has a-priori knowledge
99 * of the client so it can export our (unique) NFS root.
100 * Given that the server needs a-priori knowledge about
101 * the client anyway, it might as well assign a fixed IP
102 * address for the client and support BOOTP.
103 *
104 * On the other hand, disk-FULL clients may use DHCP, but
105 * in that case the DHCP client should be user-mode code,
106 * and has no bearing on the code below. -gwr
107 */
108
109 /* Begin stuff from bootp.h */
110 /* Definitions from RFC951 */
111 #define BP_CHADDR_LEN 16
112 #define BP_SNAME_LEN 64
113 #define BP_FILE_LEN 128
114 #define BP_VEND_LEN 64
115 struct bootp {
116 u_int8_t bp_op; /* packet opcode type */
117 u_int8_t bp_htype; /* hardware addr type */
118 u_int8_t bp_hlen; /* hardware addr length */
119 u_int8_t bp_hops; /* gateway hops */
120 u_int32_t bp_xid; /* transaction ID */
121 u_int16_t bp_secs; /* seconds since boot began */
122 u_int16_t bp_flags; /* RFC1532 broadcast, etc. */
123 struct in_addr bp_ciaddr; /* client IP address */
124 struct in_addr bp_yiaddr; /* 'your' IP address */
125 struct in_addr bp_siaddr; /* server IP address */
126 struct in_addr bp_giaddr; /* gateway IP address */
127 u_int8_t bp_chaddr[BP_CHADDR_LEN]; /* client hardware address */
128 char bp_sname[BP_SNAME_LEN]; /* server host name */
129 char bp_file[BP_FILE_LEN]; /* boot file name */
130 u_int8_t bp_vend[BP_VEND_LEN]; /* RFC1048 options */
131 /*
132 * Note that BOOTP packets are allowed to be longer
133 * (see RFC 1532 sect. 2.1) and common practice is to
134 * allow the option data in bp_vend to extend into the
135 * additional space provided in longer packets.
136 */
137 };
138
139 #define IPPORT_BOOTPS 67
140 #define IPPORT_BOOTPC 68
141
142 #define BOOTREQUEST 1
143 #define BOOTREPLY 2
144
145 /*
146 * Is this available from the sockaddr_dl somehow?
147 * Perhaps (struct arphdr)->ar_hrd = ARPHRD_ETHER?
148 * The interface has ->if_type but not the ARP fmt.
149 */
150 #define HTYPE_ETHERNET 1
151 #define HTYPE_IEEE802 6
152
153 /*
154 * Vendor magic cookie (v_magic) for RFC1048
155 */
156 static const u_int8_t vm_rfc1048[4] = { 99, 130, 83, 99 };
157
158 /*
159 * Tag values used to specify what information is being supplied in
160 * the vendor (options) data area of the packet.
161 */
162 /* RFC 1048 */
163 #define TAG_END ((unsigned char) 255)
164 #define TAG_PAD ((unsigned char) 0)
165 #define TAG_SUBNET_MASK ((unsigned char) 1)
166 #define TAG_TIME_OFFSET ((unsigned char) 2)
167 #define TAG_GATEWAY ((unsigned char) 3)
168 #define TAG_TIME_SERVER ((unsigned char) 4)
169 #define TAG_NAME_SERVER ((unsigned char) 5)
170 #define TAG_DOMAIN_SERVER ((unsigned char) 6)
171 #define TAG_LOG_SERVER ((unsigned char) 7)
172 #define TAG_COOKIE_SERVER ((unsigned char) 8)
173 #define TAG_LPR_SERVER ((unsigned char) 9)
174 #define TAG_IMPRESS_SERVER ((unsigned char) 10)
175 #define TAG_RLP_SERVER ((unsigned char) 11)
176 #define TAG_HOST_NAME ((unsigned char) 12)
177 #define TAG_BOOT_SIZE ((unsigned char) 13)
178 /* RFC 1395 */
179 #define TAG_DUMP_FILE ((unsigned char) 14)
180 #define TAG_DOMAIN_NAME ((unsigned char) 15)
181 #define TAG_SWAP_SERVER ((unsigned char) 16)
182 #define TAG_ROOT_PATH ((unsigned char) 17)
183 /* End of stuff from bootp.h */
184
185 #ifdef NFS_BOOT_DHCP
186 #define TAG_REQ_ADDR ((unsigned char) 50)
187 #define TAG_LEASETIME ((unsigned char) 51)
188 #define TAG_OVERLOAD ((unsigned char) 52)
189 #define TAG_DHCP_MSGTYPE ((unsigned char) 53)
190 #define TAG_SERVERID ((unsigned char) 54)
191 #define TAG_PARAM_REQ ((unsigned char) 55)
192 #define TAG_MSG ((unsigned char) 56)
193 #define TAG_MAXSIZE ((unsigned char) 57)
194 #define TAG_T1 ((unsigned char) 58)
195 #define TAG_T2 ((unsigned char) 59)
196 #define TAG_CLASSID ((unsigned char) 60)
197 #define TAG_CLIENTID ((unsigned char) 61)
198 #endif
199
200 #ifdef NFS_BOOT_DHCP
201 #define DHCPDISCOVER 1
202 #define DHCPOFFER 2
203 #define DHCPREQUEST 3
204 #define DHCPDECLINE 4
205 #define DHCPACK 5
206 #define DHCPNAK 6
207 #define DHCPRELEASE 7
208 #endif
209
210 #ifdef NFS_BOOT_DHCP
211 #define BOOTP_SIZE_MAX (sizeof(struct bootp)+312-64)
212 #else
213 /*
214 * The "extended" size is somewhat arbitrary, but is
215 * constrained by the maximum message size specified
216 * by RFC1533 (567 total). This value increases the
217 * space for options from 64 bytes to 256 bytes.
218 */
219 #define BOOTP_SIZE_MAX (sizeof(struct bootp)+256-64)
220 #endif
221 #define BOOTP_SIZE_MIN (sizeof(struct bootp))
222
223 /* Convenience macro */
224 #define INTOHL(ina) ((u_int32_t)ntohl((ina).s_addr))
225
226 static int bootpc_call __P((struct nfs_diskless *, struct proc *));
227 static void bootp_extract __P((struct bootp *, int, struct nfs_diskless *));
228
229 /* #define DEBUG XXX */
230
231 #ifdef DEBUG
232 #define DPRINT(s) printf("nfs_boot: %s\n", s)
233 #else
234 #define DPRINT(s) (void)0
235 #endif
236
237
238 /*
239 * Get our boot parameters using BOOTP.
240 */
241 int
242 nfs_bootdhcp(nd, procp)
243 struct nfs_diskless *nd;
244 struct proc *procp;
245 {
246 struct ifnet *ifp = nd->nd_ifp;
247 int error;
248
249 /*
250 * Do enough of ifconfig(8) so that the chosen interface
251 * can talk to the servers. Use address zero for now.
252 */
253 error = nfs_boot_setaddress(ifp, procp, INADDR_ANY, INADDR_ANY,
254 INADDR_BROADCAST);
255 if (error) {
256 printf("nfs_boot: set ifaddr zero, error=%d\n", error);
257 return (error);
258 }
259
260 /* This function call does the real send/recv work. */
261 error = bootpc_call(nd, procp);
262
263 /* Get rid of the temporary (zero) IP address. */
264 (void) nfs_boot_deladdress(ifp, procp, INADDR_ANY);
265
266 /* NOW we can test the error from bootpc_call. */
267 if (error)
268 goto out;
269
270 /*
271 * Do ifconfig with our real IP address and mask.
272 */
273 error = nfs_boot_setaddress(ifp, procp, nd->nd_myip.s_addr,
274 nd->nd_mask.s_addr, INADDR_ANY);
275 if (error) {
276 printf("nfs_boot: set ifaddr real, error=%d\n", error);
277 goto out;
278 }
279
280 out:
281 if (error) {
282 (void) nfs_boot_ifupdown(ifp, procp, 0);
283 nfs_boot_flushrt(ifp);
284 }
285 return (error);
286 }
287
288 struct bootpcontext {
289 int xid;
290 u_char *haddr;
291 u_char halen;
292 struct bootp *replybuf;
293 int replylen;
294 #ifdef NFS_BOOT_DHCP
295 char expected_dhcpmsgtype, dhcp_ok;
296 struct in_addr dhcp_serverip;
297 #endif
298 };
299
300 static int bootpset __P((struct mbuf*, void*, int));
301 static int bootpcheck __P((struct mbuf*, void*));
302
303 static int
304 bootpset(m, context, waited)
305 struct mbuf *m;
306 void *context;
307 int waited;
308 {
309 struct bootp *bootp;
310
311 /* we know it's contigous (in 1 mbuf cluster) */
312 bootp = mtod(m, struct bootp*);
313
314 bootp->bp_secs = htons(waited);
315
316 return (0);
317 }
318
319 static int
320 bootpcheck(m, context)
321 struct mbuf *m;
322 void *context;
323 {
324 struct bootp *bootp;
325 struct bootpcontext *bpc = context;
326 u_int tag, len;
327 u_char *p, *limit;
328
329 /*
330 * Is this a valid reply?
331 */
332 if (m->m_pkthdr.len < BOOTP_SIZE_MIN) {
333 DPRINT("short packet");
334 return (-1);
335 }
336 if (m->m_pkthdr.len > BOOTP_SIZE_MAX) {
337 DPRINT("long packet");
338 return (-1);
339 }
340
341 /*
342 * don't make first checks more expensive than necessary
343 */
344 if (m->m_len < offsetof(struct bootp, bp_sname)) {
345 m = m_pullup(m, offsetof(struct bootp, bp_sname));
346 if (m == NULL)
347 return (-1);
348 }
349 bootp = mtod(m, struct bootp*);
350
351 if (bootp->bp_op != BOOTREPLY) {
352 DPRINT("not reply");
353 return (-1);
354 }
355 if (bootp->bp_hlen != bpc->halen) {
356 DPRINT("bad hwa_len");
357 return (-1);
358 }
359 if (memcmp(bootp->bp_chaddr, bpc->haddr, bpc->halen)) {
360 DPRINT("wrong hwaddr");
361 return (-1);
362 }
363 if (bootp->bp_xid != bpc->xid) {
364 DPRINT("wrong xid");
365 return (-1);
366 }
367
368 /*
369 * OK, it's worth to look deeper.
370 * We copy the mbuf into a flat buffer here because
371 * m_pullup() is a bit limited for this purpose
372 * (doesn't allocate a cluster if necessary).
373 */
374 bpc->replylen = m->m_pkthdr.len;
375 m_copydata(m, 0, bpc->replylen, (caddr_t)bpc->replybuf);
376 bootp = bpc->replybuf;
377
378 /*
379 * Check if the IP address we get looks correct.
380 * (DHCP servers can send junk to unknown clients.)
381 * XXX more checks might be needed
382 */
383 if (bootp->bp_yiaddr.s_addr == INADDR_ANY ||
384 bootp->bp_yiaddr.s_addr == INADDR_BROADCAST) {
385 printf("nfs_boot: wrong IP addr %s",
386 inet_ntoa(bootp->bp_yiaddr));
387 goto warn;
388 }
389
390 /*
391 * Check the vendor data.
392 */
393 if (memcmp(bootp->bp_vend, vm_rfc1048, 4)) {
394 printf("nfs_boot: reply missing options");
395 goto warn;
396 }
397 p = &bootp->bp_vend[4];
398 limit = ((char*)bootp) + bpc->replylen;
399 while (p < limit) {
400 tag = *p++;
401 if (tag == TAG_END)
402 break;
403 if (tag == TAG_PAD)
404 continue;
405 len = *p++;
406 if ((p + len) > limit) {
407 printf("nfs_boot: option %d too long", tag);
408 goto warn;
409 }
410 switch (tag) {
411 #ifdef NFS_BOOT_DHCP
412 case TAG_DHCP_MSGTYPE:
413 if (*p != bpc->expected_dhcpmsgtype)
414 return (-1);
415 bpc->dhcp_ok = 1;
416 break;
417 case TAG_SERVERID:
418 memcpy(&bpc->dhcp_serverip.s_addr, p,
419 sizeof(bpc->dhcp_serverip.s_addr));
420 break;
421 #endif
422 default:
423 break;
424 }
425 p += len;
426 }
427 return (0);
428
429 warn:
430 printf(" (bad reply from %s)\n", inet_ntoa(bootp->bp_siaddr));
431 return (-1);
432 }
433
434 static int
435 bootpc_call(nd, procp)
436 struct nfs_diskless *nd;
437 struct proc *procp;
438 {
439 struct socket *so;
440 struct ifnet *ifp = nd->nd_ifp;
441 static u_int32_t xid = ~0xFF;
442 struct bootp *bootp; /* request */
443 struct mbuf *m, *nam;
444 struct sockaddr_in *sin;
445 int error;
446 u_char *haddr;
447 u_char hafmt, halen;
448 struct bootpcontext bpc;
449 #ifdef NFS_BOOT_DHCP
450 char vci[64];
451 int vcilen;
452 #endif
453
454 error = socreate(AF_INET, &so, SOCK_DGRAM, 0);
455 if (error) {
456 printf("bootp: socreate, error=%d\n", error);
457 return (error);
458 }
459
460 /*
461 * Initialize to NULL anything that will hold an allocation,
462 * and free each at the end if not null.
463 */
464 bpc.replybuf = NULL;
465 m = nam = NULL;
466
467 /* Record our H/W (Ethernet) address. */
468 { struct sockaddr_dl *sdl = ifp->if_sadl;
469 switch (sdl->sdl_type) {
470 case IFT_ISO88025:
471 hafmt = HTYPE_IEEE802;
472 break;
473 case IFT_ETHER:
474 case IFT_FDDI:
475 hafmt = HTYPE_ETHERNET;
476 break;
477 default:
478 printf("bootp: unsupported interface type %d\n",
479 sdl->sdl_type);
480 error = EINVAL;
481 goto out;
482 }
483 halen = sdl->sdl_alen;
484 haddr = (unsigned char *)LLADDR(sdl);
485 }
486
487 /*
488 * Skip the route table when sending on this socket.
489 * If this is not done, ip_output finds the loopback
490 * interface (why?) and then fails because broadcast
491 * is not supported on that interface...
492 */
493 { int32_t *opt;
494 m = m_get(M_WAIT, MT_SOOPTS);
495 opt = mtod(m, int32_t *);
496 m->m_len = sizeof(*opt);
497 *opt = 1;
498 error = sosetopt(so, SOL_SOCKET, SO_DONTROUTE, m);
499 m = NULL; /* was consumed */
500 }
501 if (error) {
502 DPRINT("SO_DONTROUTE");
503 goto out;
504 }
505
506 /* Enable broadcast. */
507 if ((error = nfs_boot_enbroadcast(so))) {
508 DPRINT("SO_BROADCAST");
509 goto out;
510 }
511
512 /*
513 * Set some TTL so we can boot through routers.
514 * Real BOOTP forwarding agents don't need this; they obey "bp_hops"
515 * and set "bp_giaddr", thus rewrite the packet anyway.
516 * The "helper-address" feature of some popular router vendor seems
517 * to do simple IP forwarding and drops packets with (ip_ttl == 1).
518 */
519 { u_char *opt;
520 m = m_get(M_WAIT, MT_SOOPTS);
521 opt = mtod(m, u_char *);
522 m->m_len = sizeof(*opt);
523 *opt = 7;
524 error = sosetopt(so, IPPROTO_IP, IP_MULTICAST_TTL, m);
525 m = NULL; /* was consumed */
526 }
527 if (error) {
528 DPRINT("IP_MULTICAST_TTL");
529 goto out;
530 }
531
532 /* Set the receive timeout for the socket. */
533 if ((error = nfs_boot_setrecvtimo(so))) {
534 DPRINT("SO_RCVTIMEO");
535 goto out;
536 }
537
538 /*
539 * Bind the local endpoint to a bootp client port.
540 */
541 if ((error = nfs_boot_sobind_ipport(so, IPPORT_BOOTPC))) {
542 DPRINT("bind failed\n");
543 goto out;
544 }
545
546 /*
547 * Setup socket address for the server.
548 */
549 nam = m_get(M_WAIT, MT_SONAME);
550 sin = mtod(nam, struct sockaddr_in *);
551 sin->sin_len = nam->m_len = sizeof(*sin);
552 sin->sin_family = AF_INET;
553 sin->sin_addr.s_addr = INADDR_BROADCAST;
554 sin->sin_port = htons(IPPORT_BOOTPS);
555
556 /*
557 * Allocate buffer used for request
558 */
559 m = m_gethdr(M_WAIT, MT_DATA);
560 m_clget(m, M_WAIT);
561 bootp = mtod(m, struct bootp*);
562 m->m_pkthdr.len = m->m_len = BOOTP_SIZE_MAX;
563 m->m_pkthdr.rcvif = NULL;
564
565 /*
566 * Build the BOOTP reqest message.
567 * Note: xid is host order! (opaque to server)
568 */
569 memset((caddr_t)bootp, 0, BOOTP_SIZE_MAX);
570 bootp->bp_op = BOOTREQUEST;
571 bootp->bp_htype = hafmt;
572 bootp->bp_hlen = halen; /* Hardware address length */
573 bootp->bp_xid = ++xid;
574 memcpy(bootp->bp_chaddr, haddr, halen);
575 #ifdef NFS_BOOT_BOOTP_REQFILE
576 strncpy(bootp->bp_file, NFS_BOOT_BOOTP_REQFILE, sizeof(bootp->bp_file));
577 #endif
578 /* Fill-in the vendor data. */
579 memcpy(bootp->bp_vend, vm_rfc1048, 4);
580 #ifdef NFS_BOOT_DHCP
581 bootp->bp_vend[4] = TAG_DHCP_MSGTYPE;
582 bootp->bp_vend[5] = 1;
583 bootp->bp_vend[6] = DHCPDISCOVER;
584 /*
585 * Insert a NetBSD Vendor Class Identifier option.
586 */
587 sprintf(vci, "%s:%s:kernel:%s", ostype, MACHINE, osrelease);
588 vcilen = strlen(vci);
589 bootp->bp_vend[7] = TAG_CLASSID;
590 bootp->bp_vend[8] = vcilen;
591 memcpy(&bootp->bp_vend[9], vci, vcilen);
592 bootp->bp_vend[9 + vcilen] = TAG_END;
593 #else
594 bootp->bp_vend[4] = TAG_END;
595 #endif
596
597 bpc.xid = xid;
598 bpc.haddr = haddr;
599 bpc.halen = halen;
600 bpc.replybuf = malloc(BOOTP_SIZE_MAX, M_DEVBUF, M_WAITOK);
601 if (bpc.replybuf == NULL)
602 panic("nfs_boot: malloc reply buf");
603 #ifdef NFS_BOOT_DHCP
604 bpc.expected_dhcpmsgtype = DHCPOFFER;
605 bpc.dhcp_ok = 0;
606 #endif
607
608 error = nfs_boot_sendrecv(so, nam, bootpset, m,
609 bootpcheck, 0, 0, &bpc);
610 if (error)
611 goto out;
612
613 #ifdef NFS_BOOT_DHCP
614 if (bpc.dhcp_ok) {
615 u_int32_t leasetime;
616 bootp->bp_vend[6] = DHCPREQUEST;
617 bootp->bp_vend[7] = TAG_REQ_ADDR;
618 bootp->bp_vend[8] = 4;
619 memcpy(&bootp->bp_vend[9], &bpc.replybuf->bp_yiaddr, 4);
620 bootp->bp_vend[13] = TAG_SERVERID;
621 bootp->bp_vend[14] = 4;
622 memcpy(&bootp->bp_vend[15], &bpc.dhcp_serverip.s_addr, 4);
623 bootp->bp_vend[19] = TAG_LEASETIME;
624 bootp->bp_vend[20] = 4;
625 leasetime = htonl(300);
626 memcpy(&bootp->bp_vend[21], &leasetime, 4);
627 /*
628 * Insert a NetBSD Vendor Class Identifier option.
629 */
630 sprintf(vci, "%s:%s:kernel:%s", ostype, MACHINE, osrelease);
631 vcilen = strlen(vci);
632 bootp->bp_vend[25] = TAG_CLASSID;
633 bootp->bp_vend[26] = vcilen;
634 memcpy(&bootp->bp_vend[27], vci, vcilen);
635 bootp->bp_vend[27 + vcilen] = TAG_END;
636
637 bpc.expected_dhcpmsgtype = DHCPACK;
638
639 error = nfs_boot_sendrecv(so, nam, bootpset, m,
640 bootpcheck, 0, 0, &bpc);
641 if (error)
642 goto out;
643 }
644 #endif
645
646 /*
647 * bootpcheck() has copied the receive mbuf into
648 * the buffer at bpc.replybuf.
649 */
650 #ifdef NFS_BOOT_DHCP
651 printf("nfs_boot: %s next-server: %s\n",
652 (bpc.dhcp_ok ? "DHCP" : "BOOTP"),
653 #else
654 printf("nfs_boot: BOOTP next-server: %s\n",
655 #endif
656 inet_ntoa(bpc.replybuf->bp_siaddr));
657
658 bootp_extract(bpc.replybuf, bpc.replylen, nd);
659
660 out:
661 if (bpc.replybuf)
662 free(bpc.replybuf, M_DEVBUF);
663 if (m)
664 m_freem(m);
665 if (nam)
666 m_freem(nam);
667 soclose(so);
668 return (error);
669 }
670
671 static void
672 bootp_extract(bootp, replylen, nd)
673 struct bootp *bootp;
674 int replylen;
675 struct nfs_diskless *nd;
676 {
677 struct sockaddr_in *sin;
678 struct in_addr netmask;
679 struct in_addr gateway;
680 struct in_addr rootserver;
681 char *myname; /* my hostname */
682 char *mydomain; /* my domainname */
683 char *rootpath;
684 int mynamelen;
685 int mydomainlen;
686 int rootpathlen;
687 int overloaded;
688 u_int tag, len;
689 u_char *p, *limit;
690
691 /* Default these to "unspecified". */
692 netmask.s_addr = 0;
693 gateway.s_addr = 0;
694 mydomain = myname = rootpath = NULL;
695 mydomainlen = mynamelen = rootpathlen = 0;
696 /* default root server to bootp next-server */
697 rootserver = bootp->bp_siaddr;
698 /* assume that server name field is not overloaded by default */
699 overloaded = 0;
700
701 p = &bootp->bp_vend[4];
702 limit = ((char*)bootp) + replylen;
703 while (p < limit) {
704 tag = *p++;
705 if (tag == TAG_END)
706 break;
707 if (tag == TAG_PAD)
708 continue;
709 len = *p++;
710 #if 0 /* already done in bootpcheck() */
711 if ((p + len) > limit) {
712 printf("nfs_boot: option %d too long\n", tag);
713 break;
714 }
715 #endif
716 switch (tag) {
717 case TAG_SUBNET_MASK:
718 memcpy(&netmask, p, 4);
719 break;
720 case TAG_GATEWAY:
721 /* Routers */
722 memcpy(&gateway, p, 4);
723 break;
724 case TAG_HOST_NAME:
725 if (len >= sizeof(hostname)) {
726 printf("nfs_boot: host name >= %lu bytes",
727 (u_long)sizeof(hostname));
728 break;
729 }
730 myname = p;
731 mynamelen = len;
732 break;
733 case TAG_DOMAIN_NAME:
734 if (len >= sizeof(domainname)) {
735 printf("nfs_boot: domain name >= %lu bytes",
736 (u_long)sizeof(domainname));
737 break;
738 }
739 mydomain = p;
740 mydomainlen = len;
741 break;
742 case TAG_ROOT_PATH:
743 /* Leave some room for the server name. */
744 if (len >= (MNAMELEN-10)) {
745 printf("nfs_boot: rootpath >=%d bytes",
746 (MNAMELEN-10));
747 break;
748 }
749 rootpath = p;
750 rootpathlen = len;
751 break;
752 case TAG_SWAP_SERVER:
753 /* override NFS server address */
754 memcpy(&rootserver, p, 4);
755 break;
756 #ifdef NFS_BOOT_DHCP
757 case TAG_OVERLOAD:
758 if (len > 0 && ((*p & 0x02) != 0))
759 /*
760 * The server name field in the dhcp packet
761 * is overloaded and we can't find server
762 * name there.
763 */
764 overloaded = 1;
765 break;
766 #endif
767 default:
768 break;
769 }
770 p += len;
771 }
772
773 /*
774 * Store and print network config info.
775 */
776 if (myname) {
777 myname[mynamelen] = '\0';
778 strncpy(hostname, myname, sizeof(hostname));
779 hostnamelen = mynamelen;
780 printf("nfs_boot: my_name=%s\n", hostname);
781 }
782 if (mydomain) {
783 mydomain[mydomainlen] = '\0';
784 strncpy(domainname, mydomain, sizeof(domainname));
785 domainnamelen = mydomainlen;
786 printf("nfs_boot: my_domain=%s\n", domainname);
787 }
788 nd->nd_myip = bootp->bp_yiaddr;
789 if (nd->nd_myip.s_addr)
790 printf("nfs_boot: my_addr=%s\n", inet_ntoa(nd->nd_myip));
791 nd->nd_mask = netmask;
792 if (nd->nd_mask.s_addr)
793 printf("nfs_boot: my_mask=%s\n", inet_ntoa(nd->nd_mask));
794 nd->nd_gwip = gateway;
795 if (nd->nd_gwip.s_addr)
796 printf("nfs_boot: gateway=%s\n", inet_ntoa(nd->nd_gwip));
797
798 /*
799 * Store the information about our NFS root mount.
800 * The caller will print it, so be silent here.
801 */
802 {
803 struct nfs_dlmount *ndm = &nd->nd_root;
804
805 /* Server IP address. */
806 sin = (struct sockaddr_in *) &ndm->ndm_saddr;
807 memset((caddr_t)sin, 0, sizeof(*sin));
808 sin->sin_len = sizeof(*sin);
809 sin->sin_family = AF_INET;
810 sin->sin_addr = rootserver;
811 /* Server name. */
812 if (!overloaded && bootp->bp_sname[0] != 0 &&
813 !memcmp(&rootserver, &bootp->bp_siaddr,
814 sizeof(struct in_addr))) {
815 /* standard root server, we have the name */
816 strncpy(ndm->ndm_host, bootp->bp_sname, BP_SNAME_LEN-1);
817 } else {
818 /* Show the server IP address numerically. */
819 strncpy(ndm->ndm_host, inet_ntoa(rootserver),
820 BP_SNAME_LEN-1);
821 }
822 len = strlen(ndm->ndm_host);
823 if (rootpath &&
824 len + 1 + rootpathlen + 1 <= sizeof(ndm->ndm_host)) {
825 ndm->ndm_host[len++] = ':';
826 strncpy(ndm->ndm_host + len,
827 rootpath, rootpathlen);
828 ndm->ndm_host[len + rootpathlen] = '\0';
829 } /* else: upper layer will handle error */
830 }
831 }
Cache object: a52d4ed88443f4c7884b60d4f6ef4937
|