mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-15 03:15:09 -05:00
1a619b7182
* gnu/packages/skarnet.scm (execline)[arguments]: Patch tools/install.sh umask. Change-Id: I1e5d2497e1fd2ad8a39a5e1ca1c3c409968204a8
370 lines
16 KiB
Scheme
370 lines
16 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
||
;;; Copyright © 2015 Claes Wallin <claes.wallin@greatsinodevelopment.com>
|
||
;;; Copyright © 2016 Eric Le Bihan <eric.le.bihan.dev@free.fr>
|
||
;;; Copyright © 2017 Z. Ren <zren@dlut.edu.cn>
|
||
;;; Copyright © 2018–2021 Tobias Geerinckx-Rice <me@tobias.gr>
|
||
;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com>
|
||
;;;
|
||
;;; 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 <http://www.gnu.org/licenses/>.
|
||
|
||
(define-module (gnu packages skarnet)
|
||
#:use-module (gnu packages)
|
||
#:use-module (guix licenses)
|
||
#:use-module (guix packages)
|
||
#:use-module (guix download)
|
||
#:use-module (guix build-system gnu))
|
||
|
||
(define-public skalibs
|
||
(package
|
||
(name "skalibs")
|
||
(version "2.13.1.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/skalibs/skalibs-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0cwy37cc92409dsmj8c8whpnnqd9g375myxlp52aqzwzg6ms2wmj"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:tests? #f ; no tests exist
|
||
#:phases (modify-phases %standard-phases
|
||
(add-after 'unpack 'patch
|
||
(lambda _
|
||
;; This umask makes the symlinks in lib readable on
|
||
;; i586-gnu
|
||
(substitute* "tools/install.sh"
|
||
(("umask 077") "umask 033"))
|
||
;; Sort source files deterministically so that the *.a
|
||
;; and *.so files are reproducible.
|
||
(substitute* "Makefile"
|
||
(("\\$\\(wildcard src/lib\\*/\\*.c\\)")
|
||
"$(sort $(wildcard src/lib*/*.c))")))))))
|
||
(home-page "https://skarnet.org/software/skalibs/")
|
||
(synopsis "Platform abstraction libraries for skarnet.org software")
|
||
(description
|
||
"This package provides lightweight C libraries isolating the developer
|
||
from portability issues, providing a unified systems API on all platforms,
|
||
including primitive data types, cryptography, and POSIX concepts like sockets
|
||
and file system operations. It is used by all skarnet.org software.")
|
||
(license isc)))
|
||
|
||
(define-public execline
|
||
(package
|
||
(name "execline")
|
||
(version "2.9.3.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/execline/execline-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1393xka069n3rvc3dlg6c3ckzl1qgqkhvhlcxv6igl9216kpy0n8"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:phases (modify-phases %standard-phases
|
||
(add-after 'unpack 'patch
|
||
(lambda _
|
||
;; This umask makes the symlinks in lib readable on
|
||
;; i586-gnu
|
||
(substitute* "tools/install.sh"
|
||
(("umask 077") "umask 033"))))
|
||
(add-after
|
||
'install 'post-install
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(bin (string-append out "/bin")))
|
||
(wrap-program (string-append bin "/execlineb")
|
||
`("PATH" ":" prefix (,bin)))))))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/execline/")
|
||
(license isc)
|
||
(synopsis "Non-interactive shell-like language with minimal overhead")
|
||
(description
|
||
"Execline is a (non-interactive) scripting language, separated into a
|
||
parser (execlineb) and a set of commands meant to execute one another in a
|
||
chain-execution fashion, storing the whole script in the argument array.
|
||
It features conditional loops, getopt-style option handling, file name
|
||
globbing, redirection and other shell concepts, expressed as discrete commands
|
||
rather than in special syntax, minimizing runtime footprint and
|
||
complexity.")))
|
||
|
||
(define-public s6
|
||
(package
|
||
(name "s6")
|
||
(version "2.11.3.2")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/s6/s6-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0x6zjc3126fjhj8accyxgrw7r7ysrb7d13dfs87bxzzhsa5165kw"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs execline))
|
||
(arguments
|
||
`(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "execline")
|
||
"/lib/execline")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f ; no tests exist
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'install 'install-doc
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(doc (string-append out "/share/doc/s6-" ,version)))
|
||
(copy-recursively "doc" doc)))))))
|
||
(home-page "https://skarnet.org/software/s6")
|
||
(license isc)
|
||
(synopsis "Small suite of programs for process supervision")
|
||
(description
|
||
"s6 is a small suite of programs for UNIX, designed to allow process
|
||
supervision (a.k.a. service supervision), in the line of daemontools and
|
||
runit, as well as various operations on processes and daemons. It is meant to
|
||
be a toolbox for low-level process and service administration, providing
|
||
different sets of independent tools that can be used within or without the
|
||
framework, and that can be assembled together to achieve powerful
|
||
functionality with a very small amount of code.")))
|
||
|
||
(define-public s6-dns
|
||
(package
|
||
(name "s6-dns")
|
||
(version "2.3.5.5")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/s6-dns/s6-dns-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1s0yzrzpjgbf1d0s4qxq5g2sgcm6skq3sphbm1qq1hr5a5frp5sn"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-dns")
|
||
(license isc)
|
||
(synopsis "Suite of DNS client programs")
|
||
(description
|
||
"s6-dns is a suite of DNS client programs and libraries for Unix systems,
|
||
as an alternative to the BIND, djbdns or other DNS clients.")))
|
||
|
||
(define-public s6-networking
|
||
(package
|
||
(name "s6-networking")
|
||
(version "2.5.1.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/s6-networking/"
|
||
"s6-networking-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0xz98pzgx6kc9v1dka04gzw5f3rwww42c07liym0r7pzb74l77m0"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs execline s6 s6-dns))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "execline")
|
||
"/lib/execline")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "s6")
|
||
"/lib/s6")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "s6-dns")
|
||
"/lib/s6-dns")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-networking")
|
||
(license isc)
|
||
(synopsis "Suite of network utilities for Unix systems")
|
||
(description
|
||
"s6-networking is a suite of small networking utilities for Unix systems.
|
||
It includes command-line client and server management, TCP access control,
|
||
privilege escalation across UNIX domain sockets, IDENT protocol management and
|
||
clock synchronization.")))
|
||
|
||
(define-public s6-rc
|
||
(package
|
||
(name "s6-rc")
|
||
(version "0.5.4.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://skarnet.org/software/s6-rc/s6-rc-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1xjqc6vqqny8g47whgibjlas7f6szka372jrz5f308slgjmqq9np"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs execline s6))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "execline")
|
||
"/lib/execline")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "s6")
|
||
"/lib/s6")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-rc")
|
||
(license isc)
|
||
(synopsis "Service manager for s6-based systems")
|
||
(description
|
||
"s6-rc is a service manager for s6-based systems, i.e. a suite of
|
||
programs that can start and stop services, both long-running daemons and
|
||
one-time initialization scripts, in the proper order according to a dependency
|
||
tree. It ensures that long-running daemons are supervised by the s6
|
||
infrastructure, and that one-time scripts are also run in a controlled
|
||
environment.")))
|
||
|
||
(define-public s6-portable-utils
|
||
(package
|
||
(name "s6-portable-utils")
|
||
(version "2.3.0.2")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://skarnet.org/software/s6-portable-utils/s6-portable-utils-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1s6iqjz2mfq3rakqj3cwidjsbpkjcdjfah60m86na4ph6j8jc547"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-portable-utils")
|
||
(license isc)
|
||
(synopsis "Tiny command-line Unix utilities")
|
||
(description
|
||
"s6-portable-utils is a set of tiny general Unix utilities, often
|
||
performing well-known tasks such as @command{cut} and @command{grep}, but
|
||
optimized for simplicity and small size. They were designed for embedded
|
||
systems and other constrained environments, but they work everywhere.")))
|
||
|
||
(define-public s6-linux-init
|
||
(package
|
||
(name "s6-linux-init")
|
||
(version "1.1.1.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://skarnet.org/software/s6-linux-init/s6-linux-init-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1vm8aqlh8jkqrm3irhf53vvylxqizpqvjg3yb9z00yb568skyj5d"))))
|
||
(build-system gnu-build-system)
|
||
(inputs
|
||
(list execline s6 skalibs))
|
||
(arguments
|
||
'(#:configure-flags
|
||
(list
|
||
"--disable-static"
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "execline")
|
||
"/lib/execline")
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "s6")
|
||
"/lib/s6")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-linux-init")
|
||
(license isc)
|
||
(synopsis "Minimalistic tools to create an s6-based init system on Linux")
|
||
(description
|
||
"s6-linux-init is a set of minimalistic tools to create a s6-based init
|
||
system, including an @command{/sbin/init} binary, on a Linux kernel.
|
||
|
||
It is meant to automate creation of scripts revolving around the use of other
|
||
skarnet.org tools, especially s6, in order to provide a complete booting
|
||
environment with integrated supervision and logging without having to hand-craft
|
||
all the details.")))
|
||
|
||
(define-public s6-linux-utils
|
||
(package
|
||
(name "s6-linux-utils")
|
||
(version "2.6.1.2")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://skarnet.org/software/s6-linux-utils/s6-linux-utils-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1ncwkm5cpc0y6iysc5q64mk0pfvxnn7ihia1a137xrrdg1fxqqyq"))))
|
||
(build-system gnu-build-system)
|
||
(inputs (list skalibs))
|
||
(arguments
|
||
'(#:configure-flags (list
|
||
(string-append "--with-lib="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs")
|
||
(string-append "--with-sysdeps="
|
||
(assoc-ref %build-inputs "skalibs")
|
||
"/lib/skalibs/sysdeps"))
|
||
#:tests? #f)) ; no tests exist
|
||
(home-page "https://skarnet.org/software/s6-linux-utils")
|
||
(license isc)
|
||
(synopsis "Set of minimalistic Linux-specific system utilities")
|
||
(description
|
||
"s6-linux-utils is a set of minimalistic Linux-specific system utilities,
|
||
such as @command{mount}, @command{umount}, and @command{chroot} commands,
|
||
Linux uevent listeners, a @command{devd} device hotplug daemon, and more.")))
|