annotate .svn/pristine/99/99427a60ba43ee192719046d5e81ce5c2ae0e96f.svn-base @ 1298:4f746d8966dd redmine_2.3_integration

Merge from redmine-2.3 branch to create new branch redmine-2.3-integration
author Chris Cannam
date Fri, 14 Jun 2013 09:28:30 +0100
parents 622f24f53b42
children
rev   line source
Chris@1295 1 # Redmine - project management software
Chris@1295 2 # Copyright (C) 2006-2012 Jean-Philippe Lang
Chris@1295 3 #
Chris@1295 4 # FileSystem adapter
Chris@1295 5 # File written by Paul Rivier, at Demotera.
Chris@1295 6 #
Chris@1295 7 # This program is free software; you can redistribute it and/or
Chris@1295 8 # modify it under the terms of the GNU General Public License
Chris@1295 9 # as published by the Free Software Foundation; either version 2
Chris@1295 10 # of the License, or (at your option) any later version.
Chris@1295 11 #
Chris@1295 12 # This program is distributed in the hope that it will be useful,
Chris@1295 13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@1295 14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Chris@1295 15 # GNU General Public License for more details.
Chris@1295 16 #
Chris@1295 17 # You should have received a copy of the GNU General Public License
Chris@1295 18 # along with this program; if not, write to the Free Software
Chris@1295 19 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
Chris@1295 20
Chris@1295 21 require 'redmine/scm/adapters/abstract_adapter'
Chris@1295 22 require 'find'
Chris@1295 23
Chris@1295 24 module Redmine
Chris@1295 25 module Scm
Chris@1295 26 module Adapters
Chris@1295 27 class FilesystemAdapter < AbstractAdapter
Chris@1295 28
Chris@1295 29 class << self
Chris@1295 30 def client_available
Chris@1295 31 true
Chris@1295 32 end
Chris@1295 33 end
Chris@1295 34
Chris@1295 35 def initialize(url, root_url=nil, login=nil, password=nil,
Chris@1295 36 path_encoding=nil)
Chris@1295 37 @url = with_trailling_slash(url)
Chris@1295 38 @path_encoding = path_encoding.blank? ? 'UTF-8' : path_encoding
Chris@1295 39 end
Chris@1295 40
Chris@1295 41 def path_encoding
Chris@1295 42 @path_encoding
Chris@1295 43 end
Chris@1295 44
Chris@1295 45 def format_path_ends(path, leading=true, trailling=true)
Chris@1295 46 path = leading ? with_leading_slash(path) :
Chris@1295 47 without_leading_slash(path)
Chris@1295 48 trailling ? with_trailling_slash(path) :
Chris@1295 49 without_trailling_slash(path)
Chris@1295 50 end
Chris@1295 51
Chris@1295 52 def info
Chris@1295 53 info = Info.new({:root_url => target(),
Chris@1295 54 :lastrev => nil
Chris@1295 55 })
Chris@1295 56 info
Chris@1295 57 rescue CommandFailed
Chris@1295 58 return nil
Chris@1295 59 end
Chris@1295 60
Chris@1295 61 def entries(path="", identifier=nil, options={})
Chris@1295 62 entries = Entries.new
Chris@1295 63 trgt_utf8 = target(path)
Chris@1295 64 trgt = scm_iconv(@path_encoding, 'UTF-8', trgt_utf8)
Chris@1295 65 Dir.new(trgt).each do |e1|
Chris@1295 66 e_utf8 = scm_iconv('UTF-8', @path_encoding, e1)
Chris@1295 67 next if e_utf8.blank?
Chris@1295 68 relative_path_utf8 = format_path_ends(
Chris@1295 69 (format_path_ends(path,false,true) + e_utf8),false,false)
Chris@1295 70 t1_utf8 = target(relative_path_utf8)
Chris@1295 71 t1 = scm_iconv(@path_encoding, 'UTF-8', t1_utf8)
Chris@1295 72 relative_path = scm_iconv(@path_encoding, 'UTF-8', relative_path_utf8)
Chris@1295 73 e1 = scm_iconv(@path_encoding, 'UTF-8', e_utf8)
Chris@1295 74 if File.exist?(t1) and # paranoid test
Chris@1295 75 %w{file directory}.include?(File.ftype(t1)) and # avoid special types
Chris@1295 76 not File.basename(e1).match(/^\.+$/) # avoid . and ..
Chris@1295 77 p1 = File.readable?(t1) ? relative_path : ""
Chris@1295 78 utf_8_path = scm_iconv('UTF-8', @path_encoding, p1)
Chris@1295 79 entries <<
Chris@1295 80 Entry.new({ :name => scm_iconv('UTF-8', @path_encoding, File.basename(e1)),
Chris@1295 81 # below : list unreadable files, but dont link them.
Chris@1295 82 :path => utf_8_path,
Chris@1295 83 :kind => (File.directory?(t1) ? 'dir' : 'file'),
Chris@1295 84 :size => (File.directory?(t1) ? nil : [File.size(t1)].pack('l').unpack('L').first),
Chris@1295 85 :lastrev =>
Chris@1295 86 Revision.new({:time => (File.mtime(t1)) })
Chris@1295 87 })
Chris@1295 88 end
Chris@1295 89 end
Chris@1295 90 entries.sort_by_name
Chris@1295 91 rescue => err
Chris@1295 92 logger.error "scm: filesystem: error: #{err.message}"
Chris@1295 93 raise CommandFailed.new(err.message)
Chris@1295 94 end
Chris@1295 95
Chris@1295 96 def cat(path, identifier=nil)
Chris@1295 97 p = scm_iconv(@path_encoding, 'UTF-8', target(path))
Chris@1295 98 File.new(p, "rb").read
Chris@1295 99 rescue => err
Chris@1295 100 logger.error "scm: filesystem: error: #{err.message}"
Chris@1295 101 raise CommandFailed.new(err.message)
Chris@1295 102 end
Chris@1295 103
Chris@1295 104 private
Chris@1295 105
Chris@1295 106 # AbstractAdapter::target is implicitly made to quote paths.
Chris@1295 107 # Here we do not shell-out, so we do not want quotes.
Chris@1295 108 def target(path=nil)
Chris@1295 109 # Prevent the use of ..
Chris@1295 110 if path and !path.match(/(^|\/)\.\.(\/|$)/)
Chris@1295 111 return "#{self.url}#{without_leading_slash(path)}"
Chris@1295 112 end
Chris@1295 113 return self.url
Chris@1295 114 end
Chris@1295 115 end
Chris@1295 116 end
Chris@1295 117 end
Chris@1295 118 end