Provide the service source code on the web page

Signed-off-by: Denis 'GNUtoo' Carikli <GNUtoo@cyberdimension.org>
This commit is contained in:
Denis 'GNUtoo' Carikli 2023-09-20 17:03:29 +02:00
parent 026cbbd453
commit 61c1a2da98
Signed by: GNUtoo
GPG Key ID: 5F5DFCC14177E263
4 changed files with 32 additions and 7 deletions

2
.gitignore vendored
View File

@ -15,6 +15,8 @@ install-sh
Makefile Makefile
Makefile.in Makefile.in
missing missing
mumble-vm.tar
mumble-vm.tar.xz
mumble-vm-machine.scm mumble-vm-machine.scm
mumble-vm-system.scm mumble-vm-system.scm
signing-key.pub signing-key.pub

View File

@ -68,7 +68,7 @@ signing-key.pub:
'3A7E1F41E2D5784CFCABB39CB73F99E727D4A5C1ECA79D873587D63D093CC4B5' \ '3A7E1F41E2D5784CFCABB39CB73F99E727D4A5C1ECA79D873587D63D093CC4B5' \
>$@ >$@
IMAGE_SOURCE = \ TARBALL_SOURCE = \
first-boot.sh \ first-boot.sh \
guix-commit.txt \ guix-commit.txt \
index.html \ index.html \
@ -79,6 +79,10 @@ IMAGE_SOURCE = \
signing-key.pub \ signing-key.pub \
wireguard-post-up.sh wireguard-post-up.sh
IMAGE_SOURCE = \
$(TARBALL_SOURCE) \
mumble-vm.tar.xz
mumble-vm.img: $(IMAGE_SOURCE) mumble-vm.img: $(IMAGE_SOURCE)
install \ install \
`guix system image \ `guix system image \
@ -86,5 +90,11 @@ mumble-vm.img: $(IMAGE_SOURCE)
--image-size=6G mumble-vm-system.scm` \ --image-size=6G mumble-vm-system.scm` \
$@ $@
mumble-vm.tar: $(TARBALL_SOURCE)
tar --exclude "id_ed25519" -cf $@ $(TARBALL_SOURCE)
mumble-vm.tar.xz: mumble-vm.tar
xz -f -9e --verbose $<
deploy: $(IMAGE_SOURCE) deploy: $(IMAGE_SOURCE)
guix deploy -L . mumble-vm-machine.scm guix deploy -L . mumble-vm-machine.scm

View File

@ -99,9 +99,20 @@
laquelle il tourne, etc. laquelle il tourne, etc.
</p> </p>
<!-- TODO: <h2>Code source</h2>
-- * Fournir un lien vers le code source qui est déployé <ul>
-- * Expliquer comment contribuer <li>Code source du service qui tourne:
--> <a href="mumble-vm.tar.xz">mumble-vm.tar.xz</a>
</li>
<li> git:
<a href="https://git.a-lec.org/GNUtoo/guix-mumble-vm.git">
https://git.a-lec.org/GNUtoo/guix-mumble-vm.git
</a>
</li>
<li> Comment contribuer: envoyer un patch par mail à l'auteur
principal en attendant qu'on mette en place un meilleur système
pour les contributions.
</li>
</ul>
</body> </body>
</html> </html>

View File

@ -34,12 +34,14 @@
(package (package
(name "website") (name "website")
(version "0.1") (version "0.1")
(source (local-file "index.html" )) ;; TODO: Make that tarball reproducible
(source (local-file "mumble-vm.tar.xz"))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list (list
#:install-plan #:install-plan
#~(list '("index.html" "var/www/DOMAIN/")))) #~(list '("index.html" "var/www/DOMAIN/")
'(#$source "var/www/DOMAIN/"))))
(synopsis "The DOMAIN website.") (synopsis "The DOMAIN website.")
(description (description
"The website contains how to use the service, and how to "The website contains how to use the service, and how to