aboutsummaryrefslogtreecommitdiff
path: root/src/core/gnunet-service-core_clients.c
diff options
context:
space:
mode:
authorChristian Grothoff <christian@grothoff.org>2016-09-20 15:14:05 +0000
committerChristian Grothoff <christian@grothoff.org>2016-09-20 15:14:05 +0000
commit5663ca18885242fca4dd209898ffda9cbe675c58 (patch)
treeeba7a80df59830aefd927a5a5383e47b353d5a09 /src/core/gnunet-service-core_clients.c
parent7e835e78aa82869715c9aee96a73ba40aad3f39f (diff)
downloadgnunet-5663ca18885242fca4dd209898ffda9cbe675c58.tar.gz
gnunet-5663ca18885242fca4dd209898ffda9cbe675c58.zip
converting core service to new service API
Diffstat (limited to 'src/core/gnunet-service-core_clients.c')
-rw-r--r--src/core/gnunet-service-core_clients.c960
1 files changed, 0 insertions, 960 deletions
diff --git a/src/core/gnunet-service-core_clients.c b/src/core/gnunet-service-core_clients.c
deleted file mode 100644
index 5db33f04b..000000000
--- a/src/core/gnunet-service-core_clients.c
+++ /dev/null
@@ -1,960 +0,0 @@
1/*
2 This file is part of GNUnet.
3 Copyright (C) 2009, 2010, 2011 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 core/gnunet-service-core_clients.c
23 * @brief code for managing interactions with clients of core service
24 * @author Christian Grothoff
25 */
26#include "platform.h"
27#include "gnunet_util_lib.h"
28#include "gnunet_statistics_service.h"
29#include "gnunet_transport_service.h"
30#include "gnunet-service-core.h"
31#include "gnunet-service-core_clients.h"
32#include "gnunet-service-core_sessions.h"
33#include "gnunet-service-core_typemap.h"
34#include "core.h"
35
36
37/**
38 * How many messages do we queue up at most for optional
39 * notifications to a client? (this can cause notifications
40 * about outgoing messages to be dropped).
41 */
42#define MAX_NOTIFY_QUEUE 1024
43
44
45/**
46 * Data structure for each client connected to the CORE service.
47 */
48struct GSC_Client
49{
50 /**
51 * Clients are kept in a linked list.
52 */
53 struct GSC_Client *next;
54
55 /**
56 * Clients are kept in a linked list.
57 */
58 struct GSC_Client *prev;
59
60 /**
61 * Handle for the client with the server API.
62 */
63 struct GNUNET_SERVER_Client *client_handle;
64
65 /**
66 * Array of the types of messages this peer cares
67 * about (with @e tcnt entries). Allocated as part
68 * of this client struct, do not free!
69 */
70 const uint16_t *types;
71
72 /**
73 * Map of peer identities to active transmission requests of this
74 * client to the peer (of type `struct GSC_ClientActiveRequest`).
75 */
76 struct GNUNET_CONTAINER_MultiPeerMap *requests;
77
78 /**
79 * Map containing all peers that this client knows we're connected to.
80 */
81 struct GNUNET_CONTAINER_MultiPeerMap *connectmap;
82
83 /**
84 * Options for messages this client cares about,
85 * see GNUNET_CORE_OPTION_ values.
86 */
87 uint32_t options;
88
89 /**
90 * Number of types of incoming messages this client
91 * specifically cares about. Size of the @e types array.
92 */
93 unsigned int tcnt;
94
95};
96
97
98/**
99 * Big "or" of all client options.
100 */
101static uint32_t all_client_options;
102
103/**
104 * Head of linked list of our clients.
105 */
106static struct GSC_Client *client_head;
107
108/**
109 * Tail of linked list of our clients.
110 */
111static struct GSC_Client *client_tail;
112
113/**
114 * Context for notifications we need to send to our clients.
115 */
116static struct GNUNET_SERVER_NotificationContext *notifier;
117
118/**
119 * Tokenizer for messages received from clients.
120 */
121static struct GNUNET_SERVER_MessageStreamTokenizer *client_mst;
122
123
124/**
125 * Lookup our client struct given the server's client handle.
126 *
127 * @param client server client handle to look up
128 * @return our client handle for the client
129 */
130static struct GSC_Client *
131find_client (struct GNUNET_SERVER_Client *client)
132{
133 struct GSC_Client *c;
134
135 c = client_head;
136 while ((c != NULL) && (c->client_handle != client))
137 c = c->next;
138 return c;
139}
140
141
142/**
143 * Send a message to one of our clients.
144 *
145 * @param client target for the message
146 * @param msg message to transmit
147 * @param can_drop could this message be dropped if the
148 * client's queue is getting too large?
149 */
150static void
151send_to_client (struct GSC_Client *client,
152 const struct GNUNET_MessageHeader *msg,
153 int can_drop)
154{
155 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
156 "Preparing to send %u bytes of message of type %u to client.\n",
157 (unsigned int) ntohs (msg->size),
158 (unsigned int) ntohs (msg->type));
159 GNUNET_SERVER_notification_context_unicast (notifier, client->client_handle,
160 msg, can_drop);
161}
162
163
164/**
165 * Send a message to one of our clients.
166 *
167 * @param client target for the message
168 * @param msg message to transmit
169 * @param can_drop could this message be dropped if the
170 * client's queue is getting too large?
171 */
172void
173GSC_CLIENTS_send_to_client (struct GNUNET_SERVER_Client *client,
174 const struct GNUNET_MessageHeader *msg,
175 int can_drop)
176{
177 struct GSC_Client *c;
178
179 c = find_client (client);
180 if (NULL == c)
181 {
182 GNUNET_break (0);
183 return;
184 }
185 send_to_client (c, msg, can_drop);
186}
187
188
189/**
190 * Test if the client is interested in messages of the given type.
191 *
192 * @param type message type
193 * @param c client to test
194 * @return #GNUNET_YES if @a c is interested, #GNUNET_NO if not.
195 */
196static int
197type_match (uint16_t type, struct GSC_Client *c)
198{
199 unsigned int i;
200
201 if (c->tcnt == 0 && c->options != 0)
202 return GNUNET_YES; /* peer without handlers and inbound/outbond
203 callbacks matches ALL */
204 for (i = 0; i < c->tcnt; i++)
205 if (type == c->types[i])
206 return GNUNET_YES;
207 return GNUNET_NO;
208}
209
210
211/**
212 * Send a message to all of our current clients that have the right
213 * options set.
214 *
215 * @param partner origin (or destination) of the message (used to check that this peer is
216 * known to be connected to the respective client)
217 * @param msg message to multicast
218 * @param can_drop can this message be discarded if the queue is too long
219 * @param options mask to use
220 * @param type type of the embedded message, 0 for none
221 */
222static void
223send_to_all_clients (const struct GNUNET_PeerIdentity *partner,
224 const struct GNUNET_MessageHeader *msg,
225 int can_drop,
226 uint32_t options,
227 uint16_t type)
228{
229 struct GSC_Client *c;
230 int tm;
231
232 for (c = client_head; NULL != c; c = c->next)
233 {
234 tm = type_match (type, c);
235 if (! ( (0 != (c->options & options)) ||
236 ( (0 != (options & GNUNET_CORE_OPTION_SEND_FULL_INBOUND)) &&
237 (GNUNET_YES == tm) ) ) )
238 continue; /* neither options nor type match permit the message */
239 if ( (0 != (options & GNUNET_CORE_OPTION_SEND_HDR_INBOUND)) &&
240 ( (0 != (c->options & GNUNET_CORE_OPTION_SEND_FULL_INBOUND)) ||
241 (GNUNET_YES == tm) ) )
242 continue;
243 if ( (0 != (options & GNUNET_CORE_OPTION_SEND_HDR_OUTBOUND)) &&
244 (0 != (c->options & GNUNET_CORE_OPTION_SEND_FULL_OUTBOUND)) )
245 continue;
246 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
247 "Sending %u message with %u bytes to client interested in messages of type %u.\n",
248 options,
249 ntohs (msg->size),
250 (unsigned int) type);
251 GNUNET_assert ( (0 == (c->options & GNUNET_CORE_OPTION_SEND_FULL_INBOUND)) ||
252 (GNUNET_YES != tm) ||
253 (GNUNET_YES ==
254 GNUNET_CONTAINER_multipeermap_contains (c->connectmap,
255 partner)) );
256 send_to_client (c, msg, can_drop);
257 }
258}
259
260
261/**
262 * Handle #GNUNET_MESSAGE_TYPE_CORE_INIT request.
263 *
264 * @param cls unused
265 * @param client new client that sent #GNUNET_MESSAGE_TYPE_CORE_INIT
266 * @param message the `struct InitMessage` (presumably)
267 */
268static void
269handle_client_init (void *cls,
270 struct GNUNET_SERVER_Client *client,
271 const struct GNUNET_MessageHeader *message)
272{
273 const struct InitMessage *im;
274 struct InitReplyMessage irm;
275 struct GSC_Client *c;
276 uint16_t msize;
277 const uint16_t *types;
278 uint16_t *wtypes;
279 unsigned int i;
280
281 /* check that we don't have an entry already */
282 c = find_client (client);
283 if (NULL != c)
284 {
285 GNUNET_break (0);
286 GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
287 return;
288 }
289 msize = ntohs (message->size);
290 if (msize < sizeof (struct InitMessage))
291 {
292 GNUNET_break (0);
293 GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
294 return;
295 }
296 GNUNET_SERVER_notification_context_add (notifier, client);
297 im = (const struct InitMessage *) message;
298 types = (const uint16_t *) &im[1];
299 msize -= sizeof (struct InitMessage);
300 c = GNUNET_malloc (sizeof (struct GSC_Client) + msize);
301 c->client_handle = client;
302 c->tcnt = msize / sizeof (uint16_t);
303 c->options = ntohl (im->options);
304 all_client_options |= c->options;
305 c->types = (const uint16_t *) &c[1];
306 c->connectmap = GNUNET_CONTAINER_multipeermap_create (16, GNUNET_NO);
307 GNUNET_assert (GNUNET_YES ==
308 GNUNET_CONTAINER_multipeermap_put (c->connectmap,
309 &GSC_my_identity,
310 NULL,
311 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
312 wtypes = (uint16_t *) & c[1];
313 for (i = 0; i < c->tcnt; i++)
314 wtypes[i] = ntohs (types[i]);
315 GSC_TYPEMAP_add (wtypes, c->tcnt);
316 GNUNET_CONTAINER_DLL_insert (client_head, client_tail, c);
317 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
318 "Client connecting to core service is interested in %u message types\n",
319 (unsigned int) c->tcnt);
320 /* send init reply message */
321 irm.header.size = htons (sizeof (struct InitReplyMessage));
322 irm.header.type = htons (GNUNET_MESSAGE_TYPE_CORE_INIT_REPLY);
323 irm.reserved = htonl (0);
324 irm.my_identity = GSC_my_identity;
325 send_to_client (c, &irm.header, GNUNET_NO);
326 GSC_SESSIONS_notify_client_about_sessions (c);
327 GNUNET_SERVER_receive_done (client, GNUNET_OK);
328}
329
330
331/**
332 * Handle #GNUNET_MESSAGE_TYPE_CORE_SEND_REQUEST message.
333 *
334 * @param cls unused
335 * @param client new client that sent a #GNUNET_MESSAGE_TYPE_CORE_SEND_REQUEST
336 * @param message the `struct SendMessageRequest` (presumably)
337 */
338static void
339handle_client_send_request (void *cls,
340 struct GNUNET_SERVER_Client *client,
341 const struct GNUNET_MessageHeader *message)
342{
343 const struct SendMessageRequest *req;
344 struct GSC_Client *c;
345 struct GSC_ClientActiveRequest *car;
346 int is_loopback;
347
348 req = (const struct SendMessageRequest *) message;
349 c = find_client (client);
350 if (NULL == c)
351 {
352 /* client did not send INIT first! */
353 GNUNET_break (0);
354 GNUNET_SERVER_receive_done (client,
355 GNUNET_SYSERR);
356 return;
357 }
358 if (NULL == c->requests)
359 c->requests = GNUNET_CONTAINER_multipeermap_create (16,
360 GNUNET_NO);
361 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
362 "Client asked for transmission to `%s'\n",
363 GNUNET_i2s (&req->peer));
364 is_loopback =
365 (0 ==
366 memcmp (&req->peer,
367 &GSC_my_identity,
368 sizeof (struct GNUNET_PeerIdentity)));
369 if ((! is_loopback) &&
370 (GNUNET_YES !=
371 GNUNET_CONTAINER_multipeermap_contains (c->connectmap,
372 &req->peer)))
373 {
374 /* neighbour must have disconnected since request was issued,
375 * ignore (client will realize it once it processes the
376 * disconnect notification) */
377 GNUNET_STATISTICS_update (GSC_stats,
378 gettext_noop
379 ("# send requests dropped (disconnected)"), 1,
380 GNUNET_NO);
381 GNUNET_SERVER_receive_done (client,
382 GNUNET_OK);
383 return;
384 }
385
386 car = GNUNET_CONTAINER_multipeermap_get (c->requests,
387 &req->peer);
388 if (NULL == car)
389 {
390 /* create new entry */
391 car = GNUNET_new (struct GSC_ClientActiveRequest);
392 GNUNET_assert (GNUNET_OK ==
393 GNUNET_CONTAINER_multipeermap_put (c->requests,
394 &req->peer,
395 car,
396 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST));
397 car->client_handle = c;
398 }
399 else
400 {
401 /* dequeue and recycle memory from pending request, there can only
402 be at most one per client and peer */
403 GNUNET_STATISTICS_update (GSC_stats,
404 gettext_noop ("# dequeuing CAR (duplicate request)"),
405 1,
406 GNUNET_NO);
407 GSC_SESSIONS_dequeue_request (car);
408 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
409 "Transmission request to `%s' was a duplicate!\n",
410 GNUNET_i2s (&req->peer));
411 }
412 car->target = req->peer;
413 car->received_time = GNUNET_TIME_absolute_get ();
414 car->deadline = GNUNET_TIME_absolute_ntoh (req->deadline);
415 car->priority = (enum GNUNET_CORE_Priority) ntohl (req->priority);
416 car->msize = ntohs (req->size);
417 car->smr_id = req->smr_id;
418 car->was_solicited = GNUNET_NO;
419 if (is_loopback)
420 {
421 /* loopback, satisfy immediately */
422 GSC_CLIENTS_solicit_request (car);
423 GNUNET_SERVER_receive_done (client, GNUNET_OK);
424 return;
425 }
426 GSC_SESSIONS_queue_request (car);
427 GNUNET_SERVER_receive_done (client, GNUNET_OK);
428}
429
430
431/**
432 * Closure for the #client_tokenizer_callback().
433 */
434struct TokenizerContext
435{
436
437 /**
438 * Active request handle for the message.
439 */
440 struct GSC_ClientActiveRequest *car;
441
442 /**
443 * How important is this message.
444 */
445 enum GNUNET_CORE_Priority priority;
446
447 /**
448 * Is corking allowed (set only once we have the real message).
449 */
450 int cork;
451
452};
453
454
455/**
456 * Handle #GNUNET_MESSAGE_TYPE_CORE_SEND request.
457 *
458 * @param cls unused
459 * @param client the client issuing the request
460 * @param message the `struct SendMessage`
461 */
462static void
463handle_client_send (void *cls,
464 struct GNUNET_SERVER_Client *client,
465 const struct GNUNET_MessageHeader *message)
466{
467 const struct SendMessage *sm;
468 struct GSC_Client *c;
469 struct TokenizerContext tc;
470 uint16_t msize;
471 struct GNUNET_TIME_Relative delay;
472
473 msize = ntohs (message->size);
474 if (msize < sizeof (struct SendMessage))
475 {
476 GNUNET_break (0);
477 GNUNET_SERVER_receive_done (client,
478 GNUNET_SYSERR);
479 return;
480 }
481 sm = (const struct SendMessage *) message;
482 msize -= sizeof (struct SendMessage);
483 GNUNET_break (0 == ntohl (sm->reserved));
484 c = find_client (client);
485 if (NULL == c)
486 {
487 /* client did not send INIT first! */
488 GNUNET_break (0);
489 GNUNET_SERVER_receive_done (client,
490 GNUNET_SYSERR);
491 return;
492 }
493 tc.car = GNUNET_CONTAINER_multipeermap_get (c->requests,
494 &sm->peer);
495 if (NULL == tc.car)
496 {
497 /* Must have been that we first approved the request, then got disconnected
498 * (which triggered removal of the 'car') and now the client gives us a message
499 * just *before* the client learns about the disconnect. Theoretically, we
500 * might also now be *again* connected. So this can happen (but should be
501 * rare). If it does happen, the message is discarded. */
502 GNUNET_STATISTICS_update (GSC_stats,
503 gettext_noop ("# messages discarded (session disconnected)"),
504 1,
505 GNUNET_NO);
506 GNUNET_SERVER_receive_done (client,
507 GNUNET_OK);
508 return;
509 }
510 delay = GNUNET_TIME_absolute_get_duration (tc.car->received_time);
511 tc.cork = ntohl (sm->cork);
512 tc.priority = (enum GNUNET_CORE_Priority) ntohl (sm->priority);
513 if (delay.rel_value_us > GNUNET_CONSTANTS_LATENCY_WARN.rel_value_us)
514 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
515 "Client waited %s for transmission of %u bytes to `%s'%s\n",
516 GNUNET_STRINGS_relative_time_to_string (delay,
517 GNUNET_YES),
518 msize,
519 GNUNET_i2s (&sm->peer),
520 tc.cork ? " (cork)" : " (uncorked)");
521 else
522 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
523 "Client waited %s for transmission of %u bytes to `%s'%s\n",
524 GNUNET_STRINGS_relative_time_to_string (delay,
525 GNUNET_YES),
526 msize,
527 GNUNET_i2s (&sm->peer),
528 tc.cork ? " (cork)" : " (uncorked)");
529
530 GNUNET_assert (GNUNET_YES ==
531 GNUNET_CONTAINER_multipeermap_remove (c->requests,
532 &sm->peer,
533 tc.car));
534 GNUNET_SERVER_mst_receive (client_mst, &tc,
535 (const char *) &sm[1],
536 msize,
537 GNUNET_YES,
538 GNUNET_NO);
539 GSC_SESSIONS_dequeue_request (tc.car);
540 GNUNET_free (tc.car);
541 GNUNET_SERVER_receive_done (client,
542 GNUNET_OK);
543}
544
545
546/**
547 * Functions with this signature are called whenever a complete
548 * message is received by the tokenizer. Used by the 'client_mst' for
549 * dispatching messages from clients to either the SESSION subsystem
550 * or other CLIENT (for loopback).
551 *
552 * @param cls closure
553 * @param client reservation request (`struct GSC_ClientActiveRequest`)
554 * @param message the actual message
555 */
556static int
557client_tokenizer_callback (void *cls,
558 void *client,
559 const struct GNUNET_MessageHeader *message)
560{
561 struct TokenizerContext *tc = client;
562 struct GSC_ClientActiveRequest *car = tc->car;
563 char buf[92];
564
565 GNUNET_snprintf (buf, sizeof (buf),
566 gettext_noop ("# bytes of messages of type %u received"),
567 (unsigned int) ntohs (message->type));
568 GNUNET_STATISTICS_update (GSC_stats,
569 buf,
570 ntohs (message->size),
571 GNUNET_NO);
572 if (0 ==
573 memcmp (&car->target,
574 &GSC_my_identity,
575 sizeof (struct GNUNET_PeerIdentity)))
576 {
577 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
578 "Delivering message of type %u to myself\n",
579 ntohs (message->type));
580 GSC_CLIENTS_deliver_message (&GSC_my_identity, message,
581 ntohs (message->size),
582 GNUNET_CORE_OPTION_SEND_FULL_OUTBOUND);
583 GSC_CLIENTS_deliver_message (&GSC_my_identity, message,
584 sizeof (struct GNUNET_MessageHeader),
585 GNUNET_CORE_OPTION_SEND_HDR_OUTBOUND);
586 GSC_CLIENTS_deliver_message (&GSC_my_identity, message,
587 ntohs (message->size),
588 GNUNET_CORE_OPTION_SEND_FULL_INBOUND);
589 GSC_CLIENTS_deliver_message (&GSC_my_identity, message,
590 sizeof (struct GNUNET_MessageHeader),
591 GNUNET_CORE_OPTION_SEND_HDR_INBOUND);
592 }
593 else
594 {
595 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
596 "Delivering message of type %u and size %u to %s\n",
597 ntohs (message->type), ntohs (message->size),
598 GNUNET_i2s (&car->target));
599 GSC_CLIENTS_deliver_message (&car->target, message,
600 ntohs (message->size),
601 GNUNET_CORE_OPTION_SEND_FULL_OUTBOUND);
602 GSC_CLIENTS_deliver_message (&car->target, message,
603 sizeof (struct GNUNET_MessageHeader),
604 GNUNET_CORE_OPTION_SEND_HDR_OUTBOUND);
605 GSC_SESSIONS_transmit (car,
606 message,
607 tc->cork,
608 tc->priority);
609 }
610 return GNUNET_OK;
611}
612
613
614/**
615 * Free client request records.
616 *
617 * @param cls NULL
618 * @param key identity of peer for which this is an active request
619 * @param value the `struct GSC_ClientActiveRequest` to free
620 * @return #GNUNET_YES (continue iteration)
621 */
622static int
623destroy_active_client_request (void *cls,
624 const struct GNUNET_PeerIdentity *key,
625 void *value)
626{
627 struct GSC_ClientActiveRequest *car = value;
628
629 GNUNET_assert (GNUNET_YES ==
630 GNUNET_CONTAINER_multipeermap_remove (car->
631 client_handle->requests,
632 &car->target,
633 car));
634 GSC_SESSIONS_dequeue_request (car);
635 GNUNET_free (car);
636 return GNUNET_YES;
637}
638
639
640/**
641 * A client disconnected, clean up.
642 *
643 * @param cls closure
644 * @param client identification of the client
645 */
646static void
647handle_client_disconnect (void *cls,
648 struct GNUNET_SERVER_Client *client)
649{
650 struct GSC_Client *c;
651
652 if (NULL == client)
653 return;
654 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
655 "Client %p has disconnected from core service.\n",
656 client);
657 c = find_client (client);
658 if (c == NULL)
659 return; /* client never sent INIT */
660 GNUNET_CONTAINER_DLL_remove (client_head, client_tail, c);
661 if (c->requests != NULL)
662 {
663 GNUNET_CONTAINER_multipeermap_iterate (c->requests,
664 &destroy_active_client_request,
665 NULL);
666 GNUNET_CONTAINER_multipeermap_destroy (c->requests);
667 }
668 GNUNET_CONTAINER_multipeermap_destroy (c->connectmap);
669 c->connectmap = NULL;
670 GSC_TYPEMAP_remove (c->types, c->tcnt);
671 GNUNET_free (c);
672
673 /* recalculate 'all_client_options' */
674 all_client_options = 0;
675 for (c = client_head; NULL != c ; c = c->next)
676 all_client_options |= c->options;
677}
678
679
680/**
681 * Tell a client that we are ready to receive the message.
682 *
683 * @param car request that is now ready; the responsibility
684 * for the handle remains shared between CLIENTS
685 * and SESSIONS after this call.
686 */
687void
688GSC_CLIENTS_solicit_request (struct GSC_ClientActiveRequest *car)
689{
690 struct GSC_Client *c;
691 struct SendMessageReady smr;
692 struct GNUNET_TIME_Relative delay;
693 struct GNUNET_TIME_Relative left;
694
695 c = car->client_handle;
696 if (GNUNET_YES !=
697 GNUNET_CONTAINER_multipeermap_contains (c->connectmap,
698 &car->target))
699 {
700 /* connection has gone down since, drop request */
701 GNUNET_assert (0 !=
702 memcmp (&car->target,
703 &GSC_my_identity,
704 sizeof (struct GNUNET_PeerIdentity)));
705 GSC_SESSIONS_dequeue_request (car);
706 GSC_CLIENTS_reject_request (car,
707 GNUNET_NO);
708 return;
709 }
710 delay = GNUNET_TIME_absolute_get_duration (car->received_time);
711 left = GNUNET_TIME_absolute_get_duration (car->deadline);
712 if (delay.rel_value_us > GNUNET_CONSTANTS_LATENCY_WARN.rel_value_us)
713 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
714 "Client waited %s for permission to transmit to `%s'%s (priority %u)\n",
715 GNUNET_STRINGS_relative_time_to_string (delay,
716 GNUNET_YES),
717 GNUNET_i2s (&car->target),
718 (0 == left.rel_value_us)
719 ? " (past deadline)"
720 : "",
721 car->priority);
722 smr.header.size = htons (sizeof (struct SendMessageReady));
723 smr.header.type = htons (GNUNET_MESSAGE_TYPE_CORE_SEND_READY);
724 smr.size = htons (car->msize);
725 smr.smr_id = car->smr_id;
726 smr.peer = car->target;
727 send_to_client (c, &smr.header, GNUNET_NO);
728}
729
730
731/**
732 * We will never be ready to transmit the given message in (disconnect
733 * or invalid request). Frees resources associated with @a car. We
734 * don't explicitly tell the client, he'll learn with the disconnect
735 * (or violated the protocol).
736 *
737 * @param car request that now permanently failed; the
738 * responsibility for the handle is now returned
739 * to CLIENTS (SESSIONS is done with it).
740 * @param drop_client #GNUNET_YES if the client violated the protocol
741 * and we should thus drop the connection
742 */
743void
744GSC_CLIENTS_reject_request (struct GSC_ClientActiveRequest *car,
745 int drop_client)
746{
747 GNUNET_assert (GNUNET_YES ==
748 GNUNET_CONTAINER_multipeermap_remove (car->
749 client_handle->requests,
750 &car->target,
751 car));
752 if (GNUNET_YES == drop_client)
753 GNUNET_SERVER_client_disconnect (car->client_handle->client_handle);
754 GNUNET_free (car);
755}
756
757
758/**
759 * Notify a particular client about a change to existing connection to
760 * one of our neighbours (check if the client is interested). Called
761 * from 'GSC_SESSIONS_notify_client_about_sessions'.
762 *
763 * @param client client to notify
764 * @param neighbour identity of the neighbour that changed status
765 * @param tmap_old previous type map for the neighbour, NULL for connect
766 * @param tmap_new updated type map for the neighbour, NULL for disconnect
767 */
768void
769GSC_CLIENTS_notify_client_about_neighbour (struct GSC_Client *client,
770 const struct GNUNET_PeerIdentity *neighbour,
771 const struct GSC_TypeMap *tmap_old,
772 const struct GSC_TypeMap *tmap_new)
773{
774 struct ConnectNotifyMessage *cnm;
775 size_t size;
776 char buf[GNUNET_SERVER_MAX_MESSAGE_SIZE - 1] GNUNET_ALIGN;
777 struct DisconnectNotifyMessage dcm;
778 int old_match;
779 int new_match;
780
781 old_match = GSC_TYPEMAP_test_match (tmap_old, client->types, client->tcnt);
782 new_match = GSC_TYPEMAP_test_match (tmap_new, client->types, client->tcnt);
783 if (old_match == new_match)
784 {
785 GNUNET_assert (old_match ==
786 GNUNET_CONTAINER_multipeermap_contains (client->connectmap,
787 neighbour));
788 return; /* no change */
789 }
790 if (old_match == GNUNET_NO)
791 {
792 /* send connect */
793 GNUNET_assert (GNUNET_NO ==
794 GNUNET_CONTAINER_multipeermap_contains (client->connectmap,
795 neighbour));
796 GNUNET_assert (GNUNET_YES ==
797 GNUNET_CONTAINER_multipeermap_put (client->connectmap,
798 neighbour,
799 NULL,
800 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
801 size = sizeof (struct ConnectNotifyMessage);
802 cnm = (struct ConnectNotifyMessage *) buf;
803 cnm->header.size = htons (size);
804 cnm->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_NOTIFY_CONNECT);
805 cnm->reserved = htonl (0);
806 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
807 "Sending `%s' message to client.\n",
808 "NOTIFY_CONNECT");
809 cnm->peer = *neighbour;
810 send_to_client (client, &cnm->header, GNUNET_NO);
811 }
812 else
813 {
814 /* send disconnect */
815 GNUNET_assert (GNUNET_YES ==
816 GNUNET_CONTAINER_multipeermap_contains (client->connectmap,
817 neighbour));
818 GNUNET_assert (GNUNET_YES ==
819 GNUNET_CONTAINER_multipeermap_remove (client->connectmap,
820 neighbour,
821 NULL));
822 dcm.header.size = htons (sizeof (struct DisconnectNotifyMessage));
823 dcm.header.type = htons (GNUNET_MESSAGE_TYPE_CORE_NOTIFY_DISCONNECT);
824 dcm.reserved = htonl (0);
825 dcm.peer = *neighbour;
826 send_to_client (client, &dcm.header, GNUNET_NO);
827 }
828}
829
830
831/**
832 * Notify all clients about a change to existing session.
833 * Called from SESSIONS whenever there is a change in sessions
834 * or types processed by the respective peer.
835 *
836 * @param neighbour identity of the neighbour that changed status
837 * @param tmap_old previous type map for the neighbour, NULL for connect
838 * @param tmap_new updated type map for the neighbour, NULL for disconnect
839 */
840void
841GSC_CLIENTS_notify_clients_about_neighbour (const struct GNUNET_PeerIdentity *neighbour,
842 const struct GSC_TypeMap *tmap_old,
843 const struct GSC_TypeMap *tmap_new)
844{
845 struct GSC_Client *c;
846
847 for (c = client_head; NULL != c; c = c->next)
848 GSC_CLIENTS_notify_client_about_neighbour (c, neighbour,
849 tmap_old, tmap_new);
850}
851
852
853/**
854 * Deliver P2P message to interested clients. Caller must have checked
855 * that the sending peer actually lists the given message type as one
856 * of its types.
857 *
858 * @param sender peer who sent us the message
859 * @param msg the message
860 * @param msize number of bytes to transmit
861 * @param options options for checking which clients should
862 * receive the message
863 */
864void
865GSC_CLIENTS_deliver_message (const struct GNUNET_PeerIdentity *sender,
866 const struct GNUNET_MessageHeader *msg,
867 uint16_t msize,
868 uint32_t options)
869{
870 size_t size = msize + sizeof (struct NotifyTrafficMessage);
871 char buf[size] GNUNET_ALIGN;
872 struct NotifyTrafficMessage *ntm;
873
874 if (size >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
875 {
876 GNUNET_break (0);
877 /* recovery strategy: throw performance data away... */
878 size = msize + sizeof (struct NotifyTrafficMessage);
879 }
880 if (! ( (0 != (all_client_options & options)) ||
881 (0 != (options & GNUNET_CORE_OPTION_SEND_FULL_INBOUND)) ))
882 return; /* no client cares about this message notification */
883 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
884 "Core service passes message from `%s' of type %u to client.\n",
885 GNUNET_i2s (sender),
886 (unsigned int) ntohs (msg->type));
887 GSC_SESSIONS_add_to_typemap (sender, ntohs (msg->type));
888 ntm = (struct NotifyTrafficMessage *) buf;
889 ntm->header.size = htons (size);
890 if (0 != (options & (GNUNET_CORE_OPTION_SEND_FULL_INBOUND | GNUNET_CORE_OPTION_SEND_HDR_INBOUND)))
891 ntm->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_NOTIFY_INBOUND);
892 else
893 ntm->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_NOTIFY_OUTBOUND);
894 ntm->peer = *sender;
895 GNUNET_memcpy (&ntm[1],
896 msg,
897 msize);
898 send_to_all_clients (sender,
899 &ntm->header,
900 GNUNET_YES,
901 options,
902 ntohs (msg->type));
903}
904
905
906/**
907 * Initialize clients subsystem.
908 *
909 * @param server handle to server clients connect to
910 */
911void
912GSC_CLIENTS_init (struct GNUNET_SERVER_Handle *server)
913{
914 static const struct GNUNET_SERVER_MessageHandler handlers[] = {
915 {&handle_client_init, NULL,
916 GNUNET_MESSAGE_TYPE_CORE_INIT, 0},
917 {&GSC_KX_handle_client_monitor_peers, NULL,
918 GNUNET_MESSAGE_TYPE_CORE_MONITOR_PEERS,
919 sizeof (struct GNUNET_MessageHeader)},
920 {&handle_client_send_request, NULL,
921 GNUNET_MESSAGE_TYPE_CORE_SEND_REQUEST,
922 sizeof (struct SendMessageRequest)},
923 {&handle_client_send, NULL,
924 GNUNET_MESSAGE_TYPE_CORE_SEND, 0},
925 {NULL, NULL, 0, 0}
926 };
927
928 /* setup notification */
929 client_mst = GNUNET_SERVER_mst_create (&client_tokenizer_callback, NULL);
930 notifier =
931 GNUNET_SERVER_notification_context_create (server, MAX_NOTIFY_QUEUE);
932 GNUNET_SERVER_disconnect_notify (server,
933 &handle_client_disconnect, NULL);
934 GNUNET_SERVER_add_handlers (server, handlers);
935}
936
937
938/**
939 * Shutdown clients subsystem.
940 */
941void
942GSC_CLIENTS_done ()
943{
944 struct GSC_Client *c;
945
946 while (NULL != (c = client_head))
947 handle_client_disconnect (NULL, c->client_handle);
948 if (NULL != notifier)
949 {
950 GNUNET_SERVER_notification_context_destroy (notifier);
951 notifier = NULL;
952 }
953 if (NULL != client_mst)
954 {
955 GNUNET_SERVER_mst_destroy (client_mst);
956 client_mst = NULL;
957 }
958}
959
960/* end of gnunet-service-core_clients.c */