aboutsummaryrefslogtreecommitdiff
# This list is used to avoid multiple name/email instances of the same
# contributors reported by "git log" and "git shortlog" commands.

Adriano Peluso <catonano@gmail.com>
Al McElrath <hello@yrns.org> <hello@atonesir.com>
Alex Sassmannshausen <alex@pompo.co> <alex.sassmannshausen@gmail.com>
Alexander I. Grafov <grafov@gmail.com>
Alírio Eyng <alirioeyng@gmail.com>
Amin Bandali <bandali@gnu.org> <mab@gnu.org>
Amirouche Boubekki <amirouche@hypermove.net>
Andreas Enge <andreas@enge.fr> <andreas.enge@inria.fr>
Andreas Enge <andreas@enge.fr> <privat@xobs-novena>
Andy Wingo <wingo@igalia.com> <wingo@pobox.com>
Ben Woodcroft <donttrustben@gmail.com>
Ben Woodcroft <donttrustben@gmail.com> <b.woodcroft@uq.edu.au>
Ben Woodcroft <donttrustben@gmail.com> <donttrustben near gmail.com>
Brett Gilio <brettg@gnu.org> <brettg@posteo.net>
Christine Lemmer-Webber <cwebber@dustycloud.org>
Claes Wallin (韋嘉誠) <claes.wallin@greatsinodevelopment.com>
Cyprien Nicolas <cyprien@nicolas.tf> <c.nicolas+gitorious@gmail.com>
Daniel Pimentel <d4n1@d4n1.org> <d4n1@member.fsf.org>
Danny Milosavljevic <dannym@scratchpost.org> <dannym+a@scratchpost.org>
David Hashe <david.hashe@dhashe.com> <address@hidden>
David Thompson <davet@gnu.org> <dthompson2@worcester.edu>
David Thompson <davet@gnu.org> <dthompson@member.fsf.org>
David Thompson <davet@gnu.org> <dthompson@vistahigherlearning.com>
Deck Pickard <deck.r.pickard@gmail.com> <nebu@kipple>
Eric Bavier <bavier@posteo.net> <ericbavier@gmail.com>
Eric Bavier <bavier@posteo.net> <bavier@member.fsf.org>
Eric Dvorsak <eric@dvorsak.fr> <yenda1@gmail.com>
Evgeny Pisemsky <mail@pisemsky.site> <evgeny@pisemsky.com>
George Clemmer <myglc2@gmail.com>
ison <ison@airmail.cc> <ison111@protonmail.com>
Ivan Vilata i Balaguer <ivan@selidor.net>
Jakob L. Kreuze <zerodaysfordays@sdf.org> <zerodaysfordays@sdf.lonestar.org>
Jeff Mickey <j@codemac.net> <jm@igneous.io>
John Darrington <jmd@gnu.org> <john@darrington.wattle.id.au>
John J. Foerch <jjfoerch@earthlink.net>
Joshua Grant <tadni@riseup.net> <gzg@riseup.net>
Joshua Grant <tadni@riseup.net> <jgrant@parenthetical.io>
Joshua Grant <tadni@riseup.net> <tadnimi@gmail.com>
Joshua Grant <tadni@riseup.net> <youlysses@riseup.net>
Juliana Sims <juli@incana.org> <jtsims@protonmail.com>
Kei Kebreau <kkebreau@posteo.net>
Leo Famulari <leo@famulari.name> <lfamular@gmail.com>
Liliana Marie Prikler <liliana.prikler@gmail.com>
Liliana Marie Prikler <liliana.prikler@gmail.com> Leo Prikler <leo.prikler@student.tugraz.at>
Ludovic Courtès <ludo@gnu.org> <ludovic.courtes@inria.fr>
Marek Benc <dusxmt@gmx.com> <merkur32@gmail.com>
Marius Bakke <marius@gnu.org> <mbakke@fastmail.com>
Marius Bakke <marius@gnu.org> <m.bakke@warwick.ac.uk>
Marius Bakke <marius@gnu.org> <marius.bakke@usit.uio.no>
Marius Bakke <marius@gnu.org> <mbakke@berlin.guixsd.org>
Mathieu Lirzin <mthl@gnu.org> <mthl@openmailbox.org>
Mathieu Lirzin <mthl@gnu.org> <mathieu.lirzin@openmailbox.org>
Mathieu Othacehe <m.othacehe@gmail.com>
Mathieu Othacehe <mathieu.othacehe@parrot.com>
Mathieu Othacehe <othacehe@gnu.org>
Matthew James Kraai <kraai@ftbfs.org>
Nikita Karetnikov <nikita@karetnikov.org> <nikita.karetnikov@gmail.com>
nikita <nikita@n0.is>
nikita <nikita@n0.is> ng0 <ng0@n0.is>
nikita <nikita@n0.is> Nils Gillmann <ng0@n0.is>
nikita <nikita@n0.is> Nils Gillmann <gillmann@infotropique.org>
nikita <nikita@n0.is> ng0 <ng0@crash.cx>
nikita <nikita@n0.is> <ng0@infotropique.org>
nikita <nikita@n0.is> <ng0@no-reply.infotropique.org>
nikita <nikita@n0.is> <ng0@no-reply.pragmatique.xyz>
nikita <nikita@n0.is> <ng0@pragmatique.xyz>
nikita <nikita@n0.is> <contact.ng0@cryptolab.net>
nikita <nikita@n0.is> <ng0@we.make.ritual.n0.is>
nikita <nikita@n0.is> <ngillmann@runbox.com>
nikita <nikita@n0.is> <niasterisk@grrlz.net>
nikita <nikita@n0.is> <ng@niasterisk.space>
nikita <nikita@n0.is> <ng0@libertad.pw>
Pierre Neidhardt <mail@ambrevar.xyz>
Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr>
Pjotr Prins <pjotr.guix@thebird.nl> <pjotr.public01@thebird.nl>
Pjotr Prins <pjotr.guix@thebird.nl> <pjotr.public12@thebird.nl>
Pjotr Prins <pjotr.guix@thebird.nl> <pjotr.public12@email>
Raimon Grau <raimonster@gmail.com> <raimon@3scale.net>
Raoul Jean Pierre Bonnal <ilpuccio.febo@gmail.com>
Raymond Nicholson <rain1@openmailbox.org>
Rene Saavedra <rennes@openmailbox.org>
Ricardo Wurmus <rekado@elephly.net>
Ricardo Wurmus <rekado@elephly.net> <ricardo.wurmus@mdc-berlin.de>
Sou Bunnbu (宋文武) <iyzsong@gmail.com>
Sou Bunnbu (宋文武) <iyzsong@gmail.com> <iyzsong@member.fsf.org>
Stefan Reichör <stefan@xsteve.at>
Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
Theodoros Foradis <theodoros.for@openmailbox.org> <theodoros@foradis.org>
Thomas Danckaert <thomas.danckaert@gmail.com> <post@thomasdanckaert.be>
Tobias Geerinckx-Rice <me@tobias.gr> <tobias.geerinckx.rice@gmail.com>
Tomas Volf <~@wolfsden.cz> <wolf@wolfsden.cz>
Tomáš Čech <sleep_walker@gnu.org> <sleep_walker@suse.cz>
Vincent Legoll <vincent.legoll@gmail.com> <vincent.legoll@idgrilles.fr>
Zheng Junjie <873216071@qq.com> Z572 <873216071@qq.com>
Zheng Junjie <873216071@qq.com> Zheng Junjie <zhengjunjie@iscas.ac.cn>
Zheng Junjie <873216071@qq.com> Zheng junjie <873216071@qq.com>
s-is-the-old-name$ | grep ^name:`" = "" rm -rf "$module_dir" # Make sure `--search' can display all the packages. guix package --search="" > /dev/null # There's no generation older than 12 months, so the following command should # have no effect. generation="`readlink_base "$profile"`" guix package -p "$profile" --delete-generations=12m && false test "`readlink_base "$profile"`" = "$generation" # The following command should not delete the current generation, even though # it matches the given pattern (see <http://bugs.gnu.org/19978>.) And since # there's nothing else to delete, it should just fail. guix package --list-generations -p "$profile" guix package --bootstrap -p "$profile" --delete-generations=1.. && false test "`readlink_base "$profile"`" = "$generation" # Make sure $profile is a GC root at this point. real_profile="`readlink -f "$profile"`" guix gc -d "$real_profile" && false test -d "$real_profile" # Now, let's remove all the symlinks to $real_profile, and make sure # $real_profile is no longer a GC root. rm "$profile" "$profile"-[0-9]-link guix gc -d "$real_profile" [ ! -d "$real_profile" ] # Package transformations. # Make sure we get the right version number when using '--with-source'. mkdir "$module_dir" emacs_tarball="$module_dir/emacs-42.5.9rc7.tar.gz" touch "$emacs_tarball" guix package -p "$profile" -i emacs --with-source="$emacs_tarball" -n \ 2> "$tmpfile" grep -E 'emacs[[:blank:]]+42\.5\.9rc7' "$tmpfile" rm "$emacs_tarball" "$tmpfile" rmdir "$module_dir" # Install with package transformations. guix install --bootstrap -p "$profile" sed --with-input=sed=guile-bootstrap grep "sed=guile-bootstrap" "$profile/manifest" test "$(readlink -f "$profile/bin/guile")" \ = "$(guix build guile-bootstrap)/bin/guile" test ! -f "$profile/bin/sed" # Make sure the package transformation is preserved. guix package --bootstrap -p "$profile" -u grep "sed=guile-bootstrap" "$profile/manifest" test "$(readlink -f "$profile/bin/guile")" \ = "$(guix build guile-bootstrap)/bin/guile" test ! -f "$profile/bin/sed" rm "$profile" "$profile"-[0-9]-link # Make sure transformations apply to propagated inputs and don't lead to # conflicts when installing them alongside, see # <https://issues.guix.gnu.org/55316>. mkdir "$module_dir" cat > "$module_dir/test.scm" <<EOF (define-module (test) #:use-module (guix packages) #:use-module (gnu packages base) #:use-module (guix build-system trivial)) (define-public dummy-package (package (name "dummy-package") (version "1") (source #f) (build-system trivial-build-system) (propagated-inputs (list hello)) (synopsis "dummy") (description "dummy") (home-page "dummy") (license #f))) EOF guix package -p "$profile" -L "$module_dir"\ -i hello dummy-package \ --without-tests=hello -n rm "$module_dir/test.scm" rmdir "$module_dir" # Profiles with a relative file name. Make sure we don't create dangling # symlinks--see bug report at # <https://lists.gnu.org/archive/html/guix-devel/2018-07/msg00036.html>. mkdir -p "$module_dir/foo" ( cd "$module_dir" ; \ guix package --bootstrap -i guile-bootstrap -p foo/prof ) test -f "$module_dir/foo/prof/bin/guile" rm "$module_dir/foo"/* rmdir "$module_dir/foo" rmdir "$module_dir" # # Try with the default profile. # XDG_CACHE_HOME="${XDG_CACHE_HOME:-$HOME/.cache}" export XDG_CACHE_HOME HOME="$PWD/t-home-$$" export HOME mkdir -p "$HOME" # Get the canonical directory name so that 'guix package' recognizes it. HOME="`cd $HOME; pwd -P`" guix package --bootstrap -i guile-bootstrap test -L "$HOME/.guix-profile" test -f "$HOME/.guix-profile/bin/guile" # Move to the empty profile. default_profile="`readlink "$HOME/.guix-profile"`" for i in `seq 1 3` do # Make sure the current generation is a GC root. profile_link="`readlink "$default_profile"`" guix gc --list-live | grep "`readlink "$profile_link"`" guix package --bootstrap --roll-back test ! -f "$HOME/.guix-profile/bin" test ! -f "$HOME/.guix-profile/lib" test "`readlink "$default_profile"`" = "`basename $default_profile-0-link`" done # Check whether '-p ~/.guix-profile' makes any difference. # See <http://bugs.gnu.org/17939>. test ! -e "$HOME/.guix-profile-0-link" test ! -e "$HOME/.guix-profile-1-link" guix package --bootstrap -p "$HOME/.guix-profile" -i guile-bootstrap test ! -e "$HOME/.guix-profile-1-link" guix package --bootstrap --roll-back -p "$HOME/.guix-profile" test ! -e "$HOME/.guix-profile-0-link" # Extraneous argument. guix package install foo-bar && false # Make sure the "broken pipe" doesn't yield an error. # Note: 'pipefail' is a Bash-specific option. set -o pipefail || true guix package -A g | head -1 2> "$HOME/err1" guix package -I | head -1 2> "$HOME/err2" test "`cat "$HOME/err1" "$HOME/err2"`" = "" # Make sure '-L' extends the package module search path. mkdir "$module_dir" cat > "$module_dir/foo.scm"<<EOF (define-module (foo) #:use-module (guix packages) #:use-module (gnu packages emacs)) (define-public x (package (inherit emacs) (name "emacs-foo-bar") (version "42.77.0"))) EOF guix package -A emacs-foo-bar -L "$module_dir" | grep 42 guix package -i emacs-foo-bar@42 -n -L "$module_dir" # Same thing using the 'GUIX_PACKAGE_PATH' environment variable. GUIX_PACKAGE_PATH="$module_dir" export GUIX_PACKAGE_PATH guix package -A emacs-foo-bar | grep 42 guix package -i emacs-foo-bar@42 -n # Make sure GUIX_PACKAGE_PATH/'-L' takes precedence in case of duplicate packages. cat > "$module_dir/bar.scm"<<EOF (define-module (bar) #:use-module (guix packages)) (define-public hello (package (inherit (@@ (gnu packages base) hello)) (synopsis "an overridden version of GNU hello"))) EOF guix package -i hello -n 2>&1 | grep choosing.*bar.scm ( unset GUIX_PACKAGE_PATH; \ guix package -i hello -n -L "$module_dir" 2>&1 | grep choosing.*bar.scm ) # Make sure patches that live under $GUIX_PACKAGE_PATH are found. cat > "$module_dir/emacs.patch"<<EOF This is a fake patch. EOF cat > "$module_dir/foo.scm"<<EOF (define-module (foo) #:use-module (guix packages) #:use-module (gnu packages) #:use-module (gnu packages emacs)) (define-public x (package (inherit emacs) (source (origin (inherit (package-source emacs)) (patches (list (search-patch "emacs.patch"))))) (name "emacs-foo-bar-patched") (version "42.42.42"))) (define-public y (package (inherit emacs) (name "super-non-portable-emacs") (supported-systems '("foobar64-hurd")))) EOF guix package -i emacs-foo-bar-patched -n # Same when -L is used. ( unset GUIX_PACKAGE_PATH; \ guix package -L "$module_dir" -i emacs-foo-bar-patched -n ) # Make sure installing from a file works. cat > "$module_dir/package.scm"<<EOF (use-modules (gnu)) (use-package-modules bootstrap) %bootstrap-guile EOF guix package --bootstrap --install-from-file="$module_dir/package.scm" # Make sure an error is raised if the file doesn't return a package. cat > "$module_dir/package.scm"<<EOF (use-modules (gnu packages base)) (define my-package coreutils) ;returns *unspecified* EOF guix package --bootstrap --install-from-file="$module_dir/package.scm" && false rm "$module_dir/package.scm" # This one should not show up in searches since it's no supported on the # current system. test "`guix package -A super-non-portable-emacs`" = "" test "`guix package -s super-non-portable-emacs | grep ^systems:`" = "systems: " # Don't upgrade packages marked for removal: <http://bugs.gnu.org/27262>. guix package --bootstrap -p "$profile" -i guile-bootstrap cat > "$module_dir/foo.scm"<<EOF (define-module (foo) #:use-module (guix) #:use-module (gnu packages bootstrap)) (define-public x (package (inherit %bootstrap-guile) (version "42"))) EOF guix package --bootstrap -p "$profile" -r guile-bootstrap -u guile test ! -f "$profile/bin/guile" guix package --bootstrap -p "$profile" --roll-back test -f "$profile/bin/guile" rm "$profile-2-link" unset GUIX_PACKAGE_PATH # Using 'GUIX_BUILD_OPTIONS'. available="`guix package -A | sort`" GUIX_BUILD_OPTIONS="--dry-run --no-grafts" export GUIX_BUILD_OPTIONS # Make sure $GUIX_BUILD_OPTIONS is not simply appended to the command-line, # which would break 'guix package -A' and similar. available2="`guix package -A | sort`" test "$available2" = "$available" guix package -I # Restore '--no-grafts', which makes sure we don't end up building stuff when # '--dry-run' is passed. GUIX_BUILD_OPTIONS="--no-grafts" # Install using the "imperative model", export a manifest, instantiate it, and # make sure we get the same profile. guix package --bootstrap -i guile-bootstrap --without-tests=foo profile_directory="$(readlink -f "$default_profile")" guix package --export-manifest > "$tmpfile" grep 'without-tests.*foo' "$tmpfile" guix package --rollback --bootstrap guix package --bootstrap -m "$tmpfile" test "$(readlink -f "$default_profile")" = "$profile_directory" guix package --export-manifest > "$tmpfile.2nd" cmp "$tmpfile" "$tmpfile.2nd" rm -f "$tmpfile.2nd" guix package --rollback --bootstrap # Applying a manifest file. cat > "$module_dir/manifest.scm"<<EOF (use-package-modules bootstrap) (packages->manifest (list %bootstrap-guile)) EOF guix package --bootstrap -m "$module_dir/manifest.scm" guix package -I | grep guile test `guix package -I | wc -l` -eq 1 # Export a manifest, instantiate it, and make sure we get the same profile. profile_directory="$(readlink -f "$default_profile")" guix package --export-manifest > "$tmpfile" guix package --rollback --bootstrap guix package --bootstrap -m "$tmpfile" test "$(readlink -f "$default_profile")" = "$profile_directory" guix package --rollback --bootstrap # Applying two manifests. cat > "$module_dir/manifest2.scm"<<EOF (use-modules (gnu packages bootstrap) (guix)) (define p (package (inherit %bootstrap-guile) (name "eliug"))) (packages->manifest (list p)) EOF guix package --bootstrap \ -m "$module_dir/manifest.scm" -m "$module_dir/manifest2.scm" guix package -I | grep guile guix package -I | grep eliug test `guix package -I | wc -l` -eq 2 guix package --rollback --bootstrap # Applying a manifest file with inferior packages. cat > "$module_dir/manifest.scm"<<EOF (use-modules (guix inferior)) (define i (open-inferior "$abs_top_srcdir" #:command "scripts/guix")) (let ((guile (car (lookup-inferior-packages i "guile-bootstrap")))) (packages->manifest (list guile))) EOF guix package --bootstrap -m "$module_dir/manifest.scm" guix package -I | grep guile test `guix package -I | wc -l` -eq 1 # Error reporting. cat > "$module_dir/manifest.scm"<<EOF (use-package-modules bootstrap) (packages->manifest (list %bootstrap-guile wonderful-package-that-does-not-exist)) EOF if guix package --bootstrap -n -m "$module_dir/manifest.scm" \ 2> "$module_dir/stderr" then false else cat "$module_dir/stderr" grep "manifest.scm:[1-4]:.*wonderful-package.*: unbound variable" \ "$module_dir/stderr" fi # Verify that package outputs are included in search results. rm -rf "$module_dir" mkdir "$module_dir" cat > "$module_dir/foo.scm"<<EOF (define-module (foo) #:use-module (guix packages) #:use-module (guix build-system trivial)) (define-public dummy-package (package (name "dummy-package") (version "dummy-version") (outputs '("out" "dummy-output")) (source #f) ;; Without a real build system, the "guix package -s" command will fail. (build-system trivial-build-system) (synopsis "dummy-synopsis") (description "dummy-description") (home-page "https://dummy-home-page") (license #f))) EOF guix package -L "$module_dir" -s dummy-output > /tmp/out test "`guix package -L "$module_dir" -s dummy-output | grep ^name:`" = "name: dummy-package" rm -rf "$module_dir" # Make sure we can see user profiles. guix package --list-profiles | grep "$profile" guix package --list-profiles | grep '\.guix-profile' # Make sure we can properly lock a profile. mkdir "$module_dir" echo "(open-output-file \"$module_dir/ready\") (sleep 60)" \ > "$module_dir/manifest.scm" guix package -m "$module_dir/manifest.scm" -p "$module_dir/profile" & pid=$! while [ ! -f "$module_dir/ready" ] ; do sleep 0.5 ; done if guix install emacs -p "$module_dir/profile"; then kill $pid; false; else true; fi kill $pid