2 This file is part of GNUnet
3 Copyright (C) 2008--2013 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.
23 * @file testbed/gnunet-daemon-testbed-blacklist.c
24 * @brief daemon to restrict incoming connections from other peers at the
25 * transport layer of a peer
26 * @author Sree Harsha Totakura <sreeharsha@totakura.in>
30 #include "gnunet_util_lib.h"
31 #include "gnunet_transport_service.h"
32 #include "gnunet_ats_service.h"
33 #include "gnunet_testing_lib.h"
39 #define LOG(type,...) \
40 GNUNET_log (type, __VA_ARGS__)
43 * Debug logging shorthand
46 LOG (GNUNET_ERROR_TYPE_DEBUG, __VA_ARGS__)
49 * Log an error message at log-level 'level' that indicates
50 * a failure of the command 'cmd' on file 'filename'
51 * with the message given by strerror(errno).
53 #define LOG_SQLITE(db, msg, level, cmd) \
55 GNUNET_log_from (level, "sqlite", _("`%s' failed at %s:%d with error: %s\n"), \
56 cmd, __FILE__,__LINE__, sqlite3_errmsg(db)); \
58 GNUNET_asprintf(msg, _("`%s' failed at %s:%u with error: %s"), cmd, \
59 __FILE__, __LINE__, sqlite3_errmsg(db)); \
64 * The map to store the peer identities to allow/deny
66 static struct GNUNET_CONTAINER_MultiPeerMap *map;
69 * The database connection
71 static struct sqlite3 *db;
74 * The blacklist handle we obtain from transport when we register ourselves for
77 struct GNUNET_TRANSPORT_Blacklist *bh;
82 struct GNUNET_DISK_FileHandle *hostkeys_fd;
87 static struct GNUNET_DISK_MapHandle *hostkeys_map;
92 static void *hostkeys_data;
95 * Handle to the transport service. This is used for setting link metrics
97 static struct GNUNET_TRANSPORT_Handle *transport;
100 * The number of hostkeys in the hostkeys array
102 static unsigned int num_hostkeys;
107 static struct GNUNET_SCHEDULER_Task * shutdown_task;
112 * Iterator over hash map entries.
115 * @param key current key code
116 * @param value value in the hash map
117 * @return #GNUNET_YES if we should continue to
122 iterator (void *cls, const struct GNUNET_PeerIdentity *key, void *value)
124 GNUNET_assert (GNUNET_YES == GNUNET_CONTAINER_multipeermap_remove (map, key,
131 * Cleaup and destroy the map
138 GNUNET_assert (GNUNET_SYSERR != GNUNET_CONTAINER_multipeermap_iterate (map,
141 GNUNET_CONTAINER_multipeermap_destroy (map);
148 * Function that decides if a connection is acceptable or not.
151 * @param pid peer to approve or disapproave
152 * @return GNUNET_OK if the connection is allowed, GNUNET_SYSERR if not
155 check_access (void *cls, const struct GNUNET_PeerIdentity * pid)
159 GNUNET_assert (NULL != map);
160 contains = GNUNET_CONTAINER_multipeermap_contains (map, pid);
161 if (GNUNET_YES == contains)
163 DEBUG ("Permitting `%s'\n", GNUNET_i2s (pid));
166 DEBUG ("Not permitting `%s'\n", GNUNET_i2s (pid));
167 return GNUNET_SYSERR;
172 get_identity (unsigned int offset, struct GNUNET_PeerIdentity *id)
174 struct GNUNET_CRYPTO_EddsaPrivateKey private_key;
176 if (offset >= num_hostkeys)
177 return GNUNET_SYSERR;
178 (void) memcpy (&private_key,
179 hostkeys_data + (offset * GNUNET_TESTING_HOSTKEYFILESIZE),
180 GNUNET_TESTING_HOSTKEYFILESIZE);
181 GNUNET_CRYPTO_eddsa_key_get_public (&private_key, &id->public_key);
194 struct WhiteListRow *next;
197 * The offset where to find the hostkey for the peer
202 * Latency to be assigned to the link
210 * Function to load keys
213 load_keys (const struct GNUNET_CONFIGURATION_Handle *c)
222 data_dir = GNUNET_OS_installation_get_path (GNUNET_OS_IPK_DATADIR);
223 GNUNET_asprintf (&idfile, "%s/testing_hostkeys.ecc", data_dir);
224 GNUNET_free (data_dir);
227 GNUNET_DISK_file_size (idfile, &fsize, GNUNET_YES, GNUNET_YES))
229 GNUNET_free (idfile);
230 return GNUNET_SYSERR;
232 if (0 != (fsize % GNUNET_TESTING_HOSTKEYFILESIZE))
234 LOG (GNUNET_ERROR_TYPE_ERROR,
235 _("Incorrect hostkey file format: %s\n"), idfile);
236 GNUNET_free (idfile);
237 return GNUNET_SYSERR;
239 hostkeys_fd = GNUNET_DISK_file_open (idfile, GNUNET_DISK_OPEN_READ,
240 GNUNET_DISK_PERM_NONE);
241 if (NULL == hostkeys_fd)
243 GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "open", idfile);
244 GNUNET_free (idfile);
245 return GNUNET_SYSERR;
247 GNUNET_free (idfile);
249 hostkeys_data = GNUNET_DISK_file_map (hostkeys_fd,
251 GNUNET_DISK_MAP_TYPE_READ,
253 if (NULL == hostkeys_data)
256 GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "mmap");
257 return GNUNET_SYSERR;
259 num_hostkeys = fsize / GNUNET_TESTING_HOSTKEYFILESIZE;
265 * Function to unload keys
270 if (NULL != hostkeys_map)
272 GNUNET_assert (NULL != hostkeys_data);
273 GNUNET_DISK_file_unmap (hostkeys_map);
275 hostkeys_data = NULL;
277 if (NULL != hostkeys_fd)
279 GNUNET_DISK_file_close (hostkeys_fd);
286 * Shutdown task to cleanup our resources and exit.
289 * @param tc scheduler task context
292 do_shutdown (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
294 if (NULL != transport)
296 GNUNET_TRANSPORT_disconnect (transport);
302 GNUNET_TRANSPORT_blacklist_cancel (bh);
307 * Function to read whitelist rows from the database
309 * @param db the database connection
310 * @param pid the identity of this peer
311 * @param wl_rows where to store the retrieved whitelist rows
312 * @return GNUNET_SYSERR upon error OR the number of rows retrieved
315 db_read_whitelist (struct sqlite3 *db, int pid, struct WhiteListRow **wl_rows)
317 static const char *query_wl = "SELECT oid, latency FROM whitelist WHERE (id == ?);";
318 struct sqlite3_stmt *stmt_wl;
319 struct WhiteListRow *lr;
323 if (SQLITE_OK != (ret = sqlite3_prepare_v2 (db, query_wl, -1, &stmt_wl, NULL)))
325 LOG_SQLITE (db, NULL, GNUNET_ERROR_TYPE_ERROR, "sqlite3_prepare_v2");
326 return GNUNET_SYSERR;
328 if (SQLITE_OK != (ret = sqlite3_bind_int (stmt_wl, 1, pid)))
330 LOG_SQLITE (db, NULL, GNUNET_ERROR_TYPE_ERROR, "sqlite3_bind_int");
331 sqlite3_finalize (stmt_wl);
332 return GNUNET_SYSERR;
337 ret = sqlite3_step (stmt_wl);
338 if (SQLITE_ROW != ret)
341 lr = GNUNET_new (struct WhiteListRow);
342 lr->id = sqlite3_column_int (stmt_wl, 0);
343 lr->latency = sqlite3_column_int (stmt_wl, 1);
347 sqlite3_finalize (stmt_wl);
353 * Main function that will be run.
356 * @param args remaining command-line arguments
357 * @param cfgfile name of the configuration file used (for saving, can be NULL!)
358 * @param c configuration
361 run (void *cls, char *const *args, const char *cfgfile,
362 const struct GNUNET_CONFIGURATION_Handle *c)
365 struct WhiteListRow *wl_head;
366 struct WhiteListRow *wl_entry;
367 struct GNUNET_PeerIdentity identity;
368 struct GNUNET_ATS_Properties prop;
369 struct GNUNET_TIME_Relative delay;
370 unsigned long long pid;
375 GNUNET_CONFIGURATION_get_value_number (c, "TESTBED",
381 if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (c, "TESTBED-UNDERLAY",
388 if (SQLITE_OK != (ret = sqlite3_open_v2 (dbfile, &db, SQLITE_OPEN_READONLY, NULL)))
392 LOG_SQLITE (db, NULL, GNUNET_ERROR_TYPE_ERROR, "sqlite_open_v2");
393 GNUNET_break (SQLITE_OK == sqlite3_close (db));
396 LOG (GNUNET_ERROR_TYPE_ERROR, "Cannot open sqlite file %s\n", dbfile);
397 GNUNET_free (dbfile);
400 DEBUG ("Opened database %s\n", dbfile);
401 GNUNET_free (dbfile);
404 if (GNUNET_OK != load_keys (c))
407 transport = GNUNET_TRANSPORT_connect (c, NULL, NULL, NULL, NULL, NULL);
408 if (NULL == transport)
413 /* read and process whitelist */
416 nrows = db_read_whitelist (db, pid, &wl_head);
417 if ((GNUNET_SYSERR == nrows) || (0 == nrows))
419 GNUNET_TRANSPORT_disconnect (transport);
422 map = GNUNET_CONTAINER_multipeermap_create (nrows, GNUNET_NO);
423 while (NULL != (wl_entry = wl_head))
425 wl_head = wl_entry->next;
426 delay.rel_value_us = wl_entry->latency;
427 memset (&prop, 0, sizeof (prop));
428 GNUNET_assert (GNUNET_OK == get_identity (wl_entry->id, &identity));
429 GNUNET_break (GNUNET_OK ==
430 GNUNET_CONTAINER_multipeermap_put (map, &identity, &identity,
431 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_FAST));
432 DEBUG ("Setting %u ms latency to peer `%s'\n",
434 GNUNET_i2s (&identity));
435 GNUNET_TRANSPORT_set_traffic_metric (transport,
440 GNUNET_free (wl_entry);
442 bh = GNUNET_TRANSPORT_blacklist (c, &check_access, NULL);
443 shutdown_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
447 GNUNET_break (SQLITE_OK == sqlite3_close (db));
455 * @param argc number of arguments from the command line
456 * @param argv command line arguments
457 * @return 0 ok, 1 on error
460 main (int argc, char *const *argv)
462 static const struct GNUNET_GETOPT_CommandLineOption options[] = {
463 GNUNET_GETOPT_OPTION_END
467 if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
469 #ifdef SQLITE_CONFIG_MMAP_SIZE
470 (void) sqlite3_config (SQLITE_CONFIG_MMAP_SIZE, 512000, 256000000);
474 GNUNET_PROGRAM_run (argc, argv, "testbed-underlay",
476 ("Daemon to restrict underlay network in testbed deployments"),
477 options, &run, NULL)) ? 0 : 1;
478 GNUNET_free ((void*) argv);