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