-revocation
[oweals/gnunet.git] / src / gns / test_gns_simple_shorten.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20 /**
21  * @file gns/test_gns_simple_shorten.c
22  * @brief basic shorten test for gns api
23  *
24  */
25 #include "platform.h"
26 #include "gnunet_testing_lib.h"
27 #include "gnunet_core_service.h"
28 #include "block_dns.h"
29 #include "gnunet_signatures.h"
30 #include "gnunet_namestore_service.h"
31 #include "../namestore/namestore.h"
32 #include "gnunet_dnsparser_lib.h"
33 #include "gnunet_gns_service.h"
34
35 /* Timeout for entire testcase */
36 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 20)
37
38 /* test records to resolve */
39 #define TEST_DOMAIN "www.alice.bob.gnu"
40 #define TEST_IP "127.0.0.1"
41 #define TEST_RECORD_NAME "www"
42
43 #define TEST_AUTHORITY_BOB "bob"
44 #define TEST_AUTHORITY_ALICE "alice"
45 #define TEST_ALICE_PSEU "carol"
46 #define TEST_EXPECTED_RESULT "www.carol.gnu"
47
48 #define KEYFILE_BOB "../namestore/zonefiles/HGU0A0VCU334DN7F2I9UIUMVQMM7JMSD142LIMNUGTTV9R0CF4EG.zkey"
49 #define KEYFILE_ALICE "../namestore/zonefiles/N0UJMP015AFUNR2BTNM3FKPBLG38913BL8IDMCO2H0A1LIB81960.zkey"
50
51
52 /* Task handle to use to schedule test failure */
53 GNUNET_SCHEDULER_TaskIdentifier die_task;
54
55 /* Global return value (0 for success, anything else for failure) */
56 static int ok;
57
58 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
59
60 static struct GNUNET_GNS_Handle *gns_handle;
61
62 const struct GNUNET_CONFIGURATION_Handle *cfg;
63
64 struct GNUNET_CRYPTO_EcdsaPublicKey priv_pkey;
65 struct GNUNET_CRYPTO_EcdsaPublicKey short_pkey;
66 struct GNUNET_CRYPTO_EcdsaPrivateKey *priv_key;
67 struct GNUNET_CRYPTO_EcdsaPrivateKey *short_key;
68
69 struct GNUNET_CRYPTO_ShortHashCode priv_zone;
70 struct GNUNET_CRYPTO_ShortHashCode short_zone;
71
72
73 /**
74  * Check if the get_handle is being used, if so stop the request.  Either
75  * way, schedule the end_badly_cont function which actually shuts down the
76  * test.
77  */
78 static void
79 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
80 {
81   die_task = GNUNET_SCHEDULER_NO_TASK;
82   GNUNET_SCHEDULER_shutdown ();
83   ok = 1;
84 }
85
86 void end_badly_now ()
87 {
88   GNUNET_SCHEDULER_cancel (die_task);
89   die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
90 }
91
92 static void shutdown_task (void *cls,
93                            const struct GNUNET_SCHEDULER_TaskContext *tc)
94 {
95   GNUNET_GNS_disconnect(gns_handle);
96   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer!\n");
97   GNUNET_SCHEDULER_shutdown ();
98 }
99
100 /**
101  * Called when gns shorten finishes
102  */
103 static void
104 process_shorten_result(void* cls, const char* sname)
105 {
106
107   if (GNUNET_SCHEDULER_NO_TASK != die_task)
108   {
109       GNUNET_SCHEDULER_cancel (die_task);
110       die_task = GNUNET_SCHEDULER_NO_TASK;
111   }
112
113   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
114               "Disconnecting from namestore\n");
115   GNUNET_NAMESTORE_disconnect (namestore_handle);
116
117   if (sname == NULL)
118   {
119     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
120                 "Shorten test failed!\n");
121     ok = 1;
122   }
123   else
124   {
125     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
126                 "%s shortened to %s\n", (char*)cls, sname);
127     if (0 != strcmp(sname, TEST_EXPECTED_RESULT))
128     {
129       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
130                   "Shorten test failed! (wanted: %s got: %s\n",
131                   (char*)cls, sname);
132       ok = 1;
133     }
134
135     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Shorten test succeeded!\n");
136     ok = 0;
137   }
138
139   GNUNET_SCHEDULER_add_now (&shutdown_task, NULL);
140 }
141
142 /**
143  * Function scheduled to be run on the successful start of services
144  * tries to shorten the name TEST_DOMAIN using gns
145  */
146 static void
147 commence_testing (void *cls, int32_t success, const char *emsg)
148 {
149   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
150               "Connecting to gns\n");
151   gns_handle = GNUNET_GNS_connect(cfg);
152   if (NULL == gns_handle)
153   {
154     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
155                 "Failed to connect to gns\n");
156     end_badly_now ();
157     return;
158   }
159
160   GNUNET_assert (NULL != GNUNET_GNS_shorten (gns_handle, TEST_DOMAIN,
161                       &priv_zone,
162                       &short_zone,
163                       &process_shorten_result,
164                       TEST_DOMAIN));
165 }
166
167
168
169 void do_check (void *cls,
170               const struct GNUNET_CONFIGURATION_Handle *ccfg,
171               struct GNUNET_TESTING_Peer *peer)
172 {
173   struct GNUNET_CRYPTO_EcdsaPublicKey our_pkey;
174   struct GNUNET_CRYPTO_EcdsaPublicKey alice_pkey;
175   struct GNUNET_CRYPTO_EcdsaPublicKey bob_pkey;
176   struct GNUNET_CRYPTO_EcdsaPrivateKey *our_key;
177   struct GNUNET_CRYPTO_EcdsaPrivateKey *alice_key;
178   struct GNUNET_CRYPTO_EcdsaPrivateKey *bob_key;
179   struct GNUNET_CRYPTO_ShortHashCode bob_hash;
180   struct GNUNET_CRYPTO_ShortHashCode alice_hash;
181   struct GNUNET_CRYPTO_EcdsaSignature *sig;
182   char* our_keyfile;
183   char* private_keyfile;
184   char* shorten_keyfile;
185
186   cfg = ccfg;
187   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
188   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Running test\n");
189
190
191   /* put records into namestore */
192   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
193   if (NULL == namestore_handle)
194   {
195     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
196     end_badly_now ();
197     return;
198   }
199
200   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
201                                                           "ZONEKEY",
202                                                           &our_keyfile))
203   {
204     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
205     end_badly_now ();
206     return;
207   }
208
209   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
210                                                             "SHORTEN_ZONEKEY",
211                                                             &shorten_keyfile))
212   {
213     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
214                "Failed to get shorten zone key from cfg\n");
215     end_badly_now ();
216     return;
217   }
218
219   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
220                                                             "PRIVATE_ZONEKEY",
221                                                             &private_keyfile))
222   {
223     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
224                "Failed to get private zone key from cfg\n");
225     end_badly_now ();
226     return;
227   }
228
229   our_key = GNUNET_CRYPTO_ecdsa_key_create_from_file (our_keyfile);
230   GNUNET_free(our_keyfile);
231
232   bob_key = GNUNET_CRYPTO_ecdsa_key_create_from_file (KEYFILE_BOB);
233   alice_key = GNUNET_CRYPTO_ecdsa_key_create_from_file (KEYFILE_ALICE);
234   priv_key = GNUNET_CRYPTO_ecdsa_key_create_from_file (private_keyfile);
235   short_key = GNUNET_CRYPTO_ecdsa_key_create_from_file (shorten_keyfile);
236
237   GNUNET_free(shorten_keyfile);
238   GNUNET_free(private_keyfile);
239
240   GNUNET_CRYPTO_ecdsa_key_get_public (our_key, &our_pkey);
241   GNUNET_CRYPTO_ecdsa_key_get_public (alice_key, &alice_pkey);
242   GNUNET_CRYPTO_ecdsa_key_get_public (bob_key, &bob_pkey);
243   GNUNET_CRYPTO_ecdsa_key_get_public (priv_key, &priv_pkey);
244   GNUNET_CRYPTO_ecdsa_key_get_public (short_key, &short_pkey);
245
246   GNUNET_CRYPTO_short_hash(&priv_pkey, sizeof(priv_pkey), &priv_zone);
247   GNUNET_CRYPTO_short_hash(&short_pkey, sizeof(short_pkey), &short_zone);
248
249   struct GNUNET_GNSRECORD_Data rd;
250   char* ip = TEST_IP;
251   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
252   rd.expiration_time = UINT64_MAX;
253   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
254
255   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
256
257   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
258   rd.data = &bob_hash;
259   rd.record_type = GNUNET_GNSRECORD_TYPE_PKEY;
260   rd.flags = GNUNET_GNSRECORD_RF_NONE;
261
262   /* put bob into our zone */
263   GNUNET_NAMESTORE_record_put_by_authority (namestore_handle,
264                                             our_key,
265                                             TEST_AUTHORITY_BOB,
266                                             1,
267                                             &rd,
268                                             NULL,
269                                             NULL);
270
271   /* put alice into bobs zone */
272   GNUNET_CRYPTO_short_hash(&alice_pkey, sizeof(alice_pkey), &alice_hash);
273   rd.data = &alice_hash;
274   sig = GNUNET_NAMESTORE_create_signature(bob_key,
275                                           GNUNET_TIME_UNIT_FOREVER_ABS,
276                                           TEST_AUTHORITY_ALICE,
277                                           &rd, 1);
278
279   GNUNET_NAMESTORE_record_put (namestore_handle,
280                                &bob_pkey,
281                                TEST_AUTHORITY_ALICE,
282                                GNUNET_TIME_UNIT_FOREVER_ABS,
283                                1,
284                                &rd,
285                                sig,
286                                NULL,
287                                NULL);
288   GNUNET_free(sig);
289   /* put www A record and PSEU into alice's zone */
290
291   rd.data_size = sizeof(struct in_addr);
292   rd.data = web;
293   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
294   sig = GNUNET_NAMESTORE_create_signature(alice_key,
295                                           GNUNET_TIME_UNIT_FOREVER_ABS,
296                                           TEST_RECORD_NAME,
297                                           &rd, 1);
298
299   GNUNET_NAMESTORE_record_put (namestore_handle,
300                                &alice_pkey,
301                                TEST_RECORD_NAME,
302                                GNUNET_TIME_UNIT_FOREVER_ABS,
303                                1,
304                                &rd,
305                                sig,
306                                NULL,
307                                NULL);
308
309   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
310   rd.data = &alice_hash;
311   rd.record_type = GNUNET_GNSRECORD_TYPE_PKEY;
312   GNUNET_free(sig);
313
314   GNUNET_NAMESTORE_record_put_by_authority (namestore_handle,
315                                             our_key,
316                                             TEST_ALICE_PSEU,
317                                             1, &rd,
318                                             &commence_testing,
319                                             NULL);
320
321   GNUNET_free(web);
322   GNUNET_free(our_key);
323   GNUNET_free(bob_key);
324   GNUNET_free(alice_key);
325   GNUNET_free(priv_key);
326   GNUNET_free(short_key);
327
328 }
329
330
331 int
332 main (int argc, char *argv[])
333 {
334   ok = 1;
335   GNUNET_log_setup ("test-gns-simple-shorten",
336                     "WARNING",
337                     NULL);
338   GNUNET_TESTING_peer_run ("test-gns-simple-shorten",
339                            "test_gns_simple_lookup.conf",
340                            &do_check, NULL);
341   return ok;
342 }
343
344 /* end of test_gns_simple_shorten.c */