new test
[oweals/gnunet.git] / src / ats / test_ats_mlp_update.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_mlp_updating.c
22  * @brief basic test for updating ATS in MLP solver
23  * @author Christian Grothoff
24  * @author Matthias Wachs
25
26  */
27 #include "platform.h"
28 #include "gnunet_util_lib.h"
29 #include "gnunet_statistics_service.h"
30 #include "gnunet_ats_service.h"
31 #include "gnunet-service-ats_addresses_mlp.h"
32 #include "test_ats_api_common.h"
33
34 /**
35  * Return value
36  */
37 static int ret;
38
39 /**
40  * MLP solver handle
41  */
42 struct GAS_MLP_Handle *mlp;
43
44
45 /**
46  * Statistics handle
47  */
48 struct GNUNET_STATISTICS_Handle * stats;
49
50 /**
51  * Hashmap containing addresses
52  */
53 struct GNUNET_CONTAINER_MultiHashMap * addresses;
54
55 /**
56  * Peer
57  */
58 struct GNUNET_PeerIdentity p[2];
59
60 /**
61  * ATS Address
62  */
63 struct ATS_Address *address[3];
64
65 /**
66  * Timeout task
67  */
68 GNUNET_SCHEDULER_TaskIdentifier timeout_task;
69
70
71 int addr_it (void *cls,
72              const struct GNUNET_HashCode * key,
73              void *value)
74 {
75         struct ATS_Address *address = (struct ATS_Address *) value;
76         GAS_mlp_address_delete (mlp, addresses, address, GNUNET_NO);
77         GNUNET_CONTAINER_multihashmap_remove (addresses, key, value);
78   GNUNET_free (address);
79         return GNUNET_OK;
80 }
81
82
83 static void
84 end_now (int res)
85 {
86         if (GNUNET_SCHEDULER_NO_TASK != timeout_task)
87         {
88                         GNUNET_SCHEDULER_cancel (timeout_task);
89                         timeout_task = GNUNET_SCHEDULER_NO_TASK;
90         }
91   if (NULL != stats)
92   {
93           GNUNET_STATISTICS_destroy(stats, GNUNET_NO);
94           stats = NULL;
95   }
96   if (NULL != addresses)
97   {
98                 GNUNET_CONTAINER_multihashmap_iterate (addresses, &addr_it, NULL);
99                 GNUNET_CONTAINER_multihashmap_destroy (addresses);
100                 addresses = NULL ;
101   }
102   if (NULL != mlp)
103   {
104                 GAS_mlp_done (mlp);
105                 mlp = NULL;
106   }
107
108         ret = res;
109 }
110
111 static void
112 end_correctly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
113 {
114   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, _("Test ending with success\n"));
115         end_now (0);
116 }
117
118 static void
119 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
120 {
121         GNUNET_break (0);
122         timeout_task = GNUNET_SCHEDULER_NO_TASK;
123   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Test ending with timeout\n"));
124         end_now (1);
125 }
126
127
128 static void
129 bandwidth_changed_cb (void *cls, struct ATS_Address *address)
130 {
131         static int cb_p0 = GNUNET_NO;
132
133         unsigned long long in = ntohl(address->assigned_bw_in.value__);
134         unsigned long long out = ntohl(address->assigned_bw_out.value__);
135
136   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "MLP suggests for peer `%s' address `%s':`%s' in %llu out %llu \n",
137                 GNUNET_i2s(&address->peer),
138                 address->plugin,
139                 address->addr,
140                 in, out);
141
142   if ((in > 0) && (out > 0) &&
143                 (0 == memcmp(&p[0], &address->peer, sizeof (address->peer))))
144         cb_p0 ++;
145
146   if (1 == cb_p0)
147                 GNUNET_SCHEDULER_add_now (&end_correctly, NULL);
148 }
149
150
151 static void
152 check (void *cls, char *const *args, const char *cfgfile,
153        const struct GNUNET_CONFIGURATION_Handle *cfg)
154 {
155   int quotas[GNUNET_ATS_NetworkTypeCount] = GNUNET_ATS_NetworkType;
156   unsigned long long  quotas_in[GNUNET_ATS_NetworkTypeCount];
157   unsigned long long  quotas_out[GNUNET_ATS_NetworkTypeCount];
158   struct GNUNET_ATS_Information ats;
159
160 #if !HAVE_LIBGLPK
161   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "GLPK not installed!");
162   ret = 1;
163   return;
164 #endif
165
166   timeout_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
167
168   stats = GNUNET_STATISTICS_create("ats", cfg);
169   if (NULL == stats)
170   {
171         GNUNET_break (0);
172     end_now (1);
173     return;
174   }
175
176   /* Load quotas */
177   if (GNUNET_ATS_NetworkTypeCount != load_quotas (cfg, quotas_out, quotas_in,
178                         GNUNET_ATS_NetworkTypeCount))
179   {
180         GNUNET_break (0);
181       end_now (1);
182       return;
183   }
184
185   /* Setup address hashmap */
186   addresses = GNUNET_CONTAINER_multihashmap_create (10, GNUNET_NO);
187
188   /* Init MLP solver */
189   mlp  = GAS_mlp_init (cfg, stats, quotas, quotas_out, quotas_in,
190                 GNUNET_ATS_NetworkTypeCount, &bandwidth_changed_cb, NULL);
191   if (NULL == mlp)
192   {
193         GNUNET_break (0);
194       end_now (1);
195       return;
196   }
197   mlp->mlp_auto_solve = GNUNET_NO;
198
199   /* Create peer 0 */
200   if (GNUNET_SYSERR == GNUNET_CRYPTO_hash_from_string(PEERID0, &p[0].hashPubKey))
201   {
202       GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Could not setup peer!\n");
203       end_now (1);
204       return;
205   }
206
207   /* Create address 0 */
208   address[0] = create_address (&p[0], "test_plugin0", "test_addr0", strlen("test_addr0")+1, 0);
209   if (NULL == address[0])
210   {
211         GNUNET_break (0);
212       end_now (1);
213       return;
214   }
215   GNUNET_CONTAINER_multihashmap_put (addresses, &p[0].hashPubKey, address[0],
216                 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST);
217   /* Adding address 0 */
218   GAS_mlp_address_add (mlp, addresses, address[0]);
219
220   /* Updating address 0*/
221   ats.type =  htonl (GNUNET_ATS_NETWORK_TYPE);
222   ats.value = htonl (GNUNET_ATS_NET_WAN);
223   GAS_mlp_address_update (mlp, addresses, address[0], 1, GNUNET_NO, &ats, 1);
224
225   /* Retrieving preferred address for peer and wait for callback */
226   GAS_mlp_get_preferred_address (mlp, addresses, &p[0]);
227
228   GAS_mlp_solve_problem (mlp, addresses);
229 }
230
231
232 int
233 main (int argc, char *argv[])
234 {
235
236   static char *const argv2[] = { "test_ats_mlp_updating",
237     "-c",
238     "test_ats_mlp.conf",
239     "-L", "WARNING",
240     NULL
241   };
242
243   static struct GNUNET_GETOPT_CommandLineOption options[] = {
244     GNUNET_GETOPT_OPTION_END
245   };
246
247   GNUNET_PROGRAM_run ((sizeof (argv2) / sizeof (char *)) - 1, argv2,
248                       "test_ats_mlp_updating", "nohelp", options,
249                       &check, NULL);
250
251
252   return ret;
253 }
254
255 /* end of file test_ats_mlp_updating.c */