Yann Garcia / Mbed 2 deprecated DS130x_I2CApp

This short program illustrates how to use the DS130x_I2C library. My objective is to share the same RTC with Microchip 18F MCU.

Dependencies:   mbed DebugLibrary

NetServices/lwip/core/dhcp.c@1:995212d326ca, 2011-02-11 (annotated)

Committer:
Yann
Date:
Fri Feb 11 10:17:20 2011 +0000
Revision:
1:995212d326ca
Parent:
0:f30e2135b0db 
V0.0.0.2

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Yann 0:f30e2135b0db 1 /**
Yann 0:f30e2135b0db 2 * @file
Yann 0:f30e2135b0db 3 * Dynamic Host Configuration Protocol client
Yann 0:f30e2135b0db 4 *
Yann 0:f30e2135b0db 5 */
Yann 0:f30e2135b0db 6
Yann 0:f30e2135b0db 7 /*
Yann 0:f30e2135b0db 8 *
Yann 0:f30e2135b0db 9 * Copyright (c) 2001-2004 Leon Woestenberg <leon.woestenberg@gmx.net>
Yann 0:f30e2135b0db 10 * Copyright (c) 2001-2004 Axon Digital Design B.V., The Netherlands.
Yann 0:f30e2135b0db 11 * All rights reserved.
Yann 0:f30e2135b0db 12 *
Yann 0:f30e2135b0db 13 * Redistribution and use in source and binary forms, with or without modification,
Yann 0:f30e2135b0db 14 * are permitted provided that the following conditions are met:
Yann 0:f30e2135b0db 15 *
Yann 0:f30e2135b0db 16 * 1. Redistributions of source code must retain the above copyright notice,
Yann 0:f30e2135b0db 17 * this list of conditions and the following disclaimer.
Yann 0:f30e2135b0db 18 * 2. Redistributions in binary form must reproduce the above copyright notice,
Yann 0:f30e2135b0db 19 * this list of conditions and the following disclaimer in the documentation
Yann 0:f30e2135b0db 20 * and/or other materials provided with the distribution.
Yann 0:f30e2135b0db 21 * 3. The name of the author may not be used to endorse or promote products
Yann 0:f30e2135b0db 22 * derived from this software without specific prior written permission.
Yann 0:f30e2135b0db 23 *
Yann 0:f30e2135b0db 24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
Yann 0:f30e2135b0db 25 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
Yann 0:f30e2135b0db 26 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
Yann 0:f30e2135b0db 27 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
Yann 0:f30e2135b0db 28 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
Yann 0:f30e2135b0db 29 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
Yann 0:f30e2135b0db 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
Yann 0:f30e2135b0db 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
Yann 0:f30e2135b0db 32 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
Yann 0:f30e2135b0db 33 * OF SUCH DAMAGE.
Yann 0:f30e2135b0db 34 *
Yann 0:f30e2135b0db 35 * This file is a contribution to the lwIP TCP/IP stack.
Yann 0:f30e2135b0db 36 * The Swedish Institute of Computer Science and Adam Dunkels
Yann 0:f30e2135b0db 37 * are specifically granted permission to redistribute this
Yann 0:f30e2135b0db 38 * source code.
Yann 0:f30e2135b0db 39 *
Yann 0:f30e2135b0db 40 * Author: Leon Woestenberg <leon.woestenberg@gmx.net>
Yann 0:f30e2135b0db 41 *
Yann 0:f30e2135b0db 42 * This is a DHCP client for the lwIP TCP/IP stack. It aims to conform
Yann 0:f30e2135b0db 43 * with RFC 2131 and RFC 2132.
Yann 0:f30e2135b0db 44 *
Yann 0:f30e2135b0db 45 * TODO:
Yann 0:f30e2135b0db 46 * - Support for interfaces other than Ethernet (SLIP, PPP, ...)
Yann 0:f30e2135b0db 47 *
Yann 0:f30e2135b0db 48 * Please coordinate changes and requests with Leon Woestenberg
Yann 0:f30e2135b0db 49 * <leon.woestenberg@gmx.net>
Yann 0:f30e2135b0db 50 *
Yann 0:f30e2135b0db 51 * Integration with your code:
Yann 0:f30e2135b0db 52 *
Yann 0:f30e2135b0db 53 * In lwip/dhcp.h
Yann 0:f30e2135b0db 54 * #define DHCP_COARSE_TIMER_SECS (recommended 60 which is a minute)
Yann 0:f30e2135b0db 55 * #define DHCP_FINE_TIMER_MSECS (recommended 500 which equals TCP coarse timer)
Yann 0:f30e2135b0db 56 *
Yann 0:f30e2135b0db 57 * Then have your application call dhcp_coarse_tmr() and
Yann 0:f30e2135b0db 58 * dhcp_fine_tmr() on the defined intervals.
Yann 0:f30e2135b0db 59 *
Yann 0:f30e2135b0db 60 * dhcp_start(struct netif *netif);
Yann 0:f30e2135b0db 61 * starts a DHCP client instance which configures the interface by
Yann 0:f30e2135b0db 62 * obtaining an IP address lease and maintaining it.
Yann 0:f30e2135b0db 63 *
Yann 0:f30e2135b0db 64 * Use dhcp_release(netif) to end the lease and use dhcp_stop(netif)
Yann 0:f30e2135b0db 65 * to remove the DHCP client.
Yann 0:f30e2135b0db 66 *
Yann 0:f30e2135b0db 67 */
Yann 0:f30e2135b0db 68
Yann 0:f30e2135b0db 69 #include "lwip/opt.h"
Yann 0:f30e2135b0db 70
Yann 0:f30e2135b0db 71 #if LWIP_DHCP /* don't build if not configured for use in lwipopts.h */
Yann 0:f30e2135b0db 72
Yann 0:f30e2135b0db 73 #include "lwip/stats.h"
Yann 0:f30e2135b0db 74 #include "lwip/mem.h"
Yann 0:f30e2135b0db 75 #include "lwip/udp.h"
Yann 0:f30e2135b0db 76 #include "lwip/ip_addr.h"
Yann 0:f30e2135b0db 77 #include "lwip/netif.h"
Yann 0:f30e2135b0db 78 #include "lwip/def.h"
Yann 0:f30e2135b0db 79 #include "lwip/sys.h"
Yann 0:f30e2135b0db 80 #include "lwip/dhcp.h"
Yann 0:f30e2135b0db 81 #include "lwip/autoip.h"
Yann 0:f30e2135b0db 82 #include "lwip/dns.h"
Yann 0:f30e2135b0db 83 #include "netif/etharp.h"
Yann 0:f30e2135b0db 84
Yann 0:f30e2135b0db 85 #include <string.h>
Yann 0:f30e2135b0db 86
Yann 0:f30e2135b0db 87 /** Default for DHCP_GLOBAL_XID is 0xABCD0000
Yann 0:f30e2135b0db 88 * This can be changed by defining DHCP_GLOBAL_XID and DHCP_GLOBAL_XID_HEADER, e.g.
Yann 0:f30e2135b0db 89 * #define DHCP_GLOBAL_XID_HEADER "stdlib.h"
Yann 0:f30e2135b0db 90 * #define DHCP_GLOBAL_XID rand()
Yann 0:f30e2135b0db 91 */
Yann 0:f30e2135b0db 92 #ifdef DHCP_GLOBAL_XID_HEADER
Yann 0:f30e2135b0db 93 #include DHCP_GLOBAL_XID_HEADER /* include optional starting XID generation prototypes */
Yann 0:f30e2135b0db 94 #endif
Yann 0:f30e2135b0db 95
Yann 0:f30e2135b0db 96 /** DHCP_OPTION_MAX_MSG_SIZE is set to the MTU
Yann 0:f30e2135b0db 97 * MTU is checked to be big enough in dhcp_start */
Yann 0:f30e2135b0db 98 #define DHCP_MAX_MSG_LEN(netif) (netif->mtu)
Yann 0:f30e2135b0db 99 #define DHCP_MAX_MSG_LEN_MIN_REQUIRED 576
Yann 0:f30e2135b0db 100 /** Minimum length for reply before packet is parsed */
Yann 0:f30e2135b0db 101 #define DHCP_MIN_REPLY_LEN 44
Yann 0:f30e2135b0db 102
Yann 0:f30e2135b0db 103 #define REBOOT_TRIES 2
Yann 0:f30e2135b0db 104
Yann 0:f30e2135b0db 105 /** Option handling: options are parsed in dhcp_parse_reply
Yann 0:f30e2135b0db 106 * and saved in an array where other functions can load them from.
Yann 0:f30e2135b0db 107 * This might be moved into the struct dhcp (not necessarily since
Yann 0:f30e2135b0db 108 * lwIP is single-threaded and the array is only used while in recv
Yann 0:f30e2135b0db 109 * callback). */
Yann 0:f30e2135b0db 110 #define DHCP_OPTION_IDX_OVERLOAD 0
Yann 0:f30e2135b0db 111 #define DHCP_OPTION_IDX_MSG_TYPE 1
Yann 0:f30e2135b0db 112 #define DHCP_OPTION_IDX_SERVER_ID 2
Yann 0:f30e2135b0db 113 #define DHCP_OPTION_IDX_LEASE_TIME 3
Yann 0:f30e2135b0db 114 #define DHCP_OPTION_IDX_T1 4
Yann 0:f30e2135b0db 115 #define DHCP_OPTION_IDX_T2 5
Yann 0:f30e2135b0db 116 #define DHCP_OPTION_IDX_SUBNET_MASK 6
Yann 0:f30e2135b0db 117 #define DHCP_OPTION_IDX_ROUTER 7
Yann 0:f30e2135b0db 118 #define DHCP_OPTION_IDX_DNS_SERVER 8
Yann 0:f30e2135b0db 119 #define DHCP_OPTION_IDX_MAX (DHCP_OPTION_IDX_DNS_SERVER + DNS_MAX_SERVERS)
Yann 0:f30e2135b0db 120
Yann 0:f30e2135b0db 121 /** Holds the decoded option values, only valid while in dhcp_recv.
Yann 0:f30e2135b0db 122 @todo: move this into struct dhcp? */
Yann 0:f30e2135b0db 123 u32_t dhcp_rx_options_val[DHCP_OPTION_IDX_MAX];
Yann 0:f30e2135b0db 124 /** Holds a flag which option was received and is contained in dhcp_rx_options_val,
Yann 0:f30e2135b0db 125 only valid while in dhcp_recv.
Yann 0:f30e2135b0db 126 @todo: move this into struct dhcp? */
Yann 0:f30e2135b0db 127 u8_t dhcp_rx_options_given[DHCP_OPTION_IDX_MAX];
Yann 0:f30e2135b0db 128
Yann 0:f30e2135b0db 129 #define dhcp_option_given(dhcp, idx) (dhcp_rx_options_given[idx] != 0)
Yann 0:f30e2135b0db 130 #define dhcp_got_option(dhcp, idx) (dhcp_rx_options_given[idx] = 1)
Yann 0:f30e2135b0db 131 #define dhcp_clear_option(dhcp, idx) (dhcp_rx_options_given[idx] = 0)
Yann 0:f30e2135b0db 132 #define dhcp_clear_all_options(dhcp) (memset(dhcp_rx_options_given, 0, sizeof(dhcp_rx_options_given)))
Yann 0:f30e2135b0db 133 #define dhcp_get_option_value(dhcp, idx) (dhcp_rx_options_val[idx])
Yann 0:f30e2135b0db 134 #define dhcp_set_option_value(dhcp, idx, val) (dhcp_rx_options_val[idx] = (val))
Yann 0:f30e2135b0db 135
Yann 0:f30e2135b0db 136
Yann 0:f30e2135b0db 137 /* DHCP client state machine functions */
Yann 0:f30e2135b0db 138 static err_t dhcp_discover(struct netif *netif);
Yann 0:f30e2135b0db 139 static err_t dhcp_select(struct netif *netif);
Yann 0:f30e2135b0db 140 static void dhcp_bind(struct netif *netif);
Yann 0:f30e2135b0db 141 #if DHCP_DOES_ARP_CHECK
Yann 0:f30e2135b0db 142 static err_t dhcp_decline(struct netif *netif);
Yann 0:f30e2135b0db 143 #endif /* DHCP_DOES_ARP_CHECK */
Yann 0:f30e2135b0db 144 static err_t dhcp_rebind(struct netif *netif);
Yann 0:f30e2135b0db 145 static err_t dhcp_reboot(struct netif *netif);
Yann 0:f30e2135b0db 146 static void dhcp_set_state(struct dhcp *dhcp, u8_t new_state);
Yann 0:f30e2135b0db 147
Yann 0:f30e2135b0db 148 /* receive, unfold, parse and free incoming messages */
Yann 0:f30e2135b0db 149 static void dhcp_recv(void *arg, struct udp_pcb *pcb, struct pbuf *p, ip_addr_t *addr, u16_t port);
Yann 0:f30e2135b0db 150
Yann 0:f30e2135b0db 151 /* set the DHCP timers */
Yann 0:f30e2135b0db 152 static void dhcp_timeout(struct netif *netif);
Yann 0:f30e2135b0db 153 static void dhcp_t1_timeout(struct netif *netif);
Yann 0:f30e2135b0db 154 static void dhcp_t2_timeout(struct netif *netif);
Yann 0:f30e2135b0db 155
Yann 0:f30e2135b0db 156 /* build outgoing messages */
Yann 0:f30e2135b0db 157 /* create a DHCP message, fill in common headers */
Yann 0:f30e2135b0db 158 static err_t dhcp_create_msg(struct netif *netif, struct dhcp *dhcp, u8_t message_type);
Yann 0:f30e2135b0db 159 /* free a DHCP request */
Yann 0:f30e2135b0db 160 static void dhcp_delete_msg(struct dhcp *dhcp);
Yann 0:f30e2135b0db 161 /* add a DHCP option (type, then length in bytes) */
Yann 0:f30e2135b0db 162 static void dhcp_option(struct dhcp *dhcp, u8_t option_type, u8_t option_len);
Yann 0:f30e2135b0db 163 /* add option values */
Yann 0:f30e2135b0db 164 static void dhcp_option_byte(struct dhcp *dhcp, u8_t value);
Yann 0:f30e2135b0db 165 static void dhcp_option_short(struct dhcp *dhcp, u16_t value);
Yann 0:f30e2135b0db 166 static void dhcp_option_long(struct dhcp *dhcp, u32_t value);
Yann 0:f30e2135b0db 167 /* always add the DHCP options trailer to end and pad */
Yann 0:f30e2135b0db 168 static void dhcp_option_trailer(struct dhcp *dhcp);
Yann 0:f30e2135b0db 169
Yann 0:f30e2135b0db 170 /**
Yann 0:f30e2135b0db 171 * Back-off the DHCP client (because of a received NAK response).
Yann 0:f30e2135b0db 172 *
Yann 0:f30e2135b0db 173 * Back-off the DHCP client because of a received NAK. Receiving a
Yann 0:f30e2135b0db 174 * NAK means the client asked for something non-sensible, for
Yann 0:f30e2135b0db 175 * example when it tries to renew a lease obtained on another network.
Yann 0:f30e2135b0db 176 *
Yann 0:f30e2135b0db 177 * We clear any existing set IP address and restart DHCP negotiation
Yann 0:f30e2135b0db 178 * afresh (as per RFC2131 3.2.3).
Yann 0:f30e2135b0db 179 *
Yann 0:f30e2135b0db 180 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 181 */
Yann 0:f30e2135b0db 182 static void
Yann 0:f30e2135b0db 183 dhcp_handle_nak(struct netif *netif)
Yann 0:f30e2135b0db 184 {
Yann 0:f30e2135b0db 185 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 186 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_handle_nak(netif=%p) %c%c%"U16_F"\n",
Yann 0:f30e2135b0db 187 (void*)netif, netif->name[0], netif->name[1], (u16_t)netif->num));
Yann 0:f30e2135b0db 188 /* Set the interface down since the address must no longer be used, as per RFC2131 */
Yann 0:f30e2135b0db 189 netif_set_down(netif);
Yann 0:f30e2135b0db 190 /* remove IP address from interface */
Yann 0:f30e2135b0db 191 netif_set_ipaddr(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 192 netif_set_gw(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 193 netif_set_netmask(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 194 /* Change to a defined state */
Yann 0:f30e2135b0db 195 dhcp_set_state(dhcp, DHCP_BACKING_OFF);
Yann 0:f30e2135b0db 196 /* We can immediately restart discovery */
Yann 0:f30e2135b0db 197 dhcp_discover(netif);
Yann 0:f30e2135b0db 198 }
Yann 0:f30e2135b0db 199
Yann 0:f30e2135b0db 200 #if DHCP_DOES_ARP_CHECK
Yann 0:f30e2135b0db 201 /**
Yann 0:f30e2135b0db 202 * Checks if the offered IP address is already in use.
Yann 0:f30e2135b0db 203 *
Yann 0:f30e2135b0db 204 * It does so by sending an ARP request for the offered address and
Yann 0:f30e2135b0db 205 * entering CHECKING state. If no ARP reply is received within a small
Yann 0:f30e2135b0db 206 * interval, the address is assumed to be free for use by us.
Yann 0:f30e2135b0db 207 *
Yann 0:f30e2135b0db 208 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 209 */
Yann 0:f30e2135b0db 210 static void
Yann 0:f30e2135b0db 211 dhcp_check(struct netif *netif)
Yann 0:f30e2135b0db 212 {
Yann 0:f30e2135b0db 213 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 214 err_t result;
Yann 0:f30e2135b0db 215 u16_t msecs;
Yann 0:f30e2135b0db 216 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_check(netif=%p) %c%c\n", (void *)netif, (s16_t)netif->name[0],
Yann 0:f30e2135b0db 217 (s16_t)netif->name[1]));
Yann 0:f30e2135b0db 218 dhcp_set_state(dhcp, DHCP_CHECKING);
Yann 0:f30e2135b0db 219 /* create an ARP query for the offered IP address, expecting that no host
Yann 0:f30e2135b0db 220 responds, as the IP address should not be in use. */
Yann 0:f30e2135b0db 221 result = etharp_query(netif, &dhcp->offered_ip_addr, NULL);
Yann 0:f30e2135b0db 222 if (result != ERR_OK) {
Yann 0:f30e2135b0db 223 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("dhcp_check: could not perform ARP query\n"));
Yann 0:f30e2135b0db 224 }
Yann 0:f30e2135b0db 225 dhcp->tries++;
Yann 0:f30e2135b0db 226 msecs = 500;
Yann 0:f30e2135b0db 227 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 228 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_check(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 229 }
Yann 0:f30e2135b0db 230 #endif /* DHCP_DOES_ARP_CHECK */
Yann 0:f30e2135b0db 231
Yann 0:f30e2135b0db 232 /**
Yann 0:f30e2135b0db 233 * Remember the configuration offered by a DHCP server.
Yann 0:f30e2135b0db 234 *
Yann 0:f30e2135b0db 235 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 236 */
Yann 0:f30e2135b0db 237 static void
Yann 0:f30e2135b0db 238 dhcp_handle_offer(struct netif *netif)
Yann 0:f30e2135b0db 239 {
Yann 0:f30e2135b0db 240 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 241 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_handle_offer(netif=%p) %c%c%"U16_F"\n",
Yann 0:f30e2135b0db 242 (void*)netif, netif->name[0], netif->name[1], (u16_t)netif->num));
Yann 0:f30e2135b0db 243 /* obtain the server address */
Yann 0:f30e2135b0db 244 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_SERVER_ID)) {
Yann 0:f30e2135b0db 245 ip4_addr_set_u32(&dhcp->server_ip_addr, htonl(dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_SERVER_ID)));
Yann 0:f30e2135b0db 246 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_handle_offer(): server 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 247 ip4_addr_get_u32(&dhcp->server_ip_addr)));
Yann 0:f30e2135b0db 248 /* remember offered address */
Yann 0:f30e2135b0db 249 ip_addr_copy(dhcp->offered_ip_addr, dhcp->msg_in->yiaddr);
Yann 0:f30e2135b0db 250 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_handle_offer(): offer for 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 251 ip4_addr_get_u32(&dhcp->offered_ip_addr)));
Yann 0:f30e2135b0db 252
Yann 0:f30e2135b0db 253 dhcp_select(netif);
Yann 0:f30e2135b0db 254 } else {
Yann 0:f30e2135b0db 255 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS,
Yann 0:f30e2135b0db 256 ("dhcp_handle_offer(netif=%p) did not get server ID!\n", (void*)netif));
Yann 0:f30e2135b0db 257 }
Yann 0:f30e2135b0db 258 }
Yann 0:f30e2135b0db 259
Yann 0:f30e2135b0db 260 /**
Yann 0:f30e2135b0db 261 * Select a DHCP server offer out of all offers.
Yann 0:f30e2135b0db 262 *
Yann 0:f30e2135b0db 263 * Simply select the first offer received.
Yann 0:f30e2135b0db 264 *
Yann 0:f30e2135b0db 265 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 266 * @return lwIP specific error (see error.h)
Yann 0:f30e2135b0db 267 */
Yann 0:f30e2135b0db 268 static err_t
Yann 0:f30e2135b0db 269 dhcp_select(struct netif *netif)
Yann 0:f30e2135b0db 270 {
Yann 0:f30e2135b0db 271 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 272 err_t result;
Yann 0:f30e2135b0db 273 u16_t msecs;
Yann 0:f30e2135b0db 274
Yann 0:f30e2135b0db 275 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_select(netif=%p) %c%c%"U16_F"\n", (void*)netif, netif->name[0], netif->name[1], (u16_t)netif->num));
Yann 0:f30e2135b0db 276 dhcp_set_state(dhcp, DHCP_REQUESTING);
Yann 0:f30e2135b0db 277
Yann 0:f30e2135b0db 278 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 279 result = dhcp_create_msg(netif, dhcp, DHCP_REQUEST);
Yann 0:f30e2135b0db 280 if (result == ERR_OK) {
Yann 0:f30e2135b0db 281 dhcp_option(dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 282 dhcp_option_short(dhcp, DHCP_MAX_MSG_LEN(netif));
Yann 0:f30e2135b0db 283
Yann 0:f30e2135b0db 284 /* MUST request the offered IP address */
Yann 0:f30e2135b0db 285 dhcp_option(dhcp, DHCP_OPTION_REQUESTED_IP, 4);
Yann 0:f30e2135b0db 286 dhcp_option_long(dhcp, ntohl(ip4_addr_get_u32(&dhcp->offered_ip_addr)));
Yann 0:f30e2135b0db 287
Yann 0:f30e2135b0db 288 dhcp_option(dhcp, DHCP_OPTION_SERVER_ID, 4);
Yann 0:f30e2135b0db 289 dhcp_option_long(dhcp, ntohl(ip4_addr_get_u32(&dhcp->server_ip_addr)));
Yann 0:f30e2135b0db 290
Yann 0:f30e2135b0db 291 dhcp_option(dhcp, DHCP_OPTION_PARAMETER_REQUEST_LIST, 4/*num options*/);
Yann 0:f30e2135b0db 292 dhcp_option_byte(dhcp, DHCP_OPTION_SUBNET_MASK);
Yann 0:f30e2135b0db 293 dhcp_option_byte(dhcp, DHCP_OPTION_ROUTER);
Yann 0:f30e2135b0db 294 dhcp_option_byte(dhcp, DHCP_OPTION_BROADCAST);
Yann 0:f30e2135b0db 295 dhcp_option_byte(dhcp, DHCP_OPTION_DNS_SERVER);
Yann 0:f30e2135b0db 296
Yann 0:f30e2135b0db 297 #if LWIP_NETIF_HOSTNAME
Yann 0:f30e2135b0db 298 if (netif->hostname != NULL) {
Yann 0:f30e2135b0db 299 const char *p = (const char*)netif->hostname;
Yann 0:f30e2135b0db 300 u8_t namelen = (u8_t)strlen(p);
Yann 0:f30e2135b0db 301 if (namelen > 0) {
Yann 0:f30e2135b0db 302 LWIP_ASSERT("DHCP: hostname is too long!", namelen < 255);
Yann 0:f30e2135b0db 303 dhcp_option(dhcp, DHCP_OPTION_HOSTNAME, namelen);
Yann 0:f30e2135b0db 304 while (*p) {
Yann 0:f30e2135b0db 305 dhcp_option_byte(dhcp, *p++);
Yann 0:f30e2135b0db 306 }
Yann 0:f30e2135b0db 307 }
Yann 0:f30e2135b0db 308 }
Yann 0:f30e2135b0db 309 #endif /* LWIP_NETIF_HOSTNAME */
Yann 0:f30e2135b0db 310
Yann 0:f30e2135b0db 311 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 312 /* shrink the pbuf to the actual content length */
Yann 0:f30e2135b0db 313 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 314
Yann 0:f30e2135b0db 315 /* send broadcast to any DHCP server */
Yann 0:f30e2135b0db 316 udp_sendto_if(dhcp->pcb, dhcp->p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 317 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 318 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_select: REQUESTING\n"));
Yann 0:f30e2135b0db 319 } else {
Yann 0:f30e2135b0db 320 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("dhcp_select: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 321 }
Yann 0:f30e2135b0db 322 dhcp->tries++;
Yann 0:f30e2135b0db 323 msecs = (dhcp->tries < 6 ? 1 << dhcp->tries : 60) * 1000;
Yann 0:f30e2135b0db 324 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 325 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_select(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 326 return result;
Yann 0:f30e2135b0db 327 }
Yann 0:f30e2135b0db 328
Yann 0:f30e2135b0db 329 /**
Yann 0:f30e2135b0db 330 * The DHCP timer that checks for lease renewal/rebind timeouts.
Yann 0:f30e2135b0db 331 */
Yann 0:f30e2135b0db 332 void
Yann 0:f30e2135b0db 333 dhcp_coarse_tmr()
Yann 0:f30e2135b0db 334 {
Yann 0:f30e2135b0db 335 struct netif *netif = netif_list;
Yann 0:f30e2135b0db 336 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_coarse_tmr()\n"));
Yann 0:f30e2135b0db 337 /* iterate through all network interfaces */
Yann 0:f30e2135b0db 338 while (netif != NULL) {
Yann 0:f30e2135b0db 339 /* only act on DHCP configured interfaces */
Yann 0:f30e2135b0db 340 if (netif->dhcp != NULL) {
Yann 0:f30e2135b0db 341 /* timer is active (non zero), and triggers (zeroes) now? */
Yann 0:f30e2135b0db 342 if (netif->dhcp->t2_timeout-- == 1) {
Yann 0:f30e2135b0db 343 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_coarse_tmr(): t2 timeout\n"));
Yann 0:f30e2135b0db 344 /* this clients' rebind timeout triggered */
Yann 0:f30e2135b0db 345 dhcp_t2_timeout(netif);
Yann 0:f30e2135b0db 346 /* timer is active (non zero), and triggers (zeroes) now */
Yann 0:f30e2135b0db 347 } else if (netif->dhcp->t1_timeout-- == 1) {
Yann 0:f30e2135b0db 348 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_coarse_tmr(): t1 timeout\n"));
Yann 0:f30e2135b0db 349 /* this clients' renewal timeout triggered */
Yann 0:f30e2135b0db 350 dhcp_t1_timeout(netif);
Yann 0:f30e2135b0db 351 }
Yann 0:f30e2135b0db 352 }
Yann 0:f30e2135b0db 353 /* proceed to next netif */
Yann 0:f30e2135b0db 354 netif = netif->next;
Yann 0:f30e2135b0db 355 }
Yann 0:f30e2135b0db 356 }
Yann 0:f30e2135b0db 357
Yann 0:f30e2135b0db 358 /**
Yann 0:f30e2135b0db 359 * DHCP transaction timeout handling
Yann 0:f30e2135b0db 360 *
Yann 0:f30e2135b0db 361 * A DHCP server is expected to respond within a short period of time.
Yann 0:f30e2135b0db 362 * This timer checks whether an outstanding DHCP request is timed out.
Yann 0:f30e2135b0db 363 */
Yann 0:f30e2135b0db 364 void
Yann 0:f30e2135b0db 365 dhcp_fine_tmr()
Yann 0:f30e2135b0db 366 {
Yann 0:f30e2135b0db 367 struct netif *netif = netif_list;
Yann 0:f30e2135b0db 368 /* loop through netif's */
Yann 0:f30e2135b0db 369 while (netif != NULL) {
Yann 0:f30e2135b0db 370 /* only act on DHCP configured interfaces */
Yann 0:f30e2135b0db 371 if (netif->dhcp != NULL) {
Yann 0:f30e2135b0db 372 /* timer is active (non zero), and is about to trigger now */
Yann 0:f30e2135b0db 373 if (netif->dhcp->request_timeout > 1) {
Yann 0:f30e2135b0db 374 netif->dhcp->request_timeout--;
Yann 0:f30e2135b0db 375 }
Yann 0:f30e2135b0db 376 else if (netif->dhcp->request_timeout == 1) {
Yann 0:f30e2135b0db 377 netif->dhcp->request_timeout--;
Yann 0:f30e2135b0db 378 /* { netif->dhcp->request_timeout == 0 } */
Yann 0:f30e2135b0db 379 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_fine_tmr(): request timeout\n"));
Yann 0:f30e2135b0db 380 /* this client's request timeout triggered */
Yann 0:f30e2135b0db 381 dhcp_timeout(netif);
Yann 0:f30e2135b0db 382 }
Yann 0:f30e2135b0db 383 }
Yann 0:f30e2135b0db 384 /* proceed to next network interface */
Yann 0:f30e2135b0db 385 netif = netif->next;
Yann 0:f30e2135b0db 386 }
Yann 0:f30e2135b0db 387 }
Yann 0:f30e2135b0db 388
Yann 0:f30e2135b0db 389 /**
Yann 0:f30e2135b0db 390 * A DHCP negotiation transaction, or ARP request, has timed out.
Yann 0:f30e2135b0db 391 *
Yann 0:f30e2135b0db 392 * The timer that was started with the DHCP or ARP request has
Yann 0:f30e2135b0db 393 * timed out, indicating no response was received in time.
Yann 0:f30e2135b0db 394 *
Yann 0:f30e2135b0db 395 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 396 */
Yann 0:f30e2135b0db 397 static void
Yann 0:f30e2135b0db 398 dhcp_timeout(struct netif *netif)
Yann 0:f30e2135b0db 399 {
Yann 0:f30e2135b0db 400 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 401 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_timeout()\n"));
Yann 0:f30e2135b0db 402 /* back-off period has passed, or server selection timed out */
Yann 0:f30e2135b0db 403 if ((dhcp->state == DHCP_BACKING_OFF) || (dhcp->state == DHCP_SELECTING)) {
Yann 0:f30e2135b0db 404 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_timeout(): restarting discovery\n"));
Yann 0:f30e2135b0db 405 dhcp_discover(netif);
Yann 0:f30e2135b0db 406 /* receiving the requested lease timed out */
Yann 0:f30e2135b0db 407 } else if (dhcp->state == DHCP_REQUESTING) {
Yann 0:f30e2135b0db 408 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): REQUESTING, DHCP request timed out\n"));
Yann 0:f30e2135b0db 409 if (dhcp->tries <= 5) {
Yann 0:f30e2135b0db 410 dhcp_select(netif);
Yann 0:f30e2135b0db 411 } else {
Yann 0:f30e2135b0db 412 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): REQUESTING, releasing, restarting\n"));
Yann 0:f30e2135b0db 413 dhcp_release(netif);
Yann 0:f30e2135b0db 414 dhcp_discover(netif);
Yann 0:f30e2135b0db 415 }
Yann 0:f30e2135b0db 416 #if DHCP_DOES_ARP_CHECK
Yann 0:f30e2135b0db 417 /* received no ARP reply for the offered address (which is good) */
Yann 0:f30e2135b0db 418 } else if (dhcp->state == DHCP_CHECKING) {
Yann 0:f30e2135b0db 419 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): CHECKING, ARP request timed out\n"));
Yann 0:f30e2135b0db 420 if (dhcp->tries <= 1) {
Yann 0:f30e2135b0db 421 dhcp_check(netif);
Yann 0:f30e2135b0db 422 /* no ARP replies on the offered address,
Yann 0:f30e2135b0db 423 looks like the IP address is indeed free */
Yann 0:f30e2135b0db 424 } else {
Yann 0:f30e2135b0db 425 /* bind the interface to the offered address */
Yann 0:f30e2135b0db 426 dhcp_bind(netif);
Yann 0:f30e2135b0db 427 }
Yann 0:f30e2135b0db 428 #endif /* DHCP_DOES_ARP_CHECK */
Yann 0:f30e2135b0db 429 }
Yann 0:f30e2135b0db 430 /* did not get response to renew request? */
Yann 0:f30e2135b0db 431 else if (dhcp->state == DHCP_RENEWING) {
Yann 0:f30e2135b0db 432 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): RENEWING, DHCP request timed out\n"));
Yann 0:f30e2135b0db 433 /* just retry renewal */
Yann 0:f30e2135b0db 434 /* note that the rebind timer will eventually time-out if renew does not work */
Yann 0:f30e2135b0db 435 dhcp_renew(netif);
Yann 0:f30e2135b0db 436 /* did not get response to rebind request? */
Yann 0:f30e2135b0db 437 } else if (dhcp->state == DHCP_REBINDING) {
Yann 0:f30e2135b0db 438 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): REBINDING, DHCP request timed out\n"));
Yann 0:f30e2135b0db 439 if (dhcp->tries <= 8) {
Yann 0:f30e2135b0db 440 dhcp_rebind(netif);
Yann 0:f30e2135b0db 441 } else {
Yann 0:f30e2135b0db 442 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_timeout(): RELEASING, DISCOVERING\n"));
Yann 0:f30e2135b0db 443 dhcp_release(netif);
Yann 0:f30e2135b0db 444 dhcp_discover(netif);
Yann 0:f30e2135b0db 445 }
Yann 0:f30e2135b0db 446 } else if (dhcp->state == DHCP_REBOOTING) {
Yann 0:f30e2135b0db 447 if (dhcp->tries < REBOOT_TRIES) {
Yann 0:f30e2135b0db 448 dhcp_reboot(netif);
Yann 0:f30e2135b0db 449 } else {
Yann 0:f30e2135b0db 450 dhcp_discover(netif);
Yann 0:f30e2135b0db 451 }
Yann 0:f30e2135b0db 452 }
Yann 0:f30e2135b0db 453 }
Yann 0:f30e2135b0db 454
Yann 0:f30e2135b0db 455 /**
Yann 0:f30e2135b0db 456 * The renewal period has timed out.
Yann 0:f30e2135b0db 457 *
Yann 0:f30e2135b0db 458 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 459 */
Yann 0:f30e2135b0db 460 static void
Yann 0:f30e2135b0db 461 dhcp_t1_timeout(struct netif *netif)
Yann 0:f30e2135b0db 462 {
Yann 0:f30e2135b0db 463 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 464 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_t1_timeout()\n"));
Yann 0:f30e2135b0db 465 if ((dhcp->state == DHCP_REQUESTING) || (dhcp->state == DHCP_BOUND) ||
Yann 0:f30e2135b0db 466 (dhcp->state == DHCP_RENEWING)) {
Yann 0:f30e2135b0db 467 /* just retry to renew - note that the rebind timer (t2) will
Yann 0:f30e2135b0db 468 * eventually time-out if renew tries fail. */
Yann 0:f30e2135b0db 469 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE,
Yann 0:f30e2135b0db 470 ("dhcp_t1_timeout(): must renew\n"));
Yann 0:f30e2135b0db 471 /* This slightly different to RFC2131: DHCPREQUEST will be sent from state
Yann 0:f30e2135b0db 472 DHCP_RENEWING, not DHCP_BOUND */
Yann 0:f30e2135b0db 473 dhcp_renew(netif);
Yann 0:f30e2135b0db 474 }
Yann 0:f30e2135b0db 475 }
Yann 0:f30e2135b0db 476
Yann 0:f30e2135b0db 477 /**
Yann 0:f30e2135b0db 478 * The rebind period has timed out.
Yann 0:f30e2135b0db 479 *
Yann 0:f30e2135b0db 480 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 481 */
Yann 0:f30e2135b0db 482 static void
Yann 0:f30e2135b0db 483 dhcp_t2_timeout(struct netif *netif)
Yann 0:f30e2135b0db 484 {
Yann 0:f30e2135b0db 485 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 486 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_t2_timeout()\n"));
Yann 0:f30e2135b0db 487 if ((dhcp->state == DHCP_REQUESTING) || (dhcp->state == DHCP_BOUND) ||
Yann 0:f30e2135b0db 488 (dhcp->state == DHCP_RENEWING)) {
Yann 0:f30e2135b0db 489 /* just retry to rebind */
Yann 0:f30e2135b0db 490 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE,
Yann 0:f30e2135b0db 491 ("dhcp_t2_timeout(): must rebind\n"));
Yann 0:f30e2135b0db 492 /* This slightly different to RFC2131: DHCPREQUEST will be sent from state
Yann 0:f30e2135b0db 493 DHCP_REBINDING, not DHCP_BOUND */
Yann 0:f30e2135b0db 494 dhcp_rebind(netif);
Yann 0:f30e2135b0db 495 }
Yann 0:f30e2135b0db 496 }
Yann 0:f30e2135b0db 497
Yann 0:f30e2135b0db 498 /**
Yann 0:f30e2135b0db 499 * Handle a DHCP ACK packet
Yann 0:f30e2135b0db 500 *
Yann 0:f30e2135b0db 501 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 502 */
Yann 0:f30e2135b0db 503 static void
Yann 0:f30e2135b0db 504 dhcp_handle_ack(struct netif *netif)
Yann 0:f30e2135b0db 505 {
Yann 0:f30e2135b0db 506 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 507 #if LWIP_DNS
Yann 0:f30e2135b0db 508 u8_t n;
Yann 0:f30e2135b0db 509 #endif /* LWIP_DNS */
Yann 0:f30e2135b0db 510
Yann 0:f30e2135b0db 511 /* clear options we might not get from the ACK */
Yann 0:f30e2135b0db 512 ip_addr_set_zero(&dhcp->offered_sn_mask);
Yann 0:f30e2135b0db 513 ip_addr_set_zero(&dhcp->offered_gw_addr);
Yann 0:f30e2135b0db 514 #if LWIP_DHCP_BOOTP_FILE
Yann 0:f30e2135b0db 515 ip_addr_set_zero(&dhcp->offered_si_addr);
Yann 0:f30e2135b0db 516 #endif /* LWIP_DHCP_BOOTP_FILE */
Yann 0:f30e2135b0db 517
Yann 0:f30e2135b0db 518 /* lease time given? */
Yann 0:f30e2135b0db 519 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_LEASE_TIME)) {
Yann 0:f30e2135b0db 520 /* remember offered lease time */
Yann 0:f30e2135b0db 521 dhcp->offered_t0_lease = dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_LEASE_TIME);
Yann 0:f30e2135b0db 522 }
Yann 0:f30e2135b0db 523 /* renewal period given? */
Yann 0:f30e2135b0db 524 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_T1)) {
Yann 0:f30e2135b0db 525 /* remember given renewal period */
Yann 0:f30e2135b0db 526 dhcp->offered_t1_renew = dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_T1);
Yann 0:f30e2135b0db 527 } else {
Yann 0:f30e2135b0db 528 /* calculate safe periods for renewal */
Yann 0:f30e2135b0db 529 dhcp->offered_t1_renew = dhcp->offered_t0_lease / 2;
Yann 0:f30e2135b0db 530 }
Yann 0:f30e2135b0db 531
Yann 0:f30e2135b0db 532 /* renewal period given? */
Yann 0:f30e2135b0db 533 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_T2)) {
Yann 0:f30e2135b0db 534 /* remember given rebind period */
Yann 0:f30e2135b0db 535 dhcp->offered_t2_rebind = dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_T2);
Yann 0:f30e2135b0db 536 } else {
Yann 0:f30e2135b0db 537 /* calculate safe periods for rebinding */
Yann 0:f30e2135b0db 538 dhcp->offered_t2_rebind = dhcp->offered_t0_lease;
Yann 0:f30e2135b0db 539 }
Yann 0:f30e2135b0db 540
Yann 0:f30e2135b0db 541 /* (y)our internet address */
Yann 0:f30e2135b0db 542 ip_addr_copy(dhcp->offered_ip_addr, dhcp->msg_in->yiaddr);
Yann 0:f30e2135b0db 543
Yann 0:f30e2135b0db 544 #if LWIP_DHCP_BOOTP_FILE
Yann 0:f30e2135b0db 545 /* copy boot server address,
Yann 0:f30e2135b0db 546 boot file name copied in dhcp_parse_reply if not overloaded */
Yann 0:f30e2135b0db 547 ip_addr_copy(dhcp->offered_si_addr, dhcp->msg_in->siaddr);
Yann 0:f30e2135b0db 548 #endif /* LWIP_DHCP_BOOTP_FILE */
Yann 0:f30e2135b0db 549
Yann 0:f30e2135b0db 550 /* subnet mask given? */
Yann 0:f30e2135b0db 551 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_SUBNET_MASK)) {
Yann 0:f30e2135b0db 552 /* remember given subnet mask */
Yann 0:f30e2135b0db 553 ip4_addr_set_u32(&dhcp->offered_sn_mask, htonl(dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_SUBNET_MASK)));
Yann 0:f30e2135b0db 554 dhcp->subnet_mask_given = 1;
Yann 0:f30e2135b0db 555 } else {
Yann 0:f30e2135b0db 556 dhcp->subnet_mask_given = 0;
Yann 0:f30e2135b0db 557 }
Yann 0:f30e2135b0db 558
Yann 0:f30e2135b0db 559 /* gateway router */
Yann 0:f30e2135b0db 560 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_ROUTER)) {
Yann 0:f30e2135b0db 561 ip4_addr_set_u32(&dhcp->offered_gw_addr, htonl(dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_ROUTER)));
Yann 0:f30e2135b0db 562 }
Yann 0:f30e2135b0db 563
Yann 0:f30e2135b0db 564 #if LWIP_DNS
Yann 0:f30e2135b0db 565 /* DNS servers */
Yann 0:f30e2135b0db 566 n = 0;
Yann 0:f30e2135b0db 567 while(dhcp_option_given(dhcp, DHCP_OPTION_IDX_DNS_SERVER + n) && (n < DNS_MAX_SERVERS)) {
Yann 0:f30e2135b0db 568 ip_addr_t dns_addr;
Yann 0:f30e2135b0db 569 ip4_addr_set_u32(&dns_addr, htonl(dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_DNS_SERVER + n)));
Yann 0:f30e2135b0db 570 dns_setserver(n, &dns_addr);
Yann 0:f30e2135b0db 571 n++;
Yann 0:f30e2135b0db 572 }
Yann 0:f30e2135b0db 573 #endif /* LWIP_DNS */
Yann 0:f30e2135b0db 574 }
Yann 0:f30e2135b0db 575
Yann 0:f30e2135b0db 576 /** Set a statically allocated struct dhcp to work with.
Yann 0:f30e2135b0db 577 * Using this prevents dhcp_start to allocate it using mem_malloc.
Yann 0:f30e2135b0db 578 *
Yann 0:f30e2135b0db 579 * @param netif the netif for which to set the struct dhcp
Yann 0:f30e2135b0db 580 * @param dhcp (uninitialised) dhcp struct allocated by the application
Yann 0:f30e2135b0db 581 */
Yann 0:f30e2135b0db 582 void
Yann 0:f30e2135b0db 583 dhcp_set_struct(struct netif *netif, struct dhcp *dhcp)
Yann 0:f30e2135b0db 584 {
Yann 0:f30e2135b0db 585 LWIP_ASSERT("netif != NULL", netif != NULL);
Yann 0:f30e2135b0db 586 LWIP_ASSERT("dhcp != NULL", dhcp != NULL);
Yann 0:f30e2135b0db 587 LWIP_ASSERT("netif already has a struct dhcp set", netif->dhcp == NULL);
Yann 0:f30e2135b0db 588
Yann 0:f30e2135b0db 589 /* clear data structure */
Yann 0:f30e2135b0db 590 memset(dhcp, 0, sizeof(struct dhcp));
Yann 0:f30e2135b0db 591 /* dhcp_set_state(&dhcp, DHCP_OFF); */
Yann 0:f30e2135b0db 592 netif->dhcp = dhcp;
Yann 0:f30e2135b0db 593 }
Yann 0:f30e2135b0db 594
Yann 0:f30e2135b0db 595 /**
Yann 0:f30e2135b0db 596 * Start DHCP negotiation for a network interface.
Yann 0:f30e2135b0db 597 *
Yann 0:f30e2135b0db 598 * If no DHCP client instance was attached to this interface,
Yann 0:f30e2135b0db 599 * a new client is created first. If a DHCP client instance
Yann 0:f30e2135b0db 600 * was already present, it restarts negotiation.
Yann 0:f30e2135b0db 601 *
Yann 0:f30e2135b0db 602 * @param netif The lwIP network interface
Yann 0:f30e2135b0db 603 * @return lwIP error code
Yann 0:f30e2135b0db 604 * - ERR_OK - No error
Yann 0:f30e2135b0db 605 * - ERR_MEM - Out of memory
Yann 0:f30e2135b0db 606 */
Yann 0:f30e2135b0db 607 err_t
Yann 0:f30e2135b0db 608 dhcp_start(struct netif *netif)
Yann 0:f30e2135b0db 609 {
Yann 0:f30e2135b0db 610 struct dhcp *dhcp;
Yann 0:f30e2135b0db 611 err_t result = ERR_OK;
Yann 0:f30e2135b0db 612
Yann 0:f30e2135b0db 613 LWIP_ERROR("netif != NULL", (netif != NULL), return ERR_ARG;);
Yann 0:f30e2135b0db 614 dhcp = netif->dhcp;
Yann 0:f30e2135b0db 615 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_start(netif=%p) %c%c%"U16_F"\n", (void*)netif, netif->name[0], netif->name[1], (u16_t)netif->num));
Yann 0:f30e2135b0db 616 /* Remove the flag that says this netif is handled by DHCP,
Yann 0:f30e2135b0db 617 it is set when we succeeded starting. */
Yann 0:f30e2135b0db 618 netif->flags &= ~NETIF_FLAG_DHCP;
Yann 0:f30e2135b0db 619
Yann 0:f30e2135b0db 620 /* check hwtype of the netif */
Yann 0:f30e2135b0db 621 if ((netif->flags & NETIF_FLAG_ETHARP) == 0) {
Yann 0:f30e2135b0db 622 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): No ETHARP netif\n"));
Yann 0:f30e2135b0db 623 return ERR_ARG;
Yann 0:f30e2135b0db 624 }
Yann 0:f30e2135b0db 625
Yann 0:f30e2135b0db 626 /* check MTU of the netif */
Yann 0:f30e2135b0db 627 if (netif->mtu < DHCP_MAX_MSG_LEN_MIN_REQUIRED) {
Yann 0:f30e2135b0db 628 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): Cannot use this netif with DHCP: MTU is too small\n"));
Yann 0:f30e2135b0db 629 return ERR_MEM;
Yann 0:f30e2135b0db 630 }
Yann 0:f30e2135b0db 631
Yann 0:f30e2135b0db 632 /* no DHCP client attached yet? */
Yann 0:f30e2135b0db 633 if (dhcp == NULL) {
Yann 0:f30e2135b0db 634 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): starting new DHCP client\n"));
Yann 0:f30e2135b0db 635 dhcp = (struct dhcp *)mem_malloc(sizeof(struct dhcp));
Yann 0:f30e2135b0db 636 if (dhcp == NULL) {
Yann 0:f30e2135b0db 637 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): could not allocate dhcp\n"));
Yann 0:f30e2135b0db 638 return ERR_MEM;
Yann 0:f30e2135b0db 639 }
Yann 0:f30e2135b0db 640 /* store this dhcp client in the netif */
Yann 0:f30e2135b0db 641 netif->dhcp = dhcp;
Yann 0:f30e2135b0db 642 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): allocated dhcp"));
Yann 0:f30e2135b0db 643 /* already has DHCP client attached */
Yann 0:f30e2135b0db 644 } else {
Yann 0:f30e2135b0db 645 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_start(): restarting DHCP configuration\n"));
Yann 0:f30e2135b0db 646 if (dhcp->pcb != NULL) {
Yann 0:f30e2135b0db 647 udp_remove(dhcp->pcb);
Yann 0:f30e2135b0db 648 }
Yann 0:f30e2135b0db 649 LWIP_ASSERT("pbuf p_out wasn't freed", dhcp->p_out == NULL);
Yann 0:f30e2135b0db 650 LWIP_ASSERT("reply wasn't freed", dhcp->msg_in == NULL );
Yann 0:f30e2135b0db 651 }
Yann 0:f30e2135b0db 652
Yann 0:f30e2135b0db 653 /* clear data structure */
Yann 0:f30e2135b0db 654 memset(dhcp, 0, sizeof(struct dhcp));
Yann 0:f30e2135b0db 655 /* dhcp_set_state(&dhcp, DHCP_OFF); */
Yann 0:f30e2135b0db 656 /* allocate UDP PCB */
Yann 0:f30e2135b0db 657 dhcp->pcb = udp_new();
Yann 0:f30e2135b0db 658 if (dhcp->pcb == NULL) {
Yann 0:f30e2135b0db 659 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): could not obtain pcb\n"));
Yann 0:f30e2135b0db 660 return ERR_MEM;
Yann 0:f30e2135b0db 661 }
Yann 0:f30e2135b0db 662 dhcp->pcb->so_options |= SOF_BROADCAST;
Yann 0:f30e2135b0db 663 /* set up local and remote port for the pcb */
Yann 0:f30e2135b0db 664 udp_bind(dhcp->pcb, IP_ADDR_ANY, DHCP_CLIENT_PORT);
Yann 0:f30e2135b0db 665 udp_connect(dhcp->pcb, IP_ADDR_ANY, DHCP_SERVER_PORT);
Yann 0:f30e2135b0db 666 /* set up the recv callback and argument */
Yann 0:f30e2135b0db 667 udp_recv(dhcp->pcb, dhcp_recv, netif);
Yann 0:f30e2135b0db 668 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_start(): starting DHCP configuration\n"));
Yann 0:f30e2135b0db 669 /* (re)start the DHCP negotiation */
Yann 0:f30e2135b0db 670 result = dhcp_discover(netif);
Yann 0:f30e2135b0db 671 if (result != ERR_OK) {
Yann 0:f30e2135b0db 672 /* free resources allocated above */
Yann 0:f30e2135b0db 673 dhcp_stop(netif);
Yann 0:f30e2135b0db 674 return ERR_MEM;
Yann 0:f30e2135b0db 675 }
Yann 0:f30e2135b0db 676 /* Set the flag that says this netif is handled by DHCP. */
Yann 0:f30e2135b0db 677 netif->flags |= NETIF_FLAG_DHCP;
Yann 0:f30e2135b0db 678 return result;
Yann 0:f30e2135b0db 679 }
Yann 0:f30e2135b0db 680
Yann 0:f30e2135b0db 681 /**
Yann 0:f30e2135b0db 682 * Inform a DHCP server of our manual configuration.
Yann 0:f30e2135b0db 683 *
Yann 0:f30e2135b0db 684 * This informs DHCP servers of our fixed IP address configuration
Yann 0:f30e2135b0db 685 * by sending an INFORM message. It does not involve DHCP address
Yann 0:f30e2135b0db 686 * configuration, it is just here to be nice to the network.
Yann 0:f30e2135b0db 687 *
Yann 0:f30e2135b0db 688 * @param netif The lwIP network interface
Yann 0:f30e2135b0db 689 */
Yann 0:f30e2135b0db 690 void
Yann 0:f30e2135b0db 691 dhcp_inform(struct netif *netif)
Yann 0:f30e2135b0db 692 {
Yann 0:f30e2135b0db 693 struct dhcp dhcp;
Yann 0:f30e2135b0db 694 err_t result = ERR_OK;
Yann 0:f30e2135b0db 695 struct udp_pcb *pcb;
Yann 0:f30e2135b0db 696
Yann 0:f30e2135b0db 697 LWIP_ERROR("netif != NULL", (netif != NULL), return;);
Yann 0:f30e2135b0db 698
Yann 0:f30e2135b0db 699 memset(&dhcp, 0, sizeof(struct dhcp));
Yann 0:f30e2135b0db 700 dhcp_set_state(&dhcp, DHCP_INFORM);
Yann 0:f30e2135b0db 701
Yann 0:f30e2135b0db 702 if ((netif->dhcp != NULL) && (netif->dhcp->pcb != NULL)) {
Yann 0:f30e2135b0db 703 /* re-use existing pcb */
Yann 0:f30e2135b0db 704 pcb = netif->dhcp->pcb;
Yann 0:f30e2135b0db 705 } else {
Yann 0:f30e2135b0db 706 pcb = udp_new();
Yann 0:f30e2135b0db 707 if (pcb == NULL) {
Yann 0:f30e2135b0db 708 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_inform(): could not obtain pcb"));
Yann 0:f30e2135b0db 709 return;
Yann 0:f30e2135b0db 710 }
Yann 0:f30e2135b0db 711 dhcp.pcb = pcb;
Yann 0:f30e2135b0db 712 dhcp.pcb->so_options |= SOF_BROADCAST;
Yann 0:f30e2135b0db 713 udp_bind(dhcp.pcb, IP_ADDR_ANY, DHCP_CLIENT_PORT);
Yann 0:f30e2135b0db 714 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_inform(): created new udp pcb\n"));
Yann 0:f30e2135b0db 715 }
Yann 0:f30e2135b0db 716 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 717 result = dhcp_create_msg(netif, &dhcp, DHCP_INFORM);
Yann 0:f30e2135b0db 718 if (result == ERR_OK) {
Yann 0:f30e2135b0db 719 dhcp_option(&dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 720 dhcp_option_short(&dhcp, DHCP_MAX_MSG_LEN(netif));
Yann 0:f30e2135b0db 721
Yann 0:f30e2135b0db 722 dhcp_option_trailer(&dhcp);
Yann 0:f30e2135b0db 723
Yann 0:f30e2135b0db 724 pbuf_realloc(dhcp.p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp.options_out_len);
Yann 0:f30e2135b0db 725
Yann 0:f30e2135b0db 726 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_inform: INFORMING\n"));
Yann 0:f30e2135b0db 727 udp_sendto_if(pcb, dhcp.p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 728 dhcp_delete_msg(&dhcp);
Yann 0:f30e2135b0db 729 } else {
Yann 0:f30e2135b0db 730 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_inform: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 731 }
Yann 0:f30e2135b0db 732
Yann 0:f30e2135b0db 733 if (dhcp.pcb != NULL) {
Yann 0:f30e2135b0db 734 /* otherwise, the existing pcb was used */
Yann 0:f30e2135b0db 735 udp_remove(dhcp.pcb);
Yann 0:f30e2135b0db 736 }
Yann 0:f30e2135b0db 737 }
Yann 0:f30e2135b0db 738
Yann 0:f30e2135b0db 739 /** Handle a possible change in the network configuration.
Yann 0:f30e2135b0db 740 *
Yann 0:f30e2135b0db 741 * This enters the REBOOTING state to verify that the currently bound
Yann 0:f30e2135b0db 742 * address is still valid.
Yann 0:f30e2135b0db 743 */
Yann 0:f30e2135b0db 744 void
Yann 0:f30e2135b0db 745 dhcp_network_changed(struct netif *netif)
Yann 0:f30e2135b0db 746 {
Yann 0:f30e2135b0db 747 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 748 if (!dhcp)
Yann 0:f30e2135b0db 749 return;
Yann 0:f30e2135b0db 750 switch (dhcp->state) {
Yann 0:f30e2135b0db 751 case DHCP_REBINDING:
Yann 0:f30e2135b0db 752 case DHCP_RENEWING:
Yann 0:f30e2135b0db 753 case DHCP_BOUND:
Yann 0:f30e2135b0db 754 case DHCP_REBOOTING:
Yann 0:f30e2135b0db 755 netif_set_down(netif);
Yann 0:f30e2135b0db 756 dhcp->tries = 0;
Yann 0:f30e2135b0db 757 dhcp_reboot(netif);
Yann 0:f30e2135b0db 758 break;
Yann 0:f30e2135b0db 759 case DHCP_OFF:
Yann 0:f30e2135b0db 760 /* stay off */
Yann 0:f30e2135b0db 761 break;
Yann 0:f30e2135b0db 762 default:
Yann 0:f30e2135b0db 763 dhcp->tries = 0;
Yann 0:f30e2135b0db 764 #if LWIP_DHCP_AUTOIP_COOP
Yann 0:f30e2135b0db 765 dhcp->autoip_coop_state = DHCP_AUTOIP_COOP_STATE_OFF;
Yann 0:f30e2135b0db 766 #endif /* LWIP_DHCP_AUTOIP_COOP */
Yann 0:f30e2135b0db 767 dhcp_discover(netif);
Yann 0:f30e2135b0db 768 break;
Yann 0:f30e2135b0db 769 }
Yann 0:f30e2135b0db 770 }
Yann 0:f30e2135b0db 771
Yann 0:f30e2135b0db 772 #if DHCP_DOES_ARP_CHECK
Yann 0:f30e2135b0db 773 /**
Yann 0:f30e2135b0db 774 * Match an ARP reply with the offered IP address.
Yann 0:f30e2135b0db 775 *
Yann 0:f30e2135b0db 776 * @param netif the network interface on which the reply was received
Yann 0:f30e2135b0db 777 * @param addr The IP address we received a reply from
Yann 0:f30e2135b0db 778 */
Yann 0:f30e2135b0db 779 void dhcp_arp_reply(struct netif *netif, ip_addr_t *addr)
Yann 0:f30e2135b0db 780 {
Yann 0:f30e2135b0db 781 LWIP_ERROR("netif != NULL", (netif != NULL), return;);
Yann 0:f30e2135b0db 782 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_arp_reply()\n"));
Yann 0:f30e2135b0db 783 /* is a DHCP client doing an ARP check? */
Yann 0:f30e2135b0db 784 if ((netif->dhcp != NULL) && (netif->dhcp->state == DHCP_CHECKING)) {
Yann 0:f30e2135b0db 785 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_arp_reply(): CHECKING, arp reply for 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 786 ip4_addr_get_u32(addr)));
Yann 0:f30e2135b0db 787 /* did a host respond with the address we
Yann 0:f30e2135b0db 788 were offered by the DHCP server? */
Yann 0:f30e2135b0db 789 if (ip_addr_cmp(addr, &netif->dhcp->offered_ip_addr)) {
Yann 0:f30e2135b0db 790 /* we will not accept the offered address */
Yann 0:f30e2135b0db 791 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE | LWIP_DBG_LEVEL_WARNING,
Yann 0:f30e2135b0db 792 ("dhcp_arp_reply(): arp reply matched with offered address, declining\n"));
Yann 0:f30e2135b0db 793 dhcp_decline(netif);
Yann 0:f30e2135b0db 794 }
Yann 0:f30e2135b0db 795 }
Yann 0:f30e2135b0db 796 }
Yann 0:f30e2135b0db 797
Yann 0:f30e2135b0db 798 /**
Yann 0:f30e2135b0db 799 * Decline an offered lease.
Yann 0:f30e2135b0db 800 *
Yann 0:f30e2135b0db 801 * Tell the DHCP server we do not accept the offered address.
Yann 0:f30e2135b0db 802 * One reason to decline the lease is when we find out the address
Yann 0:f30e2135b0db 803 * is already in use by another host (through ARP).
Yann 0:f30e2135b0db 804 *
Yann 0:f30e2135b0db 805 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 806 */
Yann 0:f30e2135b0db 807 static err_t
Yann 0:f30e2135b0db 808 dhcp_decline(struct netif *netif)
Yann 0:f30e2135b0db 809 {
Yann 0:f30e2135b0db 810 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 811 err_t result = ERR_OK;
Yann 0:f30e2135b0db 812 u16_t msecs;
Yann 0:f30e2135b0db 813 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_decline()\n"));
Yann 0:f30e2135b0db 814 dhcp_set_state(dhcp, DHCP_BACKING_OFF);
Yann 0:f30e2135b0db 815 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 816 result = dhcp_create_msg(netif, dhcp, DHCP_DECLINE);
Yann 0:f30e2135b0db 817 if (result == ERR_OK) {
Yann 0:f30e2135b0db 818 dhcp_option(dhcp, DHCP_OPTION_REQUESTED_IP, 4);
Yann 0:f30e2135b0db 819 dhcp_option_long(dhcp, ntohl(ip4_addr_get_u32(&dhcp->offered_ip_addr)));
Yann 0:f30e2135b0db 820
Yann 0:f30e2135b0db 821 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 822 /* resize pbuf to reflect true size of options */
Yann 0:f30e2135b0db 823 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 824
Yann 0:f30e2135b0db 825 /* per section 4.4.4, broadcast DECLINE messages */
Yann 0:f30e2135b0db 826 udp_sendto_if(dhcp->pcb, dhcp->p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 827 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 828 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_decline: BACKING OFF\n"));
Yann 0:f30e2135b0db 829 } else {
Yann 0:f30e2135b0db 830 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS,
Yann 0:f30e2135b0db 831 ("dhcp_decline: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 832 }
Yann 0:f30e2135b0db 833 dhcp->tries++;
Yann 0:f30e2135b0db 834 msecs = 10*1000;
Yann 0:f30e2135b0db 835 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 836 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_decline(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 837 return result;
Yann 0:f30e2135b0db 838 }
Yann 0:f30e2135b0db 839 #endif /* DHCP_DOES_ARP_CHECK */
Yann 0:f30e2135b0db 840
Yann 0:f30e2135b0db 841
Yann 0:f30e2135b0db 842 /**
Yann 0:f30e2135b0db 843 * Start the DHCP process, discover a DHCP server.
Yann 0:f30e2135b0db 844 *
Yann 0:f30e2135b0db 845 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 846 */
Yann 0:f30e2135b0db 847 static err_t
Yann 0:f30e2135b0db 848 dhcp_discover(struct netif *netif)
Yann 0:f30e2135b0db 849 {
Yann 0:f30e2135b0db 850 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 851 err_t result = ERR_OK;
Yann 0:f30e2135b0db 852 u16_t msecs;
Yann 0:f30e2135b0db 853 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_discover()\n"));
Yann 0:f30e2135b0db 854 ip_addr_set_any(&dhcp->offered_ip_addr);
Yann 0:f30e2135b0db 855 dhcp_set_state(dhcp, DHCP_SELECTING);
Yann 0:f30e2135b0db 856 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 857 result = dhcp_create_msg(netif, dhcp, DHCP_DISCOVER);
Yann 0:f30e2135b0db 858 if (result == ERR_OK) {
Yann 0:f30e2135b0db 859 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_discover: making request\n"));
Yann 0:f30e2135b0db 860
Yann 0:f30e2135b0db 861 dhcp_option(dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 862 dhcp_option_short(dhcp, DHCP_MAX_MSG_LEN(netif));
Yann 0:f30e2135b0db 863
Yann 0:f30e2135b0db 864 dhcp_option(dhcp, DHCP_OPTION_PARAMETER_REQUEST_LIST, 4/*num options*/);
Yann 0:f30e2135b0db 865 dhcp_option_byte(dhcp, DHCP_OPTION_SUBNET_MASK);
Yann 0:f30e2135b0db 866 dhcp_option_byte(dhcp, DHCP_OPTION_ROUTER);
Yann 0:f30e2135b0db 867 dhcp_option_byte(dhcp, DHCP_OPTION_BROADCAST);
Yann 0:f30e2135b0db 868 dhcp_option_byte(dhcp, DHCP_OPTION_DNS_SERVER);
Yann 0:f30e2135b0db 869
Yann 0:f30e2135b0db 870 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 871
Yann 0:f30e2135b0db 872 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_discover: realloc()ing\n"));
Yann 0:f30e2135b0db 873 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 874
Yann 0:f30e2135b0db 875 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_discover: sendto(DISCOVER, IP_ADDR_BROADCAST, DHCP_SERVER_PORT)\n"));
Yann 0:f30e2135b0db 876 udp_sendto_if(dhcp->pcb, dhcp->p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 877 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_discover: deleting()ing\n"));
Yann 0:f30e2135b0db 878 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 879 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_discover: SELECTING\n"));
Yann 0:f30e2135b0db 880 } else {
Yann 0:f30e2135b0db 881 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_discover: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 882 }
Yann 0:f30e2135b0db 883 dhcp->tries++;
Yann 0:f30e2135b0db 884 #if LWIP_DHCP_AUTOIP_COOP
Yann 0:f30e2135b0db 885 if(dhcp->tries >= LWIP_DHCP_AUTOIP_COOP_TRIES && dhcp->autoip_coop_state == DHCP_AUTOIP_COOP_STATE_OFF) {
Yann 0:f30e2135b0db 886 dhcp->autoip_coop_state = DHCP_AUTOIP_COOP_STATE_ON;
Yann 0:f30e2135b0db 887 autoip_start(netif);
Yann 0:f30e2135b0db 888 }
Yann 0:f30e2135b0db 889 #endif /* LWIP_DHCP_AUTOIP_COOP */
Yann 0:f30e2135b0db 890 msecs = (dhcp->tries < 6 ? 1 << dhcp->tries : 60) * 1000;
Yann 0:f30e2135b0db 891 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 892 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_discover(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 893 return result;
Yann 0:f30e2135b0db 894 }
Yann 0:f30e2135b0db 895
Yann 0:f30e2135b0db 896
Yann 0:f30e2135b0db 897 /**
Yann 0:f30e2135b0db 898 * Bind the interface to the offered IP address.
Yann 0:f30e2135b0db 899 *
Yann 0:f30e2135b0db 900 * @param netif network interface to bind to the offered address
Yann 0:f30e2135b0db 901 */
Yann 0:f30e2135b0db 902 static void
Yann 0:f30e2135b0db 903 dhcp_bind(struct netif *netif)
Yann 0:f30e2135b0db 904 {
Yann 0:f30e2135b0db 905 u32_t timeout;
Yann 0:f30e2135b0db 906 struct dhcp *dhcp;
Yann 0:f30e2135b0db 907 ip_addr_t sn_mask, gw_addr;
Yann 0:f30e2135b0db 908 LWIP_ERROR("dhcp_bind: netif != NULL", (netif != NULL), return;);
Yann 0:f30e2135b0db 909 dhcp = netif->dhcp;
Yann 0:f30e2135b0db 910 LWIP_ERROR("dhcp_bind: dhcp != NULL", (dhcp != NULL), return;);
Yann 0:f30e2135b0db 911 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_bind(netif=%p) %c%c%"U16_F"\n", (void*)netif, netif->name[0], netif->name[1], (u16_t)netif->num));
Yann 0:f30e2135b0db 912
Yann 0:f30e2135b0db 913 /* temporary DHCP lease? */
Yann 0:f30e2135b0db 914 if (dhcp->offered_t1_renew != 0xffffffffUL) {
Yann 0:f30e2135b0db 915 /* set renewal period timer */
Yann 0:f30e2135b0db 916 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_bind(): t1 renewal timer %"U32_F" secs\n", dhcp->offered_t1_renew));
Yann 0:f30e2135b0db 917 timeout = (dhcp->offered_t1_renew + DHCP_COARSE_TIMER_SECS / 2) / DHCP_COARSE_TIMER_SECS;
Yann 0:f30e2135b0db 918 if(timeout > 0xffff) {
Yann 0:f30e2135b0db 919 timeout = 0xffff;
Yann 0:f30e2135b0db 920 }
Yann 0:f30e2135b0db 921 dhcp->t1_timeout = (u16_t)timeout;
Yann 0:f30e2135b0db 922 if (dhcp->t1_timeout == 0) {
Yann 0:f30e2135b0db 923 dhcp->t1_timeout = 1;
Yann 0:f30e2135b0db 924 }
Yann 0:f30e2135b0db 925 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_bind(): set request timeout %"U32_F" msecs\n", dhcp->offered_t1_renew*1000));
Yann 0:f30e2135b0db 926 }
Yann 0:f30e2135b0db 927 /* set renewal period timer */
Yann 0:f30e2135b0db 928 if (dhcp->offered_t2_rebind != 0xffffffffUL) {
Yann 0:f30e2135b0db 929 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_bind(): t2 rebind timer %"U32_F" secs\n", dhcp->offered_t2_rebind));
Yann 0:f30e2135b0db 930 timeout = (dhcp->offered_t2_rebind + DHCP_COARSE_TIMER_SECS / 2) / DHCP_COARSE_TIMER_SECS;
Yann 0:f30e2135b0db 931 if(timeout > 0xffff) {
Yann 0:f30e2135b0db 932 timeout = 0xffff;
Yann 0:f30e2135b0db 933 }
Yann 0:f30e2135b0db 934 dhcp->t2_timeout = (u16_t)timeout;
Yann 0:f30e2135b0db 935 if (dhcp->t2_timeout == 0) {
Yann 0:f30e2135b0db 936 dhcp->t2_timeout = 1;
Yann 0:f30e2135b0db 937 }
Yann 0:f30e2135b0db 938 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_bind(): set request timeout %"U32_F" msecs\n", dhcp->offered_t2_rebind*1000));
Yann 0:f30e2135b0db 939 }
Yann 0:f30e2135b0db 940
Yann 0:f30e2135b0db 941 if (dhcp->subnet_mask_given) {
Yann 0:f30e2135b0db 942 /* copy offered network mask */
Yann 0:f30e2135b0db 943 ip_addr_copy(sn_mask, dhcp->offered_sn_mask);
Yann 0:f30e2135b0db 944 } else {
Yann 0:f30e2135b0db 945 /* subnet mask not given, choose a safe subnet mask given the network class */
Yann 0:f30e2135b0db 946 u8_t first_octet = ip4_addr1(&dhcp->offered_ip_addr);
Yann 0:f30e2135b0db 947 if (first_octet <= 127) {
Yann 0:f30e2135b0db 948 ip4_addr_set_u32(&sn_mask, PP_HTONL(0xff000000));
Yann 0:f30e2135b0db 949 } else if (first_octet >= 192) {
Yann 0:f30e2135b0db 950 ip4_addr_set_u32(&sn_mask, PP_HTONL(0xffffff00));
Yann 0:f30e2135b0db 951 } else {
Yann 0:f30e2135b0db 952 ip4_addr_set_u32(&sn_mask, PP_HTONL(0xffff0000));
Yann 0:f30e2135b0db 953 }
Yann 0:f30e2135b0db 954 }
Yann 0:f30e2135b0db 955
Yann 0:f30e2135b0db 956 ip_addr_copy(gw_addr, dhcp->offered_gw_addr);
Yann 0:f30e2135b0db 957 /* gateway address not given? */
Yann 0:f30e2135b0db 958 if (ip_addr_isany(&gw_addr)) {
Yann 0:f30e2135b0db 959 /* copy network address */
Yann 0:f30e2135b0db 960 ip_addr_get_network(&gw_addr, &dhcp->offered_ip_addr, &sn_mask);
Yann 0:f30e2135b0db 961 /* use first host address on network as gateway */
Yann 0:f30e2135b0db 962 ip4_addr_set_u32(&gw_addr, ip4_addr_get_u32(&gw_addr) | PP_HTONL(0x00000001));
Yann 0:f30e2135b0db 963 }
Yann 0:f30e2135b0db 964
Yann 0:f30e2135b0db 965 #if LWIP_DHCP_AUTOIP_COOP
Yann 0:f30e2135b0db 966 if(dhcp->autoip_coop_state == DHCP_AUTOIP_COOP_STATE_ON) {
Yann 0:f30e2135b0db 967 autoip_stop(netif);
Yann 0:f30e2135b0db 968 dhcp->autoip_coop_state = DHCP_AUTOIP_COOP_STATE_OFF;
Yann 0:f30e2135b0db 969 }
Yann 0:f30e2135b0db 970 #endif /* LWIP_DHCP_AUTOIP_COOP */
Yann 0:f30e2135b0db 971
Yann 0:f30e2135b0db 972 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_bind(): IP: 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 973 ip4_addr_get_u32(&dhcp->offered_ip_addr)));
Yann 0:f30e2135b0db 974 netif_set_ipaddr(netif, &dhcp->offered_ip_addr);
Yann 0:f30e2135b0db 975 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_bind(): SN: 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 976 ip4_addr_get_u32(&sn_mask)));
Yann 0:f30e2135b0db 977 netif_set_netmask(netif, &sn_mask);
Yann 0:f30e2135b0db 978 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_STATE, ("dhcp_bind(): GW: 0x%08"X32_F"\n",
Yann 0:f30e2135b0db 979 ip4_addr_get_u32(&gw_addr)));
Yann 0:f30e2135b0db 980 netif_set_gw(netif, &gw_addr);
Yann 0:f30e2135b0db 981 /* bring the interface up */
Yann 0:f30e2135b0db 982 netif_set_up(netif);
Yann 0:f30e2135b0db 983 /* netif is now bound to DHCP leased address */
Yann 0:f30e2135b0db 984 dhcp_set_state(dhcp, DHCP_BOUND);
Yann 0:f30e2135b0db 985 }
Yann 0:f30e2135b0db 986
Yann 0:f30e2135b0db 987 /**
Yann 0:f30e2135b0db 988 * Renew an existing DHCP lease at the involved DHCP server.
Yann 0:f30e2135b0db 989 *
Yann 0:f30e2135b0db 990 * @param netif network interface which must renew its lease
Yann 0:f30e2135b0db 991 */
Yann 0:f30e2135b0db 992 err_t
Yann 0:f30e2135b0db 993 dhcp_renew(struct netif *netif)
Yann 0:f30e2135b0db 994 {
Yann 0:f30e2135b0db 995 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 996 err_t result;
Yann 0:f30e2135b0db 997 u16_t msecs;
Yann 0:f30e2135b0db 998 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_renew()\n"));
Yann 0:f30e2135b0db 999 dhcp_set_state(dhcp, DHCP_RENEWING);
Yann 0:f30e2135b0db 1000
Yann 0:f30e2135b0db 1001 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 1002 result = dhcp_create_msg(netif, dhcp, DHCP_REQUEST);
Yann 0:f30e2135b0db 1003 if (result == ERR_OK) {
Yann 0:f30e2135b0db 1004 dhcp_option(dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 1005 dhcp_option_short(dhcp, DHCP_MAX_MSG_LEN(netif));
Yann 0:f30e2135b0db 1006
Yann 0:f30e2135b0db 1007 #if LWIP_NETIF_HOSTNAME
Yann 0:f30e2135b0db 1008 if (netif->hostname != NULL) {
Yann 0:f30e2135b0db 1009 const char *p = (const char*)netif->hostname;
Yann 0:f30e2135b0db 1010 u8_t namelen = (u8_t)strlen(p);
Yann 0:f30e2135b0db 1011 if (namelen > 0) {
Yann 0:f30e2135b0db 1012 LWIP_ASSERT("DHCP: hostname is too long!", namelen < 255);
Yann 0:f30e2135b0db 1013 dhcp_option(dhcp, DHCP_OPTION_HOSTNAME, namelen);
Yann 0:f30e2135b0db 1014 while (*p) {
Yann 0:f30e2135b0db 1015 dhcp_option_byte(dhcp, *p++);
Yann 0:f30e2135b0db 1016 }
Yann 0:f30e2135b0db 1017 }
Yann 0:f30e2135b0db 1018 }
Yann 0:f30e2135b0db 1019 #endif /* LWIP_NETIF_HOSTNAME */
Yann 0:f30e2135b0db 1020
Yann 0:f30e2135b0db 1021 #if 0
Yann 0:f30e2135b0db 1022 dhcp_option(dhcp, DHCP_OPTION_REQUESTED_IP, 4);
Yann 0:f30e2135b0db 1023 dhcp_option_long(dhcp, ntohl(dhcp->offered_ip_addr.addr));
Yann 0:f30e2135b0db 1024 #endif
Yann 0:f30e2135b0db 1025
Yann 0:f30e2135b0db 1026 #if 0
Yann 0:f30e2135b0db 1027 dhcp_option(dhcp, DHCP_OPTION_SERVER_ID, 4);
Yann 0:f30e2135b0db 1028 dhcp_option_long(dhcp, ntohl(dhcp->server_ip_addr.addr));
Yann 0:f30e2135b0db 1029 #endif
Yann 0:f30e2135b0db 1030 /* append DHCP message trailer */
Yann 0:f30e2135b0db 1031 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 1032
Yann 0:f30e2135b0db 1033 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 1034
Yann 0:f30e2135b0db 1035 udp_sendto_if(dhcp->pcb, dhcp->p_out, &dhcp->server_ip_addr, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 1036 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 1037
Yann 0:f30e2135b0db 1038 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_renew: RENEWING\n"));
Yann 0:f30e2135b0db 1039 } else {
Yann 0:f30e2135b0db 1040 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_renew: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 1041 }
Yann 0:f30e2135b0db 1042 dhcp->tries++;
Yann 0:f30e2135b0db 1043 /* back-off on retries, but to a maximum of 20 seconds */
Yann 0:f30e2135b0db 1044 msecs = dhcp->tries < 10 ? dhcp->tries * 2000 : 20 * 1000;
Yann 0:f30e2135b0db 1045 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 1046 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_renew(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 1047 return result;
Yann 0:f30e2135b0db 1048 }
Yann 0:f30e2135b0db 1049
Yann 0:f30e2135b0db 1050 /**
Yann 0:f30e2135b0db 1051 * Rebind with a DHCP server for an existing DHCP lease.
Yann 0:f30e2135b0db 1052 *
Yann 0:f30e2135b0db 1053 * @param netif network interface which must rebind with a DHCP server
Yann 0:f30e2135b0db 1054 */
Yann 0:f30e2135b0db 1055 static err_t
Yann 0:f30e2135b0db 1056 dhcp_rebind(struct netif *netif)
Yann 0:f30e2135b0db 1057 {
Yann 0:f30e2135b0db 1058 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 1059 err_t result;
Yann 0:f30e2135b0db 1060 u16_t msecs;
Yann 0:f30e2135b0db 1061 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_rebind()\n"));
Yann 0:f30e2135b0db 1062 dhcp_set_state(dhcp, DHCP_REBINDING);
Yann 0:f30e2135b0db 1063
Yann 0:f30e2135b0db 1064 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 1065 result = dhcp_create_msg(netif, dhcp, DHCP_REQUEST);
Yann 0:f30e2135b0db 1066 if (result == ERR_OK) {
Yann 0:f30e2135b0db 1067 dhcp_option(dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 1068 dhcp_option_short(dhcp, DHCP_MAX_MSG_LEN(netif));
Yann 0:f30e2135b0db 1069
Yann 0:f30e2135b0db 1070 #if LWIP_NETIF_HOSTNAME
Yann 0:f30e2135b0db 1071 if (netif->hostname != NULL) {
Yann 0:f30e2135b0db 1072 const char *p = (const char*)netif->hostname;
Yann 0:f30e2135b0db 1073 u8_t namelen = (u8_t)strlen(p);
Yann 0:f30e2135b0db 1074 if (namelen > 0) {
Yann 0:f30e2135b0db 1075 LWIP_ASSERT("DHCP: hostname is too long!", namelen < 255);
Yann 0:f30e2135b0db 1076 dhcp_option(dhcp, DHCP_OPTION_HOSTNAME, namelen);
Yann 0:f30e2135b0db 1077 while (*p) {
Yann 0:f30e2135b0db 1078 dhcp_option_byte(dhcp, *p++);
Yann 0:f30e2135b0db 1079 }
Yann 0:f30e2135b0db 1080 }
Yann 0:f30e2135b0db 1081 }
Yann 0:f30e2135b0db 1082 #endif /* LWIP_NETIF_HOSTNAME */
Yann 0:f30e2135b0db 1083
Yann 0:f30e2135b0db 1084 #if 0
Yann 0:f30e2135b0db 1085 dhcp_option(dhcp, DHCP_OPTION_REQUESTED_IP, 4);
Yann 0:f30e2135b0db 1086 dhcp_option_long(dhcp, ntohl(dhcp->offered_ip_addr.addr));
Yann 0:f30e2135b0db 1087
Yann 0:f30e2135b0db 1088 dhcp_option(dhcp, DHCP_OPTION_SERVER_ID, 4);
Yann 0:f30e2135b0db 1089 dhcp_option_long(dhcp, ntohl(dhcp->server_ip_addr.addr));
Yann 0:f30e2135b0db 1090 #endif
Yann 0:f30e2135b0db 1091
Yann 0:f30e2135b0db 1092 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 1093
Yann 0:f30e2135b0db 1094 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 1095
Yann 0:f30e2135b0db 1096 /* broadcast to server */
Yann 0:f30e2135b0db 1097 udp_sendto_if(dhcp->pcb, dhcp->p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 1098 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 1099 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_rebind: REBINDING\n"));
Yann 0:f30e2135b0db 1100 } else {
Yann 0:f30e2135b0db 1101 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_rebind: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 1102 }
Yann 0:f30e2135b0db 1103 dhcp->tries++;
Yann 0:f30e2135b0db 1104 msecs = dhcp->tries < 10 ? dhcp->tries * 1000 : 10 * 1000;
Yann 0:f30e2135b0db 1105 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 1106 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_rebind(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 1107 return result;
Yann 0:f30e2135b0db 1108 }
Yann 0:f30e2135b0db 1109
Yann 0:f30e2135b0db 1110 /**
Yann 0:f30e2135b0db 1111 * Enter REBOOTING state to verify an existing lease
Yann 0:f30e2135b0db 1112 *
Yann 0:f30e2135b0db 1113 * @param netif network interface which must reboot
Yann 0:f30e2135b0db 1114 */
Yann 0:f30e2135b0db 1115 static err_t
Yann 0:f30e2135b0db 1116 dhcp_reboot(struct netif *netif)
Yann 0:f30e2135b0db 1117 {
Yann 0:f30e2135b0db 1118 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 1119 err_t result;
Yann 0:f30e2135b0db 1120 u16_t msecs;
Yann 0:f30e2135b0db 1121 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_reboot()\n"));
Yann 0:f30e2135b0db 1122 dhcp_set_state(dhcp, DHCP_REBOOTING);
Yann 0:f30e2135b0db 1123
Yann 0:f30e2135b0db 1124 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 1125 result = dhcp_create_msg(netif, dhcp, DHCP_REQUEST);
Yann 0:f30e2135b0db 1126 if (result == ERR_OK) {
Yann 0:f30e2135b0db 1127 dhcp_option(dhcp, DHCP_OPTION_MAX_MSG_SIZE, DHCP_OPTION_MAX_MSG_SIZE_LEN);
Yann 0:f30e2135b0db 1128 dhcp_option_short(dhcp, 576);
Yann 0:f30e2135b0db 1129
Yann 0:f30e2135b0db 1130 dhcp_option(dhcp, DHCP_OPTION_REQUESTED_IP, 4);
Yann 0:f30e2135b0db 1131 dhcp_option_long(dhcp, ntohl(ip4_addr_get_u32(&dhcp->offered_ip_addr)));
Yann 0:f30e2135b0db 1132
Yann 0:f30e2135b0db 1133 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 1134
Yann 0:f30e2135b0db 1135 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 1136
Yann 0:f30e2135b0db 1137 /* broadcast to server */
Yann 0:f30e2135b0db 1138 udp_sendto_if(dhcp->pcb, dhcp->p_out, IP_ADDR_BROADCAST, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 1139 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 1140 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_reboot: REBOOTING\n"));
Yann 0:f30e2135b0db 1141 } else {
Yann 0:f30e2135b0db 1142 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_reboot: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 1143 }
Yann 0:f30e2135b0db 1144 dhcp->tries++;
Yann 0:f30e2135b0db 1145 msecs = dhcp->tries < 10 ? dhcp->tries * 1000 : 10 * 1000;
Yann 0:f30e2135b0db 1146 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 1147 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_reboot(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 1148 return result;
Yann 0:f30e2135b0db 1149 }
Yann 0:f30e2135b0db 1150
Yann 0:f30e2135b0db 1151
Yann 0:f30e2135b0db 1152 /**
Yann 0:f30e2135b0db 1153 * Release a DHCP lease.
Yann 0:f30e2135b0db 1154 *
Yann 0:f30e2135b0db 1155 * @param netif network interface which must release its lease
Yann 0:f30e2135b0db 1156 */
Yann 0:f30e2135b0db 1157 err_t
Yann 0:f30e2135b0db 1158 dhcp_release(struct netif *netif)
Yann 0:f30e2135b0db 1159 {
Yann 0:f30e2135b0db 1160 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 1161 err_t result;
Yann 0:f30e2135b0db 1162 u16_t msecs;
Yann 0:f30e2135b0db 1163 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_release()\n"));
Yann 0:f30e2135b0db 1164
Yann 0:f30e2135b0db 1165 /* idle DHCP client */
Yann 0:f30e2135b0db 1166 dhcp_set_state(dhcp, DHCP_OFF);
Yann 0:f30e2135b0db 1167 /* clean old DHCP offer */
Yann 0:f30e2135b0db 1168 ip_addr_set_zero(&dhcp->server_ip_addr);
Yann 0:f30e2135b0db 1169 ip_addr_set_zero(&dhcp->offered_ip_addr);
Yann 0:f30e2135b0db 1170 ip_addr_set_zero(&dhcp->offered_sn_mask);
Yann 0:f30e2135b0db 1171 ip_addr_set_zero(&dhcp->offered_gw_addr);
Yann 0:f30e2135b0db 1172 #if LWIP_DHCP_BOOTP_FILE
Yann 0:f30e2135b0db 1173 ip_addr_set_zero(&dhcp->offered_si_addr);
Yann 0:f30e2135b0db 1174 #endif /* LWIP_DHCP_BOOTP_FILE */
Yann 0:f30e2135b0db 1175 dhcp->offered_t0_lease = dhcp->offered_t1_renew = dhcp->offered_t2_rebind = 0;
Yann 0:f30e2135b0db 1176
Yann 0:f30e2135b0db 1177 /* create and initialize the DHCP message header */
Yann 0:f30e2135b0db 1178 result = dhcp_create_msg(netif, dhcp, DHCP_RELEASE);
Yann 0:f30e2135b0db 1179 if (result == ERR_OK) {
Yann 0:f30e2135b0db 1180 dhcp_option_trailer(dhcp);
Yann 0:f30e2135b0db 1181
Yann 0:f30e2135b0db 1182 pbuf_realloc(dhcp->p_out, sizeof(struct dhcp_msg) - DHCP_OPTIONS_LEN + dhcp->options_out_len);
Yann 0:f30e2135b0db 1183
Yann 0:f30e2135b0db 1184 udp_sendto_if(dhcp->pcb, dhcp->p_out, &dhcp->server_ip_addr, DHCP_SERVER_PORT, netif);
Yann 0:f30e2135b0db 1185 dhcp_delete_msg(dhcp);
Yann 0:f30e2135b0db 1186 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_release: RELEASED, DHCP_OFF\n"));
Yann 0:f30e2135b0db 1187 } else {
Yann 0:f30e2135b0db 1188 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS, ("dhcp_release: could not allocate DHCP request\n"));
Yann 0:f30e2135b0db 1189 }
Yann 0:f30e2135b0db 1190 dhcp->tries++;
Yann 0:f30e2135b0db 1191 msecs = dhcp->tries < 10 ? dhcp->tries * 1000 : 10 * 1000;
Yann 0:f30e2135b0db 1192 dhcp->request_timeout = (msecs + DHCP_FINE_TIMER_MSECS - 1) / DHCP_FINE_TIMER_MSECS;
Yann 0:f30e2135b0db 1193 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("dhcp_release(): set request timeout %"U16_F" msecs\n", msecs));
Yann 0:f30e2135b0db 1194 /* bring the interface down */
Yann 0:f30e2135b0db 1195 netif_set_down(netif);
Yann 0:f30e2135b0db 1196 /* remove IP address from interface */
Yann 0:f30e2135b0db 1197 netif_set_ipaddr(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 1198 netif_set_gw(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 1199 netif_set_netmask(netif, IP_ADDR_ANY);
Yann 0:f30e2135b0db 1200
Yann 0:f30e2135b0db 1201 return result;
Yann 0:f30e2135b0db 1202 }
Yann 0:f30e2135b0db 1203
Yann 0:f30e2135b0db 1204 /**
Yann 0:f30e2135b0db 1205 * Remove the DHCP client from the interface.
Yann 0:f30e2135b0db 1206 *
Yann 0:f30e2135b0db 1207 * @param netif The network interface to stop DHCP on
Yann 0:f30e2135b0db 1208 */
Yann 0:f30e2135b0db 1209 void
Yann 0:f30e2135b0db 1210 dhcp_stop(struct netif *netif)
Yann 0:f30e2135b0db 1211 {
Yann 0:f30e2135b0db 1212 struct dhcp *dhcp;
Yann 0:f30e2135b0db 1213 LWIP_ERROR("dhcp_stop: netif != NULL", (netif != NULL), return;);
Yann 0:f30e2135b0db 1214 dhcp = netif->dhcp;
Yann 0:f30e2135b0db 1215 /* Remove the flag that says this netif is handled by DHCP. */
Yann 0:f30e2135b0db 1216 netif->flags &= ~NETIF_FLAG_DHCP;
Yann 0:f30e2135b0db 1217
Yann 0:f30e2135b0db 1218 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_stop()\n"));
Yann 0:f30e2135b0db 1219 /* netif is DHCP configured? */
Yann 0:f30e2135b0db 1220 if (dhcp != NULL) {
Yann 0:f30e2135b0db 1221 #if LWIP_DHCP_AUTOIP_COOP
Yann 0:f30e2135b0db 1222 if(dhcp->autoip_coop_state == DHCP_AUTOIP_COOP_STATE_ON) {
Yann 0:f30e2135b0db 1223 autoip_stop(netif);
Yann 0:f30e2135b0db 1224 dhcp->autoip_coop_state = DHCP_AUTOIP_COOP_STATE_OFF;
Yann 0:f30e2135b0db 1225 }
Yann 0:f30e2135b0db 1226 #endif /* LWIP_DHCP_AUTOIP_COOP */
Yann 0:f30e2135b0db 1227
Yann 0:f30e2135b0db 1228 if (dhcp->pcb != NULL) {
Yann 0:f30e2135b0db 1229 udp_remove(dhcp->pcb);
Yann 0:f30e2135b0db 1230 dhcp->pcb = NULL;
Yann 0:f30e2135b0db 1231 }
Yann 0:f30e2135b0db 1232 LWIP_ASSERT("reply wasn't freed", dhcp->msg_in == NULL);
Yann 0:f30e2135b0db 1233 dhcp_set_state(dhcp, DHCP_OFF);
Yann 0:f30e2135b0db 1234 }
Yann 0:f30e2135b0db 1235 }
Yann 0:f30e2135b0db 1236
Yann 0:f30e2135b0db 1237 /*
Yann 0:f30e2135b0db 1238 * Set the DHCP state of a DHCP client.
Yann 0:f30e2135b0db 1239 *
Yann 0:f30e2135b0db 1240 * If the state changed, reset the number of tries.
Yann 0:f30e2135b0db 1241 */
Yann 0:f30e2135b0db 1242 static void
Yann 0:f30e2135b0db 1243 dhcp_set_state(struct dhcp *dhcp, u8_t new_state)
Yann 0:f30e2135b0db 1244 {
Yann 0:f30e2135b0db 1245 if (new_state != dhcp->state) {
Yann 0:f30e2135b0db 1246 dhcp->state = new_state;
Yann 0:f30e2135b0db 1247 dhcp->tries = 0;
Yann 0:f30e2135b0db 1248 dhcp->request_timeout = 0;
Yann 0:f30e2135b0db 1249 }
Yann 0:f30e2135b0db 1250 }
Yann 0:f30e2135b0db 1251
Yann 0:f30e2135b0db 1252 /*
Yann 0:f30e2135b0db 1253 * Concatenate an option type and length field to the outgoing
Yann 0:f30e2135b0db 1254 * DHCP message.
Yann 0:f30e2135b0db 1255 *
Yann 0:f30e2135b0db 1256 */
Yann 0:f30e2135b0db 1257 static void
Yann 0:f30e2135b0db 1258 dhcp_option(struct dhcp *dhcp, u8_t option_type, u8_t option_len)
Yann 0:f30e2135b0db 1259 {
Yann 0:f30e2135b0db 1260 LWIP_ASSERT("dhcp_option: dhcp->options_out_len + 2 + option_len <= DHCP_OPTIONS_LEN", dhcp->options_out_len + 2U + option_len <= DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1261 dhcp->msg_out->options[dhcp->options_out_len++] = option_type;
Yann 0:f30e2135b0db 1262 dhcp->msg_out->options[dhcp->options_out_len++] = option_len;
Yann 0:f30e2135b0db 1263 }
Yann 0:f30e2135b0db 1264 /*
Yann 0:f30e2135b0db 1265 * Concatenate a single byte to the outgoing DHCP message.
Yann 0:f30e2135b0db 1266 *
Yann 0:f30e2135b0db 1267 */
Yann 0:f30e2135b0db 1268 static void
Yann 0:f30e2135b0db 1269 dhcp_option_byte(struct dhcp *dhcp, u8_t value)
Yann 0:f30e2135b0db 1270 {
Yann 0:f30e2135b0db 1271 LWIP_ASSERT("dhcp_option_byte: dhcp->options_out_len < DHCP_OPTIONS_LEN", dhcp->options_out_len < DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1272 dhcp->msg_out->options[dhcp->options_out_len++] = value;
Yann 0:f30e2135b0db 1273 }
Yann 0:f30e2135b0db 1274
Yann 0:f30e2135b0db 1275 static void
Yann 0:f30e2135b0db 1276 dhcp_option_short(struct dhcp *dhcp, u16_t value)
Yann 0:f30e2135b0db 1277 {
Yann 0:f30e2135b0db 1278 LWIP_ASSERT("dhcp_option_short: dhcp->options_out_len + 2 <= DHCP_OPTIONS_LEN", dhcp->options_out_len + 2U <= DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1279 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t)((value & 0xff00U) >> 8);
Yann 0:f30e2135b0db 1280 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t) (value & 0x00ffU);
Yann 0:f30e2135b0db 1281 }
Yann 0:f30e2135b0db 1282
Yann 0:f30e2135b0db 1283 static void
Yann 0:f30e2135b0db 1284 dhcp_option_long(struct dhcp *dhcp, u32_t value)
Yann 0:f30e2135b0db 1285 {
Yann 0:f30e2135b0db 1286 LWIP_ASSERT("dhcp_option_long: dhcp->options_out_len + 4 <= DHCP_OPTIONS_LEN", dhcp->options_out_len + 4U <= DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1287 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t)((value & 0xff000000UL) >> 24);
Yann 0:f30e2135b0db 1288 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t)((value & 0x00ff0000UL) >> 16);
Yann 0:f30e2135b0db 1289 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t)((value & 0x0000ff00UL) >> 8);
Yann 0:f30e2135b0db 1290 dhcp->msg_out->options[dhcp->options_out_len++] = (u8_t)((value & 0x000000ffUL));
Yann 0:f30e2135b0db 1291 }
Yann 0:f30e2135b0db 1292
Yann 0:f30e2135b0db 1293 /**
Yann 0:f30e2135b0db 1294 * Extract the DHCP message and the DHCP options.
Yann 0:f30e2135b0db 1295 *
Yann 0:f30e2135b0db 1296 * Extract the DHCP message and the DHCP options, each into a contiguous
Yann 0:f30e2135b0db 1297 * piece of memory. As a DHCP message is variable sized by its options,
Yann 0:f30e2135b0db 1298 * and also allows overriding some fields for options, the easy approach
Yann 0:f30e2135b0db 1299 * is to first unfold the options into a conitguous piece of memory, and
Yann 0:f30e2135b0db 1300 * use that further on.
Yann 0:f30e2135b0db 1301 *
Yann 0:f30e2135b0db 1302 */
Yann 0:f30e2135b0db 1303 static err_t
Yann 0:f30e2135b0db 1304 dhcp_parse_reply(struct dhcp *dhcp, struct pbuf *p)
Yann 0:f30e2135b0db 1305 {
Yann 0:f30e2135b0db 1306 u8_t *options;
Yann 0:f30e2135b0db 1307 u16_t offset;
Yann 0:f30e2135b0db 1308 u16_t offset_max;
Yann 0:f30e2135b0db 1309 u16_t options_idx;
Yann 0:f30e2135b0db 1310 u16_t options_idx_max;
Yann 0:f30e2135b0db 1311 struct pbuf *q;
Yann 0:f30e2135b0db 1312 int parse_file_as_options = 0;
Yann 0:f30e2135b0db 1313 int parse_sname_as_options = 0;
Yann 0:f30e2135b0db 1314
Yann 0:f30e2135b0db 1315 /* clear received options */
Yann 0:f30e2135b0db 1316 dhcp_clear_all_options(dhcp);
Yann 0:f30e2135b0db 1317 /* check that beginning of dhcp_msg (up to and including chaddr) is in first pbuf */
Yann 0:f30e2135b0db 1318 if (p->len < DHCP_SNAME_OFS) {
Yann 0:f30e2135b0db 1319 return ERR_BUF;
Yann 0:f30e2135b0db 1320 }
Yann 0:f30e2135b0db 1321 dhcp->msg_in = (struct dhcp_msg *)p->payload;
Yann 0:f30e2135b0db 1322 #if LWIP_DHCP_BOOTP_FILE
Yann 0:f30e2135b0db 1323 /* clear boot file name */
Yann 0:f30e2135b0db 1324 dhcp->boot_file_name[0] = 0;
Yann 0:f30e2135b0db 1325 #endif /* LWIP_DHCP_BOOTP_FILE */
Yann 0:f30e2135b0db 1326
Yann 0:f30e2135b0db 1327 /* parse options */
Yann 0:f30e2135b0db 1328
Yann 0:f30e2135b0db 1329 /* start with options field */
Yann 0:f30e2135b0db 1330 options_idx = DHCP_OPTIONS_OFS;
Yann 0:f30e2135b0db 1331 /* parse options to the end of the received packet */
Yann 0:f30e2135b0db 1332 options_idx_max = p->tot_len;
Yann 0:f30e2135b0db 1333 again:
Yann 0:f30e2135b0db 1334 q = p;
Yann 0:f30e2135b0db 1335 while((q != NULL) && (options_idx >= q->len)) {
Yann 0:f30e2135b0db 1336 options_idx -= q->len;
Yann 0:f30e2135b0db 1337 options_idx_max -= q->len;
Yann 0:f30e2135b0db 1338 q = q->next;
Yann 0:f30e2135b0db 1339 }
Yann 0:f30e2135b0db 1340 if (q == NULL) {
Yann 0:f30e2135b0db 1341 return ERR_BUF;
Yann 0:f30e2135b0db 1342 }
Yann 0:f30e2135b0db 1343 offset = options_idx;
Yann 0:f30e2135b0db 1344 offset_max = options_idx_max;
Yann 0:f30e2135b0db 1345 options = (u8_t*)q->payload;
Yann 0:f30e2135b0db 1346 /* at least 1 byte to read and no end marker, then at least 3 bytes to read? */
Yann 0:f30e2135b0db 1347 while((q != NULL) && (options[offset] != DHCP_OPTION_END) && (offset < offset_max)) {
Yann 0:f30e2135b0db 1348 u8_t op = options[offset];
Yann 0:f30e2135b0db 1349 u8_t len;
Yann 0:f30e2135b0db 1350 u8_t decode_len = 0;
Yann 0:f30e2135b0db 1351 int decode_idx = -1;
Yann 0:f30e2135b0db 1352 u16_t val_offset = offset + 2;
Yann 0:f30e2135b0db 1353 /* len byte might be in the next pbuf */
Yann 0:f30e2135b0db 1354 if (offset + 1 < q->len) {
Yann 0:f30e2135b0db 1355 len = options[offset + 1];
Yann 0:f30e2135b0db 1356 } else {
Yann 0:f30e2135b0db 1357 len = (q->next != NULL ? ((u8_t*)q->next->payload)[0] : 0);
Yann 0:f30e2135b0db 1358 }
Yann 0:f30e2135b0db 1359 /* LWIP_DEBUGF(DHCP_DEBUG, ("msg_offset=%"U16_F", q->len=%"U16_F, msg_offset, q->len)); */
Yann 0:f30e2135b0db 1360 decode_len = len;
Yann 0:f30e2135b0db 1361 switch(op) {
Yann 0:f30e2135b0db 1362 /* case(DHCP_OPTION_END): handled above */
Yann 0:f30e2135b0db 1363 case(DHCP_OPTION_PAD):
Yann 0:f30e2135b0db 1364 /* special option: no len encoded */
Yann 0:f30e2135b0db 1365 decode_len = len = 0;
Yann 0:f30e2135b0db 1366 /* will be increased below */
Yann 0:f30e2135b0db 1367 offset--;
Yann 0:f30e2135b0db 1368 break;
Yann 0:f30e2135b0db 1369 case(DHCP_OPTION_SUBNET_MASK):
Yann 0:f30e2135b0db 1370 LWIP_ASSERT("len == 4", len == 4);
Yann 0:f30e2135b0db 1371 decode_idx = DHCP_OPTION_IDX_SUBNET_MASK;
Yann 0:f30e2135b0db 1372 break;
Yann 0:f30e2135b0db 1373 case(DHCP_OPTION_ROUTER):
Yann 0:f30e2135b0db 1374 decode_len = 4; /* only copy the first given router */
Yann 0:f30e2135b0db 1375 LWIP_ASSERT("len >= decode_len", len >= decode_len);
Yann 0:f30e2135b0db 1376 decode_idx = DHCP_OPTION_IDX_ROUTER;
Yann 0:f30e2135b0db 1377 break;
Yann 0:f30e2135b0db 1378 case(DHCP_OPTION_DNS_SERVER):
Yann 0:f30e2135b0db 1379 /* special case: there might be more than one server */
Yann 0:f30e2135b0db 1380 LWIP_ASSERT("len % 4 == 0", len % 4 == 0);
Yann 0:f30e2135b0db 1381 /* limit number of DNS servers */
Yann 0:f30e2135b0db 1382 decode_len = LWIP_MIN(len, 4 * DNS_MAX_SERVERS);
Yann 0:f30e2135b0db 1383 LWIP_ASSERT("len >= decode_len", len >= decode_len);
Yann 0:f30e2135b0db 1384 decode_idx = DHCP_OPTION_IDX_DNS_SERVER;
Yann 0:f30e2135b0db 1385 break;
Yann 0:f30e2135b0db 1386 case(DHCP_OPTION_LEASE_TIME):
Yann 0:f30e2135b0db 1387 LWIP_ASSERT("len == 4", len == 4);
Yann 0:f30e2135b0db 1388 decode_idx = DHCP_OPTION_IDX_LEASE_TIME;
Yann 0:f30e2135b0db 1389 break;
Yann 0:f30e2135b0db 1390 case(DHCP_OPTION_OVERLOAD):
Yann 0:f30e2135b0db 1391 LWIP_ASSERT("len == 1", len == 1);
Yann 0:f30e2135b0db 1392 decode_idx = DHCP_OPTION_IDX_OVERLOAD;
Yann 0:f30e2135b0db 1393 break;
Yann 0:f30e2135b0db 1394 case(DHCP_OPTION_MESSAGE_TYPE):
Yann 0:f30e2135b0db 1395 LWIP_ASSERT("len == 1", len == 1);
Yann 0:f30e2135b0db 1396 decode_idx = DHCP_OPTION_IDX_MSG_TYPE;
Yann 0:f30e2135b0db 1397 break;
Yann 0:f30e2135b0db 1398 case(DHCP_OPTION_SERVER_ID):
Yann 0:f30e2135b0db 1399 LWIP_ASSERT("len == 4", len == 4);
Yann 0:f30e2135b0db 1400 decode_idx = DHCP_OPTION_IDX_SERVER_ID;
Yann 0:f30e2135b0db 1401 break;
Yann 0:f30e2135b0db 1402 case(DHCP_OPTION_T1):
Yann 0:f30e2135b0db 1403 LWIP_ASSERT("len == 4", len == 4);
Yann 0:f30e2135b0db 1404 decode_idx = DHCP_OPTION_IDX_T1;
Yann 0:f30e2135b0db 1405 break;
Yann 0:f30e2135b0db 1406 case(DHCP_OPTION_T2):
Yann 0:f30e2135b0db 1407 LWIP_ASSERT("len == 4", len == 4);
Yann 0:f30e2135b0db 1408 decode_idx = DHCP_OPTION_IDX_T2;
Yann 0:f30e2135b0db 1409 break;
Yann 0:f30e2135b0db 1410 default:
Yann 0:f30e2135b0db 1411 decode_len = 0;
Yann 0:f30e2135b0db 1412 LWIP_DEBUGF(DHCP_DEBUG, ("skipping option %"U16_F" in options\n", op));
Yann 0:f30e2135b0db 1413 break;
Yann 0:f30e2135b0db 1414 }
Yann 0:f30e2135b0db 1415 offset += len + 2;
Yann 0:f30e2135b0db 1416 if (decode_len > 0) {
Yann 0:f30e2135b0db 1417 u32_t value = 0;
Yann 0:f30e2135b0db 1418 u16_t copy_len;
Yann 0:f30e2135b0db 1419 decode_next:
Yann 0:f30e2135b0db 1420 LWIP_ASSERT("check decode_idx", decode_idx >= 0 && decode_idx < DHCP_OPTION_IDX_MAX);
Yann 0:f30e2135b0db 1421 LWIP_ASSERT("option already decoded", !dhcp_option_given(dhcp, decode_idx));
Yann 0:f30e2135b0db 1422 copy_len = LWIP_MIN(decode_len, 4);
Yann 0:f30e2135b0db 1423 pbuf_copy_partial(q, &value, copy_len, val_offset);
Yann 0:f30e2135b0db 1424 if (decode_len > 4) {
Yann 0:f30e2135b0db 1425 /* decode more than one u32_t */
Yann 0:f30e2135b0db 1426 LWIP_ASSERT("decode_len % 4 == 0", decode_len % 4 == 0);
Yann 0:f30e2135b0db 1427 dhcp_got_option(dhcp, decode_idx);
Yann 0:f30e2135b0db 1428 dhcp_set_option_value(dhcp, decode_idx, htonl(value));
Yann 0:f30e2135b0db 1429 decode_len -= 4;
Yann 0:f30e2135b0db 1430 val_offset += 4;
Yann 0:f30e2135b0db 1431 decode_idx++;
Yann 0:f30e2135b0db 1432 goto decode_next;
Yann 0:f30e2135b0db 1433 } else if (decode_len == 4) {
Yann 0:f30e2135b0db 1434 value = ntohl(value);
Yann 0:f30e2135b0db 1435 } else {
Yann 0:f30e2135b0db 1436 LWIP_ASSERT("invalid decode_len", decode_len == 1);
Yann 0:f30e2135b0db 1437 value = ((u8_t*)&value)[0];
Yann 0:f30e2135b0db 1438 }
Yann 0:f30e2135b0db 1439 dhcp_got_option(dhcp, decode_idx);
Yann 0:f30e2135b0db 1440 dhcp_set_option_value(dhcp, decode_idx, value);
Yann 0:f30e2135b0db 1441 }
Yann 0:f30e2135b0db 1442 if (offset >= q->len) {
Yann 0:f30e2135b0db 1443 offset -= q->len;
Yann 0:f30e2135b0db 1444 offset_max -= q->len;
Yann 0:f30e2135b0db 1445 q = q->next;
Yann 0:f30e2135b0db 1446 options = (u8_t*)q->payload;
Yann 0:f30e2135b0db 1447 }
Yann 0:f30e2135b0db 1448 }
Yann 0:f30e2135b0db 1449 /* is this an overloaded message? */
Yann 0:f30e2135b0db 1450 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_OVERLOAD)) {
Yann 0:f30e2135b0db 1451 u32_t overload = dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_OVERLOAD);
Yann 0:f30e2135b0db 1452 dhcp_clear_option(dhcp, DHCP_OPTION_IDX_OVERLOAD);
Yann 0:f30e2135b0db 1453 if (overload == DHCP_OVERLOAD_FILE) {
Yann 0:f30e2135b0db 1454 parse_file_as_options = 1;
Yann 0:f30e2135b0db 1455 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("overloaded file field\n"));
Yann 0:f30e2135b0db 1456 } else if (overload == DHCP_OVERLOAD_SNAME) {
Yann 0:f30e2135b0db 1457 parse_sname_as_options = 1;
Yann 0:f30e2135b0db 1458 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("overloaded sname field\n"));
Yann 0:f30e2135b0db 1459 } else if (overload == DHCP_OVERLOAD_SNAME_FILE) {
Yann 0:f30e2135b0db 1460 parse_sname_as_options = 1;
Yann 0:f30e2135b0db 1461 parse_file_as_options = 1;
Yann 0:f30e2135b0db 1462 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("overloaded sname and file field\n"));
Yann 0:f30e2135b0db 1463 } else {
Yann 0:f30e2135b0db 1464 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("invalid overload option: %d\n", (int)overload));
Yann 0:f30e2135b0db 1465 }
Yann 0:f30e2135b0db 1466 #if LWIP_DHCP_BOOTP_FILE
Yann 0:f30e2135b0db 1467 if (!parse_file_as_options) {
Yann 0:f30e2135b0db 1468 /* only do this for ACK messages */
Yann 0:f30e2135b0db 1469 if (dhcp_option_given(dhcp, DHCP_OPTION_IDX_MSG_TYPE) &&
Yann 0:f30e2135b0db 1470 (dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_MSG_TYPE) == DHCP_ACK))
Yann 0:f30e2135b0db 1471 /* copy bootp file name, don't care for sname (server hostname) */
Yann 0:f30e2135b0db 1472 pbuf_copy_partial(p, dhcp->boot_file_name, DHCP_FILE_LEN-1, DHCP_FILE_OFS);
Yann 0:f30e2135b0db 1473 /* make sure the string is really NULL-terminated */
Yann 0:f30e2135b0db 1474 dhcp->boot_file_name[DHCP_FILE_LEN-1] = 0;
Yann 0:f30e2135b0db 1475 }
Yann 0:f30e2135b0db 1476 #endif /* LWIP_DHCP_BOOTP_FILE */
Yann 0:f30e2135b0db 1477 }
Yann 0:f30e2135b0db 1478 if (parse_file_as_options) {
Yann 0:f30e2135b0db 1479 /* if both are overloaded, parse file first and then sname (RFC 2131 ch. 4.1) */
Yann 0:f30e2135b0db 1480 parse_file_as_options = 0;
Yann 0:f30e2135b0db 1481 options_idx = DHCP_FILE_OFS;
Yann 0:f30e2135b0db 1482 options_idx_max = DHCP_FILE_OFS + DHCP_FILE_LEN;
Yann 0:f30e2135b0db 1483 goto again;
Yann 0:f30e2135b0db 1484 } else if (parse_sname_as_options) {
Yann 0:f30e2135b0db 1485 parse_sname_as_options = 0;
Yann 0:f30e2135b0db 1486 options_idx = DHCP_SNAME_OFS;
Yann 0:f30e2135b0db 1487 options_idx_max = DHCP_SNAME_OFS + DHCP_SNAME_LEN;
Yann 0:f30e2135b0db 1488 goto again;
Yann 0:f30e2135b0db 1489 }
Yann 0:f30e2135b0db 1490 return ERR_OK;
Yann 0:f30e2135b0db 1491 }
Yann 0:f30e2135b0db 1492
Yann 0:f30e2135b0db 1493 /**
Yann 0:f30e2135b0db 1494 * If an incoming DHCP message is in response to us, then trigger the state machine
Yann 0:f30e2135b0db 1495 */
Yann 0:f30e2135b0db 1496 static void
Yann 0:f30e2135b0db 1497 dhcp_recv(void *arg, struct udp_pcb *pcb, struct pbuf *p, ip_addr_t *addr, u16_t port)
Yann 0:f30e2135b0db 1498 {
Yann 0:f30e2135b0db 1499 struct netif *netif = (struct netif *)arg;
Yann 0:f30e2135b0db 1500 struct dhcp *dhcp = netif->dhcp;
Yann 0:f30e2135b0db 1501 struct dhcp_msg *reply_msg = (struct dhcp_msg *)p->payload;
Yann 0:f30e2135b0db 1502 u8_t msg_type;
Yann 0:f30e2135b0db 1503 u8_t i;
Yann 0:f30e2135b0db 1504 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("dhcp_recv(pbuf = %p) from DHCP server %"U16_F".%"U16_F".%"U16_F".%"U16_F" port %"U16_F"\n", (void*)p,
Yann 0:f30e2135b0db 1505 ip4_addr1_16(addr), ip4_addr2_16(addr), ip4_addr3_16(addr), ip4_addr4_16(addr), port));
Yann 0:f30e2135b0db 1506 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("pbuf->len = %"U16_F"\n", p->len));
Yann 0:f30e2135b0db 1507 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("pbuf->tot_len = %"U16_F"\n", p->tot_len));
Yann 0:f30e2135b0db 1508 /* prevent warnings about unused arguments */
Yann 0:f30e2135b0db 1509 LWIP_UNUSED_ARG(pcb);
Yann 0:f30e2135b0db 1510 LWIP_UNUSED_ARG(addr);
Yann 0:f30e2135b0db 1511 LWIP_UNUSED_ARG(port);
Yann 0:f30e2135b0db 1512
Yann 0:f30e2135b0db 1513 LWIP_ASSERT("reply wasn't freed", dhcp->msg_in == NULL);
Yann 0:f30e2135b0db 1514
Yann 0:f30e2135b0db 1515 if (p->len < DHCP_MIN_REPLY_LEN) {
Yann 0:f30e2135b0db 1516 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("DHCP reply message or pbuf too short\n"));
Yann 0:f30e2135b0db 1517 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1518 }
Yann 0:f30e2135b0db 1519
Yann 0:f30e2135b0db 1520 if (reply_msg->op != DHCP_BOOTREPLY) {
Yann 0:f30e2135b0db 1521 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("not a DHCP reply message, but type %"U16_F"\n", (u16_t)reply_msg->op));
Yann 0:f30e2135b0db 1522 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1523 }
Yann 0:f30e2135b0db 1524 /* iterate through hardware address and match against DHCP message */
Yann 0:f30e2135b0db 1525 for (i = 0; i < netif->hwaddr_len; i++) {
Yann 0:f30e2135b0db 1526 if (netif->hwaddr[i] != reply_msg->chaddr[i]) {
Yann 0:f30e2135b0db 1527 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING,
Yann 0:f30e2135b0db 1528 ("netif->hwaddr[%"U16_F"]==%02"X16_F" != reply_msg->chaddr[%"U16_F"]==%02"X16_F"\n",
Yann 0:f30e2135b0db 1529 (u16_t)i, (u16_t)netif->hwaddr[i], (u16_t)i, (u16_t)reply_msg->chaddr[i]));
Yann 0:f30e2135b0db 1530 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1531 }
Yann 0:f30e2135b0db 1532 }
Yann 0:f30e2135b0db 1533 /* match transaction ID against what we expected */
Yann 0:f30e2135b0db 1534 if (ntohl(reply_msg->xid) != dhcp->xid) {
Yann 0:f30e2135b0db 1535 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING,
Yann 0:f30e2135b0db 1536 ("transaction id mismatch reply_msg->xid(%"X32_F")!=dhcp->xid(%"X32_F")\n",ntohl(reply_msg->xid),dhcp->xid));
Yann 0:f30e2135b0db 1537 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1538 }
Yann 0:f30e2135b0db 1539 /* option fields could be unfold? */
Yann 0:f30e2135b0db 1540 if (dhcp_parse_reply(dhcp, p) != ERR_OK) {
Yann 0:f30e2135b0db 1541 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS,
Yann 0:f30e2135b0db 1542 ("problem unfolding DHCP message - too short on memory?\n"));
Yann 0:f30e2135b0db 1543 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1544 }
Yann 0:f30e2135b0db 1545
Yann 0:f30e2135b0db 1546 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("searching DHCP_OPTION_MESSAGE_TYPE\n"));
Yann 0:f30e2135b0db 1547 /* obtain pointer to DHCP message type */
Yann 0:f30e2135b0db 1548 if (!dhcp_option_given(dhcp, DHCP_OPTION_IDX_MSG_TYPE)) {
Yann 0:f30e2135b0db 1549 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("DHCP_OPTION_MESSAGE_TYPE option not found\n"));
Yann 0:f30e2135b0db 1550 goto free_pbuf_and_return;
Yann 0:f30e2135b0db 1551 }
Yann 0:f30e2135b0db 1552
Yann 0:f30e2135b0db 1553 /* read DHCP message type */
Yann 0:f30e2135b0db 1554 msg_type = (u8_t)dhcp_get_option_value(dhcp, DHCP_OPTION_IDX_MSG_TYPE);
Yann 0:f30e2135b0db 1555 /* message type is DHCP ACK? */
Yann 0:f30e2135b0db 1556 if (msg_type == DHCP_ACK) {
Yann 0:f30e2135b0db 1557 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("DHCP_ACK received\n"));
Yann 0:f30e2135b0db 1558 /* in requesting state? */
Yann 0:f30e2135b0db 1559 if (dhcp->state == DHCP_REQUESTING) {
Yann 0:f30e2135b0db 1560 dhcp_handle_ack(netif);
Yann 0:f30e2135b0db 1561 #if DHCP_DOES_ARP_CHECK
Yann 0:f30e2135b0db 1562 /* check if the acknowledged lease address is already in use */
Yann 0:f30e2135b0db 1563 dhcp_check(netif);
Yann 0:f30e2135b0db 1564 #else
Yann 0:f30e2135b0db 1565 /* bind interface to the acknowledged lease address */
Yann 0:f30e2135b0db 1566 dhcp_bind(netif);
Yann 0:f30e2135b0db 1567 #endif
Yann 0:f30e2135b0db 1568 }
Yann 0:f30e2135b0db 1569 /* already bound to the given lease address? */
Yann 0:f30e2135b0db 1570 else if ((dhcp->state == DHCP_REBOOTING) || (dhcp->state == DHCP_REBINDING) || (dhcp->state == DHCP_RENEWING)) {
Yann 0:f30e2135b0db 1571 dhcp_bind(netif);
Yann 0:f30e2135b0db 1572 }
Yann 0:f30e2135b0db 1573 }
Yann 0:f30e2135b0db 1574 /* received a DHCP_NAK in appropriate state? */
Yann 0:f30e2135b0db 1575 else if ((msg_type == DHCP_NAK) &&
Yann 0:f30e2135b0db 1576 ((dhcp->state == DHCP_REBOOTING) || (dhcp->state == DHCP_REQUESTING) ||
Yann 0:f30e2135b0db 1577 (dhcp->state == DHCP_REBINDING) || (dhcp->state == DHCP_RENEWING ))) {
Yann 0:f30e2135b0db 1578 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("DHCP_NAK received\n"));
Yann 0:f30e2135b0db 1579 dhcp_handle_nak(netif);
Yann 0:f30e2135b0db 1580 }
Yann 0:f30e2135b0db 1581 /* received a DHCP_OFFER in DHCP_SELECTING state? */
Yann 0:f30e2135b0db 1582 else if ((msg_type == DHCP_OFFER) && (dhcp->state == DHCP_SELECTING)) {
Yann 0:f30e2135b0db 1583 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE, ("DHCP_OFFER received in DHCP_SELECTING state\n"));
Yann 0:f30e2135b0db 1584 dhcp->request_timeout = 0;
Yann 0:f30e2135b0db 1585 /* remember offered lease */
Yann 0:f30e2135b0db 1586 dhcp_handle_offer(netif);
Yann 0:f30e2135b0db 1587 }
Yann 0:f30e2135b0db 1588 free_pbuf_and_return:
Yann 0:f30e2135b0db 1589 dhcp->msg_in = NULL;
Yann 0:f30e2135b0db 1590 pbuf_free(p);
Yann 0:f30e2135b0db 1591 }
Yann 0:f30e2135b0db 1592
Yann 0:f30e2135b0db 1593 /**
Yann 0:f30e2135b0db 1594 * Create a DHCP request, fill in common headers
Yann 0:f30e2135b0db 1595 *
Yann 0:f30e2135b0db 1596 * @param netif the netif under DHCP control
Yann 0:f30e2135b0db 1597 * @param dhcp dhcp control struct
Yann 0:f30e2135b0db 1598 * @param message_type message type of the request
Yann 0:f30e2135b0db 1599 */
Yann 0:f30e2135b0db 1600 static err_t
Yann 0:f30e2135b0db 1601 dhcp_create_msg(struct netif *netif, struct dhcp *dhcp, u8_t message_type)
Yann 0:f30e2135b0db 1602 {
Yann 0:f30e2135b0db 1603 u16_t i;
Yann 0:f30e2135b0db 1604 #ifndef DHCP_GLOBAL_XID
Yann 0:f30e2135b0db 1605 /** default global transaction identifier starting value (easy to match
Yann 0:f30e2135b0db 1606 * with a packet analyser). We simply increment for each new request.
Yann 0:f30e2135b0db 1607 * Predefine DHCP_GLOBAL_XID to a better value or a function call to generate one
Yann 0:f30e2135b0db 1608 * at runtime, any supporting function prototypes can be defined in DHCP_GLOBAL_XID_HEADER */
Yann 0:f30e2135b0db 1609 static u32_t xid = 0xABCD0000;
Yann 0:f30e2135b0db 1610 #else
Yann 0:f30e2135b0db 1611 static u32_t xid;
Yann 0:f30e2135b0db 1612 static u8_t xid_initialised = 0;
Yann 0:f30e2135b0db 1613 if (!xid_initialised) {
Yann 0:f30e2135b0db 1614 xid = DHCP_GLOBAL_XID;
Yann 0:f30e2135b0db 1615 xid_initialised = !xid_initialised;
Yann 0:f30e2135b0db 1616 }
Yann 0:f30e2135b0db 1617 #endif
Yann 0:f30e2135b0db 1618 LWIP_ERROR("dhcp_create_msg: netif != NULL", (netif != NULL), return ERR_ARG;);
Yann 0:f30e2135b0db 1619 LWIP_ERROR("dhcp_create_msg: dhcp != NULL", (dhcp != NULL), return ERR_VAL;);
Yann 0:f30e2135b0db 1620 LWIP_ASSERT("dhcp_create_msg: dhcp->p_out == NULL", dhcp->p_out == NULL);
Yann 0:f30e2135b0db 1621 LWIP_ASSERT("dhcp_create_msg: dhcp->msg_out == NULL", dhcp->msg_out == NULL);
Yann 0:f30e2135b0db 1622 dhcp->p_out = pbuf_alloc(PBUF_TRANSPORT, sizeof(struct dhcp_msg), PBUF_RAM);
Yann 0:f30e2135b0db 1623 if (dhcp->p_out == NULL) {
Yann 0:f30e2135b0db 1624 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_SERIOUS,
Yann 0:f30e2135b0db 1625 ("dhcp_create_msg(): could not allocate pbuf\n"));
Yann 0:f30e2135b0db 1626 return ERR_MEM;
Yann 0:f30e2135b0db 1627 }
Yann 0:f30e2135b0db 1628 LWIP_ASSERT("dhcp_create_msg: check that first pbuf can hold struct dhcp_msg",
Yann 0:f30e2135b0db 1629 (dhcp->p_out->len >= sizeof(struct dhcp_msg)));
Yann 0:f30e2135b0db 1630
Yann 0:f30e2135b0db 1631 /* reuse transaction identifier in retransmissions */
Yann 0:f30e2135b0db 1632 if (dhcp->tries == 0) {
Yann 0:f30e2135b0db 1633 xid++;
Yann 0:f30e2135b0db 1634 }
Yann 0:f30e2135b0db 1635 dhcp->xid = xid;
Yann 0:f30e2135b0db 1636 LWIP_DEBUGF(DHCP_DEBUG | LWIP_DBG_TRACE,
Yann 0:f30e2135b0db 1637 ("transaction id xid(%"X32_F")\n", xid));
Yann 0:f30e2135b0db 1638
Yann 0:f30e2135b0db 1639 dhcp->msg_out = (struct dhcp_msg *)dhcp->p_out->payload;
Yann 0:f30e2135b0db 1640
Yann 0:f30e2135b0db 1641 dhcp->msg_out->op = DHCP_BOOTREQUEST;
Yann 0:f30e2135b0db 1642 /* TODO: make link layer independent */
Yann 0:f30e2135b0db 1643 dhcp->msg_out->htype = DHCP_HTYPE_ETH;
Yann 0:f30e2135b0db 1644 dhcp->msg_out->hlen = netif->hwaddr_len;
Yann 0:f30e2135b0db 1645 dhcp->msg_out->hops = 0;
Yann 0:f30e2135b0db 1646 dhcp->msg_out->xid = htonl(dhcp->xid);
Yann 0:f30e2135b0db 1647 dhcp->msg_out->secs = 0;
Yann 0:f30e2135b0db 1648 /* we don't need the broadcast flag since we can receive unicast traffic
Yann 0:f30e2135b0db 1649 before being fully configured! */
Yann 0:f30e2135b0db 1650 dhcp->msg_out->flags = 0;
Yann 0:f30e2135b0db 1651 ip_addr_set_zero(&dhcp->msg_out->ciaddr);
Yann 0:f30e2135b0db 1652 /* set ciaddr to netif->ip_addr based on message_type and state */
Yann 0:f30e2135b0db 1653 if ((message_type == DHCP_INFORM) || (message_type == DHCP_DECLINE) ||
Yann 0:f30e2135b0db 1654 ((message_type == DHCP_REQUEST) && /* DHCP_BOUND not used for sending! */
Yann 0:f30e2135b0db 1655 ((dhcp->state==DHCP_RENEWING) || dhcp->state==DHCP_REBINDING))) {
Yann 0:f30e2135b0db 1656 ip_addr_copy(dhcp->msg_out->ciaddr, netif->ip_addr);
Yann 0:f30e2135b0db 1657 }
Yann 0:f30e2135b0db 1658 ip_addr_set_zero(&dhcp->msg_out->yiaddr);
Yann 0:f30e2135b0db 1659 ip_addr_set_zero(&dhcp->msg_out->siaddr);
Yann 0:f30e2135b0db 1660 ip_addr_set_zero(&dhcp->msg_out->giaddr);
Yann 0:f30e2135b0db 1661 for (i = 0; i < DHCP_CHADDR_LEN; i++) {
Yann 0:f30e2135b0db 1662 /* copy netif hardware address, pad with zeroes */
Yann 0:f30e2135b0db 1663 dhcp->msg_out->chaddr[i] = (i < netif->hwaddr_len) ? netif->hwaddr[i] : 0/* pad byte*/;
Yann 0:f30e2135b0db 1664 }
Yann 0:f30e2135b0db 1665 for (i = 0; i < DHCP_SNAME_LEN; i++) {
Yann 0:f30e2135b0db 1666 dhcp->msg_out->sname[i] = 0;
Yann 0:f30e2135b0db 1667 }
Yann 0:f30e2135b0db 1668 for (i = 0; i < DHCP_FILE_LEN; i++) {
Yann 0:f30e2135b0db 1669 dhcp->msg_out->file[i] = 0;
Yann 0:f30e2135b0db 1670 }
Yann 0:f30e2135b0db 1671 dhcp->msg_out->cookie = PP_HTONL(DHCP_MAGIC_COOKIE);
Yann 0:f30e2135b0db 1672 dhcp->options_out_len = 0;
Yann 0:f30e2135b0db 1673 /* fill options field with an incrementing array (for debugging purposes) */
Yann 0:f30e2135b0db 1674 for (i = 0; i < DHCP_OPTIONS_LEN; i++) {
Yann 0:f30e2135b0db 1675 dhcp->msg_out->options[i] = (u8_t)i; /* for debugging only, no matter if truncated */
Yann 0:f30e2135b0db 1676 }
Yann 0:f30e2135b0db 1677 /* Add option MESSAGE_TYPE */
Yann 0:f30e2135b0db 1678 dhcp_option(dhcp, DHCP_OPTION_MESSAGE_TYPE, DHCP_OPTION_MESSAGE_TYPE_LEN);
Yann 0:f30e2135b0db 1679 dhcp_option_byte(dhcp, message_type);
Yann 0:f30e2135b0db 1680 return ERR_OK;
Yann 0:f30e2135b0db 1681 }
Yann 0:f30e2135b0db 1682
Yann 0:f30e2135b0db 1683 /**
Yann 0:f30e2135b0db 1684 * Free previously allocated memory used to send a DHCP request.
Yann 0:f30e2135b0db 1685 *
Yann 0:f30e2135b0db 1686 * @param dhcp the dhcp struct to free the request from
Yann 0:f30e2135b0db 1687 */
Yann 0:f30e2135b0db 1688 static void
Yann 0:f30e2135b0db 1689 dhcp_delete_msg(struct dhcp *dhcp)
Yann 0:f30e2135b0db 1690 {
Yann 0:f30e2135b0db 1691 LWIP_ERROR("dhcp_delete_msg: dhcp != NULL", (dhcp != NULL), return;);
Yann 0:f30e2135b0db 1692 LWIP_ASSERT("dhcp_delete_msg: dhcp->p_out != NULL", dhcp->p_out != NULL);
Yann 0:f30e2135b0db 1693 LWIP_ASSERT("dhcp_delete_msg: dhcp->msg_out != NULL", dhcp->msg_out != NULL);
Yann 0:f30e2135b0db 1694 if (dhcp->p_out != NULL) {
Yann 0:f30e2135b0db 1695 pbuf_free(dhcp->p_out);
Yann 0:f30e2135b0db 1696 }
Yann 0:f30e2135b0db 1697 dhcp->p_out = NULL;
Yann 0:f30e2135b0db 1698 dhcp->msg_out = NULL;
Yann 0:f30e2135b0db 1699 }
Yann 0:f30e2135b0db 1700
Yann 0:f30e2135b0db 1701 /**
Yann 0:f30e2135b0db 1702 * Add a DHCP message trailer
Yann 0:f30e2135b0db 1703 *
Yann 0:f30e2135b0db 1704 * Adds the END option to the DHCP message, and if
Yann 0:f30e2135b0db 1705 * necessary, up to three padding bytes.
Yann 0:f30e2135b0db 1706 *
Yann 0:f30e2135b0db 1707 * @param dhcp DHCP state structure
Yann 0:f30e2135b0db 1708 */
Yann 0:f30e2135b0db 1709 static void
Yann 0:f30e2135b0db 1710 dhcp_option_trailer(struct dhcp *dhcp)
Yann 0:f30e2135b0db 1711 {
Yann 0:f30e2135b0db 1712 LWIP_ERROR("dhcp_option_trailer: dhcp != NULL", (dhcp != NULL), return;);
Yann 0:f30e2135b0db 1713 LWIP_ASSERT("dhcp_option_trailer: dhcp->msg_out != NULL\n", dhcp->msg_out != NULL);
Yann 0:f30e2135b0db 1714 LWIP_ASSERT("dhcp_option_trailer: dhcp->options_out_len < DHCP_OPTIONS_LEN\n", dhcp->options_out_len < DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1715 dhcp->msg_out->options[dhcp->options_out_len++] = DHCP_OPTION_END;
Yann 0:f30e2135b0db 1716 /* packet is too small, or not 4 byte aligned? */
Yann 0:f30e2135b0db 1717 while ((dhcp->options_out_len < DHCP_MIN_OPTIONS_LEN) || (dhcp->options_out_len & 3)) {
Yann 0:f30e2135b0db 1718 /* LWIP_DEBUGF(DHCP_DEBUG,("dhcp_option_trailer:dhcp->options_out_len=%"U16_F", DHCP_OPTIONS_LEN=%"U16_F, dhcp->options_out_len, DHCP_OPTIONS_LEN)); */
Yann 0:f30e2135b0db 1719 LWIP_ASSERT("dhcp_option_trailer: dhcp->options_out_len < DHCP_OPTIONS_LEN\n", dhcp->options_out_len < DHCP_OPTIONS_LEN);
Yann 0:f30e2135b0db 1720 /* add a fill/padding byte */
Yann 0:f30e2135b0db 1721 dhcp->msg_out->options[dhcp->options_out_len++] = 0;
Yann 0:f30e2135b0db 1722 }
Yann 0:f30e2135b0db 1723 }
Yann 0:f30e2135b0db 1724
Yann 0:f30e2135b0db 1725 #endif /* LWIP_DHCP */