Class: FileUtils::Entry_

# File 'lib/fileutils.rb', line 1247

def chardev?
  s = lstat!
  s and s.chardev?
end

# File 'lib/fileutils.rb', line 1506

def check_have_lchmod?
  return false unless File.respond_to?(:lchmod)
  File.lchmod 0
  return true
rescue NotImplementedError
  return false
end

# File 'lib/fileutils.rb', line 1524

def check_have_lchown?
  return false unless File.respond_to?(:lchown)
  File.lchown nil, nil
  return true
rescue NotImplementedError
  return false
end

# File 'lib/fileutils.rb', line 1219

def dereference?
  @deref
end

# File 'lib/fileutils.rb', line 1237

def directory?
  s = lstat!
  s and s.directory?
end

# File 'lib/fileutils.rb', line 1269

def door?
  s = lstat!
  s and (s.mode & 0xF000 == S_IF_DOOR)
end

# File 'lib/fileutils.rb', line 1223

def exist?
  begin
    lstat
    true
  rescue Errno::ENOENT
    false
  end
end

# File 'lib/fileutils.rb', line 1232

def file?
  s = lstat!
  s and s.file?
end

# File 'lib/fileutils.rb', line 1498

def have_lchmod?
  # This is not MT-safe, but it does not matter.
  if $fileutils_rb_have_lchmod == nil
    $fileutils_rb_have_lchmod = check_have_lchmod?
  end
  $fileutils_rb_have_lchmod
end

# File 'lib/fileutils.rb', line 1516

def have_lchown?
  # This is not MT-safe, but it does not matter.
  if $fileutils_rb_have_lchown == nil
    $fileutils_rb_have_lchown = check_have_lchown?
  end
  $fileutils_rb_have_lchown
end

# File 'lib/fileutils.rb', line 1262

def pipe?
  s = lstat!
  s and s.pipe?
end

# File 'lib/fileutils.rb', line 1257

def socket?
  s = lstat!
  s and s.socket?
end

# File 'lib/fileutils.rb', line 1242

def symlink?
  s = lstat!
  s and s.symlink?
end

# File 'lib/fileutils.rb', line 1326

def chown(uid, gid)
  if symlink?
    File.lchown uid, gid, path() if have_lchown?
  else
    File.chown uid, gid, path()
  end
end

# File 'lib/fileutils.rb', line 1350

def copy(dest)
  lstat
  case
  when file?
    copy_file dest
  when directory?
    if !File.exist?(dest) and descendant_directory?(dest, path)
      raise ArgumentError, "cannot copy directory %s to itself %s" % [path, dest]
    end
    begin
      Dir.mkdir dest
    rescue
      raise unless File.directory?(dest)
    end
  when symlink?
    File.symlink File.readlink(path()), dest
  when chardev?
    raise "cannot handle device file" unless File.respond_to?(:mknod)
    mknod dest, ?c, 0666, lstat().rdev
  when blockdev?
    raise "cannot handle device file" unless File.respond_to?(:mknod)
    mknod dest, ?b, 0666, lstat().rdev
  when socket?
    raise "cannot handle socket" unless File.respond_to?(:mknod)
    mknod dest, nil, lstat().mode, 0
  when pipe?
    raise "cannot handle FIFO" unless File.respond_to?(:mkfifo)
    mkfifo dest, 0666
  when door?
    raise "cannot handle door: #{path()}"
  else
    raise "unknown file type: #{path()}"
  end
end

# File 'lib/fileutils.rb', line 1385

def copy_file(dest)
  File.open(path()) do |s|
    File.open(dest, 'wb', s.stat.mode) do |f|
      IO.copy_stream(s, f)
    end
  end
end

# File 'lib/fileutils.rb', line 1393

def copy_metadata(path)
  st = lstat()
  if !st.symlink?
    File.utime st.atime, st.mtime, path
  end
  mode = st.mode
  begin
    if st.symlink?
      begin
        File.lchown st.uid, st.gid, path
      rescue NotImplementedError
      end
    else
      File.chown st.uid, st.gid, path
    end
  rescue Errno::EPERM, Errno::EACCES
    # clear setuid/setgid
    mode &= 01777
  end
  if st.symlink?
    begin
      File.lchmod mode, path
    rescue NotImplementedError, Errno::EOPNOTSUPP
    end
  else
    File.chmod mode, path
  end
end

# File 'lib/fileutils.rb', line 1545

def descendant_directory?(descendant, ascendant)
  /\A(?#{SYSCASE}:#{Regexp.quote(ascendant)})#{DIRECTORY_TERM}/ =~ File.dirname(descendant)
end

# File 'lib/fileutils.rb', line 1274

def entries
  opts = {}
  opts[:encoding] = ::Encoding::UTF_8 if fu_windows?
  Dir.children(path, opts)\
      .map {|n| Entry_.new(prefix(), join(rel(), n.untaint)) }
end

# File 'lib/fileutils.rb', line 1199

def inspect
  "\#<#{self.class} #{path()}>"
end

# File 'lib/fileutils.rb', line 1532

def join(dir, base)
  return File.path(dir) if not base or base == '.'
  return File.path(base) if not dir or dir == '.'
  File.join(dir, base)
end

# File 'lib/fileutils.rb', line 1334

def link(dest)
  case
  when directory?
    if !File.exist?(dest) and descendant_directory?(dest, path)
      raise ArgumentError, "cannot link directory %s to itself %s" % [path, dest]
    end
    begin
      Dir.mkdir dest
    rescue
      raise unless File.directory?(dest)
    end
  else
    File.link path(), dest
  end
end

# File 'lib/fileutils.rb', line 1303

def lstat
  if dereference?
    @lstat ||= File.stat(path())
  else
    @lstat ||= File.lstat(path())
  end
end

# File 'lib/fileutils.rb', line 1311

def lstat!
  lstat()
rescue SystemCallError
  nil
end

# File 'lib/fileutils.rb', line 1203

def path
  if @path
    File.path(@path)
  else
    join(@prefix, @rel)
  end
end

# File 'lib/fileutils.rb', line 1442

def platform_support
  return yield unless fu_windows?
  first_time_p = true
  begin
    yield
  rescue Errno::ENOENT
    raise
  rescue => err
    if first_time_p
      first_time_p = false
      begin
        File.chmod 0700, path()   # Windows does not have symlink
        retry
      rescue SystemCallError
      end
    end
    raise err
  end
end

# File 'lib/fileutils.rb', line 1472

def postorder_traverse
  if directory?
    entries().each do |ent|
      ent.postorder_traverse do |e|
        yield e
      end
    end
  end
ensure
  yield self
end

# File 'lib/fileutils.rb', line 1211

def prefix
  @prefix || @path
end

# File 'lib/fileutils.rb', line 1462

def preorder_traverse
  stack = [self]
  while ent = stack.pop
    yield ent
    stack.concat ent.entries.reverse if ent.directory?
  end
end

# File 'lib/fileutils.rb', line 1215

def rel
  @rel
end

# File 'lib/fileutils.rb', line 1422

def remove
  if directory?
    remove_dir1
  else
    remove_file
  end
end

# File 'lib/fileutils.rb', line 1430

def remove_dir1
  platform_support {
    Dir.rmdir path().chomp(?/)
  }
end

# File 'lib/fileutils.rb', line 1436

def remove_file
  platform_support {
    File.unlink path
  }
end

# File 'lib/fileutils.rb', line 1281

def stat
  return @stat if @stat
  if lstat() and lstat().symlink?
    @stat = File.stat(path())
  else
    @stat = lstat()
  end
  @stat
end

# File 'lib/fileutils.rb', line 1291

def stat!
  return @stat if @stat
  if lstat! and lstat!.symlink?
    @stat = File.stat(path())
  else
    @stat = lstat!
  end
  @stat
rescue SystemCallError
  nil
end

# File 'lib/fileutils.rb', line 1470

alias traverse preorder_traverse

# File 'lib/fileutils.rb', line 1484

def wrap_traverse(pre, post)
  pre.call self
  if directory?
    entries.each do |ent|
      ent.wrap_traverse pre, post
    end
  end
  post.call self
end