chiark - git - mdw - ssh-ca/blob - bin/sign

   1 #! /bin/sh
   2
   3 set -e
   4 . lib/func.sh
   5
   6 ## The key types are adorned with bit lengths.  Work out the raw key type
   7 ## names.
   8 rawkeytypes=""
   9 for kt in $keytypes; do
  10   rawkeytypes="$rawkeytypes ${kt%:*}"
  11 done
  12
  13 ## Start a new output directory.
  14 rm -rf publish.new
  15 mkdir publish.new
  16 for kt in $rawkeytypes; do
  17   cp ca/ca-$kt.pub publish.new/
  18   read pub <ca/ca-$kt.pub
  19   echo "$@cert-authority $scope $pub" >publish.new/ca-$kt.entry
  20 done
  21
  22 ## Sign the various host keys.
  23 exec 3<etc/hosts 4>publish.new/hosts.list
  24 last=%%%
  25 while read line <&3; do
  26
  27   ## Ignore comments and empty lines.
  28   case "$line" in
  29     "#"* | "") continue ;;
  30     ##*[!       ]*) ;;
  31     ##*) continue ;;
  32   esac
  33
  34   ## Read the host line.
  35   set -- $line
  36   host=$1
  37   names=""
  38
  39   ## If this is a different host, then start a new section of the list.
  40   case "$last" in
  41     "%%%") echo "$host" >&4 ;;
  42     "$host") ;;
  43     *) { echo; echo "$host"; } >&4 ;;
  44   esac
  45   last=$host
  46
  47   ## Build a list of names for the host.
  48   for n in "$@"; do
  49     names=${names:+$names,}$n
  50     case "$n" in
  51       *.* | *:*) ;;
  52       *) names=${names:+$names,}$n.$domain ;;
  53     esac
  54   done
  55
  56   ## Sign certificates.
  57   for kt in $rawkeytypes; do
  58     if [ ! -f host/$host-$kt.pub ]; then continue; fi
  59     cp host/$host-$kt.pub publish.new/
  60     ssh-keygen -q -tv00 -sca/ca-$kt \
  61       -h -I"$cacomment:$host.$domain" -n$names \
  62       -V$validity \
  63       publish.new/$host-$kt.pub
  64     mv publish.new/$host-$kt-cert.pub \
  65       publish.new/$host-$kt.cert
  66     ssh-keygen -lv -fpublish.new/$host-$kt.pub | sed 's,^,| ,' >&4
  67   done
  68 done
  69 exec 3>&- 4>&-
  70
  71 ## Sign the list.
  72 run_gpg --armor -o publish.new/hosts.asc \
  73   --clearsign publish.new/hosts.list
  74 rm publish.new/hosts.list
  75
  76 ## Include a copy of the public key.
  77 run_gpg --export --armor -o publish.new/ca-gnupg.asc
  78
  79 ## Done.
  80 if [ -d publish ]; then
  81   rm -rf publish.old
  82   mv publish publish.old
  83 fi
  84 mv publish.new publish
  85 rm -rf publish.old