2 * Based on LiMon - BOOTP.
4 * Copyright 1994, 1995, 2000 Neil Russell.
6 * Copyright 2000 Roland Borde
7 * Copyright 2000 Paolo Scaffardi
8 * Copyright 2000-2004 Wolfgang Denk, wd@denx.de
12 #include <bootstage.h>
15 #include <efi_loader.h>
20 #include <linux/delay.h>
23 #ifdef CONFIG_LED_STATUS
24 #include <status_led.h>
26 #ifdef CONFIG_BOOTP_RANDOM_DELAY
30 #define BOOTP_VENDOR_MAGIC 0x63825363 /* RFC1048 Magic Cookie */
33 * The timeout for the initial BOOTP/DHCP request used to be described by a
34 * counter of fixed-length timeout periods. TIMEOUT_COUNT represents
37 * Now that the timeout periods are variable (exponential backoff and retry)
38 * we convert the timeout count to the absolute time it would have take to
39 * execute that many retries, and keep sending retry packets until that time
42 #ifndef CONFIG_NET_RETRY_COUNT
43 # define TIMEOUT_COUNT 5 /* # of timeouts before giving up */
45 # define TIMEOUT_COUNT (CONFIG_NET_RETRY_COUNT)
47 #define TIMEOUT_MS ((3 + (TIMEOUT_COUNT * 5)) * 1000)
49 #define PORT_BOOTPS 67 /* BOOTP server UDP port */
50 #define PORT_BOOTPC 68 /* BOOTP client UDP port */
52 #ifndef CONFIG_DHCP_MIN_EXT_LEN /* minimal length of extension list */
53 #define CONFIG_DHCP_MIN_EXT_LEN 64
56 #ifndef CONFIG_BOOTP_ID_CACHE_SIZE
57 #define CONFIG_BOOTP_ID_CACHE_SIZE 4
60 u32 bootp_ids
[CONFIG_BOOTP_ID_CACHE_SIZE
];
61 unsigned int bootp_num_ids
;
65 char net_nis_domain
[32] = {0,}; /* Our NIS domain */
66 char net_hostname
[32] = {0,}; /* Our hostname */
67 char net_root_path
[64] = {0,}; /* Our bootpath */
69 static ulong time_taken_max
;
71 #if defined(CONFIG_CMD_DHCP)
72 static dhcp_state_t dhcp_state
= INIT
;
73 static u32 dhcp_leasetime
;
74 static struct in_addr dhcp_server_ip
;
75 static u8 dhcp_option_overload
;
76 #define OVERLOAD_FILE 1
77 #define OVERLOAD_SNAME 2
78 static void dhcp_handler(uchar
*pkt
, unsigned dest
, struct in_addr sip
,
79 unsigned src
, unsigned len
);
83 static char *dhcpmsg2str(int type
)
86 case 1: return "DHCPDISCOVER"; break;
87 case 2: return "DHCPOFFER"; break;
88 case 3: return "DHCPREQUEST"; break;
89 case 4: return "DHCPDECLINE"; break;
90 case 5: return "DHCPACK"; break;
91 case 6: return "DHCPNACK"; break;
92 case 7: return "DHCPRELEASE"; break;
93 default: return "UNKNOWN/INVALID MSG TYPE"; break;
99 static void bootp_add_id(ulong id
)
101 if (bootp_num_ids
>= ARRAY_SIZE(bootp_ids
)) {
102 size_t size
= sizeof(bootp_ids
) - sizeof(id
);
104 memmove(bootp_ids
, &bootp_ids
[1], size
);
105 bootp_ids
[bootp_num_ids
- 1] = id
;
107 bootp_ids
[bootp_num_ids
] = id
;
112 static bool bootp_match_id(ulong id
)
116 for (i
= 0; i
< bootp_num_ids
; i
++)
117 if (bootp_ids
[i
] == id
)
123 static int check_reply_packet(uchar
*pkt
, unsigned dest
, unsigned src
,
126 struct bootp_hdr
*bp
= (struct bootp_hdr
*)pkt
;
129 if (dest
!= PORT_BOOTPC
|| src
!= PORT_BOOTPS
)
131 else if (len
< sizeof(struct bootp_hdr
) - OPT_FIELD_SIZE
)
133 else if (bp
->bp_op
!= OP_BOOTREPLY
)
135 else if (bp
->bp_htype
!= HWT_ETHER
)
137 else if (bp
->bp_hlen
!= HWL_ETHER
)
139 else if (!bootp_match_id(net_read_u32(&bp
->bp_id
)))
141 else if (memcmp(bp
->bp_chaddr
, net_ethaddr
, HWL_ETHER
) != 0)
144 debug("Filtering pkt = %d\n", retval
);
150 * Copy parameters of interest from BOOTP_REPLY/DHCP_OFFER packet
152 static void store_net_params(struct bootp_hdr
*bp
)
154 #if !defined(CONFIG_BOOTP_SERVERIP)
155 struct in_addr tmp_ip
;
156 bool overwrite_serverip
= true;
158 #if defined(CONFIG_BOOTP_PREFER_SERVERIP)
159 overwrite_serverip
= false;
162 net_copy_ip(&tmp_ip
, &bp
->bp_siaddr
);
163 if (tmp_ip
.s_addr
!= 0 && (overwrite_serverip
|| !net_server_ip
.s_addr
))
164 net_copy_ip(&net_server_ip
, &bp
->bp_siaddr
);
165 memcpy(net_server_ethaddr
,
166 ((struct ethernet_hdr
*)net_rx_packet
)->et_src
, 6);
168 #if defined(CONFIG_CMD_DHCP)
169 !(dhcp_option_overload
& OVERLOAD_FILE
) &&
171 (strlen(bp
->bp_file
) > 0) &&
172 !net_boot_file_name_explicit
) {
173 copy_filename(net_boot_file_name
, bp
->bp_file
,
174 sizeof(net_boot_file_name
));
177 debug("net_boot_file_name: %s\n", net_boot_file_name
);
179 /* Propagate to environment:
180 * don't delete exising entry when BOOTP / DHCP reply does
181 * not contain a new value
183 if (*net_boot_file_name
)
184 env_set("bootfile", net_boot_file_name
);
186 net_copy_ip(&net_ip
, &bp
->bp_yiaddr
);
189 static int truncate_sz(const char *name
, int maxlen
, int curlen
)
191 if (curlen
>= maxlen
) {
192 printf("*** WARNING: %s is too long (%d - max: %d)"
193 " - truncated\n", name
, curlen
, maxlen
);
199 #if !defined(CONFIG_CMD_DHCP)
201 static void bootp_process_vendor_field(u8
*ext
)
203 int size
= *(ext
+ 1);
205 debug("[BOOTP] Processing extension %d... (%d bytes)\n", *ext
,
208 net_boot_file_expected_size_in_blocks
= 0;
211 /* Fixed length fields */
212 case 1: /* Subnet mask */
213 if (net_netmask
.s_addr
== 0)
214 net_copy_ip(&net_netmask
, (struct in_addr
*)(ext
+ 2));
216 case 2: /* Time offset - Not yet supported */
218 /* Variable length fields */
219 case 3: /* Gateways list */
220 if (net_gateway
.s_addr
== 0)
221 net_copy_ip(&net_gateway
, (struct in_addr
*)(ext
+ 2));
223 case 4: /* Time server - Not yet supported */
225 case 5: /* IEN-116 name server - Not yet supported */
228 if (net_dns_server
.s_addr
== 0)
229 net_copy_ip(&net_dns_server
,
230 (struct in_addr
*)(ext
+ 2));
231 #if defined(CONFIG_BOOTP_DNS2)
232 if ((net_dns_server2
.s_addr
== 0) && (size
> 4))
233 net_copy_ip(&net_dns_server2
,
234 (struct in_addr
*)(ext
+ 2 + 4));
237 case 7: /* Log server - Not yet supported */
239 case 8: /* Cookie/Quote server - Not yet supported */
241 case 9: /* LPR server - Not yet supported */
243 case 10: /* Impress server - Not yet supported */
245 case 11: /* RPL server - Not yet supported */
247 case 12: /* Host name */
248 if (net_hostname
[0] == 0) {
249 size
= truncate_sz("Host Name",
250 sizeof(net_hostname
), size
);
251 memcpy(&net_hostname
, ext
+ 2, size
);
252 net_hostname
[size
] = 0;
255 case 13: /* Boot file size */
257 net_boot_file_expected_size_in_blocks
=
258 ntohs(*(ushort
*)(ext
+ 2));
260 net_boot_file_expected_size_in_blocks
=
261 ntohl(*(ulong
*)(ext
+ 2));
263 case 14: /* Merit dump file - Not yet supported */
265 case 15: /* Domain name - Not yet supported */
267 case 16: /* Swap server - Not yet supported */
269 case 17: /* Root path */
270 if (net_root_path
[0] == 0) {
271 size
= truncate_sz("Root Path",
272 sizeof(net_root_path
), size
);
273 memcpy(&net_root_path
, ext
+ 2, size
);
274 net_root_path
[size
] = 0;
277 case 18: /* Extension path - Not yet supported */
279 * This can be used to send the information of the
280 * vendor area in another file that the client can
284 /* IP host layer fields */
285 case 40: /* NIS Domain name */
286 if (net_nis_domain
[0] == 0) {
287 size
= truncate_sz("NIS Domain Name",
288 sizeof(net_nis_domain
), size
);
289 memcpy(&net_nis_domain
, ext
+ 2, size
);
290 net_nis_domain
[size
] = 0;
293 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
294 case 42: /* NTP server IP */
295 net_copy_ip(&net_ntp_server
, (struct in_addr
*)(ext
+ 2));
298 /* Application layer fields */
299 case 43: /* Vendor specific info - Not yet supported */
301 * Binary information to exchange specific
302 * product information.
305 /* Reserved (custom) fields (128..254) */
309 static void bootp_process_vendor(u8
*ext
, int size
)
311 u8
*end
= ext
+ size
;
313 debug("[BOOTP] Checking extension (%d bytes)...\n", size
);
315 while ((ext
< end
) && (*ext
!= 0xff)) {
323 bootp_process_vendor_field(opt
);
327 debug("[BOOTP] Received fields:\n");
328 if (net_netmask
.s_addr
)
329 debug("net_netmask : %pI4\n", &net_netmask
);
331 if (net_gateway
.s_addr
)
332 debug("net_gateway : %pI4", &net_gateway
);
334 if (net_boot_file_expected_size_in_blocks
)
335 debug("net_boot_file_expected_size_in_blocks : %d\n",
336 net_boot_file_expected_size_in_blocks
);
339 debug("net_hostname : %s\n", net_hostname
);
341 if (net_root_path
[0])
342 debug("net_root_path : %s\n", net_root_path
);
344 if (net_nis_domain
[0])
345 debug("net_nis_domain : %s\n", net_nis_domain
);
347 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
348 if (net_ntp_server
.s_addr
)
349 debug("net_ntp_server : %pI4\n", &net_ntp_server
);
354 * Handle a BOOTP received packet.
356 static void bootp_handler(uchar
*pkt
, unsigned dest
, struct in_addr sip
,
357 unsigned src
, unsigned len
)
359 struct bootp_hdr
*bp
;
361 debug("got BOOTP packet (src=%d, dst=%d, len=%d want_len=%zu)\n",
362 src
, dest
, len
, sizeof(struct bootp_hdr
));
364 bp
= (struct bootp_hdr
*)pkt
;
366 /* Filter out pkts we don't want */
367 if (check_reply_packet(pkt
, dest
, src
, len
))
371 * Got a good BOOTP reply. Copy the data into our variables.
373 #if defined(CONFIG_LED_STATUS) && defined(CONFIG_LED_STATUS_BOOT_ENABLE)
374 status_led_set(CONFIG_LED_STATUS_BOOT
, CONFIG_LED_STATUS_OFF
);
377 store_net_params(bp
); /* Store net parameters from reply */
379 /* Retrieve extended information (we must parse the vendor area) */
380 if (net_read_u32((u32
*)&bp
->bp_vend
[0]) == htonl(BOOTP_VENDOR_MAGIC
))
381 bootp_process_vendor((uchar
*)&bp
->bp_vend
[4], len
);
383 net_set_timeout_handler(0, (thand_f
*)0);
384 bootstage_mark_name(BOOTSTAGE_ID_BOOTP_STOP
, "bootp_stop");
386 debug("Got good BOOTP\n");
393 * Timeout on BOOTP/DHCP request.
395 static void bootp_timeout_handler(void)
397 ulong time_taken
= get_timer(bootp_start
);
399 if (time_taken
>= time_taken_max
) {
400 #ifdef CONFIG_BOOTP_MAY_FAIL
403 ethrotate
= env_get("ethrotate");
404 if ((ethrotate
&& strcmp(ethrotate
, "no") == 0) ||
406 puts("\nRetry time exceeded\n");
407 net_set_state(NETLOOP_FAIL
);
411 puts("\nRetry time exceeded; starting again\n");
416 if (bootp_timeout
> 2000)
417 bootp_timeout
= 2000;
418 net_set_timeout_handler(bootp_timeout
, bootp_timeout_handler
);
423 #define put_vci(e, str) \
425 size_t vci_strlen = strlen(str); \
426 *e++ = 60; /* Vendor Class Identifier */ \
428 memcpy(e, str, vci_strlen); \
432 static u8
*add_vci(u8
*e
)
435 char *env_vci
= env_get("bootp_vci");
437 #if defined(CONFIG_SPL_BUILD) && defined(CONFIG_SPL_NET_VCI_STRING)
438 vci
= CONFIG_SPL_NET_VCI_STRING
;
439 #elif defined(CONFIG_BOOTP_VCI_STRING)
440 vci
= CONFIG_BOOTP_VCI_STRING
;
453 * Initialize BOOTP extension fields in the request.
455 #if defined(CONFIG_CMD_DHCP)
456 static int dhcp_extended(u8
*e
, int message_type
, struct in_addr server_ip
,
457 struct in_addr requested_ip
)
461 #ifdef CONFIG_LIB_UUID
466 #if defined(CONFIG_BOOTP_VENDOREX)
469 #if defined(CONFIG_BOOTP_SEND_HOSTNAME)
473 *e
++ = 99; /* RFC1048 Magic Cookie */
478 *e
++ = 53; /* DHCP Message Type */
482 *e
++ = 57; /* Maximum DHCP Message Size */
484 *e
++ = (576 - 312 + OPT_FIELD_SIZE
) >> 8;
485 *e
++ = (576 - 312 + OPT_FIELD_SIZE
) & 0xff;
487 if (server_ip
.s_addr
) {
488 int tmp
= ntohl(server_ip
.s_addr
);
490 *e
++ = 54; /* ServerID */
498 if (requested_ip
.s_addr
) {
499 int tmp
= ntohl(requested_ip
.s_addr
);
501 *e
++ = 50; /* Requested IP */
508 #if defined(CONFIG_BOOTP_SEND_HOSTNAME)
509 hostname
= env_get("hostname");
511 int hostnamelen
= strlen(hostname
);
513 *e
++ = 12; /* Hostname */
515 memcpy(e
, hostname
, hostnamelen
);
520 #ifdef CONFIG_BOOTP_PXE_CLIENTARCH
521 clientarch
= CONFIG_BOOTP_PXE_CLIENTARCH
;
524 if (env_get("bootp_arch"))
525 clientarch
= env_get_ulong("bootp_arch", 16, clientarch
);
527 if (clientarch
> 0) {
528 *e
++ = 93; /* Client System Architecture */
530 *e
++ = (clientarch
>> 8) & 0xff;
531 *e
++ = clientarch
& 0xff;
534 *e
++ = 94; /* Client Network Interface Identifier */
536 *e
++ = 1; /* type field for UNDI */
537 *e
++ = 0; /* major revision */
538 *e
++ = 0; /* minor revision */
540 #ifdef CONFIG_LIB_UUID
541 uuid
= env_get("pxeuuid");
544 if (uuid_str_valid(uuid
)) {
545 *e
++ = 97; /* Client Machine Identifier */
547 *e
++ = 0; /* type 0 - UUID */
549 uuid_str_to_bin(uuid
, e
, UUID_STR_FORMAT_STD
);
552 printf("Invalid pxeuuid: %s\n", uuid
);
559 #if defined(CONFIG_BOOTP_VENDOREX)
560 x
= dhcp_vendorex_prep(e
);
565 *e
++ = 55; /* Parameter Request List */
566 cnt
= e
++; /* Pointer to count of requested items */
568 #if defined(CONFIG_BOOTP_SUBNETMASK)
569 *e
++ = 1; /* Subnet Mask */
572 #if defined(CONFIG_BOOTP_TIMEOFFSET)
576 #if defined(CONFIG_BOOTP_GATEWAY)
577 *e
++ = 3; /* Router Option */
580 #if defined(CONFIG_BOOTP_DNS)
581 *e
++ = 6; /* DNS Server(s) */
584 #if defined(CONFIG_BOOTP_HOSTNAME)
585 *e
++ = 12; /* Hostname */
588 #if defined(CONFIG_BOOTP_BOOTFILESIZE)
589 *e
++ = 13; /* Boot File Size */
592 #if defined(CONFIG_BOOTP_BOOTPATH)
593 *e
++ = 17; /* Boot path */
596 #if defined(CONFIG_BOOTP_NISDOMAIN)
597 *e
++ = 40; /* NIS Domain name request */
600 #if defined(CONFIG_BOOTP_NTPSERVER)
604 /* no options, so back up to avoid sending an empty request list */
608 *e
++ = 255; /* End of the list */
610 /* Pad to minimal length */
611 #ifdef CONFIG_DHCP_MIN_EXT_LEN
612 while ((e
- start
) < CONFIG_DHCP_MIN_EXT_LEN
)
621 * Warning: no field size check - change CONFIG_BOOTP_* at your own risk!
623 static int bootp_extended(u8
*e
)
627 *e
++ = 99; /* RFC1048 Magic Cookie */
632 #if defined(CONFIG_CMD_DHCP)
633 *e
++ = 53; /* DHCP Message Type */
635 *e
++ = DHCP_DISCOVER
;
637 *e
++ = 57; /* Maximum DHCP Message Size */
639 *e
++ = (576 - 312 + OPT_FIELD_SIZE
) >> 16;
640 *e
++ = (576 - 312 + OPT_FIELD_SIZE
) & 0xff;
645 #if defined(CONFIG_BOOTP_SUBNETMASK)
646 *e
++ = 1; /* Subnet mask request */
651 #if defined(CONFIG_BOOTP_GATEWAY)
652 *e
++ = 3; /* Default gateway request */
657 #if defined(CONFIG_BOOTP_DNS)
658 *e
++ = 6; /* Domain Name Server */
663 #if defined(CONFIG_BOOTP_HOSTNAME)
664 *e
++ = 12; /* Host name request */
669 #if defined(CONFIG_BOOTP_BOOTFILESIZE)
670 *e
++ = 13; /* Boot file size */
675 #if defined(CONFIG_BOOTP_BOOTPATH)
676 *e
++ = 17; /* Boot path */
681 #if defined(CONFIG_BOOTP_NISDOMAIN)
682 *e
++ = 40; /* NIS Domain name request */
686 #if defined(CONFIG_BOOTP_NTPSERVER)
692 *e
++ = 255; /* End of the list */
695 * If nothing in list, remove it altogether. Some DHCP servers get
696 * upset by this minor faux pas and do not respond at all.
698 if (e
== start
+ 3) {
699 printf("*** Warning: no DHCP options requested\n");
707 void bootp_reset(void)
711 bootp_start
= get_timer(0);
715 void bootp_request(void)
718 struct bootp_hdr
*bp
;
719 int extlen
, pktlen
, iplen
;
721 #ifdef CONFIG_BOOTP_RANDOM_DELAY
725 struct in_addr zero_ip
;
726 struct in_addr bcast_ip
;
727 char *ep
; /* Environment pointer */
729 bootstage_mark_name(BOOTSTAGE_ID_BOOTP_START
, "bootp_start");
730 #if defined(CONFIG_CMD_DHCP)
734 ep
= env_get("bootpretryperiod");
736 time_taken_max
= simple_strtoul(ep
, NULL
, 10);
738 time_taken_max
= TIMEOUT_MS
;
740 #ifdef CONFIG_BOOTP_RANDOM_DELAY /* Random BOOTP delay */
744 if (bootp_try
<= 2) /* Start with max 1024 * 1ms */
745 rand_ms
= rand() >> (22 - bootp_try
);
746 else /* After 3rd BOOTP request max 8192 * 1ms */
747 rand_ms
= rand() >> 19;
749 printf("Random delay: %ld ms...\n", rand_ms
);
752 #endif /* CONFIG_BOOTP_RANDOM_DELAY */
754 printf("BOOTP broadcast %d\n", ++bootp_try
);
756 memset((void *)pkt
, 0, PKTSIZE
);
758 eth_hdr_size
= net_set_ether(pkt
, net_bcast_ethaddr
, PROT_IP
);
762 * Next line results in incorrect packet size being transmitted,
763 * resulting in errors in some DHCP servers, reporting missing bytes.
764 * Size must be set in packet header after extension length has been
766 * C. Hallinan, DS4.COM, Inc.
768 /* net_set_udp_header(pkt, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC,
769 sizeof (struct bootp_hdr)); */
770 iphdr
= pkt
; /* We need this later for net_set_udp_header() */
771 pkt
+= IP_UDP_HDR_SIZE
;
773 bp
= (struct bootp_hdr
*)pkt
;
774 bp
->bp_op
= OP_BOOTREQUEST
;
775 bp
->bp_htype
= HWT_ETHER
;
776 bp
->bp_hlen
= HWL_ETHER
;
779 * according to RFC1542, should be 0 on first request, secs since
780 * first request otherwise
782 bp
->bp_secs
= htons(get_timer(bootp_start
) / 1000);
784 net_write_ip(&bp
->bp_ciaddr
, zero_ip
);
785 net_write_ip(&bp
->bp_yiaddr
, zero_ip
);
786 net_write_ip(&bp
->bp_siaddr
, zero_ip
);
787 net_write_ip(&bp
->bp_giaddr
, zero_ip
);
788 memcpy(bp
->bp_chaddr
, net_ethaddr
, 6);
789 copy_filename(bp
->bp_file
, net_boot_file_name
, sizeof(bp
->bp_file
));
791 /* Request additional information from the BOOTP/DHCP server */
792 #if defined(CONFIG_CMD_DHCP)
793 extlen
= dhcp_extended((u8
*)bp
->bp_vend
, DHCP_DISCOVER
, zero_ip
,
796 extlen
= bootp_extended((u8
*)bp
->bp_vend
);
800 * Bootp ID is the lower 4 bytes of our ethernet address
801 * plus the current time in ms.
803 bootp_id
= ((u32
)net_ethaddr
[2] << 24)
804 | ((u32
)net_ethaddr
[3] << 16)
805 | ((u32
)net_ethaddr
[4] << 8)
806 | (u32
)net_ethaddr
[5];
807 bootp_id
+= get_timer(0);
808 bootp_id
= htonl(bootp_id
);
809 bootp_add_id(bootp_id
);
810 net_copy_u32(&bp
->bp_id
, &bootp_id
);
813 * Calculate proper packet lengths taking into account the
814 * variable size of the options field
816 iplen
= BOOTP_HDR_SIZE
- OPT_FIELD_SIZE
+ extlen
;
817 pktlen
= eth_hdr_size
+ IP_UDP_HDR_SIZE
+ iplen
;
818 bcast_ip
.s_addr
= 0xFFFFFFFFL
;
819 net_set_udp_header(iphdr
, bcast_ip
, PORT_BOOTPS
, PORT_BOOTPC
, iplen
);
820 net_set_timeout_handler(bootp_timeout
, bootp_timeout_handler
);
822 #if defined(CONFIG_CMD_DHCP)
823 dhcp_state
= SELECTING
;
824 net_set_udp_handler(dhcp_handler
);
826 net_set_udp_handler(bootp_handler
);
828 net_send_packet(net_tx_packet
, pktlen
);
831 #if defined(CONFIG_CMD_DHCP)
832 static void dhcp_process_options(uchar
*popt
, uchar
*end
)
835 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_TIMEOFFSET)
839 while (popt
< end
&& *popt
!= 0xff) {
843 oplen
= -1; /* Pad omits len byte */
846 net_copy_ip(&net_netmask
, (popt
+ 2));
848 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_TIMEOFFSET)
849 case 2: /* Time offset */
850 to_ptr
= &net_ntp_time_offset
;
851 net_copy_u32((u32
*)to_ptr
, (u32
*)(popt
+ 2));
852 net_ntp_time_offset
= ntohl(net_ntp_time_offset
);
856 net_copy_ip(&net_gateway
, (popt
+ 2));
859 net_copy_ip(&net_dns_server
, (popt
+ 2));
860 #if defined(CONFIG_BOOTP_DNS2)
862 net_copy_ip(&net_dns_server2
, (popt
+ 2 + 4));
866 size
= truncate_sz("Host Name",
867 sizeof(net_hostname
), oplen
);
868 memcpy(&net_hostname
, popt
+ 2, size
);
869 net_hostname
[size
] = 0;
871 case 15: /* Ignore Domain Name Option */
874 size
= truncate_sz("Root Path",
875 sizeof(net_root_path
), oplen
);
876 memcpy(&net_root_path
, popt
+ 2, size
);
877 net_root_path
[size
] = 0;
879 case 28: /* Ignore Broadcast Address Option */
881 #if defined(CONFIG_CMD_SNTP) && defined(CONFIG_BOOTP_NTPSERVER)
882 case 42: /* NTP server IP */
883 net_copy_ip(&net_ntp_server
, (popt
+ 2));
887 net_copy_u32(&dhcp_leasetime
, (u32
*)(popt
+ 2));
890 dhcp_option_overload
= popt
[2];
892 case 53: /* Ignore Message Type Option */
895 net_copy_ip(&dhcp_server_ip
, (popt
+ 2));
897 case 58: /* Ignore Renewal Time Option */
899 case 59: /* Ignore Rebinding Time Option */
901 case 66: /* Ignore TFTP server name */
903 case 67: /* Bootfile option */
904 if (!net_boot_file_name_explicit
) {
905 size
= truncate_sz("Bootfile",
906 sizeof(net_boot_file_name
),
908 memcpy(&net_boot_file_name
, popt
+ 2, size
);
909 net_boot_file_name
[size
] = 0;
913 #if defined(CONFIG_BOOTP_VENDOREX)
914 if (dhcp_vendorex_proc(popt
))
917 printf("*** Unhandled DHCP Option in OFFER/ACK:"
921 popt
+= oplen
+ 2; /* Process next option */
925 static void dhcp_packet_process_options(struct bootp_hdr
*bp
)
927 uchar
*popt
= (uchar
*)&bp
->bp_vend
[4];
928 uchar
*end
= popt
+ BOOTP_HDR_SIZE
;
930 if (net_read_u32((u32
*)&bp
->bp_vend
[0]) != htonl(BOOTP_VENDOR_MAGIC
))
933 dhcp_option_overload
= 0;
936 * The 'options' field MUST be interpreted first, 'file' next,
939 dhcp_process_options(popt
, end
);
941 if (dhcp_option_overload
& OVERLOAD_FILE
) {
942 popt
= (uchar
*)bp
->bp_file
;
943 end
= popt
+ sizeof(bp
->bp_file
);
944 dhcp_process_options(popt
, end
);
947 if (dhcp_option_overload
& OVERLOAD_SNAME
) {
948 popt
= (uchar
*)bp
->bp_sname
;
949 end
= popt
+ sizeof(bp
->bp_sname
);
950 dhcp_process_options(popt
, end
);
954 static int dhcp_message_type(unsigned char *popt
)
956 if (net_read_u32((u32
*)popt
) != htonl(BOOTP_VENDOR_MAGIC
))
960 while (*popt
!= 0xff) {
961 if (*popt
== 53) /* DHCP Message Type */
967 /* Scan through all options */
968 popt
+= *(popt
+ 1) + 2;
974 static void dhcp_send_request_packet(struct bootp_hdr
*bp_offer
)
977 struct bootp_hdr
*bp
;
978 int pktlen
, iplen
, extlen
;
980 struct in_addr offered_ip
;
981 struct in_addr zero_ip
;
982 struct in_addr bcast_ip
;
984 debug("dhcp_send_request_packet: Sending DHCPREQUEST\n");
986 memset((void *)pkt
, 0, PKTSIZE
);
988 eth_hdr_size
= net_set_ether(pkt
, net_bcast_ethaddr
, PROT_IP
);
991 iphdr
= pkt
; /* We'll need this later to set proper pkt size */
992 pkt
+= IP_UDP_HDR_SIZE
;
994 bp
= (struct bootp_hdr
*)pkt
;
995 bp
->bp_op
= OP_BOOTREQUEST
;
996 bp
->bp_htype
= HWT_ETHER
;
997 bp
->bp_hlen
= HWL_ETHER
;
999 bp
->bp_secs
= htons(get_timer(bootp_start
) / 1000);
1000 /* Do not set the client IP, your IP, or server IP yet, since it
1001 * hasn't been ACK'ed by the server yet */
1004 * RFC3046 requires Relay Agents to discard packets with
1005 * nonzero and offered giaddr
1008 net_write_ip(&bp
->bp_giaddr
, zero_ip
);
1010 memcpy(bp
->bp_chaddr
, net_ethaddr
, 6);
1011 copy_filename(bp
->bp_file
, net_boot_file_name
, sizeof(bp
->bp_file
));
1014 * ID is the id of the OFFER packet
1017 net_copy_u32(&bp
->bp_id
, &bp_offer
->bp_id
);
1020 * Copy options from OFFER packet if present
1023 /* Copy offered IP into the parameters request list */
1024 net_copy_ip(&offered_ip
, &bp_offer
->bp_yiaddr
);
1025 extlen
= dhcp_extended((u8
*)bp
->bp_vend
, DHCP_REQUEST
,
1026 dhcp_server_ip
, offered_ip
);
1028 iplen
= BOOTP_HDR_SIZE
- OPT_FIELD_SIZE
+ extlen
;
1029 pktlen
= eth_hdr_size
+ IP_UDP_HDR_SIZE
+ iplen
;
1030 bcast_ip
.s_addr
= 0xFFFFFFFFL
;
1031 net_set_udp_header(iphdr
, bcast_ip
, PORT_BOOTPS
, PORT_BOOTPC
, iplen
);
1033 #ifdef CONFIG_BOOTP_DHCP_REQUEST_DELAY
1034 udelay(CONFIG_BOOTP_DHCP_REQUEST_DELAY
);
1035 #endif /* CONFIG_BOOTP_DHCP_REQUEST_DELAY */
1036 debug("Transmitting DHCPREQUEST packet: len = %d\n", pktlen
);
1037 net_send_packet(net_tx_packet
, pktlen
);
1041 * Handle DHCP received packets.
1043 static void dhcp_handler(uchar
*pkt
, unsigned dest
, struct in_addr sip
,
1044 unsigned src
, unsigned len
)
1046 struct bootp_hdr
*bp
= (struct bootp_hdr
*)pkt
;
1048 debug("DHCPHandler: got packet: (src=%d, dst=%d, len=%d) state: %d\n",
1049 src
, dest
, len
, dhcp_state
);
1051 /* Filter out pkts we don't want */
1052 if (check_reply_packet(pkt
, dest
, src
, len
))
1055 debug("DHCPHandler: got DHCP packet: (src=%d, dst=%d, len=%d) state: "
1056 "%d\n", src
, dest
, len
, dhcp_state
);
1058 if (net_read_ip(&bp
->bp_yiaddr
).s_addr
== 0)
1061 switch (dhcp_state
) {
1064 * Wait an appropriate time for any potential DHCPOFFER packets
1065 * to arrive. Then select one, and generate DHCPREQUEST
1066 * response. If filename is in format we recognize, assume it
1067 * is a valid OFFER from a server we want.
1069 debug("DHCP: state=SELECTING bp_file: \"%s\"\n", bp
->bp_file
);
1070 #ifdef CONFIG_SYS_BOOTFILE_PREFIX
1071 if (strncmp(bp
->bp_file
,
1072 CONFIG_SYS_BOOTFILE_PREFIX
,
1073 strlen(CONFIG_SYS_BOOTFILE_PREFIX
)) == 0) {
1074 #endif /* CONFIG_SYS_BOOTFILE_PREFIX */
1075 dhcp_packet_process_options(bp
);
1076 efi_net_set_dhcp_ack(pkt
, len
);
1078 debug("TRANSITIONING TO REQUESTING STATE\n");
1079 dhcp_state
= REQUESTING
;
1081 net_set_timeout_handler(5000, bootp_timeout_handler
);
1082 dhcp_send_request_packet(bp
);
1083 #ifdef CONFIG_SYS_BOOTFILE_PREFIX
1085 #endif /* CONFIG_SYS_BOOTFILE_PREFIX */
1090 debug("DHCP State: REQUESTING\n");
1092 if (dhcp_message_type((u8
*)bp
->bp_vend
) == DHCP_ACK
) {
1093 dhcp_packet_process_options(bp
);
1094 /* Store net params from reply */
1095 store_net_params(bp
);
1097 printf("DHCP client bound to address %pI4 (%lu ms)\n",
1098 &net_ip
, get_timer(bootp_start
));
1099 net_set_timeout_handler(0, (thand_f
*)0);
1100 bootstage_mark_name(BOOTSTAGE_ID_BOOTP_STOP
,
1108 /* DHCP client bound to address */
1111 puts("DHCP: INVALID STATE\n");
1116 void dhcp_request(void)
1120 #endif /* CONFIG_CMD_DHCP */