-patch from #1972 to display disconnects instead of exiting
[oweals/gnunet.git] / src / ats / test_ats_api_bandwidth_consumption.c
1 /*
2      This file is part of GNUnet.
3      (C) 2010,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  * @file ats/test_ats_api_bandwidth_consumption.c
22  * @brief test automatic transport selection scheduling API
23  * @author Christian Grothoff
24  * @author Matthias Wachs
25
26  */
27 #include "platform.h"
28 #include "gnunet_ats_service.h"
29 #include "ats.h"
30
31 #define VERBOSE GNUNET_EXTRA_LOGGING
32
33 #define VERBOSE_ARM GNUNET_EXTRA_LOGGING
34
35 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
36
37 static GNUNET_SCHEDULER_TaskIdentifier die_task;
38
39 static GNUNET_SCHEDULER_TaskIdentifier consume_task;
40
41 static struct GNUNET_ATS_SchedulingHandle *ats;
42
43 static struct GNUNET_ATS_PerformanceHandle *atp;
44
45 struct GNUNET_ATS_ReservationContext *sh;
46
47 static struct GNUNET_OS_Process *arm_proc;
48
49 static struct PeerContext *p;
50
51 static uint32_t bw_in;
52
53 static uint32_t bw_out;
54
55 static int ret;
56
57 struct Address
58 {
59   char *plugin;
60   size_t plugin_len;
61
62   void *addr;
63   size_t addr_len;
64
65   struct GNUNET_ATS_Information *ats;
66   int ats_count;
67
68   void *session;
69 };
70
71 struct PeerContext
72 {
73   struct GNUNET_PeerIdentity id;
74
75   struct Address *addr;
76 };
77
78
79 static void
80 stop_arm ()
81 {
82   if (0 != GNUNET_OS_process_kill (arm_proc, SIGTERM))
83     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
84   GNUNET_OS_process_wait (arm_proc);
85   GNUNET_OS_process_close (arm_proc);
86   arm_proc = NULL;
87 }
88
89
90 static void
91 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
92 {
93   die_task = GNUNET_SCHEDULER_NO_TASK;
94
95   if (consume_task != GNUNET_SCHEDULER_NO_TASK)
96   {
97     GNUNET_SCHEDULER_cancel (consume_task);
98     consume_task = GNUNET_SCHEDULER_NO_TASK;
99   }
100
101   if (sh != NULL)
102     GNUNET_ATS_reserve_bandwidth_cancel (sh);
103
104   if (ats != NULL)
105     GNUNET_ATS_scheduling_done (ats);
106   if (atp != NULL)
107     GNUNET_ATS_performance_done (atp);
108
109   GNUNET_free (p->addr);
110   GNUNET_free (p);
111
112   ret = GNUNET_SYSERR;
113
114   stop_arm ();
115 }
116
117
118 static void
119 end ()
120 {
121   if (die_task != GNUNET_SCHEDULER_NO_TASK)
122   {
123     GNUNET_SCHEDULER_cancel (die_task);
124     die_task = GNUNET_SCHEDULER_NO_TASK;
125   }
126
127   if (consume_task != GNUNET_SCHEDULER_NO_TASK)
128   {
129     GNUNET_SCHEDULER_cancel (consume_task);
130     consume_task = GNUNET_SCHEDULER_NO_TASK;
131   }
132
133   GNUNET_ATS_scheduling_done (ats);
134
135   GNUNET_ATS_performance_done (atp);
136
137   GNUNET_free (p->addr);
138   GNUNET_free (p);
139
140   ret = 0;
141
142   stop_arm ();
143 }
144
145 void
146 performance_cb (void *cls, const struct GNUNET_PeerIdentity *peer,
147                 const char *plugin_name, const void *plugin_addr,
148                 size_t plugin_addr_len,
149                 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
150                 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
151                 const struct GNUNET_ATS_Information *ats, uint32_t ats_count)
152 {
153
154 }
155
156 void
157 reservation_cb (void *cls, const struct GNUNET_PeerIdentity *peer,
158                 int32_t amount, struct GNUNET_TIME_Relative res_delay)
159 {
160   sh = NULL;
161   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
162               "ATS reserved bandwidth of %i to peer `%s' in %llu ms\n", amount,
163               GNUNET_i2s (peer), res_delay.rel_value);
164 }
165
166 static void
167 consume_bandwidth (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
168 {
169   consume_task = GNUNET_SCHEDULER_NO_TASK;
170   int32_t to_reserve = 500;
171
172   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
173               "Trying to reserver bandwidth of %i to peer `%s' in %llu ms\n",
174               to_reserve, GNUNET_i2s (&p->id));
175
176   sh = GNUNET_ATS_reserve_bandwidth (atp, &p->id, to_reserve, &reservation_cb,
177                                      NULL);
178 }
179
180 static void
181 address_suggest_cb (void *cls, const struct GNUNET_PeerIdentity *peer,
182                     const char *plugin_name, const void *plugin_addr,
183                     size_t plugin_addr_len, struct Session *session,
184                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
185                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
186                     const struct GNUNET_ATS_Information *ats,
187                     uint32_t ats_count)
188 {
189   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "ATS suggested address for peer `%s'\n",
190               GNUNET_i2s (peer));
191
192   bw_in = ntohl (bandwidth_in.value__);
193   bw_out = ntohl (bandwidth_out.value__);
194
195   consume_task = GNUNET_SCHEDULER_add_now (&consume_bandwidth, NULL);
196 }
197
198 void
199 start_arm (const char *cfgname)
200 {
201   arm_proc =
202       GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm",
203                                "gnunet-service-arm",
204 #if VERBOSE_ARM
205                                "-L", "DEBUG",
206 #endif
207                                "-c", cfgname, NULL);
208 }
209
210 static void
211 check (void *cls, char *const *args, const char *cfgfile,
212        const struct GNUNET_CONFIGURATION_Handle *cfg)
213 {
214   ret = GNUNET_SYSERR;
215   struct Address *addr;
216
217   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
218   start_arm (cfgfile);
219
220   ats = GNUNET_ATS_scheduling_init (cfg, &address_suggest_cb, NULL);
221   if (ats == NULL)
222   {
223     ret = GNUNET_SYSERR;
224     end ();
225     return;
226   }
227
228   p = GNUNET_malloc (sizeof (struct PeerContext));
229   addr = GNUNET_malloc (sizeof (struct Address));
230
231   atp = GNUNET_ATS_performance_init (cfg, &performance_cb, NULL);
232   if (atp == NULL)
233   {
234     ret = GNUNET_SYSERR;
235     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to init ATS performance\n");
236     end_badly (NULL, NULL);
237     GNUNET_free (p);
238     GNUNET_free (addr);
239     return;
240   }
241
242   /* set up peer */
243   GNUNET_CRYPTO_hash_create_random (GNUNET_CRYPTO_QUALITY_WEAK,
244                                     &p->id.hashPubKey);
245
246   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Created peer `%s'\n",
247               GNUNET_i2s (&p->id));
248   p->addr = addr;
249   addr->plugin = "test";
250   addr->session = NULL;
251   addr->addr = NULL;
252   addr->addr_len = 0;
253
254   GNUNET_ATS_address_update (ats, &p->id, addr->plugin, addr->addr,
255                              addr->addr_len, addr->session, NULL, 0);
256
257   GNUNET_ATS_suggest_address (ats, &p->id);
258 }
259
260 int
261 main (int argc, char *argv[])
262 {
263   static char *const argv2[] = { "test_ats_api_bandwidth_consumption",
264     "-c",
265     "test_ats_api.conf",
266 #if VERBOSE
267     "-L", "DEBUG",
268 #else
269     "-L", "WARNING",
270 #endif
271     NULL
272   };
273
274   static struct GNUNET_GETOPT_CommandLineOption options[] = {
275     GNUNET_GETOPT_OPTION_END
276   };
277
278   GNUNET_PROGRAM_run ((sizeof (argv2) / sizeof (char *)) - 1, argv2,
279                       "test_ats_api_bandwidth_consumption", "nohelp", options,
280                       &check, NULL);
281
282
283   return ret;
284 }
285
286 /* end of file test_ats_api_bandwidth_consumption.c */