[tex-live] Error with install: Can't write to '/tmp/MvcGi1mPGs/i97SMsuejQ/pgfplots.doc.tar.xz': No space left on device at /usr/share/perl5/vendor_perl/LWP/Protocol.pm line

James Ray jcray at protonmail.com
Sat Feb 16 08:57:42 CET 2019


No dice, a log is attached.

Kind regards,

James Ray
https://about.me/james.ray

Sent with [ProtonMail](https://protonmail.com) Secure Email.

‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐
On Saturday, February 16, 2019 6:38 PM, James Ray <jcray at protonmail.com> wrote:

> PS,
>
> [jray at jr-dl install-tl-20190215]$ perl -v
>
> This is perl 5, version 28, subversion 1 (v5.28.1) built for x86_64-linux-thread-multi
>
> Copyright 1987-2018, Larry Wall
>
> Perl may be copied only under the terms of either the Artistic License or the
> GNU General Public License, which may be found in the Perl 5 source kit.
>
> Complete documentation for Perl, including FAQ lists, should be found on
> this system using "man perl" or "perldoc perl".  If you have access to the
> Internet, point your browser at http://www.perl.org/, the Perl Home Page.
>
> [jray at jr-dl install-tl-20190215]$ echo $PATH
> /home/jray/.cargo/bin:/usr/local/bin:/usr/bin:/bin:/usr/local/sbin:/usr/lib/jvm/default/bin:/usr/bin/site_perl:/usr/bin/vendor_perl:/usr/bin/core_perl
> [jray at jr-dl install-tl-20190215]$ ls /usr/local/texlive/
> 2018  texmf-local
> ```
> I think that's the problem, I forgot to remove these (which were installed via the `yay` package manager). Trying again, will report back in ~1.5 h.
>
> Kind regards,
>
> James Ray
> https://about.me/james.ray
>
> Sent with [ProtonMail](https://protonmail.com) Secure Email.
>
> ‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐
> On Saturday, February 16, 2019 4:28 PM, James Ray <jcray at protonmail.com> wrote:
>
>> Hi all,
>>
>> I have tried to run the `.install-tl` script twice after extracting http://mirror.ctan.org/systems/texlive/tlnet/install-tl-unx.tar.gz today. However, I get this error in the subject line:
>> ```
>> Installing [2567/3746, time/total: 01:33:08/02:18:01]: pgfplots [15151k]
>> Can't write to '/tmp/MvcGi1mPGs/i97SMsuejQ/pgfplots.doc.tar.xz': No space left on device at /usr/share/perl5/vendor_perl/LWP/Protocol.pm line
>> [jray at jr-dl install-tl-20190215]$
>> cat /usr/share/perl5/vendor_perl/LWP/Protocol.pm
>> package LWP::Protocol;
>>
>> use base 'LWP::MemberMixin';
>>
>> our $VERSION = '6.36';
>>
>> use strict;
>> use Carp ();
>> use HTTP::Status ();
>> use HTTP::Response ();
>> use Try::Tiny qw(try catch);
>>
>> my %ImplementedBy = (); # scheme => classname
>>
>> sub new
>> {
>>     my($class, $scheme, $ua) = @_;
>>
>>     my $self = bless {
>> scheme => $scheme,
>> ua => $ua,
>>
>> # historical/redundant
>>         max_size => $ua->{max_size},
>>     }, $class;
>>
>>     $self;
>> }
>>
>> sub create
>> {
>>     my($scheme, $ua) = @_;
>>     my $impclass = LWP::Protocol::implementor($scheme) or
>> Carp::croak("Protocol scheme '$scheme' is not supported");
>>
>>     # hand-off to scheme specific implementation sub-class
>>     my $protocol = $impclass->new($scheme, $ua);
>>
>>     return $protocol;
>> }
>>
>> sub implementor
>> {
>>     my($scheme, $impclass) = @_;
>>
>>     if ($impclass) {
>> $ImplementedBy{$scheme} = $impclass;
>>     }
>>     my $ic = $ImplementedBy{$scheme};
>>     return $ic if $ic;
>>
>>     return '' unless $scheme =~ /^([.+\-\w]+)$/;  # check valid URL schemes
>>     $scheme = $1; # untaint
>>     $scheme =~ tr/.+-/_/;  # make it a legal module name
>>
>>     # scheme not yet known, look for a 'use'd implementation
>>     $ic = "LWP::Protocol::$scheme";  # default location
>>     $ic = "LWP::Protocol::nntp" if $scheme eq 'news'; #XXX ugly hack
>>     no strict 'refs';
>>     # check we actually have one for the scheme:
>>     unless (@{"${ic}::ISA"}) {
>>         # try to autoload it
>>         try {
>>             (my $class = $ic) =~ s{::}{/}g;
>>             $class .= '.pm' unless $class =~ /\.pm$/;
>>             require $class;
>>         }
>>         catch {
>>             my $error = $_;
>>             if ($error =~ /Can't locate/) {
>>                 $ic = '';
>>             }
>>             else {
>>                 die "$error\n";
>>             }
>>         };
>>     }
>>     $ImplementedBy{$scheme} = $ic if $ic;
>>     $ic;
>> }
>>
>> sub request
>> {
>>     my($self, $request, $proxy, $arg, $size, $timeout) = @_;
>>     Carp::croak('LWP::Protocol::request() needs to be overridden in subclasses');
>> }
>>
>> # legacy
>> sub timeout    { shift->_elem('timeout',    @_); }
>> sub max_size   { shift->_elem('max_size',   @_); }
>>
>> sub collect
>> {
>>     my ($self, $arg, $response, $collector) = @_;
>>     my $content;
>>     my($ua, $max_size) = @{$self}{qw(ua max_size)};
>>
>>     # This can't be moved to Try::Tiny due to the closures within causing
>>     # leaks on any version of Perl prior to 5.18.
>>     # https://perl5.git.perl.org/perl.git/commitdiff/a0d2bbd5c
>>     my $error = do { #catch
>>         local $@;
>>         local $\; # protect the print below from surprises
>>         eval { # try
>>             if (!defined($arg) || !$response->is_success) {
>>                 $response->{default_add_content} = 1;
>>             }
>>             elsif (!ref($arg) && length($arg)) {
>>                 open(my $fh, ">", $arg) or die "Can't write to '$arg': $!";
>>                 binmode($fh);
>>                 push(@{$response->{handlers}{response_data}}, {
>>                     callback => sub {
>>                         print $fh $_[3] or die "Can't write to '$arg': $!";
>>                         1;
>>                     },
>>                 });
>>                 push(@{$response->{handlers}{response_done}}, {
>>                     callback => sub {
>>                         close($fh) or die "Can't write to '$arg': $!";
>>                         undef($fh);
>>                     },
>>                 });
>>             }
>>             elsif (ref($arg) eq 'CODE') {
>>                 push(@{$response->{handlers}{response_data}}, {
>>                     callback => sub {
>>                         &$arg($_[3], $_[0], $self);
>>                         1;
>>                     },
>>                 });
>>             }
>>             else {
>>                 die "Unexpected collect argument '$arg'";
>>             }
>>
>>             $ua->run_handlers("response_header", $response);
>>
>>             if (delete $response->{default_add_content}) {
>>                 push(@{$response->{handlers}{response_data}}, {
>>                     callback => sub {
>>                         $_[0]->add_content($_[3]);
>>                         1;
>>                     },
>>                 });
>>             }
>>
>>             my $content_size = 0;
>>             my $length = $response->content_length;
>>             my %skip_h;
>>
>>             while ($content = &$collector, length $$content) {
>>                 for my $h ($ua->handlers("response_data", $response)) {
>>                     next if $skip_h{$h};
>>                     unless ($h->{callback}->($response, $ua, $h, $$content)) {
>>                         # XXX remove from $response->{handlers}{response_data} if present
>>                         $skip_h{$h}++;
>>                     }
>>                 }
>>                 $content_size += length($$content);
>>                 $ua->progress(($length ? ($content_size / $length) : "tick"), $response);
>>                 if (defined($max_size) && $content_size > $max_size) {
>>                     $response->push_header("Client-Aborted", "max_size");
>>                     last;
>>                 }
>>             }
>>             1;
>>         };
>>         $@;
>>     };
>>
>>     if ($error) {
>>         chomp($error);
>>         $response->push_header('X-Died' => $error);
>>         $response->push_header("Client-Aborted", "die");
>>     };
>>     delete $response->{handlers}{response_data};
>>     delete $response->{handlers} unless %{$response->{handlers}};
>>     return $response;
>> }
>>
>> sub collect_once
>> {
>>     my($self, $arg, $response) = @_;
>>     my $content = \ $_[3];
>>     my $first = 1;
>>     $self->collect($arg, $response, sub {
>> return $content if $first--;
>> return \ "";
>>     });
>> }
>>
>> 1;
>>
>> __END__
>>
>> =pod
>>
>> =head1 NAME
>>
>> LWP::Protocol - Base class for LWP protocols
>>
>> =head1 SYNOPSIS
>>
>> package LWP::Protocol::foo;
>> use base qw(LWP::Protocol);
>>
>> =head1 DESCRIPTION
>>
>> This class is used as the base class for all protocol implementations
>> supported by the LWP library.
>>
>> When creating an instance of this class using
>> C<LWP::Protocol::create($url)>, and you get an initialized subclass
>> appropriate for that access method. In other words, the
>> L<LWP::Protocol/create> function calls the constructor for one of its
>> subclasses.
>>
>> All derived C<LWP::Protocol> classes need to override the request()
>> method which is used to service a request. The overridden method can
>> make use of the collect() function to collect together chunks of data
>> as it is received.
>>
>> =head1 METHODS
>>
>> The following methods and functions are provided:
>>
>> =head2 new
>>
>>     my $prot = LWP::Protocol->new();
>>
>> The LWP::Protocol constructor is inherited by subclasses. As this is a
>> virtual base class this method should B<not> be called directly.
>>
>> =head2 create
>>
>>     my $prot = LWP::Protocol::create($scheme)
>>
>> Create an object of the class implementing the protocol to handle the
>> given scheme. This is a function, not a method. It is more an object
>> factory than a constructor. This is the function user agents should
>> use to access protocols.
>>
>> =head2 implementor
>>
>>     my $class = LWP::Protocol::implementor($scheme, [$class])
>>
>> Get and/or set implementor class for a scheme.  Returns C<''> if the
>> specified scheme is not supported.
>>
>> =head2 request
>>
>>     $response = $protocol->request($request, $proxy, undef);
>>     $response = $protocol->request($request, $proxy, '/tmp/sss');
>>     $response = $protocol->request($request, $proxy, \&callback, 1024);
>>
>> Dispatches a request over the protocol, and returns a response
>> object. This method needs to be overridden in subclasses.  Refer to
>> L<LWP::UserAgent> for description of the arguments.
>>
>> =head2 collect
>>
>>     my $res = $prot->collect(undef, $response, $collector); # stored in $response
>>     my $res = $prot->collect($filename, $response, $collector);
>>     my $res = $prot->collect(sub { ... }, $response, $collector);
>>
>> Collect the content of a request, and process it appropriately into a scalar,
>> file, or by calling a callback. If the first parameter is undefined, then the
>> content is stored within the C<$response>. If it's a simple scalar, then it's
>> interpreted as a file name and the content is written to this file.  If it's a
>> code reference, then content is passed to this routine.
>>
>> The collector is a routine that will be called and which is
>> responsible for returning pieces (as ref to scalar) of the content to
>> process.  The C<$collector> signals C<EOF> by returning a reference to an
>> empty string.
>>
>> The return value is the L<HTTP::Response> object reference.
>>
>> B<Note:> We will only use the callback or file argument if
>> C<< $response->is_success() >>.  This avoids sending content data for
>> redirects and authentication responses to the callback which would be
>> confusing.
>>
>> =head2 collect_once
>>
>>     $prot->collect_once($arg, $response, $content)
>>
>> Can be called when the whole response content is available as content. This
>> will invoke L<LWP::Protocol/collect> with a collector callback that
>> returns a reference to C<$content> the first time and an empty string the
>> next.
>>
>> =head1 SEE ALSO
>>
>> Inspect the F<LWP/Protocol/file.pm> and F<LWP/Protocol/http.pm> files
>> for examples of usage.
>>
>> =head1 COPYRIGHT
>>
>> Copyright 1995-2001 Gisle Aas.
>>
>> This library is free software; you can redistribute it and/or
>> modify it under the same terms as Perl itself.
>>
>> =cut
>> [jray at jr-dl install-tl-20190215]$ lsblk -f
>> NAME   FSTYPE LABEL     UUID                                 FSAVAIL FSUSE% MOUNTPOINT
>> sda
>> ├─sda1 vfat             7D57-B7BC                             299.1M     0% /boot/efi
>> ├─sda2 ext4             8ad88713-bc2e-4bfb-af80-c0f7e0f5e91c  250.8G     7% /
>> └─sda3 swap             86ea7831-1a63-4a74-9286-f8741ef4ce8c                [SWAP]
>> sdb
>> ├─sdb1 ext4   SG_data   52776559-1302-4aa3-92b8-987d2d3d9a9c  461.9G    21% /home
>> └─sdb2 ext4   SG_backup a9eb34d2-615f-4113-ab93-b60ac2192a8d  228.4G    17% /media/sg_backup
>> sr0
>> [jray at jr-dl install-tl-20190215]$ inxi -Fxz
>> System:    Host: jr-dl Kernel: 4.20.7-1-MANJARO x86_64 bits: 64 compiler: gcc v: 8.2.1 Desktop: N/A Distro: Manjaro Linux
>> Machine:   Type: Laptop System: Dell product: Latitude E6410 v: 0001 serial: <filter>
>>            Mobo: Dell model: 0HNGW4 serial: <filter> UEFI: Dell v: A16 date: 12/05/2013
>> Battery:   ID-1: BAT0 charge: 39.6 Wh condition: 39.6/48.8 Wh (81%) model: Samsung SDI DELL PT43699 status: Full
>> CPU:       Topology: Dual Core model: Intel Core i5 M 560 bits: 64 type: MT MCP arch: Nehalem rev: 5 L2 cache: 3072 KiB
>>            flags: lm nx pae sse sse2 sse3 sse4_1 sse4_2 ssse3 vmx bogomips: 21290
>>            Speed: 1444 MHz min/max: 1199/2667 MHz Core speeds (MHz): 1: 1230 2: 1253 3: 1278 4: 1445
>> Graphics:  Device-1: Intel Core Processor Integrated Graphics vendor: Dell Latitude E6410 driver: i915 v: kernel
>>            bus ID: 00:02.0
>>            Display: x11 server: X.Org 1.20.3 driver: intel unloaded: modesetting resolution: 1440x900~60Hz, 1920x1080~60Hz
>>            OpenGL: renderer: Mesa DRI Intel Ironlake Mobile v: 2.1 Mesa 18.3.2 direct render: Yes
>> Audio:     Device-1: Intel 5 Series/3400 Series High Definition Audio vendor: Dell Latitude E6410 driver: snd_hda_intel
>>            v: kernel bus ID: 00:1b.0
>>            Sound Server: ALSA v: k4.20.7-1-MANJARO
>> Network:   Device-1: Intel 82577LM Gigabit Network vendor: Dell Latitude E6410 driver: e1000e v: 3.2.6-k port: 7040
>>            bus ID: 00:19.0
>>            IF: eno1 state: up speed: 1000 Mbps duplex: full mac: <filter>
>>            Device-2: Broadcom and subsidiaries BCM43224 802.11a/b/g/n vendor: Dell Wireless 1520 Half-size Mini PCIe Card
>>            driver: wl v: kernel port: 7000 bus ID: 02:00.0
>>            IF: wlp2s0 state: down mac: <filter>
>> Drives:    Local Storage: total: 1.20 TiB used: 197.53 GiB (16.1%)
>>            ID-1: /dev/sda vendor: Seagate model: ST9320423AS size: 298.09 GiB
>>            ID-2: /dev/sdb type: USB vendor: Seagate model: Expansion size: 931.51 GiB
>> Partition: ID-1: / size: 284.06 GiB used: 18.79 GiB (6.6%) fs: ext4 dev: /dev/sda2
>>            ID-2: /home size: 622.48 GiB used: 128.93 GiB (20.7%) fs: ext4 dev: /dev/sdb1
>>            ID-3: swap-1 size: 8.18 GiB used: 728.2 MiB (8.7%) fs: swap dev: /dev/sda3
>> Sensors:   System Temperatures: cpu: 48.0 C mobo: N/A sodimm: 45.0 C
>>            Fan Speeds (RPM): cpu: 3321
>> Info:      Processes: 208 Uptime: 5h 00m Memory: 3.72 GiB used: 2.10 GiB (56.5%) Init: systemd Compilers: gcc: 8.2.1
>>            clang: 7.0.1 Shell: bash v: 5.0.0 inxi: 3.0.30
>> [jray at jr-dl install-tl-20190215]$
>>
>> ```
>> I checked the known issues and bugs page but couldn't see anything relevant to this issue.
>>
>> Kind regards,
>>
>> James Ray
>> https://about.me/james.ray
>>
>> Sent with [ProtonMail](https://protonmail.com) Secure Email.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://tug.org/pipermail/tex-live/attachments/20190216/2438132f/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: install-tl.log
Type: text/x-log
Size: 36759 bytes
Desc: not available
URL: <https://tug.org/pipermail/tex-live/attachments/20190216/2438132f/attachment-0001.bin>


More information about the tex-live mailing list