changes ... more TBD
[oweals/gnunet.git] / src / ats / gnunet-service-ats_performance.c
1 /*
2      This file is part of GNUnet.
3      (C) 2011 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20
21 /**
22  * @file ats/gnunet-service-ats_performance.c
23  * @brief ats service, interaction with 'performance' API
24  * @author Matthias Wachs
25  * @author Christian Grothoff
26  */
27 #include "platform.h"
28 #include "gnunet-service-ats.h"
29 #include "gnunet-service-ats_addresses.h"
30 #include "gnunet-service-ats_performance.h"
31 #include "gnunet-service-ats_reservations.h"
32 #include "ats.h"
33
34
35 /**
36  * We keep clients that are interested in performance in a linked list.
37  */
38 struct PerformanceClient
39 {
40   /**
41    * Next in doubly-linked list.
42    */
43   struct PerformanceClient *next;
44
45   /**
46    * Previous in doubly-linked list.
47    */
48   struct PerformanceClient *prev;
49
50   /**
51    * Actual handle to the client.
52    */
53   struct GNUNET_SERVER_Client *client;
54
55   /**
56    * Options for the client.
57    */
58   enum StartFlag flag;
59
60 };
61
62
63 /**
64  * Head of linked list of all clients to this service.
65  */
66 static struct PerformanceClient *pc_head;
67
68 /**
69  * Tail of linked list of all clients to this service.
70  */
71 static struct PerformanceClient *pc_tail;
72
73 /**
74  * Context for sending messages to performance clients.
75  */
76 static struct GNUNET_SERVER_NotificationContext *nc;
77
78
79 /**
80  * Find the performance client associated with the given handle.
81  *
82  * @param client server handle
83  * @return internal handle
84  */
85 static struct PerformanceClient *
86 find_client (struct GNUNET_SERVER_Client *client)
87 {
88   struct PerformanceClient *pc;
89
90   for (pc = pc_head; pc != NULL; pc = pc->next)
91     if (pc->client == client)
92       return pc;
93   return NULL;
94 }
95
96 /**
97  * Unregister a client (which may have been a performance client,
98  * but this is not assured).
99  *
100  * @param client handle of the (now dead) client
101  */
102 void
103 GAS_performance_remove_client (struct GNUNET_SERVER_Client *client)
104 {
105   struct PerformanceClient *pc;
106   pc = find_client (client);
107   if (NULL == pc)
108     return;
109   GNUNET_CONTAINER_DLL_remove (pc_head, pc_tail, pc);
110   GNUNET_SERVER_client_drop (client);
111   GNUNET_free (pc);
112 }
113
114 /**
115  * Transmit the given performance information to all performance
116  * clients.
117  *
118  * @param pc performance client to send to
119  * @param peer peer for which this is an address suggestion
120  * @param plugin_name 0-termintated string specifying the transport plugin
121  * @param plugin_addr binary address for the plugin to use
122  * @param plugin_addr_len number of bytes in plugin_addr
123  * @param atsi performance data for the address
124  * @param atsi_count number of performance records in 'ats'
125  * @param bandwidth_out assigned outbound bandwidth
126  * @param bandwidth_in assigned inbound bandwidth
127  */
128 void
129 GAS_performance_notify_client (struct PerformanceClient *pc,
130                                const struct GNUNET_PeerIdentity *peer,
131                                const char *plugin_name,
132                                const void *plugin_addr, size_t plugin_addr_len,
133                                const struct GNUNET_ATS_Information *atsi,
134                                uint32_t atsi_count,
135                                struct GNUNET_BANDWIDTH_Value32NBO
136                                bandwidth_out,
137                                struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in)
138 {
139
140   struct PeerInformationMessage *msg;
141   size_t plugin_name_length = strlen (plugin_name) + 1;
142   size_t msize =
143       sizeof (struct PeerInformationMessage) +
144       atsi_count * sizeof (struct GNUNET_ATS_Information) + plugin_addr_len +
145       plugin_name_length;
146   char buf[msize] GNUNET_ALIGN;
147   struct GNUNET_ATS_Information *atsp;
148   char *addrp;
149
150   GNUNET_assert (NULL != pc);
151   if (NULL == find_client (pc->client))
152     return; /* Client disconnected */
153
154   GNUNET_assert (msize < GNUNET_SERVER_MAX_MESSAGE_SIZE);
155   GNUNET_assert (atsi_count <
156                  GNUNET_SERVER_MAX_MESSAGE_SIZE /
157                  sizeof (struct GNUNET_ATS_Information));
158   msg = (struct PeerInformationMessage *) buf;
159   msg->header.size = htons (msize);
160   msg->header.type = htons (GNUNET_MESSAGE_TYPE_ATS_PEER_INFORMATION);
161   msg->ats_count = htonl (atsi_count);
162   msg->peer = *peer;
163   msg->address_length = htons (plugin_addr_len);
164   msg->plugin_name_length = htons (plugin_name_length);
165   msg->bandwidth_out = bandwidth_out;
166   msg->bandwidth_in = bandwidth_in;
167   atsp = (struct GNUNET_ATS_Information *) &msg[1];
168   memcpy (atsp, atsi, sizeof (struct GNUNET_ATS_Information) * atsi_count);
169   addrp = (char *) &atsp[atsi_count];
170   memcpy (addrp, plugin_addr, plugin_addr_len);
171   strcpy (&addrp[plugin_addr_len], plugin_name);
172   GNUNET_SERVER_notification_context_unicast (nc, pc->client, &msg->header,
173                                               GNUNET_YES);
174 }
175
176
177 /**
178  * Transmit the given performance information to all performance
179  * clients.
180  *
181  * @param peer peer for which this is an address suggestion
182  * @param plugin_name 0-termintated string specifying the transport plugin
183  * @param plugin_addr binary address for the plugin to use
184  * @param plugin_addr_len number of bytes in plugin_addr
185  * @param atsi performance data for the address
186  * @param atsi_count number of performance records in 'ats'
187  * @param bandwidth_out assigned outbound bandwidth
188  * @param bandwidth_in assigned inbound bandwidth
189  */
190 void
191 GAS_performance_notify_all_clients (const struct GNUNET_PeerIdentity *peer,
192                                 const char *plugin_name,
193                                 const void *plugin_addr, size_t plugin_addr_len,
194                                 const struct GNUNET_ATS_Information *atsi,
195                                 uint32_t atsi_count,
196                                 struct GNUNET_BANDWIDTH_Value32NBO
197                                 bandwidth_out,
198                                 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in)
199 {
200   struct PerformanceClient *pc;
201
202   for (pc = pc_head; pc != NULL; pc = pc->next)
203     if (pc->flag == START_FLAG_PERFORMANCE_WITH_PIC)
204     {
205         GAS_performance_notify_client (pc,
206                                        peer,
207                                        plugin_name, plugin_addr, plugin_addr_len,
208                                        atsi, atsi_count,
209                                        bandwidth_out, bandwidth_in);
210     }
211
212   GNUNET_STATISTICS_update (GSA_stats,
213                             "# performance updates given to clients", 1,
214                             GNUNET_NO);
215 }
216
217
218 static void
219 peerinfo_it (void *cls,
220              const struct GNUNET_PeerIdentity *id,
221              const char *plugin_name,
222              const void *plugin_addr, size_t plugin_addr_len,
223              const struct GNUNET_ATS_Information *atsi,
224              uint32_t atsi_count,
225              struct GNUNET_BANDWIDTH_Value32NBO
226              bandwidth_out,
227              struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in)
228 {
229   GNUNET_assert (NULL != cls);
230   if (NULL != id)
231   {
232     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Callback for peer `%s' plugin `%s' BW out %llu, BW in %llu \n",
233         GNUNET_i2s (id),
234         plugin_name, ntohl (bandwidth_out.value__), ntohl (bandwidth_in.value__));
235     GAS_performance_notify_client(cls,
236         id,
237         plugin_name, plugin_addr, plugin_addr_len,
238         atsi, atsi_count,
239         bandwidth_out, bandwidth_in);
240   }
241
242 }
243
244
245 /**
246  * Iterator for GAS_performance_add_client
247  *
248  * @param cls the client requesting information
249  * @param id result
250  */
251 static void
252 peer_it (void *cls,
253          const struct GNUNET_PeerIdentity *id)
254 {
255   struct PerformanceClient *pc = cls;
256   if (NULL != id)
257   {
258     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Callback for peer `%s'\n", GNUNET_i2s (id));
259     GAS_addresses_get_peer_info (id, &peerinfo_it, pc);
260   }
261 }
262
263 /**
264  * Register a new performance client.
265  *
266  * @param client handle of the new client
267  * @param flag flag specifying the type of the client
268  */
269 void
270 GAS_performance_add_client (struct GNUNET_SERVER_Client *client,
271                             enum StartFlag flag)
272 {
273   struct PerformanceClient *pc;
274
275   GNUNET_break (NULL == find_client (client));
276   pc = GNUNET_malloc (sizeof (struct PerformanceClient));
277   pc->client = client;
278   pc->flag = flag;
279   GNUNET_SERVER_notification_context_add (nc, client);
280   GNUNET_SERVER_client_keep (client);
281   GNUNET_CONTAINER_DLL_insert (pc_head, pc_tail, pc);
282
283   /* Send information about clients */
284   GAS_addresses_iterate_peers (&peer_it, pc);
285 }
286
287 /**
288  * Handle 'address list request' messages from clients.
289  *
290  * @param cls unused, NULL
291  * @param client client that sent the request
292  * @param message the request message
293  */
294 void
295 GAS_handle_request_address_list (void *cls, struct GNUNET_SERVER_Client *client,
296                                  const struct GNUNET_MessageHeader *message)
297 {
298   struct AddressListRequestMessage * alrm = cls;
299
300   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n",
301               "ADDRESSLIST_REQUEST");
302
303
304
305 }
306
307
308
309 /**
310  * Handle 'reservation request' messages from clients.
311  *
312  * @param cls unused, NULL
313  * @param client client that sent the request
314  * @param message the request message
315  */
316 void
317 GAS_handle_reservation_request (void *cls, struct GNUNET_SERVER_Client *client,
318                                 const struct GNUNET_MessageHeader *message)
319 {
320   const struct ReservationRequestMessage *msg =
321       (const struct ReservationRequestMessage *) message;
322   struct ReservationResultMessage result;
323   int32_t amount;
324   struct GNUNET_TIME_Relative res_delay;
325
326   if (NULL == find_client (client))
327   {
328     /* missing start message! */
329     GNUNET_break (0);
330     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
331     return;
332   }
333   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n",
334               "RESERVATION_REQUEST");
335   amount = (int32_t) ntohl (msg->amount);
336   res_delay = GAS_reservations_reserve (&msg->peer, amount);
337   if (res_delay.rel_value > 0)
338     amount = 0;
339   result.header.size = htons (sizeof (struct ReservationResultMessage));
340   result.header.type = htons (GNUNET_MESSAGE_TYPE_ATS_RESERVATION_RESULT);
341   result.amount = htonl (amount);
342   result.peer = msg->peer;
343   result.res_delay = GNUNET_TIME_relative_hton (res_delay);
344   GNUNET_STATISTICS_update (GSA_stats, "# reservation requests processed", 1,
345                             GNUNET_NO);
346   GNUNET_SERVER_notification_context_unicast (nc, client, &result.header,
347                                               GNUNET_NO);
348   GNUNET_SERVER_receive_done (client, GNUNET_OK);
349 }
350
351
352 /**
353  * Handle 'preference change' messages from clients.
354  *
355  * @param cls unused, NULL
356  * @param client client that sent the request
357  * @param message the request message
358  */
359 void
360 GAS_handle_preference_change (void *cls, struct GNUNET_SERVER_Client *client,
361                               const struct GNUNET_MessageHeader *message)
362 {
363   const struct ChangePreferenceMessage *msg;
364   const struct PreferenceInformation *pi;
365   uint16_t msize;
366   uint32_t nump;
367   uint32_t i;
368
369   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n",
370               "PREFERENCE_CHANGE");
371   msize = ntohs (message->size);
372   if (msize < sizeof (struct ChangePreferenceMessage))
373   {
374     GNUNET_break (0);
375     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
376     return;
377   }
378   msg = (const struct ChangePreferenceMessage *) message;
379   nump = ntohl (msg->num_preferences);
380   if (msize !=
381       sizeof (struct ChangePreferenceMessage) +
382       nump * sizeof (struct PreferenceInformation))
383   {
384     GNUNET_break (0);
385     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
386     return;
387   }
388   GNUNET_STATISTICS_update (GSA_stats, "# preference change requests processed",
389                             1, GNUNET_NO);
390   pi = (const struct PreferenceInformation *) &msg[1];
391   for (i = 0; i < nump; i++)
392     GAS_addresses_change_preference (&msg->peer,
393                                      (enum GNUNET_ATS_PreferenceKind)
394                                      ntohl (pi[i].preference_kind),
395                                      pi[i].preference_value);
396   GNUNET_SERVER_receive_done (client, GNUNET_OK);
397 }
398
399
400 /**
401  * Initialize performance subsystem.
402  *
403  * @param server handle to our server
404  */
405 void
406 GAS_performance_init (struct GNUNET_SERVER_Handle *server)
407 {
408   nc = GNUNET_SERVER_notification_context_create (server, 128);
409 }
410
411
412 /**
413  * Shutdown performance subsystem.
414  */
415 void
416 GAS_performance_done ()
417 {
418   GNUNET_SERVER_notification_context_destroy (nc);
419   nc = NULL;
420 }
421
422 /* end of gnunet-service-ats_performance.c */