towards handling suboperations during overlay connect
[oweals/gnunet.git] / src / testbed / testbed_api_hosts.c
1 /*
2       This file is part of GNUnet
3       (C) 2008--2012 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 testbed/testbed_api_hosts.c
23  * @brief API for manipulating 'hosts' controlled by the GNUnet testing service;
24  *        allows parsing hosts files, starting, stopping and communicating (via
25  *        SSH/stdin/stdout) with the remote (or local) processes
26  * @author Christian Grothoff
27  */
28 #include "platform.h"
29 #include "gnunet_testbed_service.h"
30 #include "gnunet_core_service.h"
31 #include "gnunet_constants.h"
32 #include "gnunet_transport_service.h"
33 #include "gnunet_hello_lib.h"
34 #include "gnunet_container_lib.h"
35
36 #include "testbed_api.h"
37 #include "testbed_api_hosts.h"
38
39 /**
40  * Generic logging shorthand
41  */
42 #define LOG(kind, ...)                          \
43   GNUNET_log_from (kind, "testbed-api-hosts", __VA_ARGS__);
44
45 /**
46  * Number of extra elements we create space for when we grow host list
47  */
48 #define HOST_LIST_GROW_STEP 10
49
50
51 /**
52  * A list entry for registered controllers list
53  */
54 struct RegisteredController
55 {
56   /**
57    * The controller at which this host is registered
58    */
59   const struct GNUNET_TESTBED_Controller *controller;
60
61   /**
62    * The next ptr for DLL
63    */
64   struct RegisteredController *next;
65
66   /**
67    * The prev ptr for DLL
68    */
69   struct RegisteredController *prev;
70 };
71
72
73 /**
74  * Opaque handle to a host running experiments managed by the testing framework.
75  * The master process must be able to SSH to this host without password (via
76  * ssh-agent).
77  */
78 struct GNUNET_TESTBED_Host
79 {
80
81   /**
82    * The next pointer for DLL
83    */
84   struct GNUNET_TESTBED_Host *next;
85
86   /**
87    * The prev pointer for DLL
88    */
89   struct GNUNET_TESTBED_Host *prev;
90
91   /**
92    * The hostname of the host; NULL for localhost
93    */
94   const char *hostname;
95
96   /**
97    * The username to be used for SSH login
98    */
99   const char *username;
100
101   /**
102    * The head for the list of controllers where this host is registered
103    */
104   struct RegisteredController *rc_head;
105
106   /**
107    * The tail for the list of controllers where this host is registered
108    */
109   struct RegisteredController *rc_tail;
110
111   /**
112    * Global ID we use to refer to a host on the network
113    */
114   uint32_t id;
115
116   /**
117    * The port which is to be used for SSH
118    */
119   uint16_t port;
120
121 };
122
123
124 /**
125  * Array of available hosts
126  */
127 static struct GNUNET_TESTBED_Host **host_list;
128
129 /**
130  * The size of the available hosts list
131  */
132 static uint32_t host_list_size;
133
134
135 /**
136  * Lookup a host by ID.
137  *
138  * @param id global host ID assigned to the host; 0 is
139  *        reserved to always mean 'localhost'
140  * @return handle to the host, NULL if host not found
141  */
142 struct GNUNET_TESTBED_Host *
143 GNUNET_TESTBED_host_lookup_by_id_ (uint32_t id)
144 {
145   if (host_list_size <= id)
146     return NULL;
147   return host_list[id];
148 }
149
150
151 /**
152  * Create a host by ID; given this host handle, we could not
153  * run peers at the host, but we can talk about the host
154  * internally.
155  *
156  * @param id global host ID assigned to the host; 0 is
157  *        reserved to always mean 'localhost'
158  * @return handle to the host, NULL on error
159  */
160 struct GNUNET_TESTBED_Host *
161 GNUNET_TESTBED_host_create_by_id_ (uint32_t id)
162 {
163   return GNUNET_TESTBED_host_create_with_id (id, NULL, NULL, 0);
164 }
165
166
167 /**
168  * Obtain the host's unique global ID.
169  *
170  * @param host handle to the host, NULL means 'localhost'
171  * @return id global host ID assigned to the host (0 is
172  *         'localhost', but then obviously not globally unique)
173  */
174 uint32_t
175 GNUNET_TESTBED_host_get_id_ (const struct GNUNET_TESTBED_Host * host)
176 {
177   return host->id;
178 }
179
180
181 /**
182  * Obtain the host's hostname.
183  *
184  * @param host handle to the host, NULL means 'localhost'
185  * @return hostname of the host
186  */
187 const char *
188 GNUNET_TESTBED_host_get_hostname_ (const struct GNUNET_TESTBED_Host *host)
189 {
190   return host->hostname;
191 }
192
193
194 /**
195  * Obtain the host's username
196  *
197  * @param host handle to the host, NULL means 'localhost'
198  * @return username to login to the host
199  */
200 const char *
201 GNUNET_TESTBED_host_get_username_ (const struct GNUNET_TESTBED_Host *host)
202 {
203   return host->username;
204 }
205
206
207 /**
208  * Obtain the host's ssh port
209  *
210  * @param host handle to the host, NULL means 'localhost'
211  * @return username to login to the host
212  */
213 uint16_t
214 GNUNET_TESTBED_host_get_ssh_port_ (const struct GNUNET_TESTBED_Host * host)
215 {
216   return host->port;
217 }
218
219
220 /**
221  * Create a host to run peers and controllers on.
222  *
223  * @param id global host ID assigned to the host; 0 is
224  *        reserved to always mean 'localhost'
225  * @param hostname name of the host, use "NULL" for localhost
226  * @param username username to use for the login; may be NULL
227  * @param port port number to use for ssh; use 0 to let ssh decide
228  * @return handle to the host, NULL on error
229  */
230 struct GNUNET_TESTBED_Host *
231 GNUNET_TESTBED_host_create_with_id (uint32_t id, const char *hostname,
232                                     const char *username, uint16_t port)
233 {
234   struct GNUNET_TESTBED_Host *host;
235   uint32_t new_size;
236
237   if ((id < host_list_size) && (NULL != host_list[id]))
238   {
239     LOG (GNUNET_ERROR_TYPE_WARNING, "Host with id: %u already created\n", id);
240     return NULL;
241   }
242   host = GNUNET_malloc (sizeof (struct GNUNET_TESTBED_Host));
243   host->hostname = (NULL != hostname) ? GNUNET_strdup (hostname) : NULL;
244   host->username = (NULL != username) ? GNUNET_strdup (username) : NULL;
245   host->id = id;
246   host->port = (0 == port) ? 22 : port;
247   new_size = host_list_size;
248   while (id >= new_size)
249     new_size += HOST_LIST_GROW_STEP;
250   if (new_size != host_list_size)
251   {
252     host_list =
253         GNUNET_realloc (host_list,
254                         sizeof (struct GNUNET_TESTBED_Host *) * new_size);
255     (void) memset (&host_list[host_list_size], 0,
256                    sizeof (struct GNUNET_TESTBED_Host *) * (new_size -
257                                                             host_list_size));
258     host_list_size = new_size;
259   }
260   LOG (GNUNET_ERROR_TYPE_DEBUG, "Adding host with id: %u\n", host->id);
261   host_list[id] = host;
262   return host;
263 }
264
265
266 /**
267  * Create a host to run peers and controllers on.
268  *
269  * @param hostname name of the host, use "NULL" for localhost
270  * @param username username to use for the login; may be NULL
271  * @param port port number to use for ssh; use 0 to let ssh decide
272  * @return handle to the host, NULL on error
273  */
274 struct GNUNET_TESTBED_Host *
275 GNUNET_TESTBED_host_create (const char *hostname, const char *username,
276                             uint16_t port)
277 {
278   static uint32_t uid_generator;
279
280   if (NULL == hostname)
281     return GNUNET_TESTBED_host_create_with_id (0, hostname, username, port);
282   return GNUNET_TESTBED_host_create_with_id (++uid_generator, hostname,
283                                              username, port);
284 }
285
286
287 /**
288  * Load a set of hosts from a configuration file.
289  *
290  * @param filename file with the host specification
291  * @param hosts set to the hosts found in the file
292  * @return number of hosts returned in 'hosts', 0 on error
293  */
294 unsigned int
295 GNUNET_TESTBED_hosts_load_from_file (const char *filename,
296                                      struct GNUNET_TESTBED_Host ***hosts)
297 {
298 #if 0
299   struct GNUNET_TESTBED_Host **host_array;
300
301   host_array = GNUNET_malloc (num_hosts * sizeof (struct GNUNET_TESTBED_Host *));
302   host_array[foo] = GNUNET_TESTBED_host_create (FIXME);
303   *hosts = host_array;
304
305   return num_hosts;
306 #endif  
307   // see testing_group.c, GNUNET_TESTING_hosts_load
308   GNUNET_break (0);
309   return 0;
310 }
311
312
313 /**
314  * Destroy a host handle.  Must only be called once everything
315  * running on that host has been stopped.
316  *
317  * @param host handle to destroy
318  */
319 void
320 GNUNET_TESTBED_host_destroy (struct GNUNET_TESTBED_Host *host)
321 {
322   struct RegisteredController *rc;
323   uint32_t id;
324
325   GNUNET_assert (host->id < host_list_size);
326   GNUNET_assert (host_list[host->id] == host);
327   host_list[host->id] = NULL;
328   /* clear registered controllers list */
329   for (rc = host->rc_head; NULL != rc; rc = host->rc_head)
330   {
331     GNUNET_CONTAINER_DLL_remove (host->rc_head, host->rc_tail, rc);
332     GNUNET_free (rc);
333   }
334   GNUNET_free_non_null ((char *) host->username);
335   GNUNET_free_non_null ((char *) host->hostname);
336   GNUNET_free (host);
337   while (host_list_size >= HOST_LIST_GROW_STEP)
338   {
339     for (id = host_list_size - 1; id > host_list_size - HOST_LIST_GROW_STEP;
340          id--)
341       if (NULL != host_list[id])
342         break;
343     if (id != host_list_size - HOST_LIST_GROW_STEP)
344       break;
345     if (NULL != host_list[id])
346       break;
347     host_list_size -= HOST_LIST_GROW_STEP;
348   }
349   host_list =
350       GNUNET_realloc (host_list,
351                       sizeof (struct GNUNET_TESTBED_Host *) * host_list_size);
352 }
353
354
355 /**
356  * Marks a host as registered with a controller
357  *
358  * @param host the host to mark
359  * @param controller the controller at which this host is registered
360  */
361 void
362 GNUNET_TESTBED_mark_host_registered_at_ (struct GNUNET_TESTBED_Host *host,
363                                          const struct GNUNET_TESTBED_Controller
364                                          *const controller)
365 {
366   struct RegisteredController *rc;
367
368   for (rc = host->rc_head; NULL != rc; rc = rc->next)
369   {
370     if (controller == rc->controller)   /* already registered at controller */
371     {
372       GNUNET_break (0);
373       return;
374     }
375   }
376   rc = GNUNET_malloc (sizeof (struct RegisteredController));
377   rc->controller = controller;
378   //host->controller = controller;
379   GNUNET_CONTAINER_DLL_insert_tail (host->rc_head, host->rc_tail, rc);
380 }
381
382
383 /**
384  * Checks whether a host has been registered
385  *
386  * @param host the host to check
387  * @param controller the controller at which host's registration is checked
388  * @return GNUNET_YES if registered; GNUNET_NO if not
389  */
390 int
391 GNUNET_TESTBED_is_host_registered_ (const struct GNUNET_TESTBED_Host *host,
392                                     const struct GNUNET_TESTBED_Controller
393                                     *const controller)
394 {
395   struct RegisteredController *rc;
396
397   for (rc = host->rc_head; NULL != rc; rc = rc->next)
398   {
399     if (controller == rc->controller)   /* already registered at controller */
400     {
401       return GNUNET_YES;
402     }
403   }
404   return GNUNET_NO;
405 }
406
407
408 /* end of testbed_api_hosts.c */