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