2 This file is part of GNUnet.
3 (C) 2009, 2010 Christian Grothoff (and other contributing authors)
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.
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.
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.
21 * @file transport/test_transport_api.c
22 * @brief base test case for transport implementations
24 * This test case serves as a base for tcp, udp, and udp-nat
25 * transport test cases. Based on the executable being run
26 * the correct test case will be performed. Conservation of
30 #include "gnunet_common.h"
31 #include "gnunet_hello_lib.h"
32 #include "gnunet_getopt_lib.h"
33 #include "gnunet_os_lib.h"
34 #include "gnunet_program_lib.h"
35 #include "gnunet_scheduler_lib.h"
36 #include "gnunet_transport_service.h"
37 #include "transport.h"
38 #include "transport-testing.h"
40 #define VERBOSE GNUNET_NO
42 #define VERBOSE_ARM GNUNET_NO
44 #define START_ARM GNUNET_YES
47 * How long until we give up on transmitting the message?
49 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)
52 * How long until we give up on transmitting the message?
54 #define TIMEOUT_TRANSMIT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 60)
60 static GNUNET_SCHEDULER_TaskIdentifier die_task;
62 static GNUNET_SCHEDULER_TaskIdentifier send_task;
64 struct PeerContext *p1;
66 struct PeerContext *p2;
68 static GNUNET_TRANSPORT_TESTING_ConnectRequest cc;
70 struct GNUNET_TRANSPORT_TransmitHandle *th;
77 #define OKPP do { ok++; fprintf (stderr, "Now at stage %u at %s:%u\n", ok, __FILE__, __LINE__); } while (0)
79 #define OKPP do { ok++; } while (0)
86 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stopping peers\n");
88 if (send_task != GNUNET_SCHEDULER_NO_TASK)
89 GNUNET_SCHEDULER_cancel (send_task);
91 if (die_task != GNUNET_SCHEDULER_NO_TASK)
92 GNUNET_SCHEDULER_cancel (die_task);
95 GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
98 GNUNET_TRANSPORT_TESTING_stop_peer (p1);
99 GNUNET_TRANSPORT_TESTING_stop_peer (p2);
103 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
105 die_task = GNUNET_SCHEDULER_NO_TASK;
107 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Stopping peers\n");
109 if (send_task != GNUNET_SCHEDULER_NO_TASK)
110 GNUNET_SCHEDULER_cancel (send_task);
113 GNUNET_TRANSPORT_TESTING_connect_peers_cancel(cc);
116 GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
120 GNUNET_TRANSPORT_TESTING_stop_peer (p1);
122 GNUNET_TRANSPORT_TESTING_stop_peer (p2);
125 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Stopping peers END\n");
130 notify_receive (void *cls, const struct GNUNET_PeerIdentity *peer,
131 const struct GNUNET_MessageHeader *message,
132 const struct GNUNET_TRANSPORT_ATS_Information *ats,
135 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
136 "Received message of type %d from peer %s!\n",
137 ntohs (message->type), GNUNET_i2s (peer));
139 if ((MTYPE == ntohs (message->type)) &&
140 (sizeof (struct GNUNET_MessageHeader) == ntohs (message->size)))
155 notify_ready (void *cls, size_t size, void *buf)
157 struct PeerContext *p = cls;
158 struct GNUNET_MessageHeader *hdr;
162 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
163 "Transmitting message with %u bytes to peer %s\n",
164 sizeof (struct GNUNET_MessageHeader), GNUNET_i2s (&p->id));
165 GNUNET_assert (size >= 256);
170 hdr->size = htons (sizeof (struct GNUNET_MessageHeader));
171 hdr->type = htons (MTYPE);
173 return sizeof (struct GNUNET_MessageHeader);
178 notify_connect (void *cls, const struct GNUNET_PeerIdentity *peer,
179 const struct GNUNET_TRANSPORT_ATS_Information *ats,
182 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%4s' connected to us (%p)!\n",
183 GNUNET_i2s (peer), cls);
188 notify_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
190 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%4s' disconnected (%p)!\n",
191 GNUNET_i2s (peer), cls);
195 sendtask (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
197 send_task = GNUNET_SCHEDULER_NO_TASK;
199 if ((tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
202 th = GNUNET_TRANSPORT_notify_transmit_ready (p1->th, &p2->id, 256, 0, TIMEOUT,
207 testing_connect_cb (struct PeerContext *p1, struct PeerContext *p2, void *cls)
210 char *p1_c = strdup (GNUNET_i2s (&p1->id));
212 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peers connected: %s <-> %s\n", p1_c,
213 GNUNET_i2s (&p2->id));
216 // FIXME: THIS IS REQUIRED! SEEMS TO BE A BUG!
218 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &sendtask, NULL);
222 run (void *cls, char *const *args, const char *cfgfile,
223 const struct GNUNET_CONFIGURATION_Handle *cfg)
225 die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
227 p1 = GNUNET_TRANSPORT_TESTING_start_peer (cfg_file_p1, ¬ify_receive,
228 ¬ify_connect, ¬ify_disconnect,
230 p2 = GNUNET_TRANSPORT_TESTING_start_peer (cfg_file_p2, ¬ify_receive,
231 ¬ify_connect, ¬ify_disconnect,
233 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "NOW!\n");
234 cc = GNUNET_TRANSPORT_TESTING_connect_peers (p1, p2, &testing_connect_cb, NULL);
240 static char *const argv[] = { "test-transport-api",
242 "test_transport_api_data.conf",
248 static struct GNUNET_GETOPT_CommandLineOption options[] = {
249 GNUNET_GETOPT_OPTION_END
253 setTransportOptions ("test_transport_api_data.conf");
255 send_task = GNUNET_SCHEDULER_NO_TASK;
258 GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
259 "test-transport-api", "nohelp", options, &run, &ok);
265 * Return the actual path to a file found in the current
266 * PATH environment variable.
268 * @param binary the name of the file to find
271 get_path_from_PATH (char *binary)
282 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
283 _("PATH environment variable is unset.\n"));
286 path = GNUNET_strdup (p); /* because we write on it */
287 buf = GNUNET_malloc (strlen (path) + 20);
290 while (NULL != (end = strchr (pos, PATH_SEPARATOR)))
293 sprintf (buf, "%s/%s", pos, binary);
294 if (GNUNET_DISK_file_test (buf) == GNUNET_YES)
301 sprintf (buf, "%s/%s", pos, binary);
302 if (GNUNET_DISK_file_test (buf) == GNUNET_YES)
313 * Check whether the suid bit is set on a file.
314 * Attempts to find the file using the current
315 * PATH environment variable as a search path.
317 * @param binary the name of the file to check
319 * @return GNUNET_YES if the binary is found and
320 * can be run properly, GNUNET_NO otherwise
323 check_gnunet_nat_binary (char *binary)
335 GNUNET_asprintf (&binaryexe, "%s.exe", binary);
336 p = get_path_from_PATH (binaryexe);
339 p = get_path_from_PATH (binary);
343 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
344 _("Could not find binary `%s' in PATH!\n"), binary);
347 if (0 != STAT (p, &statbuf))
349 GNUNET_log (GNUNET_ERROR_TYPE_WARNING, _("stat (%s) failed: %s\n"), p,
352 return GNUNET_SYSERR;
356 if ((0 != (statbuf.st_mode & S_ISUID)) && (statbuf.st_uid == 0))
360 rawsock = socket (AF_INET, SOCK_RAW, IPPROTO_ICMP);
361 if (INVALID_SOCKET == rawsock)
363 DWORD err = GetLastError ();
365 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
366 "socket (AF_INET, SOCK_RAW, IPPROTO_ICMP) have failed! GLE = %d\n",
368 return GNUNET_NO; /* not running as administrator */
370 closesocket (rawsock);
376 main (int argc, char *argv[])
380 GNUNET_log_setup ("test-transport-api",
388 char *pch = strdup (argv[0]);
390 char *filename = NULL;
393 /* get executable filename */
394 pch = strtok (pch, "/");
397 pch = strtok (NULL, "/");
402 filename = strstr (filename, "tes");
403 if (NULL != (dotexe = strstr (filename, ".exe")))
406 /* create cfg filename */
407 GNUNET_asprintf (&cfg_file_p1, "%s_peer1.conf", filename);
408 GNUNET_asprintf (&cfg_file_p2, "%s_peer2.conf", filename);
409 GNUNET_free (backup);
411 if (strstr (argv[0], "tcp_nat") != NULL)
413 if (GNUNET_YES != check_gnunet_nat_binary ("gnunet-nat-server"))
415 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
416 "`%s' not properly installed, cannot run NAT test!\n",
417 "gnunet-nat-server");
421 else if (strstr (argv[0], "udp_nat") != NULL)
423 if (GNUNET_YES != check_gnunet_nat_binary ("gnunet-nat-server"))
425 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
426 "`%s' not properly installed, cannot run NAT test!\n",
427 "gnunet-nat-server");
434 GNUNET_free (cfg_file_p1);
435 GNUNET_free (cfg_file_p2);
440 /* end of test_transport_api.c */