-static int
-find_address_cb (void *cls,
- const struct GNUNET_PeerIdentity *key,
- void *value)
-{
- struct FindAddressContext *fac = cls;
- struct ATS_Address *aa = value;
-
- if (aa->session_id == fac->session_id)
- {
- fac->exact_address = aa;
- return GNUNET_NO;
- }
- return GNUNET_YES;
-}
-
-
-/**
- * Find the exact address
- *
- * @param handle the address handle to use
- * @param peer peer
- * @param session_id session id, can never be 0
- * @return an ATS_address or NULL
- */
-static struct ATS_Address *
-find_exact_address (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- uint32_t session_id)
-{
- struct FindAddressContext fac;
-
- fac.exact_address = NULL;
- fac.session_id = session_id;
- GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
- peer,
- &find_address_cb, &fac);
- return fac.exact_address;
-}
-
-
-/**
- * Function allowing the solver to obtain normalized preference
- * values from solver
- *
- * @param cls unused
- * @param id the peer to return the normalized properties for
- * @return array of double values with |GNUNET_ATS_PreferenceCount| elements
- */
-const double *
-get_preferences_cb (void *cls,
- const struct GNUNET_PeerIdentity *id)
-{
- return GAS_normalization_get_preferences_by_peer (id);
-}
-
-
-/**
- * Function allowing the solver to obtain normalized property
- * values for an address from solver
- *
- * @param cls unused
- * @param address the address
- * @return array of double values with |GNUNET_ATS_QualityPropertiesCount| elements
- */
-const double *
-get_property_cb (void *cls, const struct ATS_Address *address)
-{
- return GAS_normalization_get_properties ((struct ATS_Address *) address);
-}
-
-
-/**
- * Extract an ATS performance info from an address
- *
- * @param address the address
- * @param type the type to extract in HBO
- * @return the value in HBO or #GNUNET_ATS_VALUE_UNDEFINED in HBO if value does not exist
- */
-static int
-get_performance_info (struct ATS_Address *address, uint32_t type)
-{
- int c1;
- GNUNET_assert(NULL != address);
-
- if ((NULL == address->atsi) || (0 == address->atsi_count))
- return GNUNET_ATS_VALUE_UNDEFINED;
-
- for (c1 = 0; c1 < address->atsi_count; c1++)
- {
- if (ntohl (address->atsi[c1].type) == type)
- return ntohl (address->atsi[c1].value);
- }
- return GNUNET_ATS_VALUE_UNDEFINED;
-}
-
-
-/**
- * Add a new address for a peer.
- *
- * @param handle the address handle to use
- * @param peer peer
- * @param plugin_name transport plugin name
- * @param plugin_addr plugin address
- * @param plugin_addr_len length of the plugin address in @a plugin_addr
- * @param local_address_info the local address for the address
- * @param session_id session id, can be 0
- * @param atsi performance information for this address
- * @param atsi_count number of performance information contained in @a atsi
- */
-void
-GAS_addresses_add (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- const char *plugin_name,
- const void *plugin_addr,
- size_t plugin_addr_len,
- uint32_t local_address_info,
- uint32_t session_id,
- const struct GNUNET_ATS_Information *atsi,
- uint32_t atsi_count)
-{
- struct ATS_Address *new_address;
- struct ATS_Address *existing_address;
- struct GNUNET_ATS_Information *atsi_delta;
- uint32_t atsi_delta_count;
- uint32_t addr_net;
- uint32_t previous_session;
- int c1;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Received `%s' for peer `%s'\n",
- "ADDRESS ADD",
- GNUNET_i2s (peer));
-
- if (GNUNET_NO == handle->running)
- return;
-
- GNUNET_assert(NULL != handle->addresses);
-
- new_address = create_address (peer, plugin_name,
- plugin_addr, plugin_addr_len,
- local_address_info, session_id);
- atsi_delta = NULL;
- disassemble_ats_information (new_address, atsi, atsi_count, &atsi_delta,
- &atsi_delta_count);
- GNUNET_free_non_null (atsi_delta);
- addr_net = get_performance_info (new_address, GNUNET_ATS_NETWORK_TYPE);
- if (GNUNET_ATS_VALUE_UNDEFINED == addr_net)
- addr_net = GNUNET_ATS_NET_UNSPECIFIED;
-
- /* Get existing address or address with session == 0 */
- existing_address = find_equivalent_address (handle, peer, new_address);
- if (existing_address == NULL)
- {
- /* Add a new address */
- new_address->t_added = GNUNET_TIME_absolute_get();
- new_address->t_last_activity = GNUNET_TIME_absolute_get();
- GNUNET_assert(GNUNET_OK ==
- GNUNET_CONTAINER_multipeermap_put (handle->addresses,
- peer,
- new_address,
- GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE));
-
- GNUNET_STATISTICS_set (handle->stat,
- "# addresses",
- GNUNET_CONTAINER_multipeermap_size (handle->addresses),
- GNUNET_NO);
-
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "Adding new address %p for peer `%s', length %u, session id %u, %s\n",
- new_address,
- GNUNET_i2s (peer),
- plugin_addr_len,
- session_id,
- GNUNET_ATS_print_network_type (addr_net));
-
- /* Tell solver about new address */
- handle->env.sf.s_add (handle->solver, new_address, addr_net);
-
- handle->env.sf.s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses,
- new_address,
- atsi,
- atsi_count);
- handle->env.sf.s_bulk_stop (handle->solver);
-
- /* Notify performance clients about new address */
- GAS_performance_notify_all_clients (&new_address->peer, new_address->plugin,
- new_address->addr, new_address->addr_len, new_address->active,
- new_address->atsi, new_address->atsi_count,
- GNUNET_BANDWIDTH_value_init (new_address->assigned_bw_out),
- GNUNET_BANDWIDTH_value_init (new_address->assigned_bw_in));
- return;
- }
-
- /* We have an existing address we can use, clean up new */
- GNUNET_free(new_address->plugin);
- GNUNET_free_non_null(new_address->atsi);
- GNUNET_free(new_address);
- new_address = NULL;
-
- if (0 != existing_address->session_id)
- {
- /* Should not happen */
- GNUNET_break(0);
- return;
- }
-
- addr_net = get_performance_info (existing_address, GNUNET_ATS_NETWORK_TYPE);
- if (GNUNET_ATS_VALUE_UNDEFINED == addr_net)
- addr_net = GNUNET_ATS_NET_UNSPECIFIED;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Found existing address for peer `%s' %p with new session %u in network %s\n",
- GNUNET_i2s (peer), existing_address, session_id,
- GNUNET_ATS_print_network_type (addr_net));
- /* We have an address without an session, update this address */
- existing_address->t_added = GNUNET_TIME_absolute_get();
- existing_address->t_last_activity = GNUNET_TIME_absolute_get();
- atsi_delta = NULL;
- atsi_delta_count = 0;
- if (GNUNET_YES
- == disassemble_ats_information (existing_address, atsi, atsi_count,
- &atsi_delta, &atsi_delta_count))
- {
- /* Notify performance clients about properties */
- GAS_performance_notify_all_clients (&existing_address->peer,
- existing_address->plugin, existing_address->addr,
- existing_address->addr_len, existing_address->active,
- existing_address->atsi, existing_address->atsi_count,
- GNUNET_BANDWIDTH_value_init (existing_address->assigned_bw_out),
- GNUNET_BANDWIDTH_value_init (existing_address->assigned_bw_in));
-
- for (c1 = 0; c1 < atsi_delta_count; c1++)
- {
- if ((GNUNET_ATS_NETWORK_TYPE == ntohl (atsi_delta[c1].type))
- && (addr_net != ntohl (atsi_delta[c1].value)))
- {
- /* Network type changed */
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Address for peer `%s' %p changed from network %s to %s\n",
- GNUNET_i2s (peer), existing_address,
- GNUNET_ATS_print_network_type (addr_net),
- GNUNET_ATS_print_network_type (ntohl (atsi_delta[c1].value)));
- handle->env.sf.s_address_update_network (handle->solver, existing_address,
- ntohl (atsi_delta[c1].value),
- get_performance_info (existing_address, GNUNET_ATS_NETWORK_TYPE));
- addr_net = get_performance_info (existing_address,
- GNUNET_ATS_NETWORK_TYPE);
- }
- }
- /* Notify solver about update with atsi information and session */
- handle->env.sf.s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses, existing_address,
- atsi, atsi_count);
- handle->env.sf.s_bulk_stop (handle->solver);
- }
- GNUNET_free_non_null(atsi_delta);
-
- /* Notify solver about new session */
- if (existing_address->session_id == session_id)
- return; /* possible, can both be 0 since address is revalidated */
-
- previous_session = existing_address->session_id;
- existing_address->session_id = session_id;
- handle->env.sf.s_address_update_session (handle->solver, existing_address,
- previous_session, session_id);
-
- GNUNET_log(GNUNET_ERROR_TYPE_INFO,
- "Updated existing address for peer `%s' %p length %u with new session %u in network %s\n",
- GNUNET_i2s (peer), existing_address, existing_address->addr_len,
- session_id, GNUNET_ATS_print_network_type (addr_net));
-}
-
-
-/**
- * Update an address with new performance information for a peer.
- *
- * @param handle the address handle to use
- * @param peer peer
- * @param session_id session id, never 0
- * @param atsi performance information for this address
- * @param atsi_count number of performance information contained in @a atsi
- */
-void
-GAS_addresses_update (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- uint32_t session_id,
- const struct GNUNET_ATS_Information *atsi,
- uint32_t atsi_count)
-{
- struct ATS_Address *aa;
- struct GNUNET_ATS_Information *atsi_delta;
- uint32_t atsi_delta_count;
- uint32_t prev_session;
- int c1;
-
- if (GNUNET_NO == handle->running)
- return;
- GNUNET_assert (NULL != handle->addresses);
-
- /* Get existing address */
- aa = find_exact_address (handle,
- peer,
- session_id);
- if (NULL == aa)
- {
- GNUNET_break (0);
- return;
- }
- if (NULL == aa->solver_information)
- {
- GNUNET_break (0);
- return;
- }
-
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Received `%s' for peer `%s' address \n",
- "ADDRESS UPDATE",
- GNUNET_i2s (peer),
- aa);
-
- /* Update address */
- aa->t_last_activity = GNUNET_TIME_absolute_get();
- if (session_id != aa->session_id)
- {
- /* Session changed */
- prev_session = aa->session_id;
- aa->session_id = session_id;
- handle->env.sf.s_address_update_session (handle->solver,
- aa,
- prev_session,
- aa->session_id);
- }
-
- atsi_delta = NULL;
- atsi_delta_count = 0;
- if (GNUNET_YES ==
- disassemble_ats_information (aa, atsi,
- atsi_count,
- &atsi_delta,
- &atsi_delta_count))
- {
- /* ATS properties changed */
- for (c1 = 0; c1 < atsi_delta_count; c1++)
- {
- if (GNUNET_ATS_NETWORK_TYPE == ntohl (atsi_delta[c1].type))
- {
- /* Network type changed */
- handle->env.sf.s_address_update_network (handle->solver, aa,
- ntohl (atsi_delta[c1].value),
- get_performance_info (aa, GNUNET_ATS_NETWORK_TYPE));
- }
- }
-
- /* Notify performance clients about updated address */
- GAS_performance_notify_all_clients (&aa->peer, aa->plugin, aa->addr,
- aa->addr_len, aa->active, aa->atsi, aa->atsi_count,
- GNUNET_BANDWIDTH_value_init (aa->assigned_bw_out),
- GNUNET_BANDWIDTH_value_init (aa->assigned_bw_in));
-
- handle->env.sf.s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses,
- aa,
- atsi,
- atsi_count);
- handle->env.sf.s_bulk_stop (handle->solver);
- }
- GNUNET_free_non_null (atsi_delta);
-}
-
-
-/**
- * Closure for #destroy_by_session_id().
- */
-struct DestroyContext
-{
- /**
- * FIXME.
- */
- struct ATS_Address *aa;
-
- /**
- * FIXME.
- */
- struct GAS_Addresses_Handle *handle;
-
- /**
- * #GNUNET_NO : full address
- * #GNUNET_YES : just session
- */
- int result;
-};
-
-
-/**
- * Delete an address.
- *
- * @param cls unused
- * @param key unused
- * @param value the `struct ATS_Address *`
- * @return #GNUNET_OK (continue to iterate)
- */
-static int
-destroy_by_session_id (void *cls,
- const struct GNUNET_PeerIdentity *key,
- void *value)
-{
- struct DestroyContext *dc = cls;
- struct GAS_Addresses_Handle *handle = dc->handle;
- const struct ATS_Address *des = dc->aa;
- struct ATS_Address *aa = value;
-
- GNUNET_assert (0 ==
- memcmp (&aa->peer,
- &des->peer,
- sizeof (struct GNUNET_PeerIdentity)));
- if ( (0 != strcmp (des->plugin, aa->plugin)) ||
- (aa->addr_len != des->addr_len) ||
- (0 != memcmp (des->addr, aa->addr, aa->addr_len)))
- return GNUNET_OK; /* wrong entry */
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "Deleting full address for peer `%s' session %u %p\n",
- GNUNET_i2s (&aa->peer),
- aa->session_id,
- aa);
- /* Notify solver about deletion */
- GNUNET_assert (GNUNET_YES ==
- GNUNET_CONTAINER_multipeermap_remove (handle->addresses,
- &aa->peer,
- aa));
- handle->env.sf.s_del (handle->solver, aa, GNUNET_NO);
- GAS_performance_notify_all_clients (&aa->peer,
- aa->plugin,
- aa->addr,
- aa->addr_len,
- GNUNET_SYSERR,
- NULL, 0,
- zero_bw,
- zero_bw);
- free_address (aa);
- dc->result = GNUNET_NO;
- return GNUNET_OK; /* Continue iteration */
-}
-
-
-/**
- * Remove an address or just a session for a peer.
- *
- * @param handle the address handle to use
- * @param peer peer
- * @param plugin_name transport plugin name
- * @param plugin_addr plugin address
- * @param plugin_addr_len length of the plugin address in @a plugin_addr
- * @param local_address_info the local address for the address
- * @param session_id session id, can never be 0
- */
-void
-GAS_addresses_destroy (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- const char *plugin_name,
- const void *plugin_addr,
- size_t plugin_addr_len,
- uint32_t local_address_info,
- uint32_t session_id)
-{
- struct ATS_Address *ea;
- struct DestroyContext dc;
-
- if (GNUNET_NO == handle->running)
- return;
-
- /* Get existing address */
- ea = find_exact_address (handle,
- peer,
- session_id);
- if (NULL == ea)
- {
- GNUNET_break (0);
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "Tried to destroy unknown address for peer `%s' `%s' session id %u\n",
- GNUNET_i2s (peer),
- plugin_name,
- session_id);
- return;
- }
-
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Received `%s' for peer `%s' address %p session %u\n",
- "ADDRESS DESTROYED",
- GNUNET_i2s (peer),
- ea,
- session_id);
- GNUNET_break (0 < strlen (plugin_name));
- dc.handle = handle;
- dc.aa = create_address (peer,
- plugin_name,
- plugin_addr,
- plugin_addr_len,
- local_address_info,
- session_id);
- GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
- peer,
- &destroy_by_session_id, &dc);
- GNUNET_STATISTICS_set (handle->stat,
- "# addresses",
- GNUNET_CONTAINER_multipeermap_size (handle->addresses),
- GNUNET_NO);
- free_address (dc.aa);
-}
-
-
-/**
- * Notification about active use of an address.
- * in_use == #GNUNET_YES:
- * This address is used to maintain an active connection with a peer.
- * in_use == #GNUNET_NO:
- * This address is no longer used to maintain an active connection with a peer.
- *
- * Note: can only be called with in_use == #GNUNET_NO if called with #GNUNET_YES
- * before
- *
- * @param handle the address handle to use
- * @param peer peer
- * @param session_id session id, can be 0
- * @param in_use #GNUNET_YES if #GNUNET_NO FIXME
- * @return #GNUNET_SYSERR on failure (address unknown ...)
- */
-int
-GAS_addresses_in_use (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- uint32_t session_id,
- int in_use)
-{
- struct ATS_Address *ea;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Received `%s' for peer `%s'\n",
- "ADDRESS IN USE",
- GNUNET_i2s (peer));
- if (GNUNET_NO == handle->running)
- return GNUNET_SYSERR;
- ea = find_exact_address (handle,
- peer,
- session_id);
- if (NULL == ea)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
- "Trying to set unknown address `%s' `%u' to %s \n",
- GNUNET_i2s (peer),
- session_id,
- (GNUNET_NO == in_use) ? "NO" : "YES");
- GNUNET_break (0);
- return GNUNET_SYSERR;
- }
- if (ea->used == in_use)
- {
- GNUNET_break (0);
- GNUNET_log(GNUNET_ERROR_TYPE_WARNING,
- "Address in use called multiple times for peer `%s': %s -> %s \n",
- GNUNET_i2s (peer),
- (GNUNET_NO == ea->used) ? "NO" : "YES",
- (GNUNET_NO == in_use) ? "NO" : "YES");
- return GNUNET_SYSERR;
- }
- /* Tell solver about update */
- ea->used = in_use;
- ea->t_last_activity = GNUNET_TIME_absolute_get();
- handle->env.sf.s_address_update_inuse (handle->solver,
- ea,
- ea->used);
- return GNUNET_OK;
-}
-
-
-/**
- * Cancel address suggestions for a peer
- *
- * @param handle the address handle
- * @param peer the peer id
- */
-void
-GAS_addresses_request_address_cancel (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer)
-{
- struct GAS_Addresses_Suggestion_Requests *cur = handle->pending_requests_head;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received request: `%s' for peer %s\n",
- "request_address_cancel", GNUNET_i2s (peer));
-
- while (NULL != cur)
- {
- if (0 == memcmp (peer, &cur->id, sizeof(cur->id)))
- break; /* found */
- cur = cur->next;
- }
-
- if (NULL == cur)
- {
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "No address requests pending for peer `%s', cannot remove!\n",
- GNUNET_i2s (peer));
- return;
- }
- handle->env.sf.s_get_stop (handle->solver, peer);
- GAS_addresses_handle_backoff_reset (handle, peer);
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Removed request pending for peer `%s\n",
- GNUNET_i2s (peer));
- GNUNET_CONTAINER_DLL_remove(handle->pending_requests_head, handle->pending_requests_tail, cur);
- GNUNET_free(cur);
-}
-
-
-/**
- * Request address suggestions for a peer
- *
- * @param handle the address handle
- * @param peer the peer id
- */
-void
-GAS_addresses_request_address (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer)
-{
- struct GAS_Addresses_Suggestion_Requests *cur = handle->pending_requests_head;
- struct ATS_Address *aa;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received `%s' for peer `%s'\n",
- "REQUEST ADDRESS", GNUNET_i2s (peer));
-
- if (GNUNET_NO == handle->running)
- return;
- while (NULL != cur)
- {
- if (0 == memcmp (peer, &cur->id, sizeof(cur->id)))
- break; /* already suggesting */
- cur = cur->next;
- }
- if (NULL == cur)
- {
- cur = GNUNET_new (struct GAS_Addresses_Suggestion_Requests);
- cur->id = (*peer);
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Adding new address suggestion request for `%s'\n",
- GNUNET_i2s (peer));
- GNUNET_CONTAINER_DLL_insert(handle->pending_requests_head, handle->pending_requests_tail, cur);
- }
-
- /* Get prefered address from solver */
- aa = (struct ATS_Address *) handle->env.sf.s_get (handle->solver, peer);
- if (NULL == aa)
- {
- GNUNET_log(GNUNET_ERROR_TYPE_INFO, "Cannot suggest address for peer `%s'\n",
- GNUNET_i2s (peer));
- return;
- }
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Suggesting address %p for peer `%s'\n",
- aa, GNUNET_i2s (peer));
-
- GAS_scheduling_transmit_address_suggestion (peer, aa->plugin, aa->addr,
- aa->addr_len, aa->local_address_info, aa->session_id, aa->atsi,
- aa->atsi_count, GNUNET_BANDWIDTH_value_init (aa->assigned_bw_out),
- GNUNET_BANDWIDTH_value_init (aa->assigned_bw_in));
-
- aa->block_interval = GNUNET_TIME_relative_add (aa->block_interval,
- ATS_BLOCKING_DELTA);
- aa->blocked_until = GNUNET_TIME_absolute_add (GNUNET_TIME_absolute_get (),
- aa->block_interval);
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Address %p ready for suggestion, block interval now %llu \n", aa,
- aa->block_interval);
-}
-
-/**
- * Iterator to reset address blocking
- *
- * @param cls not used
- * @param key the peer
- * @param value the address to reset
- * @return #GNUNET_OK to continue
- */
-static int
-reset_address_it (void *cls,
- const struct GNUNET_PeerIdentity *key,
- void *value)
-{
- struct ATS_Address *aa = value;
-
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
- "Resetting interval for peer `%s' address %p from %llu to 0\n",
- GNUNET_i2s (&aa->peer),
- aa,
- aa->block_interval);
- aa->blocked_until = GNUNET_TIME_UNIT_ZERO_ABS;
- aa->block_interval = GNUNET_TIME_UNIT_ZERO;
- return GNUNET_OK;
-}
-
-
-/**
- * Reset suggestion backoff for a peer
- *
- * Suggesting addresses is blocked for ATS_BLOCKING_DELTA. Blocking can be
- * reset using this function
- *
- * @param handle the address handle
- * @param peer the peer id
- */
-void
-GAS_addresses_handle_backoff_reset (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer)
-{
- GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received `%s' for peer `%s'\n",
- "RESET BACKOFF", GNUNET_i2s (peer));
-
- GNUNET_break(
- GNUNET_SYSERR != GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
- peer,
- &reset_address_it, NULL));
-}
-
-
-/**
- * Solver information callback
- *
- * @param cls the closure
- * @param op the operation
- * @param stat operation status
- * @param add additional information
- */
-