Michael Brown <[EMAIL PROTECTED]> writes:
> On 11 May 2001, Fran�ois Pons wrote:
> > > Just tried to run gendistrib to build the 8.0 hdlists etc. 8.0 tree is
> > > stored on a machine running 7.2. On running gendistrib, I get:
> > > Can't load './auto/rpmtools/rpmtools.so' for module
> > > rpmtools: librpmio.so.0: cannot open shared object file: No such file or
> > > directory at /usr/lib/perl5/5.6.0/i386-linux/DynaLoader.pm line 200.
> > > at ./gendistrib line 20
> > > According to rpmfind.net, librpmio.so.0 is provided by rpm4, which
> > > explains why the 7.2 system (with rpm 3.0.5) doesn't have it. This is a
> > > chicken-and-egg situation: I need rpm4 (part of 8.0) to build the 8.0
> > > distribution media. Is there any way that librpmio could be provided
> > > along with rpmtools in /misc?
> > You can use the 8.0 tree of install (DrakX), look at <top_dir>/Mandrake/mdkinst,
> > if you have that you can look directly at
> > <top_dir>/Mandrake/mdkinst/usr/bin/perl-install/live_install*
> > where you will find how to launch a perl script (install2) using the 8.0 binary
> > tree. You will have to use PERL5LIB, LD_LIBRARY_PATH and LD_LOADER, since
> > gendistrib does not use a lot of things, you can set them as follow, assuming
> > $dir point to <top_dir>/Mandrake/mdkinst (in a separate shell environment, new
> > xterm for example) :
> > export LD_LOADER=$dir/lib/ld-linux.so.2
> > export PERL5LIB=`$LD_LOADER $dir/usr/bin/perl -e 'print join ":", @INC'
> > export LD_LIBRARY_PATH=$dir/lib:$dir/bin:$dir/usr/bin
> > and then you should be available to do
> > $LD_LOADER $dir/usr/bin/perl $dir/../../misc/gendistrib <options>
> > I do it on the fly, inform me if there are problems, but you should have what is
>necessary.
>
> Thanks. It took a bit more hacking, but I finally got it to work with:
>
> export $distroot=<path to Mandrake>/8.0/i586
> cd $distroot/misc
> export instroot=$distroot/Mandrake/mdkinst
> unset LC_MONETARY LC_CTYPE LC_NUMERIC LC_MESSAGES LC_TIME LC_COLLATE LANGUAGE LANG
>RPM_INSTALL_LANG
> export LD_LOADER=$instroot/lib/ld-linux.so.2
> export
>LD_LIBRARY_PATH=$instroot/lib:$instroot/usr/lib:$instroot/bin:$instroot/usr/bin:$instroot/usr/lib/perl5/5.6.0/i386-linux/CORE
> export PERL5LIB=`$LD_LOADER $instroot/usr/bin/perl -e 'print "'$distroot'/".join
>":'$distroot'/", @INC'`
> exec $LD_LOADER $instroot/usr/bin/perl $distroot/misc/gendistrib --distrib $distroot
>
> and a patch to rpmtools.pm. Without the patch, rpmtools.pm kept falling
> over with /lib/ld-linux.so.2 problems (rpmtools.pm includes two calls that
> involve invoking /bin/sh, which seems to be the problem - AFAICT it's
> because the shell ignores LD_LOADER and tries to load programs in the
> normal way). Here is the patch:
>
> --- misc/rpmtools.pm.orig Fri May 11 17:59:20 2001
> +++ misc/rpmtools.pm Fri May 11 20:10:02 2001
> @@ -120,13 +120,19 @@
> my ($params, $noclean, $ratio, $dir, $hdlist, @rpms) = @_;
> my %names;
>
> + #- Reset LD_LOADER and LD_LIBRARY_PATH so that external shell calls function
>properly
> + my $ldloader=$ENV{"LD_LOADER"};
> + my $ldlibpath=$ENV{"LD_LIBRARY_PATH"};
> + $ENV{"LD_LOADER"}="";
> + $ENV{"LD_LIBRARY_PATH"}="";
> +
> #- build a working directory which will hold rpm headers.
> $dir ||= '.';
> -d $dir or mkdir $dir, 0755 or die "cannot create directory $dir\n";
>
> foreach (@rpms) {
> my ($key, $name) = /(([^\/]*)-[^-]*-[^-]*\.[^\/\.]*)\.rpm$/ or next;
> - system("rpm2header '$_' > '$dir/$key'") unless -e "$dir/$key";
> + system "./rpm2header '$_' > '$dir/$key'" unless -e "$dir/$key";
> $? == 0 or unlink("$dir/$key"), die "bad rpm $_\n";
> -s "$dir/$key" or unlink("$dir/$key"), die "bad rpm $_\n";
> push @{$names{$name} ||= []}, $key;
> @@ -152,6 +158,11 @@
> close B or die "packdrake failed\n";
>
> system("rm", "-rf", $dir) unless $dir eq '.' || $noclean;
> +
> + #- Restore LD_LOADER and LD_LIBRARY_PATH
> + $ENV{"LD_LIBRARY_PATH"}=$ldlibpath;
> + $ENV{"LD_LOADER"}=$ldloader;
> +
> }
>
> #- read one or more rpm files.
>
>
> Thanks again, and I hope that the patch makes sense (I'm not really a Perl
> programmer).
Your patch make sense, this is because of > that a shell is used.
I will modify rpm2header to make it more usable for older distro so that
using misc/gendistrib (for example) will make sure no patch are necessary as so
shell will need to be invoked (no more need to use >, so no more shell).
Thanks very much.
Fran�ois.
