diff options
| author | Frederick Muriuki Muriithi | 2026-06-09 16:35:37 -0500 |
|---|---|---|
| committer | Frederick Muriuki Muriithi | 2026-06-15 09:48:43 -0500 |
| commit | 050692a031b2cf45ca37c18fe8931841945c835f (patch) | |
| tree | dc0edab5476a49ebb14100713e50f0f7023c7cb4 /genenetwork-development.scm | |
| parent | 88b5adc724ab8f63428e9fb9341b04a79bfdb1b3 (diff) | |
| download | gn-machines-050692a031b2cf45ca37c18fe8931841945c835f.tar.gz | |
Override cgit's fcgiwrap extension: run 4 processes.
Override the cgit-service object and change the fcgiwrap-service extension to run 4 processes, instead of the default 1.
Diffstat (limited to 'genenetwork-development.scm')
| -rw-r--r-- | genenetwork-development.scm | 40 |
1 files changed, 30 insertions, 10 deletions
diff --git a/genenetwork-development.scm b/genenetwork-development.scm index 195cbbd..e2bf71d 100644 --- a/genenetwork-development.scm +++ b/genenetwork-development.scm @@ -72,6 +72,7 @@ (guix utils) (forge acme) (forge cgit) + (forge fcgiwrap) (forge forge) (forge laminar) (forge nginx) @@ -1681,6 +1682,24 @@ delete-test-users, etc.) as the genenetwork user via sudo." (chdir orig-dir) (delete-file-recursively tmp-dir)))))))))) +(define (override-fcgiwrap-extension cgit-service) + (service + (service-type + (inherit (service-kind cgit-service)) + (extensions + (map (lambda (ext) + (if (eq? (service-extension-target ext) fcgiwrap-service-type) + (service-extension + (service-extension-target ext) + (compose list + (lambda (cfg) + (fcgiwrap-instance (inherit (car cfg)) + (processes 4))) + (service-extension-compute ext))) + ext)) + (service-type-extensions (service-kind cgit-service))))) + (service-value cgit-service))) + (operating-system (host-name "genenetwork-development") @@ -1720,16 +1739,17 @@ delete-test-users, etc.) as the genenetwork user via sudo." guile-lapack-project guile-lmdb-project guix-bioinformatics-project)))) - (service cgit-service-type - (cgit-configuration - (server-name "git.genenetwork.org") - (repository-directory "/home/git/public") - (extra-options - (list (cons "cache-root" "/var/cache/cgit") - (cons "cache-size" "1000") - (cons "cache-root-ttl" "5") - (cons "cache-repo-ttl" "5") - (cons "cache-dynamic-ttl" "5"))))) + (override-fcgiwrap-extension + (service cgit-service-type + (cgit-configuration + (server-name "git.genenetwork.org") + (repository-directory "/home/git/public") + (extra-options + (list (cons "cache-root" "/var/cache/cgit") + (cons "cache-size" "1000") + (cons "cache-root-ttl" "5") + (cons "cache-repo-ttl" "5") + (cons "cache-dynamic-ttl" "5")))))) (service laminar-service-type (laminar-configuration (title "GeneNetwork CI") |