From 4d7b122dd1fb39219452dfbcafc80fd25deadcde Mon Sep 17 00:00:00 2001 From: Simon Streit Date: Thu, 7 Dec 2023 23:22:41 +0100 Subject: siguix: Remove samba-mod. * siguix/packages/samba.scm: Delete file. --- siguix/packages/samba.scm | 145 ---------------------------------------------- 1 file changed, 145 deletions(-) delete mode 100644 siguix/packages/samba.scm diff --git a/siguix/packages/samba.scm b/siguix/packages/samba.scm deleted file mode 100644 index 40fea79..0000000 --- a/siguix/packages/samba.scm +++ /dev/null @@ -1,145 +0,0 @@ -;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2015, 2017, 2021 Ludovic Courtès -;;; Copyright © 2015 Mark H Weaver -;;; Copyright © 2016, 2017, 2019, 2021 Efraim Flashner -;;; Copyright © 2016 Adonay "adfeno" Felipe Nogueira -;;; Copyright © 2017 Thomas Danckaert -;;; Copyright © 2017, 2018, 2020 Marius Bakke -;;; Copyright © 2018–2021 Tobias Geerinckx-Rice -;;; Copyright © 2018 Ricardo Wurmus -;;; Copyright © 2019 Rutger Helling -;;; Copyright © 2020 Pierre Langlois -;;; Copyright © 2020 Maxim Cournoyer -;;; Copyright © 2021 Simon Streit -;;; -;;; This file is NOT 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 (siguix packages samba) - #:use-module (guix packages) - #:use-module (guix download) - #:use-module (guix git-download) - #:use-module (guix build-system gnu) - #:use-module (guix build-system copy) - #:use-module (guix licenses) - #:use-module (guix utils) - #:use-module (gnu packages) - #:use-module (gnu packages acl) - #:use-module (gnu packages admin) - #:use-module (gnu packages avahi) - #:use-module (gnu packages samba) - #:use-module (gnu packages autotools) - #:use-module (gnu packages backup) - #:use-module (gnu packages base) - #:use-module (gnu packages check) - #:use-module (gnu packages crypto) - #:use-module (gnu packages cups) - #:use-module (gnu packages databases) - #:use-module (gnu packages docbook) - #:use-module (gnu packages glib) - #:use-module (gnu packages gnome) - #:use-module (gnu packages gnupg) - #:use-module (gnu packages kerberos) - #:use-module (gnu packages linux) - #:use-module (gnu packages onc-rpc) - #:use-module (gnu packages openldap) - #:use-module (gnu packages perl) - #:use-module (gnu packages pkg-config) - #:use-module (gnu packages popt) - #:use-module (gnu packages python) - #:use-module (gnu packages python-xyz) - #:use-module (gnu packages readline) - #:use-module (gnu packages time) - #:use-module (gnu packages tls) - #:use-module (gnu packages web) - #:use-module (gnu packages xml)) - -(define-public samba-mod - (package/inherit samba - (name "samba-mod") - ;; (arguments - ;; `(#:make-flags '("TEST_OPTIONS=--quick") ;some tests are very long - ;; #:phases - ;; (modify-phases %standard-phases - ;; (add-before 'configure 'setup-docbook-stylesheets - ;; (lambda* (#:key inputs #:allow-other-keys) - ;; ;; Append Samba's own DTDs to XML_CATALOG_FILES - ;; ;; (c.f. docs-xml/build/README). - ;; (copy-file "docs-xml/build/catalog.xml.in" - ;; "docs-xml/build/catalog.xml") - ;; (substitute* "docs-xml/build/catalog.xml" - ;; (("/@abs_top_srcdir@") - ;; (string-append (getcwd) "/docs-xml"))) - ;; ;; Honor XML_CATALOG_FILES. - ;; (substitute* "buildtools/wafsamba/wafsamba.py" - ;; (("XML_CATALOG_FILES=\"\\$\\{SAMBA_CATALOGS\\}" all) - ;; (string-append all " $XML_CATALOG_FILES"))) - ;; #t)) - ;; (replace 'configure - ;; ;; Samba uses a custom configuration script that runs WAF. - ;; (lambda* (#:key outputs #:allow-other-keys) - ;; (let* ((out (assoc-ref outputs "out")) - ;; (libdir (string-append out "/lib"))) - ;; (invoke "./configure" - ;; "--enable-selftest" - ;; "--enable-fhs" - ;; (string-append "--prefix=" out) - ;; "--sysconfdir=/etc" - ;; "--localstatedir=/var" - ;; ;; Install public and private libraries into - ;; ;; a single directory to avoid RPATH issues. - ;; (string-append "--libdir=" libdir) - ;; (string-append "--with-privatelibdir=" libdir) - ;; ;; Build samba instead with mit-krb5 - ;; "--with-system-mitkrb5" - ;; (string-append "--with-system-mitkdc=" - ;; (assoc-ref %build-inputs "mit-krb5")) - ;; "--with-experimental-mit-ad-dc")))) - ;; (add-before 'install 'disable-etc,var-samba-directories-setup - ;; (lambda _ - ;; (substitute* "dynconfig/wscript" - ;; (("bld\\.INSTALL_DIR.*") "")) - ;; #t)) - ;; (add-after 'install 'wrap-program - ;; ;; Some samba tools selectively fail to find talloc, tdb - ;; ;; and dnspython. - ;; (lambda* (#:key inputs outputs #:allow-other-keys) - ;; (let ((out (string-append (assoc-ref outputs "out"))) - ;; (talloc (string-append (assoc-ref inputs "talloc") - ;; "/lib/python3.9/site-packages")) - ;; (tdb (string-append (assoc-ref inputs "tdb") - ;; "/lib/python3.9/site-packages")) - ;; (python-dnspython (string-append - ;; (assoc-ref inputs "python-dnspython") - ;; "/lib/python3.9/site-packages"))) - ;; (for-each - ;; (lambda (bin) - ;; (wrap-program (string-append out bin) - ;; `("PYTHONPATH" prefix (,talloc ,tdb ,python-dnspython)))) - ;; '("/bin/samba-tool" - ;; "/sbin/samba-gpupdate" - ;; "/sbin/samba_dnsupdate" - ;; "/sbin/samba_downgrade_db" - ;; "/sbin/samba_kcc" - ;; "/sbin/samba_spnupdate" - ;; "/sbin/samba_upgradedns")))))) - ;; ;; FIXME: The test suite seemingly hangs after failing to provision the - ;; ;; test environment. - ;; #:tests? #f)) - (inputs (modify-inputs (package-inputs samba) - (append avahi - ;; mit-krb5 ;new! - ;; python-dnspython ;add missing dns module - ))))) -- cgit v1.2.3