Hi again,

some additonal hints:

a) original file sizes:

[eedmja_latest_oche149] [EMAIL PROTECTED]: find 
/vobs/eccs_dev_perl/perl_for_sixtyfive_characters_max_pathlength/prod/lib/ -ls | fgrep 
CtCmd | sed 
's,/vobs.*/prod/,<perl_root>/,1' | nawk '{printf "%7d %s\n", $7, $NF;}'
    147 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd
    758 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd/.packlist
      0 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd/CtCmd.bs
  19340 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd/CtCmd.so
     94 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd/autosplit.ix
   4552 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/auto/ClearCase/CtCmd/libzuba.so
   6509 <perl_root>/lib/site_perl/5.8.0/sun4-solaris/ClearCase/CtCmd.pm
[eedmja_latest_oche149] [EMAIL PROTECTED]:

b) the library which ld.so.1 does not like:

# ll /tmp/[0-9]* | fgrep 1934
-rw-r--r--   1 root     other      19341 Feb 21 17:01 /tmp/2b953aa5.so


What strikes me here is that the size of the "not liked" library, 
for which ld.so.1 complains about not finding libzuba.so,
is exactly one byte larger than the origininal CtCmd/CtCmd.so ... 


Best regards,

        Markus



Markus Jansen wrote:
>
>Hi Autrijus,
>
>Module::ScanDeps now works "too" good - I have a large Perl base,
>quite some modules also compiled statically ...
>now all the .a libraries get in, and the final executable blows up by
>a factor of more than 2 :-(((.
>
>So I would like to propose a little change here,
>to eclipse the .a files:
>
>        if ($module =~ /(.*?([^\/]*))\.pm$/i) {
>            my ($path, $basename) = ($1, $2);
>
>            foreach (_glob_in_inc("auto/$path")) {
>                my $ext = $_->{name} =~ /(\.[^.]+)$/ ? $1 : ''; 
>                my $type = '';
>                if ( $ext eq '.ix' || $ext eq '.al' ) {
>                    $type = 'autoload';
>                }
>                elsif ( $ext eq lc(dl_ext()) ) {
>                    $type = 'shared';
>                }
>                elsif ( $ext eq '.ld' || $ext eq '.bs' ) {
>                    $type = 'data';
>                }
>                else {
>                    # we throw away: .exists .packlist *.a 
>                    next;
>                }
>
>                _add_info($rv, "auto/$path/$_->{name}", $_->{file}, $module, 
>$type);
>            }
>        }
>
>
>A minor question which arises from my code snippet above,
>is what to do with the (empty) .bs files, and the (sometimes non-empty)
>extralibs.ld files).
>
>
>Now that pp runs fine and packs (at least) everything wanted into the 
>executable's PAR part, I still get the problem that PAR bootstrapping
>on the target host does not work, i.e. I get the same error as before:
>
>[EMAIL PROTECTED] 46> /chuid/bin/cc_change_uid_gid_sunos_5_8 -h
>Can't load '/tmp/2b953aa5.so' for module ClearCase::CtCmd: ld.so.1: 
>/chuid/bin/cc_change_uid_gid_sunos_5_8: fatal: libzuba.so: open failed: No such 
>file or directory at /loader/0x232734/DynaLoader.pm line 229.
> at /loader/0x232734/PAR/Heavy.pm line 101
>Compilation failed in require at script/cc_change_uid_gid_sunos_5_8.pl line 78.
>BEGIN failed--compilation aborted at script/cc_change_uid_gid_sunos_5_8.pl line 
>78.
>
>I think there is some more work to do in PAR ...
>
>Best regards,
>
>       Markus
>
>--
>Markus Jansen                       Senior IS/IT Support Engineer, EED/IT
>Ericsson Eurolab Deutschland GmbH   Email: [EMAIL PROTECTED]
>Ericsson Allee 1                    Phone: +49 2407 575 5157
>52134 Herzogenrath, Germany         Fax  : +49 2407 575 7289

--
Markus Jansen                       Senior IS/IT Support Engineer, EED/IT
Ericsson Eurolab Deutschland GmbH   Email: [EMAIL PROTECTED]
Ericsson Allee 1                    Phone: +49 2407 575 5157
52134 Herzogenrath, Germany         Fax  : +49 2407 575 7289

Reply via email to