Some quick code to use UDP-only (no TCP) with mBed. Echos received packets and sends packets when a button is pressed
Core/lwIP/core/dns.c@0:a548a085de55, 2010-03-14 (annotated)
- Committer:
- pehrhovey
- Date:
- Sun Mar 14 00:54:12 2010 +0000
- Revision:
- 0:a548a085de55
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
pehrhovey | 0:a548a085de55 | 1 | /** |
pehrhovey | 0:a548a085de55 | 2 | * @file |
pehrhovey | 0:a548a085de55 | 3 | * DNS - host name to IP address resolver. |
pehrhovey | 0:a548a085de55 | 4 | * |
pehrhovey | 0:a548a085de55 | 5 | */ |
pehrhovey | 0:a548a085de55 | 6 | |
pehrhovey | 0:a548a085de55 | 7 | /** |
pehrhovey | 0:a548a085de55 | 8 | |
pehrhovey | 0:a548a085de55 | 9 | * This file implements a DNS host name to IP address resolver. |
pehrhovey | 0:a548a085de55 | 10 | |
pehrhovey | 0:a548a085de55 | 11 | * Port to lwIP from uIP |
pehrhovey | 0:a548a085de55 | 12 | * by Jim Pettinato April 2007 |
pehrhovey | 0:a548a085de55 | 13 | |
pehrhovey | 0:a548a085de55 | 14 | * uIP version Copyright (c) 2002-2003, Adam Dunkels. |
pehrhovey | 0:a548a085de55 | 15 | * All rights reserved. |
pehrhovey | 0:a548a085de55 | 16 | * |
pehrhovey | 0:a548a085de55 | 17 | * Redistribution and use in source and binary forms, with or without |
pehrhovey | 0:a548a085de55 | 18 | * modification, are permitted provided that the following conditions |
pehrhovey | 0:a548a085de55 | 19 | * are met: |
pehrhovey | 0:a548a085de55 | 20 | * 1. Redistributions of source code must retain the above copyright |
pehrhovey | 0:a548a085de55 | 21 | * notice, this list of conditions and the following disclaimer. |
pehrhovey | 0:a548a085de55 | 22 | * 2. Redistributions in binary form must reproduce the above copyright |
pehrhovey | 0:a548a085de55 | 23 | * notice, this list of conditions and the following disclaimer in the |
pehrhovey | 0:a548a085de55 | 24 | * documentation and/or other materials provided with the distribution. |
pehrhovey | 0:a548a085de55 | 25 | * 3. The name of the author may not be used to endorse or promote |
pehrhovey | 0:a548a085de55 | 26 | * products derived from this software without specific prior |
pehrhovey | 0:a548a085de55 | 27 | * written permission. |
pehrhovey | 0:a548a085de55 | 28 | * |
pehrhovey | 0:a548a085de55 | 29 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS |
pehrhovey | 0:a548a085de55 | 30 | * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED |
pehrhovey | 0:a548a085de55 | 31 | * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
pehrhovey | 0:a548a085de55 | 32 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY |
pehrhovey | 0:a548a085de55 | 33 | * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
pehrhovey | 0:a548a085de55 | 34 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE |
pehrhovey | 0:a548a085de55 | 35 | * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
pehrhovey | 0:a548a085de55 | 36 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, |
pehrhovey | 0:a548a085de55 | 37 | * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING |
pehrhovey | 0:a548a085de55 | 38 | * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS |
pehrhovey | 0:a548a085de55 | 39 | * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
pehrhovey | 0:a548a085de55 | 40 | * |
pehrhovey | 0:a548a085de55 | 41 | * |
pehrhovey | 0:a548a085de55 | 42 | * DNS.C |
pehrhovey | 0:a548a085de55 | 43 | * |
pehrhovey | 0:a548a085de55 | 44 | * The lwIP DNS resolver functions are used to lookup a host name and |
pehrhovey | 0:a548a085de55 | 45 | * map it to a numerical IP address. It maintains a list of resolved |
pehrhovey | 0:a548a085de55 | 46 | * hostnames that can be queried with the dns_lookup() function. |
pehrhovey | 0:a548a085de55 | 47 | * New hostnames can be resolved using the dns_query() function. |
pehrhovey | 0:a548a085de55 | 48 | * |
pehrhovey | 0:a548a085de55 | 49 | * The lwIP version of the resolver also adds a non-blocking version of |
pehrhovey | 0:a548a085de55 | 50 | * gethostbyname() that will work with a raw API application. This function |
pehrhovey | 0:a548a085de55 | 51 | * checks for an IP address string first and converts it if it is valid. |
pehrhovey | 0:a548a085de55 | 52 | * gethostbyname() then does a dns_lookup() to see if the name is |
pehrhovey | 0:a548a085de55 | 53 | * already in the table. If so, the IP is returned. If not, a query is |
pehrhovey | 0:a548a085de55 | 54 | * issued and the function returns with a ERR_INPROGRESS status. The app |
pehrhovey | 0:a548a085de55 | 55 | * using the dns client must then go into a waiting state. |
pehrhovey | 0:a548a085de55 | 56 | * |
pehrhovey | 0:a548a085de55 | 57 | * Once a hostname has been resolved (or found to be non-existent), |
pehrhovey | 0:a548a085de55 | 58 | * the resolver code calls a specified callback function (which |
pehrhovey | 0:a548a085de55 | 59 | * must be implemented by the module that uses the resolver). |
pehrhovey | 0:a548a085de55 | 60 | */ |
pehrhovey | 0:a548a085de55 | 61 | |
pehrhovey | 0:a548a085de55 | 62 | /*----------------------------------------------------------------------------- |
pehrhovey | 0:a548a085de55 | 63 | * RFC 1035 - Domain names - implementation and specification |
pehrhovey | 0:a548a085de55 | 64 | * RFC 2181 - Clarifications to the DNS Specification |
pehrhovey | 0:a548a085de55 | 65 | *----------------------------------------------------------------------------*/ |
pehrhovey | 0:a548a085de55 | 66 | |
pehrhovey | 0:a548a085de55 | 67 | /** @todo: define good default values (rfc compliance) */ |
pehrhovey | 0:a548a085de55 | 68 | /** @todo: improve answer parsing, more checkings... */ |
pehrhovey | 0:a548a085de55 | 69 | /** @todo: check RFC1035 - 7.3. Processing responses */ |
pehrhovey | 0:a548a085de55 | 70 | |
pehrhovey | 0:a548a085de55 | 71 | /*----------------------------------------------------------------------------- |
pehrhovey | 0:a548a085de55 | 72 | * Includes |
pehrhovey | 0:a548a085de55 | 73 | *----------------------------------------------------------------------------*/ |
pehrhovey | 0:a548a085de55 | 74 | |
pehrhovey | 0:a548a085de55 | 75 | #include "lwip/opt.h" |
pehrhovey | 0:a548a085de55 | 76 | |
pehrhovey | 0:a548a085de55 | 77 | #if LWIP_DNS /* don't build if not configured for use in lwipopts.h */ |
pehrhovey | 0:a548a085de55 | 78 | |
pehrhovey | 0:a548a085de55 | 79 | #include "lwip/udp.h" |
pehrhovey | 0:a548a085de55 | 80 | #include "lwip/mem.h" |
pehrhovey | 0:a548a085de55 | 81 | #include "lwip/dns.h" |
pehrhovey | 0:a548a085de55 | 82 | |
pehrhovey | 0:a548a085de55 | 83 | #include <string.h> |
pehrhovey | 0:a548a085de55 | 84 | |
pehrhovey | 0:a548a085de55 | 85 | /** DNS server IP address */ |
pehrhovey | 0:a548a085de55 | 86 | #ifndef DNS_SERVER_ADDRESS |
pehrhovey | 0:a548a085de55 | 87 | #define DNS_SERVER_ADDRESS inet_addr("208.67.222.222") /* resolver1.opendns.com */ |
pehrhovey | 0:a548a085de55 | 88 | #endif |
pehrhovey | 0:a548a085de55 | 89 | |
pehrhovey | 0:a548a085de55 | 90 | /** DNS server port address */ |
pehrhovey | 0:a548a085de55 | 91 | #ifndef DNS_SERVER_PORT |
pehrhovey | 0:a548a085de55 | 92 | #define DNS_SERVER_PORT 53 |
pehrhovey | 0:a548a085de55 | 93 | #endif |
pehrhovey | 0:a548a085de55 | 94 | |
pehrhovey | 0:a548a085de55 | 95 | /** DNS maximum number of retries when asking for a name, before "timeout". */ |
pehrhovey | 0:a548a085de55 | 96 | #ifndef DNS_MAX_RETRIES |
pehrhovey | 0:a548a085de55 | 97 | #define DNS_MAX_RETRIES 4 |
pehrhovey | 0:a548a085de55 | 98 | #endif |
pehrhovey | 0:a548a085de55 | 99 | |
pehrhovey | 0:a548a085de55 | 100 | /** DNS resource record max. TTL (one week as default) */ |
pehrhovey | 0:a548a085de55 | 101 | #ifndef DNS_MAX_TTL |
pehrhovey | 0:a548a085de55 | 102 | #define DNS_MAX_TTL 604800 |
pehrhovey | 0:a548a085de55 | 103 | #endif |
pehrhovey | 0:a548a085de55 | 104 | |
pehrhovey | 0:a548a085de55 | 105 | /* DNS protocol flags */ |
pehrhovey | 0:a548a085de55 | 106 | #define DNS_FLAG1_RESPONSE 0x80 |
pehrhovey | 0:a548a085de55 | 107 | #define DNS_FLAG1_OPCODE_STATUS 0x10 |
pehrhovey | 0:a548a085de55 | 108 | #define DNS_FLAG1_OPCODE_INVERSE 0x08 |
pehrhovey | 0:a548a085de55 | 109 | #define DNS_FLAG1_OPCODE_STANDARD 0x00 |
pehrhovey | 0:a548a085de55 | 110 | #define DNS_FLAG1_AUTHORATIVE 0x04 |
pehrhovey | 0:a548a085de55 | 111 | #define DNS_FLAG1_TRUNC 0x02 |
pehrhovey | 0:a548a085de55 | 112 | #define DNS_FLAG1_RD 0x01 |
pehrhovey | 0:a548a085de55 | 113 | #define DNS_FLAG2_RA 0x80 |
pehrhovey | 0:a548a085de55 | 114 | #define DNS_FLAG2_ERR_MASK 0x0f |
pehrhovey | 0:a548a085de55 | 115 | #define DNS_FLAG2_ERR_NONE 0x00 |
pehrhovey | 0:a548a085de55 | 116 | #define DNS_FLAG2_ERR_NAME 0x03 |
pehrhovey | 0:a548a085de55 | 117 | |
pehrhovey | 0:a548a085de55 | 118 | /* DNS protocol states */ |
pehrhovey | 0:a548a085de55 | 119 | #define DNS_STATE_UNUSED 0 |
pehrhovey | 0:a548a085de55 | 120 | #define DNS_STATE_NEW 1 |
pehrhovey | 0:a548a085de55 | 121 | #define DNS_STATE_ASKING 2 |
pehrhovey | 0:a548a085de55 | 122 | #define DNS_STATE_DONE 3 |
pehrhovey | 0:a548a085de55 | 123 | |
pehrhovey | 0:a548a085de55 | 124 | |
pehrhovey | 0:a548a085de55 | 125 | // XXX: For C++ compatibility |
pehrhovey | 0:a548a085de55 | 126 | #define class mclass |
pehrhovey | 0:a548a085de55 | 127 | |
pehrhovey | 0:a548a085de55 | 128 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 129 | # include "arch/bpstruct.h" |
pehrhovey | 0:a548a085de55 | 130 | #endif |
pehrhovey | 0:a548a085de55 | 131 | PACK_STRUCT_BEGIN |
pehrhovey | 0:a548a085de55 | 132 | /** DNS message header */ |
pehrhovey | 0:a548a085de55 | 133 | struct dns_hdr { |
pehrhovey | 0:a548a085de55 | 134 | PACK_STRUCT_FIELD(u16_t id); |
pehrhovey | 0:a548a085de55 | 135 | PACK_STRUCT_FIELD(u8_t flags1); |
pehrhovey | 0:a548a085de55 | 136 | PACK_STRUCT_FIELD(u8_t flags2); |
pehrhovey | 0:a548a085de55 | 137 | PACK_STRUCT_FIELD(u16_t numquestions); |
pehrhovey | 0:a548a085de55 | 138 | PACK_STRUCT_FIELD(u16_t numanswers); |
pehrhovey | 0:a548a085de55 | 139 | PACK_STRUCT_FIELD(u16_t numauthrr); |
pehrhovey | 0:a548a085de55 | 140 | PACK_STRUCT_FIELD(u16_t numextrarr); |
pehrhovey | 0:a548a085de55 | 141 | } PACK_STRUCT_STRUCT; |
pehrhovey | 0:a548a085de55 | 142 | PACK_STRUCT_END |
pehrhovey | 0:a548a085de55 | 143 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 144 | # include "arch/epstruct.h" |
pehrhovey | 0:a548a085de55 | 145 | #endif |
pehrhovey | 0:a548a085de55 | 146 | #define SIZEOF_DNS_HDR 12 |
pehrhovey | 0:a548a085de55 | 147 | |
pehrhovey | 0:a548a085de55 | 148 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 149 | # include "arch/bpstruct.h" |
pehrhovey | 0:a548a085de55 | 150 | #endif |
pehrhovey | 0:a548a085de55 | 151 | PACK_STRUCT_BEGIN |
pehrhovey | 0:a548a085de55 | 152 | /** DNS query message structure */ |
pehrhovey | 0:a548a085de55 | 153 | struct dns_query { |
pehrhovey | 0:a548a085de55 | 154 | /* DNS query record starts with either a domain name or a pointer |
pehrhovey | 0:a548a085de55 | 155 | to a name already present somewhere in the packet. */ |
pehrhovey | 0:a548a085de55 | 156 | PACK_STRUCT_FIELD(u16_t type); |
pehrhovey | 0:a548a085de55 | 157 | PACK_STRUCT_FIELD(u16_t class); |
pehrhovey | 0:a548a085de55 | 158 | } PACK_STRUCT_STRUCT; |
pehrhovey | 0:a548a085de55 | 159 | PACK_STRUCT_END |
pehrhovey | 0:a548a085de55 | 160 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 161 | # include "arch/epstruct.h" |
pehrhovey | 0:a548a085de55 | 162 | #endif |
pehrhovey | 0:a548a085de55 | 163 | #define SIZEOF_DNS_QUERY 4 |
pehrhovey | 0:a548a085de55 | 164 | |
pehrhovey | 0:a548a085de55 | 165 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 166 | # include "arch/bpstruct.h" |
pehrhovey | 0:a548a085de55 | 167 | #endif |
pehrhovey | 0:a548a085de55 | 168 | PACK_STRUCT_BEGIN |
pehrhovey | 0:a548a085de55 | 169 | /** DNS answer message structure */ |
pehrhovey | 0:a548a085de55 | 170 | struct dns_answer { |
pehrhovey | 0:a548a085de55 | 171 | /* DNS answer record starts with either a domain name or a pointer |
pehrhovey | 0:a548a085de55 | 172 | to a name already present somewhere in the packet. */ |
pehrhovey | 0:a548a085de55 | 173 | PACK_STRUCT_FIELD(u16_t type); |
pehrhovey | 0:a548a085de55 | 174 | PACK_STRUCT_FIELD(u16_t class); |
pehrhovey | 0:a548a085de55 | 175 | PACK_STRUCT_FIELD(u32_t ttl); |
pehrhovey | 0:a548a085de55 | 176 | PACK_STRUCT_FIELD(u16_t len); |
pehrhovey | 0:a548a085de55 | 177 | } PACK_STRUCT_STRUCT; |
pehrhovey | 0:a548a085de55 | 178 | PACK_STRUCT_END |
pehrhovey | 0:a548a085de55 | 179 | #ifdef PACK_STRUCT_USE_INCLUDES |
pehrhovey | 0:a548a085de55 | 180 | # include "arch/epstruct.h" |
pehrhovey | 0:a548a085de55 | 181 | #endif |
pehrhovey | 0:a548a085de55 | 182 | #define SIZEOF_DNS_ANSWER 10 |
pehrhovey | 0:a548a085de55 | 183 | |
pehrhovey | 0:a548a085de55 | 184 | /** DNS table entry */ |
pehrhovey | 0:a548a085de55 | 185 | struct dns_table_entry { |
pehrhovey | 0:a548a085de55 | 186 | u8_t state; |
pehrhovey | 0:a548a085de55 | 187 | u8_t numdns; |
pehrhovey | 0:a548a085de55 | 188 | u8_t tmr; |
pehrhovey | 0:a548a085de55 | 189 | u8_t retries; |
pehrhovey | 0:a548a085de55 | 190 | u8_t seqno; |
pehrhovey | 0:a548a085de55 | 191 | u8_t err; |
pehrhovey | 0:a548a085de55 | 192 | u32_t ttl; |
pehrhovey | 0:a548a085de55 | 193 | char name[DNS_MAX_NAME_LENGTH]; |
pehrhovey | 0:a548a085de55 | 194 | struct ip_addr ipaddr; |
pehrhovey | 0:a548a085de55 | 195 | /* pointer to callback on DNS query done */ |
pehrhovey | 0:a548a085de55 | 196 | dns_found_callback found; |
pehrhovey | 0:a548a085de55 | 197 | void *arg; |
pehrhovey | 0:a548a085de55 | 198 | }; |
pehrhovey | 0:a548a085de55 | 199 | |
pehrhovey | 0:a548a085de55 | 200 | #if DNS_LOCAL_HOSTLIST |
pehrhovey | 0:a548a085de55 | 201 | /** struct used for local host-list */ |
pehrhovey | 0:a548a085de55 | 202 | struct local_hostlist_entry { |
pehrhovey | 0:a548a085de55 | 203 | /** static hostname */ |
pehrhovey | 0:a548a085de55 | 204 | const char *name; |
pehrhovey | 0:a548a085de55 | 205 | /** static host address in network byteorder */ |
pehrhovey | 0:a548a085de55 | 206 | u32_t addr; |
pehrhovey | 0:a548a085de55 | 207 | struct local_hostlist_entry *next; |
pehrhovey | 0:a548a085de55 | 208 | }; |
pehrhovey | 0:a548a085de55 | 209 | |
pehrhovey | 0:a548a085de55 | 210 | #if DNS_LOCAL_HOSTLIST_IS_DYNAMIC |
pehrhovey | 0:a548a085de55 | 211 | /** Local host-list. For hostnames in this list, no |
pehrhovey | 0:a548a085de55 | 212 | * external name resolution is performed */ |
pehrhovey | 0:a548a085de55 | 213 | static struct local_hostlist_entry *local_hostlist_dynamic; |
pehrhovey | 0:a548a085de55 | 214 | #else /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC */ |
pehrhovey | 0:a548a085de55 | 215 | |
pehrhovey | 0:a548a085de55 | 216 | /** Defining this allows the local_hostlist_static to be placed in a different |
pehrhovey | 0:a548a085de55 | 217 | * linker section (e.g. FLASH) */ |
pehrhovey | 0:a548a085de55 | 218 | #ifndef DNS_LOCAL_HOSTLIST_STORAGE_PRE |
pehrhovey | 0:a548a085de55 | 219 | #define DNS_LOCAL_HOSTLIST_STORAGE_PRE static |
pehrhovey | 0:a548a085de55 | 220 | #endif /* DNS_LOCAL_HOSTLIST_STORAGE_PRE */ |
pehrhovey | 0:a548a085de55 | 221 | /** Defining this allows the local_hostlist_static to be placed in a different |
pehrhovey | 0:a548a085de55 | 222 | * linker section (e.g. FLASH) */ |
pehrhovey | 0:a548a085de55 | 223 | #ifndef DNS_LOCAL_HOSTLIST_STORAGE_POST |
pehrhovey | 0:a548a085de55 | 224 | #define DNS_LOCAL_HOSTLIST_STORAGE_POST |
pehrhovey | 0:a548a085de55 | 225 | #endif /* DNS_LOCAL_HOSTLIST_STORAGE_POST */ |
pehrhovey | 0:a548a085de55 | 226 | DNS_LOCAL_HOSTLIST_STORAGE_PRE struct local_hostlist_entry local_hostlist_static[] |
pehrhovey | 0:a548a085de55 | 227 | DNS_LOCAL_HOSTLIST_STORAGE_POST = DNS_LOCAL_HOSTLIST_INIT; |
pehrhovey | 0:a548a085de55 | 228 | |
pehrhovey | 0:a548a085de55 | 229 | #endif /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC */ |
pehrhovey | 0:a548a085de55 | 230 | |
pehrhovey | 0:a548a085de55 | 231 | static void dns_init_local(); |
pehrhovey | 0:a548a085de55 | 232 | #endif /* DNS_LOCAL_HOSTLIST */ |
pehrhovey | 0:a548a085de55 | 233 | |
pehrhovey | 0:a548a085de55 | 234 | |
pehrhovey | 0:a548a085de55 | 235 | /* forward declarations */ |
pehrhovey | 0:a548a085de55 | 236 | static void dns_recv(void *s, struct udp_pcb *pcb, struct pbuf *p, struct ip_addr *addr, u16_t port); |
pehrhovey | 0:a548a085de55 | 237 | static void dns_check_entries(void); |
pehrhovey | 0:a548a085de55 | 238 | |
pehrhovey | 0:a548a085de55 | 239 | /*----------------------------------------------------------------------------- |
pehrhovey | 0:a548a085de55 | 240 | * Globales |
pehrhovey | 0:a548a085de55 | 241 | *----------------------------------------------------------------------------*/ |
pehrhovey | 0:a548a085de55 | 242 | |
pehrhovey | 0:a548a085de55 | 243 | /* DNS variables */ |
pehrhovey | 0:a548a085de55 | 244 | static struct udp_pcb *dns_pcb; |
pehrhovey | 0:a548a085de55 | 245 | static u8_t dns_seqno; |
pehrhovey | 0:a548a085de55 | 246 | static struct dns_table_entry dns_table[DNS_TABLE_SIZE] MEM_POSITION; |
pehrhovey | 0:a548a085de55 | 247 | static struct ip_addr dns_servers[DNS_MAX_SERVERS] MEM_POSITION; |
pehrhovey | 0:a548a085de55 | 248 | |
pehrhovey | 0:a548a085de55 | 249 | #if (DNS_USES_STATIC_BUF == 1) |
pehrhovey | 0:a548a085de55 | 250 | static u8_t dns_payload[DNS_MSG_SIZE] MEM_POSITION; |
pehrhovey | 0:a548a085de55 | 251 | #endif /* (DNS_USES_STATIC_BUF == 1) */ |
pehrhovey | 0:a548a085de55 | 252 | |
pehrhovey | 0:a548a085de55 | 253 | /** |
pehrhovey | 0:a548a085de55 | 254 | * Initialize the resolver: set up the UDP pcb and configure the default server |
pehrhovey | 0:a548a085de55 | 255 | * (DNS_SERVER_ADDRESS). |
pehrhovey | 0:a548a085de55 | 256 | */ |
pehrhovey | 0:a548a085de55 | 257 | void |
pehrhovey | 0:a548a085de55 | 258 | dns_init() |
pehrhovey | 0:a548a085de55 | 259 | { |
pehrhovey | 0:a548a085de55 | 260 | struct ip_addr dnsserver; |
pehrhovey | 0:a548a085de55 | 261 | |
pehrhovey | 0:a548a085de55 | 262 | /* initialize default DNS server address */ |
pehrhovey | 0:a548a085de55 | 263 | dnsserver.addr = DNS_SERVER_ADDRESS; |
pehrhovey | 0:a548a085de55 | 264 | |
pehrhovey | 0:a548a085de55 | 265 | LWIP_DEBUGF(DNS_DEBUG, ("dns_init: initializing\n")); |
pehrhovey | 0:a548a085de55 | 266 | |
pehrhovey | 0:a548a085de55 | 267 | /* if dns client not yet initialized... */ |
pehrhovey | 0:a548a085de55 | 268 | if (dns_pcb == NULL) { |
pehrhovey | 0:a548a085de55 | 269 | dns_pcb = udp_new(); |
pehrhovey | 0:a548a085de55 | 270 | |
pehrhovey | 0:a548a085de55 | 271 | if (dns_pcb != NULL) { |
pehrhovey | 0:a548a085de55 | 272 | /* initialize DNS table not needed (initialized to zero since it is a |
pehrhovey | 0:a548a085de55 | 273 | * global variable) */ |
pehrhovey | 0:a548a085de55 | 274 | LWIP_ASSERT("For implicit initialization to work, DNS_STATE_UNUSED needs to be 0", |
pehrhovey | 0:a548a085de55 | 275 | DNS_STATE_UNUSED == 0); |
pehrhovey | 0:a548a085de55 | 276 | |
pehrhovey | 0:a548a085de55 | 277 | /* initialize DNS client */ |
pehrhovey | 0:a548a085de55 | 278 | udp_bind(dns_pcb, IP_ADDR_ANY, 0); |
pehrhovey | 0:a548a085de55 | 279 | udp_recv(dns_pcb, dns_recv, NULL); |
pehrhovey | 0:a548a085de55 | 280 | |
pehrhovey | 0:a548a085de55 | 281 | /* initialize default DNS primary server */ |
pehrhovey | 0:a548a085de55 | 282 | dns_setserver(0, &dnsserver); |
pehrhovey | 0:a548a085de55 | 283 | } |
pehrhovey | 0:a548a085de55 | 284 | } |
pehrhovey | 0:a548a085de55 | 285 | #if DNS_LOCAL_HOSTLIST |
pehrhovey | 0:a548a085de55 | 286 | dns_init_local(); |
pehrhovey | 0:a548a085de55 | 287 | #endif |
pehrhovey | 0:a548a085de55 | 288 | } |
pehrhovey | 0:a548a085de55 | 289 | |
pehrhovey | 0:a548a085de55 | 290 | /** |
pehrhovey | 0:a548a085de55 | 291 | * Initialize one of the DNS servers. |
pehrhovey | 0:a548a085de55 | 292 | * |
pehrhovey | 0:a548a085de55 | 293 | * @param numdns the index of the DNS server to set must be < DNS_MAX_SERVERS |
pehrhovey | 0:a548a085de55 | 294 | * @param dnsserver IP address of the DNS server to set |
pehrhovey | 0:a548a085de55 | 295 | */ |
pehrhovey | 0:a548a085de55 | 296 | void |
pehrhovey | 0:a548a085de55 | 297 | dns_setserver(u8_t numdns, struct ip_addr *dnsserver) |
pehrhovey | 0:a548a085de55 | 298 | { |
pehrhovey | 0:a548a085de55 | 299 | if ((numdns < DNS_MAX_SERVERS) && (dns_pcb != NULL) && |
pehrhovey | 0:a548a085de55 | 300 | (dnsserver != NULL) && (dnsserver->addr !=0 )) { |
pehrhovey | 0:a548a085de55 | 301 | dns_servers[numdns] = (*dnsserver); |
pehrhovey | 0:a548a085de55 | 302 | } |
pehrhovey | 0:a548a085de55 | 303 | } |
pehrhovey | 0:a548a085de55 | 304 | |
pehrhovey | 0:a548a085de55 | 305 | /** |
pehrhovey | 0:a548a085de55 | 306 | * Obtain one of the currently configured DNS server. |
pehrhovey | 0:a548a085de55 | 307 | * |
pehrhovey | 0:a548a085de55 | 308 | * @param numdns the index of the DNS server |
pehrhovey | 0:a548a085de55 | 309 | * @return IP address of the indexed DNS server or "ip_addr_any" if the DNS |
pehrhovey | 0:a548a085de55 | 310 | * server has not been configured. |
pehrhovey | 0:a548a085de55 | 311 | */ |
pehrhovey | 0:a548a085de55 | 312 | struct ip_addr |
pehrhovey | 0:a548a085de55 | 313 | dns_getserver(u8_t numdns) |
pehrhovey | 0:a548a085de55 | 314 | { |
pehrhovey | 0:a548a085de55 | 315 | if (numdns < DNS_MAX_SERVERS) { |
pehrhovey | 0:a548a085de55 | 316 | return dns_servers[numdns]; |
pehrhovey | 0:a548a085de55 | 317 | } else { |
pehrhovey | 0:a548a085de55 | 318 | return *IP_ADDR_ANY; |
pehrhovey | 0:a548a085de55 | 319 | } |
pehrhovey | 0:a548a085de55 | 320 | } |
pehrhovey | 0:a548a085de55 | 321 | |
pehrhovey | 0:a548a085de55 | 322 | /** |
pehrhovey | 0:a548a085de55 | 323 | * The DNS resolver client timer - handle retries and timeouts and should |
pehrhovey | 0:a548a085de55 | 324 | * be called every DNS_TMR_INTERVAL milliseconds (every second by default). |
pehrhovey | 0:a548a085de55 | 325 | */ |
pehrhovey | 0:a548a085de55 | 326 | void |
pehrhovey | 0:a548a085de55 | 327 | dns_tmr(void) |
pehrhovey | 0:a548a085de55 | 328 | { |
pehrhovey | 0:a548a085de55 | 329 | if (dns_pcb != NULL) { |
pehrhovey | 0:a548a085de55 | 330 | LWIP_DEBUGF(DNS_DEBUG, ("dns_tmr: dns_check_entries\n")); |
pehrhovey | 0:a548a085de55 | 331 | dns_check_entries(); |
pehrhovey | 0:a548a085de55 | 332 | } |
pehrhovey | 0:a548a085de55 | 333 | } |
pehrhovey | 0:a548a085de55 | 334 | |
pehrhovey | 0:a548a085de55 | 335 | #if DNS_LOCAL_HOSTLIST |
pehrhovey | 0:a548a085de55 | 336 | static void |
pehrhovey | 0:a548a085de55 | 337 | dns_init_local() |
pehrhovey | 0:a548a085de55 | 338 | { |
pehrhovey | 0:a548a085de55 | 339 | #if DNS_LOCAL_HOSTLIST_IS_DYNAMIC && defined(DNS_LOCAL_HOSTLIST_INIT) |
pehrhovey | 0:a548a085de55 | 340 | int i; |
pehrhovey | 0:a548a085de55 | 341 | struct local_hostlist_entry *entry; |
pehrhovey | 0:a548a085de55 | 342 | /* Dynamic: copy entries from DNS_LOCAL_HOSTLIST_INIT to list */ |
pehrhovey | 0:a548a085de55 | 343 | struct local_hostlist_entry local_hostlist_init[] = DNS_LOCAL_HOSTLIST_INIT; |
pehrhovey | 0:a548a085de55 | 344 | for (i = 0; i < sizeof(local_hostlist_init) / sizeof(struct local_hostlist_entry); i++) { |
pehrhovey | 0:a548a085de55 | 345 | entry = mem_malloc(sizeof(struct local_hostlist_entry)); |
pehrhovey | 0:a548a085de55 | 346 | LWIP_ASSERT("mem-error in dns_init_local", entry != NULL); |
pehrhovey | 0:a548a085de55 | 347 | if (entry != NULL) { |
pehrhovey | 0:a548a085de55 | 348 | struct local_hostlist_entry *init_entry = &local_hostlist_init[i]; |
pehrhovey | 0:a548a085de55 | 349 | entry->name = init_entry->name; |
pehrhovey | 0:a548a085de55 | 350 | entry->addr = init_entry->addr; |
pehrhovey | 0:a548a085de55 | 351 | entry->next = local_hostlist_dynamic; |
pehrhovey | 0:a548a085de55 | 352 | local_hostlist_dynamic = entry; |
pehrhovey | 0:a548a085de55 | 353 | } |
pehrhovey | 0:a548a085de55 | 354 | } |
pehrhovey | 0:a548a085de55 | 355 | #endif /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC && defined(DNS_LOCAL_HOSTLIST_INIT) */ |
pehrhovey | 0:a548a085de55 | 356 | } |
pehrhovey | 0:a548a085de55 | 357 | |
pehrhovey | 0:a548a085de55 | 358 | /** |
pehrhovey | 0:a548a085de55 | 359 | * Scans the local host-list for a hostname. |
pehrhovey | 0:a548a085de55 | 360 | * |
pehrhovey | 0:a548a085de55 | 361 | * @param hostname Hostname to look for in the local host-list |
pehrhovey | 0:a548a085de55 | 362 | * @return The first IP address for the hostname in the local host-list or |
pehrhovey | 0:a548a085de55 | 363 | * INADDR_NONE if not found. |
pehrhovey | 0:a548a085de55 | 364 | */ |
pehrhovey | 0:a548a085de55 | 365 | static u32_t |
pehrhovey | 0:a548a085de55 | 366 | dns_lookup_local(const char *hostname) |
pehrhovey | 0:a548a085de55 | 367 | { |
pehrhovey | 0:a548a085de55 | 368 | #if DNS_LOCAL_HOSTLIST_IS_DYNAMIC |
pehrhovey | 0:a548a085de55 | 369 | struct local_hostlist_entry *entry = local_hostlist_dynamic; |
pehrhovey | 0:a548a085de55 | 370 | while(entry != NULL) { |
pehrhovey | 0:a548a085de55 | 371 | if(strcmp(entry->name, hostname) == 0) { |
pehrhovey | 0:a548a085de55 | 372 | return entry->addr; |
pehrhovey | 0:a548a085de55 | 373 | } |
pehrhovey | 0:a548a085de55 | 374 | entry = entry->next; |
pehrhovey | 0:a548a085de55 | 375 | } |
pehrhovey | 0:a548a085de55 | 376 | #else /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC */ |
pehrhovey | 0:a548a085de55 | 377 | int i; |
pehrhovey | 0:a548a085de55 | 378 | for (i = 0; i < sizeof(local_hostlist_static) / sizeof(struct local_hostlist_entry); i++) { |
pehrhovey | 0:a548a085de55 | 379 | if(strcmp(local_hostlist_static[i].name, hostname) == 0) { |
pehrhovey | 0:a548a085de55 | 380 | return local_hostlist_static[i].addr; |
pehrhovey | 0:a548a085de55 | 381 | } |
pehrhovey | 0:a548a085de55 | 382 | } |
pehrhovey | 0:a548a085de55 | 383 | #endif /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC */ |
pehrhovey | 0:a548a085de55 | 384 | return INADDR_NONE; |
pehrhovey | 0:a548a085de55 | 385 | } |
pehrhovey | 0:a548a085de55 | 386 | |
pehrhovey | 0:a548a085de55 | 387 | #if DNS_LOCAL_HOSTLIST_IS_DYNAMIC |
pehrhovey | 0:a548a085de55 | 388 | /** Remove all entries from the local host-list for a specific hostname |
pehrhovey | 0:a548a085de55 | 389 | * and/or IP addess |
pehrhovey | 0:a548a085de55 | 390 | * |
pehrhovey | 0:a548a085de55 | 391 | * @param hostname hostname for which entries shall be removed from the local |
pehrhovey | 0:a548a085de55 | 392 | * host-list |
pehrhovey | 0:a548a085de55 | 393 | * @param addr address for which entries shall be removed from the local host-list |
pehrhovey | 0:a548a085de55 | 394 | * @return the number of removed entries |
pehrhovey | 0:a548a085de55 | 395 | */ |
pehrhovey | 0:a548a085de55 | 396 | int |
pehrhovey | 0:a548a085de55 | 397 | dns_local_removehost(const char *hostname, const struct ip_addr *addr) |
pehrhovey | 0:a548a085de55 | 398 | { |
pehrhovey | 0:a548a085de55 | 399 | int removed = 0; |
pehrhovey | 0:a548a085de55 | 400 | struct local_hostlist_entry *entry = local_hostlist_dynamic; |
pehrhovey | 0:a548a085de55 | 401 | struct local_hostlist_entry *last_entry = NULL; |
pehrhovey | 0:a548a085de55 | 402 | while (entry != NULL) { |
pehrhovey | 0:a548a085de55 | 403 | if (((hostname == NULL) || !strcmp(entry->name, hostname)) && |
pehrhovey | 0:a548a085de55 | 404 | ((addr == NULL) || (entry->addr == addr->addr))) { |
pehrhovey | 0:a548a085de55 | 405 | struct local_hostlist_entry *free_entry; |
pehrhovey | 0:a548a085de55 | 406 | if (last_entry != NULL) { |
pehrhovey | 0:a548a085de55 | 407 | last_entry->next = entry->next; |
pehrhovey | 0:a548a085de55 | 408 | } else { |
pehrhovey | 0:a548a085de55 | 409 | local_hostlist_dynamic = entry->next; |
pehrhovey | 0:a548a085de55 | 410 | } |
pehrhovey | 0:a548a085de55 | 411 | free_entry = entry; |
pehrhovey | 0:a548a085de55 | 412 | entry = entry->next; |
pehrhovey | 0:a548a085de55 | 413 | mem_free(free_entry); |
pehrhovey | 0:a548a085de55 | 414 | removed++; |
pehrhovey | 0:a548a085de55 | 415 | } else { |
pehrhovey | 0:a548a085de55 | 416 | last_entry = entry; |
pehrhovey | 0:a548a085de55 | 417 | entry = entry->next; |
pehrhovey | 0:a548a085de55 | 418 | } |
pehrhovey | 0:a548a085de55 | 419 | } |
pehrhovey | 0:a548a085de55 | 420 | return removed; |
pehrhovey | 0:a548a085de55 | 421 | } |
pehrhovey | 0:a548a085de55 | 422 | |
pehrhovey | 0:a548a085de55 | 423 | /** |
pehrhovey | 0:a548a085de55 | 424 | * Add a hostname/IP address pair to the local host-list. |
pehrhovey | 0:a548a085de55 | 425 | * Duplicates are not checked. |
pehrhovey | 0:a548a085de55 | 426 | * |
pehrhovey | 0:a548a085de55 | 427 | * @param hostname hostname of the new entry |
pehrhovey | 0:a548a085de55 | 428 | * @param addr IP address of the new entry |
pehrhovey | 0:a548a085de55 | 429 | * @return ERR_OK if succeeded or ERR_MEM on memory error |
pehrhovey | 0:a548a085de55 | 430 | */ |
pehrhovey | 0:a548a085de55 | 431 | err_t |
pehrhovey | 0:a548a085de55 | 432 | dns_local_addhost(const char *hostname, const struct ip_addr *addr) |
pehrhovey | 0:a548a085de55 | 433 | { |
pehrhovey | 0:a548a085de55 | 434 | struct local_hostlist_entry *entry; |
pehrhovey | 0:a548a085de55 | 435 | entry = mem_malloc(sizeof(struct local_hostlist_entry)); |
pehrhovey | 0:a548a085de55 | 436 | if (entry == NULL) { |
pehrhovey | 0:a548a085de55 | 437 | return ERR_MEM; |
pehrhovey | 0:a548a085de55 | 438 | } |
pehrhovey | 0:a548a085de55 | 439 | entry->name = hostname; |
pehrhovey | 0:a548a085de55 | 440 | entry->addr = addr->addr; |
pehrhovey | 0:a548a085de55 | 441 | entry->next = local_hostlist_dynamic; |
pehrhovey | 0:a548a085de55 | 442 | local_hostlist_dynamic = entry; |
pehrhovey | 0:a548a085de55 | 443 | return ERR_OK; |
pehrhovey | 0:a548a085de55 | 444 | } |
pehrhovey | 0:a548a085de55 | 445 | #endif /* DNS_LOCAL_HOSTLIST_IS_DYNAMIC*/ |
pehrhovey | 0:a548a085de55 | 446 | #endif /* DNS_LOCAL_HOSTLIST */ |
pehrhovey | 0:a548a085de55 | 447 | |
pehrhovey | 0:a548a085de55 | 448 | /** |
pehrhovey | 0:a548a085de55 | 449 | * Look up a hostname in the array of known hostnames. |
pehrhovey | 0:a548a085de55 | 450 | * |
pehrhovey | 0:a548a085de55 | 451 | * @note This function only looks in the internal array of known |
pehrhovey | 0:a548a085de55 | 452 | * hostnames, it does not send out a query for the hostname if none |
pehrhovey | 0:a548a085de55 | 453 | * was found. The function dns_enqueue() can be used to send a query |
pehrhovey | 0:a548a085de55 | 454 | * for a hostname. |
pehrhovey | 0:a548a085de55 | 455 | * |
pehrhovey | 0:a548a085de55 | 456 | * @param name the hostname to look up |
pehrhovey | 0:a548a085de55 | 457 | * @return the hostname's IP address, as u32_t (instead of struct ip_addr to |
pehrhovey | 0:a548a085de55 | 458 | * better check for failure: != INADDR_NONE) or INADDR_NONE if the hostname |
pehrhovey | 0:a548a085de55 | 459 | * was not found in the cached dns_table. |
pehrhovey | 0:a548a085de55 | 460 | */ |
pehrhovey | 0:a548a085de55 | 461 | static u32_t |
pehrhovey | 0:a548a085de55 | 462 | dns_lookup(const char *name) |
pehrhovey | 0:a548a085de55 | 463 | { |
pehrhovey | 0:a548a085de55 | 464 | u8_t i; |
pehrhovey | 0:a548a085de55 | 465 | #if DNS_LOCAL_HOSTLIST || defined(DNS_LOOKUP_LOCAL_EXTERN) |
pehrhovey | 0:a548a085de55 | 466 | u32_t addr; |
pehrhovey | 0:a548a085de55 | 467 | #endif /* DNS_LOCAL_HOSTLIST || defined(DNS_LOOKUP_LOCAL_EXTERN) */ |
pehrhovey | 0:a548a085de55 | 468 | #if DNS_LOCAL_HOSTLIST |
pehrhovey | 0:a548a085de55 | 469 | if ((addr = dns_lookup_local(name)) != INADDR_NONE) { |
pehrhovey | 0:a548a085de55 | 470 | return addr; |
pehrhovey | 0:a548a085de55 | 471 | } |
pehrhovey | 0:a548a085de55 | 472 | #endif /* DNS_LOCAL_HOSTLIST */ |
pehrhovey | 0:a548a085de55 | 473 | #ifdef DNS_LOOKUP_LOCAL_EXTERN |
pehrhovey | 0:a548a085de55 | 474 | if((addr = DNS_LOOKUP_LOCAL_EXTERN(name)) != INADDR_NONE) { |
pehrhovey | 0:a548a085de55 | 475 | return addr; |
pehrhovey | 0:a548a085de55 | 476 | } |
pehrhovey | 0:a548a085de55 | 477 | #endif /* DNS_LOOKUP_LOCAL_EXTERN */ |
pehrhovey | 0:a548a085de55 | 478 | |
pehrhovey | 0:a548a085de55 | 479 | /* Walk through name list, return entry if found. If not, return NULL. */ |
pehrhovey | 0:a548a085de55 | 480 | for (i = 0; i < DNS_TABLE_SIZE; ++i) { |
pehrhovey | 0:a548a085de55 | 481 | if ((dns_table[i].state == DNS_STATE_DONE) && |
pehrhovey | 0:a548a085de55 | 482 | (strcmp(name, dns_table[i].name) == 0)) { |
pehrhovey | 0:a548a085de55 | 483 | LWIP_DEBUGF(DNS_DEBUG, ("dns_lookup: \"%s\": found = ", name)); |
pehrhovey | 0:a548a085de55 | 484 | ip_addr_debug_print(DNS_DEBUG, &(dns_table[i].ipaddr)); |
pehrhovey | 0:a548a085de55 | 485 | LWIP_DEBUGF(DNS_DEBUG, ("\n")); |
pehrhovey | 0:a548a085de55 | 486 | return dns_table[i].ipaddr.addr; |
pehrhovey | 0:a548a085de55 | 487 | } |
pehrhovey | 0:a548a085de55 | 488 | } |
pehrhovey | 0:a548a085de55 | 489 | |
pehrhovey | 0:a548a085de55 | 490 | return INADDR_NONE; |
pehrhovey | 0:a548a085de55 | 491 | } |
pehrhovey | 0:a548a085de55 | 492 | |
pehrhovey | 0:a548a085de55 | 493 | #if DNS_DOES_NAME_CHECK |
pehrhovey | 0:a548a085de55 | 494 | /** |
pehrhovey | 0:a548a085de55 | 495 | * Compare the "dotted" name "query" with the encoded name "response" |
pehrhovey | 0:a548a085de55 | 496 | * to make sure an answer from the DNS server matches the current dns_table |
pehrhovey | 0:a548a085de55 | 497 | * entry (otherwise, answers might arrive late for hostname not on the list |
pehrhovey | 0:a548a085de55 | 498 | * any more). |
pehrhovey | 0:a548a085de55 | 499 | * |
pehrhovey | 0:a548a085de55 | 500 | * @param query hostname (not encoded) from the dns_table |
pehrhovey | 0:a548a085de55 | 501 | * @param response encoded hostname in the DNS response |
pehrhovey | 0:a548a085de55 | 502 | * @return 0: names equal; 1: names differ |
pehrhovey | 0:a548a085de55 | 503 | */ |
pehrhovey | 0:a548a085de55 | 504 | static u8_t |
pehrhovey | 0:a548a085de55 | 505 | dns_compare_name(unsigned char *query, unsigned char *response) |
pehrhovey | 0:a548a085de55 | 506 | { |
pehrhovey | 0:a548a085de55 | 507 | unsigned char n; |
pehrhovey | 0:a548a085de55 | 508 | |
pehrhovey | 0:a548a085de55 | 509 | do { |
pehrhovey | 0:a548a085de55 | 510 | n = *response++; |
pehrhovey | 0:a548a085de55 | 511 | /** @see RFC 1035 - 4.1.4. Message compression */ |
pehrhovey | 0:a548a085de55 | 512 | if ((n & 0xc0) == 0xc0) { |
pehrhovey | 0:a548a085de55 | 513 | /* Compressed name */ |
pehrhovey | 0:a548a085de55 | 514 | break; |
pehrhovey | 0:a548a085de55 | 515 | } else { |
pehrhovey | 0:a548a085de55 | 516 | /* Not compressed name */ |
pehrhovey | 0:a548a085de55 | 517 | while (n > 0) { |
pehrhovey | 0:a548a085de55 | 518 | if ((*query) != (*response)) { |
pehrhovey | 0:a548a085de55 | 519 | return 1; |
pehrhovey | 0:a548a085de55 | 520 | } |
pehrhovey | 0:a548a085de55 | 521 | ++response; |
pehrhovey | 0:a548a085de55 | 522 | ++query; |
pehrhovey | 0:a548a085de55 | 523 | --n; |
pehrhovey | 0:a548a085de55 | 524 | }; |
pehrhovey | 0:a548a085de55 | 525 | ++query; |
pehrhovey | 0:a548a085de55 | 526 | } |
pehrhovey | 0:a548a085de55 | 527 | } while (*response != 0); |
pehrhovey | 0:a548a085de55 | 528 | |
pehrhovey | 0:a548a085de55 | 529 | return 0; |
pehrhovey | 0:a548a085de55 | 530 | } |
pehrhovey | 0:a548a085de55 | 531 | #endif /* DNS_DOES_NAME_CHECK */ |
pehrhovey | 0:a548a085de55 | 532 | |
pehrhovey | 0:a548a085de55 | 533 | /** |
pehrhovey | 0:a548a085de55 | 534 | * Walk through a compact encoded DNS name and return the end of the name. |
pehrhovey | 0:a548a085de55 | 535 | * |
pehrhovey | 0:a548a085de55 | 536 | * @param query encoded DNS name in the DNS server response |
pehrhovey | 0:a548a085de55 | 537 | * @return end of the name |
pehrhovey | 0:a548a085de55 | 538 | */ |
pehrhovey | 0:a548a085de55 | 539 | static unsigned char * |
pehrhovey | 0:a548a085de55 | 540 | dns_parse_name(unsigned char *query) |
pehrhovey | 0:a548a085de55 | 541 | { |
pehrhovey | 0:a548a085de55 | 542 | unsigned char n; |
pehrhovey | 0:a548a085de55 | 543 | |
pehrhovey | 0:a548a085de55 | 544 | do { |
pehrhovey | 0:a548a085de55 | 545 | n = *query++; |
pehrhovey | 0:a548a085de55 | 546 | /** @see RFC 1035 - 4.1.4. Message compression */ |
pehrhovey | 0:a548a085de55 | 547 | if ((n & 0xc0) == 0xc0) { |
pehrhovey | 0:a548a085de55 | 548 | /* Compressed name */ |
pehrhovey | 0:a548a085de55 | 549 | break; |
pehrhovey | 0:a548a085de55 | 550 | } else { |
pehrhovey | 0:a548a085de55 | 551 | /* Not compressed name */ |
pehrhovey | 0:a548a085de55 | 552 | while (n > 0) { |
pehrhovey | 0:a548a085de55 | 553 | ++query; |
pehrhovey | 0:a548a085de55 | 554 | --n; |
pehrhovey | 0:a548a085de55 | 555 | }; |
pehrhovey | 0:a548a085de55 | 556 | } |
pehrhovey | 0:a548a085de55 | 557 | } while (*query != 0); |
pehrhovey | 0:a548a085de55 | 558 | |
pehrhovey | 0:a548a085de55 | 559 | return query + 1; |
pehrhovey | 0:a548a085de55 | 560 | } |
pehrhovey | 0:a548a085de55 | 561 | |
pehrhovey | 0:a548a085de55 | 562 | /** |
pehrhovey | 0:a548a085de55 | 563 | * Send a DNS query packet. |
pehrhovey | 0:a548a085de55 | 564 | * |
pehrhovey | 0:a548a085de55 | 565 | * @param numdns index of the DNS server in the dns_servers table |
pehrhovey | 0:a548a085de55 | 566 | * @param name hostname to query |
pehrhovey | 0:a548a085de55 | 567 | * @param id index of the hostname in dns_table, used as transaction ID in the |
pehrhovey | 0:a548a085de55 | 568 | * DNS query packet |
pehrhovey | 0:a548a085de55 | 569 | * @return ERR_OK if packet is sent; an err_t indicating the problem otherwise |
pehrhovey | 0:a548a085de55 | 570 | */ |
pehrhovey | 0:a548a085de55 | 571 | static err_t |
pehrhovey | 0:a548a085de55 | 572 | dns_send(u8_t numdns, const char* name, u8_t id) |
pehrhovey | 0:a548a085de55 | 573 | { |
pehrhovey | 0:a548a085de55 | 574 | err_t err; |
pehrhovey | 0:a548a085de55 | 575 | struct dns_hdr *hdr; |
pehrhovey | 0:a548a085de55 | 576 | struct dns_query qry; |
pehrhovey | 0:a548a085de55 | 577 | struct pbuf *p; |
pehrhovey | 0:a548a085de55 | 578 | char *query, *nptr; |
pehrhovey | 0:a548a085de55 | 579 | const char *pHostname; |
pehrhovey | 0:a548a085de55 | 580 | u8_t n; |
pehrhovey | 0:a548a085de55 | 581 | |
pehrhovey | 0:a548a085de55 | 582 | LWIP_DEBUGF(DNS_DEBUG, ("dns_send: dns_servers[%"U16_F"] \"%s\": request\n", |
pehrhovey | 0:a548a085de55 | 583 | (u16_t)(numdns), name)); |
pehrhovey | 0:a548a085de55 | 584 | LWIP_ASSERT("dns server out of array", numdns < DNS_MAX_SERVERS); |
pehrhovey | 0:a548a085de55 | 585 | LWIP_ASSERT("dns server has no IP address set", dns_servers[numdns].addr != 0); |
pehrhovey | 0:a548a085de55 | 586 | |
pehrhovey | 0:a548a085de55 | 587 | /* if here, we have either a new query or a retry on a previous query to process */ |
pehrhovey | 0:a548a085de55 | 588 | p = pbuf_alloc(PBUF_TRANSPORT, SIZEOF_DNS_HDR + DNS_MAX_NAME_LENGTH + |
pehrhovey | 0:a548a085de55 | 589 | SIZEOF_DNS_QUERY, PBUF_RAM); |
pehrhovey | 0:a548a085de55 | 590 | if (p != NULL) { |
pehrhovey | 0:a548a085de55 | 591 | LWIP_ASSERT("pbuf must be in one piece", p->next == NULL); |
pehrhovey | 0:a548a085de55 | 592 | /* fill dns header */ |
pehrhovey | 0:a548a085de55 | 593 | hdr = (struct dns_hdr*)p->payload; |
pehrhovey | 0:a548a085de55 | 594 | memset(hdr, 0, SIZEOF_DNS_HDR); |
pehrhovey | 0:a548a085de55 | 595 | hdr->id = htons(id); |
pehrhovey | 0:a548a085de55 | 596 | hdr->flags1 = DNS_FLAG1_RD; |
pehrhovey | 0:a548a085de55 | 597 | hdr->numquestions = htons(1); |
pehrhovey | 0:a548a085de55 | 598 | query = (char*)hdr + SIZEOF_DNS_HDR; |
pehrhovey | 0:a548a085de55 | 599 | pHostname = name; |
pehrhovey | 0:a548a085de55 | 600 | --pHostname; |
pehrhovey | 0:a548a085de55 | 601 | |
pehrhovey | 0:a548a085de55 | 602 | /* convert hostname into suitable query format. */ |
pehrhovey | 0:a548a085de55 | 603 | do { |
pehrhovey | 0:a548a085de55 | 604 | ++pHostname; |
pehrhovey | 0:a548a085de55 | 605 | nptr = query; |
pehrhovey | 0:a548a085de55 | 606 | ++query; |
pehrhovey | 0:a548a085de55 | 607 | for(n = 0; *pHostname != '.' && *pHostname != 0; ++pHostname) { |
pehrhovey | 0:a548a085de55 | 608 | *query = *pHostname; |
pehrhovey | 0:a548a085de55 | 609 | ++query; |
pehrhovey | 0:a548a085de55 | 610 | ++n; |
pehrhovey | 0:a548a085de55 | 611 | } |
pehrhovey | 0:a548a085de55 | 612 | *nptr = n; |
pehrhovey | 0:a548a085de55 | 613 | } while(*pHostname != 0); |
pehrhovey | 0:a548a085de55 | 614 | *query++='\0'; |
pehrhovey | 0:a548a085de55 | 615 | |
pehrhovey | 0:a548a085de55 | 616 | /* fill dns query */ |
pehrhovey | 0:a548a085de55 | 617 | qry.type = htons(DNS_RRTYPE_A); |
pehrhovey | 0:a548a085de55 | 618 | qry.class = htons(DNS_RRCLASS_IN); |
pehrhovey | 0:a548a085de55 | 619 | MEMCPY( query, &qry, SIZEOF_DNS_QUERY); |
pehrhovey | 0:a548a085de55 | 620 | |
pehrhovey | 0:a548a085de55 | 621 | /* resize pbuf to the exact dns query */ |
pehrhovey | 0:a548a085de55 | 622 | pbuf_realloc(p, (query + SIZEOF_DNS_QUERY) - ((char*)(p->payload))); |
pehrhovey | 0:a548a085de55 | 623 | |
pehrhovey | 0:a548a085de55 | 624 | /* connect to the server for faster receiving */ |
pehrhovey | 0:a548a085de55 | 625 | udp_connect(dns_pcb, &dns_servers[numdns], DNS_SERVER_PORT); |
pehrhovey | 0:a548a085de55 | 626 | /* send dns packet */ |
pehrhovey | 0:a548a085de55 | 627 | err = udp_sendto(dns_pcb, p, &dns_servers[numdns], DNS_SERVER_PORT); |
pehrhovey | 0:a548a085de55 | 628 | |
pehrhovey | 0:a548a085de55 | 629 | /* free pbuf */ |
pehrhovey | 0:a548a085de55 | 630 | pbuf_free(p); |
pehrhovey | 0:a548a085de55 | 631 | } else { |
pehrhovey | 0:a548a085de55 | 632 | err = ERR_MEM; |
pehrhovey | 0:a548a085de55 | 633 | } |
pehrhovey | 0:a548a085de55 | 634 | |
pehrhovey | 0:a548a085de55 | 635 | return err; |
pehrhovey | 0:a548a085de55 | 636 | } |
pehrhovey | 0:a548a085de55 | 637 | |
pehrhovey | 0:a548a085de55 | 638 | /** |
pehrhovey | 0:a548a085de55 | 639 | * dns_check_entry() - see if pEntry has not yet been queried and, if so, sends out a query. |
pehrhovey | 0:a548a085de55 | 640 | * Check an entry in the dns_table: |
pehrhovey | 0:a548a085de55 | 641 | * - send out query for new entries |
pehrhovey | 0:a548a085de55 | 642 | * - retry old pending entries on timeout (also with different servers) |
pehrhovey | 0:a548a085de55 | 643 | * - remove completed entries from the table if their TTL has expired |
pehrhovey | 0:a548a085de55 | 644 | * |
pehrhovey | 0:a548a085de55 | 645 | * @param i index of the dns_table entry to check |
pehrhovey | 0:a548a085de55 | 646 | */ |
pehrhovey | 0:a548a085de55 | 647 | static void |
pehrhovey | 0:a548a085de55 | 648 | dns_check_entry(u8_t i) |
pehrhovey | 0:a548a085de55 | 649 | { |
pehrhovey | 0:a548a085de55 | 650 | struct dns_table_entry *pEntry = &dns_table[i]; |
pehrhovey | 0:a548a085de55 | 651 | |
pehrhovey | 0:a548a085de55 | 652 | LWIP_ASSERT("array index out of bounds", i < DNS_TABLE_SIZE); |
pehrhovey | 0:a548a085de55 | 653 | |
pehrhovey | 0:a548a085de55 | 654 | switch(pEntry->state) { |
pehrhovey | 0:a548a085de55 | 655 | |
pehrhovey | 0:a548a085de55 | 656 | case DNS_STATE_NEW: { |
pehrhovey | 0:a548a085de55 | 657 | /* initialize new entry */ |
pehrhovey | 0:a548a085de55 | 658 | pEntry->state = DNS_STATE_ASKING; |
pehrhovey | 0:a548a085de55 | 659 | pEntry->numdns = 0; |
pehrhovey | 0:a548a085de55 | 660 | pEntry->tmr = 1; |
pehrhovey | 0:a548a085de55 | 661 | pEntry->retries = 0; |
pehrhovey | 0:a548a085de55 | 662 | |
pehrhovey | 0:a548a085de55 | 663 | /* send DNS packet for this entry */ |
pehrhovey | 0:a548a085de55 | 664 | dns_send(pEntry->numdns, pEntry->name, i); |
pehrhovey | 0:a548a085de55 | 665 | break; |
pehrhovey | 0:a548a085de55 | 666 | } |
pehrhovey | 0:a548a085de55 | 667 | |
pehrhovey | 0:a548a085de55 | 668 | case DNS_STATE_ASKING: { |
pehrhovey | 0:a548a085de55 | 669 | if (--pEntry->tmr == 0) { |
pehrhovey | 0:a548a085de55 | 670 | if (++pEntry->retries == DNS_MAX_RETRIES) { |
pehrhovey | 0:a548a085de55 | 671 | if ((pEntry->numdns+1<DNS_MAX_SERVERS) && (dns_servers[pEntry->numdns+1].addr!=0)) { |
pehrhovey | 0:a548a085de55 | 672 | /* change of server */ |
pehrhovey | 0:a548a085de55 | 673 | pEntry->numdns++; |
pehrhovey | 0:a548a085de55 | 674 | pEntry->tmr = 1; |
pehrhovey | 0:a548a085de55 | 675 | pEntry->retries = 0; |
pehrhovey | 0:a548a085de55 | 676 | break; |
pehrhovey | 0:a548a085de55 | 677 | } else { |
pehrhovey | 0:a548a085de55 | 678 | LWIP_DEBUGF(DNS_DEBUG, ("dns_check_entry: \"%s\": timeout\n", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 679 | /* call specified callback function if provided */ |
pehrhovey | 0:a548a085de55 | 680 | if (pEntry->found) |
pehrhovey | 0:a548a085de55 | 681 | (*pEntry->found)(pEntry->name, NULL, pEntry->arg); |
pehrhovey | 0:a548a085de55 | 682 | /* flush this entry */ |
pehrhovey | 0:a548a085de55 | 683 | pEntry->state = DNS_STATE_UNUSED; |
pehrhovey | 0:a548a085de55 | 684 | pEntry->found = NULL; |
pehrhovey | 0:a548a085de55 | 685 | break; |
pehrhovey | 0:a548a085de55 | 686 | } |
pehrhovey | 0:a548a085de55 | 687 | } |
pehrhovey | 0:a548a085de55 | 688 | |
pehrhovey | 0:a548a085de55 | 689 | /* wait longer for the next retry */ |
pehrhovey | 0:a548a085de55 | 690 | pEntry->tmr = pEntry->retries; |
pehrhovey | 0:a548a085de55 | 691 | |
pehrhovey | 0:a548a085de55 | 692 | /* send DNS packet for this entry */ |
pehrhovey | 0:a548a085de55 | 693 | dns_send(pEntry->numdns, pEntry->name, i); |
pehrhovey | 0:a548a085de55 | 694 | } |
pehrhovey | 0:a548a085de55 | 695 | break; |
pehrhovey | 0:a548a085de55 | 696 | } |
pehrhovey | 0:a548a085de55 | 697 | |
pehrhovey | 0:a548a085de55 | 698 | case DNS_STATE_DONE: { |
pehrhovey | 0:a548a085de55 | 699 | /* if the time to live is nul */ |
pehrhovey | 0:a548a085de55 | 700 | if (--pEntry->ttl == 0) { |
pehrhovey | 0:a548a085de55 | 701 | LWIP_DEBUGF(DNS_DEBUG, ("dns_check_entry: \"%s\": flush\n", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 702 | /* flush this entry */ |
pehrhovey | 0:a548a085de55 | 703 | pEntry->state = DNS_STATE_UNUSED; |
pehrhovey | 0:a548a085de55 | 704 | pEntry->found = NULL; |
pehrhovey | 0:a548a085de55 | 705 | } |
pehrhovey | 0:a548a085de55 | 706 | break; |
pehrhovey | 0:a548a085de55 | 707 | } |
pehrhovey | 0:a548a085de55 | 708 | case DNS_STATE_UNUSED: |
pehrhovey | 0:a548a085de55 | 709 | /* nothing to do */ |
pehrhovey | 0:a548a085de55 | 710 | break; |
pehrhovey | 0:a548a085de55 | 711 | default: |
pehrhovey | 0:a548a085de55 | 712 | LWIP_ASSERT("unknown dns_table entry state:", 0); |
pehrhovey | 0:a548a085de55 | 713 | break; |
pehrhovey | 0:a548a085de55 | 714 | } |
pehrhovey | 0:a548a085de55 | 715 | } |
pehrhovey | 0:a548a085de55 | 716 | |
pehrhovey | 0:a548a085de55 | 717 | /** |
pehrhovey | 0:a548a085de55 | 718 | * Call dns_check_entry for each entry in dns_table - check all entries. |
pehrhovey | 0:a548a085de55 | 719 | */ |
pehrhovey | 0:a548a085de55 | 720 | static void |
pehrhovey | 0:a548a085de55 | 721 | dns_check_entries(void) |
pehrhovey | 0:a548a085de55 | 722 | { |
pehrhovey | 0:a548a085de55 | 723 | u8_t i; |
pehrhovey | 0:a548a085de55 | 724 | |
pehrhovey | 0:a548a085de55 | 725 | for (i = 0; i < DNS_TABLE_SIZE; ++i) { |
pehrhovey | 0:a548a085de55 | 726 | dns_check_entry(i); |
pehrhovey | 0:a548a085de55 | 727 | } |
pehrhovey | 0:a548a085de55 | 728 | } |
pehrhovey | 0:a548a085de55 | 729 | |
pehrhovey | 0:a548a085de55 | 730 | /** |
pehrhovey | 0:a548a085de55 | 731 | * Receive input function for DNS response packets arriving for the dns UDP pcb. |
pehrhovey | 0:a548a085de55 | 732 | * |
pehrhovey | 0:a548a085de55 | 733 | * @params see udp.h |
pehrhovey | 0:a548a085de55 | 734 | */ |
pehrhovey | 0:a548a085de55 | 735 | static void |
pehrhovey | 0:a548a085de55 | 736 | dns_recv(void *arg, struct udp_pcb *pcb, struct pbuf *p, struct ip_addr *addr, u16_t port) |
pehrhovey | 0:a548a085de55 | 737 | { |
pehrhovey | 0:a548a085de55 | 738 | u8_t i; |
pehrhovey | 0:a548a085de55 | 739 | char *pHostname; |
pehrhovey | 0:a548a085de55 | 740 | struct dns_hdr *hdr; |
pehrhovey | 0:a548a085de55 | 741 | struct dns_answer ans; |
pehrhovey | 0:a548a085de55 | 742 | struct dns_table_entry *pEntry; |
pehrhovey | 0:a548a085de55 | 743 | u8_t nquestions, nanswers; |
pehrhovey | 0:a548a085de55 | 744 | #if (DNS_USES_STATIC_BUF == 0) |
pehrhovey | 0:a548a085de55 | 745 | u8_t dns_payload[DNS_MSG_SIZE]; |
pehrhovey | 0:a548a085de55 | 746 | #endif /* (DNS_USES_STATIC_BUF == 0) */ |
pehrhovey | 0:a548a085de55 | 747 | #if (DNS_USES_STATIC_BUF == 2) |
pehrhovey | 0:a548a085de55 | 748 | u8_t* dns_payload; |
pehrhovey | 0:a548a085de55 | 749 | #endif /* (DNS_USES_STATIC_BUF == 2) */ |
pehrhovey | 0:a548a085de55 | 750 | |
pehrhovey | 0:a548a085de55 | 751 | LWIP_UNUSED_ARG(arg); |
pehrhovey | 0:a548a085de55 | 752 | LWIP_UNUSED_ARG(pcb); |
pehrhovey | 0:a548a085de55 | 753 | LWIP_UNUSED_ARG(addr); |
pehrhovey | 0:a548a085de55 | 754 | LWIP_UNUSED_ARG(port); |
pehrhovey | 0:a548a085de55 | 755 | |
pehrhovey | 0:a548a085de55 | 756 | /* is the dns message too big ? */ |
pehrhovey | 0:a548a085de55 | 757 | if (p->tot_len > DNS_MSG_SIZE) { |
pehrhovey | 0:a548a085de55 | 758 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: pbuf too big\n")); |
pehrhovey | 0:a548a085de55 | 759 | /* free pbuf and return */ |
pehrhovey | 0:a548a085de55 | 760 | goto memerr1; |
pehrhovey | 0:a548a085de55 | 761 | } |
pehrhovey | 0:a548a085de55 | 762 | |
pehrhovey | 0:a548a085de55 | 763 | /* is the dns message big enough ? */ |
pehrhovey | 0:a548a085de55 | 764 | if (p->tot_len < (SIZEOF_DNS_HDR + SIZEOF_DNS_QUERY + SIZEOF_DNS_ANSWER)) { |
pehrhovey | 0:a548a085de55 | 765 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: pbuf too small\n")); |
pehrhovey | 0:a548a085de55 | 766 | /* free pbuf and return */ |
pehrhovey | 0:a548a085de55 | 767 | goto memerr1; |
pehrhovey | 0:a548a085de55 | 768 | } |
pehrhovey | 0:a548a085de55 | 769 | |
pehrhovey | 0:a548a085de55 | 770 | #if (DNS_USES_STATIC_BUF == 2) |
pehrhovey | 0:a548a085de55 | 771 | dns_payload = mem_malloc(p->tot_len); |
pehrhovey | 0:a548a085de55 | 772 | if (dns_payload == NULL) { |
pehrhovey | 0:a548a085de55 | 773 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: mem_malloc error\n")); |
pehrhovey | 0:a548a085de55 | 774 | /* free pbuf and return */ |
pehrhovey | 0:a548a085de55 | 775 | goto memerr1; |
pehrhovey | 0:a548a085de55 | 776 | } |
pehrhovey | 0:a548a085de55 | 777 | #endif /* (DNS_USES_STATIC_BUF == 2) */ |
pehrhovey | 0:a548a085de55 | 778 | |
pehrhovey | 0:a548a085de55 | 779 | /* copy dns payload inside static buffer for processing */ |
pehrhovey | 0:a548a085de55 | 780 | if (pbuf_copy_partial(p, dns_payload, p->tot_len, 0) == p->tot_len) { |
pehrhovey | 0:a548a085de55 | 781 | /* The ID in the DNS header should be our entry into the name table. */ |
pehrhovey | 0:a548a085de55 | 782 | hdr = (struct dns_hdr*)dns_payload; |
pehrhovey | 0:a548a085de55 | 783 | i = htons(hdr->id); |
pehrhovey | 0:a548a085de55 | 784 | if (i < DNS_TABLE_SIZE) { |
pehrhovey | 0:a548a085de55 | 785 | pEntry = &dns_table[i]; |
pehrhovey | 0:a548a085de55 | 786 | if(pEntry->state == DNS_STATE_ASKING) { |
pehrhovey | 0:a548a085de55 | 787 | /* This entry is now completed. */ |
pehrhovey | 0:a548a085de55 | 788 | pEntry->state = DNS_STATE_DONE; |
pehrhovey | 0:a548a085de55 | 789 | pEntry->err = hdr->flags2 & DNS_FLAG2_ERR_MASK; |
pehrhovey | 0:a548a085de55 | 790 | |
pehrhovey | 0:a548a085de55 | 791 | /* We only care about the question(s) and the answers. The authrr |
pehrhovey | 0:a548a085de55 | 792 | and the extrarr are simply discarded. */ |
pehrhovey | 0:a548a085de55 | 793 | nquestions = htons(hdr->numquestions); |
pehrhovey | 0:a548a085de55 | 794 | nanswers = htons(hdr->numanswers); |
pehrhovey | 0:a548a085de55 | 795 | |
pehrhovey | 0:a548a085de55 | 796 | /* Check for error. If so, call callback to inform. */ |
pehrhovey | 0:a548a085de55 | 797 | if (((hdr->flags1 & DNS_FLAG1_RESPONSE) == 0) || (pEntry->err != 0) || (nquestions != 1)) { |
pehrhovey | 0:a548a085de55 | 798 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: \"%s\": error in flags\n", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 799 | /* call callback to indicate error, clean up memory and return */ |
pehrhovey | 0:a548a085de55 | 800 | goto responseerr; |
pehrhovey | 0:a548a085de55 | 801 | } |
pehrhovey | 0:a548a085de55 | 802 | |
pehrhovey | 0:a548a085de55 | 803 | #if DNS_DOES_NAME_CHECK |
pehrhovey | 0:a548a085de55 | 804 | /* Check if the name in the "question" part match with the name in the entry. */ |
pehrhovey | 0:a548a085de55 | 805 | if (dns_compare_name((unsigned char *)(pEntry->name), (unsigned char *)dns_payload + SIZEOF_DNS_HDR) != 0) { |
pehrhovey | 0:a548a085de55 | 806 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: \"%s\": response not match to query\n", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 807 | /* call callback to indicate error, clean up memory and return */ |
pehrhovey | 0:a548a085de55 | 808 | goto responseerr; |
pehrhovey | 0:a548a085de55 | 809 | } |
pehrhovey | 0:a548a085de55 | 810 | #endif /* DNS_DOES_NAME_CHECK */ |
pehrhovey | 0:a548a085de55 | 811 | |
pehrhovey | 0:a548a085de55 | 812 | /* Skip the name in the "question" part */ |
pehrhovey | 0:a548a085de55 | 813 | pHostname = (char *) dns_parse_name((unsigned char *)dns_payload + SIZEOF_DNS_HDR) + SIZEOF_DNS_QUERY; |
pehrhovey | 0:a548a085de55 | 814 | |
pehrhovey | 0:a548a085de55 | 815 | while(nanswers > 0) { |
pehrhovey | 0:a548a085de55 | 816 | /* skip answer resource record's host name */ |
pehrhovey | 0:a548a085de55 | 817 | pHostname = (char *) dns_parse_name((unsigned char *)pHostname); |
pehrhovey | 0:a548a085de55 | 818 | |
pehrhovey | 0:a548a085de55 | 819 | /* Check for IP address type and Internet class. Others are discarded. */ |
pehrhovey | 0:a548a085de55 | 820 | MEMCPY(&ans, pHostname, SIZEOF_DNS_ANSWER); |
pehrhovey | 0:a548a085de55 | 821 | if((ntohs(ans.type) == DNS_RRTYPE_A) && (ntohs(ans.class) == DNS_RRCLASS_IN) && (ntohs(ans.len) == sizeof(struct ip_addr)) ) { |
pehrhovey | 0:a548a085de55 | 822 | /* read the answer resource record's TTL, and maximize it if needed */ |
pehrhovey | 0:a548a085de55 | 823 | pEntry->ttl = ntohl(ans.ttl); |
pehrhovey | 0:a548a085de55 | 824 | if (pEntry->ttl > DNS_MAX_TTL) { |
pehrhovey | 0:a548a085de55 | 825 | pEntry->ttl = DNS_MAX_TTL; |
pehrhovey | 0:a548a085de55 | 826 | } |
pehrhovey | 0:a548a085de55 | 827 | /* read the IP address after answer resource record's header */ |
pehrhovey | 0:a548a085de55 | 828 | MEMCPY( &(pEntry->ipaddr), (pHostname+SIZEOF_DNS_ANSWER), sizeof(struct ip_addr)); |
pehrhovey | 0:a548a085de55 | 829 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: \"%s\": response = ", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 830 | ip_addr_debug_print(DNS_DEBUG, (&(pEntry->ipaddr))); |
pehrhovey | 0:a548a085de55 | 831 | LWIP_DEBUGF(DNS_DEBUG, ("\n")); |
pehrhovey | 0:a548a085de55 | 832 | /* call specified callback function if provided */ |
pehrhovey | 0:a548a085de55 | 833 | if (pEntry->found) { |
pehrhovey | 0:a548a085de55 | 834 | (*pEntry->found)(pEntry->name, &pEntry->ipaddr, pEntry->arg); |
pehrhovey | 0:a548a085de55 | 835 | } |
pehrhovey | 0:a548a085de55 | 836 | /* deallocate memory and return */ |
pehrhovey | 0:a548a085de55 | 837 | goto memerr2; |
pehrhovey | 0:a548a085de55 | 838 | } else { |
pehrhovey | 0:a548a085de55 | 839 | pHostname = pHostname + SIZEOF_DNS_ANSWER + htons(ans.len); |
pehrhovey | 0:a548a085de55 | 840 | } |
pehrhovey | 0:a548a085de55 | 841 | --nanswers; |
pehrhovey | 0:a548a085de55 | 842 | } |
pehrhovey | 0:a548a085de55 | 843 | LWIP_DEBUGF(DNS_DEBUG, ("dns_recv: \"%s\": error in response\n", pEntry->name)); |
pehrhovey | 0:a548a085de55 | 844 | /* call callback to indicate error, clean up memory and return */ |
pehrhovey | 0:a548a085de55 | 845 | goto responseerr; |
pehrhovey | 0:a548a085de55 | 846 | } |
pehrhovey | 0:a548a085de55 | 847 | } |
pehrhovey | 0:a548a085de55 | 848 | } |
pehrhovey | 0:a548a085de55 | 849 | |
pehrhovey | 0:a548a085de55 | 850 | /* deallocate memory and return */ |
pehrhovey | 0:a548a085de55 | 851 | goto memerr2; |
pehrhovey | 0:a548a085de55 | 852 | |
pehrhovey | 0:a548a085de55 | 853 | responseerr: |
pehrhovey | 0:a548a085de55 | 854 | /* ERROR: call specified callback function with NULL as name to indicate an error */ |
pehrhovey | 0:a548a085de55 | 855 | if (pEntry->found) { |
pehrhovey | 0:a548a085de55 | 856 | (*pEntry->found)(pEntry->name, NULL, pEntry->arg); |
pehrhovey | 0:a548a085de55 | 857 | } |
pehrhovey | 0:a548a085de55 | 858 | /* flush this entry */ |
pehrhovey | 0:a548a085de55 | 859 | pEntry->state = DNS_STATE_UNUSED; |
pehrhovey | 0:a548a085de55 | 860 | pEntry->found = NULL; |
pehrhovey | 0:a548a085de55 | 861 | |
pehrhovey | 0:a548a085de55 | 862 | memerr2: |
pehrhovey | 0:a548a085de55 | 863 | #if (DNS_USES_STATIC_BUF == 2) |
pehrhovey | 0:a548a085de55 | 864 | /* free dns buffer */ |
pehrhovey | 0:a548a085de55 | 865 | mem_free(dns_payload); |
pehrhovey | 0:a548a085de55 | 866 | #endif /* (DNS_USES_STATIC_BUF == 2) */ |
pehrhovey | 0:a548a085de55 | 867 | |
pehrhovey | 0:a548a085de55 | 868 | memerr1: |
pehrhovey | 0:a548a085de55 | 869 | /* free pbuf */ |
pehrhovey | 0:a548a085de55 | 870 | pbuf_free(p); |
pehrhovey | 0:a548a085de55 | 871 | return; |
pehrhovey | 0:a548a085de55 | 872 | } |
pehrhovey | 0:a548a085de55 | 873 | |
pehrhovey | 0:a548a085de55 | 874 | /** |
pehrhovey | 0:a548a085de55 | 875 | * Queues a new hostname to resolve and sends out a DNS query for that hostname |
pehrhovey | 0:a548a085de55 | 876 | * |
pehrhovey | 0:a548a085de55 | 877 | * @param name the hostname that is to be queried |
pehrhovey | 0:a548a085de55 | 878 | * @param found a callback founction to be called on success, failure or timeout |
pehrhovey | 0:a548a085de55 | 879 | * @param callback_arg argument to pass to the callback function |
pehrhovey | 0:a548a085de55 | 880 | * @return @return a err_t return code. |
pehrhovey | 0:a548a085de55 | 881 | */ |
pehrhovey | 0:a548a085de55 | 882 | static err_t |
pehrhovey | 0:a548a085de55 | 883 | dns_enqueue(const char *name, dns_found_callback found, void *callback_arg) |
pehrhovey | 0:a548a085de55 | 884 | { |
pehrhovey | 0:a548a085de55 | 885 | u8_t i; |
pehrhovey | 0:a548a085de55 | 886 | u8_t lseq, lseqi; |
pehrhovey | 0:a548a085de55 | 887 | struct dns_table_entry *pEntry = NULL; |
pehrhovey | 0:a548a085de55 | 888 | |
pehrhovey | 0:a548a085de55 | 889 | /* search an unused entry, or the oldest one */ |
pehrhovey | 0:a548a085de55 | 890 | lseq = lseqi = 0; |
pehrhovey | 0:a548a085de55 | 891 | for (i = 0; i < DNS_TABLE_SIZE; ++i) { |
pehrhovey | 0:a548a085de55 | 892 | pEntry = &dns_table[i]; |
pehrhovey | 0:a548a085de55 | 893 | /* is it an unused entry ? */ |
pehrhovey | 0:a548a085de55 | 894 | if (pEntry->state == DNS_STATE_UNUSED) |
pehrhovey | 0:a548a085de55 | 895 | break; |
pehrhovey | 0:a548a085de55 | 896 | |
pehrhovey | 0:a548a085de55 | 897 | /* check if this is the oldest completed entry */ |
pehrhovey | 0:a548a085de55 | 898 | if (pEntry->state == DNS_STATE_DONE) { |
pehrhovey | 0:a548a085de55 | 899 | if ((dns_seqno - pEntry->seqno) > lseq) { |
pehrhovey | 0:a548a085de55 | 900 | lseq = dns_seqno - pEntry->seqno; |
pehrhovey | 0:a548a085de55 | 901 | lseqi = i; |
pehrhovey | 0:a548a085de55 | 902 | } |
pehrhovey | 0:a548a085de55 | 903 | } |
pehrhovey | 0:a548a085de55 | 904 | } |
pehrhovey | 0:a548a085de55 | 905 | |
pehrhovey | 0:a548a085de55 | 906 | /* if we don't have found an unused entry, use the oldest completed one */ |
pehrhovey | 0:a548a085de55 | 907 | if (i == DNS_TABLE_SIZE) { |
pehrhovey | 0:a548a085de55 | 908 | if ((lseqi >= DNS_TABLE_SIZE) || (dns_table[lseqi].state != DNS_STATE_DONE)) { |
pehrhovey | 0:a548a085de55 | 909 | /* no entry can't be used now, table is full */ |
pehrhovey | 0:a548a085de55 | 910 | LWIP_DEBUGF(DNS_DEBUG, ("dns_enqueue: \"%s\": DNS entries table is full\n", name)); |
pehrhovey | 0:a548a085de55 | 911 | return ERR_MEM; |
pehrhovey | 0:a548a085de55 | 912 | } else { |
pehrhovey | 0:a548a085de55 | 913 | /* use the oldest completed one */ |
pehrhovey | 0:a548a085de55 | 914 | i = lseqi; |
pehrhovey | 0:a548a085de55 | 915 | pEntry = &dns_table[i]; |
pehrhovey | 0:a548a085de55 | 916 | } |
pehrhovey | 0:a548a085de55 | 917 | } |
pehrhovey | 0:a548a085de55 | 918 | |
pehrhovey | 0:a548a085de55 | 919 | /* use this entry */ |
pehrhovey | 0:a548a085de55 | 920 | LWIP_DEBUGF(DNS_DEBUG, ("dns_enqueue: \"%s\": use DNS entry %"U16_F"\n", name, (u16_t)(i))); |
pehrhovey | 0:a548a085de55 | 921 | |
pehrhovey | 0:a548a085de55 | 922 | /* fill the entry */ |
pehrhovey | 0:a548a085de55 | 923 | pEntry->state = DNS_STATE_NEW; |
pehrhovey | 0:a548a085de55 | 924 | pEntry->seqno = dns_seqno++; |
pehrhovey | 0:a548a085de55 | 925 | pEntry->found = found; |
pehrhovey | 0:a548a085de55 | 926 | pEntry->arg = callback_arg; |
pehrhovey | 0:a548a085de55 | 927 | strcpy(pEntry->name, name); |
pehrhovey | 0:a548a085de55 | 928 | |
pehrhovey | 0:a548a085de55 | 929 | /* force to send query without waiting timer */ |
pehrhovey | 0:a548a085de55 | 930 | dns_check_entry(i); |
pehrhovey | 0:a548a085de55 | 931 | |
pehrhovey | 0:a548a085de55 | 932 | /* dns query is enqueued */ |
pehrhovey | 0:a548a085de55 | 933 | return ERR_INPROGRESS; |
pehrhovey | 0:a548a085de55 | 934 | } |
pehrhovey | 0:a548a085de55 | 935 | |
pehrhovey | 0:a548a085de55 | 936 | /** |
pehrhovey | 0:a548a085de55 | 937 | * Resolve a hostname (string) into an IP address. |
pehrhovey | 0:a548a085de55 | 938 | * NON-BLOCKING callback version for use with raw API!!! |
pehrhovey | 0:a548a085de55 | 939 | * |
pehrhovey | 0:a548a085de55 | 940 | * Returns immediately with one of err_t return codes: |
pehrhovey | 0:a548a085de55 | 941 | * - ERR_OK if hostname is a valid IP address string or the host |
pehrhovey | 0:a548a085de55 | 942 | * name is already in the local names table. |
pehrhovey | 0:a548a085de55 | 943 | * - ERR_INPROGRESS enqueue a request to be sent to the DNS server |
pehrhovey | 0:a548a085de55 | 944 | * for resolution if no errors are present. |
pehrhovey | 0:a548a085de55 | 945 | * |
pehrhovey | 0:a548a085de55 | 946 | * @param hostname the hostname that is to be queried |
pehrhovey | 0:a548a085de55 | 947 | * @param addr pointer to a struct ip_addr where to store the address if it is already |
pehrhovey | 0:a548a085de55 | 948 | * cached in the dns_table (only valid if ERR_OK is returned!) |
pehrhovey | 0:a548a085de55 | 949 | * @param found a callback function to be called on success, failure or timeout (only if |
pehrhovey | 0:a548a085de55 | 950 | * ERR_INPROGRESS is returned!) |
pehrhovey | 0:a548a085de55 | 951 | * @param callback_arg argument to pass to the callback function |
pehrhovey | 0:a548a085de55 | 952 | * @return a err_t return code. |
pehrhovey | 0:a548a085de55 | 953 | */ |
pehrhovey | 0:a548a085de55 | 954 | err_t |
pehrhovey | 0:a548a085de55 | 955 | dns_gethostbyname(const char *hostname, struct ip_addr *addr, dns_found_callback found, |
pehrhovey | 0:a548a085de55 | 956 | void *callback_arg) |
pehrhovey | 0:a548a085de55 | 957 | { |
pehrhovey | 0:a548a085de55 | 958 | /* not initialized or no valid server yet, or invalid addr pointer |
pehrhovey | 0:a548a085de55 | 959 | * or invalid hostname or invalid hostname length */ |
pehrhovey | 0:a548a085de55 | 960 | if ((dns_pcb == NULL) || (addr == NULL) || |
pehrhovey | 0:a548a085de55 | 961 | (!hostname) || (!hostname[0]) || |
pehrhovey | 0:a548a085de55 | 962 | (strlen(hostname) >= DNS_MAX_NAME_LENGTH)) { |
pehrhovey | 0:a548a085de55 | 963 | return ERR_VAL; |
pehrhovey | 0:a548a085de55 | 964 | } |
pehrhovey | 0:a548a085de55 | 965 | |
pehrhovey | 0:a548a085de55 | 966 | #if LWIP_HAVE_LOOPIF |
pehrhovey | 0:a548a085de55 | 967 | if (strcmp(hostname,"localhost")==0) { |
pehrhovey | 0:a548a085de55 | 968 | addr->addr = htonl(INADDR_LOOPBACK); |
pehrhovey | 0:a548a085de55 | 969 | return ERR_OK; |
pehrhovey | 0:a548a085de55 | 970 | } |
pehrhovey | 0:a548a085de55 | 971 | #endif /* LWIP_HAVE_LOOPIF */ |
pehrhovey | 0:a548a085de55 | 972 | |
pehrhovey | 0:a548a085de55 | 973 | /* host name already in octet notation? set ip addr and return ERR_OK |
pehrhovey | 0:a548a085de55 | 974 | * already have this address cached? */ |
pehrhovey | 0:a548a085de55 | 975 | if (((addr->addr = inet_addr(hostname)) != INADDR_NONE) || |
pehrhovey | 0:a548a085de55 | 976 | ((addr->addr = dns_lookup(hostname)) != INADDR_NONE)) { |
pehrhovey | 0:a548a085de55 | 977 | return ERR_OK; |
pehrhovey | 0:a548a085de55 | 978 | } |
pehrhovey | 0:a548a085de55 | 979 | |
pehrhovey | 0:a548a085de55 | 980 | /* queue query with specified callback */ |
pehrhovey | 0:a548a085de55 | 981 | return dns_enqueue(hostname, found, callback_arg); |
pehrhovey | 0:a548a085de55 | 982 | } |
pehrhovey | 0:a548a085de55 | 983 | |
pehrhovey | 0:a548a085de55 | 984 | #endif /* LWIP_DNS */ |