head 1.7; access; symbols OPENPKG_E1_MP_HEAD:1.7 OPENPKG_E1_MP:1.7 OPENPKG_E1_MP_2_STABLE:1.7.2.2 OPENPKG_E1_FP:1.7.2.2 OPENPKG_2_STABLE_MP:1.7 OPENPKG_2_STABLE_20061018:1.7.2.2 OPENPKG_2_STABLE:1.7.0.2 OPENPKG_CW_FP:1.7; locks; strict; comment @# @; 1.7 date 2004.08.18.12.59.15; author cs; state Exp; branches 1.7.2.1; next 1.6; 1.6 date 2004.05.25.18.31.19; author rse; state Exp; branches; next 1.5; 1.5 date 2004.05.25.13.37.53; author tho; state Exp; branches; next 1.4; 1.4 date 2004.01.24.13.11.45; author rse; state Exp; branches; next 1.3; 1.3 date 2004.01.05.16.46.38; author rse; state Exp; branches; next 1.2; 1.2 date 2003.12.30.17.12.10; author rse; state Exp; branches; next 1.1; 1.1 date 2003.12.18.22.50.10; author rse; state Exp; branches; next ; 1.7.2.1 date 2004.08.18.12.59.15; author rse; state dead; branches; next 1.7.2.2; commitid iZxwRSmmWscPXUQr; 1.7.2.2 date 2006.10.16.14.53.50; author rse; state Exp; branches; next ; commitid iZxwRSmmWscPXUQr; desc @@ 1.7 log @fixed nasty directory permission bug @ text @ use IO; # input specification my ($version, $platform) = @@ARGV; my @@list = (qw( lib/*.a lib/*.so* lib/sysliblist lib lib32/*.a lib32/*.so* lib32/sysliblist lib32 rdbms/ !rdbms/jlib/ !rdbms/admin/ !rdbms/install/ network network/mesg/ network/admin/ network/lib/ network/lib32/ ocommon/ !ocommon/nls/lbuilder/ bin/sqlplus bin/tnsping bin sqlplus/ oracore/zoneinfo/ oracore )); # determine effective file list my @@files = (); foreach my $file (@@list) { my $not = 0; if ($file =~ m|^!(.+)$|) { $not = 1; $file = $1; } my @@paths = (); if ($file =~ m|.+/$|) { foreach my $p (`find $file -depth -print`) { $p =~ s|\r?\n$||s; push(@@paths, $p); } } else { push(@@paths, glob($file)); } if ($not) { my @@files2 = grep { my $x = $_; not grep(/^\Q$x\E$/, @@paths); } @@files; @@files = @@files2; } else { push(@@files, @@paths); } } # roll CPIO archives my $io = new IO::File "| cpio -oL 2>/dev/null" . "| bzip2 -9 >oracle-barebone-$version.$platform.cpio.bz2"; $io->print(join("\n", @@files)."\n"); $io->close(); @ 1.7.2.1 log @file oracle-barebone.pl was added on branch OPENPKG_2_STABLE on 2006-10-16 14:53:50 +0000 @ text @d1 70 @ 1.7.2.2 log @Mass merge from CURRENT to 2-STABLE (all packages except those of JUNK class) @ text @a0 70 use IO; # input specification my ($version, $platform) = @@ARGV; my @@list = (qw( lib/*.a lib/*.so* lib/sysliblist lib lib32/*.a lib32/*.so* lib32/sysliblist lib32 rdbms/ !rdbms/jlib/ !rdbms/admin/ !rdbms/install/ network network/mesg/ network/admin/ network/lib/ network/lib32/ ocommon/ !ocommon/nls/lbuilder/ bin/sqlplus bin/tnsping bin sqlplus/ oracore/zoneinfo/ oracore )); # determine effective file list my @@files = (); foreach my $file (@@list) { my $not = 0; if ($file =~ m|^!(.+)$|) { $not = 1; $file = $1; } my @@paths = (); if ($file =~ m|.+/$|) { foreach my $p (`find $file -depth -print`) { $p =~ s|\r?\n$||s; push(@@paths, $p); } } else { push(@@paths, glob($file)); } if ($not) { my @@files2 = grep { my $x = $_; not grep(/^\Q$x\E$/, @@paths); } @@files; @@files = @@files2; } else { push(@@files, @@paths); } } # roll CPIO archives my $io = new IO::File "| cpio -oL 2>/dev/null" . "| bzip2 -9 >oracle-barebone-$version.$platform.cpio.bz2"; $io->print(join("\n", @@files)."\n"); $io->close(); @ 1.6 log @Cosmetics: - remove introduced blank lines and trailing spaces - remove debugging printouts - move all version stuff into header - use consistent indentation in case/esac clause - remove redundancy in wrapper generation @ text @d19 1 @ 1.5 log @upgrading package: oracle-barebone 9.2.0.1 -> 9.2.0 @ text @d52 1 a52 1 my @@files2 = grep { a62 1 @ 1.4 log @include feedback from Dennis McRitchie @ text @d17 2 d20 3 a22 1 network d24 1 a24 1 !ocommon/nls/lbuilder/jlib/ d26 1 a30 2 network/admin/ network/admin/samples/ d63 1 d66 1 a66 1 "| cpio -o 2>/dev/null" . @ 1.3 log @add SQL*Plus command-line client @ text @d10 1 d14 1 a14 1 lib d22 1 d25 2 @ 1.2 log @reroll because Solaris tarball has changed @ text @d20 4 @ 1.1 log @new package: oracle-barebone 9.2.0.1 (Oracle Barebone Distribution) @ text @d10 3 @