From 0e29ab17e14d1d58905ae708ac48acb0e47cbd86 Mon Sep 17 00:00:00 2001
From: Pjotr Prins
Date: Fri, 10 Nov 2023 11:13:01 +0100
Subject: Preparing for precompute runner

---
 README.md                      |  6 +++++-
 scripts/README.md              |  4 ++++
 scripts/precompute/.guix-shell | 10 ++++++++++
 scripts/precompute/README.md   |  3 +++
 4 files changed, 22 insertions(+), 1 deletion(-)
 create mode 100644 scripts/README.md
 create mode 100644 scripts/precompute/.guix-shell
 create mode 100644 scripts/precompute/README.md

diff --git a/README.md b/README.md
index 908509c..5822baa 100644
--- a/README.md
+++ b/README.md
@@ -14,7 +14,7 @@ The current repository lives at
 git clone tux02.genenetwork.org:/home/git/genenetwork/gn-guile
 ```
 
-GNU Guile allows you to develop against a live running web server using emacs-geiser. To try this fire up the web server as
+GNU Guile allows you to develop against a live running web server using emacs-geiser. To try this fire up the web server from the `web` directory as
 
 ```sh
 cd web
@@ -25,6 +25,10 @@ Note the leading dot. The .guix-shell is defined in `genenetwork3/gn3-guile/web`
 
 Next fire up emacs with `emacs-geiser-guile` and connect to the running web server with `M-x geiser-connect` and the port `1970`. Now you can not only inspect procedures, but also update any prodedure on the live server using `C-M-x` and get updated output from the webserver!
 
+# Tools
+
+Some tooling and scripts that run independently are stored in `./scripts`.
+
 # Development
 
 ```
diff --git a/scripts/README.md b/scripts/README.md
new file mode 100644
index 0000000..10ec38c
--- /dev/null
+++ b/scripts/README.md
@@ -0,0 +1,4 @@
+# Tooling and scripts
+
+In this directory we store scripts that run independently of the web
+service.
diff --git a/scripts/precompute/.guix-shell b/scripts/precompute/.guix-shell
new file mode 100644
index 0000000..08c74f9
--- /dev/null
+++ b/scripts/precompute/.guix-shell
@@ -0,0 +1,10 @@
+#!/bin/bash
+#
+#  run with options '-- ./webserver.scm 8091' e.g.
+#  . .guix-shell -- guile -L .. --fresh-auto-compile --listen=1970 -e main ./webserver.scm 8091
+
+echo "Create a shell to run tools. In the container"
+echo "mkdir /usr/bin -p"
+echo "ln -s \$GUIX_ENVIRONMENT/bin/env /usr/bin/env"
+
+guix shell -C -F --network coreutils guile guile-dbi guile-dbd-mysql guile-fibers guile-json guile-gnutls guile-readline guile-redis openssl nss-certs $*
diff --git a/scripts/precompute/README.md b/scripts/precompute/README.md
new file mode 100644
index 0000000..53f846e
--- /dev/null
+++ b/scripts/precompute/README.md
@@ -0,0 +1,3 @@
+# Precompute
+
+Some work on precompute is documented [here](https://issues.genenetwork.org/topics/systems/mariadb/precompute-mapping-input-data). This is WIP.
-- 
cgit v1.2.3