bug#19976: Cannot install texlive

[Ricardo Wurmus]

After a network interruption while downloading the binary substitute for
texlive I can no longer install it.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~/dev/guix $ ./pre-inst-env guix package -i texlive
The following package will be installed:
   texlive      2014    /gnu/store/za7kilci43in8dfdrrhq90rwlxzrxwf9-texlive-2014

substitute-binary: updating list of substitutes from 'http://hydra.gnu.org'...
The following derivations will be built:
   /gnu/store/kj71r2vy4dncgnm403rb675wbgnzylvh-profile.drv
   /gnu/store/8q0680g1pfifi4h6dbzx9651g44rzj8l-texlive-2014.drv
   /gnu/store/mslmw7h8yhs84qvjvn1l0dhyi0bcz8fi-info-dir.drv
The following files will be downloaded:
   /gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data
   /gnu/store/dar8cp7sb52iwjvrq3pmansx4ic7amwh-texlive-2014
found valid signature for 
'/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data', from 
'http://hydra.gnu.org/nar/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data'
downloading `/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data' 
(3392.6 MiB installed)...
GC Warning: Failed to expand heap by 1986744320 bytes
GC Warning: Failed to expand heap by 1986220032 bytes
GC Warning: Out of Memory! Heap size: 6 MiB. Returning NULL!

bzip2: Compressed file ends unexpectedly;
        perhaps it is corrupted?  *Possible* reason follows.
bzip2: Inappropriate ioctl for device
        Input file = (stdin), output file = (stdout)

It is possible that the compressed file(s) have become corrupted.
You can use the -tvv option to test integrity of such files.

You can use the `bzip2recover' program to attempt to recover
data from undamaged sections of corrupted files.

guix substitute-binary: error: corrupt input while restoring 
'/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data' from #{read 
pipe}#
guix package: error: build failed: some substitutes for the outputs of 
derivation `/gnu/store/627fwfqdpv85q6j7dvcjwnmi6gfwy2ll-texlive-2014.drv' 
failed (usually happens due to networking issues); try `--fallback' to build 
derivation from source 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


The error leading up to this situation looks like this:

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
downloading `/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data' 
(3392.6 MiB installed)...
http://hydra.gnu.org/nar/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data     
1612808.0 KiB transferredBacktrace:
In ice-9/eval.scm:
 432: 19 [eval # #]
In ice-9/boot-9.scm:
2401: 18 [save-module-excursion #<procedure 9ff7ca0 at ice-9/boot-9.scm:4045:3 
()>]
4050: 17 [#<procedure 9ff7ca0 at ice-9/boot-9.scm:4045:3 ()>]
1724: 16 [%start-stack load-stack ...]
1729: 15 [#<procedure 9ffd708 ()>]
In unknown file:
   ?: 14 [primitive-load "/usr/local/bin/guix"]
In guix/ui.scm:
 818: 13 [run-guix-command substitute-binary "--substitute" ...]
In ice-9/boot-9.scm:
 157: 12 [catch getaddrinfo-error ...]
 157: 11 [catch srfi-34 #<procedure a564530 at guix/ui.scm:220:2 ()> ...]
 157: 10 [catch system-error ...]
In guix/scripts/substitute-binary.scm:
 762: 9 [#<procedure a564540 at guix/scripts/substitute-binary.scm:677:3 ()>]
In guix/utils.scm:
 214: 8 [filtered-port # #<input: r6rs-custom-binary-input-port a5728e8>]
In guix/build/utils.scm:
 575: 7 [#<procedure ae7ab20 at guix/build/utils.scm:573:20 ()>]
In unknown file:
   ?: 6 [get-bytevector-n! #<input: r6rs-custom-binary-input-port a5728e8> ...]
In guix/scripts/substitute-binary.scm:
 517: 5 [read! #vu8(153 67 181 183 33 154 71 141 116 19 119 200 170 61 233 ... 
225 243 29 228 124 174 111 40 123 94 54 250 82 79 143 24 163 120 30) ...]
In unknown file:
   ?: 4 [get-bytevector-n! #<input: r6rs-custom-binary-input-port a572960> ...]
In web/http.scm:
1936: 3 [read! #vu8(119 208 62 20 255 50 96 203 50 203 70 164 183 47 241 170 
205 90 0 134 114 191 241 17 23 13 252 ...  161 54 192 107 98 33 231 144 100 90 
118 35 176 54 79 162 225 243 29 228 124 174 111 40 123 94 54 250 82 79 143 24 
163 120 30) ...]
1920: 2 [read-chunk #<input-output: socket 10>]
1910: 1 [read-chunk-header #<input-output: socket 10>]
In unknown file:
   ?: 0 [string-index #<eof> #<procedure a52d440 at web/http.scm:1911:44 (c)> 
...]

ERROR: In procedure string-index:
ERROR: In procedure string-index: Wrong type argument in position 1 (expecting 
string): #<eof>

bzip2: Compressed file ends unexpectedly;
        perhaps it is corrupted?  *Possible* reason follows.
bzip2: Inappropriate ioctl for device
        Input file = (stdin), output file = (stdout)

It is possible that the compressed file(s) have become corrupted.
You can use the -tvv option to test integrity of such files.

You can use the `bzip2recover' program to attempt to recover
data from undamaged sections of corrupted files.

guix substitute-binary: error: corrupt input while restoring 
'/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data/texmf-dist/fonts/type1/public/fetamont/ffmho9.pfb'
 from #{read pipe}#
@ substituter-failed 
/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data 256 fetching path 
`/gnu/store/6rz8gpy7ax6334ihw87zyaxyibz96hc3-texlive-2014-data' failed with 
exit code 1
killing process 25165
guix build: error: build failed: some substitutes for the outputs of derivation 
`/gnu/store/627fwfqdpv85q6j7dvcjwnmi6gfwy2ll-texlive-2014.drv' failed (usually 
happens due to networking issues); try `--fallback' to build derivation from 
source 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~