guix/tests/locking.sh

source common.sh

drvPath=$($nixinstantiate locking.nix)

echo "derivation is $drvPath"

for i in 1 2 3 4 5; do
    echo "WORKER $i"
    $nixstore -rvv "$drvPath" &
done

sleep 5

outPath=$($nixstore -qvvf "$drvPath")

echo "output path is $outPath"

text=$(cat "$outPath")
if test "$text" != "aabcade"; then exit 1; fi
* Make it easy to run individual tests from the command line. 2006-03-01 12:15:33 +00:00			`source common.sh`

* Simplification. 2006-03-01 12:51:18 +00:00			`drvPath=$($nixinstantiate locking.nix)`
* 1000th revision! * A test to verify that locking of output paths (caused by concurrent invocations of Nix) works correctly. 2004-05-04 13:56:30 +00:00
* Propagate the deriver of a path through the substitute mechanism. * Removed some dead code (successor stuff) from nix-push. * Updated terminology in the tests (store expr -> drv path). * Check that the deriver is set properly in the tests. 2005-02-09 12:57:13 +00:00			`echo "derivation is $drvPath"`
* 1000th revision! * A test to verify that locking of output paths (caused by concurrent invocations of Nix) works correctly. 2004-05-04 13:56:30 +00:00
* Make sure that no build hook is set by default in the tests. * Don't use `seq' - some primitive, obsolete operating systems (Darwin) don't have it. 2004-08-19 09:09:09 +00:00			`for i in 1 2 3 4 5; do`
* 1000th revision! * A test to verify that locking of output paths (caused by concurrent invocations of Nix) works correctly. 2004-05-04 13:56:30 +00:00			`echo "WORKER $i"`
* Simplification. 2006-03-01 12:51:18 +00:00			`$nixstore -rvv "$drvPath" &`
* 1000th revision! * A test to verify that locking of output paths (caused by concurrent invocations of Nix) works correctly. 2004-05-04 13:56:30 +00:00			`done`

			`sleep 5`

* Simplification. 2006-03-01 12:51:18 +00:00			`outPath=$($nixstore -qvvf "$drvPath")`
* 1000th revision! * A test to verify that locking of output paths (caused by concurrent invocations of Nix) works correctly. 2004-05-04 13:56:30 +00:00
			`echo "output path is $outPath"`

			`text=$(cat "$outPath")`
			`if test "$text" != "aabcade"; then exit 1; fi`