| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566 | 
							- #!/bin/bash
 - #
 - # .---.                  .              .
 - # |                      |              |
 - # |--- .--. .-.  .-.  .-.|  .-. .--.--. |.-.  .-. .--.  .-.
 - # |    |   (.-' (.-' (   | (   )|  |  | |   )(   )|  | (.-'
 - # '    '     --'  --'  -' -  -' '  '   -' -'   -' '   -  --'
 - #
 - #                    Freedom in the Cloud
 - #
 - # monkeysphere functions
 - #
 - # License
 - # =======
 - #
 - # Copyright (C) 2014-2016 Bob Mottram <bob@freedombone.net>
 - #
 - # This program is free software: you can redistribute it and/or modify
 - # it under the terms of the GNU Affero General Public License as published by
 - # the Free Software Foundation, either version 3 of the License, or
 - # (at your option) any later version.
 - #
 - # 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 Affero General Public License for more details.
 - #
 - # You should have received a copy of the GNU Affero General Public License
 - # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 - 
 - function install_monkeysphere {
 -     if [[ $(is_completed $FUNCNAME) == "1" ]]; then
 -         return
 -     fi
 -     apt-get -yq install monkeysphere msva-perl
 -     #su -c "monkeysphere gen-subkey $MY_GPG_PUBLIC_KEY_ID" - $MY_USERNAME
 -     mkdir /home/$MY_USERNAME/.monkeysphere
 -     chmod 755 /home/$MY_USERNAME/.monkeysphere
 -     echo "$MY_NAME <${MY_EMAIL_ADDRESS}>" > /home/$MY_USERNAME/.monkeysphere/authorized_user_ids
 -     chmod 644 /home/$MY_USERNAME/.monkeysphere/authorized_user_ids
 -     chown -R $MY_USERNAME:$MY_USERNAME /home/$MY_USERNAME/.monkeysphere
 -     monkeysphere-authentication update-users
 - 
 -     if [ ! -f /etc/ssh/ssh_host_rsa_key ]; then
 -         echo $'monkeysphere import: ssh host key not found'
 -         exit 76295
 -     fi
 -     monkeysphere-host import-key /etc/ssh/ssh_host_rsa_key ssh://$DEFAULT_DOMAIN_NAME
 -     SSH_ONION_HOSTNAME=$(cat ${COMPLETION_FILE} | grep 'ssh onion domain' | awk -F ':' '{print $2}')
 -     monkeysphere-host import-key /etc/ssh/ssh_host_rsa_key ssh://$SSH_ONION_HOSTNAME
 - 
 -     if [ ! $MY_GPG_PUBLIC_KEY_ID ]; then
 -         MY_GPG_PUBLIC_KEY_ID=$(gpg_pubkey_from_email "$MY_USERNAME" "$MY_USERNAME@$HOSTNAME")
 -         if [ ${#MY_GPG_PUBLIC_KEY_ID} -lt 4 ]; then
 -             echo $"monkeysphere unable to get GPG key ID for user $MY_USERNAME@$HOSTNAME"
 -             exit 52825
 -         fi
 -     fi
 -     # The admin user is the identity certifier
 -     fpr=$(gpg --with-colons --fingerprint $MY_GPG_PUBLIC_KEY_ID | grep fpr | head -n 1 | awk -F ':' '{print $10}')
 -     monkeysphere-authentication add-identity-certifier $fpr
 - 
 -     mark_completed $FUNCNAME
 - }
 - 
 - # NOTE: deliberately no exit 0
 
 
  |