- You should have received a copy of the GNU General Public License
- along with GNUnet; see the file COPYING. If not, write to the
- Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA.
-*/
-
-/**
- * @file ats/gnunet-service-ats_addresses.c
- * @brief ats service address management
- * @author Matthias Wachs
- * @author Christian Grothoff
- */
-#include "platform.h"
-#include "gnunet_ats_service.h"
-#include "gnunet-service-ats.h"
-#include "gnunet-service-ats_addresses.h"
-#include "gnunet-service-ats_normalization.h"
-#include "gnunet-service-ats_performance.h"
-#include "gnunet-service-ats_scheduling.h"
-#include "gnunet-service-ats_reservations.h"
-#if HAVE_LIBGLPK
-#include "gnunet-service-ats-solver_mlp.h"
-#endif
-#include "gnunet-service-ats-solver_proportional.h"
-#include "gnunet-service-ats-solver_ril.h"
-
-/**
- * NOTE: Do not change this documentation. This documentation is based on
- * gnunet.org:/vcs/fsnsg/ats-paper.git/tech-doku/ats-tech-guide.tex
- * use build_txt.sh to generate plaintext output
- *
- * 1 ATS addresses : ATS address management
- *
- * This ATS addresses ("addresses") component manages the addresses known to
- * ATS service and suggests addresses to transport service when it is
- * interested in address suggestion for a peer. ATS addresses also
- * instantiates the bandwidth assignment mechanism (solver), notifies it
- * about changes to addresses and forwards changes to bandwidth assignments
- * to transport, depending if transport is interested in this change.
- *
- * 1.1 Input data
- *
- * 1.1.1 Addresses
- *
- * Addresses are added by specifying peer ID, plugin, address, address length
- * and session, if available. ATS information can be specified if available.
- *
- * 1.1.2 Networks
- *
- * ATS specifies a fix set of networks an address can belong to. For each
- * network an inbound and outbound quota will be specified. The available
- * networks and addtional helper varaibles are defined in
- * gnunet_ats_service.h. At the moment 5 networks are defined:
- * * GNUNET_ATS_NET_UNSPECIFIED
- * * GNUNET_ATS_NET_LOOPBACK
- * * GNUNET_ATS_NET_LAN
- * * GNUNET_ATS_NET_WAN
- * * GNUNET_ATS_NET_WLAN
- *
- * The total number of networks defined is stored in
- * GNUNET_ATS_NetworkTypeCount GNUNET_ATS_NetworkType can be used array
- * initializer for an int array, while GNUNET_ATS_NetworkType is an
- * initializer for a char array containing a string description of all
- * networks
- *
- * 1.1.3 Quotas
- *
- * An inbound and outbound quota for each of the networks mentioned in 1.1.2
- * is loaded from ats configuration during initialization. This quota defines
- * to total amount of inbound and outbound traffic allowed for a specific
- * network. The configuration values used are in section ats:
- * * "NETWORK"_QUOTA_IN = <value>
- * * "NETWORK"_QUOTA_IN = <value>
- *
- * You can specify quotas by setting the <value> to a:
- * * unrestricted: unlimited
- * * number of bytes: e.g. 10240
- * * fancy value: e.g. 64 Kib
- *
- * unlimited is defined as GNUNET_ATS_MaxBandwidthString and equivalent to
- * the value GNUNET_ATS_MaxBandwidth Important predefined values for quotas
- * are:
- * * GNUNET_ATS_DefaultBandwidth: 65536
- * * GNUNET_ATS_MaxBandwidth: UINT32_MAX
- * * GNUNET_CONSTANTS_DEFAULT_BW_IN_OUT: 1024
- *
- * Details of loading quotas and default values will be described on
- *
- * 1.1.4 Preference values
- *
- * 1.2 Data structures used
- *
- * Addresse uses struct ATS_Address for each address. The structs are stored
- * in a linked list and provides a pointer void *solver_information for the
- * solver to store address specific information. It provides the int values
- * active which is set to GNUNET_YES if the address is select for transport
- * use and used, representing that transport service is actively using this
- * address. Address information are stored in peer, addr, addr_len, plugin.
- *
- * 1.3 Initialization
- *
- * During initialization a hashmap to store addresses is created. The quotas
- * for all networks defined for ATS are loaded from configuration. For each
- * network first the logic will check if the string
- * GNUNET_ATS_MaxBandwidthString is configured, if not it will try to convert
- * the configured value as a fancy size and if this fails it will try to use
- * it as a value_number. If no configuration value is found it will assign
- * GNUNET_ATS_DefaultBandwidth. The most important step is to load the
- * configured solver using configuration "[ats]:MODE". Current solvers are
- * MODE_PROPORTIONAL, MODE_MLP. Interaction is done using a solver API
- *
- * 1.4 Solver API
- *
- * Solver functions:
- * * s_init: init the solver with required information
- * * s_add: add a new address
- * * s_update: update ATS values or session for an address
- * * s_get: get prefered address for a peer
- * * s_del: delete an address
- * * s_pref: change preference value for a peer
- * * s_done: shutdown solver
- *
- * Callbacks: addresses provides a bandwidth_changed_cb callback to the
- * solver which is called when bandwidth assigned to peer has changed
- *
- * 1.5 Shutdown
- *
- * During shutdown all addresses are freed and the solver told to shutdown
- *
- * 1.6 Addresses and sessions
- *
- * Addresses consist of the address itself and a numerical session. When a
- * new address without a session is added it has no session, so it gets
- * session 0 assigned. When an address with a session is added and an address
- * object with session 0 is found, this object is updated with the session
- * otherwise a new address object with this session assigned is created.
- *
- * 1.6.1 Terminology
- *
- * Addresses a1,a2 with session s1, s2 are "exact" if:
- * (a1 == a2)&&(s1 == s2)
- * Addresses a1,a2 with session s1, s2 are "equivalent" if:
- * (a1 == a2)&&((s1 == s2)||(s1 == 0)||(s2 == 0)
- *
- * 1.7 Address management
- *
- * Transport service notifies ATS about changes to the addresses known to
- * him.
- *
- * 1.7.1 Adding an address
- *
- * When transport learns a new address it tells ATS and ATS is telling
- * addresses about it using GAS_address_add. If not known to addresses it
- * creates a new address object and calls solver's s_add. ATS information are
- * deserialized and solver is notified about the session and ATS information
- * using s_update.
- *
- * 1.7.2 Updating an address
- *
- * Addresses does an lookup up for the existing address with the given
- * session. If disassembles included ATS information and notifies the solver
- * using s_update about the update.
- *
- * 1.7.3 Deleting an address
- *
- * Addresses does an lookup for the exact address and session and if removes
- * this address. If session != 0 the session is set to 0 and the address is
- * kept. If session == 0, the addresses is removed.
- *
- * 1.7.4 Requesting an address suggestion
- *
- * The address client issues a request address message to be notified about
- * address suggestions for a specific peer. Addresses asks the solver with
- * s_get. If no address is available, it will not send a response, otherwise
- * it will respond with the choosen address.
- *
- * 1.7.5 Address suggestions
- *
- * Addresses will notify the client automatically on any bandwidth_changed_cb
- * by the solver if a address suggestion request is pending. If no address is
- * available it will not respond at all If the client is not interested
- * anymore, it has to cancel the address suggestion request.
- *
- * 1.7.6 Suggestions blocks and reset
- *
- * After suggesting an address it is blocked for ATS_BLOCKING_DELTA sec. to
- * prevent the client from being thrashed. If the client requires immediately
- * it can reset this block using GAS_addresses_handle_backoff_reset.
- *
- * 1.7.7 Marking address in use
- *
- * The client can notify addresses that it successfully uses an address and
- * wants this address to be kept by calling GSA_address_in_use. Adresses will
- * mark the address as used an notify the solver about the use.
- *
- * 1.7.8 Address lifecycle
- *
- * * (add address)
- * * (updated address) || (address in use)
- * * (delete address)
- *
- * 1.8 Bandwidth assignment
- *
- * The addresses are used to perform resource allocation operations. ATS
- * addresses takes care of instantiating the solver configured and notifies
- * the respective solver about address changes and receives changes to the
- * bandwidth assignment from the solver. The current bandwidth assignment is
- * sent to transport. The specific solvers will be described in the specific
- * section.
- *
- * 1.9 Changing peer preferences
- *
- * The bandwidth assigned to a peer can be influenced by setting a preference
- * for a peer. The prefernce will be given to to the solver with s_pref which
- * has to take care of the preference value
-
- */
-
-
-/**
- * Available ressource assignment modes
- */
-enum ATS_Mode
-{
- /*
- * proportional mode:
- *
- * Assign each peer an equal amount of bandwidth (bw)
- *
- * bw_per_peer = bw_total / #active addresses
- */
- MODE_PROPORTIONAL,
-
- /*
- * MLP mode:
- *
- * Solve ressource assignment as an optimization problem
- * Uses an mixed integer programming solver
- */
- MODE_MLP,
-
- /*
- * Reinforcement Learning mode:
- *
- * Solve resource assignment using a learning agent
- */
- MODE_RIL
-};
-
-
-/**
- * Pending Address suggestion requests
- */
-struct GAS_Addresses_Suggestion_Requests
-{
- /**
- * Next in DLL
- */
- struct GAS_Addresses_Suggestion_Requests *next;
-
- /**
- * Previous in DLL
- */
- struct GAS_Addresses_Suggestion_Requests *prev;
-
- /**
- * Peer ID
- */
- struct GNUNET_PeerIdentity id;
-};
-
-
-/**
- * Handle for ATS address component
- */
-struct GAS_Addresses_Handle
-{
- /**
- *
- */
- struct GNUNET_STATISTICS_Handle *stat;
-
- /**
- * A multihashmap to store all addresses
- */
- struct GNUNET_CONTAINER_MultiHashMap *addresses;
-
- /**
- * Configure WAN quota in
- */
- unsigned long long wan_quota_in;
-
- /**
- * Configure WAN quota out
- */
- unsigned long long wan_quota_out;
-
- /**
- * Is ATS addresses running
- */
- int running;
-
- /**
- * Configured ATS solver
- */
- int ats_mode;
-
- /**
- * Solver handle
- */
- void *solver;
-
- /**
- * Address suggestion requests DLL head
- */
- struct GAS_Addresses_Suggestion_Requests *r_head;
-
- /**
- * Address suggestion requests DLL tail
- */
- struct GAS_Addresses_Suggestion_Requests *r_tail;
-
- /* Solver functions */
-
- /**
- * Initialize solver
- */
- GAS_solver_init s_init;
-
- /**
- * Add an address to the solver
- */
- GAS_solver_address_add s_add;
-
-
- GAS_solver_address_property_changed s_address_update_property;
-
- GAS_solver_address_session_changed s_address_update_session;
-
- GAS_solver_address_inuse_changed s_address_update_inuse;
-
- GAS_solver_address_network_changed s_address_update_network;
-
- /**
- * Get address from solver
- */
- GAS_solver_get_preferred_address s_get;
-
- /**
- * Get address from solver
- */
- GAS_solver_stop_get_preferred_address s_get_stop;
-
- /**
- * Delete address in solver
- */
- GAS_solver_address_delete s_del;
-
- /**
- * Change relative preference for quality in solver
- */
- GAS_solver_address_change_preference s_pref;
-
- /**
- * Give feedback about the current assignment
- */
- GAS_solver_address_feedback_preference s_feedback;
-
- /**
- * Start a bulk operation
- */
- GAS_solver_bulk_start s_bulk_start;
-
- /**
- * Bulk operation done
- */
- GAS_solver_bulk_stop s_bulk_stop;
-
- /**
- * Shutdown solver
- */
- GAS_solver_done s_done;
-};
-
-
-/**
- * Disassemble ATS information and update performance information in address
- *
- * Updates existing information and adds new information
- *
- * @param dest destination address
- * @param update source ATS information
- * @param update_count number of ATS information
- * @param delta_dest ats performance information which were updated
- * including previous value
- * @param delta_count number of ATS information in the delta
- * @return GNUNET_YES if address was address updated, GNUNET_NO otherwise
- */
-static unsigned int
-disassemble_ats_information (struct ATS_Address *dest,
- const struct GNUNET_ATS_Information *update,
- uint32_t update_count,
- struct GNUNET_ATS_Information **delta_dest,
- uint32_t *delta_count)
-{
-
- int c1;
- int c2;
- int found;
- int change;
-
- struct GNUNET_ATS_Information add_atsi[update_count];
- struct GNUNET_ATS_Information delta_atsi[update_count];
- struct GNUNET_ATS_Information *tmp_atsi;
- uint32_t add_atsi_count;
- uint32_t delta_atsi_count;
-
- change = GNUNET_NO;
- add_atsi_count = 0;
- delta_atsi_count = 0;
-
- if (0 == update_count)
- return GNUNET_NO;
-
- if (NULL == dest->atsi)
- {
- /* Create performance information */
- dest->atsi = GNUNET_malloc (update_count * sizeof (struct GNUNET_ATS_Information));
- dest->atsi_count = update_count;
- memcpy (dest->atsi, update, update_count * sizeof (struct GNUNET_ATS_Information));
- (*delta_dest) = GNUNET_malloc (update_count * sizeof (struct GNUNET_ATS_Information));
- for (c1 = 0; c1 < update_count; c1 ++)
- {
- (*delta_dest)[c1].type = update[c1].type;
- (*delta_dest)[c1].value = htonl(GNUNET_ATS_VALUE_UNDEFINED);
- }
- (*delta_count) = update_count;
- return GNUNET_YES;
- }
-
- for (c1 = 0; c1 < update_count; c1++)
- {
- /* Update existing performance information */
- found = GNUNET_NO;
- for (c2 = 0; c2 < dest->atsi_count; c2++)
- {
- if (update[c1].type == dest->atsi[c2].type)
- {
- if (update[c1].value != dest->atsi[c2].value)
- {
- /* Save previous value in delta */
- delta_atsi[delta_atsi_count] = dest->atsi[c2];
- delta_atsi_count ++;
- /* Set new value */
- dest->atsi[c2].value = update[c1].value;
- change = GNUNET_YES;
- }
- found = GNUNET_YES;
- break;
- }
- }
- if (GNUNET_NO == found)
- {
- add_atsi[add_atsi_count] = update[c1];
- add_atsi_count ++;
- delta_atsi[delta_atsi_count].type = update[c1].type;
- delta_atsi[delta_atsi_count].value = htonl (GNUNET_ATS_VALUE_UNDEFINED);
- delta_atsi_count ++;
- }
- }
-
- if (add_atsi_count > 0)
- {
- /* Extend ats performance information */
-
- tmp_atsi = GNUNET_malloc ((dest->atsi_count + add_atsi_count) *
- (sizeof (struct GNUNET_ATS_Information)));
- memcpy (tmp_atsi, dest->atsi, dest->atsi_count * sizeof (struct GNUNET_ATS_Information));
- memcpy (&tmp_atsi[dest->atsi_count], add_atsi, add_atsi_count * sizeof (struct GNUNET_ATS_Information));
- GNUNET_free (dest->atsi);
- dest->atsi = tmp_atsi;
- dest->atsi_count = dest->atsi_count + add_atsi_count;
- change = GNUNET_YES;
- }
-
- if (delta_atsi_count > 0)
- {
- /* Copy delta */
- (*delta_dest) = GNUNET_malloc (delta_atsi_count * sizeof (struct GNUNET_ATS_Information));
- memcpy ((*delta_dest), delta_atsi, delta_atsi_count * sizeof (struct GNUNET_ATS_Information));
- (*delta_count) = delta_atsi_count;
- }
-
- return change;
-}
-
-/**
- * Free the given address
- *
- * @param addr address to destroy
- */
-static void
-free_address (struct ATS_Address *addr)
-{
- GNUNET_free (addr->plugin);
- GNUNET_free_non_null (addr->atsi);
- GNUNET_free (addr);
-}
-
-/**
- * Create a ATS_address with the given information
- *
- * @param peer peer
- * @param plugin_name plugin
- * @param plugin_addr address
- * @param plugin_addr_len address length
- * @param session_id session
- * @return the ATS_Address
- */
-static struct ATS_Address *
-create_address (const struct GNUNET_PeerIdentity *peer,
- const char *plugin_name,
- const void *plugin_addr, size_t plugin_addr_len,
- uint32_t session_id)
-{
- struct ATS_Address *aa = NULL;
- int c1;
- int c2;
-
- aa = GNUNET_malloc (sizeof (struct ATS_Address) + plugin_addr_len);
- aa->peer = *peer;
- aa->addr_len = plugin_addr_len;
- aa->addr = &aa[1];
- memcpy (&aa[1], plugin_addr, plugin_addr_len);
- aa->plugin = GNUNET_strdup (plugin_name);
- aa->session_id = session_id;
- aa->active = GNUNET_NO;
- aa->used = GNUNET_NO;
- aa->solver_information = NULL;
- aa->atsi = NULL;
- aa->atsi_count = 0;
- aa->assigned_bw_in = GNUNET_BANDWIDTH_value_init(0);
- aa->assigned_bw_out = GNUNET_BANDWIDTH_value_init(0);
-
- for (c1 = 0; c1 < GNUNET_ATS_QualityPropertiesCount; c1 ++)
- {
- aa->atsin[c1].avg_queue_index = 0;
- for (c2 = 0; c2 < GAS_normalization_queue_length; c2++)
- aa->atsin[c1].atsi_abs[c2] = GNUNET_ATS_VALUE_UNDEFINED;
- }
-
- return aa;
-}
-
-
-struct CompareAddressContext
-{
- const struct ATS_Address *search;
-
- /* exact_address != NULL if address and session is equal */
- struct ATS_Address *exact_address;
- /* exact_address != NULL if address and session is 0 */
- struct ATS_Address *base_address;
-};
-
-/**
- * Comapre addresses
- *
- * @param cls a CompareAddressContext containin the source address
- * @param key peer id
- * @param value the address to compare with
- * @return GNUNET_YES to continue, GNUNET_NO if address is founce
- */
-
-static int
-compare_address_it (void *cls, const struct GNUNET_HashCode * key, void *value)
-{
- struct CompareAddressContext *cac = cls;
- struct ATS_Address *aa = value;
-
- /* Find an matching exact address:
- *
- * Compare by:
- * aa->addr_len == cac->search->addr_len
- * aa->plugin == cac->search->plugin
- * aa->addr == cac->search->addr
- * aa->session == cac->search->session
- *
- * return as exact address
- */
- if ((aa->addr_len == cac->search->addr_len) && (0 == strcmp (aa->plugin, cac->search->plugin)))
- {
- if ((0 == memcmp (aa->addr, cac->search->addr, aa->addr_len)) && (aa->session_id == cac->search->session_id))
- cac->exact_address = aa;
- }
-
- /* Find an matching base address:
- *
- * Properties:
- *
- * aa->session_id == 0
- *
- * Compare by:
- * aa->addr_len == cac->search->addr_len
- * aa->plugin == cac->search->plugin
- * aa->addr == cac->search->addr
- *
- * return as base address
- */
- if ((aa->addr_len == cac->search->addr_len) && (0 == strcmp (aa->plugin, cac->search->plugin)))
- {
- if ((0 == memcmp (aa->addr, cac->search->addr, aa->addr_len)) && (aa->session_id == 0))
- cac->base_address = aa;
- }
-
- /* Find an matching exact address based on session:
- *
- * Properties:
- *
- * cac->search->addr_len == 0
- *
- * Compare by:
- * aa->plugin == cac->search->plugin
- * aa->session_id == cac->search->session_id
- *
- * return as exact address
- */
- if (0 == cac->search->addr_len)
- {
- if ((0 == strcmp (aa->plugin, cac->search->plugin)) && (aa->session_id == cac->search->session_id))
- cac->exact_address = aa;
- }
-
- if (cac->exact_address == NULL)
- return GNUNET_YES; /* Continue iteration to find exact address */
- else
- return GNUNET_NO; /* Stop iteration since we have an exact address */
-}
-
-
-/**
- * Find an existing equivalent address record.
- * Compares by peer identity and network address OR by session ID
- * (one of the two must match).
- *
- * @param handle the address handle
- * @param peer peer to lookup addresses for
- * @param addr existing address record
- * @return existing address record, NULL for none
- */
-struct ATS_Address *
-find_equivalent_address (struct GAS_Addresses_Handle *handle,
- const struct GNUNET_PeerIdentity *peer,
- const struct ATS_Address *addr)
-{
- struct CompareAddressContext cac;
-
- cac.exact_address = NULL;
- cac.base_address = NULL;
- cac.search = addr;
- GNUNET_CONTAINER_multihashmap_get_multiple (handle->addresses, &peer->hashPubKey,
- &compare_address_it, &cac);
-
- if (cac.exact_address == NULL)
- return cac.base_address;
- return cac.exact_address;
-}
-
-
-/**
- * Find the exact address
- *
- * @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
- * @param session_id session id, can 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,
- const char *plugin_name,
- const void *plugin_addr,
- size_t plugin_addr_len,
- uint32_t session_id)
-{
- struct ATS_Address *aa;
- struct ATS_Address *ea;
-
- aa = create_address (peer,
- plugin_name,
- plugin_addr, plugin_addr_len,
- session_id);
-
- /* Get existing address or address with session == 0 */
- ea = find_equivalent_address (handle, peer, aa);
- free_address (aa);
- if (ea == NULL)
- return NULL;
- else if (ea->session_id != session_id)
- return NULL;
- return ea;
-}
-
-
-/**
- * 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
- * @param session_id session id, can be 0
- * @param atsi performance information for this address
- * @param atsi_count number of performance information contained
- */
-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 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,
- 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 */
- GNUNET_assert (GNUNET_OK ==
- GNUNET_CONTAINER_multihashmap_put (handle->addresses,
- &peer->hashPubKey, new_address,
- GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE));
-
- 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->s_add (handle->solver, new_address, addr_net);
-
- handle->s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses, new_address, atsi, atsi_count);
- handle->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->session_id,
- new_address->atsi, new_address->atsi_count,
- new_address->assigned_bw_out,
- 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 */
- 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->session_id,
- existing_address->atsi, existing_address->atsi_count,
- existing_address->assigned_bw_out,
- 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_INFO, "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->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->s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses, existing_address, atsi, atsi_count);
- handle->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->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 a session or performance information for a peer.
- *
- * If an address was added without a session it will be updated with the
- * session
- *
- * @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
- * @param session_id session id, can be 0
- * @param atsi performance information for this address
- * @param atsi_count number of performance information contained
- */
-void
-GAS_addresses_update (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 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, plugin_name,
- plugin_addr, plugin_addr_len, session_id);
- if (aa == NULL)
- {
- /* GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Tried to update unknown address for peer `%s' `%s' session id %u\n", */
- /* GNUNET_i2s (peer), plugin_name, session_id); */
- /* GNUNET_break (0); */
- return;
- }
-
- if (NULL == aa->solver_information)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Tried to update 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 \n",
- "ADDRESS UPDATE",
- GNUNET_i2s (peer), aa);
-
- /* Update address */
- if (session_id != aa->session_id)
- {
- /* Session changed */
- prev_session = aa->session_id;
- aa->session_id = session_id;
- handle->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->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->session_id,
- aa->atsi, aa->atsi_count,
- aa->assigned_bw_out,
- aa->assigned_bw_in);
-
- handle->s_bulk_start (handle->solver);
- GAS_normalization_normalize_property (handle->addresses, aa, atsi, atsi_count);
- handle->s_bulk_stop (handle->solver);
- }
- GNUNET_free_non_null (atsi_delta);
-}
-
-
-struct DestroyContext
-{
- struct ATS_Address *aa;
-
- struct GAS_Addresses_Handle *handle;
-
- /**
- * GNUNET_NO : full address
- * GNUNET_YES : just session
- */
- int result;
-};
-
-
-/**
- * Delete an address
- *
- * If session != 0, just the session is deleted, the address itself still exists
- * If session == 0, remove full address
- * If session == 0 and addrlen == 0, destroy inbound 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_HashCode * 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 (des->session_id == 0)
- {
- /* Session == 0, remove full address */
- if ((0 == strcmp (des->plugin, aa->plugin)) &&
- (aa->addr_len == des->addr_len) &&
- (0 == memcmp (des->addr, aa->addr, aa->addr_len)))
- {
-
- 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_multihashmap_remove (handle->addresses,
- &aa->peer.hashPubKey, aa));
- handle->s_del (handle->solver, aa, GNUNET_NO);
- free_address (aa);
- dc->result = GNUNET_NO;
- return GNUNET_OK; /* Continue iteration */
- }
- }
- else
- {
- /* Session != 0, just remove session */
- if (aa->session_id != des->session_id)
- return GNUNET_OK; /* irrelevant */
-
- if ((aa->session_id != 0) &&
- (0 != strcmp (des->plugin, aa->plugin)))
- {
- GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- "Different plugins during removal: `%s' vs `%s' \n",
- des->plugin, aa->plugin);
- GNUNET_break (0);
- return GNUNET_OK;
- }
-
- if (aa->addr_len == 0)
- {
- /* Inbound connection died, delete full address */
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "Deleting inbound address for peer `%s': `%s' session %u\n",
- GNUNET_i2s (&aa->peer), aa->plugin, aa->session_id);
-
- /* Notify solver about deletion */
- GNUNET_assert (GNUNET_YES ==
- GNUNET_CONTAINER_multihashmap_remove (handle->addresses,
- &aa->peer.hashPubKey, aa));
- handle->s_del (handle->solver, aa, GNUNET_NO);
- free_address (aa);
- dc->result = GNUNET_NO;
- return GNUNET_OK; /* Continue iteration */
- }
- else
- {
- /* Session died */
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "Deleting session for peer `%s': `%s' %u\n",
- GNUNET_i2s (&aa->peer), aa->plugin, aa->session_id);
- /* Notify solver to delete session */
- handle->s_del (handle->solver, aa, GNUNET_YES);
- aa->session_id = 0;
- aa->active = GNUNET_NO;
- return GNUNET_OK;
- }
- }
- return GNUNET_OK;
-}
-
-
-/**
- * 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
- * @param session_id session id, can 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 session_id)
-{
- struct ATS_Address *ea;
- struct DestroyContext dc;
- if (GNUNET_NO == handle->running)
- return;
-
- /* Get existing address */
- ea = find_exact_address (handle, peer, plugin_name, plugin_addr,
- plugin_addr_len, session_id);
- if (ea == NULL)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "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 DESTROY",
- 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, session_id);
-
- GNUNET_CONTAINER_multihashmap_get_multiple (handle->addresses, &peer->hashPubKey,
- &destroy_by_session_id, &dc);
- 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 plugin_name transport plugin name
- * @param plugin_addr plugin address
- * @param plugin_addr_len length of the plugin address
- * @param session_id session id, can be 0
- * @param in_use GNUNET_YES if GNUNET_NO
- * @return GNUNET_SYSERR on failure (address unknown ...)
- */
-int
-GAS_addresses_in_use (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 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, plugin_name,
- plugin_addr, plugin_addr_len, session_id);
- if (NULL == ea)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- "Trying to set unknown address `%s' `%s' `%u' to %s \n",
- GNUNET_i2s (peer),
- plugin_name, 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_ERROR,
- "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;
- handle->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->r_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_WARNING,
- "No address requests pending for peer `%s', cannot remove!\n", GNUNET_i2s (peer));
- return;
- }
- handle->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->r_head, handle->r_tail, cur);
- GNUNET_free (cur);
-}
-
-/*
-static int
-addrinfo_it (void *cls, const struct GNUNET_HashCode *key, void *value)
-{
- static int count = 0;
- struct GNUNET_PeerIdentity *id = cls;
- struct ATS_Address *aa = value;
-
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "[%u] Peer `%s' %s length %u session %u active %s\n",
- count, GNUNET_i2s (id), aa->plugin, aa->addr_len, aa->session_id,
- (GNUNET_YES == aa->active) ? "active" : "inactive");
-
- count ++;
- return GNUNET_OK;
-}
-*/
-
-/**
- * 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->r_head;
- struct ATS_Address *aa;
-
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- "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_malloc (sizeof (struct GAS_Addresses_Suggestion_Requests));
- cur->id = (*peer);
- GNUNET_CONTAINER_DLL_insert (handle->r_head, handle->r_tail, cur);
- }
-
- /*
- * Debuging information about addresses
- *
- * GNUNET_CONTAINER_multihashmap_get_multiple(handle->addresses,
- * &peer->hashPubKey, &addrinfo_it, (void *) peer);
- */
-
- /* Get prefered address from solver */
- aa = (struct ATS_Address *) handle->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_INFO,
- "Suggesting address %p for peer `%s'\n", aa, GNUNET_i2s (peer));