| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733 | 
							- #!/bin/bash
 - #
 - # .---.                  .              .
 - # |                      |              |
 - # |--- .--. .-.  .-.  .-.|  .-. .--.--. |.-.  .-. .--.  .-.
 - # |    |   (.-' (.-' (   | (   )|  |  | |   )(   )|  | (.-'
 - # '    '     --'  --'  -' -  -' '  '   -' -'   -' '   -  --'
 - #
 - #                    Freedom in the Cloud
 - #
 - # turtl app
 - #
 - # http://portallinux.es/instalacion-servidor-turtl-debian-8
 - # http://framacloud.org/cultiver-son-jardin/installation-de-turtl/
 - #
 - # License
 - # =======
 - #
 - # Copyright (C) 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/>.
 - 
 - VARIANTS="full full-vim writer"
 - 
 - IN_DEFAULT_INSTALL=0
 - SHOW_ON_ABOUT=1
 - 
 - TURTL_DOMAIN_NAME=
 - TURTL_CODE=
 - TURTL_ONION_PORT=8107
 - TURTL_API_ONION_PORT=8108
 - TURTL_PORT=8181
 - TURTL_API_REPO="https://github.com/turtl/api.git"
 - TURTL_API_COMMIT='53e00a5583f52de8f86ef380fe11c176b5738dcf'
 - TURTL_REPO="https://github.com/turtl/js.git"
 - TURTL_COMMIT='61923ffb47d95d172f80d14c76aa032a4d5f5d6d'
 - TURTL_ADMIN_PASSWORD=
 - TURTL_STORAGE_LIMIT_MB=100
 - TURTL_BASE_DIR=/etc/turtl
 - 
 - turtl_variables=(ONION_ONLY
 -                  DEFAULT_DOMAIN_NAME
 -                  TURTL_DOMAIN_NAME
 -                  TURTL_CODE
 -                  TURTL_STORAGE_LIMIT_MB
 -                  DDNS_PROVIDER
 -                  MY_EMAIL_ADDRESS
 -                  MY_USERNAME)
 - 
 - function change_password_turtl {
 -     change_username="$1"
 -     new_user_password="$2"
 - }
 - 
 - function remove_user_turtl {
 -     remove_username="$1"
 - }
 - 
 - function add_user_turtl {
 -     new_username="$1"
 -     new_user_password="$2"
 -     echo '0'
 - }
 - 
 - function install_interactive_turtl {
 -     if [ ! $ONION_ONLY ]; then
 -         ONION_ONLY='no'
 -     fi
 - 
 -     if [[ $ONION_ONLY != "no" ]]; then
 -         TURTL_DOMAIN_NAME='notes.local'
 -         write_config_param "TURTL_DOMAIN_NAME" "$TURTL_DOMAIN_NAME"
 -     else
 -         function_check interactive_site_details
 -         interactive_site_details "turtl" "TURTL_DOMAIN_NAME" "TURTL_CODE"
 -         write_config_param "API_TURTL_DOMAIN_NAME" "api.${TURTL_DOMAIN_NAME}"
 -         write_config_param "API_TURTL_CODE" "${TURTL_CODE}"
 -     fi
 -     APP_INSTALLED=1
 - }
 - 
 - function configure_interactive_turtl {
 -     data=$(tempfile 2>/dev/null)
 -     trap "rm -f $data" 0 1 2 5 15
 -     dialog --title $"Change storage limit" \
 -            --backtitle $"Freedombone Control Panel" \
 -            --inputbox $"Enter a storage limit in megabytes." 8 75 "$TURTL_STORAGE_LIMIT_MB" 2>$data
 -     sel=$?
 -     case $sel in
 -         0)
 -             STORAGE=$(<$data)
 -             if [ ${#STORAGE} -gt 0 ]; then
 -                 TURTL_STORAGE_LIMIT_MB=$STORAGE
 -                 sed -i "s|defparameter *default-storage-limit*.*|defparameter *default-storage-limit* ${TURTL_STORAGE_LIMIT_MB})|g" $TURTL_BASE_DIR/api/config/config.lisp
 -                 systemctl restart turtl
 -                 dialog --title $"Change storage limit" \
 -                        --msgbox $"Storage limit changed to ${TURTL_STORAGE_LIMIT_MB}M" 6 50
 -             fi
 -             ;;
 -     esac
 - }
 - 
 - 
 - function reconfigure_turtl {
 -     if [ -d /var/www/${TURTL_DOMAIN_NAME}/htdocs/data ]; then
 -         rm -rf /var/www/${TURTL_DOMAIN_NAME}/htdocs/data/*
 -     fi
 - }
 - 
 - function upgrade_turtl {
 -     read_config_param "TURTL_DOMAIN_NAME"
 - 
 -     function_check set_repo_commit
 -     set_repo_commit /var/www/$TURTL_DOMAIN_NAME/htdocs "turtl commit" "$TURTL_COMMIT" $TURTL_REPO
 -     set_repo_commit $TURTL_BASE_DIR/api "turtl api commit" "$TURTL_API_COMMIT" $TURTL_API_REPO
 -     nginx_dissite $TURTL_DOMAIN_NAME
 -     cd /var/www/$TURTL_DOMAIN_NAME/htdocs
 -     rm -rf node_modules npm-shrinkwrap.json
 -     npm install uglify@0.1.5 --no-optional
 -     npm install minimatch@3.0.2 --no-optional
 -     npm install --no-optional
 -     sed -i 's|{config,controllers,handlers,locales,library,models,turtl}|.|g' Makefile
 -     sed -i 's|tests/{data,tests}|tests|g' Makefile
 -     make clean
 -     make
 -     chown -R turtl:turtl $TURTL_BASE_DIR
 -     chown -R turtl:turtl /var/www/$TURTL_DOMAIN_NAME/htdocs
 -     nginx_ensite $TURTL_DOMAIN_NAME
 - }
 - 
 - function backup_local_turtl {
 -     read_config_param "TURTL_DOMAIN_NAME"
 -     source_directory=/var/www/${TURTL_DOMAIN_NAME}/htdocs
 -     if [ -d $source_directory ]; then
 -         dest_directory=turtl
 -         function_check suspend_site
 -         suspend_site ${TURTL_DOMAIN_NAME}
 - 
 -         function_check backup_directory_to_usb
 -         backup_directory_to_usb $source_directory $dest_directory
 - 
 -         function_check restart_site
 -         restart_site
 -     fi
 -     source_directory=/var/lib/rethinkdb
 -     if [ -d $source_directory ]; then
 -         dest_directory=rethinkdb
 -         function_check suspend_site
 -         suspend_site ${TURTL_DOMAIN_NAME}
 - 
 -         function_check backup_directory_to_usb
 -         backup_directory_to_usb $source_directory $dest_directory
 - 
 -         function_check restart_site
 -         restart_site
 -     fi
 - }
 - 
 - function restore_local_turtl {
 -     read_config_param "TURTL_DOMAIN_NAME"
 -     if [ $TURTL_DOMAIN_NAME ]; then
 -         temp_restore_dir=/root/tempturtl
 -         restore_directory_from_usb $temp_restore_dir turtl
 -         if [ -d /var/www/${TURTL_DOMAIN_NAME}/htdocs ]; then
 -             if [ -d /var/www/${TURTL_DOMAIN_NAME}/previous ]; then
 -                 rm -rf /var/www/${TURTL_DOMAIN_NAME}/previous
 -             fi
 -             mv /var/www/${TURTL_DOMAIN_NAME}/htdocs /var/www/${TURTL_DOMAIN_NAME}/previous
 -         fi
 -         temp_source_dir=$(find ${temp_restore_dir} -name htdocs)
 -         cp -r ${temp_source_dir} /var/www/${TURTL_DOMAIN_NAME}/
 -         if [ ! "$?" = "0" ]; then
 -             if [ -d /var/www/${TURTL_DOMAIN_NAME}/previous ]; then
 -                 mv /var/www/${TURTL_DOMAIN_NAME}/previous /var/www/${TURTL_DOMAIN_NAME}/htdocs
 -             fi
 -             set_user_permissions
 -             backup_unmount_drive
 -             exit 36723
 -         fi
 -         rm -rf ${temp_restore_dir}
 -         chown -R turtl:turtl /var/www/${TURTL_DOMAIN_NAME}/htdocs
 - 
 -         temp_restore_dir=/root/temprethinkdb
 -         restore_directory_from_usb $temp_restore_dir rethinkdb
 -         if [ -d /var/lib/rethinkdb ]; then
 -             if [ -d /var/lib/previous_rethinkdb ]; then
 -                 rm -rf /var/lib/previous_rethinkdb
 -             fi
 -             mv /var/lib/rethinkdb /var/lib/previous_rethinkdb
 -         fi
 -         temp_source_dir=$(find ${temp_restore_dir} -name rethinkdb)
 -         cp -r ${temp_source_dir} /var/lib/
 -         if [ ! "$?" = "0" ]; then
 -             if [ -d /var/lib/previous_rethinkdb ]; then
 -                 mv /var/lib/previous_rethinkdb /var/lib/rethinkdb
 -             fi
 -             set_user_permissions
 -             backup_unmount_drive
 -             exit 378324
 -         fi
 -         rm -rf ${temp_restore_dir}
 -     fi
 - }
 - 
 - function backup_remote_turtl {
 -     read_config_param "TURTL_DOMAIN_NAME"
 -     if [ $TURTL_DOMAIN_NAME ]; then
 -         temp_backup_dir=/var/www/${TURTL_DOMAIN_NAME}/htdocs
 -         if [ -d $temp_backup_dir ]; then
 -             echo $"Backing up turtl"
 -             backup_directory_to_friend $temp_backup_dir turtl
 -             echo $"Backup of turtl complete"
 -         else
 -             echo $"turtl domain specified but not found in $temp_backup_dir"
 -             exit 68725
 -         fi
 - 
 -         temp_backup_dir=/var/lib/rethinkdb
 -         if [ -d $temp_backup_dir ]; then
 -             echo $"Backing up rethinkdb"
 -             backup_directory_to_friend $temp_backup_dir rethinkdb
 -             echo $"Backup of rethinkdb complete"
 -         fi
 -     fi
 - }
 - 
 - function restore_remote_turtl {
 -     read_config_param "TURTL_DOMAIN_NAME"
 -     if [ $TURTL_DOMAIN_NAME ]; then
 -         temp_restore_dir=/root/tempturtl
 -         mkdir $temp_restore_dir
 -         function_check restore_directory_from_friend
 -         restore_directory_from_friend $temp_restore_dir turtl
 -         if [ -d /var/www/${TURTL_DOMAIN_NAME}/htdocs ]; then
 -             if [ -d /var/www/${TURTL_DOMAIN_NAME}/previous ]; then
 -                 rm -rf /var/www/${TURTL_DOMAIN_NAME}/previous
 -             fi
 -             mv /var/www/${TURTL_DOMAIN_NAME}/htdocs /var/www/${TURTL_DOMAIN_NAME}/previous
 -         fi
 -         temp_source_dir=$(find ${temp_restore_dir} -name htdocs)
 -         cp -r ${temp_source_dir} /var/www/${TURTL_DOMAIN_NAME}/
 -         if [ ! "$?" = "0" ]; then
 -             if [ -d /var/www/${TURTL_DOMAIN_NAME}/previous ]; then
 -                 mv /var/www/${TURTL_DOMAIN_NAME}/previous /var/www/${TURTL_DOMAIN_NAME}/htdocs
 -             fi
 -             exit 37823
 -         fi
 -         rm -rf ${temp_restore_dir}
 - 
 - 
 -         temp_restore_dir=/root/temprethinkdb
 -         mkdir $temp_restore_dir
 -         function_check restore_directory_from_friend
 -         restore_directory_from_friend $temp_restore_dir rethinkdb
 -         if [ -d /var/lib/rethinkdb ]; then
 -             if [ -d /var/lib/previous_rethinkdb ]; then
 -                 rm -rf /var/lib/previous_rethinkdb
 -             fi
 -             mv /var/lib/rethinkdb /var/lib/previous_rethinkdb
 -         fi
 -         temp_source_dir=$(find ${temp_restore_dir} -name rethinkdb)
 -         cp -r ${temp_source_dir} /var/lib/
 -         if [ ! "$?" = "0" ]; then
 -             if [ -d /var/lib/previous_rethinkdb ]; then
 -                 mv /var/lib/previous_rethinkdb /var/lib/rethinkdb
 -             fi
 -             exit 26783
 -         fi
 -         rm -rf ${temp_restore_dir}
 -     fi
 - }
 - 
 - function remove_turtl {
 -     if [ ! -d $TURTL_BASE_DIR ]; then
 -         return
 -     fi
 -     systemctl stop turtl
 -     systemctl disable turtl
 -     rm /etc/systemd/system/turtl.service
 -     remove_rethinkdb
 -     remove_app turtl
 -     remove_completion_param install_turtl
 -     sed -i '/turtl/d' $COMPLETION_FILE
 -     deluser turtl
 -     nginx_dissite $TURTL_DOMAIN_NAME
 -     if [ -f /etc/nginx/sites-available/$TURTL_DOMAIN_NAME ]; then
 -         rm /etc/nginx/sites-available/$TURTL_DOMAIN_NAME
 -     fi
 -     remove_certs $TURTL_DOMAIN_NAME
 -     if [ -d /var/www/$TURTL_DOMAIN_NAME ]; then
 -         rm -rf /var/www/$TURTL_DOMAIN_NAME
 -     fi
 -     function_check remove_onion_service
 -     remove_onion_service turtl ${TURTL_ONION_PORT}
 -     remove_onion_service turtlapi ${TURTL_API_ONION_PORT}
 -     function_check remove_ddns_domain
 -     remove_ddns_domain $TURTL_DOMAIN_NAME
 -     rm -rf /etc/rethinkdb
 -     rm -rf /var/lib/rethinkdb
 -     rm -rf $TURTL_BASE_DIR
 - }
 - 
 - 
 - function turtl_setup {
 -     PIDFILE=${PIDFILE:-nil}
 -     BINDADDR=${BINDADDR:-0.0.0.0}
 -     BINDPORT=${BINDPORT:-8181}
 -     PROD_ERR_HANDLING=${PROD_ERR_HANDLING:-t}
 -     FQDN=${FQDN:-turtl.local}
 -     SITE_URL=${SITE_URL:-http://turtl.local}
 -     ADMIN_EMAIL=${ADMIN_EMAIL:-$MY_USERNAME@$DEFAULT_DOMAIN_NAME}
 -     EMAIL_FROM=${EMAIL_FROM:-noreply@$DEFAULT_DOMAIN_NAME}
 -     SMTP_USER=${SMTP_USER:-}
 -     SMTP_PASS=${SMTP_PASS:-}
 -     DISPLAY_ERRORS=${DISPLAY_ERRORS:-t}
 -     DEFAULT_STORAGE_LIMIT=${DEFAULT_STORAGE_LIMIT:-100}
 -     STORAGE_INVITE_CREDIT=${STORAGE_INVITE_CREDIT:-25}
 -     LOCAL_UPLOAD_URL=${LOCAL_UPLOAD_URL:-http://turtl.local}
 -     LOCAL_UPLOAD_PATH=${LOCAL_UPLOAD_PATH:-"$TURTL_BASE_DIR/api/uploads"}
 -     AWS_S3_TOKEN=${AWS_S3_TOKEN:-(:token ''
 -                                   :secret ''
 -                                   :bucket ''
 -                                   :endpoint 'https://s3.amazonaws.com')}
 - 
 -     # generates the config-file
 -     cat  << __ENDCONFIG__ > $TURTL_BASE_DIR/api/config/config.lisp
 - (in-package :turtl)
 - (defparameter *root* (asdf:system-relative-pathname :turtl #P""))
 - (defparameter *pid-file* "${PIDFILE}")
 - (defvar *server-bind* "${BINDADDR}")
 - (defvar *server-port* ${BINDPORT})
 - (defvar *db-name* "turtl")
 - (defvar *db-host* "127.0.0.1")
 - (defvar *db-port* 28015)
 - (defvar *production-error-handling* ${PROD_ERR_HANDLING})
 - (defvar *enable-hsts-header* nil)
 - (defvar *site-url* "${SITE_URL}")
 - (defvar *api-path* "")
 - (defvar *admin-email* "${ADMIN_EMAIL}")
 - (defvar *email-from* "${EMAIL_FROM}")
 - (defvar *email-user* "${SMTP_USER}")
 - (defvar *email-pass* "${SMTP_PASS}")
 - (defvar *display-errors* ${DISPLAY_ERRORS})
 - (defparameter *default-storage-limit* ${DEFAULT_STORAGE_LIMIT})
 - (defparameter *storage-invite-credit* ${STORAGE_INVITE_CREDIT})
 - (vom:config :turtl :info)
 - (defvar *local-upload* "${LOCAL_UPLOAD_PATH}")
 - (defvar *local-upload-url* "${LOCAL_UPLOAD_URL}")
 - (defvar *amazon-s3* "${AWS_S3_TOKEN}")
 - __ENDCONFIG__
 - 
 -     cat $TURTL_BASE_DIR/api/config/config.footer >> $TURTL_BASE_DIR/api/config/config.lisp
 - 
 -     # start the turtl server
 -     systemctl restart rethinkdb
 - 
 -     echo '[Unit]' > /etc/systemd/system/turtl.service
 -     echo 'Description=Note taking service' >> /etc/systemd/system/turtl.service
 -     echo 'Documentation=http://turtl.it' >> /etc/systemd/system/turtl.service
 -     echo 'Requires=network.target' >> /etc/systemd/system/turtl.service
 -     echo 'Requires=rethinkdb.service' >> /etc/systemd/system/turtl.service
 -     echo 'After=network.target' >> /etc/systemd/system/turtl.service
 -     echo 'After=rethinkdb.service' >> /etc/systemd/system/turtl.service
 -     echo '' >> /etc/systemd/system/turtl.service
 -     echo '[Service]' >> /etc/systemd/system/turtl.service
 -     echo 'Type=simple' >> /etc/systemd/system/turtl.service
 -     echo 'User=turtl' >> /etc/systemd/system/turtl.service
 -     echo "WorkingDirectory=$TURTL_BASE_DIR/api/" >> /etc/systemd/system/turtl.service
 - 
 -     if [[ "$check_architecture" == *"64"* && "$check_architecture" != *"arm"* ]]; then
 -         echo "ExecStart=$TURTL_BASE_DIR/ccl/lx86cl64 -l $TURTL_BASE_DIR/quicklisp/setup.lisp -l launch.lisp" >> /etc/systemd/system/turtl.service
 -     else
 -         if [[ "$check_architecture" != *"arm"* ]]; then
 -             echo "ExecStart=$TURTL_BASE_DIR/ccl/lx86cl -l $TURTL_BASE_DIR/quicklisp/setup.lisp -l launch.lisp" >> /etc/systemd/system/turtl.service
 -         else
 -             echo "ExecStart=$TURTL_BASE_DIR/ccl/larmcl -l $TURTL_BASE_DIR/quicklisp/setup.lisp -l launch.lisp" >> /etc/systemd/system/turtl.service
 -         fi
 -     fi
 -     echo '' >> /etc/systemd/system/turtl.service
 -     echo '[Install]' >> /etc/systemd/system/turtl.service
 -     echo 'WantedBy=multi-user.target' >> /etc/systemd/system/turtl.service
 -     chmod +x /etc/systemd/system/turtl.service
 - 
 -     chown -R turtl:turtl $TURTL_BASE_DIR
 -     systemctl enable turtl
 -     systemctl daemon-reload
 -     systemctl start turtl
 - }
 - 
 - function install_turtl_api {
 -     # https://github.com/ArthurGarnier/turtl-docker
 -     apt-get -yq install wget libterm-readline-perl-perl gcc libuv1-dev
 - 
 -     if [ ! -d $TURTL_BASE_DIR ]; then
 -         mkdir -p $TURTL_BASE_DIR
 -     fi
 -     cd $TURTL_BASE_DIR
 -     check_architecture=$(uname -a)
 - 
 -     # Install ccl
 -     if [[ "$check_architecture" != *"arm"* ]]; then
 -         wget -P $TURTL_BASE_DIR/ ftp://ftp.clozure.com/pub/release/1.11/ccl-1.11-linuxx86.tar.gz
 -         mkdir -p $TURTL_BASE_DIR/ccl
 -         tar xvzf $TURTL_BASE_DIR/ccl-1.11-linuxx86.tar.gz -C $TURTL_BASE_DIR/ccl --strip-components=1
 -     else
 -         wget -P $TURTL_BASE_DIR/ ftp://ftp.clozure.com/pub/release/1.11/ccl-1.11-linuxarm.tar.gz
 -         mkdir -p $TURTL_BASE_DIR/ccl
 -         tar xvzf $TURTL_BASE_DIR/ccl-1.11-linuxarm.tar.gz -C $TURTL_BASE_DIR/ccl --strip-components=1
 -     fi
 - 
 -     # install quicklisp
 -     cat  << __ENDCONFIG__ > $TURTL_BASE_DIR/quicklisp_install
 - (load (compile-file "asdf.lisp"))
 - (load (compile-file "quicklisp.lisp"))
 - (quicklisp-quickstart:install)
 - (ql:system-apropos "vecto")
 - (ql:quickload "alexandria")
 - (ql:quickload "babel")
 - (ql:quickload "blackbird")
 - (ql:quickload "bordeaux-threads")
 - (ql:quickload "cffi")
 - (ql:quickload "chipz")
 - (ql:quickload "chunga")
 - (ql:quickload "cl-annot")
 - (ql:quickload "cl-async")
 - (ql:quickload "cl-async-future")
 - (ql:quickload "cl-base64")
 - (ql:quickload "cl-fad")
 - (ql:quickload "cl-libuv")
 - (ql:quickload "cl-mongo-id")
 - (ql:quickload "cl-ppcre")
 - (ql:quickload "cl-rethinkdb")
 - (ql:quickload "cl-smtp")
 - (ql:quickload "cl+ssl")
 - (ql:quickload "cl-syntax")
 - (ql:quickload "cl-utilities")
 - (ql:quickload "cl-vectors")
 - (ql:quickload "do-urlencode")
 - (ql:quickload "drakma")
 - (ql:quickload "drakma-async")
 - (ql:quickload "event-glue")
 - (ql:quickload "fast-http")
 - (ql:quickload "fast-io")
 - (ql:quickload "flexi-streams")
 - (ql:quickload "ironclad")
 - (ql:quickload "jonathan")
 - (ql:quickload "local-time")
 - (ql:quickload "md5")
 - (ql:quickload "named-readtables")
 - (ql:quickload "nibbles")
 - (ql:quickload "proc-parse")
 - (ql:quickload "puri")
 - (ql:quickload "quri")
 - (ql:quickload "salza2")
 - (ql:quickload "secure-random")
 - (ql:quickload "smart-buffer")
 - (ql:quickload "split-sequence")
 - (ql:quickload "static-vectors")
 - (ql:quickload "trivial-backtrace")
 - (ql:quickload "trivial-features")
 - (ql:quickload "trivial-garbage")
 - (ql:quickload "trivial-gray-streams")
 - (ql:quickload "trivial-types")
 - (ql:quickload "usocket")
 - (ql:quickload "vecto")
 - (ql:quickload "vom")
 - (ql:quickload "wookie")
 - (ql:quickload "xmls")
 - (ql:quickload "xsubseq")
 - (ql:quickload "yason")
 - (ql:quickload "zpb-ttf")
 - (ql:quickload "zpng")
 - (ql:add-to-init-file)
 - (ccl::quit)
 - __ENDCONFIG__
 - 
 -     if [ ! -f asdf.lisp ]; then
 -         wget https://common-lisp.net/project/asdf/asdf.lisp
 -     fi
 -     if [ ! -f quicklisp.lisp ]; then
 -         wget https://beta.quicklisp.org/quicklisp.lisp
 -     fi
 - 
 -     adduser --disabled-login --home=$TURTL_BASE_DIR --gecos 'turtl' turtl
 -     chown -R turtl:turtl $TURTL_BASE_DIR
 - 
 -     if [[ "$check_architecture" != *"arm"* ]]; then
 -         if [[ "$check_architecture" == *"64"* ]]; then
 -             su -c "cat $TURTL_BASE_DIR/quicklisp_install | $TURTL_BASE_DIR/ccl/lx86cl64" - turtl
 -         else
 -             su -c "cat $TURTL_BASE_DIR/quicklisp_install | $TURTL_BASE_DIR/ccl/lx86cl" - turtl
 -         fi
 -     else
 -         su -c "cat $TURTL_BASE_DIR/quicklisp_install | $TURTL_BASE_DIR/ccl/larmcl" - turtl
 -     fi
 -     rm $TURTL_BASE_DIR/quicklisp_install
 - 
 -     install_rethinkdb
 - 
 -     # install turtl API
 -     cd $TURTL_BASE_DIR/
 -     git clone $TURTL_API_REPO $TURTL_BASE_DIR/api
 -     cd $TURTL_BASE_DIR/api
 -     git checkout $TURTL_API_COMMIT -b $TURTL_API_COMMIT
 -     set_completion_param "turtl api commit" "$TURTL_API_COMMIT"
 -     cd $TURTL_BASE_DIR/quicklisp/local-projects
 -     git clone git://github.com/orthecreedence/cl-hash-util
 -     if [[ "$check_architecture" != *"arm"* ]]; then
 -         if [[ "$check_architecture" == *"64"* ]]; then
 -             su -c "cat '(ccl:quit)' | $TURTL_BASE_DIR/ccl/lx86cl64 -l /root/quicklisp/setup.lisp" - turtl
 -         else
 -             su -c "cat '(ccl:quit)' | $TURTL_BASE_DIR/ccl/lx86cl -l /root/quicklisp/setup.lisp" - turtl
 -         fi
 -     else
 -         su -c "cat '(ccl:quit)' | $TURTL_BASE_DIR/ccl/larmcl -l /root/quicklisp/setup.lisp" - turtl
 -     fi
 - 
 -     # config
 -     echo '(defvar *enabled-cors-resources* "resource://turtl-at-lyonbros-dot-com"' > $TURTL_BASE_DIR/api/config/config.footer
 -     echo '  "When set, will enable CORS for resource:// origins if they match the given' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '   string. Entries should be comma separated (this string is passed verbatim in' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '   the Access-Control-Allow-Origin header).")' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '(defparameter *public-actions*' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo "  \`((:post . ,(concatenate 'string *api-path* \"/users\"))" >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo "    (:post . ,(concatenate 'string *api-path* \"/log/error\"))" >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '    (:post . "/cla/sign")' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '    (:get  . "/ping")' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '    (:get  . "/admin")' >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo "    (:get . ,(cl-ppcre:create-scanner (concatenate 'string *api-path* \"/invites/codes/([0-9a-f-]+)\"))))" >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo "  \"A list of public resources/actions that do not require authentication.\")" >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo "(defvar *analytics* '(:enabled t" >> $TURTL_BASE_DIR/api/config/config.footer
 -     echo '                      :db "analytics"))' >> $TURTL_BASE_DIR/api/config/config.footer
 - 
 -     cp $TURTL_BASE_DIR/asdf.lisp $TURTL_BASE_DIR/api
 -     echo '(load (compile-file "asdf.lisp"))' > $TURTL_BASE_DIR/api/launch.lisp
 -     echo "(pushnew \"./\" asdf:*central-registry* :test #'equal)" >> $TURTL_BASE_DIR/api/launch.lisp
 -     echo '(load "start")' >> $TURTL_BASE_DIR/api/launch.lisp
 - 
 -     turtl_setup
 - }
 - 
 - function install_turtl_app {
 -     function_check install_nodejs
 -     install_nodejs turtl
 - 
 -     if [ -d /var/www/$TURTL_DOMAIN_NAME ]; then
 -         rm -rf /var/www/$TURTL_DOMAIN_NAME
 -     fi
 -     mkdir -p /var/www/$TURTL_DOMAIN_NAME
 - 
 -     if [ -f $IMAGE_PASSWORD_FILE ]; then
 -         TURTL_ADMIN_PASSWORD="$(printf `cat $IMAGE_PASSWORD_FILE`)"
 -     else
 -         if [ ! $TURTL_ADMIN_PASSWORD ]; then
 -             TURTL_ADMIN_PASSWORD="$(create_password ${MINIMUM_PASSWORD_LENGTH})"
 -         fi
 -     fi
 - 
 -     cd /var/www/$TURTL_DOMAIN_NAME
 -     git_clone $TURTL_REPO /var/www/$TURTL_DOMAIN_NAME/htdocs
 -     git checkout $TURTL_COMMIT -b $TURTL_COMMIT
 -     set_completion_param "turtl commit" "$TURTL_COMMIT"
 - 
 -     if [ ! -f /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js.default ]; then
 -         echo $'turtl app config file not found'
 -         exit 737223
 -     fi
 -     cp /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js.default /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js
 - 
 -     # change settings
 -     sed -i "s|api_url.*|api_url: 'https://api.${TURTL_DOMAIN_NAME}'|g" /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js
 -     sed -i "s|site_url.*|site_url: 'https://${TURTL_DOMAIN_NAME}'|g" /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js
 - 
 -     chown -R turtl:turtl /var/www/$TURTL_DOMAIN_NAME/htdocs
 - 
 -     TURTL_ONION_HOSTNAME=$(add_onion_service turtl 80 ${TURTL_ONION_PORT})
 -     TURTL_API_ONION_HOSTNAME=$(add_onion_service turtlapi 80 ${TURTL_API_ONION_PORT})
 - 
 -     turtl_nginx_site=/etc/nginx/sites-available/$TURTL_DOMAIN_NAME
 -     if [[ $ONION_ONLY == "no" ]]; then
 -         function_check nginx_http_redirect
 -         nginx_http_redirect $TURTL_DOMAIN_NAME
 -         echo 'server {' >> $turtl_nginx_site
 -         echo '  listen 443 ssl;' >> $turtl_nginx_site
 -         echo '  listen [::]:443 ssl;' >> $turtl_nginx_site
 -         echo "  server_name api.${TURTL_DOMAIN_NAME};" >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  # Security' >> $turtl_nginx_site
 -         function_check nginx_ssl
 -         nginx_ssl $TURTL_DOMAIN_NAME
 - 
 -         function_check nginx_disable_sniffing
 -         nginx_disable_sniffing $TURTL_DOMAIN_NAME
 - 
 -         echo '  add_header Strict-Transport-Security max-age=15768000;' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  # Logs' >> $turtl_nginx_site
 -         echo '  access_log /dev/null;' >> $turtl_nginx_site
 -         echo '  error_log /dev/null;' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  location / {' >> $turtl_nginx_site
 -         function_check nginx_limits
 -         nginx_limits $TURTL_DOMAIN_NAME '15m'
 -         echo "    proxy_pass        http://localhost:${TURTL_PORT}/;" >> $turtl_nginx_site
 -         echo '    proxy_set_header  Host $host;' >> $turtl_nginx_site
 -         echo '    proxy_buffering   off;' >> $turtl_nginx_site
 -         echo '  }' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '}' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo 'server {' >> $turtl_nginx_site
 -         echo '  listen 443 ssl;' >> $turtl_nginx_site
 -         echo '  listen [::]:443 ssl;' >> $turtl_nginx_site
 -         echo "  server_name ${TURTL_DOMAIN_NAME};" >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  index index.html;' >> $turtl_nginx_site
 -         echo "  root /var/www/$TURTL_DOMAIN_NAME/htdocs;" >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  # Security' >> $turtl_nginx_site
 -         function_check nginx_ssl
 -         nginx_ssl $TURTL_DOMAIN_NAME
 - 
 -         function_check nginx_disable_sniffing
 -         nginx_disable_sniffing $TURTL_DOMAIN_NAME
 - 
 -         echo '  add_header Strict-Transport-Security max-age=15768000;' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  # Logs' >> $turtl_nginx_site
 -         echo '  access_log /dev/null;' >> $turtl_nginx_site
 -         echo '  error_log /dev/null;' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '  location / {' >> $turtl_nginx_site
 -         function_check nginx_limits
 -         nginx_limits $TURTL_DOMAIN_NAME '15m'
 -         echo '  }' >> $turtl_nginx_site
 -         echo '' >> $turtl_nginx_site
 -         echo '}' >> $turtl_nginx_site
 -     else
 -         sed -i "s|api_url.*|api_url: 'http://${TURTL_API_ONION_HOSTNAME}'|g" /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js
 -         sed -i "s|site_url.*|site_url: 'http://${TURTL_ONION_HOSTNAME}'|g" /var/www/$TURTL_DOMAIN_NAME/htdocs/config/config.js
 -         echo -n '' > $turtl_nginx_site
 -     fi
 -     echo 'server {' >> $turtl_nginx_site
 -     echo "  listen 127.0.0.1:${TURTL_API_ONION_PORT};" >> $turtl_nginx_site
 -     echo "  server_name ${TURTL_API_ONION_HOSTNAME};" >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     function_check nginx_disable_sniffing
 -     nginx_disable_sniffing $TURTL_DOMAIN_NAME
 -     echo '' >> $turtl_nginx_site
 -     echo '  # Logs' >> $turtl_nginx_site
 -     echo '  access_log /dev/null;' >> $turtl_nginx_site
 -     echo '  error_log /dev/null;' >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo '  location / {' >> $turtl_nginx_site
 -     function_check nginx_limits
 -     nginx_limits $TURTL_DOMAIN_NAME '15m'
 -     echo "    proxy_pass        http://localhost:${TURTL_PORT}/;" >> $turtl_nginx_site
 -     echo '    proxy_set_header  Host $host;' >> $turtl_nginx_site
 -     echo '    proxy_buffering   off;' >> $turtl_nginx_site
 -     echo '  }' >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo '}' >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo 'server {' >> $turtl_nginx_site
 -     echo "  listen 127.0.0.1:$TURTL_ONION_PORT default_server;" >> $turtl_nginx_site
 -     echo "  server_name $TURTL_ONION_HOSTNAME;" >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo '  index index.html;' >> $turtl_nginx_site
 -     echo "  root /var/www/$TURTL_DOMAIN_NAME/htdocs;" >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     function_check nginx_disable_sniffing
 -     nginx_disable_sniffing $TURTL_DOMAIN_NAME
 -     echo '' >> $turtl_nginx_site
 -     echo '  # Logs' >> $turtl_nginx_site
 -     echo '  access_log /dev/null;' >> $turtl_nginx_site
 -     echo '  error_log /dev/null;' >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo '  location / {' >> $turtl_nginx_site
 -     function_check nginx_limits
 -     nginx_limits $TURTL_DOMAIN_NAME '15m'
 -     echo '  }' >> $turtl_nginx_site
 -     echo '' >> $turtl_nginx_site
 -     echo '}' >> $turtl_nginx_site
 - 
 -     ${PROJECT_NAME}-pass -u $MY_USERNAME -a turtl -p "$TURTL_ADMIN_PASSWORD"
 - 
 -     function_check add_ddns_domain
 -     add_ddns_domain $TURTL_DOMAIN_NAME
 - 
 -     set_completion_param "turtl domain" "$TURTL_DOMAIN_NAME"
 - 
 -     cd /var/www/$TURTL_DOMAIN_NAME/htdocs
 -     sed -i 's|GPLv3|GPL-3.0|g' package.json
 -     sed -i "/license/a \"repository\": \"$TURTL_REPO\"," package.json
 -     rm -rf node_modules npm-shrinkwrap.json
 -     npm install uglify@0.1.5 --no-optional
 -     npm install minimatch@3.0.2 --no-optional
 -     npm install --no-optional
 - 
 -     sed -i 's|{config,controllers,handlers,locales,library,models,turtl}|.|g' Makefile
 -     sed -i 's|tests/{data,tests}|tests|g' Makefile
 - 
 -     make clean
 -     make
 - 
 -     chown -R turtl:turtl /var/www/$TURTL_DOMAIN_NAME/htdocs
 - 
 -     function_check create_site_certificate
 -     create_site_certificate $TURTL_DOMAIN_NAME 'yes'
 - 
 -     function_check nginx_ensite
 -     nginx_ensite $TURTL_DOMAIN_NAME
 - 
 -     systemctl restart nginx
 - }
 - 
 - function install_turtl {
 -     install_turtl_api
 -     install_turtl_app
 - 
 -     APP_INSTALLED=1
 - }
 
 
  |