# Copyright 2008-2011 Red Hat, Inc, and individual contributors.
# 
# This is free software; you can redistribute it and/or modify it
# under the terms of the GNU Lesser General Public License as
# published by the Free Software Foundation; either version 2.1 of
# the License, or (at your option) any later version.
# 
# This software is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# Lesser General Public License for more details.
# 
# You should have received a copy of the GNU Lesser General Public
# License along with this software; if not, write to the Free
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
# 02110-1301 USA, or see the FSF site: http://www.fsf.org.

require 'java'

module TorqueBox
  module VFS
  end
end

require 'torquebox/vfs/file'
require 'torquebox/vfs/dir'
require 'torquebox/vfs/glob_filter'
require 'torquebox/vfs/ext/vfs'
require 'torquebox/vfs/ext/io'
require 'torquebox/vfs/ext/file'
require 'torquebox/vfs/ext/file_test'
require 'torquebox/vfs/ext/dir'
require 'torquebox/vfs/ext/pathname'
require 'torquebox/vfs/ext/kernel'
require 'torquebox/vfs/ext/jdbc'
require 'torquebox/vfs/ext/process'


module TorqueBox
  module VFS
    def self.resolve_within_archive(path)
      if ( path.respond_to?(:vfs_path?) && path.vfs_path? )
        return "vfs:#{path.to_s}" 
      end
      path = path.to_s
      return path if ( path =~ %r(^vfs:) )
      cur = path
      trim_size = cur.length
      while ( cur != '.' && cur != '/' )
        if ( ::File.exist_without_vfs?( cur ) )
          child_path = path[trim_size..-1]
          if ( cur[-1,1] == '/' )
            cur = cur[0..-2]
          end
          return TorqueBox::VFS.resolve_path_url( cur ), child_path
        end
        cur = ::File.dirname( cur )
        trim_size = cur.length
        cur << '/' unless cur[-1,1] == '/'
      end
      nil
    end

    def self.resolve_path_url(path)
      prefix = case
               when path =~ /^\//            # unix absolute
                 "vfs:"
               when path =~ /^[[:alpha:]]:/  # windows absolute
                 "vfs:/"
               else
                 "#{resolve_path_url( ::Dir.pwd )}/"
               end
      "#{prefix}#{path}"
    end

    def self.virtual_file(filename)
      vfs_url, child_path = TorqueBox::VFS.resolve_within_archive( filename )
      return nil unless vfs_url

      begin
        virtual_file = Java::org.jboss.vfs.VFS.child( vfs_url )
        virtual_file = virtual_file.get_child( child_path ) if child_path
        virtual_file
      rescue Java::JavaIo::IOException => e
        nil
      end
    end

    def self.writable_path_or_error(path, e)
      virtual_file = TorqueBox::VFS.virtual_file( path )
      raise e if virtual_file.nil?
      mount = Java::org.jboss.vfs::VFS.get_mount(virtual_file)
      # TODO: Replace with a better error stating the issue, which is
      # the user is trying to write to a filesystem inside an archive
      # that is mounted as readonly
    #
      # HACK: For some reason mount.file_system doesn't work inside TB
      # but does in tests
      # raise e if mount.file_system.read_only?
      virtual_file.physical_file.path
    end

  end
end