swanctl: Add a list-conns command to query loaded connections
authorMartin Willi <martin@revosec.ch>
Wed, 19 Feb 2014 15:48:04 +0000 (16:48 +0100)
committerMartin Willi <martin@revosec.ch>
Wed, 7 May 2014 13:48:14 +0000 (15:48 +0200)
src/swanctl/Makefile.am
src/swanctl/commands/list_conns.c [new file with mode: 0644]

index 5cceb77..3db3bf9 100644 (file)
@@ -7,6 +7,7 @@ swanctl_SOURCES = \
        commands/install.c \
        commands/list_sas.c \
        commands/list_pols.c \
+       commands/list_conns.c \
        commands/load_conns.c \
        commands/load_creds.c \
        commands/version.c \
diff --git a/src/swanctl/commands/list_conns.c b/src/swanctl/commands/list_conns.c
new file mode 100644 (file)
index 0000000..9eae557
--- /dev/null
@@ -0,0 +1,219 @@
+/*
+ * Copyright (C) 2014 Martin Willi
+ * Copyright (C) 2014 revosec AG
+ *
+ * This program is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2 of the License, or (at your
+ * option) any later version.  See <http://www.fsf.org/copyleft/gpl.txt>.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * for more details.
+ */
+
+#define _GNU_SOURCE
+#include <stdio.h>
+#include <errno.h>
+
+#include "command.h"
+
+#include <collections/hashtable.h>
+
+/**
+ * Free hashtable with contained strings
+ */
+static void free_hashtable(hashtable_t *hashtable)
+{
+       enumerator_t *enumerator;
+       char *str;
+
+       enumerator = hashtable->create_enumerator(hashtable);
+       while (enumerator->enumerate(enumerator, NULL, &str))
+       {
+               free(str);
+       }
+       enumerator->destroy(enumerator);
+
+       hashtable->destroy(hashtable);
+}
+
+CALLBACK(values, int,
+       hashtable_t *sa, vici_res_t *res, char *name, void *value, int len)
+{
+       chunk_t chunk;
+       char *str;
+
+       chunk = chunk_create(value, len);
+       if (chunk_printable(chunk, NULL, ' '))
+       {
+               if (asprintf(&str, "%.*s", len, value) >= 0)
+               {
+                       free(sa->put(sa, name, str));
+               }
+       }
+       return 0;
+}
+
+
+CALLBACK(list, int,
+       hashtable_t *sa, vici_res_t *res, char *name, void *value, int len)
+{
+       chunk_t chunk;
+       char *str;
+
+       chunk = chunk_create(value, len);
+       if (chunk_printable(chunk, NULL, ' '))
+       {
+               str = sa->get(sa, name);
+               if (asprintf(&str, "%s%s%.*s",
+                                        str ?: "", str ? " " : "", len, value) >= 0)
+               {
+                       free(sa->put(sa, name, str));
+               }
+       }
+       return 0;
+}
+
+CALLBACK(children_sn, int,
+       hashtable_t *ike, vici_res_t *res, char *name)
+{
+       hashtable_t *child;
+       int ret;
+
+       child = hashtable_create(hashtable_hash_str, hashtable_equals_str, 1);
+       ret = vici_parse_cb(res, NULL, values, list, child);
+       if (ret == 0)
+       {
+               printf("  %s: %s\n", name, child->get(child, "mode"));
+               printf("    local:  %s\n", child->get(child, "local-ts"));
+               printf("    remote: %s\n", child->get(child, "remote-ts"));
+       }
+       free_hashtable(child);
+       return ret;
+}
+
+CALLBACK(conn_sn, int,
+       hashtable_t *ike, vici_res_t *res, char *name)
+{
+       int ret = 0;
+
+       if (streq(name, "children"))
+       {
+               return vici_parse_cb(res, children_sn, NULL, NULL, NULL);
+       }
+       if (streq(name, "local") || streq(name, "remote"))
+       {
+               hashtable_t *auth;
+
+               auth = hashtable_create(hashtable_hash_str, hashtable_equals_str, 1);
+               ret = vici_parse_cb(res, NULL, values, list, auth);
+               if (ret == 0)
+               {
+                       printf("  %s %s authentication:\n",
+                               name, auth->get(auth, "class") ?: "unspecified");
+                       if (auth->get(auth, "id"))
+                       {
+                               printf("    id: %s\n", auth->get(auth, "id"));
+                       }
+                       if (auth->get(auth, "groups"))
+                       {
+                               printf("    groups: %s\n", auth->get(auth, "groups"));
+                       }
+                       if (auth->get(auth, "certs"))
+                       {
+                               printf("    certs: %s\n", auth->get(auth, "certs"));
+                       }
+                       if (auth->get(auth, "cacerts"))
+                       {
+                               printf("    cacerts: %s\n", auth->get(auth, "cacerts"));
+                       }
+               }
+               free_hashtable(auth);
+       }
+       return ret;
+}
+
+CALLBACK(conns, int,
+       void *null, vici_res_t *res, char *name)
+{
+       printf("%s: %s\n", name, vici_find_str(res, "", "%s.version", name));
+
+       return vici_parse_cb(res, conn_sn, NULL, NULL, NULL);
+}
+
+CALLBACK(list_cb, void,
+       bool *raw, char *name, vici_res_t *res)
+{
+       if (*raw)
+       {
+               vici_dump(res, "list-conn event", stdout);
+       }
+       else
+       {
+               if (vici_parse_cb(res, conns, NULL, NULL, NULL) != 0)
+               {
+                       fprintf(stderr, "parsing conn event failed: %s\n", strerror(errno));
+               }
+       }
+}
+
+static int list_conns(vici_conn_t *conn)
+{
+       vici_req_t *req;
+       vici_res_t *res;
+       bool raw = FALSE;
+       char *arg;
+
+       while (TRUE)
+       {
+               switch (command_getopt(&arg))
+               {
+                       case 'h':
+                               return command_usage(NULL);
+                       case 'r':
+                               raw = TRUE;
+                               continue;
+                       case EOF:
+                               break;
+                       default:
+                               return command_usage("invalid --list-conns option");
+               }
+               break;
+       }
+       if (vici_register(conn, "list-conn", list_cb, &raw) != 0)
+       {
+               fprintf(stderr, "registering for connections failed: %s\n",
+                               strerror(errno));
+               return errno;
+       }
+       req = vici_begin("list-conns");
+       res = vici_submit(req, conn);
+       if (!res)
+       {
+               fprintf(stderr, "list-conns request failed: %s\n", strerror(errno));
+               return errno;
+       }
+       if (raw)
+       {
+               vici_dump(res, "list-conns reply", stdout);
+       }
+       vici_free_res(res);
+       return 0;
+}
+
+/**
+ * Register the command.
+ */
+static void __attribute__ ((constructor))reg()
+{
+       command_register((command_t) {
+               list_conns, 'L', "list-conns", "list loaded configurations",
+               {"[--raw]"},
+               {
+                       {"help",                'h', 0, "show usage information"},
+                       {"raw",                 'r', 0, "dump raw response message"},
+               }
+       });
+}