about summary refs log tree commit diff
diff options
context:
space:
mode:
authorFrederick Muriuki Muriithi2025-02-13 14:46:34 -0600
committerFrederick Muriuki Muriithi2025-02-17 08:55:47 -0600
commit87e3ad6e3709f9fb5a397dd023919b01cea2abfd (patch)
treedaaf7aa17c3f9a155fb990df2469b4faa98f6780
parent891142f3e1db80f86aef11b478c901a8f8be2684 (diff)
downloadgn-machines-87e3ad6e3709f9fb5a397dd023919b01cea2abfd.tar.gz
Grant ownership of genotype-files to GN2 user.
-rw-r--r--genenetwork/services/genenetwork.scm7
1 files changed, 5 insertions, 2 deletions
diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index 3f9a823..01ad8e7 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -252,7 +252,7 @@
 
 (define (genenetwork-activation config)
   (match-record config <genenetwork-configuration>
-    (gn2-secrets gn3-secrets gn-auth-secrets auth-db llm-db-path)
+    (gn2-secrets gn3-secrets gn-auth-secrets auth-db llm-db-path genotype-files)
     (with-imported-modules '((guix build utils))
       #~(begin
           (use-modules (guix build utils))
@@ -272,6 +272,8 @@
                              (passwd:uid (getpw "gunicorn-genenetwork2"))
                              (passwd:gid (getpw "gunicorn-genenetwork2"))))
                     (append (list #$gn2-secrets)
+                            (find-files #$genotype-files
+                                        #:directories? #t)
                             (find-files #$gn2-secrets
                                         #:directories? #t)))
           (for-each (lambda (file)
@@ -398,7 +400,8 @@ object."
              (mappings (list database-mapping
                              (file-system-mapping
                               (source genotype-files)
-                              (target source))
+                              (target source)
+                              (writable? #t))
                              (file-system-mapping
                               (source gn-sourcecode-directory)
                               (target source))