-removed obsolete functions
[oweals/gnunet.git] / src / fs / gnunet-service-fs.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2009-2014 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., 51 Franklin Street, Fifth Floor,
18      Boston, MA 02110-1301, USA.
19 */
20
21 /**
22  * @file fs/gnunet-service-fs.c
23  * @brief gnunet anonymity protocol implementation
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include <float.h>
28 #include "gnunet_constants.h"
29 #include "gnunet_core_service.h"
30 #include "gnunet_dht_service.h"
31 #include "gnunet_datastore_service.h"
32 #include "gnunet_load_lib.h"
33 #include "gnunet_peer_lib.h"
34 #include "gnunet_protocols.h"
35 #include "gnunet_signatures.h"
36 #include "gnunet_statistics_service.h"
37 #include "gnunet_transport_service.h"
38 #include "gnunet_util_lib.h"
39 #include "gnunet-service-fs_cp.h"
40 #include "gnunet-service-fs_indexing.h"
41 #include "gnunet-service-fs_lc.h"
42 #include "gnunet-service-fs_pe.h"
43 #include "gnunet-service-fs_pr.h"
44 #include "gnunet-service-fs_push.h"
45 #include "gnunet-service-fs_put.h"
46 #include "gnunet-service-fs_cadet.h"
47 #include "fs.h"
48 #include "fs_api.h"
49
50 /**
51  * Size for the hash map for DHT requests from the FS
52  * service.  Should be about the number of concurrent
53  * DHT requests we plan to make.
54  */
55 #define FS_DHT_HT_SIZE 1024
56
57
58 /**
59  * How quickly do we age cover traffic?  At the given
60  * time interval, remaining cover traffic counters are
61  * decremented by 1/16th.
62  */
63 #define COVER_AGE_FREQUENCY GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 5)
64
65 /**
66  * Collect an instane number of statistics?  May cause excessive IPC.
67  */
68 #define INSANE_STATISTICS GNUNET_NO
69
70
71 /* ****************************** globals ****************************** */
72
73 /**
74  * Our connection to the datastore.
75  */
76 struct GNUNET_DATASTORE_Handle *GSF_dsh;
77
78 /**
79  * Our configuration.
80  */
81 const struct GNUNET_CONFIGURATION_Handle *GSF_cfg;
82
83 /**
84  * Handle for reporting statistics.
85  */
86 struct GNUNET_STATISTICS_Handle *GSF_stats;
87
88 /**
89  * Handle for DHT operations.
90  */
91 struct GNUNET_DHT_Handle *GSF_dht;
92
93 /**
94  * How long do requests typically stay in the routing table?
95  */
96 struct GNUNET_LOAD_Value *GSF_rt_entry_lifetime;
97
98 /**
99  * Running average of the observed latency to other peers (round trip).
100  * Initialized to 5s as the initial default.
101  */
102 struct GNUNET_TIME_Relative GSF_avg_latency = { 500 };
103
104 /**
105  * Handle to ATS service.
106  */
107 struct GNUNET_ATS_PerformanceHandle *GSF_ats;
108
109
110 /**
111  * Typical priorities we're seeing from other peers right now.  Since
112  * most priorities will be zero, this value is the weighted average of
113  * non-zero priorities seen "recently".  In order to ensure that new
114  * values do not dramatically change the ratio, values are first
115  * "capped" to a reasonable range (+N of the current value) and then
116  * averaged into the existing value by a ratio of 1:N.  Hence
117  * receiving the largest possible priority can still only raise our
118  * "current_priorities" by at most 1.
119  */
120 double GSF_current_priorities;
121
122 /**
123  * Size of the datastore queue we assume for common requests.
124  */
125 unsigned int GSF_datastore_queue_size;
126
127 /**
128  * How many query messages have we received 'recently' that
129  * have not yet been claimed as cover traffic?
130  */
131 unsigned int GSF_cover_query_count;
132
133 /**
134  * How many content messages have we received 'recently' that
135  * have not yet been claimed as cover traffic?
136  */
137 unsigned int GSF_cover_content_count;
138
139 /**
140  * Our block context.
141  */
142 struct GNUNET_BLOCK_Context *GSF_block_ctx;
143
144 /**
145  * Pointer to handle to the core service (points to NULL until we've
146  * connected to it).
147  */
148 struct GNUNET_CORE_Handle *GSF_core;
149
150 /**
151  * Are we introducing randomized delays for better anonymity?
152  */
153 int GSF_enable_randomized_delays;
154
155 /* ***************************** locals ******************************* */
156
157 /**
158  * Configuration for block library.
159  */
160 static struct GNUNET_CONFIGURATION_Handle *block_cfg;
161
162 /**
163  * Private key of this peer.  Used to sign LOC URI requests.
164  */
165 static struct GNUNET_CRYPTO_EddsaPrivateKey *pk;
166
167 /**
168  * ID of our task that we use to age the cover counters.
169  */
170 static struct GNUNET_SCHEDULER_Task * cover_age_task;
171
172 /**
173  * Datastore 'GET' load tracking.
174  */
175 static struct GNUNET_LOAD_Value *datastore_get_load;
176
177 /**
178  * Identity of this peer.
179  */
180 static struct GNUNET_PeerIdentity my_id;
181
182
183 /**
184  * Task that periodically ages our cover traffic statistics.
185  *
186  * @param cls unused closure
187  * @param tc task context
188  */
189 static void
190 age_cover_counters (void *cls,
191                     const struct GNUNET_SCHEDULER_TaskContext *tc)
192 {
193   GSF_cover_content_count = (GSF_cover_content_count * 15) / 16;
194   GSF_cover_query_count = (GSF_cover_query_count * 15) / 16;
195   cover_age_task =
196       GNUNET_SCHEDULER_add_delayed (COVER_AGE_FREQUENCY, &age_cover_counters,
197                                     NULL);
198 }
199
200
201 /**
202  * We've just now completed a datastore request.  Update our
203  * datastore load calculations.
204  *
205  * @param start time when the datastore request was issued
206  */
207 void
208 GSF_update_datastore_delay_ (struct GNUNET_TIME_Absolute start)
209 {
210   struct GNUNET_TIME_Relative delay;
211
212   delay = GNUNET_TIME_absolute_get_duration (start);
213   GNUNET_LOAD_update (datastore_get_load, delay.rel_value_us);
214 }
215
216
217 /**
218  * Test if the DATABASE (GET) load on this peer is too high
219  * to even consider processing the query at
220  * all.
221  *
222  * @param priority priority of the request (used as a reference point to compare with the load)
223  * @return #GNUNET_YES if the load is too high to do anything (load high)
224  *         #GNUNET_NO to process normally (load normal)
225  *         #GNUNET_SYSERR to process for free (load low)
226  */
227 int
228 GSF_test_get_load_too_high_ (uint32_t priority)
229 {
230   double ld;
231
232   ld = GNUNET_LOAD_get_load (datastore_get_load);
233   if (ld < 1)
234     return GNUNET_SYSERR;
235   if (ld <= priority)
236     return GNUNET_NO;
237   return GNUNET_YES;
238 }
239
240
241 /**
242  * We've received peer performance information. Update
243  * our running average for the P2P latency.
244  *
245  * @param cls closure
246  * @param address the address
247  * @param active is this address in active use
248  * @param bandwidth_out assigned outbound bandwidth for the connection
249  * @param bandwidth_in assigned inbound bandwidth for the connection
250  * @param prop performance data for the address (as far as known)
251  */
252 static void
253 update_latencies (void *cls,
254                   const struct GNUNET_HELLO_Address *address,
255                   int active,
256                   struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
257                   struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
258                   const struct GNUNET_ATS_Properties *prop)
259 {
260   if (NULL == address)
261   {
262     /* ATS service temporarily disconnected */
263     return;
264   }
265
266   if (GNUNET_YES != active)
267     return;
268   GSF_update_peer_latency_ (&address->peer,
269                             prop->delay);
270   GSF_avg_latency.rel_value_us =
271     (GSF_avg_latency.rel_value_us * 31 +
272      GNUNET_MIN (5000, prop->delay.rel_value_us)) / 32;
273   GNUNET_STATISTICS_set (GSF_stats,
274                          gettext_noop ("# running average P2P latency (ms)"),
275                          GSF_avg_latency.rel_value_us / 1000LL,
276                          GNUNET_NO);
277 }
278
279
280 /**
281  * Handle P2P "PUT" message.
282  *
283  * @param cls closure, always NULL
284  * @param other the other peer involved (sender or receiver, NULL
285  *        for loopback messages where we are both sender and receiver)
286  * @param message the actual message
287  * @return #GNUNET_OK to keep the connection open,
288  *         #GNUNET_SYSERR to close it (signal serious error)
289  */
290 static int
291 handle_p2p_put (void *cls,
292                 const struct GNUNET_PeerIdentity *other,
293                 const struct GNUNET_MessageHeader *message)
294 {
295   struct GSF_ConnectedPeer *cp;
296
297   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
298               "Received P2P PUT from %s\n",
299               GNUNET_i2s (other));
300   cp = GSF_peer_get_ (other);
301   if (NULL == cp)
302   {
303     GNUNET_break (0);
304     return GNUNET_OK;
305   }
306   GSF_cover_content_count++;
307   return GSF_handle_p2p_content_ (cp, message);
308 }
309
310
311 /**
312  * We have a new request, consider forwarding it to the given
313  * peer.
314  *
315  * @param cls the `struct GSF_PendingRequest`
316  * @param peer identity of the peer
317  * @param cp handle to the connected peer record
318  * @param ppd peer performance data
319  */
320 static void
321 consider_request_for_forwarding (void *cls,
322                                  const struct GNUNET_PeerIdentity *peer,
323                                  struct GSF_ConnectedPeer *cp,
324                                  const struct GSF_PeerPerformanceData *ppd)
325 {
326   struct GSF_PendingRequest *pr = cls;
327
328   if (GNUNET_YES != GSF_pending_request_test_target_ (pr, peer))
329   {
330 #if INSANE_STATISTICS
331     GNUNET_STATISTICS_update (GSF_stats,
332                               gettext_noop ("# Loopback routes suppressed"), 1,
333                               GNUNET_NO);
334 #endif
335     return;
336   }
337   GSF_plan_add_ (cp, pr);
338 }
339
340
341 /**
342  * Function to be called after we're done processing
343  * replies from the local lookup.  If the result status
344  * code indicates that there may be more replies, plan
345  * forwarding the request.
346  *
347  * @param cls closure (NULL)
348  * @param pr the pending request we were processing
349  * @param result final datastore lookup result
350  */
351 static void
352 consider_forwarding (void *cls,
353                      struct GSF_PendingRequest *pr,
354                      enum GNUNET_BLOCK_EvaluationResult result)
355 {
356   if (GNUNET_BLOCK_EVALUATION_OK_LAST == result)
357     return;                     /* we're done... */
358   if (GNUNET_YES !=
359       GSF_pending_request_test_active_ (pr))
360     return; /* request is not actually active, skip! */
361   GSF_iterate_connected_peers_ (&consider_request_for_forwarding,
362                                 pr);
363 }
364
365
366 /**
367  * Handle P2P "GET" request.
368  *
369  * @param cls closure, always NULL
370  * @param other the other peer involved (sender or receiver, NULL
371  *        for loopback messages where we are both sender and receiver)
372  * @param message the actual message
373  * @return #GNUNET_OK to keep the connection open,
374  *         #GNUNET_SYSERR to close it (signal serious error)
375  */
376 static int
377 handle_p2p_get (void *cls,
378                 const struct GNUNET_PeerIdentity *other,
379                 const struct GNUNET_MessageHeader *message)
380 {
381   struct GSF_PendingRequest *pr;
382
383   pr = GSF_handle_p2p_query_ (other,
384                               message);
385   if (NULL == pr)
386     return GNUNET_OK; /* exists, identical to existing request, or malformed */
387   GSF_pending_request_get_data_ (pr)->has_started = GNUNET_YES;
388   GSF_local_lookup_ (pr,
389                      &consider_forwarding,
390                      NULL);
391   return GNUNET_OK;
392 }
393
394
395 /**
396  * We're done with the local lookup, now consider
397  * P2P processing (depending on request options and
398  * result status).  Also signal that we can now
399  * receive more request information from the client.
400  *
401  * @param cls the client doing the request (`struct GNUNET_SERVER_Client`)
402  * @param pr the pending request we were processing
403  * @param result final datastore lookup result
404  */
405 static void
406 start_p2p_processing (void *cls,
407                       struct GSF_PendingRequest *pr,
408                       enum GNUNET_BLOCK_EvaluationResult result)
409 {
410   struct GNUNET_SERVER_Client *client = cls;
411   struct GSF_PendingRequestData *prd;
412
413   GNUNET_SERVER_receive_done (client,
414                               GNUNET_OK);
415   if (GNUNET_BLOCK_EVALUATION_OK_LAST == result)
416     return;                     /* we're done, 'pr' was already destroyed... */
417   prd = GSF_pending_request_get_data_ (pr);
418   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
419               "Finished database lookup for local request `%s' with result %d\n",
420               GNUNET_h2s (&prd->query), result);
421   if (0 == prd->anonymity_level)
422   {
423     switch (prd->type)
424     {
425     case GNUNET_BLOCK_TYPE_FS_DBLOCK:
426     case GNUNET_BLOCK_TYPE_FS_IBLOCK:
427       /* the above block types MAY be available via 'cadet' */
428       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
429                   "Considering cadet-based download for block\n");
430       GSF_cadet_lookup_ (pr);
431       break;
432     case GNUNET_BLOCK_TYPE_FS_UBLOCK:
433       /* the above block types are in the DHT */
434       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
435                   "Considering DHT-based search for block\n");
436       GSF_dht_lookup_ (pr);
437       break;
438     default:
439       GNUNET_break (0);
440       break;
441     }
442   }
443   consider_forwarding (NULL, pr, result);
444 }
445
446
447 /**
448  * Handle #GNUNET_MESSAGE_TYPE_FS_START_SEARCH-message (search request
449  * from client).
450  *
451  * @param cls closure
452  * @param client identification of the client
453  * @param message the actual message
454  */
455 static void
456 handle_start_search (void *cls,
457                      struct GNUNET_SERVER_Client *client,
458                      const struct GNUNET_MessageHeader *message)
459 {
460   struct GSF_PendingRequest *pr;
461   int ret;
462
463   pr = NULL;
464   ret = GSF_local_client_start_search_handler_ (client,
465                                                 message,
466                                                 &pr);
467   switch (ret)
468   {
469   case GNUNET_SYSERR:
470     GNUNET_SERVER_receive_done (client,
471                                 GNUNET_SYSERR);
472     break;
473   case GNUNET_NO:
474     GNUNET_SERVER_receive_done (client,
475                                 GNUNET_OK);
476     break;
477   case GNUNET_YES:
478     GSF_pending_request_get_data_ (pr)->has_started = GNUNET_YES;
479     GSF_local_lookup_ (pr,
480                        &start_p2p_processing,
481                        client);
482     break;
483   default:
484     GNUNET_assert (0);
485   }
486 }
487
488
489 /**
490  * Handle request to sign a LOC URI (from client).
491  *
492  * @param cls closure (NULL)
493  * @param client identification of the client
494  * @param message the actual message
495  */
496 static void
497 handle_loc_sign (void *cls,
498                  struct GNUNET_SERVER_Client *client,
499                  const struct GNUNET_MessageHeader *message)
500 {
501   const struct RequestLocSignatureMessage *msg;
502   struct GNUNET_FS_Uri base;
503   struct GNUNET_FS_Uri *loc;
504   struct ResponseLocSignatureMessage resp;
505   struct GSF_LocalClient *lc;
506
507   msg = (const struct RequestLocSignatureMessage *) message;
508   GNUNET_break (GNUNET_SIGNATURE_PURPOSE_PEER_PLACEMENT ==
509                 ntohl (msg->purpose));
510   base.type = GNUNET_FS_URI_CHK;
511   base.data.chk.chk = msg->chk;
512   base.data.chk.file_length = GNUNET_ntohll (msg->file_length);
513   loc = GNUNET_FS_uri_loc_create (&base,
514                                   pk,
515                                   GNUNET_TIME_absolute_ntoh (msg->expiration_time));
516   resp.header.size = htons (sizeof (struct ResponseLocSignatureMessage));
517   resp.header.type = htons (GNUNET_MESSAGE_TYPE_FS_REQUEST_LOC_SIGNATURE);
518   resp.purpose = htonl (GNUNET_SIGNATURE_PURPOSE_PEER_PLACEMENT);
519   resp.expiration_time = GNUNET_TIME_absolute_hton (loc->data.loc.expirationTime);
520   resp.signature = loc->data.loc.contentSignature;
521   resp.peer = loc->data.loc.peer;
522   GNUNET_FS_uri_destroy (loc);
523   lc = GSF_local_client_lookup_ (client);
524   GSF_local_client_transmit_ (lc,
525                               &resp.header);
526   GNUNET_SERVER_receive_done (client, GNUNET_OK);
527 }
528
529
530 /**
531  * Task run during shutdown.
532  *
533  * @param cls unused
534  * @param tc unused
535  */
536 static void
537 shutdown_task (void *cls,
538                const struct GNUNET_SCHEDULER_TaskContext *tc)
539 {
540   GSF_cadet_stop_client ();
541   GSF_cadet_stop_server ();
542   if (NULL != GSF_core)
543   {
544     GNUNET_CORE_disconnect (GSF_core);
545     GSF_core = NULL;
546   }
547   if (NULL != GSF_ats)
548   {
549     GNUNET_ATS_performance_done (GSF_ats);
550     GSF_ats = NULL;
551   }
552   GSF_put_done_ ();
553   GSF_push_done_ ();
554   GSF_pending_request_done_ ();
555   GSF_plan_done ();
556   GSF_connected_peer_done_ ();
557   GNUNET_DATASTORE_disconnect (GSF_dsh, GNUNET_NO);
558   GSF_dsh = NULL;
559   GNUNET_DHT_disconnect (GSF_dht);
560   GSF_dht = NULL;
561   GNUNET_BLOCK_context_destroy (GSF_block_ctx);
562   GSF_block_ctx = NULL;
563   GNUNET_CONFIGURATION_destroy (block_cfg);
564   block_cfg = NULL;
565   GNUNET_STATISTICS_destroy (GSF_stats, GNUNET_NO);
566   GSF_stats = NULL;
567   if (NULL != cover_age_task)
568   {
569     GNUNET_SCHEDULER_cancel (cover_age_task);
570     cover_age_task = NULL;
571   }
572   GNUNET_FS_indexing_done ();
573   GNUNET_LOAD_value_free (datastore_get_load);
574   datastore_get_load = NULL;
575   GNUNET_LOAD_value_free (GSF_rt_entry_lifetime);
576   GSF_rt_entry_lifetime = NULL;
577 }
578
579
580 /**
581  * Function called for each pending request whenever a new
582  * peer connects, giving us a chance to decide about submitting
583  * the existing request to the new peer.
584  *
585  * @param cls the `struct GSF_ConnectedPeer` of the new peer
586  * @param key query for the request
587  * @param pr handle to the pending request
588  * @return #GNUNET_YES to continue to iterate
589  */
590 static int
591 consider_peer_for_forwarding (void *cls,
592                               const struct GNUNET_HashCode *key,
593                               struct GSF_PendingRequest *pr)
594 {
595   struct GSF_ConnectedPeer *cp = cls;
596   struct GNUNET_PeerIdentity pid;
597
598   if (GNUNET_YES !=
599       GSF_pending_request_test_active_ (pr))
600     return GNUNET_YES; /* request is not actually active, skip! */
601   GSF_connected_peer_get_identity_ (cp, &pid);
602   if (GNUNET_YES !=
603       GSF_pending_request_test_target_ (pr, &pid))
604   {
605     GNUNET_STATISTICS_update (GSF_stats,
606                               gettext_noop ("# Loopback routes suppressed"),
607                               1,
608                               GNUNET_NO);
609     return GNUNET_YES;
610   }
611   GSF_plan_add_ (cp, pr);
612   return GNUNET_YES;
613 }
614
615
616 /**
617  * Function called after the creation of a connected peer record is complete.
618  *
619  * @param cls closure (unused)
620  * @param cp handle to the newly created connected peer record
621  */
622 static void
623 connected_peer_cb (void *cls,
624                    struct GSF_ConnectedPeer *cp)
625 {
626   if (NULL == cp)
627     return;
628   GSF_iterate_pending_requests_ (&consider_peer_for_forwarding,
629                                  cp);
630 }
631
632
633 /**
634  * Method called whenever a given peer connects.
635  *
636  * @param cls closure, not used
637  * @param peer peer identity this notification is about
638  */
639 static void
640 peer_connect_handler (void *cls,
641                       const struct GNUNET_PeerIdentity *peer)
642 {
643   if (0 ==
644       GNUNET_CRYPTO_cmp_peer_identity (&my_id,
645                                        peer))
646     return;
647   GSF_peer_connect_handler_ (peer,
648                              &connected_peer_cb,
649                              NULL);
650 }
651
652
653 /**
654  * Function called after GNUNET_CORE_connect has succeeded
655  * (or failed for good).  Note that the private key of the
656  * peer is intentionally not exposed here; if you need it,
657  * your process should try to read the private key file
658  * directly (which should work if you are authorized...).
659  *
660  * @param cls closure
661  * @param my_identity ID of this peer, NULL if we failed
662  */
663 static void
664 peer_init_handler (void *cls,
665                    const struct GNUNET_PeerIdentity *my_identity)
666 {
667   if (0 != GNUNET_CRYPTO_cmp_peer_identity (&my_id,
668                                             my_identity))
669   {
670     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
671                 "Peer identity missmatch, refusing to start!\n");
672     GNUNET_SCHEDULER_shutdown ();
673   }
674 }
675
676
677 /**
678  * Process fs requests.
679  *
680  * @param server the initialized server
681  * @param c configuration to use
682  */
683 static int
684 main_init (struct GNUNET_SERVER_Handle *server,
685            const struct GNUNET_CONFIGURATION_Handle *c)
686 {
687   static const struct GNUNET_CORE_MessageHandler no_p2p_handlers[] = {
688     { NULL, 0, 0 }
689   };
690   static const struct GNUNET_CORE_MessageHandler p2p_handlers[] = {
691     { &handle_p2p_get,
692       GNUNET_MESSAGE_TYPE_FS_GET, 0 },
693     { &handle_p2p_put,
694       GNUNET_MESSAGE_TYPE_FS_PUT, 0 },
695     { &GSF_handle_p2p_migration_stop_,
696       GNUNET_MESSAGE_TYPE_FS_MIGRATION_STOP,
697       sizeof (struct MigrationStopMessage) },
698     { NULL, 0, 0 }
699   };
700   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
701     { &GNUNET_FS_handle_index_start, NULL,
702       GNUNET_MESSAGE_TYPE_FS_INDEX_START, 0 },
703     { &GNUNET_FS_handle_index_list_get, NULL,
704       GNUNET_MESSAGE_TYPE_FS_INDEX_LIST_GET,
705       sizeof (struct GNUNET_MessageHeader) },
706     { &GNUNET_FS_handle_unindex, NULL,
707       GNUNET_MESSAGE_TYPE_FS_UNINDEX,
708       sizeof (struct UnindexMessage) },
709     { &handle_start_search, NULL,
710       GNUNET_MESSAGE_TYPE_FS_START_SEARCH, 0 },
711     { &handle_loc_sign, NULL,
712       GNUNET_MESSAGE_TYPE_FS_REQUEST_LOC_SIGN,
713       sizeof (struct RequestLocSignatureMessage) },
714     {NULL, NULL, 0, 0}
715   };
716   int anon_p2p_off;
717   char *keyfile;
718
719   /* this option is really only for testcases that need to disable
720      _anonymous_ file-sharing for some reason */
721   anon_p2p_off = (GNUNET_YES ==
722                   GNUNET_CONFIGURATION_get_value_yesno (GSF_cfg,
723                                                         "fs",
724                                                         "DISABLE_ANON_TRANSFER"));
725
726   if (GNUNET_OK !=
727       GNUNET_CONFIGURATION_get_value_filename (GSF_cfg,
728                                                "PEER",
729                                                "PRIVATE_KEY",
730                                                &keyfile))
731   {
732     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
733                 _("FS service is lacking HOSTKEY configuration setting.  Exiting.\n"));
734     GNUNET_SCHEDULER_shutdown ();
735     return GNUNET_SYSERR;
736   }
737   pk = GNUNET_CRYPTO_eddsa_key_create_from_file (keyfile);
738   GNUNET_free (keyfile);
739   GNUNET_assert (NULL != pk);
740   GNUNET_CRYPTO_eddsa_key_get_public (pk,
741                                       &my_id.public_key);
742
743   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
744               "I am peer %s\n",
745               GNUNET_i2s (&my_id));
746   GSF_core
747     = GNUNET_CORE_connect (GSF_cfg, NULL,
748                            &peer_init_handler,
749                            &peer_connect_handler,
750                            &GSF_peer_disconnect_handler_,
751                            NULL, GNUNET_NO,
752                            NULL, GNUNET_NO,
753                            (GNUNET_YES == anon_p2p_off)
754                            ? no_p2p_handlers
755                            : p2p_handlers);
756   if (NULL == GSF_core)
757   {
758     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
759                 _("Failed to connect to `%s' service.\n"), "core");
760     return GNUNET_SYSERR;
761   }
762   GNUNET_SERVER_disconnect_notify (server, &GSF_client_disconnect_handler_,
763                                    NULL);
764   GNUNET_SERVER_add_handlers (server, handlers);
765   cover_age_task =
766       GNUNET_SCHEDULER_add_delayed (COVER_AGE_FREQUENCY, &age_cover_counters,
767                                     NULL);
768   datastore_get_load = GNUNET_LOAD_value_init (DATASTORE_LOAD_AUTODECLINE);
769   GSF_cadet_start_server ();
770   GSF_cadet_start_client ();
771   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &shutdown_task,
772                                 NULL);
773   return GNUNET_OK;
774 }
775
776
777 /**
778  * Process fs requests.
779  *
780  * @param cls closure
781  * @param server the initialized server
782  * @param cfg configuration to use
783  */
784 static void
785 run (void *cls, struct GNUNET_SERVER_Handle *server,
786      const struct GNUNET_CONFIGURATION_Handle *cfg)
787 {
788   unsigned long long dqs;
789
790   GSF_cfg = cfg;
791   if (GNUNET_OK !=
792       GNUNET_CONFIGURATION_get_value_size (GSF_cfg, "fs", "DATASTORE_QUEUE_SIZE",
793                                            &dqs))
794   {
795     GNUNET_log_config_missing (GNUNET_ERROR_TYPE_INFO,
796                                "fs", "DATASTORE_QUEUE_SIZE");
797     dqs = 1024;
798   }
799   GSF_datastore_queue_size = (unsigned int) dqs;
800   GSF_enable_randomized_delays =
801       GNUNET_CONFIGURATION_get_value_yesno (cfg, "fs", "DELAY");
802   GSF_dsh = GNUNET_DATASTORE_connect (cfg);
803   if (NULL == GSF_dsh)
804   {
805     GNUNET_SCHEDULER_shutdown ();
806     return;
807   }
808   GSF_rt_entry_lifetime = GNUNET_LOAD_value_init (GNUNET_TIME_UNIT_FOREVER_REL);
809   GSF_stats = GNUNET_STATISTICS_create ("fs", cfg);
810   block_cfg = GNUNET_CONFIGURATION_create ();
811   GSF_block_ctx = GNUNET_BLOCK_context_create (block_cfg);
812   GNUNET_assert (NULL != GSF_block_ctx);
813   GSF_dht = GNUNET_DHT_connect (cfg, FS_DHT_HT_SIZE);
814   GSF_plan_init ();
815   GSF_pending_request_init_ ();
816   GSF_connected_peer_init_ ();
817   GSF_ats = GNUNET_ATS_performance_init (GSF_cfg, &update_latencies, NULL);
818   GSF_push_init_ ();
819   GSF_put_init_ ();
820   if ((GNUNET_OK != GNUNET_FS_indexing_init (cfg, GSF_dsh)) ||
821       (GNUNET_OK != main_init (server, cfg)))
822   {
823     GNUNET_SCHEDULER_shutdown ();
824     shutdown_task (NULL, NULL);
825     return;
826   }
827 }
828
829
830 /**
831  * The main function for the fs service.
832  *
833  * @param argc number of arguments from the command line
834  * @param argv command line arguments
835  * @return 0 ok, 1 on error
836  */
837 int
838 main (int argc, char *const *argv)
839 {
840   return (GNUNET_OK ==
841           GNUNET_SERVICE_run (argc, argv, "fs", GNUNET_SERVICE_OPTION_NONE,
842                               &run, NULL)) ? 0 : 1;
843 }
844
845 /* end of gnunet-service-fs.c */