Annotation of embedaddon/libevent/test/regress_dns.c, revision 1.1.1.1

1.1       misho       1: /*
                      2:  * Copyright (c) 2003-2006 Niels Provos <provos@citi.umich.edu>
                      3:  * All rights reserved.
                      4:  *
                      5:  * Redistribution and use in source and binary forms, with or without
                      6:  * modification, are permitted provided that the following conditions
                      7:  * are met:
                      8:  * 1. Redistributions of source code must retain the above copyright
                      9:  *    notice, this list of conditions and the following disclaimer.
                     10:  * 2. Redistributions in binary form must reproduce the above copyright
                     11:  *    notice, this list of conditions and the following disclaimer in the
                     12:  *    documentation and/or other materials provided with the distribution.
                     13:  * 3. The name of the author may not be used to endorse or promote products
                     14:  *    derived from this software without specific prior written permission.
                     15:  *
                     16:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
                     17:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
                     18:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
                     19:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
                     20:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
                     21:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
                     22:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
                     23:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
                     24:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
                     25:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
                     26:  */
                     27: 
                     28: #ifdef WIN32
                     29: #include <winsock2.h>
                     30: #include <windows.h>
                     31: #endif
                     32: 
                     33: #ifdef HAVE_CONFIG_H
                     34: #include "config.h"
                     35: #endif
                     36: 
                     37: #include <sys/types.h>
                     38: #include <sys/stat.h>
                     39: #ifdef HAVE_SYS_TIME_H
                     40: #include <sys/time.h>
                     41: #endif
                     42: #include <sys/queue.h>
                     43: #ifndef WIN32
                     44: #include <sys/socket.h>
                     45: #include <signal.h>
                     46: #include <netinet/in.h>
                     47: #include <arpa/inet.h>
                     48: #include <unistd.h>
                     49: #endif
                     50: #ifdef HAVE_NETINET_IN6_H
                     51: #include <netinet/in6.h>
                     52: #endif
                     53: #ifdef HAVE_NETDB_H
                     54: #include <netdb.h>
                     55: #endif
                     56: #include <fcntl.h>
                     57: #include <stdlib.h>
                     58: #include <stdio.h>
                     59: #include <string.h>
                     60: #include <errno.h>
                     61: 
                     62: #include "event.h"
                     63: #include "evdns.h"
                     64: #include "log.h"
                     65: 
                     66: static int dns_ok = 0;
                     67: static int dns_err = 0;
                     68: 
                     69: void dns_suite(void);
                     70: 
                     71: static void
                     72: dns_gethostbyname_cb(int result, char type, int count, int ttl,
                     73:     void *addresses, void *arg)
                     74: {
                     75:        dns_ok = dns_err = 0;
                     76: 
                     77:        if (result == DNS_ERR_TIMEOUT) {
                     78:                fprintf(stdout, "[Timed out] ");
                     79:                dns_err = result;
                     80:                goto out;
                     81:        }
                     82: 
                     83:        if (result != DNS_ERR_NONE) {
                     84:                fprintf(stdout, "[Error code %d] ", result);
                     85:                goto out;
                     86:        }
                     87: 
                     88:        fprintf(stderr, "type: %d, count: %d, ttl: %d: ", type, count, ttl);
                     89: 
                     90:        switch (type) {
                     91:        case DNS_IPv6_AAAA: {
                     92: #if defined(HAVE_STRUCT_IN6_ADDR) && defined(HAVE_INET_NTOP) && defined(INET6_ADDRSTRLEN)
                     93:                struct in6_addr *in6_addrs = addresses;
                     94:                char buf[INET6_ADDRSTRLEN+1];
                     95:                int i;
                     96:                /* a resolution that's not valid does not help */
                     97:                if (ttl < 0)
                     98:                        goto out;
                     99:                for (i = 0; i < count; ++i) {
                    100:                        const char *b = inet_ntop(AF_INET6, &in6_addrs[i], buf,sizeof(buf));
                    101:                        if (b)
                    102:                                fprintf(stderr, "%s ", b);
                    103:                        else
                    104:                                fprintf(stderr, "%s ", strerror(errno));
                    105:                }
                    106: #endif
                    107:                break;
                    108:        }
                    109:        case DNS_IPv4_A: {
                    110:                struct in_addr *in_addrs = addresses;
                    111:                int i;
                    112:                /* a resolution that's not valid does not help */
                    113:                if (ttl < 0)
                    114:                        goto out;
                    115:                for (i = 0; i < count; ++i)
                    116:                        fprintf(stderr, "%s ", inet_ntoa(in_addrs[i]));
                    117:                break;
                    118:        }
                    119:        case DNS_PTR:
                    120:                /* may get at most one PTR */
                    121:                if (count != 1)
                    122:                        goto out;
                    123: 
                    124:                fprintf(stderr, "%s ", *(char **)addresses);
                    125:                break;
                    126:        default:
                    127:                goto out;
                    128:        }
                    129: 
                    130:        dns_ok = type;
                    131: 
                    132: out:
                    133:        event_loopexit(NULL);
                    134: }
                    135: 
                    136: static void
                    137: dns_gethostbyname(void)
                    138: {
                    139:        fprintf(stdout, "Simple DNS resolve: ");
                    140:        dns_ok = 0;
                    141:        evdns_resolve_ipv4("www.monkey.org", 0, dns_gethostbyname_cb, NULL);
                    142:        event_dispatch();
                    143: 
                    144:        if (dns_ok == DNS_IPv4_A) {
                    145:                fprintf(stdout, "OK\n");
                    146:        } else {
                    147:                fprintf(stdout, "FAILED\n");
                    148:                exit(1);
                    149:        }
                    150: }
                    151: 
                    152: static void
                    153: dns_gethostbyname6(void)
                    154: {
                    155:        fprintf(stdout, "IPv6 DNS resolve: ");
                    156:        dns_ok = 0;
                    157:        evdns_resolve_ipv6("www.ietf.org", 0, dns_gethostbyname_cb, NULL);
                    158:        event_dispatch();
                    159: 
                    160:        if (dns_ok == DNS_IPv6_AAAA) {
                    161:                fprintf(stdout, "OK\n");
                    162:        } else if (!dns_ok && dns_err == DNS_ERR_TIMEOUT) {
                    163:                fprintf(stdout, "SKIPPED\n");
                    164:        } else {
                    165:                fprintf(stdout, "FAILED (%d)\n", dns_ok);
                    166:                exit(1);
                    167:        }
                    168: }
                    169: 
                    170: static void
                    171: dns_gethostbyaddr(void)
                    172: {
                    173:        struct in_addr in;
                    174:        in.s_addr = htonl(0x7f000001ul); /* 127.0.0.1 */
                    175:        fprintf(stdout, "Simple reverse DNS resolve: ");
                    176:        dns_ok = 0;
                    177:        evdns_resolve_reverse(&in, 0, dns_gethostbyname_cb, NULL);
                    178:        event_dispatch();
                    179: 
                    180:        if (dns_ok == DNS_PTR) {
                    181:                fprintf(stdout, "OK\n");
                    182:        } else {
                    183:                fprintf(stdout, "FAILED\n");
                    184:                exit(1);
                    185:        }
                    186: }
                    187: 
                    188: static int n_server_responses = 0;
                    189: 
                    190: static void
                    191: dns_server_request_cb(struct evdns_server_request *req, void *data)
                    192: {
                    193:        int i, r;
                    194:        const char TEST_ARPA[] = "11.11.168.192.in-addr.arpa";
                    195:        for (i = 0; i < req->nquestions; ++i) {
                    196:                struct in_addr ans;
                    197:                ans.s_addr = htonl(0xc0a80b0bUL); /* 192.168.11.11 */
                    198:                if (req->questions[i]->type == EVDNS_TYPE_A &&
                    199:                        req->questions[i]->dns_question_class == EVDNS_CLASS_INET &&
                    200:                        !strcmp(req->questions[i]->name, "zz.example.com")) {
                    201:                        r = evdns_server_request_add_a_reply(req, "zz.example.com",
                    202:                                                                                                 1, &ans.s_addr, 12345);
                    203:                        if (r<0)
                    204:                                dns_ok = 0;
                    205:                } else if (req->questions[i]->type == EVDNS_TYPE_AAAA &&
                    206:                                   req->questions[i]->dns_question_class == EVDNS_CLASS_INET &&
                    207:                                   !strcmp(req->questions[i]->name, "zz.example.com")) {
                    208:                        char addr6[17] = "abcdefghijklmnop";
                    209:                        r = evdns_server_request_add_aaaa_reply(req, "zz.example.com",
                    210:                                                                                                 1, addr6, 123);
                    211:                        if (r<0)
                    212:                                dns_ok = 0;
                    213:                } else if (req->questions[i]->type == EVDNS_TYPE_PTR &&
                    214:                                   req->questions[i]->dns_question_class == EVDNS_CLASS_INET &&
                    215:                                   !strcmp(req->questions[i]->name, TEST_ARPA)) {
                    216:                        r = evdns_server_request_add_ptr_reply(req, NULL, TEST_ARPA,
                    217:                                           "ZZ.EXAMPLE.COM", 54321);
                    218:                        if (r<0)
                    219:                                dns_ok = 0;
                    220:                } else {
                    221:                        fprintf(stdout, "Unexpected question %d %d \"%s\" ",
                    222:                                        req->questions[i]->type,
                    223:                                        req->questions[i]->dns_question_class,
                    224:                                        req->questions[i]->name);
                    225:                        dns_ok = 0;
                    226:                }
                    227:        }
                    228:        r = evdns_server_request_respond(req, 0);
                    229:        if (r<0) {
                    230:                fprintf(stdout, "Couldn't send reply. ");
                    231:                dns_ok = 0;
                    232:        }
                    233: }
                    234: 
                    235: static void
                    236: dns_server_gethostbyname_cb(int result, char type, int count, int ttl,
                    237:                                                        void *addresses, void *arg)
                    238: {
                    239:        if (result != DNS_ERR_NONE) {
                    240:                fprintf(stdout, "Unexpected result %d. ", result);
                    241:                dns_ok = 0;
                    242:                goto out;
                    243:        }
                    244:        if (count != 1) {
                    245:                fprintf(stdout, "Unexpected answer count %d. ", count);
                    246:                dns_ok = 0;
                    247:                goto out;
                    248:        }
                    249:        switch (type) {
                    250:        case DNS_IPv4_A: {
                    251:                struct in_addr *in_addrs = addresses;
                    252:                if (in_addrs[0].s_addr != htonl(0xc0a80b0bUL) || ttl != 12345) {
                    253:                        fprintf(stdout, "Bad IPv4 response \"%s\" %d. ",
                    254:                                        inet_ntoa(in_addrs[0]), ttl);
                    255:                        dns_ok = 0;
                    256:                        goto out;
                    257:                }
                    258:                break;
                    259:        }
                    260:        case DNS_IPv6_AAAA: {
                    261: #if defined (HAVE_STRUCT_IN6_ADDR) && defined(HAVE_INET_NTOP) && defined(INET6_ADDRSTRLEN)
                    262:                struct in6_addr *in6_addrs = addresses;
                    263:                char buf[INET6_ADDRSTRLEN+1];
                    264:                if (memcmp(&in6_addrs[0].s6_addr, "abcdefghijklmnop", 16)
                    265:                        || ttl != 123) {
                    266:                        const char *b = inet_ntop(AF_INET6, &in6_addrs[0],buf,sizeof(buf));
                    267:                        fprintf(stdout, "Bad IPv6 response \"%s\" %d. ", b, ttl);
                    268:                        dns_ok = 0;
                    269:                        goto out;
                    270:                }
                    271: #endif
                    272:                break;
                    273:        }
                    274:        case DNS_PTR: {
                    275:                char **addrs = addresses;
                    276:                if (strcmp(addrs[0], "ZZ.EXAMPLE.COM") || ttl != 54321) {
                    277:                        fprintf(stdout, "Bad PTR response \"%s\" %d. ",
                    278:                                        addrs[0], ttl);
                    279:                        dns_ok = 0;
                    280:                        goto out;
                    281:                }
                    282:                break;
                    283:        }
                    284:        default:
                    285:                fprintf(stdout, "Bad response type %d. ", type);
                    286:                dns_ok = 0;
                    287:        }
                    288: 
                    289:  out:
                    290:        if (++n_server_responses == 3) {
                    291:                event_loopexit(NULL);
                    292:        }
                    293: }
                    294: 
                    295: static void
                    296: dns_server(void)
                    297: {
                    298:        int sock;
                    299:        struct sockaddr_in my_addr;
                    300:        struct evdns_server_port *port;
                    301:        struct in_addr resolve_addr;
                    302: 
                    303:        dns_ok = 1;
                    304:        fprintf(stdout, "DNS server support: ");
                    305: 
                    306:        /* Add ourself as the only nameserver, and make sure we really are
                    307:         * the only nameserver. */
                    308:        evdns_nameserver_ip_add("127.0.0.1:35353");
                    309:        if (evdns_count_nameservers() != 1) {
                    310:                fprintf(stdout, "Couldn't set up.\n");
                    311:                exit(1);
                    312:        }
                    313: 
                    314:        /* Now configure a nameserver port. */
                    315:        sock = socket(AF_INET, SOCK_DGRAM, 0);
                    316:        if (sock == -1) {
                    317:                perror("socket");
                    318:                exit(1);
                    319:        }
                    320: #ifdef WIN32
                    321:        {
                    322:                u_long nonblocking = 1;
                    323:                ioctlsocket(sock, FIONBIO, &nonblocking);
                    324:        }
                    325: #else
                    326:        fcntl(sock, F_SETFL, O_NONBLOCK);
                    327: #endif
                    328:        memset(&my_addr, 0, sizeof(my_addr));
                    329:        my_addr.sin_family = AF_INET;
                    330:        my_addr.sin_port = htons(35353);
                    331:        my_addr.sin_addr.s_addr = htonl(0x7f000001UL);
                    332:        if (bind(sock, (struct sockaddr*)&my_addr, sizeof(my_addr)) < 0) {
                    333:                perror("bind");
                    334:                exit (1);
                    335:        }
                    336:        port = evdns_add_server_port(sock, 0, dns_server_request_cb, NULL);
                    337: 
                    338:        /* Send two queries. */
                    339:        evdns_resolve_ipv4("zz.example.com", DNS_QUERY_NO_SEARCH,
                    340:                                           dns_server_gethostbyname_cb, NULL);
                    341:        evdns_resolve_ipv6("zz.example.com", DNS_QUERY_NO_SEARCH,
                    342:                                           dns_server_gethostbyname_cb, NULL);
                    343:        resolve_addr.s_addr = htonl(0xc0a80b0bUL); /* 192.168.11.11 */
                    344:        evdns_resolve_reverse(&resolve_addr, 0,
                    345:                                                  dns_server_gethostbyname_cb, NULL);
                    346: 
                    347:        event_dispatch();
                    348: 
                    349:        if (dns_ok) {
                    350:                fprintf(stdout, "OK\n");
                    351:        } else {
                    352:                fprintf(stdout, "FAILED\n");
                    353:                exit(1);
                    354:        }
                    355: 
                    356:        evdns_close_server_port(port);
                    357:        evdns_shutdown(0); /* remove ourself as nameserver. */
                    358: #ifdef WIN32
                    359:        closesocket(sock);
                    360: #else
                    361:        close(sock);
                    362: #endif
                    363: }
                    364: 
                    365: void
                    366: dns_suite(void)
                    367: {
                    368:        dns_server(); /* Do this before we call evdns_init. */
                    369: 
                    370:        evdns_init();
                    371:        dns_gethostbyname();
                    372:        dns_gethostbyname6();
                    373:        dns_gethostbyaddr();
                    374: 
                    375:        evdns_shutdown(0);
                    376: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>