added simulation
[oweals/gnunet.git] / src / ats / gnunet-service-ats_addresses.c
index 300febf092f6524502665710e149cdb3a312541a..24fb8dbfe9f7ed6abb841721434c07c1a8a9a742 100644 (file)
  */
 #include "platform.h"
 #include "gnunet_ats_service.h"
+#include "gnunet_ats_plugin.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
 
  */
 
-/**
- * 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
@@ -281,6 +249,27 @@ struct GAS_Addresses_Suggestion_Requests
   struct GNUNET_PeerIdentity id;
 };
 
+ /**
+  * Pending Address suggestion requests
+  */
+ struct GAS_Addresses_Preference_Clients
+ {
+   /**
+    * Next in DLL
+    */
+   struct GAS_Addresses_Preference_Clients *next;
+
+   /**
+    * Previous in DLL
+    */
+   struct GAS_Addresses_Preference_Clients *prev;
+
+   /**
+    * Peer ID
+    */
+   void *client;
+ };
+
 /**
  * Handle for ATS address component
  */
@@ -294,22 +283,17 @@ struct GAS_Addresses_Handle
   /**
    * A multihashmap to store all addresses
    */
-  struct GNUNET_CONTAINER_MultiHashMap *addresses;
+  struct GNUNET_CONTAINER_MultiPeerMap *addresses;
 
   /**
-   * Configure WAN quota in
-   */
-  unsigned long long wan_quota_in;
-
-  /**
-   * Configure WAN quota out
+   * Is ATS addresses running
    */
-  unsigned long long wan_quota_out;
+  int running;
 
   /**
-   * Is ATS addresses running
+   * Preferences clients
    */
-  int running;
+  int pref_clients;
 
   /**
    * Configured ATS solver
@@ -324,72 +308,32 @@ struct GAS_Addresses_Handle
   /**
    * Address suggestion requests DLL head
    */
-  struct GAS_Addresses_Suggestion_Requests *r_head;
+  struct GAS_Addresses_Suggestion_Requests *pending_requests_head;
 
   /**
    * Address suggestion requests DLL tail
    */
-  struct GAS_Addresses_Suggestion_Requests *r_tail;
-
-  /* Solver functions */
-
-  /**
-   * Initialize solver
-   */
-  GAS_solver_init s_init;
+  struct GAS_Addresses_Suggestion_Requests *pending_requests_tail;
 
   /**
-   * 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
+   * Address suggestion requests DLL head
    */
-  GAS_solver_address_feedback_preference s_feedback;
+  struct GAS_Addresses_Preference_Clients *preference_clients_head;
 
   /**
-   * Start a bulk operation
+   * Address suggestion requests DLL head
    */
-  GAS_solver_bulk_start s_bulk_start;
+  struct GAS_Addresses_Preference_Clients *preference_clients_tail;
 
   /**
-   * Bulk operation done
+   * Solver functions
    */
-  GAS_solver_bulk_stop s_bulk_stop;
+  struct GNUNET_ATS_PluginEnvironment env;
 
   /**
-   * Shutdown solver
+   * Solver plugin name as string
    */
-  GAS_solver_done s_done;
+  char *plugin;
 };
 
 /**
@@ -574,17 +518,19 @@ struct CompareAddressContext
   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
+ * @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)
+compare_address_it (void *cls,
+                   const struct GNUNET_PeerIdentity *key,
+                   void *value)
 {
   struct CompareAddressContext *cac = cls;
   struct ATS_Address *aa = value;
@@ -672,14 +618,16 @@ find_equivalent_address (struct GAS_Addresses_Handle *handle,
   cac.exact_address = NULL;
   cac.base_address = NULL;
   cac.search = addr;
-  GNUNET_CONTAINER_multihashmap_get_multiple (handle->addresses,
-      &peer->hashPubKey, &compare_address_it, &cac);
+  GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
+                                             peer,
+                                             &compare_address_it, &cac);
 
-  if (cac.exact_address == NULL )
+  if (cac.exact_address == NULL)
     return cac.base_address;
   return cac.exact_address;
 }
 
+
 /**
  * Find the exact address
  *
@@ -713,6 +661,34 @@ find_exact_address (struct GAS_Addresses_Handle *handle,
   return ea;
 }
 
+/**
+ * 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
  *
@@ -787,13 +763,13 @@ GAS_addresses_add (struct GAS_Addresses_Handle *handle,
   {
     /* Add a new address */
     GNUNET_assert(
-        GNUNET_OK == GNUNET_CONTAINER_multihashmap_put (handle->addresses,
-            &peer->hashPubKey,
-            new_address,
-            GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE));
+        GNUNET_OK == GNUNET_CONTAINER_multipeermap_put (handle->addresses,
+                                                       peer,
+                                                       new_address,
+                                                       GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE));
 
     GNUNET_STATISTICS_set (handle->stat, "# addresses",
-        GNUNET_CONTAINER_multihashmap_size (handle->addresses), GNUNET_NO);
+        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",
@@ -801,12 +777,12 @@ GAS_addresses_add (struct GAS_Addresses_Handle *handle,
         GNUNET_ATS_print_network_type (addr_net));
 
     /* Tell solver about new address */
-    handle->s_add (handle->solver, new_address, addr_net);
+    handle->env.sf.s_add (handle->solver, new_address, addr_net);
 
-    handle->s_bulk_start (handle->solver);
+    handle->env.sf.s_bulk_start (handle->solver);
     GAS_normalization_normalize_property (handle->addresses, new_address, atsi,
         atsi_count);
-    handle->s_bulk_stop (handle->solver);
+    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,
@@ -862,7 +838,7 @@ GAS_addresses_add (struct GAS_Addresses_Handle *handle,
             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,
+        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,
@@ -870,10 +846,10 @@ GAS_addresses_add (struct GAS_Addresses_Handle *handle,
       }
     }
     /* Notify solver about update with atsi information and session */
-    handle->s_bulk_start (handle->solver);
+    handle->env.sf.s_bulk_start (handle->solver);
     GAS_normalization_normalize_property (handle->addresses, existing_address,
         atsi, atsi_count);
-    handle->s_bulk_stop (handle->solver);
+    handle->env.sf.s_bulk_stop (handle->solver);
   }
   GNUNET_free_non_null(atsi_delta);
 
@@ -883,7 +859,7 @@ GAS_addresses_add (struct GAS_Addresses_Handle *handle,
 
   previous_session = existing_address->session_id;
   existing_address->session_id = session_id;
-  handle->s_address_update_session (handle->solver, existing_address,
+  handle->env.sf.s_address_update_session (handle->solver, existing_address,
       previous_session, session_id);
 
   GNUNET_log(GNUNET_ERROR_TYPE_INFO,
@@ -952,7 +928,7 @@ GAS_addresses_update (struct GAS_Addresses_Handle *handle,
     /* Session changed */
     prev_session = aa->session_id;
     aa->session_id = session_id;
-    handle->s_address_update_session (handle->solver, aa, prev_session,
+    handle->env.sf.s_address_update_session (handle->solver, aa, prev_session,
         aa->session_id);
   }
 
@@ -968,7 +944,7 @@ GAS_addresses_update (struct GAS_Addresses_Handle *handle,
       if (GNUNET_ATS_NETWORK_TYPE == ntohl (atsi_delta[c1].type))
       {
         /* Network type changed */
-        handle->s_address_update_network (handle->solver, aa,
+        handle->env.sf.s_address_update_network (handle->solver, aa,
             ntohl (atsi_delta[c1].value),
             get_performance_info (aa, GNUNET_ATS_NETWORK_TYPE));
       }
@@ -979,10 +955,10 @@ GAS_addresses_update (struct GAS_Addresses_Handle *handle,
         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);
+    handle->env.sf.s_bulk_start (handle->solver);
     GAS_normalization_normalize_property (handle->addresses, aa, atsi,
         atsi_count);
-    handle->s_bulk_stop (handle->solver);
+    handle->env.sf.s_bulk_stop (handle->solver);
   }
   GNUNET_free_non_null(atsi_delta);
 }
@@ -1013,8 +989,9 @@ struct DestroyContext
  * @return GNUNET_OK (continue to iterate)
  */
 static int
-destroy_by_session_id (void *cls, const struct GNUNET_HashCode * key,
-    void *value)
+destroy_by_session_id (void *cls,
+                      const struct GNUNET_PeerIdentity *key,
+                      void *value)
 {
   struct DestroyContext *dc = cls;
   struct GAS_Addresses_Handle *handle = dc->handle;
@@ -1038,8 +1015,10 @@ destroy_by_session_id (void *cls, const struct GNUNET_HashCode * key,
 
       /* 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);
+          GNUNET_YES == GNUNET_CONTAINER_multipeermap_remove (handle->addresses,
+                                                             &aa->peer,
+                                                             aa));
+      handle->env.sf.s_del (handle->solver, aa, GNUNET_NO);
       free_address (aa);
       dc->result = GNUNET_NO;
       return GNUNET_OK; /* Continue iteration */
@@ -1069,8 +1048,9 @@ destroy_by_session_id (void *cls, const struct GNUNET_HashCode * key,
 
       /* 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);
+          GNUNET_YES == GNUNET_CONTAINER_multipeermap_remove (handle->addresses,
+                                                             &aa->peer, aa));
+      handle->env.sf.s_del (handle->solver, aa, GNUNET_NO);
       free_address (aa);
       dc->result = GNUNET_NO;
       return GNUNET_OK; /* Continue iteration */
@@ -1082,7 +1062,7 @@ destroy_by_session_id (void *cls, const struct GNUNET_HashCode * key,
           "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);
+      handle->env.sf.s_del (handle->solver, aa, GNUNET_YES);
       aa->session_id = 0;
       aa->active = GNUNET_NO;
       return GNUNET_OK;
@@ -1091,6 +1071,7 @@ destroy_by_session_id (void *cls, const struct GNUNET_HashCode * key,
   return GNUNET_OK;
 }
 
+
 /**
  * Remove an address or just a session for a peer.
  *
@@ -1122,7 +1103,7 @@ GAS_addresses_destroy (struct GAS_Addresses_Handle *handle,
     return;
   }
 
-  GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+  GNUNET_log(GNUNET_ERROR_TYPE_INFO,
       "Received `%s' for peer `%s' address %p session %u\n", "ADDRESS DESTROY",
       GNUNET_i2s (peer), ea, session_id);
 
@@ -1131,10 +1112,11 @@ GAS_addresses_destroy (struct GAS_Addresses_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);
+  GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
+                                             peer,
+                                             &destroy_by_session_id, &dc);
   GNUNET_STATISTICS_set (handle->stat, "# addresses",
-      GNUNET_CONTAINER_multihashmap_size (handle->addresses), GNUNET_NO);
+      GNUNET_CONTAINER_multipeermap_size (handle->addresses), GNUNET_NO);
   free_address (dc.aa);
 }
 
@@ -1193,7 +1175,7 @@ GAS_addresses_in_use (struct GAS_Addresses_Handle *handle,
 
   /* Tell solver about update */
   ea->used = in_use;
-  handle->s_address_update_inuse (handle->solver, ea, ea->used);
+  handle->env.sf.s_address_update_inuse (handle->solver, ea, ea->used);
   return GNUNET_OK;
 }
 
@@ -1207,7 +1189,7 @@ 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;
+  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));
@@ -1226,11 +1208,11 @@ GAS_addresses_request_address_cancel (struct GAS_Addresses_Handle *handle,
         GNUNET_i2s (peer));
     return;
   }
-  handle->s_get_stop (handle->solver, peer);
+  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->r_head, handle->r_tail, cur);
+  GNUNET_CONTAINER_DLL_remove(handle->pending_requests_head, handle->pending_requests_tail, cur);
   GNUNET_free(cur);
 }
 
@@ -1245,7 +1227,7 @@ 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 GAS_Addresses_Suggestion_Requests *cur = handle->pending_requests_head;
   struct ATS_Address *aa;
 
   GNUNET_log(GNUNET_ERROR_TYPE_INFO, "Received `%s' for peer `%s'\n",
@@ -1266,18 +1248,11 @@ GAS_addresses_request_address (struct GAS_Addresses_Handle *handle,
     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
         "Adding new address suggestion request for `%s'\n",
          GNUNET_i2s (peer));
-    GNUNET_CONTAINER_DLL_insert(handle->r_head, handle->r_tail, cur);
+    GNUNET_CONTAINER_DLL_insert(handle->pending_requests_head, handle->pending_requests_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);
+  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",
@@ -1308,22 +1283,26 @@ GAS_addresses_request_address (struct GAS_Addresses_Handle *handle,
  * @param cls not used
  * @param key the peer
  * @param value the address to reset
- * @return GNUNET_OK to continue
+ * @return #GNUNET_OK to continue
  */
 static int
-reset_address_it (void *cls, const struct GNUNET_HashCode *key, void *value)
+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);
-
+            "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
  *
@@ -1341,9 +1320,413 @@ GAS_addresses_handle_backoff_reset (struct GAS_Addresses_Handle *handle,
       "RESET BACKOFF", GNUNET_i2s (peer));
 
   GNUNET_break(
-      GNUNET_SYSERR != GNUNET_CONTAINER_multihashmap_get_multiple (handle->addresses, &peer->hashPubKey, &reset_address_it, NULL));
+      GNUNET_SYSERR != GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
+                                                                  peer,
+                                                                  &reset_address_it, NULL));
+}
+
+
+
+static int
+eval_count_active_it (void *cls, const struct GNUNET_PeerIdentity *id, void *obj)
+{
+  int *request_fulfilled = cls;
+  struct ATS_Address *addr = obj;
+
+  if (GNUNET_YES == addr->active)
+    (*request_fulfilled) = GNUNET_YES;
+
+  if (*request_fulfilled == GNUNET_YES)
+    return GNUNET_NO;
+  else
+    return GNUNET_YES;
+}
+
+
+/**
+ * Summary context
+ */
+struct SummaryContext {
+  /**
+   * Sum of the utilized inbound bandwidth per network
+   */
+  unsigned long long bandwidth_in_assigned[GNUNET_ATS_NetworkTypeCount];
+
+  /**
+   * Sum of the utilized outbound bandwidth per network
+   */
+  unsigned long long bandwidth_out_assigned[GNUNET_ATS_NetworkTypeCount];
+
+  /**
+   * Sum addresses within a network
+   */
+  unsigned int addresses_in_network[GNUNET_ATS_NetworkTypeCount];
+};
+
+
+static int
+eval_sum_bw_used (void *cls, const struct GNUNET_PeerIdentity *id, void *obj)
+{
+  struct ATS_Address *addr = obj;
+  int networks[GNUNET_ATS_NetworkTypeCount] = GNUNET_ATS_NetworkType;
+  int net;
+  struct SummaryContext  *ctx = cls;
+
+  int c;
+
+  if (GNUNET_YES == addr->active)
+  {
+    net = get_performance_info (addr, GNUNET_ATS_NETWORK_TYPE);
+    for (c = 0; c < GNUNET_ATS_NetworkTypeCount; c++)
+    {
+      if (net == networks[c])
+      {
+        ctx->addresses_in_network[c] ++;
+        ctx->bandwidth_in_assigned[c] += ntohl (addr->assigned_bw_in.value__);
+        ctx->bandwidth_out_assigned[c] += ntohl (addr->assigned_bw_out.value__);
+      }
+    }
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Active address in  %s with (in/out) %llu/%llu Bps\n",
+        GNUNET_ATS_print_network_type(net),
+        ntohl (addr->assigned_bw_in.value__),
+        ntohl (addr->assigned_bw_out.value__));
+  }
+  return GNUNET_OK;
+}
+
+/**
+ * Summary context
+ */
+struct RelativityContext {
+
+  struct GAS_Addresses_Handle *ah;
+};
+
+static int
+find_active_address (void *cls, const struct GNUNET_PeerIdentity *id, void *obj)
+{
+  struct ATS_Address **res = cls;
+  struct ATS_Address *addr = obj;
+
+  if (GNUNET_YES == addr->active)
+    (*res) = addr;
+
+  if (NULL != (*res))
+    return GNUNET_NO;
+  else
+    return GNUNET_YES;
 }
 
+/**
+ * Evaluate current bandwidth assignment
+ *
+ * @param ah address handle
+ */
+void
+GAS_addresses_evaluate_assignment (struct GAS_Addresses_Handle *ah)
+{
+  struct GAS_Addresses_Suggestion_Requests *cur;
+  struct GAS_Addresses_Preference_Clients *pcur;
+  int c;
+
+  float quality_requests_fulfilled = 0.0;
+  float quality_bandwidth_utilization[GNUNET_ATS_NetworkTypeCount];
+  float quality_bandwidth_utilization_total = 0.0;
+  float quality_application_requirements = 0.0;
+  float guq = 0.0;
+
+  int include_requests;
+  int include_utilization;
+  int include_requirements;
+
+  /* Variable related to requests */
+  unsigned int requests_pending;
+  unsigned int requests_fulfilled;
+  unsigned int request_active;
+
+  /* Variable related to utilization */
+  struct SummaryContext sum;
+  struct ATS_Address *active_address;
+  int network_count;
+
+  /* Variables for preferences */
+  int prefs[GNUNET_ATS_PreferenceCount] = GNUNET_ATS_PreferenceType;
+  double pref_val;
+  double prop_val;
+  const double *norm_values;
+  double prefs_fulfill[GNUNET_ATS_PreferenceCount];
+  int prefs_clients[GNUNET_ATS_PreferenceCount];
+  int rels;
+
+  GNUNET_assert (NULL != ah);
+  GNUNET_assert (NULL != ah->addresses);
+
+  requests_pending = 0;
+  requests_fulfilled = 0;
+  /* 1) How many requests could be fulfilled? */
+  for (cur = ah->pending_requests_head; NULL != cur; cur = cur->next)
+  {
+    request_active = GNUNET_NO;
+    GNUNET_CONTAINER_multipeermap_get_multiple (ah->addresses,
+        &cur->id, &eval_count_active_it, &request_active);
+    if (GNUNET_YES == request_active)
+      requests_fulfilled ++;
+    requests_pending ++;
+    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%s': %u pending requests, %s\n",
+        GNUNET_i2s (&cur->id),
+        requests_pending,
+        (GNUNET_YES == request_active) ? "active adress" : "no active address");
+
+  }
+  if (requests_pending > 0)
+  {
+    quality_requests_fulfilled = (float) requests_fulfilled / requests_pending;
+    include_requests = GNUNET_YES;
+  }
+  else
+  {
+    quality_requests_fulfilled = 0.0;
+    include_requests = GNUNET_NO;
+  }
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "%u pending requests, %u requests fullfilled\n",
+      requests_pending, requests_fulfilled);
+
+  /* 2) How well is bandwidth utilized? */
+  network_count = 0;
+  for (c = 0; c < GNUNET_ATS_NetworkTypeCount; c++)
+  {
+    quality_bandwidth_utilization[c] = 0.0;
+    sum.addresses_in_network[c] = 0;
+    sum.bandwidth_in_assigned[c] = 0;
+    sum.bandwidth_out_assigned[c] = 0;
+  }
+  GNUNET_CONTAINER_multipeermap_iterate(ah->addresses,
+      &eval_sum_bw_used, &sum);
+  for (c = 0; c < GNUNET_ATS_NetworkTypeCount; c++)
+  {
+    quality_bandwidth_utilization[c] = (((float)sum.bandwidth_out_assigned[c] / ah->env.out_quota[c]) +
+        ((float)sum.bandwidth_in_assigned[c] / ah->env.in_quota[c])) / 2;
+
+    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Utilization for network `%s': %f\n",
+         GNUNET_ATS_print_network_type(ah->env.networks[c]),
+         quality_bandwidth_utilization[c]);
+    if (sum.addresses_in_network[c] > 0)
+    {
+      quality_bandwidth_utilization_total += quality_bandwidth_utilization[c];
+      network_count ++;
+    }
+  }
+  if (0 < network_count)
+  {
+    quality_bandwidth_utilization_total /= network_count;
+    include_utilization = GNUNET_YES;
+  }
+  else
+  {
+    quality_bandwidth_utilization_total = 0.0;
+    include_utilization = GNUNET_NO;
+  }
+
+  /* 3) How well does selection match application requirements */
+  include_requirements = GNUNET_NO;
+  if (0 == ah->pref_clients)
+  {
+    include_requirements = GNUNET_NO;
+  }
+  else
+  {
+    for (c = 0; c < GNUNET_ATS_PreferenceCount; c++)
+    {
+      prefs_fulfill[c] = 0.0;
+      prefs_clients[c] = 0;
+    }
+
+    for (cur = ah->pending_requests_head; NULL != cur; cur = cur->next)
+    {
+      active_address = NULL;
+      GNUNET_CONTAINER_multipeermap_get_multiple (ah->addresses,
+          &cur->id, &find_active_address, &active_address);
+
+      for (pcur = ah->preference_clients_head; NULL != pcur; pcur = pcur->next)
+      {
+        for (c = 0; c < GNUNET_ATS_PreferenceCount; c++)
+        {
+          if (prefs[c] == GNUNET_ATS_PREFERENCE_END)
+            continue;
+          pref_val = -1.0;
+          pref_val = GAS_normalization_get_preferences_by_client (pcur->client, &cur->id, prefs[c]);
+          if (-1.0 == pref_val)
+          {
+            GNUNET_break (0);
+            continue;
+          }
+
+          if (DEFAULT_REL_PREFERENCE == pref_val)
+          {
+            /* Default preference value */
+            continue;
+          }
+
+          if (NULL != active_address)
+          {
+            norm_values = GAS_normalization_get_properties (active_address);
+            prop_val = norm_values[c];
+            if ((norm_values[c] <= 1.0) || (norm_values[c] >= 2.0))
+                prop_val = DEFAULT_REL_QUALITY;
+          }
+          else
+          {
+            prop_val = DEFAULT_REL_QUALITY;
+          }
+
+          /* We now have preference values [1..2] and properties [1..2] */
+
+          GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "%u Client %p, Peer %s Property %s: pref: %.3f prop %.3f \n",
+              c,
+              pcur->client,
+              GNUNET_i2s (&cur->id),
+              GNUNET_ATS_print_preference_type(prefs[c]),
+              pref_val,
+              prop_val);
+
+          prefs_fulfill[c] += (pref_val * prop_val) / 2;
+          prefs_clients[c] ++;
+        }
+      }
+    }
+    rels = 0;
+    for (c = 0; c < GNUNET_ATS_PreferenceCount; c++)
+    {
+      if (0 < prefs_clients[c])
+      {
+        prefs_fulfill[c] /= prefs_clients[c];
+        rels ++;
+        quality_application_requirements += prefs_fulfill[c];
+      }
+    }
+    if (rels > 0)
+      quality_application_requirements /= rels;
+    else
+      quality_application_requirements = 0.0;
+
+    include_requirements = GNUNET_YES;
+  }
+  /* GUQ */
+
+  if (include_requests + include_utilization + include_requirements > 0)
+    guq = (quality_requests_fulfilled + quality_bandwidth_utilization_total + quality_application_requirements) /
+      (include_requests + include_utilization + include_requirements);
+  else
+    guq = 0.0;
+
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+      "Requests fulfilled %.3f bandwidth utilized %.3f application preferences met %.3f => %.3f\n",
+      quality_requests_fulfilled,
+      quality_bandwidth_utilization_total,
+      quality_application_requirements,
+      guq);
+}
+
+/**
+ * Solver information callback
+ *
+ * @param cls the closure
+ * @param op the operation
+ * @param stat operation status
+ * @param add additional information
+ */
+
+static void
+solver_info_cb (void *cls,
+    enum GAS_Solver_Operation op,
+    enum GAS_Solver_Status stat,
+    enum GAS_Solver_Additional_Information add)
+{
+  char *add_info;
+
+  switch (add) {
+    case GAS_INFO_NONE:
+      add_info = "GAS_INFO_NONE";
+      break;
+    case GAS_INFO_FULL:
+      add_info = "GAS_INFO_MLP_FULL";
+      break;
+    case GAS_INFO_UPDATED:
+      add_info = "GAS_INFO_MLP_UPDATED";
+      break;
+    case GAS_INFO_PROP_ALL:
+      add_info = "GAS_INFO_PROP_ALL";
+      break;
+    case GAS_INFO_PROP_SINGLE:
+      add_info = "GAS_INFO_PROP_SINGLE";
+      break;
+    default:
+      add_info = "INVALID";
+      break;
+  }
+  switch (op)
+  {
+    case GAS_OP_SOLVE_START:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s' `%s'\n", "GAS_OP_SOLVE_START",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL", add_info);
+      return;
+    case GAS_OP_SOLVE_STOP:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_STOP",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL", add_info);
+      return;
+
+    case GAS_OP_SOLVE_SETUP_START:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_SETUP_START",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+
+    case GAS_OP_SOLVE_SETUP_STOP:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_SETUP_STOP",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+
+    case GAS_OP_SOLVE_MLP_LP_START:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_LP_START",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+    case GAS_OP_SOLVE_MLP_LP_STOP:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_LP_STOP",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+
+    case GAS_OP_SOLVE_MLP_MLP_START:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_MLP_START",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+    case GAS_OP_SOLVE_MLP_MLP_STOP:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_MLP_STOP",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+    case GAS_OP_SOLVE_UPDATE_NOTIFICATION_START:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_UPDATE_NOTIFICATION_START",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      return;
+    case GAS_OP_SOLVE_UPDATE_NOTIFICATION_STOP:
+      GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
+          "Solver notifies `%s' with result `%s'\n", "GAS_OP_SOLVE_UPDATE_NOTIFICATION_STOP",
+          (GAS_STAT_SUCCESS == stat) ? "SUCCESS" : "FAIL");
+      GAS_addresses_evaluate_assignment (cls);
+      return;
+    default:
+      break;
+    }
+}
+
+
 /**
  * The preference changed for a peer
  *
@@ -1361,7 +1744,7 @@ normalized_preference_changed_cb (void *cls,
   struct GAS_Addresses_Handle *handle = cls;
 
   /* Tell solver about update */
-  handle->s_pref (handle->solver, peer, kind, pref_rel);
+  handle->env.sf.s_pref (handle->solver, peer, kind, pref_rel);
 }
 
 /**
@@ -1384,35 +1767,44 @@ normalized_property_changed_cb (void *cls, struct ATS_Address *address,
       GNUNET_ATS_print_property_type (type), GNUNET_i2s (&address->peer),
       prop_rel);
 
-  ah->s_address_update_property (ah->solver, address, type, 0, prop_rel);
+  ah->env.sf.s_address_update_property (ah->solver, address, type, 0, prop_rel);
 }
 
-/**
- * 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)
+static struct GAS_Addresses_Preference_Clients *
+find_preference_client (struct GAS_Addresses_Handle *handle, void *client)
 {
-  return GAS_normalization_get_preferences (id);
+  struct GAS_Addresses_Preference_Clients *cur;
+
+  for (cur = handle->preference_clients_head; NULL != cur; cur = cur->next)
+  {
+    if (cur->client == client)
+      return cur;
+  }
+  return NULL;
 }
 
 /**
- * Function allowing the solver to obtain normalized property
- * values for an address from solver
+ * A performance client disconnected
  *
- * @param cls unused
- * @param address the address
- * @return array of double values with |GNUNET_ATS_QualityPropertiesCount| elements
+ * @param handle address handle
+ * @param client the client
  */
-const double *
-get_property_cb (void *cls, const struct ATS_Address *address)
+
+void
+GAS_addresses_preference_client_disconnect (struct GAS_Addresses_Handle *handle,
+    void *client)
 {
-  return GAS_normalization_get_properties ((struct ATS_Address *) address);
+  struct GAS_Addresses_Preference_Clients * pc;
+  if (NULL != (pc = find_preference_client (handle, client)))
+  {
+    GNUNET_CONTAINER_DLL_remove (handle->preference_clients_head,
+        handle->preference_clients_tail, pc);
+    GNUNET_free (pc);
+    GNUNET_assert (handle->pref_clients > 0);
+    handle->pref_clients --;
+    GNUNET_STATISTICS_set (handle->stat, "# active performance clients", handle->pref_clients, GNUNET_NO);
+  }
+  GAS_normalization_preference_client_disconnect (client);
 }
 
 /**
@@ -1425,10 +1817,11 @@ get_property_cb (void *cls, const struct ATS_Address *address)
  * @param score_abs the new preference score
  */
 void
-GAS_addresses_change_preference (struct GAS_Addresses_Handle *handle,
+GAS_addresses_preference_change (struct GAS_Addresses_Handle *handle,
     void *client, const struct GNUNET_PeerIdentity *peer,
     enum GNUNET_ATS_PreferenceKind kind, float score_abs)
 {
+  struct GAS_Addresses_Preference_Clients * pc;
   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
       "Received `%s' for peer `%s' for client %p\n", "CHANGE PREFERENCE",
       GNUNET_i2s (peer), client);
@@ -1436,9 +1829,9 @@ GAS_addresses_change_preference (struct GAS_Addresses_Handle *handle,
   if (GNUNET_NO == handle->running)
     return;
 
-  if (GNUNET_NO
-      == GNUNET_CONTAINER_multihashmap_contains (handle->addresses,
-          &peer->hashPubKey))
+  if (GNUNET_NO ==
+      GNUNET_CONTAINER_multipeermap_contains (handle->addresses,
+                                             peer))
   {
     GNUNET_log(GNUNET_ERROR_TYPE_WARNING,
         "Received `%s' for unknown peer `%s' from client %p\n",
@@ -1446,10 +1839,20 @@ GAS_addresses_change_preference (struct GAS_Addresses_Handle *handle,
     return;
   }
 
-  handle->s_bulk_start (handle->solver);
+  if (NULL == find_preference_client (handle, client))
+  {
+    pc = GNUNET_malloc (sizeof (struct GAS_Addresses_Preference_Clients));
+    pc->client = client;
+    GNUNET_CONTAINER_DLL_insert (handle->preference_clients_head,
+        handle->preference_clients_tail, pc);
+    handle->pref_clients ++;
+    GNUNET_STATISTICS_set (handle->stat, "# active performance clients", handle->pref_clients, GNUNET_NO);
+  }
+
+  handle->env.sf.s_bulk_start (handle->solver);
   /* Tell normalization about change, normalization will call callback if preference changed */
   GAS_normalization_normalize_preference (client, peer, kind, score_abs);
-  handle->s_bulk_stop (handle->solver);
+  handle->env.sf.s_bulk_stop (handle->solver);
 }
 
 /**
@@ -1475,9 +1878,9 @@ GAS_addresses_preference_feedback (struct GAS_Addresses_Handle *handle,
   if (GNUNET_NO == handle->running)
     return;
 
-  if (GNUNET_NO
-      == GNUNET_CONTAINER_multihashmap_contains (handle->addresses,
-          &peer->hashPubKey))
+  if (GNUNET_NO ==
+      GNUNET_CONTAINER_multipeermap_contains (handle->addresses,
+                                             peer))
   {
     GNUNET_log(GNUNET_ERROR_TYPE_WARNING,
         "Received `%s' for unknown peer `%s' from client %p\n",
@@ -1485,7 +1888,7 @@ GAS_addresses_preference_feedback (struct GAS_Addresses_Handle *handle,
     return;
   }
 
-  handle->s_feedback (handle->solver, application, peer, scope, kind,
+  handle->env.sf.s_feedback (handle->solver, application, peer, scope, kind,
       score_abs);
 }
 
@@ -1637,7 +2040,7 @@ bandwidth_changed_cb (void *cls, struct ATS_Address *address)
   GAS_performance_notify_all_clients (&address->peer, address->plugin,
       address->addr, address->addr_len, address->session_id, address->atsi,
       address->atsi_count, address->assigned_bw_out, address->assigned_bw_in);
-  cur = handle->r_head;
+  cur = handle->pending_requests_head;
   while (NULL != cur)
   {
     if (0 == memcmp (&address->peer, &cur->id, sizeof(cur->id)))
@@ -1687,11 +2090,10 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
     const struct GNUNET_STATISTICS_Handle *stats)
 {
   struct GAS_Addresses_Handle *ah;
-  int quotas[GNUNET_ATS_NetworkTypeCount] = GNUNET_ATS_NetworkType;
   unsigned long long quotas_in[GNUNET_ATS_NetworkTypeCount];
   unsigned long long quotas_out[GNUNET_ATS_NetworkTypeCount];
-  int quota_count;
   char *mode_str;
+  char *plugin_short;
   int c;
 
   ah = GNUNET_malloc (sizeof (struct GAS_Addresses_Handle));
@@ -1699,10 +2101,12 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
 
   ah->stat = (struct GNUNET_STATISTICS_Handle *) stats;
   /* Initialize the addresses database */
-  ah->addresses = GNUNET_CONTAINER_multihashmap_create (128, GNUNET_NO);
+  ah->addresses = GNUNET_CONTAINER_multipeermap_create (128, GNUNET_NO);
+  ah->pref_clients = 0;
   GNUNET_assert(NULL != ah->addresses);
 
   /* Figure out configured solution method */
+  plugin_short = NULL;
   if (GNUNET_SYSERR
       == GNUNET_CONFIGURATION_get_value_string (cfg, "ats", "MODE", &mode_str))
   {
@@ -1717,20 +2121,24 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
     if (0 == strcmp (mode_str, "PROPORTIONAL"))
     {
       ah->ats_mode = MODE_PROPORTIONAL;
+      plugin_short = "proportional";
     }
     else if (0 == strcmp (mode_str, "MLP"))
     {
       ah->ats_mode = MODE_MLP;
+      plugin_short = "mlp";
 #if !HAVE_LIBGLPK
       GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
           "Assignment method `%s' configured, but GLPK is not available, please install \n",
           mode_str);
       ah->ats_mode = MODE_PROPORTIONAL;
+      plugin_short = "proportional";
 #endif
     }
     else if (0 == strcmp (mode_str, "RIL"))
     {
       ah->ats_mode = MODE_RIL;
+      plugin_short = "ril";
     }
     else
     {
@@ -1738,99 +2146,58 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
           "Invalid resource assignment method `%s' configured, using proportional approach\n",
           mode_str);
       ah->ats_mode = MODE_PROPORTIONAL;
+      plugin_short = "proportional";
     }
     GNUNET_free(mode_str);
   }
-  /* Start configured solution method */
-  switch (ah->ats_mode)
+
+  load_quotas (cfg, quotas_out, quotas_in, GNUNET_ATS_NetworkTypeCount);
+  ah->env.info_cb = &solver_info_cb;
+  ah->env.info_cb_cls = ah;
+  ah->env.bandwidth_changed_cb = &bandwidth_changed_cb;
+  ah->env.bw_changed_cb_cls = ah;
+  ah->env.get_preferences = &get_preferences_cb;
+  ah->env.get_preference_cls = ah;
+  ah->env.get_property = &get_property_cb;
+  ah->env.get_property_cls = ah;
+  ah->env.cfg = cfg;
+  ah->env.stats = stats;
+  ah->env.addresses = ah->addresses;
+
+  ah->env.network_count = GNUNET_ATS_NetworkTypeCount;
+  int networks[GNUNET_ATS_NetworkTypeCount] = GNUNET_ATS_NetworkType;
+  for (c = 0; c < GNUNET_ATS_NetworkTypeCount; c++)
   {
-  case MODE_MLP:
-    /* Init the MLP solver with default values */
-#if HAVE_LIBGLPK
-    ah->s_init = &GAS_mlp_init;
-    ah->s_add = &GAS_mlp_address_add;
-    ah->s_address_update_property = &GAS_mlp_address_property_changed;
-    ah->s_address_update_session = &GAS_mlp_address_session_changed;
-    ah->s_address_update_inuse = &GAS_mlp_address_inuse_changed;
-    ah->s_address_update_network = &GAS_mlp_address_change_network;
-    ah->s_get = &GAS_mlp_get_preferred_address;
-    ah->s_get_stop = &GAS_mlp_stop_get_preferred_address;
-    ah->s_pref = &GAS_mlp_address_change_preference;
-    ah->s_feedback = &GAS_mlp_address_preference_feedback;
-    ah->s_del = &GAS_mlp_address_delete;
-    ah->s_bulk_start = &GAS_mlp_bulk_start;
-    ah->s_bulk_stop = &GAS_mlp_bulk_stop;
-    ah->s_done = &GAS_mlp_done;
-#else
-    GNUNET_free(ah);
-    return NULL ;
-#endif
-    break;
-  case MODE_PROPORTIONAL:
-    /* Init the proportional solver with default values */
-    ah->s_init = &GAS_proportional_init;
-    ah->s_add = &GAS_proportional_address_add;
-    ah->s_address_update_property = &GAS_proportional_address_property_changed;
-    ah->s_address_update_session = &GAS_proportional_address_session_changed;
-    ah->s_address_update_inuse = &GAS_proportional_address_inuse_changed;
-    ah->s_address_update_network = &GAS_proportional_address_change_network;
-    ah->s_get = &GAS_proportional_get_preferred_address;
-    ah->s_get_stop = &GAS_proportional_stop_get_preferred_address;
-    ah->s_pref = &GAS_proportional_address_change_preference;
-    ah->s_feedback = &GAS_proportional_address_preference_feedback;
-    ah->s_del = &GAS_proportional_address_delete;
-    ah->s_bulk_start = &GAS_proportional_bulk_start;
-    ah->s_bulk_stop = &GAS_proportional_bulk_stop;
-    ah->s_done = &GAS_proportional_done;
-    GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "ATS started in %s mode\n",
-        "PROPORTIONAL");
-    break;
-  case MODE_RIL:
-    /* Init the ril solver with default values */
-    ah->s_init = &GAS_ril_init;
-    ah->s_add = &GAS_ril_address_add;
-    ah->s_address_update_property = &GAS_ril_address_property_changed;
-    ah->s_address_update_session = &GAS_ril_address_session_changed;
-    ah->s_address_update_inuse = &GAS_ril_address_inuse_changed;
-    ah->s_address_update_network = &GAS_ril_address_change_network;
-    ah->s_get = &GAS_ril_get_preferred_address;
-    ah->s_get_stop = &GAS_ril_stop_get_preferred_address;
-    ah->s_pref = &GAS_ril_address_change_preference;
-    ah->s_feedback = &GAS_ril_address_preference_feedback;
-    ah->s_del = &GAS_ril_address_delete;
-    ah->s_bulk_start = &GAS_ril_bulk_start;
-    ah->s_bulk_stop = &GAS_ril_bulk_stop;
-    ah->s_done = &GAS_ril_done;
-    GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "ATS started in %s mode\n", "RIL");
-    break;
-  default:
-    return NULL ;
-    break;
+    ah->env.networks[c] = networks[c];
+    ah->env.out_quota[c] = quotas_out[c];
+    ah->env.in_quota[c] = quotas_in[c];
+  }
+
+  GNUNET_asprintf (&ah->plugin, "libgnunet_plugin_ats_%s", plugin_short);
+  GNUNET_log(GNUNET_ERROR_TYPE_INFO, _("Initializing solver `%s '`%s'\n"), plugin_short, ah->plugin);
+  if  (NULL == (ah->solver = GNUNET_PLUGIN_load (ah->plugin, &ah->env)))
+  {
+    GNUNET_log(GNUNET_ERROR_TYPE_ERROR, _("Failed to initialize solver `%s'!\n"), ah->plugin);
+    return NULL;
   }
 
-  GNUNET_assert(NULL != ah->s_init);
-  GNUNET_assert(NULL != ah->s_add);
-  GNUNET_assert(NULL != ah->s_address_update_inuse);
-  GNUNET_assert(NULL != ah->s_address_update_property);
-  GNUNET_assert(NULL != ah->s_address_update_session);
-  GNUNET_assert(NULL != ah->s_address_update_network);
-  GNUNET_assert(NULL != ah->s_get);
-  GNUNET_assert(NULL != ah->s_get_stop);
-  GNUNET_assert(NULL != ah->s_pref);
-  GNUNET_assert(NULL != ah->s_feedback);
-  GNUNET_assert(NULL != ah->s_del);
-  GNUNET_assert(NULL != ah->s_done);
-  GNUNET_assert(NULL != ah->s_bulk_start);
-  GNUNET_assert(NULL != ah->s_bulk_stop);
+  GNUNET_assert (NULL != ah->env.sf.s_add);
+  GNUNET_assert (NULL != ah->env.sf.s_address_update_inuse);
+  GNUNET_assert (NULL != ah->env.sf.s_address_update_property);
+  GNUNET_assert (NULL != ah->env.sf.s_address_update_session);
+  GNUNET_assert (NULL != ah->env.sf.s_address_update_network);
+  GNUNET_assert (NULL != ah->env.sf.s_get);
+  GNUNET_assert (NULL != ah->env.sf.s_get_stop);
+  GNUNET_assert (NULL != ah->env.sf.s_pref);
+  GNUNET_assert (NULL != ah->env.sf.s_feedback);
+  GNUNET_assert (NULL != ah->env.sf.s_del);
+  GNUNET_assert (NULL != ah->env.sf.s_bulk_start);
+  GNUNET_assert (NULL != ah->env.sf.s_bulk_stop);
+
 
   GAS_normalization_start (&normalized_preference_changed_cb, ah,
       &normalized_property_changed_cb, ah);
-  quota_count = load_quotas (cfg, quotas_in, quotas_out,
-      GNUNET_ATS_NetworkTypeCount);
 
-  ah->solver = ah->s_init (cfg, stats, ah->addresses, quotas, quotas_in,
-      quotas_out, quota_count, &bandwidth_changed_cb, ah, &get_preferences_cb,
-      NULL, &get_property_cb, NULL );
   if (NULL == ah->solver)
   {
     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, _("Failed to initialize solver!\n"));
@@ -1841,7 +2208,7 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
   ah->running = GNUNET_YES;
 
   GNUNET_STATISTICS_set (ah->stat, "# addresses",
-      GNUNET_CONTAINER_multihashmap_size (ah->addresses), GNUNET_NO);
+      GNUNET_CONTAINER_multipeermap_size (ah->addresses), GNUNET_NO);
 
   return ah;
 }
@@ -1852,26 +2219,28 @@ GAS_addresses_init (const struct GNUNET_CONFIGURATION_Handle *cfg,
  * @param cls NULL
  * @param key peer identity (unused)
  * @param value the 'struct ATS_Address' to free
- * @return GNUNET_OK (continue to iterate)
+ * @return #GNUNET_OK (continue to iterate)
  */
 static int
-destroy_all_address_it (void *cls, const struct GNUNET_HashCode * key,
-    void *value)
+destroy_all_address_it (void *cls,
+                       const struct GNUNET_PeerIdentity *key,
+                       void *value)
 {
   struct GAS_Addresses_Handle *handle = cls;
   struct ATS_Address *aa = value;
 
   /* Remove */
-  GNUNET_assert(
-      GNUNET_YES == GNUNET_CONTAINER_multihashmap_remove (handle->addresses, key, value));
+  GNUNET_assert(GNUNET_YES ==
+               GNUNET_CONTAINER_multipeermap_remove (handle->addresses, key, value));
   /* Notify */
-  handle->s_del (handle->solver, aa, GNUNET_NO);
+  handle->env.sf.s_del (handle->solver, aa, GNUNET_NO);
   /* Destroy */
   free_address (aa);
 
   return GNUNET_OK;
 }
 
+
 /**
  * Remove all addresses
  *
@@ -1884,13 +2253,15 @@ GAS_addresses_destroy_all (struct GAS_Addresses_Handle *handle)
     return;
 
   GNUNET_log(GNUNET_ERROR_TYPE_INFO, "Destroying all addresses\n");
-  handle->s_bulk_start (handle->solver);
+  handle->env.sf.s_bulk_start (handle->solver);
   if (handle->addresses != NULL )
-    GNUNET_CONTAINER_multihashmap_iterate (handle->addresses,
-        &destroy_all_address_it, handle);
-  handle->s_bulk_start (handle->solver);
+    GNUNET_CONTAINER_multipeermap_iterate (handle->addresses,
+                                          &destroy_all_address_it,
+                                          handle);
+  handle->env.sf.s_bulk_start (handle->solver);
 }
 
+
 /**
  * Shutdown address subsystem.
  *
@@ -1900,52 +2271,67 @@ void
 GAS_addresses_done (struct GAS_Addresses_Handle *handle)
 {
   struct GAS_Addresses_Suggestion_Requests *cur;
+  struct GAS_Addresses_Preference_Clients *pcur;
 
   GNUNET_log(GNUNET_ERROR_TYPE_INFO, "Shutting down addresses\n");
   GNUNET_assert(NULL != handle);
   GAS_addresses_destroy_all (handle);
   handle->running = GNUNET_NO;
-  GNUNET_CONTAINER_multihashmap_destroy (handle->addresses);
+  GNUNET_CONTAINER_multipeermap_destroy (handle->addresses);
   handle->addresses = NULL;
-  while (NULL != (cur = handle->r_head))
+  while (NULL != (cur = handle->pending_requests_head))
   {
-    GNUNET_CONTAINER_DLL_remove(handle->r_head, handle->r_tail, cur);
+    GNUNET_CONTAINER_DLL_remove(handle->pending_requests_head, handle->pending_requests_tail, cur);
     GNUNET_free(cur);
   }
-  handle->s_done (handle->solver);
+
+  while (NULL != (pcur = handle->preference_clients_head))
+  {
+    GNUNET_CONTAINER_DLL_remove (handle->preference_clients_head,
+        handle->preference_clients_tail, pcur);
+    GNUNET_assert (handle->pref_clients > 0);
+    handle->pref_clients --;
+    GNUNET_STATISTICS_set (handle->stat, "# active performance clients", handle->pref_clients, GNUNET_NO);
+    GNUNET_free (pcur);
+  }
+
+  GNUNET_PLUGIN_unload (handle->plugin, handle->solver);
+  GNUNET_free (handle->plugin);
   GNUNET_free(handle);
   /* Stop configured solution method */
   GAS_normalization_stop ();
 }
 
+
 struct PeerIteratorContext
 {
   GNUNET_ATS_Peer_Iterator it;
   void *it_cls;
-  struct GNUNET_CONTAINER_MultiHashMap *peers_returned;
+  struct GNUNET_CONTAINER_MultiPeerMap *peers_returned;
 };
 
+
 /**
  * Iterator to iterate over all peers
  *
  * @param cls a PeerIteratorContext
  * @param key the peer id
  * @param value the ATS_address
- * @return GNUNET_OK to continue
+ * @return #GNUNET_OK to continue
  */
 static int
-peer_it (void *cls, const struct GNUNET_HashCode * key, void *value)
+peer_it (void *cls,
+        const struct GNUNET_PeerIdentity *key,
+        void *value)
 {
   struct PeerIteratorContext *ip_ctx = cls;
-  struct GNUNET_PeerIdentity tmp;
 
-  if (GNUNET_NO
-      == GNUNET_CONTAINER_multihashmap_contains (ip_ctx->peers_returned, key))
+  if (GNUNET_NO ==
+      GNUNET_CONTAINER_multipeermap_contains (ip_ctx->peers_returned, key))
   {
-    GNUNET_CONTAINER_multihashmap_put (ip_ctx->peers_returned, key, NULL,
-        GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST);
-    tmp.hashPubKey = (*key);
-    ip_ctx->it (ip_ctx->it_cls, &tmp);
+    GNUNET_CONTAINER_multipeermap_put (ip_ctx->peers_returned, key, NULL,
+                                      GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST);
+    ip_ctx->it (ip_ctx->it_cls, key);
   }
 
   return GNUNET_OK;
@@ -1969,16 +2355,17 @@ GAS_addresses_iterate_peers (struct GAS_Addresses_Handle *handle,
     return;
   GNUNET_assert(NULL != handle->addresses);
 
-  size = GNUNET_CONTAINER_multihashmap_size (handle->addresses);
+  size = GNUNET_CONTAINER_multipeermap_size (handle->addresses);
   if (0 != size)
   {
     ip_ctx.it = p_it;
     ip_ctx.it_cls = p_it_cls;
-    ip_ctx.peers_returned = GNUNET_CONTAINER_multihashmap_create (size,
-        GNUNET_NO);
-    GNUNET_CONTAINER_multihashmap_iterate (handle->addresses, &peer_it,
-        &ip_ctx);
-    GNUNET_CONTAINER_multihashmap_destroy (ip_ctx.peers_returned);
+    ip_ctx.peers_returned = GNUNET_CONTAINER_multipeermap_create (size,
+                                                                 GNUNET_NO);
+    GNUNET_CONTAINER_multipeermap_iterate (handle->addresses,
+                                          &peer_it,
+                                          &ip_ctx);
+    GNUNET_CONTAINER_multipeermap_destroy (ip_ctx.peers_returned);
   }
   p_it (p_it_cls, NULL );
 }
@@ -1989,19 +2376,22 @@ struct PeerInfoIteratorContext
   void *it_cls;
 };
 
+
 /**
  * Iterator to iterate over a peer's addresses
  *
- * @param cls a PeerInfoIteratorContext
+ * @param cls a `struct PeerInfoIteratorContext`
  * @param key the peer id
- * @param value the ATS_address
- * @return GNUNET_OK to continue
+ * @param value the `struct ATS_address`
+ * @return #GNUNET_OK to continue
  */
 static int
-peerinfo_it (void *cls, const struct GNUNET_HashCode * key, void *value)
+peerinfo_it (void *cls,
+            const struct GNUNET_PeerIdentity *key,
+            void *value)
 {
   struct PeerInfoIteratorContext *pi_ctx = cls;
-  struct ATS_Address *addr = (struct ATS_Address *) value;
+  struct ATS_Address *addr = value;
 
   if (NULL != pi_ctx->it)
   {
@@ -2012,6 +2402,7 @@ peerinfo_it (void *cls, const struct GNUNET_HashCode * key, void *value)
   return GNUNET_YES;
 }
 
+
 /**
  * Return information all peers currently known to ATS
  *
@@ -2027,6 +2418,7 @@ GAS_addresses_get_peer_info (struct GAS_Addresses_Handle *handle,
 {
   struct PeerInfoIteratorContext pi_ctx;
   struct GNUNET_BANDWIDTH_Value32NBO zero_bw;
+
   GNUNET_assert(NULL != peer);
   GNUNET_assert(NULL != handle->addresses);
   if (NULL == pi_it)
@@ -2036,8 +2428,9 @@ GAS_addresses_get_peer_info (struct GAS_Addresses_Handle *handle,
   pi_ctx.it = pi_it;
   pi_ctx.it_cls = pi_it_cls;
 
-  GNUNET_CONTAINER_multihashmap_get_multiple (handle->addresses,
-      &peer->hashPubKey, &peerinfo_it, &pi_ctx);
+  GNUNET_CONTAINER_multipeermap_get_multiple (handle->addresses,
+                                             peer,
+                                             &peerinfo_it, &pi_ctx);
 
   if (NULL != pi_it)
     pi_it (pi_it_cls, NULL, NULL, NULL, 0, GNUNET_NO, NULL, 0, zero_bw,