fix segfault
[oweals/gnunet.git] / src / namestore / gnunet-namestore.c
1 /*
2      This file is part of GNUnet.
3      (C) 2012 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 gnunet-namestore.c
22  * @brief command line tool to manipulate the local zone
23  * @author Christian Grothoff
24  *
25  * TODO:
26  * - allow users to set record options (not just 'RF_AUTHORITY')
27  * - test
28  * - parsing SOA, PTR and MX value specifications (and define format!)
29  * - add options to list/lookup individual records
30  */
31 #include "platform.h"
32 #include <gnunet_util_lib.h>
33 #include <gnunet_dnsparser_lib.h>
34 #include <gnunet_namestore_service.h>
35
36 /**
37  * Handle to the namestore.
38  */
39 static struct GNUNET_NAMESTORE_Handle *ns;
40
41 /**
42  * Hash of the public key of our zone.
43  */
44 static GNUNET_HashCode zone;
45
46 /**
47  * Private key for the our zone.
48  */
49 static struct GNUNET_CRYPTO_RsaPrivateKey *zone_pkey;
50
51 /**
52  * Keyfile to manipulate.
53  */
54 static char *keyfile;   
55
56 /**
57  * Desired action is to add a record.
58  */
59 static int add;
60
61 /**
62  * Queue entry for the 'add' operation.
63  */
64 static struct GNUNET_NAMESTORE_QueueEntry *add_qe;
65
66 /**
67  * Desired action is to list records.
68  */
69 static int list;
70
71 /**
72  * List iterator for the 'list' operation.
73  */
74 static struct GNUNET_NAMESTORE_ZoneIterator *list_it;
75
76 /**
77  * Desired action is to remove a record.
78  */
79 static int del;
80
81 /**
82  * Queue entry for the 'del' operation.
83  */
84 static struct GNUNET_NAMESTORE_QueueEntry *del_qe;
85
86 /**
87  * Name of the records to add/list/remove.
88  */
89 static char *name;
90
91 /**
92  * Value of the record to add/remove.
93  */
94 static char *value;
95
96 /**
97  * Type of the record to add/remove, NULL to remove all.
98  */
99 static char *typestring;
100
101 /**
102  * Desired expiration time.
103  */
104 static char *expirationstring;
105
106
107 /**
108  * Task run on shutdown.  Cleans up everything.
109  *
110  * @param cls unused
111  * @param tc scheduler context
112  */
113 static void
114 do_shutdown (void *cls,
115              const struct GNUNET_SCHEDULER_TaskContext *tc)
116 {
117   if (NULL != ns)
118   {
119     GNUNET_NAMESTORE_disconnect (ns, GNUNET_NO);
120     ns = NULL;
121   }
122   if (NULL != zone_pkey)
123   {
124     GNUNET_CRYPTO_rsa_key_free (zone_pkey);
125     zone_pkey = NULL;
126   }
127 }
128
129
130 /**
131  * Continuation called to notify client about result of the
132  * operation.
133  *
134  * @param cls closure, unused
135  * @param success GNUNET_SYSERR on failure (including timeout/queue drop/failure to validate)
136  *                GNUNET_NO if content was already there
137  *                GNUNET_YES (or other positive value) on success
138  * @param emsg NULL on success, otherwise an error message
139  */
140 static void
141 add_continuation (void *cls,
142                   int32_t success,
143                   const char *emsg)
144 {
145   add_qe = NULL;
146   if (success != GNUNET_YES)
147     fprintf (stderr,
148              _("Adding record failed: %s\n"),
149              (success == GNUNET_NO) ? "record exists" : emsg);
150   if ( (NULL == del_qe) &&
151        (NULL == list_it) )
152     GNUNET_SCHEDULER_shutdown ();
153 }
154
155
156 /**
157  * Continuation called to notify client about result of the
158  * operation.
159  *
160  * @param cls closure, unused
161  * @param success GNUNET_SYSERR on failure (including timeout/queue drop/failure to validate)
162  *                GNUNET_NO if content was already there
163  *                GNUNET_YES (or other positive value) on success
164  * @param emsg NULL on success, otherwise an error message
165  */
166 static void
167 del_continuation (void *cls,
168                   int32_t success,
169                   const char *emsg)
170 {
171   del_qe = NULL;
172   if (success != GNUNET_YES)
173     fprintf (stderr,
174              _("Deleting record failed: %s\n"),
175              emsg);
176   if ( (NULL == add_qe) &&
177        (NULL == list_it) )
178     GNUNET_SCHEDULER_shutdown ();
179 }
180
181
182 /**
183  * Process a record that was stored in the namestore.
184  *
185  * @param cls closure
186  * @param zone_key public key of the zone
187  * @param expire when does the corresponding block in the DHT expire (until
188  *               when should we never do a DHT lookup for the same name again)?; 
189  *               GNUNET_TIME_UNIT_ZERO_ABS if there are no records of any type in the namestore,
190  *               or the expiration time of the block in the namestore (even if there are zero
191  *               records matching the desired record type)
192  * @param name name that is being mapped (at most 255 characters long)
193  * @param rd_len number of entries in 'rd' array
194  * @param rd array of records with data to store
195  * @param signature signature of the record block, NULL if signature is unavailable (i.e. 
196  *        because the user queried for a particular record type only)
197  */
198 static void
199 display_record (void *cls,
200                 const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
201                 struct GNUNET_TIME_Absolute expire,                         
202                 const char *name,
203                 unsigned int rd_len,
204                 const struct GNUNET_NAMESTORE_RecordData *rd,
205                 const struct GNUNET_CRYPTO_RsaSignature *signature)
206 {
207   const char *typestring;
208   char *s;
209   unsigned int i;
210
211   if (NULL == name)
212   {
213     list_it = NULL;
214     if ( (NULL == del_qe) &&
215          (NULL == add_qe) )
216       GNUNET_SCHEDULER_shutdown ();
217     return;
218   }
219   FPRINTF (stdout,
220            "%s:\n",
221            name);
222   for (i=0;i<rd_len;i++)
223   {
224     typestring = GNUNET_NAMESTORE_number_to_typename (rd[i].record_type);
225     s = GNUNET_NAMESTORE_value_to_string (rd[i].record_type,
226                                           rd[i].data,
227                                           rd[i].data_size);
228     if (NULL == s)
229     {
230       FPRINTF (stdout, _("\tCorrupt or unsupported record of type %u\n"),
231                (unsigned int) rd[i].record_type);
232       continue;
233     }
234     FPRINTF (stdout, "\t%s: %s\n", typestring, s);
235     GNUNET_free (s);    
236   }
237   FPRINTF (stdout, "%s", "\n");
238   GNUNET_NAMESTORE_zone_iterator_next (list_it);
239 }
240
241
242 /**
243  * Main function that will be run.
244  *
245  * @param cls closure
246  * @param args remaining command-line arguments
247  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
248  * @param cfg configuration
249  */
250 static void
251 run (void *cls, char *const *args, const char *cfgfile,
252      const struct GNUNET_CONFIGURATION_Handle *cfg)
253 {
254   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
255   uint32_t type;
256   void *data = NULL;
257   size_t data_size = 0;
258   struct GNUNET_TIME_Relative etime;
259   struct GNUNET_NAMESTORE_RecordData rd;
260
261   if (NULL == keyfile)
262   {
263     fprintf (stderr,
264              _("Option `%s' not given, but I need a zone key file!\n"),
265              "z");
266     return;
267   }
268   zone_pkey = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
269   GNUNET_free (keyfile);
270   keyfile = NULL;
271   if (! (add|del|list))
272   {
273     /* nothing more to be done */  
274     GNUNET_CRYPTO_rsa_key_free (zone_pkey);
275     zone_pkey = NULL;
276     return; 
277   }
278   if (NULL == zone_pkey)
279   {
280     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
281                 _("Failed to read or create private zone key\n"));
282     return;
283   }
284   GNUNET_CRYPTO_rsa_key_get_public (zone_pkey,
285                                     &pub);
286   GNUNET_CRYPTO_hash (&pub, sizeof (pub), &zone);
287
288   ns = GNUNET_NAMESTORE_connect (cfg);
289   if (NULL == ns)
290   {
291     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
292                 _("Failed to connect to namestore\n"));
293     return;
294   }
295   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
296                                 &do_shutdown, NULL);
297   if (NULL == typestring)
298     type = 0;
299   else
300     type = GNUNET_NAMESTORE_typename_to_number (typestring);
301   if (UINT32_MAX == type)
302   {
303     fprintf (stderr, _("Unsupported type `%s'\n"), typestring);
304     GNUNET_SCHEDULER_shutdown ();
305     return;
306   }
307   if ((NULL == typestring) && (add | del))
308   {
309     fprintf (stderr,
310              _("Missing option `%s' for operation `%s'\n"),
311              "-t", _("add/del"));
312     GNUNET_SCHEDULER_shutdown ();
313     return;     
314   }
315   if (NULL != value)
316   {
317     if (GNUNET_OK !=
318         GNUNET_NAMESTORE_string_to_value (type,
319                                           value,
320                                           &data,
321                                           &data_size))
322       {
323         fprintf (stderr, _("Value `%s' invalid for record type `%s'\n"), 
324                  value,
325                  typestring);
326         GNUNET_SCHEDULER_shutdown ();
327         return;
328       }
329   } else if (add | del)
330   {
331     fprintf (stderr,
332              _("Missing option `%s' for operation `%s'\n"),
333              "-V", _("add/del"));
334     GNUNET_SCHEDULER_shutdown ();
335     return;     
336   }
337   if (NULL != expirationstring)
338   {
339     if (GNUNET_OK !=
340         GNUNET_STRINGS_fancy_time_to_relative (expirationstring,
341                                                &etime))
342     {
343       fprintf (stderr,
344                _("Invalid time format `%s'\n"),
345                expirationstring);
346       GNUNET_SCHEDULER_shutdown ();
347       return;     
348     }
349   } else if (add | del)
350   {
351     fprintf (stderr,
352              _("Missing option `%s' for operation `%s'\n"),
353              "-e", _("add/del"));
354     GNUNET_SCHEDULER_shutdown ();
355     return;     
356   }
357   if (add)
358   {
359     if (NULL == name)
360     {
361       fprintf (stderr,
362                _("Missing option `%s' for operation `%s'\n"),
363                "-n", _("add"));
364       GNUNET_SCHEDULER_shutdown ();
365       return;     
366     }
367     rd.data = data;
368     rd.data_size = data_size;
369     rd.record_type = type;
370     rd.expiration = GNUNET_TIME_relative_to_absolute (etime);
371     rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY; // FIXME: not always...
372     add_qe = GNUNET_NAMESTORE_record_create (ns,
373                                              zone_pkey,
374                                              name,
375                                              &rd,
376                                              &add_continuation,
377                                              NULL);
378   }
379   if (del)
380   {
381     if (NULL == name)
382     {
383       fprintf (stderr,
384                _("Missing option `%s' for operation `%s'\n"),
385                "-n", _("del"));
386       GNUNET_SCHEDULER_shutdown ();
387       return;     
388     }
389     rd.data = data;
390     rd.data_size = data_size;
391     rd.record_type = type;
392     rd.expiration = GNUNET_TIME_relative_to_absolute (etime);
393     rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY; // FIXME: not always...
394     del_qe = GNUNET_NAMESTORE_record_remove (ns,
395                                              zone_pkey,
396                                              name,
397                                              &rd,
398                                              &del_continuation,
399                                              NULL);
400   }
401   if (list)
402   {
403     list_it = GNUNET_NAMESTORE_zone_iteration_start (ns,
404                                                      &zone,
405                                                      0, 0,
406                                                      &display_record,
407                                                      NULL);
408   }
409   GNUNET_free_non_null (data);
410 }
411
412
413 /**
414  * The main function for gnunet-namestore.
415  *
416  * @param argc number of arguments from the command line
417  * @param argv command line arguments
418  * @return 0 ok, 1 on error
419  */
420 int
421 main (int argc, char *const *argv)
422 {
423   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
424     {'a', "add", NULL,
425      gettext_noop ("add record"), 0,
426      &GNUNET_GETOPT_set_one, &add},
427     {'d', "delete", NULL,
428      gettext_noop ("delete record"), 0,
429      &GNUNET_GETOPT_set_one, &del},   
430     {'D', "display", NULL,
431      gettext_noop ("display records"), 0,
432      &GNUNET_GETOPT_set_one, &list},   
433     {'e', "expiration", "TIME",
434      gettext_noop ("expiration time for record to use (for adding only)"), 1,
435      &GNUNET_GETOPT_set_string, &expirationstring},   
436     {'n', "name", "NAME",
437      gettext_noop ("name of the record to add/delete/display"), 1,
438      &GNUNET_GETOPT_set_string, &name},   
439     {'t', "type", "TYPE",
440      gettext_noop ("type of the record to add/delete/display"), 1,
441      &GNUNET_GETOPT_set_string, &typestring},   
442     {'V', "value", "VALUE",
443      gettext_noop ("value of the record to add/delete"), 1,
444      &GNUNET_GETOPT_set_string, &value},   
445     {'z', "zonekey", "FILENAME",
446      gettext_noop ("filename with the zone key"), 1,
447      &GNUNET_GETOPT_set_string, &keyfile},   
448     GNUNET_GETOPT_OPTION_END
449   };
450
451   int ret;
452
453   GNUNET_log_setup ("gnunet-namestore", "WARNING", NULL);
454   ret =
455       (GNUNET_OK ==
456        GNUNET_PROGRAM_run (argc, argv, "gnunet-namestore",
457                            _("GNUnet zone manipulation tool"), 
458                            options,
459                            &run, NULL)) ? 0 : 1;
460
461   return ret;
462 }
463
464 /* end of gnunet-namestore.c */