;;; Tyreunom's system administration and configuration tools.

;;;

;;; Copyright © 2019 Julien Lepiller <julien@lepiller.eu>

;;;

;;; This program is free software: you can redistribute it and/or modify

;;; it under the terms of the GNU General Public License as published by

;;; the Free Software Foundation, either version 3 of the License, or

;;; (at your option) any later version.

;;;

;;; This program is distributed in the hope that it will be useful,

;;; but WITHOUT ANY WARRANTY; without even the implied warranty of

;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

;;; GNU General Public License for more details.

;;;

;;; You should have received a copy of the GNU General Public License

;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.

(use-modules (gnu))

(use-modules (gnu system))

(use-modules (gnu bootloader) (gnu bootloader grub))

(use-modules (gnu services dns))

(use-modules (gnu services web))

(use-modules (config certbot) (config dns) (config mail) (config network) (config os))

;; NOTE: this config contains out-of band files.

;; To (re-)generate /etc/mail/dkim/private.key, run:

;; openssl genrsa -out /etc/mail/dkim/private.key 2048

;; openssl rsa -in /etc/mail/dkim/private.key -pubout -out /etc/mail/dkim/public.key

;; chmod 440 /etc/mail/dkim/private.key

;;

;; To (re-)generate /etc/knot/secrets.conf, run:

;; keymgt -t lepiller-key > /etc/knot/secrets.conf

(operating-system

  (inherit (tyreunom-os "hermes"))

  (bootloader

    (bootloader-configuration

      (target "/dev/sda")

      (bootloader grub-bootloader)))

  (file-systems (cons (file-system

                        (mount-point "/")

                        (device (uuid "27798665-5606-4fde-8da8-cc371e603892"))

                        (type "ext4"))

                      %base-file-systems))

  (services

    (append

      (list

        hermes-network-service

        (service nginx-service-type)

        (service knot-service-type

                 (knot-configuration

                   (includes '("/etc/knot/secrets.conf"))

                   (acls (list slave-acl))

                   (remotes (list ene))

                   (zones (list lepiller-slave-zone

                                ipv4-reverse-master-zone

                                ipv6-reverse-master-zone))))

        (certbot-service `(("lepiller.eu" "www.lepiller.eu" "smtp.lepiller.eu")))

        (simple-service 'lepiller-http-server nginx-service-type

          (list (nginx-server-configuration

                  (ssl-certificate "/etc/letsencrypt/live/lepiller.eu/fullchain.pem")

                  (ssl-certificate-key "/etc/letsencrypt/live/lepiller.eu/privkey.pem")

                  (listen '("443 ssl http2" "[::]:443 ssl http2"))

                  (server-name '("lepiller.eu" "www.lepiller.eu"))

                  (root "/srv/http/lepiller/public")

                  (index '("index.$language_suffix.html" "index.html"))

                  (try-files '("$uri.$language_suffix.html" "$uri" "$uri/" "=404"))

                  (raw-content

                    '("add_header Strict-Transport-Security \"max-age=31536000; includeSubDomains\" always;"

                      "add_header X-Frame-Options DENY;"

                      "add_header X-Content-Type-Options nosniff;"

                      "add_header Content-Security-Policy 'default-src \\'none\\'; img-src \\'self\\'; style-src \\'self\\' \\'unsafe-inline\\'; frame-ancestors \\'none\\'';"

                      "add_header Referrer-Policy no-referrer;"

                      "set $first_language $http_accept_language;"

                      "if ($http_accept_language ~* '(en|eo|fr)') {"

                      "    set $first_language $1;"

                      "}"

                      "set $language_suffix $first_language;"

                      "if ($cookie_language) {"

                      "    set $language_suffix $cookie_language;"

                      "}"

                      "if ($uri ~ \\.en.html$) {"

                      "    set $language_suffix 'en';"

                      "}"

                      "if ($uri ~ \\.eo.html$) {"

                      "    set $language_suffix 'eo';"

                      "}"

                      "if ($uri ~ \\.fr.html$) {"

                      "    set $language_suffix 'fr';"

                      "}"

                      "if ($uri ~ (.*).html) {"

                      "    set $my_uri $1.$language_suffix.html;"

                      "}"

                      "location ~ \\.html$ {"

                      "    add_header Set-Cookie 'language=$language_suffix;HttpOnly;Secure';"

                      "    add_header 'Cache-Control' 'no-store, no-cache, must-revalidate, proxy-revalidate, max-age=0';"

                      "    add_header Strict-Transport-Security \"max-age=31536000; includeSubDomains\" always;"

                      "    add_header X-Frame-Options DENY;"

                      "    add_header X-Content-Type-Options nosniff;"

                      "    add_header Content-Security-Policy 'default-src \\'none\\'; img-src \\'self\\'; style-src \\'self\\' \\'unsafe-inline\\'; frame-ancestors \\'none\\'';"

                      "    add_header Referrer-Policy no-referrer;"

                      "    expires off;"

                      "    try_files $my_uri $uri $uri/ =404;"

                      "}"

                      "error_page 404 /404;")))))

        (simple-service 'default-http-server nginx-service-type

          (list (nginx-server-configuration

                  (ssl-certificate "/etc/letsencrypt/live/lepiller.eu/fullchain.pem")

                  (ssl-certificate-key "/etc/letsencrypt/live/lepiller.eu/privkey.pem")

                  (listen '("443 ssl http2" "[::]:443 ssl http2"))

                  (server-name '(default))(root "/srv/http/default")))))

      (lepiller-mail-services

        #:interface "ens18"

        #:domain "lepiller.eu")

      (server-services "hermes"))))