cassyarduino cassyarduino / UIPEthernet

UIPEthernet library for Arduino IDE, Eclipse with arduino plugin and MBED/SMeshStudio (AVR,STM32F,ESP8266,Intel ARC32,Nordic nRF51,Teensy boards,Realtek Ameba(RTL8195A,RTL8710)), ENC28j60 network chip. Compatible with Wiznet W5100 Ethernet library API. Compiled and tested on Nucleo-F302R8. Master repository is: https://github.com/UIPEthernet/UIPEthernet/

Dhcp.cpp@33:7ba5d53df0f2, 2017-02-14 (annotated)

Committer:
cassyarduino
Date:
Tue Feb 14 14:16:14 2017 +0100
Revision:
33:7ba5d53df0f2
Parent:
30:1ec7fa7f2e6a
Child:
38:645b253e6b50
Changes

Who changed what in which revision?

UserRevisionLine numberNew contents of line
cassyarduino 0:e3fb1267e3c3 1 // DHCP Library v0.3 - April 25, 2009
cassyarduino 0:e3fb1267e3c3 2 // Author: Jordan Terrell - blog.jordanterrell.com
cassyarduino 0:e3fb1267e3c3 3
cassyarduino 0:e3fb1267e3c3 4 #include <string.h>
cassyarduino 0:e3fb1267e3c3 5 #include <stdlib.h>
cassyarduino 33:7ba5d53df0f2 6 #include "utility/uipopt.h"
cassyarduino 33:7ba5d53df0f2 7 #if UIP_UDP
cassyarduino 0:e3fb1267e3c3 8 #include "Dhcp.h"
cassyarduino 0:e3fb1267e3c3 9 #if defined(ARDUINO)
cassyarduino 0:e3fb1267e3c3 10 #include <Arduino.h>
cassyarduino 0:e3fb1267e3c3 11 #endif
cassyarduino 0:e3fb1267e3c3 12 #if defined(__MBED__)
cassyarduino 0:e3fb1267e3c3 13 #include <mbed.h>
cassyarduino 0:e3fb1267e3c3 14 #include "mbed/millis.h"
cassyarduino 0:e3fb1267e3c3 15 #define delay(x) wait_ms(x)
cassyarduino 0:e3fb1267e3c3 16 #endif
cassyarduino 0:e3fb1267e3c3 17 #include "utility/logging.h"
cassyarduino 0:e3fb1267e3c3 18 #include "utility/uip.h"
cassyarduino 0:e3fb1267e3c3 19
cassyarduino 0:e3fb1267e3c3 20 int DhcpClass::beginWithDHCP(uint8_t *mac, unsigned long timeout, unsigned long responseTimeout)
cassyarduino 0:e3fb1267e3c3 21 {
cassyarduino 33:7ba5d53df0f2 22 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 23 LogObject.uart_send_str(F("DhcpClass::beginWithDHCP(uint8_t *mac, unsigned long timeout, unsigned long responseTimeout) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 24 #endif
cassyarduino 0:e3fb1267e3c3 25 _dhcpLeaseTime=0;
cassyarduino 0:e3fb1267e3c3 26 _dhcpT1=0;
cassyarduino 0:e3fb1267e3c3 27 _dhcpT2=0;
cassyarduino 0:e3fb1267e3c3 28 _lastCheck=0;
cassyarduino 0:e3fb1267e3c3 29 _timeout = timeout;
cassyarduino 0:e3fb1267e3c3 30 _responseTimeout = responseTimeout;
cassyarduino 0:e3fb1267e3c3 31
cassyarduino 0:e3fb1267e3c3 32 // zero out _dhcpMacAddr
cassyarduino 0:e3fb1267e3c3 33 memset(_dhcpMacAddr, 0, 6);
cassyarduino 0:e3fb1267e3c3 34 reset_DHCP_lease();
cassyarduino 0:e3fb1267e3c3 35
cassyarduino 0:e3fb1267e3c3 36 memcpy((void*)_dhcpMacAddr, (void*)mac, 6);
cassyarduino 0:e3fb1267e3c3 37 _dhcp_state = STATE_DHCP_START;
cassyarduino 0:e3fb1267e3c3 38 return request_DHCP_lease();
cassyarduino 0:e3fb1267e3c3 39 }
cassyarduino 0:e3fb1267e3c3 40
cassyarduino 0:e3fb1267e3c3 41 void DhcpClass::reset_DHCP_lease(void){
cassyarduino 33:7ba5d53df0f2 42 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 43 LogObject.uart_send_str(F("DhcpClass::reset_DHCP_lease(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 44 #endif
cassyarduino 0:e3fb1267e3c3 45 // zero out _dhcpSubnetMask, _dhcpGatewayIp, _dhcpLocalIp, _dhcpDhcpServerIp, _dhcpDnsServerIp
cassyarduino 0:e3fb1267e3c3 46 memset(_dhcpLocalIp, 0, 20);
cassyarduino 0:e3fb1267e3c3 47 }
cassyarduino 0:e3fb1267e3c3 48
cassyarduino 0:e3fb1267e3c3 49 //return:0 on error, 1 if request is sent and response is received
cassyarduino 0:e3fb1267e3c3 50 int DhcpClass::request_DHCP_lease(void){
cassyarduino 33:7ba5d53df0f2 51 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 52 LogObject.uart_send_str(F("DhcpClass::request_DHCP_lease(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 53 #endif
cassyarduino 0:e3fb1267e3c3 54
cassyarduino 0:e3fb1267e3c3 55 uint8_t messageType = 0;
cassyarduino 0:e3fb1267e3c3 56
cassyarduino 0:e3fb1267e3c3 57
cassyarduino 0:e3fb1267e3c3 58
cassyarduino 0:e3fb1267e3c3 59 // Pick an initial transaction ID
cassyarduino 0:e3fb1267e3c3 60 #if defined(ARDUINO)
cassyarduino 0:e3fb1267e3c3 61 _dhcpTransactionId = random(1UL, 2000UL);
cassyarduino 0:e3fb1267e3c3 62 #endif
cassyarduino 0:e3fb1267e3c3 63 #if defined(__MBED__)
cassyarduino 0:e3fb1267e3c3 64 _dhcpTransactionId = (rand() % 2000UL) + 1;
cassyarduino 0:e3fb1267e3c3 65 #endif
cassyarduino 0:e3fb1267e3c3 66 _dhcpInitialTransactionId = _dhcpTransactionId;
cassyarduino 0:e3fb1267e3c3 67
cassyarduino 0:e3fb1267e3c3 68 _dhcpUdpSocket.stop();
cassyarduino 0:e3fb1267e3c3 69 if (_dhcpUdpSocket.begin(DHCP_CLIENT_PORT) == 0)
cassyarduino 0:e3fb1267e3c3 70 {
cassyarduino 0:e3fb1267e3c3 71 // Couldn't get a socket
cassyarduino 0:e3fb1267e3c3 72 return 0;
cassyarduino 0:e3fb1267e3c3 73 }
cassyarduino 0:e3fb1267e3c3 74
cassyarduino 0:e3fb1267e3c3 75 presend_DHCP();
cassyarduino 0:e3fb1267e3c3 76
cassyarduino 0:e3fb1267e3c3 77 int result = 0;
cassyarduino 0:e3fb1267e3c3 78
cassyarduino 0:e3fb1267e3c3 79 unsigned long startTime = millis();
cassyarduino 0:e3fb1267e3c3 80
cassyarduino 0:e3fb1267e3c3 81 while(_dhcp_state != STATE_DHCP_LEASED)
cassyarduino 0:e3fb1267e3c3 82 {
cassyarduino 0:e3fb1267e3c3 83 if(_dhcp_state == STATE_DHCP_START)
cassyarduino 0:e3fb1267e3c3 84 {
cassyarduino 33:7ba5d53df0f2 85 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 86 LogObject.uart_send_str(F("DhcpClass::request_DHCP_lease(void) DEBUG_V1:dhcp_state=STATE_DHCP_START -> send_DHCP_MESSAGE DHCP_DISCOVER"));
cassyarduino 33:7ba5d53df0f2 87 #endif
cassyarduino 0:e3fb1267e3c3 88 _dhcpTransactionId++;
cassyarduino 0:e3fb1267e3c3 89
cassyarduino 0:e3fb1267e3c3 90 send_DHCP_MESSAGE(DHCP_DISCOVER, ((millis() - startTime) / 1000));
cassyarduino 0:e3fb1267e3c3 91 _dhcp_state = STATE_DHCP_DISCOVER;
cassyarduino 0:e3fb1267e3c3 92 }
cassyarduino 0:e3fb1267e3c3 93 else if(_dhcp_state == STATE_DHCP_REREQUEST){
cassyarduino 33:7ba5d53df0f2 94 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 95 LogObject.uart_send_str(F("DhcpClass::request_DHCP_lease(void) DEBUG_V1:dhcp_state=STATE_DHCP_REREQUEST -> send_DHCP_MESSAGE DHCP_REQUEST"));
cassyarduino 33:7ba5d53df0f2 96 #endif
cassyarduino 0:e3fb1267e3c3 97 _dhcpTransactionId++;
cassyarduino 0:e3fb1267e3c3 98 send_DHCP_MESSAGE(DHCP_REQUEST, ((millis() - startTime)/1000));
cassyarduino 0:e3fb1267e3c3 99 _dhcp_state = STATE_DHCP_REQUEST;
cassyarduino 0:e3fb1267e3c3 100 }
cassyarduino 0:e3fb1267e3c3 101 else if(_dhcp_state == STATE_DHCP_DISCOVER)
cassyarduino 0:e3fb1267e3c3 102 {
cassyarduino 0:e3fb1267e3c3 103 uint32_t respId;
cassyarduino 0:e3fb1267e3c3 104 messageType = parseDHCPResponse(_responseTimeout, respId);
cassyarduino 0:e3fb1267e3c3 105 if(messageType == DHCP_OFFER)
cassyarduino 0:e3fb1267e3c3 106 {
cassyarduino 33:7ba5d53df0f2 107 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 108 LogObject.uart_send_str(F("DhcpClass::request_DHCP_lease(void) DEBUG_V1:dhcp_state=STATE_DHCP_DISCOVER,messageType=DHCP_OFFER -> send_DHCP_MESSAGE DHCP_REQUEST"));
cassyarduino 33:7ba5d53df0f2 109 #endif
cassyarduino 0:e3fb1267e3c3 110 // We'll use the transaction ID that the offer came with,
cassyarduino 0:e3fb1267e3c3 111 // rather than the one we were up to
cassyarduino 0:e3fb1267e3c3 112 _dhcpTransactionId = respId;
cassyarduino 0:e3fb1267e3c3 113 send_DHCP_MESSAGE(DHCP_REQUEST, ((millis() - startTime) / 1000));
cassyarduino 0:e3fb1267e3c3 114 _dhcp_state = STATE_DHCP_REQUEST;
cassyarduino 0:e3fb1267e3c3 115 }
cassyarduino 0:e3fb1267e3c3 116 }
cassyarduino 0:e3fb1267e3c3 117 else if(_dhcp_state == STATE_DHCP_REQUEST)
cassyarduino 0:e3fb1267e3c3 118 {
cassyarduino 0:e3fb1267e3c3 119 uint32_t respId;
cassyarduino 0:e3fb1267e3c3 120 messageType = parseDHCPResponse(_responseTimeout, respId);
cassyarduino 0:e3fb1267e3c3 121 if(messageType == DHCP_ACK)
cassyarduino 0:e3fb1267e3c3 122 {
cassyarduino 33:7ba5d53df0f2 123 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 124 LogObject.uart_send_str(F("DhcpClass::request_DHCP_lease(void) DEBUG_V1:dhcp_state=STATE_DHCP_REQUEST,messageType=DHCP_ACK"));
cassyarduino 33:7ba5d53df0f2 125 #endif
cassyarduino 0:e3fb1267e3c3 126 _dhcp_state = STATE_DHCP_LEASED;
cassyarduino 0:e3fb1267e3c3 127 result = 1;
cassyarduino 0:e3fb1267e3c3 128 //use default lease time if we didn't get it
cassyarduino 0:e3fb1267e3c3 129 if(_dhcpLeaseTime == 0){
cassyarduino 0:e3fb1267e3c3 130 _dhcpLeaseTime = DEFAULT_LEASE;
cassyarduino 0:e3fb1267e3c3 131 }
cassyarduino 0:e3fb1267e3c3 132 //calculate T1 & T2 if we didn't get it
cassyarduino 0:e3fb1267e3c3 133 if(_dhcpT1 == 0){
cassyarduino 0:e3fb1267e3c3 134 //T1 should be 50% of _dhcpLeaseTime
cassyarduino 0:e3fb1267e3c3 135 _dhcpT1 = _dhcpLeaseTime >> 1;
cassyarduino 0:e3fb1267e3c3 136 }
cassyarduino 0:e3fb1267e3c3 137 if(_dhcpT2 == 0){
cassyarduino 0:e3fb1267e3c3 138 //T2 should be 87.5% (7/8ths) of _dhcpLeaseTime
cassyarduino 0:e3fb1267e3c3 139 _dhcpT2 = _dhcpT1 << 1;
cassyarduino 0:e3fb1267e3c3 140 }
cassyarduino 0:e3fb1267e3c3 141 _renewInSec = _dhcpT1;
cassyarduino 0:e3fb1267e3c3 142 _rebindInSec = _dhcpT2;
cassyarduino 0:e3fb1267e3c3 143 }
cassyarduino 0:e3fb1267e3c3 144 else if(messageType == DHCP_NAK)
cassyarduino 0:e3fb1267e3c3 145 _dhcp_state = STATE_DHCP_START;
cassyarduino 0:e3fb1267e3c3 146 }
cassyarduino 0:e3fb1267e3c3 147
cassyarduino 0:e3fb1267e3c3 148 if(messageType == 255)
cassyarduino 0:e3fb1267e3c3 149 {
cassyarduino 0:e3fb1267e3c3 150 messageType = 0;
cassyarduino 0:e3fb1267e3c3 151 _dhcp_state = STATE_DHCP_START;
cassyarduino 0:e3fb1267e3c3 152 }
cassyarduino 0:e3fb1267e3c3 153
cassyarduino 0:e3fb1267e3c3 154 if(result != 1 && ((millis() - startTime) > _timeout))
cassyarduino 0:e3fb1267e3c3 155 break;
cassyarduino 0:e3fb1267e3c3 156 }
cassyarduino 0:e3fb1267e3c3 157
cassyarduino 0:e3fb1267e3c3 158 // We're done with the socket now
cassyarduino 0:e3fb1267e3c3 159 _dhcpUdpSocket.stop();
cassyarduino 0:e3fb1267e3c3 160 _dhcpTransactionId++;
cassyarduino 0:e3fb1267e3c3 161
cassyarduino 0:e3fb1267e3c3 162 return result;
cassyarduino 0:e3fb1267e3c3 163 }
cassyarduino 0:e3fb1267e3c3 164
cassyarduino 0:e3fb1267e3c3 165 void DhcpClass::presend_DHCP(void)
cassyarduino 0:e3fb1267e3c3 166 {
cassyarduino 33:7ba5d53df0f2 167 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 168 LogObject.uart_send_str(F("DhcpClass::presend_DHCP(void) DEBUG_V1:Function started (Empty function)"));
cassyarduino 33:7ba5d53df0f2 169 #endif
cassyarduino 0:e3fb1267e3c3 170 }
cassyarduino 0:e3fb1267e3c3 171
cassyarduino 0:e3fb1267e3c3 172 void DhcpClass::send_DHCP_MESSAGE(uint8_t messageType, uint16_t secondsElapsed)
cassyarduino 0:e3fb1267e3c3 173 {
cassyarduino 33:7ba5d53df0f2 174 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 175 LogObject.uart_send_str(F("DhcpClass::send_DHCP_MESSAGE(uint8_t messageType, uint16_t secondsElapsed) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 176 #endif
cassyarduino 0:e3fb1267e3c3 177 uint8_t buffer[32];
cassyarduino 0:e3fb1267e3c3 178 memset(buffer, 0, 32);
cassyarduino 0:e3fb1267e3c3 179 IPAddress dest_addr( 255, 255, 255, 255 ); // Broadcast address
cassyarduino 0:e3fb1267e3c3 180
cassyarduino 0:e3fb1267e3c3 181 if (-1 == _dhcpUdpSocket.beginPacket(dest_addr, DHCP_SERVER_PORT))
cassyarduino 0:e3fb1267e3c3 182 {
cassyarduino 0:e3fb1267e3c3 183 // FIXME Need to return errors
cassyarduino 0:e3fb1267e3c3 184 return;
cassyarduino 0:e3fb1267e3c3 185 }
cassyarduino 0:e3fb1267e3c3 186
cassyarduino 0:e3fb1267e3c3 187 buffer[0] = DHCP_BOOTREQUEST; // op
cassyarduino 0:e3fb1267e3c3 188 buffer[1] = DHCP_HTYPE10MB; // htype
cassyarduino 0:e3fb1267e3c3 189 buffer[2] = DHCP_HLENETHERNET; // hlen
cassyarduino 0:e3fb1267e3c3 190 buffer[3] = DHCP_HOPS; // hops
cassyarduino 0:e3fb1267e3c3 191
cassyarduino 0:e3fb1267e3c3 192 // xid
cassyarduino 0:e3fb1267e3c3 193 unsigned long xid = htonl(_dhcpTransactionId);
cassyarduino 0:e3fb1267e3c3 194 memcpy(buffer + 4, &(xid), 4);
cassyarduino 0:e3fb1267e3c3 195
cassyarduino 0:e3fb1267e3c3 196 // 8, 9 - seconds elapsed
cassyarduino 0:e3fb1267e3c3 197 buffer[8] = ((secondsElapsed & 0xff00) >> 8);
cassyarduino 0:e3fb1267e3c3 198 buffer[9] = (secondsElapsed & 0x00ff);
cassyarduino 0:e3fb1267e3c3 199
cassyarduino 0:e3fb1267e3c3 200 // flags
cassyarduino 0:e3fb1267e3c3 201 unsigned short flags = htons(DHCP_FLAGSBROADCAST);
cassyarduino 0:e3fb1267e3c3 202 memcpy(buffer + 10, &(flags), 2);
cassyarduino 0:e3fb1267e3c3 203
cassyarduino 0:e3fb1267e3c3 204 // ciaddr: already zeroed
cassyarduino 0:e3fb1267e3c3 205 // yiaddr: already zeroed
cassyarduino 0:e3fb1267e3c3 206 // siaddr: already zeroed
cassyarduino 0:e3fb1267e3c3 207 // giaddr: already zeroed
cassyarduino 0:e3fb1267e3c3 208
cassyarduino 0:e3fb1267e3c3 209 //put data in W5100 transmit buffer
cassyarduino 0:e3fb1267e3c3 210 _dhcpUdpSocket.write(buffer, 28);
cassyarduino 0:e3fb1267e3c3 211
cassyarduino 0:e3fb1267e3c3 212 memset(buffer, 0, 32); // clear local buffer
cassyarduino 0:e3fb1267e3c3 213
cassyarduino 0:e3fb1267e3c3 214 memcpy(buffer, _dhcpMacAddr, 6); // chaddr
cassyarduino 0:e3fb1267e3c3 215
cassyarduino 0:e3fb1267e3c3 216 //put data in W5100 transmit buffer
cassyarduino 0:e3fb1267e3c3 217 _dhcpUdpSocket.write(buffer, 16);
cassyarduino 0:e3fb1267e3c3 218
cassyarduino 0:e3fb1267e3c3 219 memset(buffer, 0, 32); // clear local buffer
cassyarduino 0:e3fb1267e3c3 220
cassyarduino 0:e3fb1267e3c3 221 // leave zeroed out for sname && file
cassyarduino 0:e3fb1267e3c3 222 // put in W5100 transmit buffer x 6 (192 bytes)
cassyarduino 0:e3fb1267e3c3 223
cassyarduino 0:e3fb1267e3c3 224 for(int i = 0; i < 6; i++) {
cassyarduino 0:e3fb1267e3c3 225 _dhcpUdpSocket.write(buffer, 32);
cassyarduino 0:e3fb1267e3c3 226 }
cassyarduino 0:e3fb1267e3c3 227
cassyarduino 0:e3fb1267e3c3 228 // OPT - Magic Cookie
cassyarduino 0:e3fb1267e3c3 229 buffer[0] = (uint8_t)((MAGIC_COOKIE >> 24)& 0xFF);
cassyarduino 0:e3fb1267e3c3 230 buffer[1] = (uint8_t)((MAGIC_COOKIE >> 16)& 0xFF);
cassyarduino 0:e3fb1267e3c3 231 buffer[2] = (uint8_t)((MAGIC_COOKIE >> 8)& 0xFF);
cassyarduino 0:e3fb1267e3c3 232 buffer[3] = (uint8_t)(MAGIC_COOKIE& 0xFF);
cassyarduino 0:e3fb1267e3c3 233
cassyarduino 0:e3fb1267e3c3 234 // OPT - message type
cassyarduino 0:e3fb1267e3c3 235 buffer[4] = dhcpMessageType;
cassyarduino 0:e3fb1267e3c3 236 buffer[5] = 0x01;
cassyarduino 0:e3fb1267e3c3 237 buffer[6] = messageType; //DHCP_REQUEST;
cassyarduino 0:e3fb1267e3c3 238
cassyarduino 0:e3fb1267e3c3 239 // OPT - client identifier
cassyarduino 0:e3fb1267e3c3 240 buffer[7] = dhcpClientIdentifier;
cassyarduino 0:e3fb1267e3c3 241 buffer[8] = 0x07;
cassyarduino 0:e3fb1267e3c3 242 buffer[9] = 0x01;
cassyarduino 0:e3fb1267e3c3 243 memcpy(buffer + 10, _dhcpMacAddr, 6);
cassyarduino 0:e3fb1267e3c3 244
cassyarduino 0:e3fb1267e3c3 245 // OPT - host name
cassyarduino 0:e3fb1267e3c3 246 buffer[16] = hostName;
cassyarduino 0:e3fb1267e3c3 247 buffer[17] = strlen(HOST_NAME) + 6; // length of hostname + last 3 bytes of mac address
cassyarduino 0:e3fb1267e3c3 248 strcpy((char*)&(buffer[18]), HOST_NAME);
cassyarduino 0:e3fb1267e3c3 249
cassyarduino 0:e3fb1267e3c3 250 printByte((char*)&(buffer[24]), _dhcpMacAddr[3]);
cassyarduino 0:e3fb1267e3c3 251 printByte((char*)&(buffer[26]), _dhcpMacAddr[4]);
cassyarduino 0:e3fb1267e3c3 252 printByte((char*)&(buffer[28]), _dhcpMacAddr[5]);
cassyarduino 0:e3fb1267e3c3 253
cassyarduino 0:e3fb1267e3c3 254 //put data in W5100 transmit buffer
cassyarduino 0:e3fb1267e3c3 255 _dhcpUdpSocket.write(buffer, 30);
cassyarduino 0:e3fb1267e3c3 256
cassyarduino 0:e3fb1267e3c3 257 if(messageType == DHCP_REQUEST)
cassyarduino 0:e3fb1267e3c3 258 {
cassyarduino 0:e3fb1267e3c3 259 buffer[0] = dhcpRequestedIPaddr;
cassyarduino 0:e3fb1267e3c3 260 buffer[1] = 0x04;
cassyarduino 0:e3fb1267e3c3 261 buffer[2] = _dhcpLocalIp[0];
cassyarduino 0:e3fb1267e3c3 262 buffer[3] = _dhcpLocalIp[1];
cassyarduino 0:e3fb1267e3c3 263 buffer[4] = _dhcpLocalIp[2];
cassyarduino 0:e3fb1267e3c3 264 buffer[5] = _dhcpLocalIp[3];
cassyarduino 0:e3fb1267e3c3 265
cassyarduino 0:e3fb1267e3c3 266 buffer[6] = dhcpServerIdentifier;
cassyarduino 0:e3fb1267e3c3 267 buffer[7] = 0x04;
cassyarduino 0:e3fb1267e3c3 268 buffer[8] = _dhcpDhcpServerIp[0];
cassyarduino 0:e3fb1267e3c3 269 buffer[9] = _dhcpDhcpServerIp[1];
cassyarduino 0:e3fb1267e3c3 270 buffer[10] = _dhcpDhcpServerIp[2];
cassyarduino 0:e3fb1267e3c3 271 buffer[11] = _dhcpDhcpServerIp[3];
cassyarduino 0:e3fb1267e3c3 272
cassyarduino 0:e3fb1267e3c3 273 //put data in W5100 transmit buffer
cassyarduino 0:e3fb1267e3c3 274 _dhcpUdpSocket.write(buffer, 12);
cassyarduino 0:e3fb1267e3c3 275 }
cassyarduino 0:e3fb1267e3c3 276
cassyarduino 0:e3fb1267e3c3 277 buffer[0] = dhcpParamRequest;
cassyarduino 0:e3fb1267e3c3 278 buffer[1] = 0x06;
cassyarduino 0:e3fb1267e3c3 279 buffer[2] = subnetMask;
cassyarduino 0:e3fb1267e3c3 280 buffer[3] = routersOnSubnet;
cassyarduino 0:e3fb1267e3c3 281 buffer[4] = dns;
cassyarduino 0:e3fb1267e3c3 282 buffer[5] = domainName;
cassyarduino 0:e3fb1267e3c3 283 buffer[6] = dhcpT1value;
cassyarduino 0:e3fb1267e3c3 284 buffer[7] = dhcpT2value;
cassyarduino 0:e3fb1267e3c3 285 buffer[8] = endOption;
cassyarduino 0:e3fb1267e3c3 286
cassyarduino 0:e3fb1267e3c3 287 //put data in W5100 transmit buffer
cassyarduino 0:e3fb1267e3c3 288 _dhcpUdpSocket.write(buffer, 9);
cassyarduino 0:e3fb1267e3c3 289
cassyarduino 0:e3fb1267e3c3 290 _dhcpUdpSocket.endPacket();
cassyarduino 0:e3fb1267e3c3 291 }
cassyarduino 0:e3fb1267e3c3 292
cassyarduino 0:e3fb1267e3c3 293 uint8_t DhcpClass::parseDHCPResponse(unsigned long responseTimeout, uint32_t& transactionId)
cassyarduino 0:e3fb1267e3c3 294 {
cassyarduino 33:7ba5d53df0f2 295 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 296 LogObject.uart_send_str(F("DhcpClass::parseDHCPResponse(unsigned long responseTimeout, uint32_t& transactionId) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 297 #endif
cassyarduino 0:e3fb1267e3c3 298 uint8_t type = 0;
cassyarduino 0:e3fb1267e3c3 299 uint8_t opt_len = 0;
cassyarduino 0:e3fb1267e3c3 300
cassyarduino 0:e3fb1267e3c3 301 unsigned long startTime = millis();
cassyarduino 0:e3fb1267e3c3 302
cassyarduino 0:e3fb1267e3c3 303 while(_dhcpUdpSocket.parsePacket() <= 0)
cassyarduino 0:e3fb1267e3c3 304 {
cassyarduino 0:e3fb1267e3c3 305 if((millis() - startTime) > responseTimeout)
cassyarduino 0:e3fb1267e3c3 306 {
cassyarduino 0:e3fb1267e3c3 307 return 255;
cassyarduino 0:e3fb1267e3c3 308 }
cassyarduino 0:e3fb1267e3c3 309 delay(50);
cassyarduino 0:e3fb1267e3c3 310 }
cassyarduino 0:e3fb1267e3c3 311 // start reading in the packet
cassyarduino 0:e3fb1267e3c3 312 RIP_MSG_FIXED fixedMsg;
cassyarduino 0:e3fb1267e3c3 313 _dhcpUdpSocket.read((char*)&fixedMsg, sizeof(RIP_MSG_FIXED));
cassyarduino 0:e3fb1267e3c3 314
cassyarduino 0:e3fb1267e3c3 315 if(fixedMsg.op == DHCP_BOOTREPLY && _dhcpUdpSocket.remotePort() == DHCP_SERVER_PORT)
cassyarduino 0:e3fb1267e3c3 316 {
cassyarduino 0:e3fb1267e3c3 317 transactionId = ntohl(fixedMsg.xid);
cassyarduino 0:e3fb1267e3c3 318 if(memcmp(fixedMsg.chaddr, _dhcpMacAddr, 6) != 0 || (transactionId < _dhcpInitialTransactionId) || (transactionId > _dhcpTransactionId))
cassyarduino 0:e3fb1267e3c3 319 {
cassyarduino 0:e3fb1267e3c3 320 // Need to read the rest of the packet here regardless
cassyarduino 0:e3fb1267e3c3 321 _dhcpUdpSocket.flush();
cassyarduino 0:e3fb1267e3c3 322 return 0;
cassyarduino 0:e3fb1267e3c3 323 }
cassyarduino 0:e3fb1267e3c3 324
cassyarduino 0:e3fb1267e3c3 325 memcpy(_dhcpLocalIp, fixedMsg.yiaddr, 4);
cassyarduino 0:e3fb1267e3c3 326
cassyarduino 0:e3fb1267e3c3 327 // Skip to the option part
cassyarduino 0:e3fb1267e3c3 328 // Doing this a byte at a time so we don't have to put a big buffer
cassyarduino 0:e3fb1267e3c3 329 // on the stack (as we don't have lots of memory lying around)
cassyarduino 0:e3fb1267e3c3 330 for (int i =0; i < (240 - (int)sizeof(RIP_MSG_FIXED)); i++)
cassyarduino 0:e3fb1267e3c3 331 {
cassyarduino 0:e3fb1267e3c3 332 _dhcpUdpSocket.read(); // we don't care about the returned byte
cassyarduino 0:e3fb1267e3c3 333 }
cassyarduino 0:e3fb1267e3c3 334
cassyarduino 0:e3fb1267e3c3 335 while (_dhcpUdpSocket.available() > 0)
cassyarduino 0:e3fb1267e3c3 336 {
cassyarduino 0:e3fb1267e3c3 337 switch (_dhcpUdpSocket.read())
cassyarduino 0:e3fb1267e3c3 338 {
cassyarduino 0:e3fb1267e3c3 339 case endOption :
cassyarduino 0:e3fb1267e3c3 340 break;
cassyarduino 0:e3fb1267e3c3 341
cassyarduino 0:e3fb1267e3c3 342 case padOption :
cassyarduino 0:e3fb1267e3c3 343 break;
cassyarduino 0:e3fb1267e3c3 344
cassyarduino 0:e3fb1267e3c3 345 case dhcpMessageType :
cassyarduino 0:e3fb1267e3c3 346 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 347 type = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 348 break;
cassyarduino 0:e3fb1267e3c3 349
cassyarduino 0:e3fb1267e3c3 350 case subnetMask :
cassyarduino 0:e3fb1267e3c3 351 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 352 _dhcpUdpSocket.read((char*)_dhcpSubnetMask, 4);
cassyarduino 0:e3fb1267e3c3 353 break;
cassyarduino 0:e3fb1267e3c3 354
cassyarduino 0:e3fb1267e3c3 355 case routersOnSubnet :
cassyarduino 0:e3fb1267e3c3 356 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 357 _dhcpUdpSocket.read((char*)_dhcpGatewayIp, 4);
cassyarduino 0:e3fb1267e3c3 358 for (int i = 0; i < opt_len-4; i++)
cassyarduino 0:e3fb1267e3c3 359 {
cassyarduino 0:e3fb1267e3c3 360 _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 361 }
cassyarduino 0:e3fb1267e3c3 362 break;
cassyarduino 0:e3fb1267e3c3 363
cassyarduino 0:e3fb1267e3c3 364 case dns :
cassyarduino 0:e3fb1267e3c3 365 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 366 _dhcpUdpSocket.read((char*)_dhcpDnsServerIp, 4);
cassyarduino 0:e3fb1267e3c3 367 for (int i = 0; i < opt_len-4; i++)
cassyarduino 0:e3fb1267e3c3 368 {
cassyarduino 0:e3fb1267e3c3 369 _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 370 }
cassyarduino 0:e3fb1267e3c3 371 break;
cassyarduino 0:e3fb1267e3c3 372
cassyarduino 0:e3fb1267e3c3 373 case dhcpServerIdentifier :
cassyarduino 0:e3fb1267e3c3 374 opt_len = _dhcpUdpSocket.read();
cassyarduino 30:1ec7fa7f2e6a 375 if( IPAddress(_dhcpDhcpServerIp) == IPAddress(0,0,0,0) ||
cassyarduino 0:e3fb1267e3c3 376 IPAddress(_dhcpDhcpServerIp) == _dhcpUdpSocket.remoteIP() )
cassyarduino 0:e3fb1267e3c3 377 {
cassyarduino 0:e3fb1267e3c3 378 _dhcpUdpSocket.read((char*)_dhcpDhcpServerIp, sizeof(_dhcpDhcpServerIp));
cassyarduino 0:e3fb1267e3c3 379 }
cassyarduino 0:e3fb1267e3c3 380 else
cassyarduino 0:e3fb1267e3c3 381 {
cassyarduino 0:e3fb1267e3c3 382 // Skip over the rest of this option
cassyarduino 0:e3fb1267e3c3 383 while (opt_len--)
cassyarduino 0:e3fb1267e3c3 384 {
cassyarduino 0:e3fb1267e3c3 385 _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 386 }
cassyarduino 0:e3fb1267e3c3 387 }
cassyarduino 0:e3fb1267e3c3 388 break;
cassyarduino 0:e3fb1267e3c3 389
cassyarduino 0:e3fb1267e3c3 390 case dhcpT1value :
cassyarduino 0:e3fb1267e3c3 391 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 392 _dhcpUdpSocket.read((char*)&_dhcpT1, sizeof(_dhcpT1));
cassyarduino 0:e3fb1267e3c3 393 _dhcpT1 = ntohl(_dhcpT1);
cassyarduino 0:e3fb1267e3c3 394 break;
cassyarduino 0:e3fb1267e3c3 395
cassyarduino 0:e3fb1267e3c3 396 case dhcpT2value :
cassyarduino 0:e3fb1267e3c3 397 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 398 _dhcpUdpSocket.read((char*)&_dhcpT2, sizeof(_dhcpT2));
cassyarduino 0:e3fb1267e3c3 399 _dhcpT2 = ntohl(_dhcpT2);
cassyarduino 0:e3fb1267e3c3 400 break;
cassyarduino 0:e3fb1267e3c3 401
cassyarduino 0:e3fb1267e3c3 402 case dhcpIPaddrLeaseTime :
cassyarduino 0:e3fb1267e3c3 403 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 404 _dhcpUdpSocket.read((char*)&_dhcpLeaseTime, sizeof(_dhcpLeaseTime));
cassyarduino 0:e3fb1267e3c3 405 _dhcpLeaseTime = ntohl(_dhcpLeaseTime);
cassyarduino 0:e3fb1267e3c3 406 _renewInSec = _dhcpLeaseTime;
cassyarduino 0:e3fb1267e3c3 407 break;
cassyarduino 0:e3fb1267e3c3 408
cassyarduino 0:e3fb1267e3c3 409 default :
cassyarduino 0:e3fb1267e3c3 410 opt_len = _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 411 // Skip over the rest of this option
cassyarduino 0:e3fb1267e3c3 412 while (opt_len--)
cassyarduino 0:e3fb1267e3c3 413 {
cassyarduino 0:e3fb1267e3c3 414 _dhcpUdpSocket.read();
cassyarduino 0:e3fb1267e3c3 415 }
cassyarduino 0:e3fb1267e3c3 416 break;
cassyarduino 0:e3fb1267e3c3 417 }
cassyarduino 0:e3fb1267e3c3 418 }
cassyarduino 0:e3fb1267e3c3 419 }
cassyarduino 0:e3fb1267e3c3 420
cassyarduino 0:e3fb1267e3c3 421 // Need to skip to end of the packet regardless here
cassyarduino 0:e3fb1267e3c3 422 _dhcpUdpSocket.flush();
cassyarduino 0:e3fb1267e3c3 423
cassyarduino 0:e3fb1267e3c3 424 return type;
cassyarduino 0:e3fb1267e3c3 425 }
cassyarduino 0:e3fb1267e3c3 426
cassyarduino 0:e3fb1267e3c3 427
cassyarduino 0:e3fb1267e3c3 428 /*
cassyarduino 0:e3fb1267e3c3 429 returns:
cassyarduino 0:e3fb1267e3c3 430 0/DHCP_CHECK_NONE: nothing happened
cassyarduino 0:e3fb1267e3c3 431 1/DHCP_CHECK_RENEW_FAIL: renew failed
cassyarduino 0:e3fb1267e3c3 432 2/DHCP_CHECK_RENEW_OK: renew success
cassyarduino 0:e3fb1267e3c3 433 3/DHCP_CHECK_REBIND_FAIL: rebind fail
cassyarduino 0:e3fb1267e3c3 434 4/DHCP_CHECK_REBIND_OK: rebind success
cassyarduino 0:e3fb1267e3c3 435 */
cassyarduino 0:e3fb1267e3c3 436 int DhcpClass::checkLease(void){
cassyarduino 33:7ba5d53df0f2 437 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 438 LogObject.uart_send_str(F("DhcpClass::checkLease(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 439 #endif
cassyarduino 33:7ba5d53df0f2 440
cassyarduino 0:e3fb1267e3c3 441 //this uses a signed / unsigned trick to deal with millis overflow
cassyarduino 0:e3fb1267e3c3 442 unsigned long now = millis();
cassyarduino 0:e3fb1267e3c3 443 signed long snow = (long)now;
cassyarduino 0:e3fb1267e3c3 444 int rc=DHCP_CHECK_NONE;
cassyarduino 0:e3fb1267e3c3 445 if (_lastCheck != 0){
cassyarduino 0:e3fb1267e3c3 446 signed long factor;
cassyarduino 0:e3fb1267e3c3 447 //calc how many ms past the timeout we are
cassyarduino 0:e3fb1267e3c3 448 factor = snow - (long)_secTimeout;
cassyarduino 0:e3fb1267e3c3 449 //if on or passed the timeout, reduce the counters
cassyarduino 0:e3fb1267e3c3 450 if ( factor >= 0 ){
cassyarduino 0:e3fb1267e3c3 451 //next timeout should be now plus 1000 ms minus parts of second in factor
cassyarduino 0:e3fb1267e3c3 452 _secTimeout = snow + 1000 - factor % 1000;
cassyarduino 0:e3fb1267e3c3 453 //how many seconds late are we, minimum 1
cassyarduino 0:e3fb1267e3c3 454 factor = factor / 1000 +1;
cassyarduino 0:e3fb1267e3c3 455
cassyarduino 0:e3fb1267e3c3 456 //reduce the counters by that mouch
cassyarduino 0:e3fb1267e3c3 457 //if we can assume that the cycle time (factor) is fairly constant
cassyarduino 0:e3fb1267e3c3 458 //and if the remainder is less than cycle time * 2
cassyarduino 0:e3fb1267e3c3 459 //do it early instead of late
cassyarduino 0:e3fb1267e3c3 460 if(_renewInSec < factor*2 )
cassyarduino 0:e3fb1267e3c3 461 _renewInSec = 0;
cassyarduino 0:e3fb1267e3c3 462 else
cassyarduino 0:e3fb1267e3c3 463 _renewInSec -= factor;
cassyarduino 0:e3fb1267e3c3 464
cassyarduino 0:e3fb1267e3c3 465 if(_rebindInSec < factor*2 )
cassyarduino 0:e3fb1267e3c3 466 _rebindInSec = 0;
cassyarduino 0:e3fb1267e3c3 467 else
cassyarduino 0:e3fb1267e3c3 468 _rebindInSec -= factor;
cassyarduino 0:e3fb1267e3c3 469 }
cassyarduino 0:e3fb1267e3c3 470
cassyarduino 0:e3fb1267e3c3 471 //if we have a lease but should renew, do it
cassyarduino 0:e3fb1267e3c3 472 if (_dhcp_state == STATE_DHCP_LEASED && _renewInSec <=0){
cassyarduino 0:e3fb1267e3c3 473 _dhcp_state = STATE_DHCP_REREQUEST;
cassyarduino 0:e3fb1267e3c3 474 rc = 1 + request_DHCP_lease();
cassyarduino 0:e3fb1267e3c3 475 }
cassyarduino 0:e3fb1267e3c3 476
cassyarduino 0:e3fb1267e3c3 477 //if we have a lease or is renewing but should bind, do it
cassyarduino 0:e3fb1267e3c3 478 if( (_dhcp_state == STATE_DHCP_LEASED || _dhcp_state == STATE_DHCP_START) && _rebindInSec <=0){
cassyarduino 0:e3fb1267e3c3 479 //this should basically restart completely
cassyarduino 0:e3fb1267e3c3 480 _dhcp_state = STATE_DHCP_START;
cassyarduino 0:e3fb1267e3c3 481 reset_DHCP_lease();
cassyarduino 0:e3fb1267e3c3 482 rc = 3 + request_DHCP_lease();
cassyarduino 0:e3fb1267e3c3 483 }
cassyarduino 0:e3fb1267e3c3 484 }
cassyarduino 0:e3fb1267e3c3 485 else{
cassyarduino 0:e3fb1267e3c3 486 _secTimeout = snow + 1000;
cassyarduino 0:e3fb1267e3c3 487 }
cassyarduino 0:e3fb1267e3c3 488
cassyarduino 0:e3fb1267e3c3 489 _lastCheck = now;
cassyarduino 0:e3fb1267e3c3 490 return rc;
cassyarduino 0:e3fb1267e3c3 491 }
cassyarduino 0:e3fb1267e3c3 492
cassyarduino 0:e3fb1267e3c3 493 IPAddress DhcpClass::getLocalIp(void)
cassyarduino 0:e3fb1267e3c3 494 {
cassyarduino 33:7ba5d53df0f2 495 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 496 LogObject.uart_send_str(F("DhcpClass::getLocalIp(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 497 #endif
cassyarduino 0:e3fb1267e3c3 498 return IPAddress(_dhcpLocalIp);
cassyarduino 0:e3fb1267e3c3 499 }
cassyarduino 0:e3fb1267e3c3 500
cassyarduino 0:e3fb1267e3c3 501 IPAddress DhcpClass::getSubnetMask(void)
cassyarduino 0:e3fb1267e3c3 502 {
cassyarduino 33:7ba5d53df0f2 503 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 504 LogObject.uart_send_str(F("DhcpClass::getSubnetMask(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 505 #endif
cassyarduino 0:e3fb1267e3c3 506 return IPAddress(_dhcpSubnetMask);
cassyarduino 0:e3fb1267e3c3 507 }
cassyarduino 0:e3fb1267e3c3 508
cassyarduino 0:e3fb1267e3c3 509 IPAddress DhcpClass::getGatewayIp(void)
cassyarduino 0:e3fb1267e3c3 510 {
cassyarduino 33:7ba5d53df0f2 511 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 512 LogObject.uart_send_str(F("DhcpClass::getGatewayIp(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 513 #endif
cassyarduino 0:e3fb1267e3c3 514 return IPAddress(_dhcpGatewayIp);
cassyarduino 0:e3fb1267e3c3 515 }
cassyarduino 0:e3fb1267e3c3 516
cassyarduino 0:e3fb1267e3c3 517 IPAddress DhcpClass::getDhcpServerIp(void)
cassyarduino 0:e3fb1267e3c3 518 {
cassyarduino 33:7ba5d53df0f2 519 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 520 LogObject.uart_send_str(F("DhcpClass::getDhcpServerIp(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 521 #endif
cassyarduino 0:e3fb1267e3c3 522 return IPAddress(_dhcpDhcpServerIp);
cassyarduino 0:e3fb1267e3c3 523 }
cassyarduino 0:e3fb1267e3c3 524
cassyarduino 0:e3fb1267e3c3 525 IPAddress DhcpClass::getDnsServerIp(void)
cassyarduino 0:e3fb1267e3c3 526 {
cassyarduino 33:7ba5d53df0f2 527 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 528 LogObject.uart_send_str(F("DhcpClass::getDnsServerIp(void) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 529 #endif
cassyarduino 0:e3fb1267e3c3 530 return IPAddress(_dhcpDnsServerIp);
cassyarduino 0:e3fb1267e3c3 531 }
cassyarduino 0:e3fb1267e3c3 532
cassyarduino 0:e3fb1267e3c3 533 void DhcpClass::printByte(char * buf, uint8_t n ) {
cassyarduino 33:7ba5d53df0f2 534 #if ACTLOGLEVEL>=LOG_DEBUG_V1
cassyarduino 33:7ba5d53df0f2 535 LogObject.uart_send_str(F("DhcpClass::printByte(char * buf, uint8_t n ) DEBUG_V1:Function started"));
cassyarduino 33:7ba5d53df0f2 536 #endif
cassyarduino 0:e3fb1267e3c3 537 char *str = &buf[1];
cassyarduino 0:e3fb1267e3c3 538 buf[0]='0';
cassyarduino 0:e3fb1267e3c3 539 do {
cassyarduino 0:e3fb1267e3c3 540 unsigned long m = n;
cassyarduino 0:e3fb1267e3c3 541 n /= 16;
cassyarduino 0:e3fb1267e3c3 542 char c = m - 16 * n;
cassyarduino 0:e3fb1267e3c3 543 *str-- = c < 10 ? c + '0' : c + 'A' - 10;
cassyarduino 0:e3fb1267e3c3 544 } while(n);
cassyarduino 0:e3fb1267e3c3 545 }
cassyarduino 33:7ba5d53df0f2 546 #endif