keys/: New `check' command to remind about keys about to expire.

This is version 1.0.0pre12.2.

diff --git a/debian/changelog b/debian/changelog
index a8608e917a4f4cdf3f7e74b084a8e78c822441e4..0183dc0ad9cbcd2820580c98547c0311865e8e61 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+tripe (1.0.0pre12.2) experimental; urgency=low
+
+  * New `tripe-keys' command: `check' reports on keys which will expire
+    soon, so that someone remembers to refresh them.
+
+ -- Mark Wooding <mdw@distorted.org.uk>  Thu, 07 Feb 2013 10:37:01 +0000
+
 tripe (1.0.0pre12.1) experimental; urgency=low
 
   * Extract Wireshark version number from `wireshark-common' rather than

diff --git a/keys/tripe-keys.8.in b/keys/tripe-keys.8.in
index 146eb7a692fa1298c3e725231db63e550627457d..f94f9687978db3c4e49ab4271552e4f4a701efdc 100644 (file)
--- a/keys/tripe-keys.8.in
+++ b/keys/tripe-keys.8.in
@@ -56,6 +56,8 @@ tripe-keys \- simple centralized key management for tripe
 .br
 .B "clean"
 .br
+.B "check"
+.br
 .BR "mtu " [ \fIpath-mtu ]
 .
 .\"--------------------------------------------------------------------------
@@ -218,6 +220,16 @@ and their associated
 .B .old
 files.
 .TP
+.B check
+Checks the various keyrings.  Currently, it checks the
+.B master
+and
+.B keyring.pub
+files, and prints a report warning of keys which will expire soon.  It
+is expected that this command be run against the master repository by
+.BR cron (8).
+Additional checking may added in the future.
+.TP
 .BR "mtu " [ \fIpath-mtu ]
 Write, as a decimal number on standard output, the recommended MTU for a
 TrIPE tunnel interface, given that the

diff --git a/keys/tripe-keys.conf.5.in b/keys/tripe-keys.conf.5.in
index 887faf67090936393b67012805e9141ff157890d..468070a94af48eb83f4b782f58c194604b80b83f 100644 (file)
--- a/keys/tripe-keys.conf.5.in
+++ b/keys/tripe-keys.conf.5.in
@@ -279,6 +279,13 @@ and
 .I conf-file
 Filename for local repository configuration file.  Default is
 .IB basedir /tripe-keys.conf \fR.
+.TP
+.I kx-warn-days
+The
+.B "tripe-keys check"
+command will warn about keys which will in less than
+.I kx-warn-days
+days.  Default is 28.
 .
 .\"--------------------------------------------------------------------------
 .SH "SEE ALSO"

diff --git a/keys/tripe-keys.in b/keys/tripe-keys.in
index 2be5e2dde3a6c869828f31baf37341378ae2236b..ad8671e1407ad1e6fa586b511e9b09ebc458c3ae 100644 (file)
--- a/keys/tripe-keys.in
+++ b/keys/tripe-keys.in
@@ -33,6 +33,7 @@ import sys as SYS
 import re as RX
 import getopt as O
 import shutil as SH
+import time as T
 import filecmp as FC
 from cStringIO import StringIO
 from errno import *
@@ -240,6 +241,7 @@ def conf_defaults():
                ('kx-param', lambda: {'dh': '-LS -b3072 -B256',
                                      'ec': '-Cnist-p256'}[conf['kx']]),
                ('kx-expire', 'now + 1 year'),
+               ('kx-warn-days', '28'),
                ('cipher', 'rijndael-cbc'),
                ('hash', 'sha256'),
                ('master-keygen-flags', '-l'),
@@ -493,6 +495,26 @@ def cmd_clean(args):
         r == 'keyring' or r == 'keyring.pub' or r.startswith('peer-')):
       zap(i)
 
+###--------------------------------------------------------------------------
+### Commands: check
+
+def cmd_check(args):
+  now = T.time()
+  thresh = int(conf['kx-warn-days']) * 86400
+  for krf in ['master', 'keyring.pub']:
+    if not OS.path.exists(krf): continue
+    kr = C.KeyFile(krf)
+    for k in kr.itervalues():
+      if k.exptime == C.KEXP_FOREVER: continue
+      elif k.exptime == C.KEXP_EXPIRE: left = -1
+      else: left = k.exptime - now
+      if left < 0:
+        print "key `%s' HAS EXPIRED" % k.tag
+      elif left < thresh:
+        if left >= 86400: n, u, uu = left // 86400, 'day', 'days'
+        else: n, u, uu = left // 3600, 'hour', 'hours'
+        print "key `%s' EXPIRES in %d %s" % (k.tag, n, n == 1 and u or uu)
+
 ###--------------------------------------------------------------------------
 ### Commands: mtu
 
@@ -530,6 +552,7 @@ commands = {'help': (cmd_help, 0, 1, ''),
             'update': (cmd_update, 0, 0, ''),
             'clean': (cmd_clean, 0, 0, ''),
             'mtu': (cmd_mtu, 0, 1, '[PATH-MTU]'),
+            'check': (cmd_check, 0, 0, ''),
             'generate': (cmd_generate, 1, 1, 'TAG'),
             'rebuild': (cmd_rebuild, 0, 0, '')}