diff options
| -rwxr-xr-x | fallback-deploy.sh | 48 | ||||
| -rw-r--r-- | fallback.scm | 9 |
2 files changed, 49 insertions, 8 deletions
diff --git a/fallback-deploy.sh b/fallback-deploy.sh new file mode 100755 index 0000000..10b9b1f --- /dev/null +++ b/fallback-deploy.sh @@ -0,0 +1,48 @@ +#! /bin/bash -e + +# genenetwork-machines --- Guix configuration for genenetwork machines +# Copyright © 2022, 2024 Arun Isaac <arunisaac@systemreboot.net> +# +# This file is part of genenetwork-machines. +# +# genenetwork-machines is free software: you can redistribute it +# and/or modify it under the terms of the GNU General Public License +# as published by the Free Software Foundation, either version 3 of +# the License, or (at your option) any later version. +# +# genenetwork-machines 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 +# General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with genenetwork-machines. If not, see +# <https://www.gnu.org/licenses/>. + +echo Build and install genenetwork fallback container on $HOSTNAME + +mkdir -p /export2/guix-containers/genenetwork/var/lib/acme +mkdir -p /export2/guix-containers/genenetwork/etc/genenetwork +mkdir -p /export2/data/genenetwork-xapian +mkdir -p /export2/data/genenetwork-sqlite +mkdir -p /export/data/genenetwork/genotype_files + +# Note that if you change these paths you need to rebuild the container +container_script=$(guix system container \ + --network \ + --load-path=. \ + --verbosity=3 \ + --share=/export2/guix-containers/genenetwork/var/lib/acme=/var/lib/acme \ + --share=/export2/guix-containers/genenetwork/etc/genenetwork=/etc/genenetwork \ + --expose=/export/data/genenetwork-xapian \ + --share=/export/data/genenetwork-sqlite \ + --expose=/export/data/genenetwork/genotype_files \ + --share=/var/run/mysqld=/run/mysqld \ + fallback.scm) + +name=/usr/local/bin/fallback-system-container +if [ $? == 0 ] ; then + echo "Create $name -> $container_script" + sudo ln --force --symbolic $container_script $name + sudo ln --force --symbolic /usr/local/bin/$name /var/guix/gcroots +fi diff --git a/fallback.scm b/fallback.scm index fa65577..adbf185 100644 --- a/fallback.scm +++ b/fallback.scm @@ -41,14 +41,7 @@ "@include " %sudoers-specification "\nacme ALL = NOPASSWD: " (file-append shepherd "/bin/herd") " restart nginx\n")) (packages %base-packages) - (services (cons* (service mysql-service-type - (mysql-configuration - (auto-upgrade? #f))) - (service virtuoso-service-type - (virtuoso-configuration - (server-port 8891) - (http-server-port 8892))) - (service forge-nginx-service-type + (services (cons* (service forge-nginx-service-type (forge-nginx-configuration (http-listen (forge-ip-socket (ip "0.0.0.0") |