-more rsa refactoring
[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-new.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 /* DEFINES */
36 #define VERBOSE GNUNET_YES
37
38 /* Timeout for entire testcase */
39 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 20)
40
41 /* If number of peers not in config file, use this number */
42 #define DEFAULT_NUM_PEERS 2
43
44 /* test records to resolve */
45 #define TEST_DOMAIN "www.alice.bob.gads"
46 #define TEST_IP "127.0.0.1"
47 #define TEST_RECORD_NAME "www"
48
49 #define TEST_AUTHORITY_BOB "bob"
50 #define TEST_AUTHORITY_ALICE "alice"
51 #define TEST_ALICE_PSEU "carol"
52 #define TEST_EXPECTED_RESULT "www.carol.gads"
53
54 #define KEYFILE_BOB "../namestore/zonefiles/HGU0A0VCU334DN7F2I9UIUMVQMM7JMSD142LIMNUGTTV9R0CF4EG.zkey"
55 #define KEYFILE_ALICE "../namestore/zonefiles/N0UJMP015AFUNR2BTNM3FKPBLG38913BL8IDMCO2H0A1LIB81960.zkey"
56
57
58 /* Task handle to use to schedule test failure */
59 GNUNET_SCHEDULER_TaskIdentifier die_task;
60
61 /* Global return value (0 for success, anything else for failure) */
62 static int ok;
63
64 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
65
66 static struct GNUNET_GNS_Handle *gns_handle;
67
68 const struct GNUNET_CONFIGURATION_Handle *cfg;
69
70 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded priv_pkey;
71 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded short_pkey;
72 struct GNUNET_CRYPTO_RsaPrivateKey *priv_key;
73 struct GNUNET_CRYPTO_RsaPrivateKey *short_key;
74
75 struct GNUNET_CRYPTO_ShortHashCode priv_zone;
76 struct GNUNET_CRYPTO_ShortHashCode short_zone;
77
78
79 /**
80  * Check if the get_handle is being used, if so stop the request.  Either
81  * way, schedule the end_badly_cont function which actually shuts down the
82  * test.
83  */
84 static void
85 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
86 {
87   die_task = GNUNET_SCHEDULER_NO_TASK;
88   GNUNET_SCHEDULER_shutdown ();
89   ok = 1;
90 }
91
92 void end_badly_now ()
93 {
94   GNUNET_SCHEDULER_cancel (die_task);
95   die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
96 }
97
98 static void shutdown_task (void *cls,
99                            const struct GNUNET_SCHEDULER_TaskContext *tc)
100 {
101   GNUNET_GNS_disconnect(gns_handle);
102   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer!\n");
103   GNUNET_SCHEDULER_shutdown ();
104 }
105
106 /**
107  * Called when gns shorten finishes
108  */
109 static void
110 process_shorten_result(void* cls, const char* sname)
111 {
112
113   if (GNUNET_SCHEDULER_NO_TASK != die_task)
114   {
115       GNUNET_SCHEDULER_cancel (die_task);
116       die_task = GNUNET_SCHEDULER_NO_TASK;
117   }
118
119   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
120               "Disconnecting from namestore\n");
121   GNUNET_NAMESTORE_disconnect (namestore_handle);
122
123   if (sname == NULL)
124   {
125     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
126                 "Shorten test failed!\n");
127     ok = 1;
128   }
129   else
130   {
131     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
132                 "%s shortened to %s\n", (char*)cls, sname);
133     if (0 != strcmp(sname, TEST_EXPECTED_RESULT))
134     {
135       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
136                   "Shorten test failed! (wanted: %s got: %s\n",
137                   (char*)cls, sname);
138       ok = 1;
139     }
140
141     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Shorten test succeeded!\n");
142     ok = 0;
143   }
144   
145   GNUNET_SCHEDULER_add_now (&shutdown_task, NULL);
146 }
147
148 /**
149  * Function scheduled to be run on the successful start of services
150  * tries to shorten the name TEST_DOMAIN using gns
151  */
152 static void
153 commence_testing (void *cls, int32_t success, const char *emsg)
154 {
155   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
156               "Connecting to gns\n");
157   gns_handle = GNUNET_GNS_connect(cfg);
158   if (NULL == gns_handle)
159   {
160     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
161                 "Failed to connect to gns\n");
162     end_badly_now ();
163     return;
164   }
165
166   GNUNET_assert (NULL != GNUNET_GNS_shorten (gns_handle, TEST_DOMAIN,
167                       &priv_zone,
168                       &short_zone,
169                       &process_shorten_result,
170                       TEST_DOMAIN));
171 }
172
173
174
175 void do_check (void *cls,
176               const struct GNUNET_CONFIGURATION_Handle *ccfg,
177               struct GNUNET_TESTING_Peer *peer)
178 {
179   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded our_pkey;
180   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded alice_pkey;
181   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded bob_pkey;
182   struct GNUNET_CRYPTO_RsaPrivateKey *our_key;
183   struct GNUNET_CRYPTO_RsaPrivateKey *alice_key;
184   struct GNUNET_CRYPTO_RsaPrivateKey *bob_key;
185   struct GNUNET_CRYPTO_ShortHashCode bob_hash;
186   struct GNUNET_CRYPTO_ShortHashCode alice_hash;
187   struct GNUNET_CRYPTO_RsaSignature *sig;
188   char* our_keyfile;
189   char* private_keyfile;
190   char* shorten_keyfile;
191
192   cfg = ccfg;
193   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
194   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Running test\n");
195
196
197   /* put records into namestore */
198   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
199   if (NULL == namestore_handle)
200   {
201     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
202     end_badly_now ();
203     return;
204   }
205
206   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
207                                                           "ZONEKEY",
208                                                           &our_keyfile))
209   {
210     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
211     end_badly_now ();
212     return;
213   }
214   
215   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
216                                                             "SHORTEN_ZONEKEY",
217                                                             &shorten_keyfile))
218   {
219     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
220                "Failed to get shorten zone key from cfg\n");
221     end_badly_now ();
222     return;
223   }
224   
225   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
226                                                             "PRIVATE_ZONEKEY",
227                                                             &private_keyfile))
228   {
229     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
230                "Failed to get private zone key from cfg\n");
231     end_badly_now ();
232     return;
233   }
234
235   our_key = GNUNET_CRYPTO_rsa_key_create_from_file (our_keyfile);
236   GNUNET_free(our_keyfile);
237
238   bob_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_BOB);
239   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_ALICE);
240   priv_key = GNUNET_CRYPTO_rsa_key_create_from_file (private_keyfile);
241   short_key = GNUNET_CRYPTO_rsa_key_create_from_file (shorten_keyfile);
242
243   GNUNET_free(shorten_keyfile);
244   GNUNET_free(private_keyfile);
245   
246   GNUNET_CRYPTO_rsa_key_get_public (our_key, &our_pkey);
247   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
248   GNUNET_CRYPTO_rsa_key_get_public (bob_key, &bob_pkey);
249   GNUNET_CRYPTO_rsa_key_get_public (priv_key, &priv_pkey);
250   GNUNET_CRYPTO_rsa_key_get_public (short_key, &short_pkey);
251
252   GNUNET_CRYPTO_short_hash(&priv_pkey, sizeof(priv_pkey), &priv_zone);
253   GNUNET_CRYPTO_short_hash(&short_pkey, sizeof(short_pkey), &short_zone);
254
255   struct GNUNET_NAMESTORE_RecordData rd;
256   char* ip = TEST_IP;
257   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
258   rd.expiration_time = UINT64_MAX;
259   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
260   
261   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
262
263   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
264   rd.data = &bob_hash;
265   rd.record_type = GNUNET_GNS_RECORD_PKEY;
266   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
267   
268   /* put bob into our zone */
269   GNUNET_NAMESTORE_record_create (namestore_handle,
270                                   our_key,
271                                   TEST_AUTHORITY_BOB,
272                                   &rd,
273                                   NULL,
274                                   NULL);
275   
276   /* put alice into bobs zone */
277   GNUNET_CRYPTO_short_hash(&alice_pkey, sizeof(alice_pkey), &alice_hash);
278   rd.data = &alice_hash;
279   sig = GNUNET_NAMESTORE_create_signature(bob_key,
280                                           GNUNET_TIME_UNIT_FOREVER_ABS,
281                                           TEST_AUTHORITY_ALICE,
282                                           &rd, 1);
283
284   GNUNET_NAMESTORE_record_put (namestore_handle,
285                                &bob_pkey,
286                                TEST_AUTHORITY_ALICE,
287                                GNUNET_TIME_UNIT_FOREVER_ABS,
288                                1,
289                                &rd,
290                                sig,
291                                NULL,
292                                NULL);
293   GNUNET_free(sig);
294   /* put www A record and PSEU into alice's zone */
295
296   rd.data_size = sizeof(struct in_addr);
297   rd.data = web;
298   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
299   sig = GNUNET_NAMESTORE_create_signature(alice_key,
300                                           GNUNET_TIME_UNIT_FOREVER_ABS,
301                                           TEST_RECORD_NAME,
302                                           &rd, 1);
303
304   GNUNET_NAMESTORE_record_put (namestore_handle,
305                                &alice_pkey,
306                                TEST_RECORD_NAME,
307                                GNUNET_TIME_UNIT_FOREVER_ABS,
308                                1,
309                                &rd,
310                                sig,
311                                NULL,
312                                NULL);
313   
314   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
315   rd.data = &alice_hash;
316   rd.record_type = GNUNET_GNS_RECORD_PKEY;
317   GNUNET_free(sig);
318
319   GNUNET_NAMESTORE_record_create (namestore_handle,
320                                our_key,
321                                TEST_ALICE_PSEU,
322                                &rd,
323                                &commence_testing,
324                                NULL);
325
326   GNUNET_free(web);
327   GNUNET_CRYPTO_rsa_key_free(our_key);
328   GNUNET_CRYPTO_rsa_key_free(bob_key);
329   GNUNET_CRYPTO_rsa_key_free(alice_key);
330   GNUNET_CRYPTO_rsa_key_free(priv_key);
331   GNUNET_CRYPTO_rsa_key_free(short_key);
332
333 }
334
335 int
336 main (int argc, char *argv[])
337 {
338   ok = 1;
339
340   GNUNET_log_setup ("test-gns-simple-shorten",
341 #if VERBOSE
342                     "DEBUG",
343 #else
344                     "WARNING",
345 #endif
346                     NULL);
347
348   GNUNET_TESTING_peer_run ("test-gns-simple-shorten", "test_gns_simple_lookup.conf", &do_check, NULL);
349   return ok;
350 }
351
352 /* end of test_gns_twopeer.c */