diff options
-rwxr-xr-x | fallback-deploy.sh | 1 | ||||
-rw-r--r-- | fallback.scm | 1 | ||||
-rw-r--r-- | genenetwork/services/genenetwork.scm | 12 |
3 files changed, 13 insertions, 1 deletions
diff --git a/fallback-deploy.sh b/fallback-deploy.sh index 782ccb7..6e2e9e9 100755 --- a/fallback-deploy.sh +++ b/fallback-deploy.sh @@ -40,6 +40,7 @@ container_script=$(guix system container \ --share=/export/data/genenetwork-sqlite \ --expose=/export/data/genenetwork/genotype_files \ --share=/var/run/mysqld=/run/mysqld \ + --share=/export/source/fallback-debug \ fallback.scm) name=/usr/local/bin/fallback-system-container diff --git a/fallback.scm b/fallback.scm index 72a83df..bbf3c0d 100644 --- a/fallback.scm +++ b/fallback.scm @@ -65,5 +65,6 @@ (xapian-db "/export/data/genenetwork-xapian") (genotype-files "/export/data/genenetwork/genotype_files") (sparql-endpoint "http://localhost:8892/sparql") + (gn-sourcecode-directory "/export/source/fallback-debug") (gn3-data-directory "/export/data/genenetwork"))) %base-services))) diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm index 5e97454..0fc2fae 100644 --- a/genenetwork/services/genenetwork.scm +++ b/genenetwork/services/genenetwork.scm @@ -47,6 +47,7 @@ genenetwork-configuration-xapian-db genenetwork-configuration-genotype-files genenetwork-configuration-sparql-endpoint + genenetwork-configuration-gn-sourcecode-directory genenetwork-configuration-gn3-data-directory genenetwork-configuration-gn2-secrets genenetwork-configuration-gn3-secrets @@ -86,6 +87,8 @@ (default "/var/genenetwork/genotype-files")) (sparql-endpoint genenetwork-configuration-sparql-endpoint (default "http://localhost:8081/sparql")) + (gn-sourcecode-directory genenetwork-configuration-gn-sourcecode-directory + (default "/var/empty")) (gn3-data-directory genenetwork-configuration-gn3-data-directory (default "/var/genenetwork")) (gn2-secrets genenetwork-configuration-gn2-secrets @@ -180,7 +183,7 @@ G-expressions or numbers." described by @var{config}, a @code{<genenetwork-configuration>} object." (match-record config <genenetwork-configuration> - (genenetwork2 genenetwork3 gn-auth server-name gn-auth-server-name gn2-port gn3-port gn-auth-port sql-uri auth-db xapian-db genotype-files sparql-endpoint gn3-data-directory gn2-secrets gn3-secrets gn-auth-secrets) + (genenetwork2 genenetwork3 gn-auth server-name gn-auth-server-name gn2-port gn3-port gn-auth-port sql-uri auth-db xapian-db genotype-files sparql-endpoint gn-sourcecode-directory gn3-data-directory gn2-secrets gn3-secrets gn-auth-secrets) ;; If we mapped only the mysqld.sock socket file, it would break ;; when the external mysqld server is restarted. (let* ((database-mapping (file-system-mapping @@ -207,6 +210,7 @@ object." (configuration-file-gexp `(("AUTH_DB" ,auth-db) ("DATA_DIR" ,gn3-data-directory) + ("SOURCE_DIR" ,gn-sourcecode-directory) ("SPARQL_ENDPOINT" ,sparql-endpoint) ("SQL_URI" ,sql-uri) ("XAPIAN_DB_PATH" ,xapian-db))))) @@ -237,6 +241,9 @@ object." (source genotype-files) (target source)) (file-system-mapping + (source gn-sourcecode-directory) + (target source)) + (file-system-mapping (source gn2-conf) (target source)) (file-system-mapping @@ -274,6 +281,9 @@ object." (source gn3-secrets) (target source)) (file-system-mapping + (source gn-sourcecode-directory) + (target source)) + (file-system-mapping (source gn3-data-directory) (target source)) (file-system-mapping |