about summary refs log tree commit diff
diff options
context:
space:
mode:
authorEfraim Flashner2020-08-09 11:25:43 +0000
committerShepherd2020-08-09 11:28:31 +0000
commit3167912d77540e4e82d9133d16d8c3189a776912 (patch)
tree02ad3cb916d81c7ae8fdc434a9f44e1678f5b998
parent151b22ef2447e0aa7620b41da7a3f187fc55029a (diff)
downloadgn-shepherd-services-3167912d77540e4e82d9133d16d8c3189a776912.tar.gz
Add genenetwork1
-rwxr-xr-xrun_genenetwork1.sh2
-rw-r--r--shepherd/init.d/genenetwork1.scm12
-rw-r--r--shepherd/init.d/test-upgrade.scm1
3 files changed, 15 insertions, 0 deletions
diff --git a/run_genenetwork1.sh b/run_genenetwork1.sh
new file mode 100755
index 0000000..48d7eb0
--- /dev/null
+++ b/run_genenetwork1.sh
@@ -0,0 +1,2 @@
+#!/bin/sh
+$(/home/shepherd/.config/guix/current/bin/guix system container /home/shepherd/guix-bioinformatics/gn/services/genenetwork.scm --network)
diff --git a/shepherd/init.d/genenetwork1.scm b/shepherd/init.d/genenetwork1.scm
new file mode 100644
index 0000000..31f1bb0
--- /dev/null
+++ b/shepherd/init.d/genenetwork1.scm
@@ -0,0 +1,12 @@
+(define genenetwork1
+  (make <service>
+	#:provides '(genenetwork1)
+	#:docstring "Run the Legacy Genenetwork webserver"
+	#:start (make-forkexec-constructor
+		  '("/usr/bin/sudo" "/home/shepherd/run_genenetwork1.sh")
+		  #:log-file "/home/shepherd/logs/genenetwork1.log")
+	#:stop (make-kill-destructor)
+	#:respawn? #t))
+(register-services genenetwork1)
+
+(start genenetwork1)
diff --git a/shepherd/init.d/test-upgrade.scm b/shepherd/init.d/test-upgrade.scm
index c9ac5de..6750ede 100644
--- a/shepherd/init.d/test-upgrade.scm
+++ b/shepherd/init.d/test-upgrade.scm
@@ -8,6 +8,7 @@
 		  '("guix" "build"
 		    "-L" "/home/shepherd/guix-bioinformatics"
 		    "-L" "/home/shepherd/guix-past/modules"
+		    "genenetwork1" "httpd22-with-mod-python"
 		    ;"bnw" octave-3.4.3 FTBFS
 		    "gitea"
 		    "go-ipfs"