2 This file is part of GNUnet.
3 (C) 2009, 2010 Christian Grothoff (and other contributing authors)
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.
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.
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.
22 * @file core/core_api.c
23 * @brief core service; this is the main API for encrypted P2P
25 * @author Christian Grothoff
28 #include "gnunet_constants.h"
29 #include "gnunet_core_service.h"
34 * Information we track for each peer.
40 * We generally do NOT keep peer records in a DLL; this
41 * DLL is only used IF this peer's 'pending_head' message
42 * is ready for transmission.
44 struct PeerRecord *prev;
47 * We generally do NOT keep peer records in a DLL; this
48 * DLL is only used IF this peer's 'pending_head' message
49 * is ready for transmission.
51 struct PeerRecord *next;
54 * Peer the record is about.
56 struct GNUNET_PeerIdentity peer;
59 * Corresponding core handle.
61 struct GNUNET_CORE_Handle *ch;
64 * Head of doubly-linked list of pending requests.
65 * Requests are sorted by deadline *except* for HEAD,
66 * which is only modified upon transmission to core.
68 struct GNUNET_CORE_TransmitHandle *pending_head;
71 * Tail of doubly-linked list of pending requests.
73 struct GNUNET_CORE_TransmitHandle *pending_tail;
76 * Pending callback waiting for peer information, or NULL for none.
78 GNUNET_CORE_PeerConfigurationInfoCallback pcic;
86 * Pointer to free when we call pcic.
91 * Request information ID for the given pcic (needed in case a
92 * request is cancelled after being submitted to core and a new
93 * one is generated; in this case, we need to avoid matching the
94 * reply to the first (cancelled) request to the second request).
99 * ID of timeout task for the 'pending_head' handle
100 * which is the one with the smallest timeout.
102 GNUNET_SCHEDULER_TaskIdentifier timeout_task;
105 * ID of task to run 'next_request_transmission'.
107 GNUNET_SCHEDULER_TaskIdentifier ntr_task;
110 * Current size of the queue of pending requests.
112 unsigned int queue_size;
115 * SendMessageRequest ID generator for this peer.
123 * Entry in a doubly-linked list of control messages to be transmitted
124 * to the core service. Control messages include traffic allocation,
125 * connection requests and of course our initial 'init' request.
127 * The actual message is allocated at the end of this struct.
129 struct ControlMessage
132 * This is a doubly-linked list.
134 struct ControlMessage *next;
137 * This is a doubly-linked list.
139 struct ControlMessage *prev;
142 * Function to run after transmission failed/succeeded.
144 GNUNET_CORE_ControlContinuation cont;
147 * Closure for 'cont'.
152 * Transmit handle (if one is associated with this ControlMessage), or NULL.
154 struct GNUNET_CORE_TransmitHandle *th;
160 * Context for the core service connection.
162 struct GNUNET_CORE_Handle
166 * Configuration we're using.
168 const struct GNUNET_CONFIGURATION_Handle *cfg;
171 * Closure for the various callbacks.
176 * Function to call once we've handshaked with the core service.
178 GNUNET_CORE_StartupCallback init;
181 * Function to call whenever we're notified about a peer connecting.
183 GNUNET_CORE_ConnectEventHandler connects;
186 * Function to call whenever we're notified about a peer disconnecting.
188 GNUNET_CORE_DisconnectEventHandler disconnects;
191 * Function to call whenever we're notified about a peer changing status.
193 GNUNET_CORE_PeerStatusEventHandler status_events;
196 * Function to call whenever we receive an inbound message.
198 GNUNET_CORE_MessageCallback inbound_notify;
201 * Function to call whenever we receive an outbound message.
203 GNUNET_CORE_MessageCallback outbound_notify;
206 * Function handlers for messages of particular type.
208 const struct GNUNET_CORE_MessageHandler *handlers;
211 * Our connection to the service.
213 struct GNUNET_CLIENT_Connection *client;
216 * Handle for our current transmission request.
218 struct GNUNET_CLIENT_TransmitHandle *cth;
221 * Head of doubly-linked list of pending requests.
223 struct ControlMessage *control_pending_head;
226 * Tail of doubly-linked list of pending requests.
228 struct ControlMessage *control_pending_tail;
231 * Head of doubly-linked list of peers that are core-approved
232 * to send their next message.
234 struct PeerRecord *ready_peer_head;
237 * Tail of doubly-linked list of peers that are core-approved
238 * to send their next message.
240 struct PeerRecord *ready_peer_tail;
243 * Hash map listing all of the peers that we are currently
246 struct GNUNET_CONTAINER_MultiHashMap *peers;
249 * Identity of this peer.
251 struct GNUNET_PeerIdentity me;
254 * ID of reconnect task (if any).
256 GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
259 * Current delay we use for re-trying to connect to core.
261 struct GNUNET_TIME_Relative retry_backoff;
264 * Request information ID generator.
269 * Number of messages we are allowed to queue per target.
271 unsigned int queue_size;
274 * Number of entries in the handlers array.
279 * For inbound notifications without a specific handler, do
280 * we expect to only receive headers?
282 int inbound_hdr_only;
285 * For outbound notifications without a specific handler, do
286 * we expect to only receive headers?
288 int outbound_hdr_only;
291 * Are we currently disconnected and hence unable to forward
300 * Handle for a transmission request.
302 struct GNUNET_CORE_TransmitHandle
306 * We keep active transmit handles in a doubly-linked list.
308 struct GNUNET_CORE_TransmitHandle *next;
311 * We keep active transmit handles in a doubly-linked list.
313 struct GNUNET_CORE_TransmitHandle *prev;
316 * Corresponding peer record.
318 struct PeerRecord *peer;
321 * Corresponding SEND_REQUEST message. Only non-NULL
322 * while SEND_REQUEST message is pending.
324 struct ControlMessage *cm;
327 * Function that will be called to get the actual request
328 * (once we are ready to transmit this request to the core).
329 * The function will be called with a NULL buffer to signal
332 GNUNET_CONNECTION_TransmitReadyNotify get_message;
335 * Closure for get_message.
337 void *get_message_cls;
340 * Timeout for this handle.
342 struct GNUNET_TIME_Absolute timeout;
345 * How important is this message?
350 * Size of this request.
355 * Send message request ID for this request.
360 * Is corking allowed?
368 * Our current client connection went down. Clean it up
369 * and try to reconnect!
371 * @param h our handle to the core service
374 reconnect (struct GNUNET_CORE_Handle *h);
378 * Task schedule to try to re-connect to core.
380 * @param cls the 'struct GNUNET_CORE_Handle'
381 * @param tc task context
384 reconnect_task (void *cls,
385 const struct GNUNET_SCHEDULER_TaskContext *tc)
387 struct GNUNET_CORE_Handle *h = cls;
389 h->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
391 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
392 "Connecting to CORE service after delay\n");
399 * Notify clients about disconnect and free
400 * the entry for connected peer.
402 * @param cls the 'struct GNUNET_CORE_Handle*'
403 * @param key the peer identity (not used)
404 * @param value the 'struct PeerRecord' to free.
405 * @return GNUNET_YES (continue)
408 disconnect_and_free_peer_entry (void *cls,
409 const GNUNET_HashCode *key,
412 static struct GNUNET_BANDWIDTH_Value32NBO zero;
413 struct GNUNET_CORE_Handle *h = cls;
414 struct GNUNET_CORE_TransmitHandle *th;
415 struct PeerRecord *pr = value;
416 GNUNET_CORE_PeerConfigurationInfoCallback pcic;
418 while (NULL != (th = pr->pending_head))
420 GNUNET_CONTAINER_DLL_remove (pr->pending_head,
425 th->get_message (th->get_message_cls,
431 if (NULL != (pcic = pr->pcic))
434 GNUNET_free_non_null (pr->pcic_ptr);
440 GNUNET_TIME_UNIT_FOREVER_REL,
443 if (pr->timeout_task != GNUNET_SCHEDULER_NO_TASK)
445 GNUNET_SCHEDULER_cancel (pr->timeout_task);
446 pr->timeout_task = GNUNET_SCHEDULER_NO_TASK;
448 if (pr->ntr_task != GNUNET_SCHEDULER_NO_TASK)
450 GNUNET_SCHEDULER_cancel (pr->ntr_task);
451 pr->ntr_task = GNUNET_SCHEDULER_NO_TASK;
453 GNUNET_assert (pr->queue_size == 0);
454 if ( (pr->prev != NULL) ||
455 (pr->next != NULL) ||
456 (h->ready_peer_head == pr) )
457 GNUNET_CONTAINER_DLL_remove (h->ready_peer_head,
460 if (h->disconnects != NULL)
461 h->disconnects (h->cls,
463 GNUNET_assert (GNUNET_YES ==
464 GNUNET_CONTAINER_multihashmap_remove (h->peers,
467 GNUNET_assert (pr->pending_head == NULL);
468 GNUNET_assert (pr->pending_tail == NULL);
469 GNUNET_assert (pr->ch = h);
470 GNUNET_assert (pr->queue_size == 0);
471 GNUNET_assert (pr->timeout_task == GNUNET_SCHEDULER_NO_TASK);
472 GNUNET_assert (pr->ntr_task == GNUNET_SCHEDULER_NO_TASK);
479 * Close down any existing connection to the CORE service and
480 * try re-establishing it later.
482 * @param h our handle
485 reconnect_later (struct GNUNET_CORE_Handle *h)
487 struct ControlMessage *cm;
488 struct PeerRecord *pr;
490 GNUNET_assert (h->reconnect_task == GNUNET_SCHEDULER_NO_TASK);
491 if (h->client != NULL)
493 GNUNET_CLIENT_disconnect (h->client, GNUNET_NO);
497 h->currently_down = GNUNET_YES;
498 GNUNET_assert (h->reconnect_task == GNUNET_SCHEDULER_NO_TASK);
499 h->reconnect_task = GNUNET_SCHEDULER_add_delayed (h->retry_backoff,
502 while (NULL != (cm = h->control_pending_head))
504 GNUNET_CONTAINER_DLL_remove (h->control_pending_head,
505 h->control_pending_tail,
509 if (cm->cont != NULL)
510 cm->cont (cm->cont_cls, GNUNET_NO);
513 GNUNET_CONTAINER_multihashmap_iterate (h->peers,
514 &disconnect_and_free_peer_entry,
516 while (NULL != (pr = h->ready_peer_head))
517 GNUNET_CONTAINER_DLL_remove (h->ready_peer_head,
520 GNUNET_assert (h->control_pending_head == NULL);
521 h->retry_backoff = GNUNET_TIME_relative_min (GNUNET_TIME_UNIT_SECONDS,
523 h->retry_backoff = GNUNET_TIME_relative_multiply (h->retry_backoff, 2);
528 * Check the list of pending requests, send the next
531 * @param h core handle
532 * @param ignore_currently_down transmit message even if not initialized?
535 trigger_next_request (struct GNUNET_CORE_Handle *h,
536 int ignore_currently_down);
540 * The given request hit its timeout. Remove from the
541 * doubly-linked list and call the respective continuation.
543 * @param cls the transmit handle of the request that timed out
544 * @param tc context, can be NULL (!)
547 transmission_timeout (void *cls,
548 const struct GNUNET_SCHEDULER_TaskContext *tc);
552 * Send a control message to the peer asking for transmission
553 * of the message in the given peer record.
555 * @param pr peer to request transmission to
558 request_next_transmission (struct PeerRecord *pr)
560 struct GNUNET_CORE_Handle *h = pr->ch;
561 struct ControlMessage *cm;
562 struct SendMessageRequest *smr;
563 struct GNUNET_CORE_TransmitHandle *th;
565 if (pr->timeout_task != GNUNET_SCHEDULER_NO_TASK)
567 GNUNET_SCHEDULER_cancel (pr->timeout_task);
568 pr->timeout_task = GNUNET_SCHEDULER_NO_TASK;
570 if (NULL == (th = pr->pending_head))
572 trigger_next_request (h, GNUNET_NO);
576 return; /* already done */
577 GNUNET_assert (pr->prev == NULL);
578 GNUNET_assert (pr->next == NULL);
579 pr->timeout_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining (th->timeout),
580 &transmission_timeout,
582 cm = GNUNET_malloc (sizeof (struct ControlMessage) +
583 sizeof (struct SendMessageRequest));
586 smr = (struct SendMessageRequest*) &cm[1];
587 smr->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_SEND_REQUEST);
588 smr->header.size = htons (sizeof (struct SendMessageRequest));
589 smr->priority = htonl (th->priority);
590 smr->deadline = GNUNET_TIME_absolute_hton (th->timeout);
591 smr->peer = pr->peer;
592 smr->queue_size = htonl (pr->queue_size);
593 smr->size = htons (th->msize);
594 smr->smr_id = htons (th->smr_id = pr->smr_id_gen++);
595 GNUNET_CONTAINER_DLL_insert_tail (h->control_pending_head,
596 h->control_pending_tail,
599 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
600 "Adding SEND REQUEST for peer `%s' to message queue\n",
601 GNUNET_i2s (&pr->peer));
603 trigger_next_request (h, GNUNET_NO);
608 * The given request hit its timeout. Remove from the
609 * doubly-linked list and call the respective continuation.
611 * @param cls the transmit handle of the request that timed out
612 * @param tc context, can be NULL (!)
615 transmission_timeout (void *cls,
616 const struct GNUNET_SCHEDULER_TaskContext *tc)
618 struct PeerRecord *pr = cls;
619 struct GNUNET_CORE_Handle *h = pr->ch;
620 struct GNUNET_CORE_TransmitHandle *th;
622 pr->timeout_task = GNUNET_SCHEDULER_NO_TASK;
623 th = pr->pending_head;
624 GNUNET_CONTAINER_DLL_remove (pr->pending_head,
628 if ( (pr->prev != NULL) ||
629 (pr->next != NULL) ||
630 (pr == h->ready_peer_head) )
632 /* the request that was 'approved' by core was
633 canceled before it could be transmitted; remove
634 us from the 'ready' list */
635 GNUNET_CONTAINER_DLL_remove (h->ready_peer_head,
640 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
641 "Signalling timeout of request for transmission to CORE service\n");
643 request_next_transmission (pr);
644 GNUNET_assert (0 == th->get_message (th->get_message_cls, 0, NULL));
650 * Transmit the next message to the core service.
653 transmit_message (void *cls,
657 struct GNUNET_CORE_Handle *h = cls;
658 struct ControlMessage *cm;
659 struct GNUNET_CORE_TransmitHandle *th;
660 struct PeerRecord *pr;
661 struct SendMessage *sm;
662 const struct GNUNET_MessageHeader *hdr;
666 GNUNET_assert (h->reconnect_task == GNUNET_SCHEDULER_NO_TASK);
671 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
672 "Transmission failed, initiating reconnect\n");
677 /* first check for control messages */
678 if (NULL != (cm = h->control_pending_head))
680 hdr = (const struct GNUNET_MessageHeader*) &cm[1];
681 msize = ntohs (hdr->size);
684 trigger_next_request (h, GNUNET_NO);
688 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
689 "Transmitting control message with %u bytes of type %u to core.\n",
690 (unsigned int) msize,
691 (unsigned int) ntohs (hdr->type));
693 memcpy (buf, hdr, msize);
694 GNUNET_CONTAINER_DLL_remove (h->control_pending_head,
695 h->control_pending_tail,
699 if (NULL != cm->cont)
700 cm->cont (cm->cont_cls, GNUNET_OK);
702 trigger_next_request (h, GNUNET_NO);
705 /* now check for 'ready' P2P messages */
706 if (NULL != (pr = h->ready_peer_head))
708 GNUNET_assert (pr->pending_head != NULL);
709 th = pr->pending_head;
710 if (size < th->msize + sizeof (struct SendMessage))
712 trigger_next_request (h, GNUNET_NO);
715 GNUNET_CONTAINER_DLL_remove (h->ready_peer_head,
718 GNUNET_CONTAINER_DLL_remove (pr->pending_head,
722 if (pr->timeout_task != GNUNET_SCHEDULER_NO_TASK)
724 GNUNET_SCHEDULER_cancel (pr->timeout_task);
725 pr->timeout_task = GNUNET_SCHEDULER_NO_TASK;
728 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
729 "Transmitting SEND request to `%s' with %u bytes.\n",
730 GNUNET_i2s (&pr->peer),
731 (unsigned int) th->msize);
733 sm = (struct SendMessage *) buf;
734 sm->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_SEND);
735 sm->priority = htonl (th->priority);
736 sm->deadline = GNUNET_TIME_absolute_hton (th->timeout);
738 sm->cork = htonl ((uint32_t) th->cork);
739 sm->reserved = htonl (0);
740 ret = th->get_message (th->get_message_cls,
741 size - sizeof (struct SendMessage),
745 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
746 "Transmitting SEND request to `%s' yielded %u bytes.\n",
747 GNUNET_i2s (&pr->peer),
754 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
755 "Size of clients message to peer %s is 0!\n",
756 GNUNET_i2s(&pr->peer));
758 /* client decided to send nothing! */
759 request_next_transmission (pr);
763 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
764 "Produced SEND message to core with %u bytes payload\n",
767 GNUNET_assert (ret >= sizeof (struct GNUNET_MessageHeader));
768 if (ret + sizeof (struct SendMessage) >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
771 request_next_transmission (pr);
774 ret += sizeof (struct SendMessage);
775 sm->header.size = htons (ret);
776 GNUNET_assert (ret <= size);
777 request_next_transmission (pr);
785 * Check the list of pending requests, send the next
788 * @param h core handle
789 * @param ignore_currently_down transmit message even if not initialized?
792 trigger_next_request (struct GNUNET_CORE_Handle *h,
793 int ignore_currently_down)
797 if ( (GNUNET_YES == h->currently_down) &&
798 (ignore_currently_down == GNUNET_NO) )
801 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
802 "Core connection down, not processing queue\n");
809 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
810 "Request pending, not processing queue\n");
814 if (h->control_pending_head != NULL)
815 msize = ntohs (((struct GNUNET_MessageHeader*) &h->control_pending_head[1])->size);
816 else if (h->ready_peer_head != NULL)
817 msize = h->ready_peer_head->pending_head->msize + sizeof (struct SendMessage);
821 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
822 "Request queue empty, not processing queue\n");
824 return; /* no pending message */
826 h->cth = GNUNET_CLIENT_notify_transmit_ready (h->client,
828 GNUNET_TIME_UNIT_FOREVER_REL,
830 &transmit_message, h);
835 * Handler for notification messages received from the core.
837 * @param cls our "struct GNUNET_CORE_Handle"
838 * @param msg the message received from the core service
841 main_notify_handler (void *cls,
842 const struct GNUNET_MessageHeader *msg)
844 struct GNUNET_CORE_Handle *h = cls;
845 const struct InitReplyMessage *m;
846 const struct ConnectNotifyMessage *cnm;
847 const struct DisconnectNotifyMessage *dnm;
848 const struct NotifyTrafficMessage *ntm;
849 const struct GNUNET_MessageHeader *em;
850 const struct ConfigurationInfoMessage *cim;
851 const struct PeerStatusNotifyMessage *psnm;
852 const struct SendMessageReady *smr;
853 const struct GNUNET_CORE_MessageHandler *mh;
854 GNUNET_CORE_StartupCallback init;
855 GNUNET_CORE_PeerConfigurationInfoCallback pcic;
856 struct PeerRecord *pr;
857 struct GNUNET_CORE_TransmitHandle *th;
866 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
868 ("Client was disconnected from core service, trying to reconnect.\n"));
872 msize = ntohs (msg->size);
874 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
875 "Processing message of type %u and size %u from core service\n",
876 ntohs (msg->type), msize);
878 switch (ntohs (msg->type))
880 case GNUNET_MESSAGE_TYPE_CORE_INIT_REPLY:
881 if (ntohs (msg->size) != sizeof (struct InitReplyMessage))
887 m = (const struct InitReplyMessage *) msg;
888 GNUNET_break (0 == ntohl (m->reserved));
889 /* start our message processing loop */
890 if (GNUNET_YES == h->currently_down)
892 h->currently_down = GNUNET_NO;
893 trigger_next_request (h, GNUNET_NO);
895 h->retry_backoff = GNUNET_TIME_UNIT_MILLISECONDS;
896 GNUNET_CRYPTO_hash (&m->publicKey,
898 GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
900 if (NULL != (init = h->init))
902 /* mark so we don't call init on reconnect */
905 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
906 "Connected to core service of peer `%s'.\n",
907 GNUNET_i2s (&h->me));
909 init (h->cls, h, &h->me, &m->publicKey);
914 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
915 "Successfully reconnected to core service.\n");
918 /* fake 'connect to self' */
919 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
921 GNUNET_assert (pr == NULL);
922 pr = GNUNET_malloc (sizeof (struct PeerRecord));
925 GNUNET_assert (GNUNET_YES ==
926 GNUNET_CONTAINER_multihashmap_put (h->peers,
929 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST));
930 if (NULL != h->connects)
935 case GNUNET_MESSAGE_TYPE_CORE_NOTIFY_CONNECT:
936 if (msize < sizeof (struct ConnectNotifyMessage))
942 cnm = (const struct ConnectNotifyMessage *) msg;
943 ats_count = ntohl (cnm->ats_count);
944 if ( (msize != sizeof (struct ConnectNotifyMessage) + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)) ||
945 (GNUNET_TRANSPORT_ATS_ARRAY_TERMINATOR != ntohl ((&cnm->ats)[ats_count].type)) )
952 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
953 "Received notification about connection from `%s'.\n",
954 GNUNET_i2s (&cnm->peer));
956 if (0 == memcmp (&h->me,
958 sizeof (struct GNUNET_PeerIdentity)))
960 /* connect to self!? */
964 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
965 &cnm->peer.hashPubKey);
972 pr = GNUNET_malloc (sizeof (struct PeerRecord));
973 pr->peer = cnm->peer;
975 GNUNET_assert (GNUNET_YES ==
976 GNUNET_CONTAINER_multihashmap_put (h->peers,
977 &cnm->peer.hashPubKey,
979 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST));
980 if (NULL != h->connects)
985 case GNUNET_MESSAGE_TYPE_CORE_NOTIFY_DISCONNECT:
986 if (msize != sizeof (struct DisconnectNotifyMessage))
992 dnm = (const struct DisconnectNotifyMessage *) msg;
993 if (0 == memcmp (&h->me,
995 sizeof (struct GNUNET_PeerIdentity)))
997 /* connection to self!? */
1001 GNUNET_break (0 == ntohl (dnm->reserved));
1003 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1004 "Received notification about disconnect from `%s'.\n",
1005 GNUNET_i2s (&dnm->peer));
1007 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1008 &dnm->peer.hashPubKey);
1012 reconnect_later (h);
1015 trigger = ( (pr->prev != NULL) ||
1016 (pr->next != NULL) ||
1017 (h->ready_peer_head == pr) );
1018 disconnect_and_free_peer_entry (h, &dnm->peer.hashPubKey, pr);
1020 trigger_next_request (h, GNUNET_NO);
1022 case GNUNET_MESSAGE_TYPE_CORE_NOTIFY_STATUS_CHANGE:
1023 if (NULL == h->status_events)
1028 if (msize < sizeof (struct PeerStatusNotifyMessage))
1031 reconnect_later (h);
1034 psnm = (const struct PeerStatusNotifyMessage *) msg;
1035 if (0 == memcmp (&h->me,
1037 sizeof (struct GNUNET_PeerIdentity)))
1043 ats_count = ntohl (psnm->ats_count);
1044 if ( (msize != sizeof (struct PeerStatusNotifyMessage) + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)) ||
1045 (GNUNET_TRANSPORT_ATS_ARRAY_TERMINATOR != ntohl ((&psnm->ats)[ats_count].type)) )
1048 reconnect_later (h);
1052 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1053 "Received notification about status change by `%s'.\n",
1054 GNUNET_i2s (&psnm->peer));
1056 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1057 &psnm->peer.hashPubKey);
1061 reconnect_later (h);
1064 h->status_events (h->cls,
1067 psnm->bandwidth_out,
1068 GNUNET_TIME_absolute_ntoh (psnm->timeout),
1071 case GNUNET_MESSAGE_TYPE_CORE_NOTIFY_INBOUND:
1072 if (msize < sizeof (struct NotifyTrafficMessage))
1075 reconnect_later (h);
1078 ntm = (const struct NotifyTrafficMessage *) msg;
1080 ats_count = ntohl (ntm->ats_count);
1081 if ( (msize < sizeof (struct NotifyTrafficMessage) + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)
1082 + sizeof (struct GNUNET_MessageHeader)) ||
1083 (GNUNET_TRANSPORT_ATS_ARRAY_TERMINATOR != ntohl ((&ntm->ats)[ats_count].type)) )
1086 reconnect_later (h);
1089 em = (const struct GNUNET_MessageHeader *) &(&ntm->ats)[ats_count+1];
1091 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1092 "Received message of type %u and size %u from peer `%4s'\n",
1095 GNUNET_i2s (&ntm->peer));
1097 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1098 &ntm->peer.hashPubKey);
1102 reconnect_later (h);
1105 if ((GNUNET_NO == h->inbound_hdr_only) &&
1106 (msize != ntohs (em->size) + sizeof (struct NotifyTrafficMessage) +
1107 + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)) )
1110 reconnect_later (h);
1113 et = ntohs (em->type);
1114 for (hpos = 0; hpos < h->hcnt; hpos++)
1116 mh = &h->handlers[hpos];
1119 if ((mh->expected_size != ntohs (em->size)) &&
1120 (mh->expected_size != 0))
1126 h->handlers[hpos].callback (h->cls, &ntm->peer, em,
1129 /* error in processing, do not process other messages! */
1133 if (NULL != h->inbound_notify)
1134 h->inbound_notify (h->cls, &ntm->peer, em,
1137 case GNUNET_MESSAGE_TYPE_CORE_NOTIFY_OUTBOUND:
1138 if (msize < sizeof (struct NotifyTrafficMessage))
1141 reconnect_later (h);
1144 ntm = (const struct NotifyTrafficMessage *) msg;
1145 if (0 == memcmp (&h->me,
1147 sizeof (struct GNUNET_PeerIdentity)))
1153 ats_count = ntohl (ntm->ats_count);
1154 if ( (msize < sizeof (struct NotifyTrafficMessage) + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)
1155 + sizeof (struct GNUNET_MessageHeader)) ||
1156 (GNUNET_TRANSPORT_ATS_ARRAY_TERMINATOR != ntohl ((&ntm->ats)[ats_count].type)) )
1159 reconnect_later (h);
1162 em = (const struct GNUNET_MessageHeader *) &(&ntm->ats)[ats_count+1];
1163 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1164 &ntm->peer.hashPubKey);
1168 reconnect_later (h);
1172 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1173 "Received notification about transmission to `%s'.\n",
1174 GNUNET_i2s (&ntm->peer));
1176 if ((GNUNET_NO == h->outbound_hdr_only) &&
1177 (msize != ntohs (em->size) + sizeof (struct NotifyTrafficMessage)
1178 + ats_count * sizeof (struct GNUNET_TRANSPORT_ATS_Information)) )
1181 reconnect_later (h);
1184 if (NULL == h->outbound_notify)
1189 h->outbound_notify (h->cls, &ntm->peer, em,
1192 case GNUNET_MESSAGE_TYPE_CORE_SEND_READY:
1193 if (msize != sizeof (struct SendMessageReady))
1196 reconnect_later (h);
1199 smr = (const struct SendMessageReady *) msg;
1200 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1201 &smr->peer.hashPubKey);
1205 reconnect_later (h);
1209 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1210 "Received notification about transmission readiness to `%s'.\n",
1211 GNUNET_i2s (&smr->peer));
1213 if (pr->pending_head == NULL)
1215 /* request must have been cancelled between the original request
1216 and the response from core, ignore core's readiness */
1220 th = pr->pending_head;
1221 if (ntohs (smr->smr_id) != th->smr_id)
1223 /* READY message is for expired or cancelled message,
1224 ignore! (we should have already sent another request) */
1227 if ( (pr->prev != NULL) ||
1228 (pr->next != NULL) ||
1229 (h->ready_peer_head == pr) )
1231 /* we should not already be on the ready list... */
1233 reconnect_later (h);
1236 GNUNET_CONTAINER_DLL_insert (h->ready_peer_head,
1239 trigger_next_request (h, GNUNET_NO);
1241 case GNUNET_MESSAGE_TYPE_CORE_CONFIGURATION_INFO:
1242 if (ntohs (msg->size) != sizeof (struct ConfigurationInfoMessage))
1245 reconnect_later (h);
1248 cim = (const struct ConfigurationInfoMessage*) msg;
1249 if (0 == memcmp (&h->me,
1251 sizeof (struct GNUNET_PeerIdentity)))
1258 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1259 "Received notification about configuration update for `%s' with RIM %u.\n",
1260 GNUNET_i2s (&cim->peer),
1261 (unsigned int) ntohl (cim->rim_id));
1263 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1264 &cim->peer.hashPubKey);
1268 reconnect_later (h);
1271 if (pr->rim_id != ntohl (cim->rim_id))
1274 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1275 "Reservation ID mismatch in notification...\n");
1281 GNUNET_free_non_null (pr->pcic_ptr);
1282 pr->pcic_ptr = NULL;
1287 ntohl (cim->reserved_amount),
1288 GNUNET_TIME_relative_ntoh (cim->reserve_delay),
1289 GNUNET_ntohll (cim->preference));
1292 reconnect_later (h);
1295 GNUNET_CLIENT_receive (h->client,
1296 &main_notify_handler, h,
1297 GNUNET_TIME_UNIT_FOREVER_REL);
1302 * Task executed once we are done transmitting the INIT message.
1303 * Starts our 'receive' loop.
1305 * @param cls the 'struct GNUNET_CORE_Handle'
1306 * @param success were we successful
1309 init_done_task (void *cls,
1312 struct GNUNET_CORE_Handle *h = cls;
1314 if (success == GNUNET_SYSERR)
1315 return; /* shutdown */
1316 if (success == GNUNET_NO)
1319 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1320 "Failed to exchange INIT with core, retrying\n");
1322 if (h->reconnect_task == GNUNET_SCHEDULER_NO_TASK)
1323 reconnect_later (h);
1326 GNUNET_CLIENT_receive (h->client,
1327 &main_notify_handler,
1329 GNUNET_TIME_UNIT_FOREVER_REL);
1334 * Our current client connection went down. Clean it up
1335 * and try to reconnect!
1337 * @param h our handle to the core service
1340 reconnect (struct GNUNET_CORE_Handle *h)
1342 struct ControlMessage *cm;
1343 struct InitMessage *init;
1350 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1351 "Reconnecting to CORE service\n");
1353 GNUNET_assert (h->client == NULL);
1354 GNUNET_assert (h->currently_down == GNUNET_YES);
1355 h->client = GNUNET_CLIENT_connect ("core", h->cfg);
1356 if (h->client == NULL)
1358 reconnect_later (h);
1361 msize = h->hcnt * sizeof (uint16_t) + sizeof (struct InitMessage);
1362 cm = GNUNET_malloc (sizeof (struct ControlMessage) +
1364 cm->cont = &init_done_task;
1366 init = (struct InitMessage*) &cm[1];
1367 init->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_INIT);
1368 init->header.size = htons (msize);
1369 opt = GNUNET_CORE_OPTION_SEND_CONNECT | GNUNET_CORE_OPTION_SEND_DISCONNECT;
1370 if (h->status_events != NULL)
1371 opt |= GNUNET_CORE_OPTION_SEND_STATUS_CHANGE;
1372 if (h->inbound_notify != NULL)
1374 if (h->inbound_hdr_only)
1375 opt |= GNUNET_CORE_OPTION_SEND_HDR_INBOUND;
1377 opt |= GNUNET_CORE_OPTION_SEND_FULL_INBOUND;
1379 if (h->outbound_notify != NULL)
1381 if (h->outbound_hdr_only)
1382 opt |= GNUNET_CORE_OPTION_SEND_HDR_OUTBOUND;
1384 opt |= GNUNET_CORE_OPTION_SEND_FULL_OUTBOUND;
1386 init->options = htonl (opt);
1387 ts = (uint16_t *) &init[1];
1388 for (hpos = 0; hpos < h->hcnt; hpos++)
1389 ts[hpos] = htons (h->handlers[hpos].type);
1390 GNUNET_CONTAINER_DLL_insert (h->control_pending_head,
1391 h->control_pending_tail,
1393 trigger_next_request (h, GNUNET_YES);
1399 * Connect to the core service. Note that the connection may
1400 * complete (or fail) asynchronously.
1402 * @param cfg configuration to use
1403 * @param queue_size size of the per-peer message queue
1404 * @param cls closure for the various callbacks that follow (including handlers in the handlers array)
1405 * @param init callback to call on timeout or once we have successfully
1406 * connected to the core service; note that timeout is only meaningful if init is not NULL
1407 * @param connects function to call on peer connect, can be NULL
1408 * @param disconnects function to call on peer disconnect / timeout, can be NULL
1409 * @param status_events function to call on changes to peer connection status, can be NULL
1410 * @param inbound_notify function to call for all inbound messages, can be NULL
1411 * @param inbound_hdr_only set to GNUNET_YES if inbound_notify will only read the
1412 * GNUNET_MessageHeader and hence we do not need to give it the full message;
1413 * can be used to improve efficiency, ignored if inbound_notify is NULLL
1414 * @param outbound_notify function to call for all outbound messages, can be NULL
1415 * @param outbound_hdr_only set to GNUNET_YES if outbound_notify will only read the
1416 * GNUNET_MessageHeader and hence we do not need to give it the full message
1417 * can be used to improve efficiency, ignored if outbound_notify is NULLL
1418 * @param handlers callbacks for messages we care about, NULL-terminated
1419 * @return handle to the core service (only useful for disconnect until 'init' is called);
1420 * NULL on error (in this case, init is never called)
1422 struct GNUNET_CORE_Handle *
1423 GNUNET_CORE_connect (const struct GNUNET_CONFIGURATION_Handle *cfg,
1424 unsigned int queue_size,
1426 GNUNET_CORE_StartupCallback init,
1427 GNUNET_CORE_ConnectEventHandler connects,
1428 GNUNET_CORE_DisconnectEventHandler disconnects,
1429 GNUNET_CORE_PeerStatusEventHandler status_events,
1430 GNUNET_CORE_MessageCallback inbound_notify,
1431 int inbound_hdr_only,
1432 GNUNET_CORE_MessageCallback outbound_notify,
1433 int outbound_hdr_only,
1434 const struct GNUNET_CORE_MessageHandler *handlers)
1436 struct GNUNET_CORE_Handle *h;
1438 h = GNUNET_malloc (sizeof (struct GNUNET_CORE_Handle));
1440 h->queue_size = queue_size;
1443 h->connects = connects;
1444 h->disconnects = disconnects;
1445 h->status_events = status_events;
1446 h->inbound_notify = inbound_notify;
1447 h->outbound_notify = outbound_notify;
1448 h->inbound_hdr_only = inbound_hdr_only;
1449 h->outbound_hdr_only = outbound_hdr_only;
1450 h->handlers = handlers;
1452 h->currently_down = GNUNET_YES;
1453 h->peers = GNUNET_CONTAINER_multihashmap_create (128);
1454 h->retry_backoff = GNUNET_TIME_UNIT_MILLISECONDS;
1455 while (handlers[h->hcnt].callback != NULL)
1457 GNUNET_assert (h->hcnt <
1458 (GNUNET_SERVER_MAX_MESSAGE_SIZE -
1459 sizeof (struct InitMessage)) / sizeof (uint16_t));
1461 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1462 "Connecting to CORE service\n");
1470 * Disconnect from the core service. This function can only
1471 * be called *after* all pending 'GNUNET_CORE_notify_transmit_ready'
1472 * requests have been explicitly canceled.
1474 * @param handle connection to core to disconnect
1477 GNUNET_CORE_disconnect (struct GNUNET_CORE_Handle *handle)
1479 struct ControlMessage *cm;
1482 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1483 "Disconnecting from CORE service\n");
1485 if (handle->cth != NULL)
1487 GNUNET_CLIENT_notify_transmit_ready_cancel (handle->cth);
1490 while (NULL != (cm = handle->control_pending_head))
1492 GNUNET_CONTAINER_DLL_remove (handle->control_pending_head,
1493 handle->control_pending_tail,
1497 if (cm->cont != NULL)
1498 cm->cont (cm->cont_cls, GNUNET_SYSERR);
1501 if (handle->client != NULL)
1503 GNUNET_CLIENT_disconnect (handle->client, GNUNET_NO);
1504 handle->client = NULL;
1506 GNUNET_CONTAINER_multihashmap_iterate (handle->peers,
1507 &disconnect_and_free_peer_entry,
1509 if (handle->reconnect_task != GNUNET_SCHEDULER_NO_TASK)
1511 GNUNET_SCHEDULER_cancel (handle->reconnect_task);
1512 handle->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
1514 GNUNET_CONTAINER_multihashmap_destroy (handle->peers);
1515 GNUNET_break (handle->ready_peer_head == NULL);
1516 GNUNET_free (handle);
1521 * Task that calls 'request_next_transmission'.
1523 * @param cls the 'struct PeerRecord*'
1524 * @param tc scheduler context
1527 run_request_next_transmission (void *cls,
1528 const struct GNUNET_SCHEDULER_TaskContext *tc)
1530 struct PeerRecord *pr = cls;
1532 pr->ntr_task = GNUNET_SCHEDULER_NO_TASK;
1533 request_next_transmission (pr);
1538 * Ask the core to call "notify" once it is ready to transmit the
1539 * given number of bytes to the specified "target". Must only be
1540 * called after a connection to the respective peer has been
1541 * established (and the client has been informed about this).
1543 * @param handle connection to core service
1544 * @param cork is corking allowed for this transmission?
1545 * @param priority how important is the message?
1546 * @param maxdelay how long can the message wait?
1547 * @param target who should receive the message,
1548 * use NULL for this peer (loopback)
1549 * @param notify_size how many bytes of buffer space does notify want?
1550 * @param notify function to call when buffer space is available
1551 * @param notify_cls closure for notify
1552 * @return non-NULL if the notify callback was queued,
1553 * NULL if we can not even queue the request (insufficient
1554 * memory); if NULL is returned, "notify" will NOT be called.
1556 struct GNUNET_CORE_TransmitHandle *
1557 GNUNET_CORE_notify_transmit_ready (struct GNUNET_CORE_Handle *handle,
1560 struct GNUNET_TIME_Relative maxdelay,
1561 const struct GNUNET_PeerIdentity *target,
1563 GNUNET_CONNECTION_TransmitReadyNotify notify,
1566 struct PeerRecord *pr;
1567 struct GNUNET_CORE_TransmitHandle *th;
1568 struct GNUNET_CORE_TransmitHandle *pos;
1569 struct GNUNET_CORE_TransmitHandle *prev;
1570 struct GNUNET_CORE_TransmitHandle *minp;
1572 pr = GNUNET_CONTAINER_multihashmap_get (handle->peers,
1573 &target->hashPubKey);
1576 /* attempt to send to peer that is not connected */
1577 GNUNET_log(GNUNET_ERROR_TYPE_WARNING,
1578 "Attempting to send to peer `%s' from peer `%s', but not connected!\n",
1579 GNUNET_i2s(target), GNUNET_h2s(&handle->me.hashPubKey));
1583 GNUNET_assert (notify_size + sizeof (struct SendMessage) <
1584 GNUNET_SERVER_MAX_MESSAGE_SIZE);
1585 th = GNUNET_malloc (sizeof (struct GNUNET_CORE_TransmitHandle));
1587 GNUNET_assert(NULL != notify);
1588 th->get_message = notify;
1589 th->get_message_cls = notify_cls;
1590 th->timeout = GNUNET_TIME_relative_to_absolute (maxdelay);
1591 th->priority = priority;
1592 th->msize = notify_size;
1594 /* bound queue size */
1595 if (pr->queue_size == handle->queue_size)
1597 /* find lowest-priority entry, but skip the head of the list */
1598 minp = pr->pending_head->next;
1600 while (prev != NULL)
1602 if (prev->priority < minp->priority)
1608 GNUNET_break (handle->queue_size != 0);
1609 GNUNET_break (pr->queue_size == 1);
1612 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1613 "Dropping transmission request: cannot drop queue head and limit is one\n");
1617 if (priority <= minp->priority)
1620 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1621 "Dropping transmission request: priority too low\n");
1624 return NULL; /* priority too low */
1626 GNUNET_CONTAINER_DLL_remove (pr->pending_head,
1631 minp->get_message (minp->get_message_cls,
1636 /* Order entries by deadline, but SKIP 'HEAD' if
1637 we're in the 'ready_peer_*' DLL */
1638 pos = pr->pending_head;
1639 if ( (pr->prev != NULL) ||
1640 (pr->next != NULL) ||
1641 (pr == handle->ready_peer_head) )
1643 GNUNET_assert (pos != NULL);
1644 pos = pos->next; /* skip head */
1647 /* insertion sort */
1649 while ( (pos != NULL) &&
1650 (pos->timeout.abs_value < th->timeout.abs_value) )
1655 GNUNET_CONTAINER_DLL_insert_after (pr->pending_head,
1660 /* was the request queue previously empty? */
1662 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1663 "Transmission request added to queue\n");
1665 if ( (pr->pending_head == th) &&
1666 (pr->ntr_task == GNUNET_SCHEDULER_NO_TASK) &&
1667 (pr->next == NULL) &&
1668 (pr->prev == NULL) &&
1669 (handle->ready_peer_head != pr) )
1670 pr->ntr_task = GNUNET_SCHEDULER_add_now (&run_request_next_transmission, pr);
1676 * Cancel the specified transmission-ready notification.
1678 * @param th handle that was returned by "notify_transmit_ready".
1681 GNUNET_CORE_notify_transmit_ready_cancel (struct GNUNET_CORE_TransmitHandle
1684 struct PeerRecord *pr = th->peer;
1685 struct GNUNET_CORE_Handle *h = pr->ch;
1688 was_head = (pr->pending_head == th);
1689 GNUNET_CONTAINER_DLL_remove (pr->pending_head,
1695 /* we're currently in the control queue, remove */
1696 GNUNET_CONTAINER_DLL_remove (h->control_pending_head,
1697 h->control_pending_tail,
1699 GNUNET_free (th->cm);
1704 if ( (pr->prev != NULL) ||
1705 (pr->next != NULL) ||
1706 (pr == h->ready_peer_head) )
1708 /* the request that was 'approved' by core was
1709 canceled before it could be transmitted; remove
1710 us from the 'ready' list */
1711 GNUNET_CONTAINER_DLL_remove (h->ready_peer_head,
1715 request_next_transmission (pr);
1720 /* ****************** GNUNET_CORE_peer_request_connect ******************** */
1723 * Handle for a request to the core to connect to
1724 * a particular peer. Can be used to cancel the request
1725 * (before the 'cont'inuation is called).
1727 struct GNUNET_CORE_PeerRequestHandle
1731 * Link to control message.
1733 struct ControlMessage *cm;
1738 struct GNUNET_CORE_Handle *h;
1741 * Continuation to run when done.
1743 GNUNET_CORE_ControlContinuation cont;
1746 * Closure for 'cont'.
1754 * Continuation called when the control message was transmitted.
1755 * Calls the original continuation and frees the remaining
1758 * @param cls the 'struct GNUNET_CORE_PeerRequestHandle'
1759 * @param success was the request transmitted?
1762 peer_request_connect_cont (void *cls,
1765 struct GNUNET_CORE_PeerRequestHandle *ret = cls;
1767 if (ret->cont != NULL)
1768 ret->cont (ret->cont_cls, success);
1774 * Request that the core should try to connect to a particular peer.
1775 * Once the request has been transmitted to the core, the continuation
1776 * function will be called. Note that this does NOT mean that a
1777 * connection was successfully established -- it only means that the
1778 * core will now try. Successful establishment of the connection
1779 * will be signalled to the 'connects' callback argument of
1780 * 'GNUNET_CORE_connect' only. If the core service does not respond
1781 * to our connection attempt within the given time frame, 'cont' will
1782 * be called with the TIMEOUT reason code.
1784 * @param h core handle
1785 * @param timeout how long to try to talk to core
1786 * @param peer who should we connect to
1787 * @param cont function to call once the request has been completed (or timed out)
1788 * @param cont_cls closure for cont
1790 * @return NULL on error or already connected,
1791 * otherwise handle for cancellation
1793 struct GNUNET_CORE_PeerRequestHandle *
1794 GNUNET_CORE_peer_request_connect (struct GNUNET_CORE_Handle *h,
1795 struct GNUNET_TIME_Relative timeout,
1796 const struct GNUNET_PeerIdentity * peer,
1797 GNUNET_CORE_ControlContinuation cont,
1800 struct GNUNET_CORE_PeerRequestHandle *ret;
1801 struct ControlMessage *cm;
1802 struct ConnectMessage *msg;
1804 if (NULL != GNUNET_CONTAINER_multihashmap_get (h->peers,
1808 GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
1809 "Peers are already connected!\n");
1814 cm = GNUNET_malloc (sizeof (struct ControlMessage) +
1815 sizeof (struct ConnectMessage));
1816 msg = (struct ConnectMessage*) &cm[1];
1817 msg->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_REQUEST_CONNECT);
1818 msg->header.size = htons (sizeof (struct ConnectMessage));
1819 msg->reserved = htonl (0);
1820 msg->timeout = GNUNET_TIME_relative_hton (timeout);
1822 GNUNET_CONTAINER_DLL_insert_tail (h->control_pending_head,
1823 h->control_pending_tail,
1825 ret = GNUNET_malloc (sizeof (struct GNUNET_CORE_PeerRequestHandle));
1829 ret->cont_cls = cont_cls;
1830 cm->cont = &peer_request_connect_cont;
1833 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1834 "Queueing REQUEST_CONNECT request\n");
1836 trigger_next_request (h, GNUNET_NO);
1842 * Cancel a pending request to connect to a particular peer. Must not
1843 * be called after the 'cont' function was invoked.
1845 * @param req request handle that was returned for the original request
1848 GNUNET_CORE_peer_request_connect_cancel (struct GNUNET_CORE_PeerRequestHandle *req)
1850 struct GNUNET_CORE_Handle *h = req->h;
1851 struct ControlMessage *cm = req->cm;
1854 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1855 "A CHANGE PREFERENCE request was cancelled!\n");
1857 GNUNET_CONTAINER_DLL_remove (h->control_pending_head,
1858 h->control_pending_tail,
1865 /* ****************** GNUNET_CORE_peer_change_preference ******************** */
1868 struct GNUNET_CORE_InformationRequestContext
1872 * Our connection to the service.
1874 struct GNUNET_CORE_Handle *h;
1877 * Link to control message, NULL if CM was sent.
1879 struct ControlMessage *cm;
1882 * Link to peer record.
1884 struct PeerRecord *pr;
1889 * CM was sent, remove link so we don't double-free.
1891 * @param cls the 'struct GNUNET_CORE_InformationRequestContext'
1892 * @param success were we successful?
1895 change_preference_send_continuation (void *cls,
1898 struct GNUNET_CORE_InformationRequestContext *irc = cls;
1905 * Obtain statistics and/or change preferences for the given peer.
1907 * @param h core handle
1908 * @param peer identifies the peer
1909 * @param timeout after how long should we give up (and call "info" with NULL
1910 * for "peer" to signal an error)?
1911 * @param bw_out set to the current bandwidth limit (sending) for this peer,
1912 * caller should set "bw_out" to "-1" to avoid changing
1913 * the current value; otherwise "bw_out" will be lowered to
1914 * the specified value; passing a pointer to "0" can be used to force
1915 * us to disconnect from the peer; "bw_out" might not increase
1916 * as specified since the upper bound is generally
1917 * determined by the other peer!
1918 * @param amount reserve N bytes for receiving, negative
1919 * amounts can be used to undo a (recent) reservation;
1920 * @param preference increase incoming traffic share preference by this amount;
1921 * in the absence of "amount" reservations, we use this
1922 * preference value to assign proportional bandwidth shares
1923 * to all connected peers
1924 * @param info function to call with the resulting configuration information
1925 * @param info_cls closure for info
1926 * @return NULL on error
1928 struct GNUNET_CORE_InformationRequestContext *
1929 GNUNET_CORE_peer_change_preference (struct GNUNET_CORE_Handle *h,
1930 const struct GNUNET_PeerIdentity *peer,
1931 struct GNUNET_TIME_Relative timeout,
1932 struct GNUNET_BANDWIDTH_Value32NBO bw_out,
1934 uint64_t preference,
1935 GNUNET_CORE_PeerConfigurationInfoCallback info,
1938 struct GNUNET_CORE_InformationRequestContext *irc;
1939 struct PeerRecord *pr;
1940 struct RequestInfoMessage *rim;
1941 struct ControlMessage *cm;
1943 pr = GNUNET_CONTAINER_multihashmap_get (h->peers,
1947 /* attempt to change preference on peer that is not connected */
1951 if (pr->pcic != NULL)
1953 /* second change before first one is done */
1957 irc = GNUNET_malloc (sizeof (struct GNUNET_CORE_InformationRequestContext));
1960 cm = GNUNET_malloc (sizeof (struct ControlMessage) +
1961 sizeof (struct RequestInfoMessage));
1962 cm->cont = &change_preference_send_continuation;
1965 rim = (struct RequestInfoMessage*) &cm[1];
1966 rim->header.size = htons (sizeof (struct RequestInfoMessage));
1967 rim->header.type = htons (GNUNET_MESSAGE_TYPE_CORE_REQUEST_INFO);
1968 rim->rim_id = htonl (pr->rim_id = h->rim_id_gen++);
1969 rim->limit_outbound = bw_out;
1970 rim->reserve_inbound = htonl (amount);
1971 rim->preference_change = GNUNET_htonll(preference);
1974 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1975 "Queueing CHANGE PREFERENCE request for peer `%s' with RIM %u\n",
1977 (unsigned int) pr->rim_id);
1979 GNUNET_CONTAINER_DLL_insert_tail (h->control_pending_head,
1980 h->control_pending_tail,
1983 pr->pcic_cls = info_cls;
1984 pr->pcic_ptr = irc; /* for free'ing irc */
1985 if (NULL != h->client)
1986 trigger_next_request (h, GNUNET_NO);
1992 * Cancel request for getting information about a peer.
1993 * Note that an eventual change in preference, trust or bandwidth
1994 * assignment MAY have already been committed at the time,
1995 * so cancelling a request is NOT sure to undo the original
1996 * request. The original request may or may not still commit.
1997 * The only thing cancellation ensures is that the callback
1998 * from the original request will no longer be called.
2000 * @param irc context returned by the original GNUNET_CORE_peer_get_info call
2003 GNUNET_CORE_peer_change_preference_cancel (struct GNUNET_CORE_InformationRequestContext *irc)
2005 struct GNUNET_CORE_Handle *h = irc->h;
2006 struct PeerRecord *pr = irc->pr;
2008 GNUNET_assert (pr->pcic_ptr == irc);
2009 if (irc->cm != NULL)
2011 GNUNET_CONTAINER_DLL_remove (h->control_pending_head,
2012 h->control_pending_tail,
2014 GNUNET_free (irc->cm);
2017 pr->pcic_cls = NULL;
2018 pr->pcic_ptr = NULL;
2023 /* end of core_api.c */