This tarball disappeared upstream. * gnu/packages/time.scm (datefudge)[source]: Add backup URI.
		
			
				
	
	
		
			542 lines
		
	
	
	
		
			19 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
			
		
		
	
	
			542 lines
		
	
	
	
		
			19 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
;;; GNU Guix --- Functional package management for GNU
 | 
						|
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
 | 
						|
;;; Copyright © 2013, 2017, 2020, 2021 Ludovic Courtès <ludo@gnu.org>
 | 
						|
;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
 | 
						|
;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2021 Efraim Flashner <efraim@flashner.co.il>
 | 
						|
;;; Copyright © 2015, 2017 Leo Famulari <leo@famulari.name>
 | 
						|
;;; Copyright © 2015, 2017 Cyril Roelandt <tipecaml@gmail.com>
 | 
						|
;;; Copyright © 2016 Sou Bunnbu <iyzsong@gmail.com>
 | 
						|
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
 | 
						|
;;; Copyright © 2016 Danny Milosavljevic <dannym+a@scratchpost.org>
 | 
						|
;;; Copyright © 2016, 2020 Marius Bakke <mbakke@fastmail.com>
 | 
						|
;;; Copyright © 2016, 2017, 2018, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
 | 
						|
;;; Copyright © 2017 Ben Woodcroft <donttrustben@gmail.com>
 | 
						|
;;; Copyright © 2017 Nikita <nikita@n0.is>
 | 
						|
;;; Copyright © 2017 Julien Lepiller <julien@lepiller.eu>
 | 
						|
;;; Copyright © 2018 Alex Vong <alexvong1995@gmail.com>
 | 
						|
;;; Copyright © 2019 Kyle Meyer <kyle@kyleam.com>
 | 
						|
;;; Copyright © 2019 Pierre Langlois <pierre.langlois@gmx.com>
 | 
						|
;;; Copyright © 2020 Lars-Dominik Braun <ldb@leibniz-psychology.org>
 | 
						|
;;; Copyright © 2020 Tanguy Le Carrour <tanguy@bioneland.org>
 | 
						|
;;; Copyright © 2021 Ryan Prior <rprior@protonmail.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 time)
 | 
						|
  #:use-module (gnu packages check)
 | 
						|
  #:use-module (gnu packages compression)
 | 
						|
  #:use-module (gnu packages golang)
 | 
						|
  #:use-module (gnu packages perl)
 | 
						|
  #:use-module (gnu packages python)
 | 
						|
  #:use-module (gnu packages python-xyz)
 | 
						|
  #:use-module (gnu packages terminals)
 | 
						|
  #:use-module (gnu packages textutils)
 | 
						|
  #:use-module (gnu packages)
 | 
						|
  #:use-module (guix build-system gnu)
 | 
						|
  #:use-module (guix build-system go)
 | 
						|
  #:use-module (guix build-system python)
 | 
						|
  #:use-module (guix download)
 | 
						|
  #:use-module (guix git-download)
 | 
						|
  #:use-module (guix licenses)
 | 
						|
  #:use-module (guix packages))
 | 
						|
 | 
						|
(define-public time
 | 
						|
  (package
 | 
						|
    (name "time")
 | 
						|
    (version "1.9")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
      (method url-fetch)
 | 
						|
      (uri (string-append "mirror://gnu/time/time-"
 | 
						|
                          version ".tar.gz"))
 | 
						|
      (sha256
 | 
						|
       (base32
 | 
						|
        "07jj7cz6lc13iqrpgn81ivqh8rkm73p4rnivwgrrshk23v4g1b7v"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (home-page "https://www.gnu.org/software/time/")
 | 
						|
    (synopsis "Run a command, then display its resource usage")
 | 
						|
    (description
 | 
						|
     "Time is a command that displays information about the resources that a
 | 
						|
program uses.  The display output of the program can be customized or saved
 | 
						|
to a file.")
 | 
						|
    (license gpl3+)))
 | 
						|
 | 
						|
(define-public python-pytimeparse
 | 
						|
  (package
 | 
						|
    (name "python-pytimeparse")
 | 
						|
    (version "1.1.8")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "pytimeparse" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "02kaambsgpjx3zi42j6l11rwms2p35b9hsk4f3kdf979gd3kcqg8"))))
 | 
						|
    (native-inputs
 | 
						|
     (list python-nose))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (home-page "https://github.com/wroberts/pytimeparse")
 | 
						|
    (synopsis "Time expression parser")
 | 
						|
    (description "This small Python module parses various kinds of time
 | 
						|
expressions.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python-pytzdata
 | 
						|
  (package
 | 
						|
    (name "python-pytzdata")
 | 
						|
    (version "2020.1")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "pytzdata" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "0h0md0ldhb8ghlwjslkzh3wcj4fxg3n43bj5sghqs2m06nri7yiy"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    ;; XXX: The PyPI distribution contains no tests, and the upstream
 | 
						|
    ;; repository lacks a setup.py!  How to build from git?
 | 
						|
    (arguments '(#:tests? #f))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-cleo))
 | 
						|
    (home-page "https://github.com/sdispater/pytzdata")
 | 
						|
    (synopsis "Timezone database for Python")
 | 
						|
    (description
 | 
						|
     "This library provides a timezone database for Python.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python2-tzdata
 | 
						|
  (package-with-python2 python-pytzdata))
 | 
						|
 | 
						|
(define-public python-pytz
 | 
						|
  (package
 | 
						|
    (name "python-pytz")
 | 
						|
    ;; This package should be kept in sync with tzdata in (gnu packages base).
 | 
						|
    (version "2021.1")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
      (method url-fetch)
 | 
						|
      (uri (pypi-uri "pytz" version))
 | 
						|
      (sha256
 | 
						|
       (base32
 | 
						|
        "1nn459q7zg20n75akxl3ljkykgw1ydc8nb05rx1y4f5zjh4ak943"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (home-page "http://pythonhosted.org/pytz")
 | 
						|
    (synopsis "Python timezone library")
 | 
						|
    (description "This library brings the Olson tz database into Python.  It
 | 
						|
allows accurate and cross platform timezone calculations using Python 2.4 or
 | 
						|
higher.  It also solves the issue of ambiguous times at the end of daylight
 | 
						|
saving time.  Almost all of the Olson timezones are supported.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python2-pytz
 | 
						|
  (package-with-python2 python-pytz))
 | 
						|
 | 
						|
(define-public python-pendulum
 | 
						|
  (package
 | 
						|
    (name "python-pendulum")
 | 
						|
    (version "2.1.2")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "pendulum" version))
 | 
						|
       (sha256
 | 
						|
        (base32 "01zjc245w08j0xryrgrq9vng59q1cl5ry0hcpw5rj774pyhhqsmh"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    ;; XXX: The PyPI distribution lacks tests, and the upstream repository
 | 
						|
    ;; lacks a setup.py!
 | 
						|
    (arguments '(#:tests? #f))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-dateutil python-pytzdata))
 | 
						|
    (home-page "https://github.com/sdispater/pendulum")
 | 
						|
    (synopsis "Alternate API for Python datetimes")
 | 
						|
    (description "Pendulum is a drop-in replacement for the standard
 | 
						|
@{datetime} class, providing an alternative API.  As it inherits from the
 | 
						|
standard @code{datetime} all @code{datetime} instances can be replaced by
 | 
						|
Pendulum instances.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python-dateutil
 | 
						|
  (package
 | 
						|
    (name "python-dateutil")
 | 
						|
    (version "2.8.2")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "python-dateutil" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "11iy7m4bp2lgfkcl0r6xzf34bvk7ppjmsyn2ygfikbi72v6cl8q1"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:phases (modify-phases %standard-phases
 | 
						|
                  (replace 'check
 | 
						|
                    (lambda _
 | 
						|
                      ;; Delete tests that depend on "freezegun" to avoid a
 | 
						|
                      ;; circular dependency.
 | 
						|
                      (delete-file "dateutil/test/test_utils.py")
 | 
						|
                      (delete-file "dateutil/test/test_rrule.py")
 | 
						|
 | 
						|
                      ;; XXX: Fails to get timezone from /etc/localtime.
 | 
						|
                      (delete-file "dateutil/test/test_tz.py")
 | 
						|
 | 
						|
                      (invoke "pytest" "-vv"))))))
 | 
						|
    (native-inputs
 | 
						|
     (list python-pytest python-pytest-cov python-setuptools-scm))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-six))
 | 
						|
    (home-page "https://dateutil.readthedocs.io/en/stable/")
 | 
						|
    (synopsis "Extensions to the standard datetime module")
 | 
						|
    (description
 | 
						|
     "The dateutil module provides powerful extensions to the standard
 | 
						|
datetime module, available in Python 2.3+.")
 | 
						|
    ;; The license was changed from the three-clause BSD license to a dual
 | 
						|
    ;; Apache 2.0/BSD-3 variant at 2017-12-01.  Some code is only available as
 | 
						|
    ;; BSD-3 still; but all new code is dual licensed (the user can choose).
 | 
						|
    (license (list bsd-3 asl2.0))))
 | 
						|
 | 
						|
(define-public python2-dateutil
 | 
						|
  (package-with-python2 python-dateutil))
 | 
						|
 | 
						|
(define-public python-parsedatetime
 | 
						|
  (package
 | 
						|
    (name "python-parsedatetime")
 | 
						|
    (version "2.4")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "parsedatetime" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "0jxqkjks7z9dn222cqgvskp4wr6d92aglinxq7pd2w4mzdc7r09x"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (native-inputs
 | 
						|
     (list python-nose python-pyicu python-pytest python-pytest-runner))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-future))
 | 
						|
    (home-page "https://github.com/bear/parsedatetime/")
 | 
						|
    (synopsis "Parse human-readable date/time text")
 | 
						|
    (description
 | 
						|
     "Parse human-readable date/time text.")
 | 
						|
    (license asl2.0)))
 | 
						|
 | 
						|
(define-public python2-parsedatetime
 | 
						|
  (package-with-python2 python-parsedatetime))
 | 
						|
 | 
						|
(define-public python-ciso8601
 | 
						|
  (package
 | 
						|
    (name "python-ciso8601")
 | 
						|
    (version "2.1.3")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method git-fetch)
 | 
						|
       ;; The PyPi distribution doesn't include the tests.
 | 
						|
       (uri (git-reference
 | 
						|
             (url "https://github.com/closeio/ciso8601")
 | 
						|
             (commit (string-append "v" version))))
 | 
						|
       (file-name (git-file-name name version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "0g1aiyc1ayh0rnibyy416m5mmck38ksgdm3jsy0z3rxgmgb24951"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    ;; Pytz should only be required for Python 2, but the test suite fails
 | 
						|
    ;; without it.
 | 
						|
    (native-inputs
 | 
						|
     (list python-pytz))
 | 
						|
    (home-page "https://github.com/closeio/ciso8601")
 | 
						|
    (synopsis
 | 
						|
     "Fast ISO8601 date time parser")
 | 
						|
    (description
 | 
						|
     "The package ciso8601 converts ISO 8601 or RFC 3339 date time strings into
 | 
						|
Python datetime objects.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python-tzlocal
 | 
						|
  (package
 | 
						|
    (name "python-tzlocal")
 | 
						|
    (version "2.1")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "tzlocal" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "0i1fm4sl04y65qnaqki0w75j34w863gxjj8ag0vwgvaa572rfg34"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:phases
 | 
						|
       (modify-phases %standard-phases
 | 
						|
         (add-before 'check 'fix-symlink-test
 | 
						|
           ;; see: https://github.com/regebro/tzlocal/issues/53
 | 
						|
           (lambda _
 | 
						|
             (delete-file "tests/test_data/symlink_localtime/etc/localtime")
 | 
						|
             (symlink "../usr/share/zoneinfo/Africa/Harare"
 | 
						|
                      "tests/test_data/symlink_localtime/etc/localtime")
 | 
						|
             ;; And skip the test_fail test, it is known to fail
 | 
						|
             (substitute* "tests/tests.py"
 | 
						|
               (("def test_fail") "def _test_fail"))
 | 
						|
             #t)))))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-pytz))
 | 
						|
    (native-inputs
 | 
						|
     (list python-mock))
 | 
						|
    (home-page "https://github.com/regebro/tzlocal")
 | 
						|
    (synopsis "Local timezone information for Python")
 | 
						|
    (description
 | 
						|
     "Tzlocal returns a tzinfo object with the local timezone information.
 | 
						|
This module attempts to fix a glaring hole in pytz, that there is no way to
 | 
						|
get the local timezone information, unless you know the zoneinfo name, and
 | 
						|
under several distributions that's hard or impossible to figure out.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python-isodate
 | 
						|
  (package
 | 
						|
    (name "python-isodate")
 | 
						|
    (version "0.6.0")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "isodate" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "1n7jkz68kk5pwni540pr5zdh99bf6ywydk1p5pdrqisrawylldif"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (native-inputs
 | 
						|
     (list python-six))
 | 
						|
    (home-page "https://github.com/gweis/isodate/")
 | 
						|
    (synopsis "Python date parser and formatter")
 | 
						|
    (description
 | 
						|
     "Python-isodate is a python module for parsing and formatting
 | 
						|
ISO 8601 dates, time and duration.")
 | 
						|
    (license bsd-3)))
 | 
						|
 | 
						|
(define-public python2-isodate
 | 
						|
  (package-with-python2 python-isodate))
 | 
						|
 | 
						|
(define-public python-iso8601
 | 
						|
  (package
 | 
						|
    (name "python-iso8601")
 | 
						|
    (version "0.1.13")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "iso8601" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "1cgfj91khil4ii5gb8s6nxwm73vx7hqc2k79dd9d8990ylmc5ppp"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (arguments
 | 
						|
     '(#:phases (modify-phases %standard-phases
 | 
						|
                  (replace 'check
 | 
						|
                    (lambda _
 | 
						|
                      (invoke "pytest" "-vv" "iso8601"))))))
 | 
						|
    (native-inputs
 | 
						|
     (list python-pytest))
 | 
						|
    (home-page "https://bitbucket.org/micktwomey/pyiso8601")
 | 
						|
    (synopsis "Module to parse ISO 8601 dates")
 | 
						|
    (description
 | 
						|
     "This module parses the most common forms of ISO 8601 date strings (e.g.
 | 
						|
@code{2007-01-14T20:34:22+00:00}) into @code{datetime} objects.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python2-iso8601
 | 
						|
  (package-with-python2 python-iso8601))
 | 
						|
 | 
						|
(define-public python-monotonic
 | 
						|
  (package
 | 
						|
    (name "python-monotonic")
 | 
						|
    (version "1.5")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "monotonic" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "1c6z46yb600klbfhqadyl7vq0jdjdxkm72k43ra3iw3d0xakv593"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (arguments '(#:tests? #f))          ; no tests
 | 
						|
    (home-page "https://github.com/atdt/monotonic")
 | 
						|
    (synopsis "Implementation of time.monotonic() for Python 2 & < 3.3")
 | 
						|
    (description
 | 
						|
     "This module provides a @code{monotonic()} function which returns the
 | 
						|
value (in fractional seconds) of a clock which never goes backwards.")
 | 
						|
    (license asl2.0)))
 | 
						|
 | 
						|
(define-public python2-monotonic
 | 
						|
  (package-with-python2 python-monotonic))
 | 
						|
 | 
						|
(define-public python-pyrfc3339
 | 
						|
  (package
 | 
						|
    (name "python-pyrfc3339")
 | 
						|
    (version "1.1")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "pyRFC3339" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "06jv7ar7lpvvk0dixzwdr3wgm0g1lipxs429s2z7knwwa7hwpf41"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-pytz))
 | 
						|
    (native-inputs
 | 
						|
     (list python-nose))
 | 
						|
    (home-page "https://github.com/kurtraschke/pyRFC3339")
 | 
						|
    (synopsis "Python timestamp library")
 | 
						|
    (description "Python library for generating and parsing RFC 3339-compliant
 | 
						|
timestamps.")
 | 
						|
    (license expat)))
 | 
						|
 | 
						|
(define-public python2-pyrfc3339
 | 
						|
  (package-with-python2 python-pyrfc3339))
 | 
						|
 | 
						|
(define-public python-arrow
 | 
						|
  (package
 | 
						|
    (name "python-arrow")
 | 
						|
    (version "1.1.1")
 | 
						|
    (source (origin
 | 
						|
              (method url-fetch)
 | 
						|
              (uri (pypi-uri "arrow" version))
 | 
						|
              (sha256
 | 
						|
               (base32
 | 
						|
                "0fl24gv7jc6b9pqxwlcgrf465i8v8h0y7dcm018yrqv0dhpn1ryy"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:phases
 | 
						|
       (modify-phases %standard-phases
 | 
						|
         (replace 'check
 | 
						|
           (lambda* (#:key tests? #:allow-other-keys)
 | 
						|
             (when tests?
 | 
						|
               (invoke "pytest" "-vv" "tests"
 | 
						|
                       ;; python-dateutil doesn't recognize America/Nuuk.
 | 
						|
                       ;; Remove when python-dateutil > 2.8.1.
 | 
						|
                       "-k" "not test_parse_tz_name_zzz")))))))
 | 
						|
    (native-inputs
 | 
						|
     (list ;; For testing
 | 
						|
           python-chai
 | 
						|
           python-pytest
 | 
						|
           python-pytest-cov
 | 
						|
           python-pytest-mock
 | 
						|
           python-pytz
 | 
						|
           python-simplejson))
 | 
						|
    (propagated-inputs
 | 
						|
     (list python-dateutil))
 | 
						|
    (home-page "https://github.com/arrow-py/arrow")
 | 
						|
    (synopsis "Dates and times for Python")
 | 
						|
    (description
 | 
						|
     "Arrow is a Python library to creating, manipulating, formatting and
 | 
						|
converting dates, times, and timestamps.  It implements and updates the
 | 
						|
datetime type.")
 | 
						|
    (license asl2.0)))
 | 
						|
 | 
						|
(define-public python-aniso8601
 | 
						|
  (package
 | 
						|
    (name "python-aniso8601")
 | 
						|
    (version "9.0.1")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri (pypi-uri "aniso8601" version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "0wxry6riyqajl02mkad8g2q98sx5jr13zndj3fandpzfcxv13qvj"))))
 | 
						|
    (build-system python-build-system)
 | 
						|
    (home-page "https://bitbucket.org/nielsenb/aniso8601")
 | 
						|
    (synopsis "Python library for parsing ISO 8601 strings")
 | 
						|
    (description
 | 
						|
     "This package contains a library for parsing ISO 8601 datetime strings.")
 | 
						|
    (license bsd-3)))
 | 
						|
 | 
						|
(define-public python2-aniso8601
 | 
						|
  (package-with-python2 python-aniso8601))
 | 
						|
 | 
						|
(define-public datefudge
 | 
						|
  (package
 | 
						|
    (name "datefudge")
 | 
						|
    ;; XXX When updating this package, make sure to do something about the
 | 
						|
    ;; archive.org backup URI.
 | 
						|
    (version "1.23")
 | 
						|
    (source (origin
 | 
						|
              ;; Source code is available from
 | 
						|
              ;; <https://salsa.debian.org/debian/datefudge.git>.  However,
 | 
						|
              ;; for bootstrapping reasons, we do not rely on 'git-fetch' here
 | 
						|
              ;; (since Git -> GnuTLS -> datefudge).
 | 
						|
              (method url-fetch)
 | 
						|
              (uri (list
 | 
						|
                     ;; For some reason this tarball was removed from Debian's
 | 
						|
                     ;; servers. Remove this archive.org URL when updating
 | 
						|
                     ;; datefudge, or add the new tarball to archive.org and
 | 
						|
                     ;; update the URL.
 | 
						|
                     (string-append
 | 
						|
                       "https://archive.org/download/datefudge_" version
 | 
						|
                       ".tar_202112/" "datefudge_" version ".tar.xz")
 | 
						|
                     (string-append
 | 
						|
                      "mirror://debian/pool/main/d/datefudge/datefudge_"
 | 
						|
                      version ".tar.xz")))
 | 
						|
              (sha256
 | 
						|
               (base32
 | 
						|
                "0ifnlb0mc8qc2kb5042pbz0ns6rwcb7201di8wyrsphl0yhnhxiv"))
 | 
						|
              (patches (search-patches "datefudge-gettimeofday.patch"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:test-target "test"
 | 
						|
       #:make-flags (list "CC=gcc"
 | 
						|
                          (string-append "prefix=" (assoc-ref %outputs "out")))
 | 
						|
       #:phases
 | 
						|
       (modify-phases %standard-phases
 | 
						|
         (add-after 'unpack 'patch-makefile
 | 
						|
           (lambda _
 | 
						|
             (substitute* "Makefile"
 | 
						|
               ((" -o root -g root") "")
 | 
						|
               (("VERSION := \\$\\(shell dpkg-parsechangelog .*")
 | 
						|
                (string-append "VERSION = " ,version)))
 | 
						|
             #t))
 | 
						|
         (delete 'configure))))
 | 
						|
    (native-inputs
 | 
						|
     (list perl))
 | 
						|
    (home-page "https://salsa.debian.org/debian/datefudge")
 | 
						|
    (synopsis "Pretend the system date is different")
 | 
						|
    (description
 | 
						|
     "Utility that fakes the system time by pre-loading a small library that
 | 
						|
modifies the @code{time}, @code{gettimeofday} and @code{clock_gettime} system
 | 
						|
calls.")
 | 
						|
    (license gpl2)))
 | 
						|
 | 
						|
(define-public countdown
 | 
						|
  (package
 | 
						|
    (name "countdown")
 | 
						|
    (version "1.0.0")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method git-fetch)
 | 
						|
       (uri (git-reference
 | 
						|
             (url "https://github.com/antonmedv/countdown")
 | 
						|
             (commit (string-append "v" version))))
 | 
						|
       (file-name (git-file-name name version))
 | 
						|
       (sha256
 | 
						|
        (base32 "0pdaw1krr0bsl4amhwx03v2b02iznvwvqn7af5zp4fkzjaj14cdw"))))
 | 
						|
    (build-system go-build-system)
 | 
						|
    (arguments
 | 
						|
     '(#:import-path "github.com/antonmedv/countdown"))
 | 
						|
    (native-inputs
 | 
						|
     `(("runewidth" ,go-github.com-mattn-go-runewidth)
 | 
						|
       ("termbox" ,go-github.com-nsf-termbox-go)))
 | 
						|
    (home-page "https://github.com/antonmedv/countdown")
 | 
						|
    (synopsis "Counts to zero with a text user interface")
 | 
						|
    (description
 | 
						|
     "Countdown provides a fancy text display while it counts down to zero
 | 
						|
from a starting point you provide.  The user can pause and resume the
 | 
						|
countdown from the text user interface.")
 | 
						|
    (license expat)))
 |