diff --git a/snamellit/Snamellit_CA.pem b/snamellit/Snamellit_CA.pem new file mode 100644 index 0000000..fb4912e --- /dev/null +++ b/snamellit/Snamellit_CA.pem @@ -0,0 +1,18 @@ +-----BEGIN X509 CRL----- +MIIC9DCB3QIBATANBgkqhkiG9w0BAQ0FADCBmjELMAkGA1UEBhMCQkUxEjAQBgNV +BAgTCUFudHdlcnBlbjESMBAGA1UEBxMJQW50d2VycGVuMRcwFQYDVQQKEw5TbmFt +ZWxsaXQgYnZiYTEoMCYGA1UEAxMfU25hbWVsbGl0IENlcnRpZmljYXRlIEF1dGhv +cml0eTEgMB4GCSqGSIb3DQEJARYRcHRpQHNuYW1lbGxpdC5jb20XDTE1MDEwNzA5 +MzEwMFoXDTE1MDIwNjA5MzEwMFqgDjAMMAoGA1UdFAQDAgEBMA0GCSqGSIb3DQEB +DQUAA4ICAQCXVOLXpfpDnX9mfC7w/9D1wdZl9+61UT3W+VAhPsvFxlqu/YdS6lRH +XvGMv/FtJI/h+PX9GfuV5v21NHecYaII2WENYFIq1jg2adaq5vY8DQq3zdW4Qmgr +y0613r3eXvoaZEHjA5gBhpcXNtXFu2wTEmTLHbbfGaXE/TikPYm+gDXgE8ZdjUlJ +7Qysesk7qvHOpbPZKFbaYixhcQxJ1vg76XvJhN1fyXsT/gsMOkEYmYgcV0BwlK+V +RIwhQ7cSDMKMmLXK5PBirz+L8BDrU1bL4Xu52V4z8c/vhZeWy+l/jSjoF38Wt81b +k7XJQZEcUZq/UpH6PdmmUfV0iu3M62i35Eu9xbpwbKaFFZE0y0RwR8Ht2mj9jvud +LtFq7dPrJuhg0/4/iZe6DWiafVflGV6vd6OzTdHH1WLtZzbefl2gxo/mpyoX9fkn +p1+z9j4w+FvCoKIM0RshXXnpOaMibMhiP3DxFNSF+0A2MNCyiOrSFE5GM5CDQ6CX +oKnfy8uWxHFUnDJ0VAl429H9EBesIfaXZS18Abbe5F8mtS1IEzh3MlLB5mJk3eVF +KH1z1hLfYl5Z9iaTnSd3ZoFq+eOGoVlEDhuaAvmZpsdPksCA+zAWkOEMPYs4S06b ++tOVK3wHfCtGfFB70WyhLCc0h1RIXl/JygK3oP5GZiucIMbHtQAD9g== +-----END X509 CRL----- diff --git a/snamellit/certs.scm b/snamellit/certs.scm new file mode 100644 index 0000000..466017c --- /dev/null +++ b/snamellit/certs.scm @@ -0,0 +1,49 @@ +(define-module (snamellit certs) + #:use-module (gnu packages base) + #:use-module (gnu packages certs) + #:use-module (gnu packages tls) + #:use-module (guix build-system copy) + #:use-module (guix packages) + #:use-module (guix gexp) + #:use-module (guix utils) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (nonguix build-system binary)) + + +(define-public snamellit-ca + (package + (name "snamellit-ca") + (version "1.0") + (source (local-file "Snamellit_CA.pem")) + (build-system copy-build-system) + (outputs '("out")) + (native-inputs + (list certdata2pem openssl)) + (inputs '()) + (propagated-inputs '()) + (arguments + (list + #:modules '((guix build copy-build-system) + (guix build utils) + (rnrs io ports) + (srfi srfi-26)) + #:phases + #~(modify-phases + (map (cut assq <> %standard-phases) + '(set-paths install-locale unpack)) + (add-after 'unpack 'install + (lambda _ + (let ((certsdir (string-append #$output + "/etc/ssl/certs/"))) + ;; Copy .pem files into the output. + (for-each (cut install-file <> certsdir) + (find-files "." ".*\\.pem$")) + (invoke "openssl" "rehash" certsdir))))))) + (synopsis "Snamellit CA Root Certificate") + (description + "Root Certificate of the Snamellit CA") + (home-page "https://www.snamellit.com/") + (license license:asl2.0))) + + +snamellit-ca