Chris@1295: # Redmine - project management software
Chris@1295: # Copyright (C) 2006-2012  Jean-Philippe Lang
Chris@1295: #
Chris@1295: # FileSystem adapter
Chris@1295: # File written by Paul Rivier, at Demotera.
Chris@1295: #
Chris@1295: # This program is free software; you can redistribute it and/or
Chris@1295: # modify it under the terms of the GNU General Public License
Chris@1295: # as published by the Free Software Foundation; either version 2
Chris@1295: # of the License, or (at your option) any later version.
Chris@1295: #
Chris@1295: # This program is distributed in the hope that it will be useful,
Chris@1295: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@1295: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@1295: # GNU General Public License for more details.
Chris@1295: #
Chris@1295: # You should have received a copy of the GNU General Public License
Chris@1295: # along with this program; if not, write to the Free Software
Chris@1295: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@1295: 
Chris@1295: require 'redmine/scm/adapters/abstract_adapter'
Chris@1295: require 'find'
Chris@1295: 
Chris@1295: module Redmine
Chris@1295:   module Scm
Chris@1295:     module Adapters
Chris@1295:       class FilesystemAdapter < AbstractAdapter
Chris@1295: 
Chris@1295:         class << self
Chris@1295:           def client_available
Chris@1295:             true
Chris@1295:           end
Chris@1295:         end
Chris@1295: 
Chris@1295:         def initialize(url, root_url=nil, login=nil, password=nil,
Chris@1295:                        path_encoding=nil)
Chris@1295:           @url = with_trailling_slash(url)
Chris@1295:           @path_encoding = path_encoding.blank? ? 'UTF-8' : path_encoding
Chris@1295:         end
Chris@1295: 
Chris@1295:         def path_encoding
Chris@1295:           @path_encoding
Chris@1295:         end
Chris@1295: 
Chris@1295:         def format_path_ends(path, leading=true, trailling=true)
Chris@1295:           path = leading ? with_leading_slash(path) :
Chris@1295:             without_leading_slash(path)
Chris@1295:           trailling ? with_trailling_slash(path) :
Chris@1295:             without_trailling_slash(path)
Chris@1295:         end
Chris@1295: 
Chris@1295:         def info
Chris@1295:           info = Info.new({:root_url => target(),
Chris@1295:                             :lastrev => nil
Chris@1295:                           })
Chris@1295:           info
Chris@1295:         rescue CommandFailed
Chris@1295:           return nil
Chris@1295:         end
Chris@1295: 
Chris@1295:         def entries(path="", identifier=nil, options={})
Chris@1295:           entries = Entries.new
Chris@1295:           trgt_utf8 = target(path)
Chris@1295:           trgt = scm_iconv(@path_encoding, 'UTF-8', trgt_utf8)
Chris@1295:           Dir.new(trgt).each do |e1|
Chris@1295:             e_utf8 = scm_iconv('UTF-8', @path_encoding, e1)
Chris@1295:             next if e_utf8.blank?
Chris@1295:             relative_path_utf8 = format_path_ends(
Chris@1295:                 (format_path_ends(path,false,true) + e_utf8),false,false)
Chris@1295:             t1_utf8 = target(relative_path_utf8)
Chris@1295:             t1 = scm_iconv(@path_encoding, 'UTF-8', t1_utf8)
Chris@1295:             relative_path = scm_iconv(@path_encoding, 'UTF-8', relative_path_utf8)
Chris@1295:             e1 = scm_iconv(@path_encoding, 'UTF-8', e_utf8)
Chris@1295:             if File.exist?(t1) and # paranoid test
Chris@1295:                   %w{file directory}.include?(File.ftype(t1)) and # avoid special types
Chris@1295:                   not File.basename(e1).match(/^\.+$/) # avoid . and ..
Chris@1295:               p1         = File.readable?(t1) ? relative_path : ""
Chris@1295:               utf_8_path = scm_iconv('UTF-8', @path_encoding, p1)
Chris@1295:               entries <<
Chris@1295:                 Entry.new({ :name => scm_iconv('UTF-8', @path_encoding, File.basename(e1)),
Chris@1295:                           # below : list unreadable files, but dont link them.
Chris@1295:                           :path => utf_8_path,
Chris@1295:                           :kind => (File.directory?(t1) ? 'dir' : 'file'),
Chris@1295:                           :size => (File.directory?(t1) ? nil : [File.size(t1)].pack('l').unpack('L').first),
Chris@1295:                           :lastrev =>
Chris@1295:                               Revision.new({:time => (File.mtime(t1)) })
Chris@1295:                         })
Chris@1295:             end
Chris@1295:           end
Chris@1295:           entries.sort_by_name
Chris@1295:         rescue  => err
Chris@1295:           logger.error "scm: filesystem: error: #{err.message}"
Chris@1295:           raise CommandFailed.new(err.message)
Chris@1295:         end
Chris@1295: 
Chris@1295:         def cat(path, identifier=nil)
Chris@1295:           p = scm_iconv(@path_encoding, 'UTF-8', target(path))
Chris@1295:           File.new(p, "rb").read
Chris@1295:         rescue  => err
Chris@1295:           logger.error "scm: filesystem: error: #{err.message}"
Chris@1295:           raise CommandFailed.new(err.message)
Chris@1295:         end
Chris@1295: 
Chris@1295:         private
Chris@1295: 
Chris@1295:         # AbstractAdapter::target is implicitly made to quote paths.
Chris@1295:         # Here we do not shell-out, so we do not want quotes.
Chris@1295:         def target(path=nil)
Chris@1295:           # Prevent the use of ..
Chris@1295:           if path and !path.match(/(^|\/)\.\.(\/|$)/)
Chris@1295:             return "#{self.url}#{without_leading_slash(path)}"
Chris@1295:           end
Chris@1295:           return self.url
Chris@1295:         end
Chris@1295:       end
Chris@1295:     end
Chris@1295:   end
Chris@1295: end