server/admin.c: Publish `corked' and `mobile' flags in `peerinfo'.

diff --git a/server/admin.c b/server/admin.c
index c9a035a043be6e58a77940683e4d71fdbabda63d..5e6c7d87e3a8aa82d0cae64288318dee51fdfbb0 100644 (file)
--- a/server/admin.c
+++ b/server/admin.c
@@ -1852,6 +1852,9 @@ static void acmd_peerinfo(admin *a, unsigned ac, char *av[])
     a_info(a, "private-key=%s", ptag,
           "current-private-key=%s", p->kx.kpriv->tag, A_END);
     a_info(a, "keepalive=%lu", ps->t_ka, A_END);
+    a_info(a, "corked=%s", BOOL(p->kx.f&KXF_CORK),
+          "mobile=%s", BOOL(ps->f&PSF_MOBILE),
+          A_END);
     a_ok(a);
   }
 }

diff --git a/server/tripe-admin.5.in b/server/tripe-admin.5.in
index c220b4b4c40dff2a55bf12912b82f44fc2eeeff8..5d01226ac89bee8acaab6e91c10356757c69c7d5 100644 (file)
--- a/server/tripe-admin.5.in
+++ b/server/tripe-admin.5.in
@@ -594,6 +594,22 @@ since there is no fixed tag used under these circumstances.
 .B current-private-key
 The full key tag of the private key currently being used for this
 association.  This may change during the life of the association.
+.TP
+.B corked
+Either
+.B t
+or
+.B nil
+depending on whether or not (respectively) key-exchange is waiting for
+the peer to initiate.
+.TP
+.B mobile
+Either
+.B t
+or
+.B nil
+depending on whether or not (respectively) the peer is expected to
+change its address unpredictably.
 .RE
 .SP
 .BI "PING \fR[" options "\fR] " peer