shepherd: Add virtuoso service

1 files changed, 13 insertions, 0 deletions

diff --git a/shepherd/init.d/virtuoso.scm b/shepherd/init.d/virtuoso.scm
new file mode 100644
index 0000000..241fe23
--- /dev/null
+++ b/shepherd/init.d/virtuoso.scm
@@ -0,0 +1,13 @@
+(define virtuoso
+  (make <service>
+	#:provides '(virtuoso)
+	#:docstring "Run the virtuoso web server"
+	#:start (make-forkexec-constructor
+		  '("/var/guix/profiles/per-user/shepherd/current-guix/bin/guix" "environment" "--ad-hoc" "virtuoso-ose" "--" "virtuoso-t" "-f")
+		  #:directory "/export/virtuoso/var/lib/virtuoso/db"
+		  #:log-file "/home/shepherd/logs/virtuoso.log")
+	#:stop (make-kill-destructor)
+	#:respawn? #t))
+(register-services virtuoso)
+
+(start virtuoso)