Verify that GCD(m,n) != 1 when n is an RSA modulus
[oweals/gnunet.git] / src / identity / gnunet-service-identity.c
1 /*
2   This file is part of GNUnet.
3   Copyright (C) 2013 GNUnet e.V.
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., 51 Franklin Street, Fifth Floor,
18   Boston, MA 02110-1301, USA.
19  */
20
21 /**
22  * @file identity/gnunet-service-identity.c
23  * @brief identity management service
24  * @author Christian Grothoff
25  *
26  * The purpose of this service is to manage private keys that
27  * represent the various egos/pseudonyms/identities of a GNUnet user.
28  *
29  * Todo:
30  * - auto-initialze default egos; maybe trigger default
31  *   initializations (such as gnunet-gns-import.sh?)
32  */
33 #include "platform.h"
34 #include "gnunet_util_lib.h"
35 #include "gnunet_constants.h"
36 #include "gnunet_protocols.h"
37 #include "gnunet_statistics_service.h"
38 #include "gnunet_identity_service.h"
39 #include "identity.h"
40
41
42 /**
43  * Information we keep about each ego.
44  */
45 struct Ego
46 {
47
48   /**
49    * We keep egos in a DLL.
50    */
51   struct Ego *next;
52
53   /**
54    * We keep egos in a DLL.
55    */
56   struct Ego *prev;
57
58   /**
59    * Private key of the ego.
60    */
61   struct GNUNET_CRYPTO_EcdsaPrivateKey *pk;
62
63   /**
64    * String identifier for the ego.
65    */
66   char *identifier;
67
68 };
69
70
71 /**
72  * Handle to our current configuration.
73  */
74 static const struct GNUNET_CONFIGURATION_Handle *cfg;
75
76 /**
77  * Handle to subsystem configuration which for each subsystem contains
78  * the name of the default ego.
79  */
80 static struct GNUNET_CONFIGURATION_Handle *subsystem_cfg;
81
82 /**
83  * Handle to the statistics service.
84  */
85 static struct GNUNET_STATISTICS_Handle *stats;
86
87 /**
88  * Notification context, simplifies client broadcasts.
89  */
90 static struct GNUNET_SERVER_NotificationContext *nc;
91
92 /**
93  * Directory where we store the identities.
94  */
95 static char *ego_directory;
96
97 /**
98  * Configuration file name where subsystem information is kept.
99  */
100 static char *subsystem_cfg_file;
101
102 /**
103  * Head of DLL of all egos.
104  */
105 static struct Ego *ego_head;
106
107 /**
108  * Tail of DLL of all egos.
109  */
110 static struct Ego *ego_tail;
111
112
113 /**
114  * Get the name of the file we use to store a given ego.
115  *
116  * @param ego ego for which we need the filename
117  * @return full filename for the given ego
118  */
119 static char *
120 get_ego_filename (struct Ego *ego)
121 {
122   char *filename;
123
124   GNUNET_asprintf (&filename,
125                    "%s%s%s",
126                    ego_directory,
127                    DIR_SEPARATOR_STR,
128                    ego->identifier);
129   return filename;
130 }
131
132
133 /**
134  * Task run during shutdown.
135  *
136  * @param cls unused
137  */
138 static void
139 shutdown_task (void *cls)
140 {
141   struct Ego *e;
142
143   if (NULL != nc)
144   {
145     GNUNET_SERVER_notification_context_destroy (nc);
146     nc = NULL;
147   }
148   if (NULL != stats)
149   {
150     GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
151     stats = NULL;
152   }
153   GNUNET_CONFIGURATION_destroy (subsystem_cfg);
154   subsystem_cfg = NULL;
155   GNUNET_free (subsystem_cfg_file);
156   subsystem_cfg_file = NULL;
157   GNUNET_free (ego_directory);
158   ego_directory = NULL;
159   while (NULL != (e = ego_head))
160   {
161     GNUNET_CONTAINER_DLL_remove (ego_head, ego_tail, e);
162     GNUNET_free (e->pk);
163     GNUNET_free (e->identifier);
164     GNUNET_free (e);
165   }
166 }
167
168
169 /**
170  * Send a result code back to the client.
171  *
172  * @param client client that should receive the result code
173  * @param result_code code to transmit
174  * @param emsg error message to include (or NULL for none)
175  */
176 static void
177 send_result_code (struct GNUNET_SERVER_Client *client,
178                   uint32_t result_code,
179                   const char *emsg)
180 {
181   struct GNUNET_IDENTITY_ResultCodeMessage *rcm;
182   size_t elen;
183
184   if (NULL == emsg)
185     elen = 0;
186   else
187     elen = strlen (emsg) + 1;
188   rcm = GNUNET_malloc (sizeof (struct GNUNET_IDENTITY_ResultCodeMessage) + elen);
189   rcm->header.type = htons (GNUNET_MESSAGE_TYPE_IDENTITY_RESULT_CODE);
190   rcm->header.size = htons (sizeof (struct GNUNET_IDENTITY_ResultCodeMessage) + elen);
191   rcm->result_code = htonl (result_code);
192   if (0 < elen)
193     memcpy (&rcm[1], emsg, elen);
194   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
195               "Sending result %d (%s) to client\n",
196               (int) result_code,
197               emsg);
198   GNUNET_SERVER_notification_context_unicast (nc, client, &rcm->header, GNUNET_NO);
199   GNUNET_free (rcm);
200 }
201
202
203 /**
204  * Create an update message with information about the current state of an ego.
205  *
206  * @param ego ego to create message for
207  * @return corresponding update message
208  */
209 static struct GNUNET_IDENTITY_UpdateMessage *
210 create_update_message (struct Ego *ego)
211 {
212   struct GNUNET_IDENTITY_UpdateMessage *um;
213   size_t name_len;
214
215   name_len = (NULL == ego->identifier) ? 0 : (strlen (ego->identifier) + 1);
216   um = GNUNET_malloc (sizeof (struct GNUNET_IDENTITY_UpdateMessage) + name_len);
217   um->header.type = htons (GNUNET_MESSAGE_TYPE_IDENTITY_UPDATE);
218   um->header.size = htons (sizeof (struct GNUNET_IDENTITY_UpdateMessage) + name_len);
219   um->name_len = htons (name_len);
220   um->end_of_list = htons (GNUNET_NO);
221   um->private_key = *ego->pk;
222   memcpy (&um[1], ego->identifier, name_len);
223   return um;
224 }
225
226
227 /**
228  * Create a set default message with information about the current state of an ego.
229  *
230  * @param ego ego to create message for
231  * @param servicename name of the service to provide in the message
232  * @return corresponding set default message
233  */
234 static struct GNUNET_IDENTITY_SetDefaultMessage *
235 create_set_default_message (struct Ego *ego,
236                             const char *servicename)
237 {
238   struct GNUNET_IDENTITY_SetDefaultMessage *sdm;
239   size_t name_len;
240
241   name_len = (NULL == servicename) ? 0 : (strlen (servicename) + 1);
242   sdm = GNUNET_malloc (sizeof (struct GNUNET_IDENTITY_SetDefaultMessage) + name_len);
243   sdm->header.type = htons (GNUNET_MESSAGE_TYPE_IDENTITY_SET_DEFAULT);
244   sdm->header.size = htons (sizeof (struct GNUNET_IDENTITY_SetDefaultMessage) + name_len);
245   sdm->name_len = htons (name_len);
246   sdm->reserved = htons (0);
247   sdm->private_key = *ego->pk;
248   memcpy (&sdm[1], servicename, name_len);
249   return sdm;
250 }
251
252
253 /**
254  * Handler for START message from client, sends information
255  * about all identities to the client immediately and
256  * adds the client to the notification context for future
257  * updates.
258  *
259  * @param cls unused
260  * @param client who sent the message
261  * @param message the message received
262  */
263 static void
264 handle_start_message (void *cls, struct GNUNET_SERVER_Client *client,
265                       const struct GNUNET_MessageHeader *message)
266 {
267   struct GNUNET_IDENTITY_UpdateMessage *um;
268   struct GNUNET_IDENTITY_UpdateMessage ume;
269   struct Ego *ego;
270
271   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
272               "Received START message from client\n");
273   GNUNET_SERVER_notification_context_add (nc, client);
274   for (ego = ego_head; NULL != ego; ego = ego->next)
275   {
276     um = create_update_message (ego);
277     GNUNET_SERVER_notification_context_unicast (nc, client, &um->header, GNUNET_NO);
278     GNUNET_free (um);
279   }
280   memset (&ume, 0, sizeof (ume));
281   ume.header.type = htons (GNUNET_MESSAGE_TYPE_IDENTITY_UPDATE);
282   ume.header.size = htons (sizeof (struct GNUNET_IDENTITY_UpdateMessage));
283   ume.end_of_list = htons (GNUNET_YES);
284   ume.name_len = htons (0);
285   GNUNET_SERVER_notification_context_unicast (nc, client, &ume.header, GNUNET_NO);
286   GNUNET_SERVER_receive_done (client, GNUNET_OK);
287 }
288
289
290 /**
291  * Handler for GET_DEFAULT message from client, returns
292  * default identity for some service.
293  *
294  * @param cls unused
295  * @param client who sent the message
296  * @param message the message received
297  */
298 static void
299 handle_get_default_message (void *cls, struct GNUNET_SERVER_Client *client,
300                             const struct GNUNET_MessageHeader *message)
301 {
302   const struct GNUNET_IDENTITY_GetDefaultMessage *gdm;
303   struct GNUNET_IDENTITY_SetDefaultMessage *sdm;
304   uint16_t size;
305   uint16_t name_len;
306   struct Ego *ego;
307   const char *name;
308   char *identifier;
309
310   size = ntohs (message->size);
311   if (size <= sizeof (struct GNUNET_IDENTITY_GetDefaultMessage))
312   {
313     GNUNET_break (0);
314     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
315     return;
316   }
317   gdm = (const struct GNUNET_IDENTITY_GetDefaultMessage *) message;
318   name = (const char *) &gdm[1];
319   name_len = ntohs (gdm->name_len);
320   if ( (name_len + sizeof (struct GNUNET_IDENTITY_GetDefaultMessage) != size) ||
321        (0 != ntohs (gdm->reserved)) ||
322        ('\0' != name[name_len - 1]) )
323   {
324     GNUNET_break (0);
325     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
326     return;
327   }
328   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
329               "Received GET_DEFAULT for service `%s' from client\n",
330               name);
331   if (GNUNET_OK !=
332       GNUNET_CONFIGURATION_get_value_string (subsystem_cfg,
333                                              name,
334                                              "DEFAULT_IDENTIFIER",
335                                              &identifier))
336   {
337     send_result_code (client, 1, gettext_noop ("no default known"));
338     GNUNET_SERVER_receive_done (client, GNUNET_OK);
339     return;
340   }
341   for (ego = ego_head; NULL != ego; ego = ego->next)
342   {
343     if (0 == strcmp (ego->identifier,
344                      identifier))
345     {
346       sdm = create_set_default_message (ego,
347                                         name);
348       GNUNET_SERVER_notification_context_unicast (nc, client,
349                                                   &sdm->header, GNUNET_NO);
350       GNUNET_free (sdm);
351       GNUNET_SERVER_receive_done (client, GNUNET_OK);
352       GNUNET_free (identifier);
353       return;
354     }
355   }
356   GNUNET_free (identifier);
357   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
358               "Failed to find ego `%s'\n",
359               name);
360   send_result_code (client, 1,
361                     gettext_noop ("default configured, but ego unknown (internal error)"));
362   GNUNET_SERVER_receive_done (client, GNUNET_OK);
363 }
364
365
366 /**
367  * Compare the given two private keys for equality.
368  *
369  * @param pk1 one private key
370  * @param pk2 another private key
371  * @return 0 if the keys are equal
372  */
373 static int
374 key_cmp (const struct GNUNET_CRYPTO_EcdsaPrivateKey *pk1,
375          const struct GNUNET_CRYPTO_EcdsaPrivateKey *pk2)
376 {
377   return memcmp (pk1, pk2, sizeof (struct GNUNET_CRYPTO_EcdsaPrivateKey));
378 }
379
380
381 /**
382  * Handler for SET_DEFAULT message from client, updates
383  * default identity for some service.
384  *
385  * @param cls unused
386  * @param client who sent the message
387  * @param message the message received
388  */
389 static void
390 handle_set_default_message (void *cls, struct GNUNET_SERVER_Client *client,
391                             const struct GNUNET_MessageHeader *message)
392 {
393   const struct GNUNET_IDENTITY_SetDefaultMessage *sdm;
394   uint16_t size;
395   uint16_t name_len;
396   struct Ego *ego;
397   const char *str;
398
399   size = ntohs (message->size);
400   if (size <= sizeof (struct GNUNET_IDENTITY_SetDefaultMessage))
401   {
402     GNUNET_break (0);
403     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
404     return;
405   }
406   sdm = (const struct GNUNET_IDENTITY_SetDefaultMessage *) message;
407   name_len = ntohs (sdm->name_len);
408   GNUNET_break (0 == ntohs (sdm->reserved));
409   if (name_len + sizeof (struct GNUNET_IDENTITY_SetDefaultMessage) != size)
410   {
411     GNUNET_break (0);
412     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
413     return;
414   }
415   str = (const char *) &sdm[1];
416   if ('\0' != str[name_len - 1])
417   {
418     GNUNET_break (0);
419     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
420     return;
421   }
422   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
423               "Received SET_DEFAULT for service `%s' from client\n",
424               str);
425   for (ego = ego_head; NULL != ego; ego = ego->next)
426   {
427     if (0 == key_cmp (ego->pk,
428                       &sdm->private_key))
429     {
430       GNUNET_CONFIGURATION_set_value_string (subsystem_cfg,
431                                              str,
432                                              "DEFAULT_IDENTIFIER",
433                                              ego->identifier);
434       if (GNUNET_OK !=
435           GNUNET_CONFIGURATION_write (subsystem_cfg,
436                                       subsystem_cfg_file))
437         GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
438                     _("Failed to write subsystem default identifier map to `%s'.\n"),
439                     subsystem_cfg_file);
440       send_result_code (client, 0, NULL);
441       GNUNET_SERVER_receive_done (client, GNUNET_OK);
442       return;
443     }
444   }
445   send_result_code (client, 1, _("Unknown ego specified for service (internal error)"));
446   GNUNET_SERVER_receive_done (client, GNUNET_OK);
447 }
448
449
450 /**
451  * Send an updated message for the given ego to all listeners.
452  *
453  * @param ego ego to send the update for
454  */
455 static void
456 notify_listeners (struct Ego *ego)
457 {
458   struct GNUNET_IDENTITY_UpdateMessage *um;
459
460   um = create_update_message (ego);
461   GNUNET_SERVER_notification_context_broadcast (nc, &um->header, GNUNET_NO);
462   GNUNET_free (um);
463 }
464
465
466 /**
467  * Handler for CREATE message from client, creates
468  * new identity.
469  *
470  * @param cls unused
471  * @param client who sent the message
472  * @param message the message received
473  */
474 static void
475 handle_create_message (void *cls, struct GNUNET_SERVER_Client *client,
476                        const struct GNUNET_MessageHeader *message)
477 {
478   const struct GNUNET_IDENTITY_CreateRequestMessage *crm;
479   uint16_t size;
480   uint16_t name_len;
481   struct Ego *ego;
482   const char *str;
483   char *fn;
484
485   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
486               "Received CREATE message from client\n");
487   size = ntohs (message->size);
488   if (size <= sizeof (struct GNUNET_IDENTITY_CreateRequestMessage))
489   {
490     GNUNET_break (0);
491     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
492     return;
493   }
494   crm = (const struct GNUNET_IDENTITY_CreateRequestMessage *) message;
495   name_len = ntohs (crm->name_len);
496   GNUNET_break (0 == ntohs (crm->reserved));
497   if (name_len + sizeof (struct GNUNET_IDENTITY_CreateRequestMessage) != size)
498   {
499     GNUNET_break (0);
500     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
501     return;
502   }
503   str = (const char *) &crm[1];
504   if ('\0' != str[name_len - 1])
505   {
506     GNUNET_break (0);
507     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
508     return;
509   }
510   for (ego = ego_head; NULL != ego; ego = ego->next)
511   {
512     if (0 == strcmp (ego->identifier,
513                      str))
514     {
515       send_result_code (client, 1, gettext_noop ("identifier already in use for another ego"));
516       GNUNET_SERVER_receive_done (client, GNUNET_OK);
517       return;
518     }
519   }
520   ego = GNUNET_new (struct Ego);
521   ego->pk = GNUNET_new (struct GNUNET_CRYPTO_EcdsaPrivateKey);
522   *ego->pk = crm->private_key;
523   ego->identifier = GNUNET_strdup (str);
524   GNUNET_CONTAINER_DLL_insert (ego_head,
525                                ego_tail,
526                                ego);
527   send_result_code (client, 0, NULL);
528   fn = get_ego_filename (ego);
529   (void) GNUNET_DISK_directory_create_for_file (fn);
530   if (sizeof (struct GNUNET_CRYPTO_EcdsaPrivateKey) !=
531       GNUNET_DISK_fn_write (fn,
532                             &crm->private_key,
533                             sizeof (struct GNUNET_CRYPTO_EcdsaPrivateKey),
534                             GNUNET_DISK_PERM_USER_READ |
535                             GNUNET_DISK_PERM_USER_WRITE))
536     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR,
537                               "write", fn);
538   GNUNET_free (fn);
539   notify_listeners (ego);
540   GNUNET_SERVER_receive_done (client, GNUNET_OK);
541 }
542
543
544 /**
545  * Closure for 'handle_ego_rename'.
546  */
547 struct RenameContext
548 {
549   /**
550    * Old name.
551    */
552   const char *old_name;
553
554   /**
555    * New name.
556    */
557   const char *new_name;
558 };
559
560
561 /**
562  * An ego was renamed; rename it in all subsystems where it is
563  * currently set as the default.
564  *
565  * @param cls the 'struct RenameContext'
566  * @param section a section in the configuration to process
567  */
568 static void
569 handle_ego_rename (void *cls,
570                    const char *section)
571 {
572   struct RenameContext *rc = cls;
573   char *id;
574
575   if (GNUNET_OK !=
576       GNUNET_CONFIGURATION_get_value_string (subsystem_cfg,
577                                              section,
578                                              "DEFAULT_IDENTIFIER",
579                                              &id))
580     return;
581   if (0 != strcmp (id, rc->old_name))
582   {
583     GNUNET_free (id);
584     return;
585   }
586   GNUNET_CONFIGURATION_set_value_string (subsystem_cfg,
587                                          section,
588                                          "DEFAULT_IDENTIFIER",
589                                          rc->new_name);
590   GNUNET_free (id);
591 }
592
593
594 /**
595  * Handler for RENAME message from client, creates
596  * new identity.
597  *
598  * @param cls unused
599  * @param client who sent the message
600  * @param message the message received
601  */
602 static void
603 handle_rename_message (void *cls, struct GNUNET_SERVER_Client *client,
604                        const struct GNUNET_MessageHeader *message)
605 {
606   const struct GNUNET_IDENTITY_RenameMessage *rm;
607   uint16_t size;
608   uint16_t old_name_len;
609   uint16_t new_name_len;
610   struct Ego *ego;
611   const char *old_name;
612   const char *new_name;
613   struct RenameContext rename_ctx;
614   char *fn_old;
615   char *fn_new;
616
617   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
618               "Received RENAME message from client\n");
619   size = ntohs (message->size);
620   if (size <= sizeof (struct GNUNET_IDENTITY_RenameMessage))
621   {
622     GNUNET_break (0);
623     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
624     return;
625   }
626   rm = (const struct GNUNET_IDENTITY_RenameMessage *) message;
627   old_name_len = ntohs (rm->old_name_len);
628   new_name_len = ntohs (rm->new_name_len);
629   old_name = (const char *) &rm[1];
630   new_name = &old_name[old_name_len];
631   if ( (old_name_len + new_name_len + sizeof (struct GNUNET_IDENTITY_RenameMessage) != size) ||
632        ('\0' != old_name[old_name_len - 1]) ||
633        ('\0' != new_name[new_name_len - 1]) )
634   {
635     GNUNET_break (0);
636     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
637     return;
638   }
639
640   /* check if new name is already in use */
641   for (ego = ego_head; NULL != ego; ego = ego->next)
642   {
643     if (0 == strcmp (ego->identifier,
644                      new_name))
645     {
646       send_result_code (client, 1, gettext_noop ("target name already exists"));
647       GNUNET_SERVER_receive_done (client, GNUNET_OK);
648       return;
649     }
650   }
651
652   /* locate old name and, if found, perform rename */
653   for (ego = ego_head; NULL != ego; ego = ego->next)
654   {
655     if (0 == strcmp (ego->identifier,
656                      old_name))
657     {
658       fn_old = get_ego_filename (ego);
659       GNUNET_free (ego->identifier);
660       rename_ctx.old_name = old_name;
661       rename_ctx.new_name = new_name;
662       GNUNET_CONFIGURATION_iterate_sections (subsystem_cfg,
663                                              &handle_ego_rename,
664                                              &rename_ctx);
665       if (GNUNET_OK !=
666           GNUNET_CONFIGURATION_write (subsystem_cfg,
667                                       subsystem_cfg_file))
668         GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
669                     _("Failed to write subsystem default identifier map to `%s'.\n"),
670                     subsystem_cfg_file);
671       ego->identifier = GNUNET_strdup (new_name);
672       fn_new = get_ego_filename (ego);
673       if (0 != RENAME (fn_old, fn_new))
674         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "rename", fn_old);
675       GNUNET_free (fn_old);
676       GNUNET_free (fn_new);
677       notify_listeners (ego);
678       send_result_code (client, 0, NULL);
679       GNUNET_SERVER_receive_done (client, GNUNET_OK);
680       return;
681     }
682   }
683
684   /* failed to locate old name */
685   send_result_code (client, 1, gettext_noop ("no matching ego found"));
686   GNUNET_SERVER_receive_done (client, GNUNET_OK);
687 }
688
689
690 /**
691  * An ego was removed, remove it from all subsystems where it is
692  * currently set as the default.
693  *
694  * @param cls name of the removed ego (const char *)
695  * @param section a section in the configuration to process
696  */
697 static void
698 handle_ego_delete (void *cls,
699                    const char *section)
700 {
701   const char *identifier = cls;
702   char *id;
703
704   if (GNUNET_OK !=
705       GNUNET_CONFIGURATION_get_value_string (subsystem_cfg,
706                                              section,
707                                              "DEFAULT_IDENTIFIER",
708                                              &id))
709     return;
710   if (0 != strcmp (id, identifier))
711   {
712     GNUNET_free (id);
713     return;
714   }
715   GNUNET_CONFIGURATION_set_value_string (subsystem_cfg,
716                                          section,
717                                          "DEFAULT_IDENTIFIER",
718                                          NULL);
719   GNUNET_free (id);
720 }
721
722
723 /**
724  * Handler for DELETE message from client, creates
725  * new identity.
726  *
727  * @param cls unused
728  * @param client who sent the message
729  * @param message the message received
730  */
731 static void
732 handle_delete_message (void *cls, struct GNUNET_SERVER_Client *client,
733                        const struct GNUNET_MessageHeader *message)
734 {
735   const struct GNUNET_IDENTITY_DeleteMessage *dm;
736   uint16_t size;
737   uint16_t name_len;
738   struct Ego *ego;
739   const char *name;
740   char *fn;
741
742   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
743               "Received DELETE message from client\n");
744   size = ntohs (message->size);
745   if (size <= sizeof (struct GNUNET_IDENTITY_DeleteMessage))
746   {
747     GNUNET_break (0);
748     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
749     return;
750   }
751   dm = (const struct GNUNET_IDENTITY_DeleteMessage *) message;
752   name = (const char *) &dm[1];
753   name_len = ntohs (dm->name_len);
754   if ( (name_len + sizeof (struct GNUNET_IDENTITY_DeleteMessage) != size) ||
755        (0 != ntohs (dm->reserved)) ||
756        ('\0' != name[name_len - 1]) )
757   {
758     GNUNET_break (0);
759     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
760     return;
761   }
762   for (ego = ego_head; NULL != ego; ego = ego->next)
763   {
764     if (0 == strcmp (ego->identifier,
765                      name))
766     {
767       GNUNET_CONTAINER_DLL_remove (ego_head,
768                                    ego_tail,
769                                    ego);
770       GNUNET_CONFIGURATION_iterate_sections (subsystem_cfg,
771                                              &handle_ego_delete,
772                                              ego->identifier);
773       if (GNUNET_OK !=
774           GNUNET_CONFIGURATION_write (subsystem_cfg,
775                                       subsystem_cfg_file))
776         GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
777                     _("Failed to write subsystem default identifier map to `%s'.\n"),
778                     subsystem_cfg_file);
779       fn = get_ego_filename (ego);
780       if (0 != UNLINK (fn))
781         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "unlink", fn);
782       GNUNET_free (fn);
783       GNUNET_free (ego->identifier);
784       ego->identifier = NULL;
785       notify_listeners (ego);
786       GNUNET_free (ego->pk);
787       GNUNET_free (ego);
788       send_result_code (client, 0, NULL);
789       GNUNET_SERVER_receive_done (client, GNUNET_OK);
790       return;
791     }
792   }
793
794   send_result_code (client, 1, gettext_noop ("no matching ego found"));
795   GNUNET_SERVER_receive_done (client, GNUNET_OK);
796 }
797
798
799 /**
800  * Process the given file from the "EGODIR".  Parses the file
801  * and creates the respective 'struct Ego' in memory.
802  *
803  * @param cls NULL
804  * @param filename name of the file to parse
805  * @return #GNUNET_OK to continue to iterate,
806  *  #GNUNET_NO to stop iteration with no error,
807  *  #GNUNET_SYSERR to abort iteration with error!
808  */
809 static int
810 process_ego_file (void *cls,
811                   const char *filename)
812 {
813   struct Ego *ego;
814   const char *fn;
815
816   fn = strrchr (filename, (int) DIR_SEPARATOR);
817   if (NULL == fn)
818   {
819     GNUNET_break (0);
820     return GNUNET_OK;
821   }
822   ego = GNUNET_new (struct Ego);
823   ego->pk = GNUNET_CRYPTO_ecdsa_key_create_from_file (filename);
824   if (NULL == ego->pk)
825   {
826     GNUNET_free (ego);
827     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
828                 _("Failed to parse ego information in `%s'\n"),
829                 filename);
830     return GNUNET_OK;
831   }
832   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
833               "Loaded ego `%s'\n",
834               fn + 1);
835   ego->identifier = GNUNET_strdup (fn + 1);
836   GNUNET_CONTAINER_DLL_insert (ego_head,
837                                ego_tail,
838                                ego);
839   return GNUNET_OK;
840 }
841
842
843 /**
844  * Handle network size estimate clients.
845  *
846  * @param cls closure
847  * @param server the initialized server
848  * @param c configuration to use
849  */
850 static void
851 run (void *cls,
852      struct GNUNET_SERVER_Handle *server,
853      const struct GNUNET_CONFIGURATION_Handle *c)
854 {
855   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
856     {&handle_start_message, NULL,
857      GNUNET_MESSAGE_TYPE_IDENTITY_START, sizeof (struct GNUNET_MessageHeader)},
858     {&handle_get_default_message, NULL,
859      GNUNET_MESSAGE_TYPE_IDENTITY_GET_DEFAULT, 0},
860     {&handle_set_default_message, NULL,
861      GNUNET_MESSAGE_TYPE_IDENTITY_SET_DEFAULT, 0},
862     {&handle_create_message, NULL,
863      GNUNET_MESSAGE_TYPE_IDENTITY_CREATE, 0},
864     {&handle_rename_message, NULL,
865      GNUNET_MESSAGE_TYPE_IDENTITY_RENAME, 0},
866     {&handle_delete_message, NULL,
867      GNUNET_MESSAGE_TYPE_IDENTITY_DELETE, 0},
868     {NULL, NULL, 0, 0}
869   };
870
871   cfg = c;
872   if (GNUNET_OK !=
873       GNUNET_CONFIGURATION_get_value_filename (cfg, "identity",
874                                                "EGODIR",
875                                                &ego_directory))
876   {
877     GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR, "identity", "EGODIR");
878     GNUNET_SCHEDULER_shutdown ();
879     return;
880   }
881   if (GNUNET_OK !=
882       GNUNET_CONFIGURATION_get_value_filename (cfg, "identity",
883                                                "SUBSYSTEM_CFG",
884                                                &subsystem_cfg_file))
885   {
886     GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR, "identity", "SUBSYSTEM_CFG");
887     GNUNET_SCHEDULER_shutdown ();
888     return;
889   }
890   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
891               "Loading subsystem configuration `%s'\n",
892               subsystem_cfg_file);
893   subsystem_cfg = GNUNET_CONFIGURATION_create ();
894   if ( (GNUNET_YES ==
895         GNUNET_DISK_file_test (subsystem_cfg_file)) &&
896        (GNUNET_OK !=
897         GNUNET_CONFIGURATION_parse (subsystem_cfg,
898                                     subsystem_cfg_file)) )
899   {
900     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
901                 _("Failed to parse subsystem identity configuration file `%s'\n"),
902                 subsystem_cfg_file);
903     GNUNET_SCHEDULER_shutdown ();
904     return;
905   }
906   stats = GNUNET_STATISTICS_create ("identity", cfg);
907   GNUNET_SERVER_add_handlers (server, handlers);
908   nc = GNUNET_SERVER_notification_context_create (server, 1);
909   if (GNUNET_OK !=
910       GNUNET_DISK_directory_create (ego_directory))
911   {
912     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
913                 _("Failed to create directory `%s' for storing egos\n"),
914                 ego_directory);
915   }
916   GNUNET_DISK_directory_scan (ego_directory,
917                               &process_ego_file,
918                               NULL);
919   GNUNET_SCHEDULER_add_shutdown (&shutdown_task,
920                                  NULL);
921 }
922
923
924 /**
925  * The main function for the network size estimation service.
926  *
927  * @param argc number of arguments from the command line
928  * @param argv command line arguments
929  * @return 0 ok, 1 on error
930  */
931 int
932 main (int argc, char *const *argv)
933 {
934   return (GNUNET_OK ==
935           GNUNET_SERVICE_run (argc, argv, "identity",
936                               GNUNET_SERVICE_OPTION_NONE,
937                               &run, NULL)) ? 0 : 1;
938 }
939
940
941 /* end of gnunet-service-identity.c */