diff options
| author | Kurt Zenker <kz@openoffice.org> | 2007-05-10 14:02:34 +0000 |
|---|---|---|
| committer | Kurt Zenker <kz@openoffice.org> | 2007-05-10 14:02:34 +0000 |
| commit | 5fe36acb8cc1decb3cdf0d690af799a759387740 (patch) | |
| tree | 2fe2ec09ec051045d703013ba791ab2f63121d87 /sysui | |
| parent | c024525bd847b360e6bbfafcc9d4466ac67a76f3 (diff) | |
INTEGRATION: CWS nativebroffice_SRC680 (1.2.102); FILE MERGED
2007/03/14 12:09:48 obr 1.2.102.1: #i74459# multi product support
Diffstat (limited to 'sysui')
| -rw-r--r-- | sysui/desktop/util/pkgdiff.pl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/sysui/desktop/util/pkgdiff.pl b/sysui/desktop/util/pkgdiff.pl index d4c9642e0f08..db8376f005a6 100644 --- a/sysui/desktop/util/pkgdiff.pl +++ b/sysui/desktop/util/pkgdiff.pl @@ -23,7 +23,7 @@ rpm --query --queryformat "[%{FILEMODES:perms} %{FILEUSERNAME}/%{FILEGROUPNAME} rpm2cpio $package | cpio --extract --make-directories -rm --force `sed --silent 's|^lrw.r..r..- root/root \\./\\(.*\\) -> .*|\\1 |p' filelist | tr -d "\\012"` +rm --force `sed --silent 's|^lrw.r..r..-* root/root \\./\\(.*\\) -> .*|\\1 |p' filelist | tr -d "\\012"` EOF # the last step removes all symbolic links from the extracted file tree as they @@ -61,6 +61,14 @@ bzcat $package/archive/none.bz2 | cpio -i -d EOF } +sub unpack_tgz { + my ($package) = @_; + + system << "EOF" +cat $package | gunzip | tar -xf - +EOF +} + my $script = basename($0); die "Usage: $script <package 1> <package 2>\n" unless $#ARGV == 1; @@ -88,6 +96,7 @@ while ( $#ARGV >= 0 ) if ( $package =~ /\.rpm$/ ) { unpack_rpm( $package ); } elsif( $package =~ /\.deb$/ ) { unpack_deb( $package ); } elsif( -f "$package/pkgmap" ) { unpack_solpkg( $package ); } + elsif( $package =~ /\.tgz$/ ) { unpack_tgz( $package ); } push @pkgroot, $basename; chdir $dir; |