561 lines
13 KiB
Ruby
Executable File
561 lines
13 KiB
Ruby
Executable File
#!/usr/bin/env ruby
|
|
|
|
require 'zip/zip'
|
|
|
|
module Zip
|
|
module ZipFileSystem
|
|
|
|
def initialize
|
|
mappedZip = ZipFileNameMapper.new(self)
|
|
@zipFsDir = ZipFsDir.new(mappedZip)
|
|
@zipFsFile = ZipFsFile.new(mappedZip)
|
|
@zipFsDir.file = @zipFsFile
|
|
@zipFsFile.dir = @zipFsDir
|
|
end
|
|
|
|
def dir
|
|
@zipFsDir
|
|
end
|
|
|
|
def file
|
|
@zipFsFile
|
|
end
|
|
|
|
class ZipFsFile
|
|
|
|
attr_writer :dir
|
|
# protected :dir
|
|
|
|
class ZipFsStat
|
|
def initialize(zipFsFile, entryName)
|
|
@zipFsFile = zipFsFile
|
|
@entryName = entryName
|
|
end
|
|
|
|
def forward_invoke(msg)
|
|
@zipFsFile.send(msg, @entryName)
|
|
end
|
|
|
|
def kind_of?(t)
|
|
super || t == ::File::Stat
|
|
end
|
|
|
|
forward_message :forward_invoke, :file?, :directory?, :pipe?, :chardev?
|
|
forward_message :forward_invoke, :symlink?, :socket?, :blockdev?
|
|
forward_message :forward_invoke, :readable?, :readable_real?
|
|
forward_message :forward_invoke, :writable?, :writable_real?
|
|
forward_message :forward_invoke, :executable?, :executable_real?
|
|
forward_message :forward_invoke, :sticky?, :owned?, :grpowned?
|
|
forward_message :forward_invoke, :setuid?, :setgid?
|
|
forward_message :forward_invoke, :zero?
|
|
forward_message :forward_invoke, :size, :size?
|
|
forward_message :forward_invoke, :mtime, :atime, :ctime
|
|
|
|
def blocks; nil; end
|
|
|
|
def get_entry
|
|
@zipFsFile.__send__(:get_entry, @entryName)
|
|
end
|
|
private :get_entry
|
|
|
|
def gid
|
|
e = get_entry
|
|
if e.extra.member? "IUnix"
|
|
e.extra["IUnix"].gid || 0
|
|
else
|
|
0
|
|
end
|
|
end
|
|
|
|
def uid
|
|
e = get_entry
|
|
if e.extra.member? "IUnix"
|
|
e.extra["IUnix"].uid || 0
|
|
else
|
|
0
|
|
end
|
|
end
|
|
|
|
def ino; 0; end
|
|
|
|
def dev; 0; end
|
|
|
|
def rdev; 0; end
|
|
|
|
def rdev_major; 0; end
|
|
|
|
def rdev_minor; 0; end
|
|
|
|
def ftype
|
|
if file?
|
|
return "file"
|
|
elsif directory?
|
|
return "directory"
|
|
else
|
|
raise StandardError, "Unknown file type"
|
|
end
|
|
end
|
|
|
|
def nlink; 1; end
|
|
|
|
def blksize; nil; end
|
|
|
|
def mode
|
|
e = get_entry
|
|
if e.fstype == 3
|
|
e.externalFileAttributes >> 16
|
|
else
|
|
33206 # 33206 is equivalent to -rw-rw-rw-
|
|
end
|
|
end
|
|
end
|
|
|
|
def initialize(mappedZip)
|
|
@mappedZip = mappedZip
|
|
end
|
|
|
|
def get_entry(fileName)
|
|
if ! exists?(fileName)
|
|
raise Errno::ENOENT, "No such file or directory - #{fileName}"
|
|
end
|
|
@mappedZip.find_entry(fileName)
|
|
end
|
|
private :get_entry
|
|
|
|
def unix_mode_cmp(fileName, mode)
|
|
begin
|
|
e = get_entry(fileName)
|
|
e.fstype == 3 && ((e.externalFileAttributes >> 16) & mode ) != 0
|
|
rescue Errno::ENOENT
|
|
false
|
|
end
|
|
end
|
|
private :unix_mode_cmp
|
|
|
|
def exists?(fileName)
|
|
expand_path(fileName) == "/" || @mappedZip.find_entry(fileName) != nil
|
|
end
|
|
alias :exist? :exists?
|
|
|
|
# Permissions not implemented, so if the file exists it is accessible
|
|
alias owned? exists?
|
|
alias grpowned? exists?
|
|
|
|
def readable?(fileName)
|
|
unix_mode_cmp(fileName, 0444)
|
|
end
|
|
alias readable_real? readable?
|
|
|
|
def writable?(fileName)
|
|
unix_mode_cmp(fileName, 0222)
|
|
end
|
|
alias writable_real? writable?
|
|
|
|
def executable?(fileName)
|
|
unix_mode_cmp(fileName, 0111)
|
|
end
|
|
alias executable_real? executable?
|
|
|
|
def setuid?(fileName)
|
|
unix_mode_cmp(fileName, 04000)
|
|
end
|
|
|
|
def setgid?(fileName)
|
|
unix_mode_cmp(fileName, 02000)
|
|
end
|
|
|
|
def sticky?(fileName)
|
|
unix_mode_cmp(fileName, 01000)
|
|
end
|
|
|
|
def umask(*args)
|
|
::File.umask(*args)
|
|
end
|
|
|
|
def truncate(fileName, len)
|
|
raise StandardError, "truncate not supported"
|
|
end
|
|
|
|
def directory?(fileName)
|
|
entry = @mappedZip.find_entry(fileName)
|
|
expand_path(fileName) == "/" || (entry != nil && entry.directory?)
|
|
end
|
|
|
|
def open(fileName, openMode = "r", &block)
|
|
case openMode
|
|
when "r"
|
|
@mappedZip.get_input_stream(fileName, &block)
|
|
when "w"
|
|
@mappedZip.get_output_stream(fileName, &block)
|
|
else
|
|
raise StandardError, "openmode '#{openMode} not supported" unless openMode == "r"
|
|
end
|
|
end
|
|
|
|
def new(fileName, openMode = "r")
|
|
open(fileName, openMode)
|
|
end
|
|
|
|
def size(fileName)
|
|
@mappedZip.get_entry(fileName).size
|
|
end
|
|
|
|
# nil for not found and nil for directories
|
|
def size?(fileName)
|
|
entry = @mappedZip.find_entry(fileName)
|
|
return (entry == nil || entry.directory?) ? nil : entry.size
|
|
end
|
|
|
|
def chown(ownerInt, groupInt, *filenames)
|
|
filenames.each { |fileName|
|
|
e = get_entry(fileName)
|
|
unless e.extra.member?("IUnix")
|
|
e.extra.create("IUnix")
|
|
end
|
|
e.extra["IUnix"].uid = ownerInt
|
|
e.extra["IUnix"].gid = groupInt
|
|
}
|
|
filenames.size
|
|
end
|
|
|
|
def chmod (modeInt, *filenames)
|
|
filenames.each { |fileName|
|
|
e = get_entry(fileName)
|
|
e.fstype = 3 # force convertion filesystem type to unix
|
|
e.externalFileAttributes = modeInt << 16
|
|
}
|
|
filenames.size
|
|
end
|
|
|
|
def zero?(fileName)
|
|
sz = size(fileName)
|
|
sz == nil || sz == 0
|
|
rescue Errno::ENOENT
|
|
false
|
|
end
|
|
|
|
def file?(fileName)
|
|
entry = @mappedZip.find_entry(fileName)
|
|
entry != nil && entry.file?
|
|
end
|
|
|
|
def dirname(fileName)
|
|
::File.dirname(fileName)
|
|
end
|
|
|
|
def basename(fileName)
|
|
::File.basename(fileName)
|
|
end
|
|
|
|
def split(fileName)
|
|
::File.split(fileName)
|
|
end
|
|
|
|
def join(*fragments)
|
|
::File.join(*fragments)
|
|
end
|
|
|
|
def utime(modifiedTime, *fileNames)
|
|
fileNames.each { |fileName|
|
|
get_entry(fileName).time = modifiedTime
|
|
}
|
|
end
|
|
|
|
def mtime(fileName)
|
|
@mappedZip.get_entry(fileName).mtime
|
|
end
|
|
|
|
def atime(fileName)
|
|
e = get_entry(fileName)
|
|
if e.extra.member? "UniversalTime"
|
|
e.extra["UniversalTime"].atime
|
|
else
|
|
nil
|
|
end
|
|
end
|
|
|
|
def ctime(fileName)
|
|
e = get_entry(fileName)
|
|
if e.extra.member? "UniversalTime"
|
|
e.extra["UniversalTime"].ctime
|
|
else
|
|
nil
|
|
end
|
|
end
|
|
|
|
def pipe?(filename)
|
|
false
|
|
end
|
|
|
|
def blockdev?(filename)
|
|
false
|
|
end
|
|
|
|
def chardev?(filename)
|
|
false
|
|
end
|
|
|
|
def symlink?(fileName)
|
|
false
|
|
end
|
|
|
|
def socket?(fileName)
|
|
false
|
|
end
|
|
|
|
def ftype(fileName)
|
|
@mappedZip.get_entry(fileName).directory? ? "directory" : "file"
|
|
end
|
|
|
|
def readlink(fileName)
|
|
raise NotImplementedError, "The readlink() function is not implemented"
|
|
end
|
|
|
|
def symlink(fileName, symlinkName)
|
|
raise NotImplementedError, "The symlink() function is not implemented"
|
|
end
|
|
|
|
def link(fileName, symlinkName)
|
|
raise NotImplementedError, "The link() function is not implemented"
|
|
end
|
|
|
|
def pipe
|
|
raise NotImplementedError, "The pipe() function is not implemented"
|
|
end
|
|
|
|
def stat(fileName)
|
|
if ! exists?(fileName)
|
|
raise Errno::ENOENT, fileName
|
|
end
|
|
ZipFsStat.new(self, fileName)
|
|
end
|
|
|
|
alias lstat stat
|
|
|
|
def readlines(fileName)
|
|
open(fileName) { |is| is.readlines }
|
|
end
|
|
|
|
def read(fileName)
|
|
@mappedZip.read(fileName)
|
|
end
|
|
|
|
def popen(*args, &aProc)
|
|
File.popen(*args, &aProc)
|
|
end
|
|
|
|
def foreach(fileName, aSep = $/, &aProc)
|
|
open(fileName) { |is| is.each_line(aSep, &aProc) }
|
|
end
|
|
|
|
def delete(*args)
|
|
args.each {
|
|
|fileName|
|
|
if directory?(fileName)
|
|
raise Errno::EISDIR, "Is a directory - \"#{fileName}\""
|
|
end
|
|
@mappedZip.remove(fileName)
|
|
}
|
|
end
|
|
|
|
def rename(fileToRename, newName)
|
|
@mappedZip.rename(fileToRename, newName) { true }
|
|
end
|
|
|
|
alias :unlink :delete
|
|
|
|
def expand_path(aPath)
|
|
@mappedZip.expand_path(aPath)
|
|
end
|
|
end
|
|
|
|
class ZipFsDir
|
|
|
|
def initialize(mappedZip)
|
|
@mappedZip = mappedZip
|
|
end
|
|
|
|
attr_writer :file
|
|
|
|
def new(aDirectoryName)
|
|
ZipFsDirIterator.new(entries(aDirectoryName))
|
|
end
|
|
|
|
def open(aDirectoryName)
|
|
dirIt = new(aDirectoryName)
|
|
if block_given?
|
|
begin
|
|
yield(dirIt)
|
|
return nil
|
|
ensure
|
|
dirIt.close
|
|
end
|
|
end
|
|
dirIt
|
|
end
|
|
|
|
def pwd; @mappedZip.pwd; end
|
|
alias getwd pwd
|
|
|
|
def chdir(aDirectoryName)
|
|
unless @file.stat(aDirectoryName).directory?
|
|
raise Errno::EINVAL, "Invalid argument - #{aDirectoryName}"
|
|
end
|
|
@mappedZip.pwd = @file.expand_path(aDirectoryName)
|
|
end
|
|
|
|
def entries(aDirectoryName)
|
|
entries = []
|
|
foreach(aDirectoryName) { |e| entries << e }
|
|
entries
|
|
end
|
|
|
|
def foreach(aDirectoryName)
|
|
unless @file.stat(aDirectoryName).directory?
|
|
raise Errno::ENOTDIR, aDirectoryName
|
|
end
|
|
path = @file.expand_path(aDirectoryName).ensure_end("/")
|
|
|
|
subDirEntriesRegex = Regexp.new("^#{path}([^/]+)$")
|
|
@mappedZip.each {
|
|
|fileName|
|
|
match = subDirEntriesRegex.match(fileName)
|
|
yield(match[1]) unless match == nil
|
|
}
|
|
end
|
|
|
|
def delete(entryName)
|
|
unless @file.stat(entryName).directory?
|
|
raise Errno::EINVAL, "Invalid argument - #{entryName}"
|
|
end
|
|
@mappedZip.remove(entryName)
|
|
end
|
|
alias rmdir delete
|
|
alias unlink delete
|
|
|
|
def mkdir(entryName, permissionInt = 0)
|
|
@mappedZip.mkdir(entryName, permissionInt)
|
|
end
|
|
|
|
def chroot(*args)
|
|
raise NotImplementedError, "The chroot() function is not implemented"
|
|
end
|
|
|
|
end
|
|
|
|
class ZipFsDirIterator
|
|
include Enumerable
|
|
|
|
def initialize(arrayOfFileNames)
|
|
@fileNames = arrayOfFileNames
|
|
@index = 0
|
|
end
|
|
|
|
def close
|
|
@fileNames = nil
|
|
end
|
|
|
|
def each(&aProc)
|
|
raise IOError, "closed directory" if @fileNames == nil
|
|
@fileNames.each(&aProc)
|
|
end
|
|
|
|
def read
|
|
raise IOError, "closed directory" if @fileNames == nil
|
|
@fileNames[(@index+=1)-1]
|
|
end
|
|
|
|
def rewind
|
|
raise IOError, "closed directory" if @fileNames == nil
|
|
@index = 0
|
|
end
|
|
|
|
def seek(anIntegerPosition)
|
|
raise IOError, "closed directory" if @fileNames == nil
|
|
@index = anIntegerPosition
|
|
end
|
|
|
|
def tell
|
|
raise IOError, "closed directory" if @fileNames == nil
|
|
@index
|
|
end
|
|
end
|
|
|
|
# All access to ZipFile from ZipFsFile and ZipFsDir goes through a
|
|
# ZipFileNameMapper, which has one responsibility: ensure
|
|
class ZipFileNameMapper
|
|
include Enumerable
|
|
|
|
def initialize(zipFile)
|
|
@zipFile = zipFile
|
|
@pwd = "/"
|
|
end
|
|
|
|
attr_accessor :pwd
|
|
|
|
def find_entry(fileName)
|
|
@zipFile.find_entry(expand_to_entry(fileName))
|
|
end
|
|
|
|
def get_entry(fileName)
|
|
@zipFile.get_entry(expand_to_entry(fileName))
|
|
end
|
|
|
|
def get_input_stream(fileName, &aProc)
|
|
@zipFile.get_input_stream(expand_to_entry(fileName), &aProc)
|
|
end
|
|
|
|
def get_output_stream(fileName, &aProc)
|
|
@zipFile.get_output_stream(expand_to_entry(fileName), &aProc)
|
|
end
|
|
|
|
def read(fileName)
|
|
@zipFile.read(expand_to_entry(fileName))
|
|
end
|
|
|
|
def remove(fileName)
|
|
@zipFile.remove(expand_to_entry(fileName))
|
|
end
|
|
|
|
def rename(fileName, newName, &continueOnExistsProc)
|
|
@zipFile.rename(expand_to_entry(fileName), expand_to_entry(newName),
|
|
&continueOnExistsProc)
|
|
end
|
|
|
|
def mkdir(fileName, permissionInt = 0)
|
|
@zipFile.mkdir(expand_to_entry(fileName), permissionInt)
|
|
end
|
|
|
|
# Turns entries into strings and adds leading /
|
|
# and removes trailing slash on directories
|
|
def each
|
|
@zipFile.each {
|
|
|e|
|
|
yield("/"+e.to_s.chomp("/"))
|
|
}
|
|
end
|
|
|
|
def expand_path(aPath)
|
|
expanded = aPath.starts_with("/") ? aPath : @pwd.ensure_end("/") + aPath
|
|
expanded.gsub!(/\/\.(\/|$)/, "")
|
|
expanded.gsub!(/[^\/]+\/\.\.(\/|$)/, "")
|
|
expanded.empty? ? "/" : expanded
|
|
end
|
|
|
|
private
|
|
|
|
def expand_to_entry(aPath)
|
|
expand_path(aPath).lchop
|
|
end
|
|
end
|
|
end
|
|
|
|
class ZipFile
|
|
include ZipFileSystem
|
|
end
|
|
end
|
|
|
|
# Copyright (C) 2002, 2003 Thomas Sondergaard
|
|
# rubyzip is free software; you can redistribute it and/or
|
|
# modify it under the terms of the ruby license.
|