10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
# File 'lib/kpm/utils.rb', line 10
def unpack_tgz(tar_gz_archive, destination, skip_top_dir=false)
top_dir = nil
Gem::Package::TarReader.new(Zlib::GzipReader.open(tar_gz_archive)) do |tar|
dest = nil
tar.each do |entry|
if entry.full_name == TAR_LONGLINK
dest = File.join destination, skip_top_dir ? path_with_skipped_top_level_dir(entry.read.strip) : entry.read.strip
next
end
dest ||= File.join destination, skip_top_dir ? path_with_skipped_top_level_dir(entry.full_name) : entry.full_name
if entry.directory?
File.delete dest if File.file? dest
FileUtils.mkdir_p dest, :mode => entry..mode, :verbose => false
elsif entry.file?
FileUtils.rm_rf dest if File.directory? dest
FileUtils.mkdir_p File.dirname(dest), :verbose => false
File.open dest, "wb" do |f|
f.print entry.read
end
FileUtils.chmod entry..mode, dest, :verbose => false
current_dir = File.dirname(dest)
top_dir = current_dir if (top_dir.nil? || top_dir.size >= current_dir.size)
elsif entry..typeflag == '2'
File.symlink entry..linkname, dest
end
dest = nil
end
end
top_dir
end
|