[svn-upgrade] Integrating new upstream version, iodine (0.4.0)
[debian/iodine.git] / tests / dns.c
1 /*
2  * Copyright (c) 2006 Bjorn Andersson <flex@kryo.se>, Erik Ekman <yarrick@kryo.se>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  */
16
17 #include <check.h>
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <string.h>
21 #include <ctype.h>
22 #include <sys/types.h>
23 #include <sys/socket.h>
24 #include <netinet/in.h>
25 #include <sys/stat.h>
26 #include <arpa/nameser.h>
27
28 #include "common.h"
29 #include "dns.h"
30 #include "encoding.h"
31 #include "test.h"
32
33 static void dump_packet(char *, size_t);
34
35 static char queryPacket[] = 
36         "\x05\x39\x01\x00\x00\x01\x00\x00\x00\x00\x00\x01\x32\x41\x4A\x42\x43"
37         "\x55\x59\x54\x43\x50\x45\x42\x39\x47\x51\x39\x4C\x54\x45\x42\x55\x58"
38         "\x47\x49\x44\x55\x4E\x42\x53\x53\x41\x36\x44\x46\x4F\x4E\x39\x43\x41"
39         "\x5A\x44\x42\x32\x41\x41\x41\x41\x41\x36\x44\x42\x04\x6B\x72\x79\x6F"
40         "\x02\x73\x65\x00\x00\x0A\x00\x01\x00\x00\x29\x10\x00\x00\x00\x80\x00"
41         "\x00\x00";
42
43 static char answerPacket[] = 
44         "\x05\x39\x84\x00\x00\x01\x00\x01\x00\x00\x00\x00\x05\x73\x69\x6C\x6C"
45         "\x79\x04\x68\x6F\x73\x74\x02\x6F\x66\x06\x69\x6F\x64\x69\x6E\x65\x04"
46         "\x63\x6F\x64\x65\x04\x6B\x72\x79\x6F\x02\x73\x65\x00\x00\x0A\x00\x01"
47         "\xC0\x0C\x00\x0A\x00\x01\x00\x00\x00\x00\x00\x23\x74\x68\x69\x73\x20"
48         "\x69\x73\x20\x74\x68\x65\x20\x6D\x65\x73\x73\x61\x67\x65\x20\x74\x6F"
49         "\x20\x62\x65\x20\x64\x65\x6C\x69\x76\x65\x72\x65\x64";
50         
51 static char *msgData = "this is the message to be delivered";
52 static char *topdomain = "kryo.se";
53         
54 static char *queryData = "HELLO this is the test data";
55 static char *recData = "AHELLO this is the test data";  /* The A flag is added */
56
57 START_TEST(test_encode_query)
58 {
59         char buf[512];
60         char resolv[512];
61         struct query q;
62         char *d;
63         int len;
64         int ret;
65
66         len = sizeof(buf);
67         memset(&buf, 0, sizeof(buf));
68         memset(&resolv, 0, sizeof(resolv));
69         memset(&q, 0, sizeof(struct query));
70         q.type = T_NULL;
71         q.id = 1337;
72         d = resolv;
73
74         *d++ = 'A';
75         encode_data(queryData, strlen(queryData), 100, d);
76         d = resolv + strlen(resolv);
77         if (*d != '.') {
78                 *d++ = '.';
79         }
80         strcpy(d, topdomain);
81         ret = dns_encode(buf, len, &q, QR_QUERY, resolv, strlen(resolv));
82         len = sizeof(queryPacket) - 1; /* Skip extra null character */
83
84         if (strncmp(queryPacket, buf, sizeof(queryPacket)) || ret != len) {
85                 printf("\n");
86                 dump_packet(queryPacket, len);
87                 dump_packet(buf, ret);
88         }
89         fail_unless(strncmp(queryPacket, buf, sizeof(queryPacket)) == 0, "Did not compile expected packet");
90         fail_unless(ret == len, va_str("Bad packet length: %d, expected %d", ret, len));
91 }
92 END_TEST
93
94 START_TEST(test_decode_query)
95 {
96         char buf[512];
97         char *domain;
98         struct query q;
99         int len;
100         int ret;
101
102         memset(&q, 0, sizeof(struct query));
103         memset(&buf, 0, sizeof(buf));
104         q.id = 0;
105         len = sizeof(queryPacket) - 1;
106
107         dns_decode(buf, sizeof(buf), &q, QR_QUERY, queryPacket, len);
108         domain = strstr(q.name, topdomain);
109         ret = decode_data(buf, sizeof(buf), q.name, domain);
110
111         fail_unless(strncmp(buf, recData, ret) == 0, "Did not extract expected host: '%s'", buf);
112         fail_unless(strlen(buf) == strlen(recData), va_str("Bad host length: %d, expected %d", strlen(q.name), strlen(recData)));
113 }
114 END_TEST
115
116 START_TEST(test_encode_response)
117 {
118         char buf[512];
119         char *host = "silly.host.of.iodine.code.kryo.se";
120         struct query q;
121         int len;
122         int ret;
123
124         len = sizeof(buf);
125         memset(&buf, 0, sizeof(buf));
126         memset(&q, 0, sizeof(struct query));
127         strncpy(q.name, host, strlen(host));
128         q.type = T_NULL;
129         q.id = 1337;
130
131         ret = dns_encode(buf, len, &q, QR_ANSWER, msgData, strlen(msgData));
132         len = sizeof(answerPacket) - 1; /* Skip extra null character */
133
134         fail_unless(strncmp(answerPacket, buf, sizeof(answerPacket)) == 0, "Did not compile expected packet");
135         fail_unless(ret == len, va_str("Bad packet length: %d, expected %d", ret, len));
136 }
137 END_TEST
138
139 START_TEST(test_decode_response)
140 {
141         char buf[512];
142         int len;
143         int ret;
144
145         len = sizeof(buf);
146         memset(&buf, 0, sizeof(buf));
147
148         ret = dns_decode(buf, len, NULL, QR_ANSWER, answerPacket, sizeof(answerPacket)-1);
149         fail_unless(strncmp(msgData, buf, sizeof(msgData)) == 0, "Did not extract expected data");
150         fail_unless(ret == strlen(msgData), va_str("Bad data length: %d, expected %d", ret, strlen(msgData)));
151 }
152 END_TEST
153
154 static void
155 dump_packet(char *buf, size_t len)
156 {
157         int pos;
158
159         for (pos = 0; pos < len; pos++) {
160                 printf("\\x%02X", (unsigned char) buf[pos]);
161         }
162         printf("\n");
163         for (pos = 0; pos < len; pos++) {
164                 if (isalnum((unsigned char) buf[pos])) {
165                         printf(" %c  ", (unsigned char) buf[pos]);
166                 } else {
167                         printf("    ");
168                 }
169         }
170         printf("\n");
171 }
172
173 TCase *
174 test_dns_create_tests()
175 {
176         TCase *tc;
177
178         tc = tcase_create("Dns");
179         tcase_add_test(tc, test_encode_query);
180         tcase_add_test(tc, test_decode_query);
181         tcase_add_test(tc, test_encode_response);
182         tcase_add_test(tc, test_decode_response);
183
184         return tc;
185 }