Refactoring
[oweals/gnunet.git] / src / dht / gnunet-service-xdht_datacache.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009, 2010, 2011 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 /**
22  * @file dht/gnunet-service-dht_datacache.c
23  * @brief GNUnet DHT service's datacache integration
24  * @author Christian Grothoff
25  * @author Nathan Evans
26  */
27 #include "platform.h"
28 #include "gnunet_datacache_lib.h"
29 #include "gnunet-service-xdht_clients.h"
30 #include "gnunet-service-xdht_datacache.h"
31 #include "gnunet-service-xdht_routing.h"
32 #include "gnunet-service-xdht_neighbours.h"
33 #include "gnunet-service-dht.h"
34
35 #define LOG(kind,...) GNUNET_log_from (kind, "dht-dtcache",__VA_ARGS__)
36
37
38 /**
39  * Handle to the datacache service (for inserting/retrieving data)
40  */
41 static struct GNUNET_DATACACHE_Handle *datacache;
42
43
44 /**
45  * Handle a datum we've received from another peer.  Cache if
46  * possible.
47  *
48  * @param expiration when will the reply expire
49  * @param key the query this reply is for
50  * @param put_path_length number of peers in 'put_path'
51  * @param put_path path the reply took on put
52  * @param type type of the reply
53  * @param data_size number of bytes in 'data'
54  * @param data application payload data
55  */
56 void
57 GDS_DATACACHE_handle_put (struct GNUNET_TIME_Absolute expiration,
58                           const struct GNUNET_HashCode * key,
59                           unsigned int put_path_length,
60                           const struct GNUNET_PeerIdentity *put_path,
61                           enum GNUNET_BLOCK_Type type, size_t data_size,
62                           const void *data)
63 {
64   int r;
65
66   if (NULL == datacache)
67   {
68     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
69                 _("%s request received, but have no datacache!\n"), "PUT");
70     return;
71   }
72   if (data_size >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
73   {
74     GNUNET_break (0);
75     return;
76   }
77   /* Put size is actual data size plus struct overhead plus path length (if any) */
78   GNUNET_STATISTICS_update (GDS_stats,
79                             gettext_noop ("# ITEMS stored in datacache"), 1,
80                             GNUNET_NO);
81   r = GNUNET_DATACACHE_put (datacache, key, data_size, data, type, expiration,
82                             put_path_length, put_path);
83   LOG (GNUNET_ERROR_TYPE_DEBUG,
84        "DATACACHE PUT for key %s [%u] completed (%d) after %u hops\n",
85        GNUNET_h2s (key), data_size, r, put_path_length);
86 }
87
88 /**
89  * List of peers in the get path. 
90  */
91 struct GetPath
92 {
93   /**
94    * Pointer to next item in the list
95    */
96   struct GetPath *next;
97   
98   /**
99    * Pointer to previous item in the list
100    */
101   struct GetPath *prev;
102   
103   /**
104    *  An element in the get path. 
105    */
106   struct GNUNET_PeerIdentity peer;  
107 };
108
109
110 /**
111  * Context containing information about a GET request.
112  */
113 struct GetRequestContext
114 {
115   /**
116    * extended query (see gnunet_block_lib.h).
117    */
118   const void *xquery;
119
120   /**
121    * Bloomfilter to filter out duplicate replies (updated)
122    */
123   struct GNUNET_CONTAINER_BloomFilter **reply_bf;
124
125   /**
126    * The key this request was about
127    */
128   struct GNUNET_HashCode key;
129
130   /**
131    * Number of bytes in xquery.
132    */
133   size_t xquery_size;
134
135   /**
136    * Mutator value for the reply_bf, see gnunet_block_lib.h
137    */
138   uint32_t reply_bf_mutator;
139   
140   /**
141    * Total number of peers in get path. 
142    */
143   unsigned int get_path_length;
144   
145   /**
146    * Return value to give back.
147    */
148   enum GNUNET_BLOCK_EvaluationResult eval;
149   
150   /**
151    * Peeer which has the data for the key.
152    */
153   struct GNUNET_PeerIdentity source_peer;
154   
155   /**
156    * Next hop to forward the get result to.
157    */
158   struct GNUNET_PeerIdentity next_hop;
159   
160   /**
161    * Head of get path.
162    */
163   struct GetPath *head;
164   
165   /**
166    * Tail of get path.
167    */
168   struct GetPath *tail;
169   /* get_path */
170 };
171
172
173 /**
174  * Iterator for local get request results,
175  *
176  * @param cls closure for iterator, a DatacacheGetContext
177  * @param exp when does this value expire?
178  * @param key the key this data is stored under
179  * @param size the size of the data identified by key
180  * @param data the actual data
181  * @param type the type of the data
182  * @param put_path_length number of peers in 'put_path'
183  * @param put_path path the reply took on put
184  * @return GNUNET_OK to continue iteration, anything else
185  * to stop iteration.
186  */
187 static int
188 datacache_get_iterator (void *cls,
189                         const struct GNUNET_HashCode * key, size_t size,
190                         const char *data, enum GNUNET_BLOCK_Type type,
191                                           struct GNUNET_TIME_Absolute exp,
192                                           unsigned int put_path_length,
193                                           const struct GNUNET_PeerIdentity *put_path)
194 {
195   struct GetRequestContext *ctx = cls;
196   enum GNUNET_BLOCK_EvaluationResult eval;
197
198   eval =
199       GNUNET_BLOCK_evaluate (GDS_block_context, type, key, ctx->reply_bf,
200                              ctx->reply_bf_mutator, ctx->xquery,
201                              ctx->xquery_size, data, size);
202   LOG (GNUNET_ERROR_TYPE_DEBUG,
203        "Found reply for query %s in datacache, evaluation result is %d\n",
204        GNUNET_h2s (key), (int) eval);
205   ctx->eval = eval;
206   switch (eval)
207   {
208   case GNUNET_BLOCK_EVALUATION_OK_MORE:
209   case GNUNET_BLOCK_EVALUATION_OK_LAST:
210     /* forward to local clients */
211     GNUNET_STATISTICS_update (GDS_stats,
212                               gettext_noop
213                               ("# Good RESULTS found in datacache"), 1,
214                               GNUNET_NO); 
215     struct GNUNET_PeerIdentity *get_path;
216     get_path = GNUNET_malloc (sizeof (struct GNUNET_PeerIdentity));
217     struct GetPath *iterator;
218     iterator = ctx->head;
219     int i = 0;
220     while (i < ctx->get_path_length)
221     {
222       memcpy (&get_path[i], &(iterator->peer), sizeof (struct GNUNET_PeerIdentity));
223       i++;
224       iterator = iterator->next;
225     }
226     GDS_NEIGHBOURS_send_get_result (key,type, &(ctx->next_hop),&(ctx->source_peer),
227                                     put_path_length, put_path, ctx->get_path_length,
228                                     get_path, exp, data, size );
229     
230     break;
231   case GNUNET_BLOCK_EVALUATION_OK_DUPLICATE:
232     GNUNET_STATISTICS_update (GDS_stats,
233                               gettext_noop
234                               ("# Duplicate RESULTS found in datacache"), 1,
235                               GNUNET_NO);
236     break;
237   case GNUNET_BLOCK_EVALUATION_RESULT_INVALID:
238     GNUNET_STATISTICS_update (GDS_stats,
239                               gettext_noop
240                               ("# Invalid RESULTS found in datacache"), 1,
241                               GNUNET_NO);
242     break;
243   case GNUNET_BLOCK_EVALUATION_RESULT_IRRELEVANT:
244     GNUNET_STATISTICS_update (GDS_stats,
245                               gettext_noop
246                               ("# Irrelevant RESULTS found in datacache"), 1,
247                               GNUNET_NO);
248     break;
249   case GNUNET_BLOCK_EVALUATION_REQUEST_VALID:
250     GNUNET_break (0);
251     break;
252   case GNUNET_BLOCK_EVALUATION_REQUEST_INVALID:
253     GNUNET_break_op (0);
254     return GNUNET_SYSERR;
255   case GNUNET_BLOCK_EVALUATION_TYPE_NOT_SUPPORTED:
256     GNUNET_STATISTICS_update (GDS_stats,
257                               gettext_noop
258                               ("# Unsupported RESULTS found in datacache"), 1,
259                               GNUNET_NO);
260     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
261                 _("Unsupported block type (%u) in local response!\n"), type);
262     break;
263   }
264   return (eval == GNUNET_BLOCK_EVALUATION_OK_LAST) ? GNUNET_NO : GNUNET_OK;
265 }
266
267
268 /**
269  * Handle a GET request we've received from another peer.
270  *
271  * @param key the query
272  * @param type requested data type
273  * @param xquery extended query
274  * @param xquery_size number of bytes in xquery
275  * @param reply_bf where the reply bf is (to be) stored, possibly updated, can be NULL
276  * @param reply_bf_mutator mutation value for reply_bf
277  * @return evaluation result for the local replies
278  * @get_path_length Total number of peers in get path
279  * @get_path Peers in get path.
280  */
281 enum GNUNET_BLOCK_EvaluationResult
282 GDS_DATACACHE_handle_get (const struct GNUNET_HashCode * key,
283                           enum GNUNET_BLOCK_Type type, const void *xquery,
284                           size_t xquery_size,
285                           struct GNUNET_CONTAINER_BloomFilter **reply_bf,
286                           uint32_t reply_bf_mutator,
287                           uint32_t get_path_length,
288                           struct GNUNET_PeerIdentity *get_path,
289                           struct GNUNET_PeerIdentity *next_hop,
290                           struct GNUNET_PeerIdentity *source_peer)
291 {
292   struct GetRequestContext ctx;
293   unsigned int r;
294
295   if (datacache == NULL)
296     return GNUNET_BLOCK_EVALUATION_REQUEST_VALID;
297   GNUNET_STATISTICS_update (GDS_stats,
298                             gettext_noop ("# GET requests given to datacache"),
299                             1, GNUNET_NO);
300   ctx.eval = GNUNET_BLOCK_EVALUATION_REQUEST_VALID;
301   ctx.key = *key;
302   ctx.xquery = xquery;
303   ctx.xquery_size = xquery_size;
304   ctx.reply_bf = reply_bf;
305   ctx.reply_bf_mutator = reply_bf_mutator;
306   ctx.get_path_length = get_path_length;
307   if (next_hop != NULL)
308     memcpy (&(ctx.next_hop), next_hop, sizeof (struct GNUNET_PeerIdentity));
309  
310   int i = 0;
311
312   if(get_path != NULL)
313   {
314     while (i < get_path_length)
315     {
316       struct GetPath *element;
317       element = GNUNET_malloc (sizeof (struct GetPath));
318       element->next = NULL;
319       element->prev = NULL;
320     
321       memcpy (&(element->peer), &get_path[i], sizeof(struct GNUNET_PeerIdentity));
322       GNUNET_CONTAINER_DLL_insert (ctx.head, ctx.tail, element); 
323       i++;
324     }
325   }
326   
327   r = GNUNET_DATACACHE_get (datacache, key, type, &datacache_get_iterator,
328                             &ctx);
329   LOG (GNUNET_ERROR_TYPE_DEBUG,
330        "DATACACHE GET for key %s completed (%d). %u results found.\n",
331        GNUNET_h2s (key), ctx.eval, r);
332   return ctx.eval;
333 }
334
335
336 /**
337  * Initialize datacache subsystem.
338  */
339 void
340 GDS_DATACACHE_init ()
341 {
342   datacache = GNUNET_DATACACHE_create (GDS_cfg, "dhtcache");
343 }
344
345
346 /**
347  * Shutdown datacache subsystem.
348  */
349 void
350 GDS_DATACACHE_done ()
351 {
352   if (datacache != NULL)
353   {
354     GNUNET_DATACACHE_destroy (datacache);
355     datacache = NULL;
356   }
357 }
358
359
360 /* end of gnunet-service-dht_datacache.c */