src/fs/gnunet-service-fs_lc.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 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 fs/gnunet-service-fs_lc.c
  23  * @brief API to handle 'local clients'
  24  * @author Christian Grothoff
  25  */
  26
  27 #include "platform.h"
  28 #include "gnunet-service-fs.h"
  29 #include "gnunet-service-fs_lc.h"
  30 #include "gnunet-service-fs_cp.h"
  31 #include "gnunet-service-fs_pr.h"
  32
  33
  34 /**
  35  * Doubly-linked list of requests we are performing
  36  * on behalf of the same client.
  37  */
  38 struct ClientRequest
  39 {
  40
  41   /**
  42    * This is a doubly-linked list.
  43    */
  44   struct ClientRequest *next;
  45
  46   /**
  47    * This is a doubly-linked list.
  48    */
  49   struct ClientRequest *prev;
  50
  51   /**
  52    * Request this entry represents.
  53    */
  54   struct GSF_PendingRequest *pr;
  55
  56   /**
  57    * Client list this request belongs to.
  58    */
  59   struct GSF_LocalClient *lc;
  60
  61   /**
  62    * Task scheduled to destroy the request.
  63    */
  64   GNUNET_SCHEDULER_TaskIdentifier kill_task;
  65
  66 };
  67
  68
  69 /**
  70  * Replies to be transmitted to the client.  The actual
  71  * response message is allocated after this struct.
  72  */
  73 struct ClientResponse
  74 {
  75   /**
  76    * This is a doubly-linked list.
  77    */
  78   struct ClientResponse *next;
  79
  80   /**
  81    * This is a doubly-linked list.
  82    */
  83   struct ClientResponse *prev;
  84
  85   /**
  86    * Client list entry this response belongs to.
  87    */
  88   struct GSF_LocalClient *lc;
  89
  90   /**
  91    * Number of bytes in the response.
  92    */
  93   size_t msize;
  94 };
  95
  96
  97 /**
  98  * A local client.
  99  */
 100 struct GSF_LocalClient
 101 {
 102
 103   /**
 104    * We keep clients in a DLL.
 105    */
 106   struct GSF_LocalClient *next;
 107
 108   /**
 109    * We keep clients in a DLL.
 110    */
 111   struct GSF_LocalClient *prev;
 112
 113   /**
 114    * ID of the client.
 115    */
 116   struct GNUNET_SERVER_Client *client;
 117
 118   /**
 119    * Head of list of requests performed on behalf
 120    * of this client right now.
 121    */
 122   struct ClientRequest *cr_head;
 123
 124   /**
 125    * Tail of list of requests performed on behalf
 126    * of this client right now.
 127    */
 128   struct ClientRequest *cr_tail;
 129
 130   /**
 131    * Head of linked list of responses.
 132    */
 133   struct ClientResponse *res_head;
 134
 135   /**
 136    * Tail of linked list of responses.
 137    */
 138   struct ClientResponse *res_tail;
 139
 140   /**
 141    * Context for sending replies.
 142    */
 143   struct GNUNET_CONNECTION_TransmitHandle *th;
 144
 145 };
 146
 147
 148 /**
 149  * Head of linked list of our local clients.
 150  */
 151 static struct GSF_LocalClient *client_head;
 152
 153
 154 /**
 155  * Head of linked list of our local clients.
 156  */
 157 static struct GSF_LocalClient *client_tail;
 158
 159
 160 /**
 161  * Look up a local client record or create one if it
 162  * doesn't exist yet.
 163  *
 164  * @param client handle of the client
 165  * @return handle to local client entry
 166  */
 167 struct GSF_LocalClient *
 168 GSF_local_client_lookup_ (struct GNUNET_SERVER_Client *client)
 169 {
 170   struct GSF_LocalClient *pos;
 171
 172   pos = client_head;
 173   while ((pos != NULL) && (pos->client != client))
 174     pos = pos->next;
 175   if (pos != NULL)
 176     return pos;
 177   pos = GNUNET_malloc (sizeof (struct GSF_LocalClient));
 178   pos->client = client;
 179   GNUNET_CONTAINER_DLL_insert (client_head, client_tail, pos);
 180   return pos;
 181 }
 182
 183
 184 /**
 185  * Free the given client request.
 186  *
 187  * @param cls the client request to free
 188  * @param tc task context
 189  */
 190 static void
 191 client_request_destroy (void *cls,
 192                         const struct GNUNET_SCHEDULER_TaskContext *tc)
 193 {
 194   struct ClientRequest *cr = cls;
 195   struct GSF_LocalClient *lc;
 196
 197   cr->kill_task = GNUNET_SCHEDULER_NO_TASK;
 198   lc = cr->lc;
 199   GNUNET_CONTAINER_DLL_remove (lc->cr_head, lc->cr_tail, cr);
 200   GSF_pending_request_cancel_ (cr->pr, GNUNET_NO);
 201   GNUNET_STATISTICS_update (GSF_stats,
 202                             gettext_noop ("# client searches active"), -1,
 203                             GNUNET_NO);
 204   GNUNET_free (cr);
 205 }
 206
 207
 208 /**
 209  * Handle a reply to a pending request.  Also called if a request
 210  * expires (then with data == NULL).  The handler may be called
 211  * many times (depending on the request type), but will not be
 212  * called during or after a call to GSF_pending_request_cancel
 213  * and will also not be called anymore after a call signalling
 214  * expiration.
 215  *
 216  * @param cls user-specified closure
 217  * @param eval evaluation of the result
 218  * @param pr handle to the original pending request
 219  * @param reply_anonymity_level anonymity level for the reply, UINT32_MAX for "unknown"
 220  * @param expiration when does 'data' expire?
 221  * @param last_transmission when was the last time we've tried to download this block? (FOREVER if unknown)
 222  * @param type type of the block
 223  * @param data response data, NULL on request expiration
 224  * @param data_len number of bytes in data
 225  */
 226 static void
 227 client_response_handler (void *cls, enum GNUNET_BLOCK_EvaluationResult eval,
 228                          struct GSF_PendingRequest *pr,
 229                          uint32_t reply_anonymity_level,
 230                          struct GNUNET_TIME_Absolute expiration,
 231                          struct GNUNET_TIME_Absolute last_transmission,
 232                          enum GNUNET_BLOCK_Type type, const void *data,
 233                          size_t data_len)
 234 {
 235   struct ClientRequest *cr = cls;
 236   struct GSF_LocalClient *lc;
 237   struct ClientPutMessage *pm;
 238   const struct GSF_PendingRequestData *prd;
 239   size_t msize;
 240
 241   if (NULL == data)
 242   {
 243     /* ugh, request 'timed out' -- how can this be? */
 244     GNUNET_break (0);
 245     return;
 246   }
 247   prd = GSF_pending_request_get_data_ (pr);
 248   GNUNET_break (type != GNUNET_BLOCK_TYPE_ANY);
 249   if ((prd->type != type) && (prd->type != GNUNET_BLOCK_TYPE_ANY))
 250   {
 251     GNUNET_break (0);
 252     return;
 253   }
 254   GNUNET_STATISTICS_update (GSF_stats,
 255                             gettext_noop
 256                             ("# replies received for local clients"), 1,
 257                             GNUNET_NO);
 258   GNUNET_assert (pr == cr->pr);
 259   lc = cr->lc;
 260   msize = sizeof (struct ClientPutMessage) + data_len;
 261   {
 262     char buf[msize];
 263
 264     pm = (struct ClientPutMessage *) buf;
 265     pm->header.type = htons (GNUNET_MESSAGE_TYPE_FS_PUT);
 266     pm->header.size = htons (msize);
 267     pm->type = htonl (type);
 268     pm->expiration = GNUNET_TIME_absolute_hton (expiration);
 269     pm->last_transmission = GNUNET_TIME_absolute_hton (last_transmission);
 270     memcpy (&pm[1], data, data_len);
 271     GSF_local_client_transmit_ (lc, &pm->header);
 272   }
 273 #if DEBUG_FS_CLIENT
 274   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 275               "Queued reply to query `%s' for local client\n",
 276               GNUNET_h2s (&prd->query), (unsigned int) prd->type);
 277 #endif
 278   if (eval != GNUNET_BLOCK_EVALUATION_OK_LAST)
 279     return;
 280   if (GNUNET_SCHEDULER_NO_TASK != cr->kill_task)
 281     cr->kill_task = GNUNET_SCHEDULER_add_now (&client_request_destroy, cr);
 282 }
 283
 284
 285 /**
 286  * Handle START_SEARCH-message (search request from local client).
 287  * Only responsible for creating the request entry itself and setting
 288  * up reply callback and cancellation on client disconnect.  Does NOT
 289  * execute the actual request strategy (planning).
 290  *
 291  * @param client identification of the client
 292  * @param message the actual message
 293  * @param prptr where to store the pending request handle for the request
 294  * @return GNUNET_YES to start local processing,
 295  *         GNUNET_NO to not (yet) start local processing,
 296  *         GNUNET_SYSERR on error
 297  */
 298 int
 299 GSF_local_client_start_search_handler_ (struct GNUNET_SERVER_Client *client,
 300                                         const struct GNUNET_MessageHeader
 301                                         *message,
 302                                         struct GSF_PendingRequest **prptr)
 303 {
 304   static GNUNET_HashCode all_zeros;
 305   const struct SearchMessage *sm;
 306   struct GSF_LocalClient *lc;
 307   struct ClientRequest *cr;
 308   struct GSF_PendingRequestData *prd;
 309   uint16_t msize;
 310   unsigned int sc;
 311   enum GNUNET_BLOCK_Type type;
 312   enum GSF_PendingRequestOptions options;
 313
 314   msize = ntohs (message->size);
 315   if ((msize < sizeof (struct SearchMessage)) ||
 316       (0 != (msize - sizeof (struct SearchMessage)) % sizeof (GNUNET_HashCode)))
 317   {
 318     GNUNET_break (0);
 319     *prptr = NULL;
 320     return GNUNET_SYSERR;
 321   }
 322   GNUNET_STATISTICS_update (GSF_stats,
 323                             gettext_noop ("# client searches received"), 1,
 324                             GNUNET_NO);
 325   sc = (msize - sizeof (struct SearchMessage)) / sizeof (GNUNET_HashCode);
 326   sm = (const struct SearchMessage *) message;
 327   type = ntohl (sm->type);
 328 #if DEBUG_FS_CLIENT
 329   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 330               "Received request for `%s' of type %u from local client\n",
 331               GNUNET_h2s (&sm->query), (unsigned int) type);
 332 #endif
 333   lc = GSF_local_client_lookup_ (client);
 334   cr = NULL;
 335   /* detect duplicate KBLOCK requests */
 336   if ((type == GNUNET_BLOCK_TYPE_FS_KBLOCK) ||
 337       (type == GNUNET_BLOCK_TYPE_FS_NBLOCK) || (type == GNUNET_BLOCK_TYPE_ANY))
 338   {
 339     cr = lc->cr_head;
 340     while (cr != NULL)
 341     {
 342       prd = GSF_pending_request_get_data_ (cr->pr);
 343       /* only unify with queries that hae not yet started local processing
 344          (SEARCH_MESSAGE_OPTION_CONTINUED was always set) and that have a
 345          matching query and type */
 346       if ((GNUNET_YES != prd->has_started) &&
 347           (0 != memcmp (&prd->query, &sm->query, sizeof (GNUNET_HashCode))) &&
 348           (prd->type == type))
 349         break;
 350       cr = cr->next;
 351     }
 352   }
 353   if (cr != NULL)
 354   {
 355 #if DEBUG_FS_CLIENT
 356     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 357                 "Have existing request, merging content-seen lists.\n");
 358 #endif
 359     GSF_pending_request_update_ (cr->pr, (const GNUNET_HashCode *) &sm[1], sc);
 360     GNUNET_STATISTICS_update (GSF_stats,
 361                               gettext_noop
 362                               ("# client searches updated (merged content seen list)"),
 363                               1, GNUNET_NO);
 364   }
 365   else
 366   {
 367     GNUNET_STATISTICS_update (GSF_stats,
 368                               gettext_noop ("# client searches active"), 1,
 369                               GNUNET_NO);
 370     cr = GNUNET_malloc (sizeof (struct ClientRequest));
 371     cr->lc = lc;
 372     GNUNET_CONTAINER_DLL_insert (lc->cr_head, lc->cr_tail, cr);
 373     options = GSF_PRO_LOCAL_REQUEST;
 374     if (0 != (SEARCH_MESSAGE_OPTION_LOOPBACK_ONLY & ntohl (sm->options)))
 375       options |= GSF_PRO_LOCAL_ONLY;
 376     cr->pr = GSF_pending_request_create_ (options, type, &sm->query, (type == GNUNET_BLOCK_TYPE_FS_SBLOCK) ? &sm->target        /* namespace */
 377                                           : NULL,
 378                                           (0 !=
 379                                            memcmp (&sm->target, &all_zeros,
 380                                                    sizeof (GNUNET_HashCode)))
 381                                           ? (const struct GNUNET_PeerIdentity *)
 382                                           &sm->target : NULL, NULL, 0,
 383                                           0 /* bf */ ,
 384                                           ntohl (sm->anonymity_level),
 385                                           0 /* priority */ ,
 386                                           0 /* ttl */ ,
 387                                           0 /* sender PID */ ,
 388                                           0 /* origin PID */ ,
 389                                           (const GNUNET_HashCode *) &sm[1], sc,
 390                                           &client_response_handler, cr);
 391   }
 392   *prptr = cr->pr;
 393   return (0 !=
 394           (SEARCH_MESSAGE_OPTION_CONTINUED & ntohl (sm->options))) ? GNUNET_NO :
 395       GNUNET_YES;
 396 }
 397
 398
 399 /**
 400  * Transmit the given message by copying it to the target buffer
 401  * "buf".  "buf" will be NULL and "size" zero if the socket was closed
 402  * for writing in the meantime.  In that case, do nothing
 403  * (the disconnect or shutdown handler will take care of the rest).
 404  * If we were able to transmit messages and there are still more
 405  * pending, ask core again for further calls to this function.
 406  *
 407  * @param cls closure, pointer to the 'struct GSF_LocalClient'
 408  * @param size number of bytes available in buf
 409  * @param buf where the callee should write the message
 410  * @return number of bytes written to buf
 411  */
 412 static size_t
 413 transmit_to_client (void *cls, size_t size, void *buf)
 414 {
 415   struct GSF_LocalClient *lc = cls;
 416   char *cbuf = buf;
 417   struct ClientResponse *res;
 418   size_t msize;
 419
 420   lc->th = NULL;
 421   if (NULL == buf)
 422     return 0;
 423   msize = 0;
 424   while ((NULL != (res = lc->res_head)) && (res->msize <= size))
 425   {
 426     memcpy (&cbuf[msize], &res[1], res->msize);
 427     msize += res->msize;
 428     size -= res->msize;
 429     GNUNET_CONTAINER_DLL_remove (lc->res_head, lc->res_tail, res);
 430     GNUNET_free (res);
 431   }
 432   if (NULL != res)
 433     lc->th =
 434         GNUNET_SERVER_notify_transmit_ready (lc->client, res->msize,
 435                                              GNUNET_TIME_UNIT_FOREVER_REL,
 436                                              &transmit_to_client, lc);
 437   return msize;
 438 }
 439
 440
 441 /**
 442  * Transmit a message to the given local client as soon as possible.
 443  * If the client disconnects before transmission, the message is
 444  * simply discarded.
 445  *
 446  * @param lc recipient
 447  * @param msg message to transmit to client
 448  */
 449 void
 450 GSF_local_client_transmit_ (struct GSF_LocalClient *lc,
 451                             const struct GNUNET_MessageHeader *msg)
 452 {
 453   struct ClientResponse *res;
 454   size_t msize;
 455
 456   msize = ntohs (msg->size);
 457   res = GNUNET_malloc (sizeof (struct ClientResponse) + msize);
 458   res->lc = lc;
 459   res->msize = msize;
 460   memcpy (&res[1], msg, msize);
 461   GNUNET_CONTAINER_DLL_insert_tail (lc->res_head, lc->res_tail, res);
 462   if (NULL == lc->th)
 463     lc->th =
 464         GNUNET_SERVER_notify_transmit_ready (lc->client, msize,
 465                                              GNUNET_TIME_UNIT_FOREVER_REL,
 466                                              &transmit_to_client, lc);
 467 }
 468
 469
 470 /**
 471  * A client disconnected from us.  Tear down the local client
 472  * record.
 473  *
 474  * @param cls unused
 475  * @param client handle of the client
 476  */
 477 void
 478 GSF_client_disconnect_handler_ (void *cls, struct GNUNET_SERVER_Client *client)
 479 {
 480   struct GSF_LocalClient *pos;
 481   struct ClientRequest *cr;
 482   struct ClientResponse *res;
 483
 484   pos = client_head;
 485   while ((pos != NULL) && (pos->client != client))
 486     pos = pos->next;
 487   if (pos == NULL)
 488     return;
 489   while (NULL != (cr = pos->cr_head))
 490   {
 491     GNUNET_CONTAINER_DLL_remove (pos->cr_head, pos->cr_tail, cr);
 492     GSF_pending_request_cancel_ (cr->pr, GNUNET_NO);
 493     GNUNET_STATISTICS_update (GSF_stats,
 494                               gettext_noop ("# client searches active"), -1,
 495                               GNUNET_NO);
 496     if (GNUNET_SCHEDULER_NO_TASK != cr->kill_task)
 497       GNUNET_SCHEDULER_cancel (cr->kill_task);
 498     GNUNET_free (cr);
 499   }
 500   while (NULL != (res = pos->res_head))
 501   {
 502     GNUNET_CONTAINER_DLL_remove (pos->res_head, pos->res_tail, res);
 503     GNUNET_free (res);
 504   }
 505   if (pos->th != NULL)
 506   {
 507     GNUNET_CONNECTION_notify_transmit_ready_cancel (pos->th);
 508     pos->th = NULL;
 509   }
 510   GSF_handle_local_client_disconnect_ (pos);
 511   GNUNET_CONTAINER_DLL_remove (client_head, client_tail, pos);
 512   GNUNET_free (pos);
 513 }
 514
 515
 516 /* end of gnunet-service-fs_lc.c */