]> git.ipfire.org Git - people/ms/u-boot.git/blob - net/bootp.c
projects / people / ms / u-boot.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
bootp: add ntpserver option to bootp request
[people/ms/u-boot.git] / net / bootp.c
1 /*
2 * Based on LiMon - BOOTP.
3 *
4 * Copyright 1994, 1995, 2000 Neil Russell.
5 * (See License)
6 * Copyright 2000 Roland Borde
7 * Copyright 2000 Paolo Scaffardi
8 * Copyright 2000-2004 Wolfgang Denk, wd@denx.de
9 */
10
11 #include <common.h>
12 #include <command.h>
13 #include <net.h>
14 #include "bootp.h"
15 #include "tftp.h"
16 #include "nfs.h"
17 #ifdef CONFIG_STATUS_LED
18 #include <status_led.h>
19 #endif
20
21 #define BOOTP_VENDOR_MAGIC 0x63825363 /* RFC1048 Magic Cookie */
22
23 #define TIMEOUT 5000UL /* Milliseconds before trying BOOTP again */
24 #ifndef CONFIG_NET_RETRY_COUNT
25 # define TIMEOUT_COUNT 5 /* # of timeouts before giving up */
26 #else
27 # define TIMEOUT_COUNT (CONFIG_NET_RETRY_COUNT)
28 #endif
29
30 #define PORT_BOOTPS 67 /* BOOTP server UDP port */
31 #define PORT_BOOTPC 68 /* BOOTP client UDP port */
32
33 #ifndef CONFIG_DHCP_MIN_EXT_LEN /* minimal length of extension list */
34 #define CONFIG_DHCP_MIN_EXT_LEN 64
35 #endif
36
37 ulong BootpID;
38 int BootpTry;
39 #ifdef CONFIG_BOOTP_RANDOM_DELAY
40 ulong seed1, seed2;
41 #endif
42
43 #if defined(CONFIG_CMD_DHCP)
44 dhcp_state_t dhcp_state = INIT;
45 unsigned long dhcp_leasetime = 0;
46 IPaddr_t NetDHCPServerIP = 0;
47 static void DhcpHandler(uchar *pkt, unsigned dest, IPaddr_t sip, unsigned src,
48 unsigned len);
49
50 /* For Debug */
51 #if 0
52 static char *dhcpmsg2str(int type)
53 {
54 switch (type) {
55 case 1: return "DHCPDISCOVER"; break;
56 case 2: return "DHCPOFFER"; break;
57 case 3: return "DHCPREQUEST"; break;
58 case 4: return "DHCPDECLINE"; break;
59 case 5: return "DHCPACK"; break;
60 case 6: return "DHCPNACK"; break;
61 case 7: return "DHCPRELEASE"; break;
62 default: return "UNKNOWN/INVALID MSG TYPE"; break;
63 }
64 }
65 #endif
66
67 #if defined(CONFIG_BOOTP_VENDOREX)
68 extern u8 *dhcp_vendorex_prep (u8 *e); /*rtn new e after add own opts. */
69 extern u8 *dhcp_vendorex_proc (u8 *e); /*rtn next e if mine,else NULL */
70 #endif
71
72 #endif
73
74 static int BootpCheckPkt(uchar *pkt, unsigned dest, unsigned src, unsigned len)
75 {
76 Bootp_t *bp = (Bootp_t *) pkt;
77 int retval = 0;
78
79 if (dest != PORT_BOOTPC || src != PORT_BOOTPS)
80 retval = -1;
81 else if (len < sizeof (Bootp_t) - OPT_SIZE)
82 retval = -2;
83 else if (bp->bp_op != OP_BOOTREQUEST &&
84 bp->bp_op != OP_BOOTREPLY &&
85 bp->bp_op != DHCP_OFFER &&
86 bp->bp_op != DHCP_ACK &&
87 bp->bp_op != DHCP_NAK ) {
88 retval = -3;
89 }
90 else if (bp->bp_htype != HWT_ETHER)
91 retval = -4;
92 else if (bp->bp_hlen != HWL_ETHER)
93 retval = -5;
94 else if (NetReadLong((ulong*)&bp->bp_id) != BootpID) {
95 retval = -6;
96 }
97
98 debug("Filtering pkt = %d\n", retval);
99
100 return retval;
101 }
102
103 /*
104 * Copy parameters of interest from BOOTP_REPLY/DHCP_OFFER packet
105 */
106 static void BootpCopyNetParams(Bootp_t *bp)
107 {
108 IPaddr_t tmp_ip;
109
110 NetCopyIP(&NetOurIP, &bp->bp_yiaddr);
111 #if !defined(CONFIG_BOOTP_SERVERIP)
112 NetCopyIP(&tmp_ip, &bp->bp_siaddr);
113 if (tmp_ip != 0)
114 NetCopyIP(&NetServerIP, &bp->bp_siaddr);
115 memcpy (NetServerEther, ((Ethernet_t *)NetRxPacket)->et_src, 6);
116 #endif
117 if (strlen(bp->bp_file) > 0)
118 copy_filename (BootFile, bp->bp_file, sizeof(BootFile));
119
120 debug("Bootfile: %s\n", BootFile);
121
122 /* Propagate to environment:
123 * don't delete exising entry when BOOTP / DHCP reply does
124 * not contain a new value
125 */
126 if (*BootFile) {
127 setenv ("bootfile", BootFile);
128 }
129 }
130
131 static int truncate_sz (const char *name, int maxlen, int curlen)
132 {
133 if (curlen >= maxlen) {
134 printf("*** WARNING: %s is too long (%d - max: %d) - truncated\n",
135 name, curlen, maxlen);
136 curlen = maxlen - 1;
137 }
138 return (curlen);
139 }
140
141 #if !defined(CONFIG_CMD_DHCP)
142
143 static void BootpVendorFieldProcess (u8 * ext)
144 {
145 int size = *(ext + 1);
146
147 debug("[BOOTP] Processing extension %d... (%d bytes)\n", *ext,
148 *(ext + 1));
149
150 NetBootFileSize = 0;
151
152 switch (*ext) {
153 /* Fixed length fields */
154 case 1: /* Subnet mask */
155 if (NetOurSubnetMask == 0)
156 NetCopyIP (&NetOurSubnetMask, (IPaddr_t *) (ext + 2));
157 break;
158 case 2: /* Time offset - Not yet supported */
159 break;
160 /* Variable length fields */
161 case 3: /* Gateways list */
162 if (NetOurGatewayIP == 0) {
163 NetCopyIP (&NetOurGatewayIP, (IPaddr_t *) (ext + 2));
164 }
165 break;
166 case 4: /* Time server - Not yet supported */
167 break;
168 case 5: /* IEN-116 name server - Not yet supported */
169 break;
170 case 6:
171 if (NetOurDNSIP == 0) {
172 NetCopyIP (&NetOurDNSIP, (IPaddr_t *) (ext + 2));
173 }
174 #if defined(CONFIG_BOOTP_DNS2)
175 if ((NetOurDNS2IP == 0) && (size > 4)) {
176 NetCopyIP (&NetOurDNS2IP, (IPaddr_t *) (ext + 2 + 4));
177 }
178 #endif
179 break;
180 case 7: /* Log server - Not yet supported */
181 break;
182 case 8: /* Cookie/Quote server - Not yet supported */
183 break;
184 case 9: /* LPR server - Not yet supported */
185 break;
186 case 10: /* Impress server - Not yet supported */
187 break;
188 case 11: /* RPL server - Not yet supported */
189 break;
190 case 12: /* Host name */
191 if (NetOurHostName[0] == 0) {
192 size = truncate_sz ("Host Name", sizeof (NetOurHostName), size);
193 memcpy (&NetOurHostName, ext + 2, size);
194 NetOurHostName[size] = 0;
195 }
196 break;
197 case 13: /* Boot file size */
198 if (size == 2)
199 NetBootFileSize = ntohs (*(ushort *) (ext + 2));
200 else if (size == 4)
201 NetBootFileSize = ntohl (*(ulong *) (ext + 2));
202 break;
203 case 14: /* Merit dump file - Not yet supported */
204 break;
205 case 15: /* Domain name - Not yet supported */
206 break;
207 case 16: /* Swap server - Not yet supported */
208 break;
209 case 17: /* Root path */
210 if (NetOurRootPath[0] == 0) {
211 size = truncate_sz ("Root Path", sizeof (NetOurRootPath), size);
212 memcpy (&NetOurRootPath, ext + 2, size);
213 NetOurRootPath[size] = 0;
214 }
215 break;
216 case 18: /* Extension path - Not yet supported */
217 /*
218 * This can be used to send the information of the
219 * vendor area in another file that the client can
220 * access via TFTP.
221 */
222 break;
223 /* IP host layer fields */
224 case 40: /* NIS Domain name */
225 if (NetOurNISDomain[0] == 0) {
226 size = truncate_sz ("NIS Domain Name", sizeof (NetOurNISDomain), size);
227 memcpy (&NetOurNISDomain, ext + 2, size);
228 NetOurNISDomain[size] = 0;
229 }
230 break;
231 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
232 case 42: /* NTP server IP */
233 NetCopyIP(&NetNtpServerIP, (IPaddr_t *) (ext + 2));
234 break;
235 #endif
236 /* Application layer fields */
237 case 43: /* Vendor specific info - Not yet supported */
238 /*
239 * Binary information to exchange specific
240 * product information.
241 */
242 break;
243 /* Reserved (custom) fields (128..254) */
244 }
245 }
246
247 static void BootpVendorProcess (u8 * ext, int size)
248 {
249 u8 *end = ext + size;
250
251 debug("[BOOTP] Checking extension (%d bytes)...\n", size);
252
253 while ((ext < end) && (*ext != 0xff)) {
254 if (*ext == 0) {
255 ext++;
256 } else {
257 u8 *opt = ext;
258
259 ext += ext[1] + 2;
260 if (ext <= end)
261 BootpVendorFieldProcess (opt);
262 }
263 }
264
265 debug("[BOOTP] Received fields: \n");
266 if (NetOurSubnetMask)
267 debug("NetOurSubnetMask : %pI4\n", &NetOurSubnetMask);
268
269 if (NetOurGatewayIP)
270 debug("NetOurGatewayIP : %pI4", &NetOurGatewayIP);
271
272 if (NetBootFileSize)
273 debug("NetBootFileSize : %d\n", NetBootFileSize);
274
275 if (NetOurHostName[0])
276 debug("NetOurHostName : %s\n", NetOurHostName);
277
278 if (NetOurRootPath[0])
279 debug("NetOurRootPath : %s\n", NetOurRootPath);
280
281 if (NetOurNISDomain[0])
282 debug("NetOurNISDomain : %s\n", NetOurNISDomain);
283
284 if (NetBootFileSize)
285 debug("NetBootFileSize: %d\n", NetBootFileSize);
286
287 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
288 if (NetNtpServerIP)
289 debug("NetNtpServerIP : %pI4\n", &NetNtpServerIP);
290 #endif
291 }
292 /*
293 * Handle a BOOTP received packet.
294 */
295 static void
296 BootpHandler(uchar *pkt, unsigned dest, IPaddr_t sip, unsigned src,
297 unsigned len)
298 {
299 Bootp_t *bp;
300 char *s;
301
302 debug("got BOOTP packet (src=%d, dst=%d, len=%d want_len=%zu)\n",
303 src, dest, len, sizeof (Bootp_t));
304
305 bp = (Bootp_t *)pkt;
306
307 if (BootpCheckPkt(pkt, dest, src, len)) /* Filter out pkts we don't want */
308 return;
309
310 /*
311 * Got a good BOOTP reply. Copy the data into our variables.
312 */
313 #ifdef CONFIG_STATUS_LED
314 status_led_set (STATUS_LED_BOOT, STATUS_LED_OFF);
315 #endif
316
317 BootpCopyNetParams(bp); /* Store net parameters from reply */
318
319 /* Retrieve extended information (we must parse the vendor area) */
320 if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
321 BootpVendorProcess((uchar *)&bp->bp_vend[4], len);
322
323 NetSetTimeout(0, (thand_f *)0);
324
325 debug("Got good BOOTP\n");
326
327 if ((s = getenv("autoload")) != NULL) {
328 if (*s == 'n') {
329 /*
330 * Just use BOOTP to configure system;
331 * Do not use TFTP to load the bootfile.
332 */
333 NetState = NETLOOP_SUCCESS;
334 return;
335 #if defined(CONFIG_CMD_NFS)
336 } else if (strcmp(s, "NFS") == 0) {
337 /*
338 * Use NFS to load the bootfile.
339 */
340 NfsStart();
341 return;
342 #endif
343 }
344 }
345
346 TftpStart();
347 }
348 #endif
349
350 /*
351 * Timeout on BOOTP/DHCP request.
352 */
353 static void
354 BootpTimeout(void)
355 {
356 if (BootpTry >= TIMEOUT_COUNT) {
357 puts ("\nRetry count exceeded; starting again\n");
358 NetStartAgain ();
359 } else {
360 NetSetTimeout (TIMEOUT, BootpTimeout);
361 BootpRequest ();
362 }
363 }
364
365 /*
366 * Initialize BOOTP extension fields in the request.
367 */
368 #if defined(CONFIG_CMD_DHCP)
369 static int DhcpExtended (u8 * e, int message_type, IPaddr_t ServerID, IPaddr_t RequestedIP)
370 {
371 u8 *start = e;
372 u8 *cnt;
373
374 #if defined(CONFIG_BOOTP_VENDOREX)
375 u8 *x;
376 #endif
377 #if defined(CONFIG_BOOTP_SEND_HOSTNAME)
378 char *hostname;
379 #endif
380
381 *e++ = 99; /* RFC1048 Magic Cookie */
382 *e++ = 130;
383 *e++ = 83;
384 *e++ = 99;
385
386 *e++ = 53; /* DHCP Message Type */
387 *e++ = 1;
388 *e++ = message_type;
389
390 *e++ = 57; /* Maximum DHCP Message Size */
391 *e++ = 2;
392 *e++ = (576 - 312 + OPT_SIZE) >> 8;
393 *e++ = (576 - 312 + OPT_SIZE) & 0xff;
394
395 if (ServerID) {
396 int tmp = ntohl (ServerID);
397
398 *e++ = 54; /* ServerID */
399 *e++ = 4;
400 *e++ = tmp >> 24;
401 *e++ = tmp >> 16;
402 *e++ = tmp >> 8;
403 *e++ = tmp & 0xff;
404 }
405
406 if (RequestedIP) {
407 int tmp = ntohl (RequestedIP);
408
409 *e++ = 50; /* Requested IP */
410 *e++ = 4;
411 *e++ = tmp >> 24;
412 *e++ = tmp >> 16;
413 *e++ = tmp >> 8;
414 *e++ = tmp & 0xff;
415 }
416 #if defined(CONFIG_BOOTP_SEND_HOSTNAME)
417 if ((hostname = getenv ("hostname"))) {
418 int hostnamelen = strlen (hostname);
419
420 *e++ = 12; /* Hostname */
421 *e++ = hostnamelen;
422 memcpy (e, hostname, hostnamelen);
423 e += hostnamelen;
424 }
425 #endif
426
427 #if defined(CONFIG_BOOTP_VENDOREX)
428 if ((x = dhcp_vendorex_prep (e)))
429 return x - start;
430 #endif
431
432 *e++ = 55; /* Parameter Request List */
433 cnt = e++; /* Pointer to count of requested items */
434 *cnt = 0;
435 #if defined(CONFIG_BOOTP_SUBNETMASK)
436 *e++ = 1; /* Subnet Mask */
437 *cnt += 1;
438 #endif
439 #if defined(CONFIG_BOOTP_TIMEOFFSET)
440 *e++ = 2;
441 *cnt += 1;
442 #endif
443 #if defined(CONFIG_BOOTP_GATEWAY)
444 *e++ = 3; /* Router Option */
445 *cnt += 1;
446 #endif
447 #if defined(CONFIG_BOOTP_DNS)
448 *e++ = 6; /* DNS Server(s) */
449 *cnt += 1;
450 #endif
451 #if defined(CONFIG_BOOTP_HOSTNAME)
452 *e++ = 12; /* Hostname */
453 *cnt += 1;
454 #endif
455 #if defined(CONFIG_BOOTP_BOOTFILESIZE)
456 *e++ = 13; /* Boot File Size */
457 *cnt += 1;
458 #endif
459 #if defined(CONFIG_BOOTP_BOOTPATH)
460 *e++ = 17; /* Boot path */
461 *cnt += 1;
462 #endif
463 #if defined(CONFIG_BOOTP_NISDOMAIN)
464 *e++ = 40; /* NIS Domain name request */
465 *cnt += 1;
466 #endif
467 #if defined(CONFIG_BOOTP_NTPSERVER)
468 *e++ = 42;
469 *cnt += 1;
470 #endif
471 /* no options, so back up to avoid sending an empty request list */
472 if (*cnt == 0)
473 e -= 2;
474
475 *e++ = 255; /* End of the list */
476
477 /* Pad to minimal length */
478 #ifdef CONFIG_DHCP_MIN_EXT_LEN
479 while ((e - start) < CONFIG_DHCP_MIN_EXT_LEN)
480 *e++ = 0;
481 #endif
482
483 return e - start;
484 }
485
486 #else
487 /*
488 * Warning: no field size check - change CONFIG_BOOTP_* at your own risk!
489 */
490 static int BootpExtended (u8 * e)
491 {
492 u8 *start = e;
493
494 *e++ = 99; /* RFC1048 Magic Cookie */
495 *e++ = 130;
496 *e++ = 83;
497 *e++ = 99;
498
499 #if defined(CONFIG_CMD_DHCP)
500 *e++ = 53; /* DHCP Message Type */
501 *e++ = 1;
502 *e++ = DHCP_DISCOVER;
503
504 *e++ = 57; /* Maximum DHCP Message Size */
505 *e++ = 2;
506 *e++ = (576 - 312 + OPT_SIZE) >> 16;
507 *e++ = (576 - 312 + OPT_SIZE) & 0xff;
508 #endif
509
510 #if defined(CONFIG_BOOTP_SUBNETMASK)
511 *e++ = 1; /* Subnet mask request */
512 *e++ = 4;
513 e += 4;
514 #endif
515
516 #if defined(CONFIG_BOOTP_GATEWAY)
517 *e++ = 3; /* Default gateway request */
518 *e++ = 4;
519 e += 4;
520 #endif
521
522 #if defined(CONFIG_BOOTP_DNS)
523 *e++ = 6; /* Domain Name Server */
524 *e++ = 4;
525 e += 4;
526 #endif
527
528 #if defined(CONFIG_BOOTP_HOSTNAME)
529 *e++ = 12; /* Host name request */
530 *e++ = 32;
531 e += 32;
532 #endif
533
534 #if defined(CONFIG_BOOTP_BOOTFILESIZE)
535 *e++ = 13; /* Boot file size */
536 *e++ = 2;
537 e += 2;
538 #endif
539
540 #if defined(CONFIG_BOOTP_BOOTPATH)
541 *e++ = 17; /* Boot path */
542 *e++ = 32;
543 e += 32;
544 #endif
545
546 #if defined(CONFIG_BOOTP_NISDOMAIN)
547 *e++ = 40; /* NIS Domain name request */
548 *e++ = 32;
549 e += 32;
550 #endif
551 #if defined(CONFIG_BOOTP_NTPSERVER)
552 *e++ = 42;
553 *e++ = 4;
554 e += 4;
555 #endif
556
557 *e++ = 255; /* End of the list */
558
559 return e - start;
560 }
561 #endif
562
563 void
564 BootpRequest (void)
565 {
566 volatile uchar *pkt, *iphdr;
567 Bootp_t *bp;
568 int ext_len, pktlen, iplen;
569
570 #if defined(CONFIG_CMD_DHCP)
571 dhcp_state = INIT;
572 #endif
573
574 #ifdef CONFIG_BOOTP_RANDOM_DELAY /* Random BOOTP delay */
575 unsigned char bi_enetaddr[6];
576 int reg;
577 ulong tst1, tst2, sum, m_mask, m_value = 0;
578
579 if (BootpTry ==0) {
580 /* get our mac */
581 eth_getenv_enetaddr("ethaddr", bi_enetaddr);
582
583 debug("BootpRequest => Our Mac: ");
584 for (reg=0; reg<6; reg++)
585 debug("%x%c", bi_enetaddr[reg], reg==5 ? '\n' : ':');
586
587 /* Mac-Manipulation 2 get seed1 */
588 tst1=0;
589 tst2=0;
590 for (reg=2; reg<6; reg++) {
591 tst1 = tst1 << 8;
592 tst1 = tst1 | bi_enetaddr[reg];
593 }
594 for (reg=0; reg<2; reg++) {
595 tst2 = tst2 | bi_enetaddr[reg];
596 tst2 = tst2 << 8;
597 }
598
599 seed1 = tst1^tst2;
600
601 /* Mirror seed1*/
602 m_mask=0x1;
603 for (reg=1;reg<=32;reg++) {
604 m_value |= (m_mask & seed1);
605 seed1 = seed1 >> 1;
606 m_value = m_value << 1;
607 }
608 seed1 = m_value;
609 seed2 = 0xB78D0945;
610 }
611
612 /* Random Number Generator */
613
614 for (reg=0;reg<=0;reg++) {
615 sum = seed1 + seed2;
616 if (sum < seed1 || sum < seed2)
617 sum++;
618 seed2 = seed1;
619 seed1 = sum;
620
621 if (BootpTry<=2) { /* Start with max 1024 * 1ms */
622 sum = sum >> (22-BootpTry);
623 } else { /*After 3rd BOOTP request max 8192 * 1ms */
624 sum = sum >> 19;
625 }
626 }
627
628 printf ("Random delay: %ld ms...\n", sum);
629 for (reg=0; reg <sum; reg++) {
630 udelay(1000); /*Wait 1ms*/
631 }
632 #endif /* CONFIG_BOOTP_RANDOM_DELAY */
633
634 printf("BOOTP broadcast %d\n", ++BootpTry);
635 pkt = NetTxPacket;
636 memset ((void*)pkt, 0, PKTSIZE);
637
638 pkt += NetSetEther(pkt, NetBcastAddr, PROT_IP);
639
640 /*
641 * Next line results in incorrect packet size being transmitted, resulting
642 * in errors in some DHCP servers, reporting missing bytes. Size must be
643 * set in packet header after extension length has been determined.
644 * C. Hallinan, DS4.COM, Inc.
645 */
646 /* NetSetIP(pkt, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, sizeof (Bootp_t)); */
647 iphdr = pkt; /* We need this later for NetSetIP() */
648 pkt += IP_HDR_SIZE;
649
650 bp = (Bootp_t *)pkt;
651 bp->bp_op = OP_BOOTREQUEST;
652 bp->bp_htype = HWT_ETHER;
653 bp->bp_hlen = HWL_ETHER;
654 bp->bp_hops = 0;
655 bp->bp_secs = htons(get_timer(0) / 1000);
656 NetWriteIP(&bp->bp_ciaddr, 0);
657 NetWriteIP(&bp->bp_yiaddr, 0);
658 NetWriteIP(&bp->bp_siaddr, 0);
659 NetWriteIP(&bp->bp_giaddr, 0);
660 memcpy (bp->bp_chaddr, NetOurEther, 6);
661 copy_filename (bp->bp_file, BootFile, sizeof(bp->bp_file));
662
663 /* Request additional information from the BOOTP/DHCP server */
664 #if defined(CONFIG_CMD_DHCP)
665 ext_len = DhcpExtended((u8 *)bp->bp_vend, DHCP_DISCOVER, 0, 0);
666 #else
667 ext_len = BootpExtended((u8 *)bp->bp_vend);
668 #endif
669
670 /*
671 * Bootp ID is the lower 4 bytes of our ethernet address
672 * plus the current time in ms.
673 */
674 BootpID = ((ulong)NetOurEther[2] << 24)
675 | ((ulong)NetOurEther[3] << 16)
676 | ((ulong)NetOurEther[4] << 8)
677 | (ulong)NetOurEther[5];
678 BootpID += get_timer(0);
679 BootpID = htonl(BootpID);
680 NetCopyLong(&bp->bp_id, &BootpID);
681
682 /*
683 * Calculate proper packet lengths taking into account the
684 * variable size of the options field
685 */
686 pktlen = ((int)(pkt-NetTxPacket)) + BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + ext_len;
687 iplen = BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + ext_len;
688 NetSetIP(iphdr, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, iplen);
689 NetSetTimeout(SELECT_TIMEOUT, BootpTimeout);
690
691 #if defined(CONFIG_CMD_DHCP)
692 dhcp_state = SELECTING;
693 NetSetHandler(DhcpHandler);
694 #else
695 NetSetHandler(BootpHandler);
696 #endif
697 NetSendPacket(NetTxPacket, pktlen);
698 }
699
700 #if defined(CONFIG_CMD_DHCP)
701 static void DhcpOptionsProcess (uchar * popt, Bootp_t *bp)
702 {
703 uchar *end = popt + BOOTP_HDR_SIZE;
704 int oplen, size;
705 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_TIMEOFFSET)
706 int *to_ptr;
707 #endif
708
709 while (popt < end && *popt != 0xff) {
710 oplen = *(popt + 1);
711 switch (*popt) {
712 case 1:
713 NetCopyIP (&NetOurSubnetMask, (popt + 2));
714 break;
715 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_TIMEOFFSET)
716 case 2: /* Time offset */
717 to_ptr = &NetTimeOffset;
718 NetCopyLong ((ulong *)to_ptr, (ulong *)(popt + 2));
719 NetTimeOffset = ntohl (NetTimeOffset);
720 break;
721 #endif
722 case 3:
723 NetCopyIP (&NetOurGatewayIP, (popt + 2));
724 break;
725 case 6:
726 NetCopyIP (&NetOurDNSIP, (popt + 2));
727 #if defined(CONFIG_BOOTP_DNS2)
728 if (*(popt + 1) > 4) {
729 NetCopyIP (&NetOurDNS2IP, (popt + 2 + 4));
730 }
731 #endif
732 break;
733 case 12:
734 size = truncate_sz ("Host Name", sizeof (NetOurHostName), oplen);
735 memcpy (&NetOurHostName, popt + 2, size);
736 NetOurHostName[size] = 0;
737 break;
738 case 15: /* Ignore Domain Name Option */
739 break;
740 case 17:
741 size = truncate_sz ("Root Path", sizeof (NetOurRootPath), oplen);
742 memcpy (&NetOurRootPath, popt + 2, size);
743 NetOurRootPath[size] = 0;
744 break;
745 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
746 case 42: /* NTP server IP */
747 NetCopyIP (&NetNtpServerIP, (popt + 2));
748 break;
749 #endif
750 case 51:
751 NetCopyLong (&dhcp_leasetime, (ulong *) (popt + 2));
752 break;
753 case 53: /* Ignore Message Type Option */
754 break;
755 case 54:
756 NetCopyIP (&NetDHCPServerIP, (popt + 2));
757 break;
758 case 58: /* Ignore Renewal Time Option */
759 break;
760 case 59: /* Ignore Rebinding Time Option */
761 break;
762 case 66: /* Ignore TFTP server name */
763 break;
764 case 67: /* vendor opt bootfile */
765 /*
766 * I can't use dhcp_vendorex_proc here because I need
767 * to write into the bootp packet - even then I had to
768 * pass the bootp packet pointer into here as the
769 * second arg
770 */
771 size = truncate_sz ("Opt Boot File",
772 sizeof(bp->bp_file),
773 oplen);
774 if (bp->bp_file[0] == '\0' && size > 0) {
775 /*
776 * only use vendor boot file if we didn't
777 * receive a boot file in the main non-vendor
778 * part of the packet - god only knows why
779 * some vendors chose not to use this perfectly
780 * good spot to store the boot file (join on
781 * Tru64 Unix) it seems mind bogglingly crazy
782 * to me
783 */
784 printf("*** WARNING: using vendor "
785 "optional boot file\n");
786 memcpy(bp->bp_file, popt + 2, size);
787 bp->bp_file[size] = '\0';
788 }
789 break;
790 default:
791 #if defined(CONFIG_BOOTP_VENDOREX)
792 if (dhcp_vendorex_proc (popt))
793 break;
794 #endif
795 printf ("*** Unhandled DHCP Option in OFFER/ACK: %d\n", *popt);
796 break;
797 }
798 popt += oplen + 2; /* Process next option */
799 }
800 }
801
802 static int DhcpMessageType(unsigned char *popt)
803 {
804 if (NetReadLong((ulong*)popt) != htonl(BOOTP_VENDOR_MAGIC))
805 return -1;
806
807 popt += 4;
808 while ( *popt != 0xff ) {
809 if ( *popt == 53 ) /* DHCP Message Type */
810 return *(popt + 2);
811 popt += *(popt + 1) + 2; /* Scan through all options */
812 }
813 return -1;
814 }
815
816 static void DhcpSendRequestPkt(Bootp_t *bp_offer)
817 {
818 volatile uchar *pkt, *iphdr;
819 Bootp_t *bp;
820 int pktlen, iplen, extlen;
821 IPaddr_t OfferedIP;
822
823 debug("DhcpSendRequestPkt: Sending DHCPREQUEST\n");
824 pkt = NetTxPacket;
825 memset ((void*)pkt, 0, PKTSIZE);
826
827 pkt += NetSetEther(pkt, NetBcastAddr, PROT_IP);
828
829 iphdr = pkt; /* We'll need this later to set proper pkt size */
830 pkt += IP_HDR_SIZE;
831
832 bp = (Bootp_t *)pkt;
833 bp->bp_op = OP_BOOTREQUEST;
834 bp->bp_htype = HWT_ETHER;
835 bp->bp_hlen = HWL_ETHER;
836 bp->bp_hops = 0;
837 bp->bp_secs = htons(get_timer(0) / 1000);
838 /* Do not set the client IP, your IP, or server IP yet, since it hasn't been ACK'ed by
839 * the server yet */
840
841 /*
842 * RFC3046 requires Relay Agents to discard packets with
843 * nonzero and offered giaddr
844 */
845 NetWriteIP(&bp->bp_giaddr, 0);
846
847 memcpy (bp->bp_chaddr, NetOurEther, 6);
848
849 /*
850 * ID is the id of the OFFER packet
851 */
852
853 NetCopyLong(&bp->bp_id, &bp_offer->bp_id);
854
855 /*
856 * Copy options from OFFER packet if present
857 */
858
859 /* Copy offered IP into the parameters request list */
860 NetCopyIP(&OfferedIP, &bp_offer->bp_yiaddr);
861 extlen = DhcpExtended((u8 *)bp->bp_vend, DHCP_REQUEST, NetDHCPServerIP, OfferedIP);
862
863 pktlen = ((int)(pkt-NetTxPacket)) + BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + extlen;
864 iplen = BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + extlen;
865 NetSetIP(iphdr, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, iplen);
866
867 debug("Transmitting DHCPREQUEST packet: len = %d\n", pktlen);
868 #ifdef CONFIG_BOOTP_DHCP_REQUEST_DELAY
869 udelay(CONFIG_BOOTP_DHCP_REQUEST_DELAY);
870 #endif /* CONFIG_BOOTP_DHCP_REQUEST_DELAY */
871 NetSendPacket(NetTxPacket, pktlen);
872 }
873
874 /*
875 * Handle DHCP received packets.
876 */
877 static void
878 DhcpHandler(uchar *pkt, unsigned dest, IPaddr_t sip, unsigned src,
879 unsigned len)
880 {
881 Bootp_t *bp = (Bootp_t *)pkt;
882
883 debug("DHCPHandler: got packet: (src=%d, dst=%d, len=%d) state: %d\n",
884 src, dest, len, dhcp_state);
885
886 if (BootpCheckPkt(pkt, dest, src, len)) /* Filter out pkts we don't want */
887 return;
888
889 debug("DHCPHandler: got DHCP packet: (src=%d, dst=%d, len=%d) state: %d\n",
890 src, dest, len, dhcp_state);
891
892 switch (dhcp_state) {
893 case SELECTING:
894 /*
895 * Wait an appropriate time for any potential DHCPOFFER packets
896 * to arrive. Then select one, and generate DHCPREQUEST response.
897 * If filename is in format we recognize, assume it is a valid
898 * OFFER from a server we want.
899 */
900 debug("DHCP: state=SELECTING bp_file: \"%s\"\n", bp->bp_file);
901 #ifdef CONFIG_SYS_BOOTFILE_PREFIX
902 if (strncmp(bp->bp_file,
903 CONFIG_SYS_BOOTFILE_PREFIX,
904 strlen(CONFIG_SYS_BOOTFILE_PREFIX)) == 0 ) {
905 #endif /* CONFIG_SYS_BOOTFILE_PREFIX */
906
907 debug("TRANSITIONING TO REQUESTING STATE\n");
908 dhcp_state = REQUESTING;
909
910 if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
911 DhcpOptionsProcess((u8 *)&bp->bp_vend[4], bp);
912
913 NetSetTimeout(TIMEOUT, BootpTimeout);
914 DhcpSendRequestPkt(bp);
915 #ifdef CONFIG_SYS_BOOTFILE_PREFIX
916 }
917 #endif /* CONFIG_SYS_BOOTFILE_PREFIX */
918
919 return;
920 break;
921 case REQUESTING:
922 debug("DHCP State: REQUESTING\n");
923
924 if ( DhcpMessageType((u8 *)bp->bp_vend) == DHCP_ACK ) {
925 char *s;
926
927 if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
928 DhcpOptionsProcess((u8 *)&bp->bp_vend[4], bp);
929 BootpCopyNetParams(bp); /* Store net params from reply */
930 dhcp_state = BOUND;
931 printf ("DHCP client bound to address %pI4\n", &NetOurIP);
932
933 /* Obey the 'autoload' setting */
934 if ((s = getenv("autoload")) != NULL) {
935 if (*s == 'n') {
936 /*
937 * Just use BOOTP to configure system;
938 * Do not use TFTP to load the bootfile.
939 */
940 NetState = NETLOOP_SUCCESS;
941 return;
942 #if defined(CONFIG_CMD_NFS)
943 } else if (strcmp(s, "NFS") == 0) {
944 /*
945 * Use NFS to load the bootfile.
946 */
947 NfsStart();
948 return;
949 #endif
950 }
951 }
952 TftpStart();
953 return;
954 }
955 break;
956 case BOUND:
957 /* DHCP client bound to address */
958 break;
959 default:
960 puts ("DHCP: INVALID STATE\n");
961 break;
962 }
963
964 }
965
966 void DhcpRequest(void)
967 {
968 BootpRequest();
969 }
970 #endif /* CONFIG_CMD_DHCP */
"Das U-Boot" Source Tree