diff --git a/.gitignore b/.gitignore deleted file mode 100644 index b25c15b..0000000 --- a/.gitignore +++ /dev/null @@ -1 +0,0 @@ -*~ diff --git a/.guix-authorizations b/.guix-authorizations deleted file mode 100644 index 76030c9..0000000 --- a/.guix-authorizations +++ /dev/null @@ -1,4 +0,0 @@ -(authorizations - (version 0) - (("E23C 21ED 864F F4F3 A711 4CDF CA47 1FD5 0161 8A49" - (name "dale")))) diff --git a/dale.key b/dale.key new file mode 100644 index 0000000..3110d69 Binary files /dev/null and b/dale.key differ diff --git a/dmbcs/development/packages/guile.scm b/dmbcs/development/packages/guile.scm deleted file mode 100644 index 1381a58..0000000 --- a/dmbcs/development/packages/guile.scm +++ /dev/null @@ -1,138 +0,0 @@ -;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès -;;; Copyright © 2014 Cyril Roelandt -;;; Copyright © 2014, 2016, 2018 David Thompson -;;; Copyright © 2014, 2017, 2018 Mark H Weaver -;;; Copyright © 2015, 2017 Christopher Allan Webber -;;; Copyright © 2016 Jan Nieuwenhuizen -;;; Copyright © 2016, 2017 Leo Famulari -;;; Copyright © 2016, 2019, 2020 Ricardo Wurmus -;;; Copyright © 2017 Andy Wingo -;;; Copyright © 2017 Marius Bakke -;;; Copyright © 2017, 2019 Mathieu Othacehe -;;; Copyright © 2017 Tobias Geerinckx-Rice -;;; Copyright © 2017, 2018 Amirouche -;;; Copyright © 2018 Danny Milosavljevic -;;; Copyright © 2018 Eric Bavier -;;; Copyright © 2019 Taylan Kammer -;;; -;;; This file is part of GNU Guix. -;;; -;;; GNU Guix 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. -;;; -;;; GNU Guix 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 GNU Guix. If not, see . - -(define-module (dmbcs development packages guile) - #:use-module ((guix licenses) #:prefix license:) - #:use-module (gnu packages) - #:use-module (gnu packages autotools) - #:use-module (gnu packages base) - #:use-module (gnu packages bash) - #:use-module (gnu packages bdw-gc) - #:use-module (gnu packages compression) - #:use-module (gnu packages dbm) - #:use-module (gnu packages flex) - #:use-module (gnu packages gawk) - #:use-module (gnu packages gettext) - #:use-module (gnu packages guile) - #:use-module (gnu packages hurd) - #:use-module (gnu packages libffi) - #:use-module (gnu packages libunistring) - #:use-module (gnu packages linux) - #:use-module (gnu packages m4) - #:use-module (gnu packages multiprecision) - #:use-module (gnu packages pkg-config) - #:use-module (gnu packages readline) - #:use-module (gnu packages sqlite) - #:use-module (gnu packages texinfo) - #:use-module (gnu packages version-control) - #:use-module (guix packages) - #:use-module (guix download) - #:use-module (guix git-download) - #:use-module (guix build-system gnu) - #:use-module (guix build-system guile) - #:use-module (guix deprecation) - #:use-module (guix utils) - #:use-module (ice-9 match) - #:use-module ((srfi srfi-1) #:prefix srfi-1:)) - -;;; Commentary: -;;; -;;; GNU Guile, and modules and extensions. -;;; -;;; Code: - - -(define-public guile - ;; This is the latest Guile stable version. - (package - (inherit guile-2.2) - (name "guile") - (version "3.0.4+dmbcs") - (source (origin - (inherit (package-source guile-2.2)) - (method git-fetch) - (uri (git-reference - (url "https://rdmp.org/dmbcs/guile.git") - (commit "a3a28334a3d5c397dfc24dfbceab113f993c5f0b"))) - (sha256 - (base32 - "0zw2s748d0gj31q9wc23mmgdjc8fpl6577v5b2lqj5ca4m69d8x0")) - (patches '()))) - (arguments - ;; XXX: JIT-enabled Guile crashes in obscure ways on GNU/Hurd. - (if #f ;; (hurd-target?) - (substitute-keyword-arguments (package-arguments guile-2.2) - ((#:configure-flags flags ''()) - `(cons "--disable-jit" ,flags))) - (substitute-keyword-arguments (package-arguments guile-2.2) - ((#:phases phases '%standard-phases) - `(modify-phases ,phases - (replace 'bootstrap - (lambda _ - ;; Disable broken tests. - ;; TODO: Fix them! - (substitute* "test-suite/tests/gc.test" - (("\\(pass-if \"after-gc-hook gets called\"" m) - (string-append "#;" m))) - (substitute* "test-suite/tests/version.test" - (("\\(pass-if \"version reporting works\"" m) - (string-append "#;" m))) - ;; Warning: Unwind-only `out-of-memory' exception; skipping pre-unwind handler. - ;; FAIL: test-out-of-memory - (substitute* "test-suite/standalone/Makefile.am" - (("(check_SCRIPTS|TESTS) \\+= test-out-of-memory") "")) - - (patch-shebang "build-aux/git-version-gen") - (invoke "sh" "autogen.sh") - #t))))))) - (native-inputs - `(("autoconf" ,autoconf) - ("automake" ,automake) - ("libtool" ,libtool) - ("flex" ,flex) - ("texinfo" ,texinfo) - ("gettext" ,gettext-minimal) - ,@(package-native-inputs guile-2.2))) - (native-search-paths - (list (search-path-specification - (variable "GUILE_LOAD_PATH") - (files '("share/guile/site/3.0"))) - (search-path-specification - (variable "GUILE_LOAD_COMPILED_PATH") - (files '("lib/guile/3.0/site-ccache" - "share/guile/site/3.0"))))) - (license license:gpl3+))) - - -;;; guile.scm ends here - diff --git a/dmbcs/development/packages/mcron.scm b/dmbcs/development/packages/mcron.scm deleted file mode 100644 index c4f1231..0000000 --- a/dmbcs/development/packages/mcron.scm +++ /dev/null @@ -1,57 +0,0 @@ -;;;; mcron.scm -- Guix package definition -;;; Copyright © 2016 Mathieu Lirzin -;;; Copyright © 2018 宋文武 -;;; Copyright © 2019 Efraim Flashner -;;; -;;; This file is part of GNU Mcron. -;;; -;;; GNU Mcron 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. -;;; -;;; GNU Mcron 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 GNU Mcron. If not, see . - -(define-module (dmbcs development packages mcron) - ;; #:use-module (dmbcs development packages guile) - - ;; !!! We can probably get rid of most of these. - - #:use-module (ice-9 popen) - #:use-module (ice-9 rdelim) - #:use-module (gnu) - #:use-module (guix) - #:use-module (guix build-system gnu) - #:use-module (guix git-download) - #:use-module ((guix licenses) #:prefix license:) - #:use-module ((gnu packages guile-xyz) #:prefix guix-base:) - #:use-module (srfi srfi-1)) - -(define-public mcron - (package - (inherit guix-base:mcron) - (name "mcron") - (version "1.2.3+dmbcs") - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://rdmp.org/dmbcs/mcron.git") - (commit "a16fd52bc5053032079533169baec131e271fbd4"))) - (sha256 - (base32 "0gvhqq0cyjm6gd2jhvy8xfhny4mbdnp4z0nqzk11dvnwzs9wk09z")))) - - ;; !!! The current incarnation of mcron includes the enhanced - ;; command-line module from our new guile in its own source tree, - ;; so we can get away with using the conventional guile now. - ;; - ;; Be sure to un-comment the use-module line near the top. - ;; (inputs - ;; `(("guile" ,(specification->package "guile@3.0.4+dmbcs")))) - (home-page "https://rdmp.org/dmbcs/mcron"))) diff --git a/dmbcs/development/packages/micro-server.scm b/dmbcs/development/packages/micro-server.scm deleted file mode 100644 index bfaa58f..0000000 --- a/dmbcs/development/packages/micro-server.scm +++ /dev/null @@ -1,53 +0,0 @@ -;; dmbcs-micro-server A C++ library providing CGI or built-in -;; web server functions -;; -;; Copyright (C) 2025 DM Bespoke Computer Solutions -;; -;; 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 . - - - -(define-module (dmbcs development packages micro-server) - #:use-module (guix packages) - #:use-module (guix git-download) - #:use-module (guix build-system cmake) - #:use-module (guix licenses) - #:use-module (gnu packages) - #:use-module (gnu packages curl) - #:use-module (gnu packages pkg-config) - #:use-module (gnu packages texinfo)) - - -(define-public dmbcs-micro-server - (package - (name "dmbcs-micro-server") - (version "0.5") - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://khleedril.org/forge/dmbcs/micro-server") - (commit (string-append "v" version)))) - (sha256 (base32 "1a2la52dgmfi3gjdjg8jdahwy33p3hzmrfnsvjvn9cgwvfwrixzy")))) - (build-system cmake-build-system) - (arguments `(#:phases (modify-phases %standard-phases (delete 'check)))) - (native-inputs (list pkg-config texinfo)) - (propagated-inputs (list curlpp)) - (synopsis "Yet another C++ web server class library") - (description "A C++ web service module.") - (home-page "https://khleedril.org/dmbcs/micro-server") - (license gpl3+))) - - -dmbcs-micro-server