6c75feff8c0461c0d2efc79bcf175b206387d9ec
[monkeysphere.git] / src / share / ma / setup
1 # -*-shell-script-*-
2 # This should be sourced by bash (though we welcome changes to make it POSIX sh compliant)
3
4 # Monkeysphere authentication setup subcommand
5 #
6 # The monkeysphere scripts are written by:
7 # Jameson Rollins <jrollins@finestructure.net>
8 # Jamie McClelland <jm@mayfirst.org>
9 # Daniel Kahn Gillmor <dkg@fifthhorseman.net>
10 #
11 # They are Copyright 2009, and are all released under the GPL,
12 # version 3 or later.
13
14 setup() {
15     # make all needed directories
16     log debug "checking authentication directory structure..."
17     mkdir -p "${MADATADIR}"
18     chmod 0750 "${MADATADIR}"
19     chgrp "$MONKEYSPHERE_GROUP" "${MADATADIR}"
20     mkdir -p "${MATMPDIR}"
21     chmod 0750 "${MATMPDIR}"
22     chgrp "$MONKEYSPHERE_GROUP" "${MATMPDIR}"
23     mkdir -p "${GNUPGHOME_CORE}"
24     chmod 0700 "${GNUPGHOME_CORE}"
25     mkdir -p "${GNUPGHOME_SPHERE}"
26     chmod 0700 "${GNUPGHOME_SPHERE}"
27     mkdir -p "${SYSDATADIR}"/authorized_keys
28
29     # deliberately replace the config files via truncation
30     # FIXME: should we be dumping to tmp files and then moving atomically?
31     log debug "writing core gpg.conf..."
32     cat >"${GNUPGHOME_CORE}"/gpg.conf <<EOF
33 # Monkeysphere trust core GnuPG configuration
34 # This file is maintained by the Monkeysphere software.
35 # Edits will be overwritten.
36 no-greeting
37 EOF
38
39     log debug "writing sphere gpg.conf..."
40     cat >"${GNUPGHOME_SPHERE}"/gpg.conf <<EOF
41 # Monkeysphere trust sphere GnuPG configuration
42 # This file is maintained by the Monkeysphere software.
43 # Edits will be overwritten.
44 no-greeting
45 list-options show-uid-validity
46 EOF
47
48     # make sure the monkeysphere user owns everything in the sphere
49     # gnupghome
50     log debug "fixing sphere gnupg home ownership..."
51     chown "$MONKEYSPHERE_USER:$MONKEYSPHERE_GROUP" "${GNUPGHOME_SPHERE}" "${GNUPGHOME_SPHERE}"/gpg.conf
52
53     # get fingerprint of core key.  this should be empty on unconfigured systems.
54     local CORE_FPR=$(core_fingerprint)
55     log debug "core fingerprint: $CORE_FPR"
56
57     if [ -z "$CORE_FPR" ] ; then
58         log info "setting up Monkeysphere authentication trust core..."
59
60         local CORE_UID=$(printf "Monkeysphere authentication trust core UID (random string: %s)" $(dd if=/dev/urandom bs=21 count=1 2>/dev/null | perl -MMIME::Base64 -ne 'print encode_base64($_)'))
61     
62         printf "generating monkeysphere authentication trust core key:\nsize: %d bits\nuid: '%s'\n" "$CORE_KEYLENGTH" "$CORE_UID" | log debug
63         PEM2OPENPGP_USAGE_FLAGS=certify \
64             PEM2OPENPGP_NEWKEY=$CORE_KEYLENGTH pem2openpgp "$CORE_UID" \
65             | gpg_core --import \
66             || failure "Could not import new key for Monkeysphere authentication trust core"
67
68         # get fingerprint of core key.  should definitely not be empty at this point
69         CORE_FPR=$(core_fingerprint)
70         log debug "core fingerprint: $CORE_FPR"
71         if [ -z "$CORE_FPR" ] ; then
72             failure "Failed to create Monkeysphere authentication trust core!"
73         fi
74         
75     else 
76         log verbose "Monkeysphere authentication trust core already exists."
77     fi
78
79     # export the core key to the sphere keyring
80     log debug "exporting core pub key to sphere keyring..."
81     gpg_core --export | gpg_sphere "--import"
82
83     # ensure that the authentication sphere checker has absolute ownertrust on the expected key.
84     log debug "setting ultimate owner trust on core key in gpg_sphere..."
85     printf "%s:6:\n" "$CORE_FPR" | gpg_sphere "--import-ownertrust" 2>&1 | log verbose
86     gpg_sphere "--export-ownertrust" 2>&1 | log debug
87
88     # check the owner trust
89     log debug "checking gpg_sphere owner trust set properly..."
90     local ORIG_TRUST
91     if ORIG_TRUST=$(gpg_sphere "--export-ownertrust" | grep '^[^#]') ; then
92         if [ "${CORE_FPR}:6:" != "$ORIG_TRUST" ] ; then
93             failure "Monkeysphere authentication trust sphere should explicitly trust the core.  It does not have proper ownertrust settings."
94         fi
95     else
96         failure "Could not get monkeysphere-authentication trust guidelines."
97         # FIXME: what does this mean?  should we suggest how to fix?
98     fi
99
100     # ensure that we're using the extended trust model (1), and that
101     # our preferences are reasonable (i.e. 3 marginal OR 1 fully
102     # trusted certifications are sufficient to grant full validity.
103     log debug "checking trust model for authentication ..."
104     local TRUST_MODEL=$(gpg_sphere "--with-colons --fixed-list-mode --list-keys" 2>/dev/null \
105         | head -n1 | grep "^tru:" | cut -d: -f3,6,7)
106     log debug "sphere trust model: $TRUST_MODEL"
107     if [ "$TRUST_MODEL" != '1:3:1' ] ; then
108         failure "monkeysphere-authentication does not have the expected trust model settings."
109         # FIXME: what does this mean?  should we suggest how to fix?
110     fi
111 }