comparison .svn/pristine/94/94e5ac8fbd269485670f62fe0e6e82b861c05911.svn-base @ 1295:622f24f53b42 redmine-2.3

Update to Redmine SVN revision 11972 on 2.3-stable branch
author Chris Cannam
date Fri, 14 Jun 2013 09:02:21 +0100
parents
children
comparison
equal deleted inserted replaced
1294:3e4c3460b6ca 1295:622f24f53b42
1 # Redmine - project management software
2 # Copyright (C) 2006-2012 Jean-Philippe Lang
3 #
4 # This program is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU General Public License
6 # as published by the Free Software Foundation; either version 2
7 # of the License, or (at your option) any later version.
8 #
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
13 #
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, write to the Free Software
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17
18 require 'redmine/scm/adapters/abstract_adapter'
19
20 module Redmine
21 module Scm
22 module Adapters
23 class BazaarAdapter < AbstractAdapter
24
25 # Bazaar executable name
26 BZR_BIN = Redmine::Configuration['scm_bazaar_command'] || "bzr"
27
28 class << self
29 def client_command
30 @@bin ||= BZR_BIN
31 end
32
33 def sq_bin
34 @@sq_bin ||= shell_quote_command
35 end
36
37 def client_version
38 @@client_version ||= (scm_command_version || [])
39 end
40
41 def client_available
42 !client_version.empty?
43 end
44
45 def scm_command_version
46 scm_version = scm_version_from_command_line.dup
47 if scm_version.respond_to?(:force_encoding)
48 scm_version.force_encoding('ASCII-8BIT')
49 end
50 if m = scm_version.match(%r{\A(.*?)((\d+\.)+\d+)})
51 m[2].scan(%r{\d+}).collect(&:to_i)
52 end
53 end
54
55 def scm_version_from_command_line
56 shellout("#{sq_bin} --version") { |io| io.read }.to_s
57 end
58 end
59
60 def initialize(url, root_url=nil, login=nil, password=nil, path_encoding=nil)
61 @url = url
62 @root_url = url
63 @path_encoding = 'UTF-8'
64 # do not call *super* for non ASCII repository path
65 end
66
67 def bzr_path_encodig=(encoding)
68 @path_encoding = encoding
69 end
70
71 # Get info about the repository
72 def info
73 cmd_args = %w|revno|
74 cmd_args << bzr_target('')
75 info = nil
76 scm_cmd(*cmd_args) do |io|
77 if io.read =~ %r{^(\d+)\r?$}
78 info = Info.new({:root_url => url,
79 :lastrev => Revision.new({
80 :identifier => $1
81 })
82 })
83 end
84 end
85 info
86 rescue ScmCommandAborted
87 return nil
88 end
89
90 # Returns an Entries collection
91 # or nil if the given path doesn't exist in the repository
92 def entries(path=nil, identifier=nil, options={})
93 path ||= ''
94 entries = Entries.new
95 identifier = -1 unless identifier && identifier.to_i > 0
96 cmd_args = %w|ls -v --show-ids|
97 cmd_args << "-r#{identifier.to_i}"
98 cmd_args << bzr_target(path)
99 scm_cmd(*cmd_args) do |io|
100 prefix_utf8 = "#{url}/#{path}".gsub('\\', '/')
101 logger.debug "PREFIX: #{prefix_utf8}"
102 prefix = scm_iconv(@path_encoding, 'UTF-8', prefix_utf8)
103 prefix.force_encoding('ASCII-8BIT') if prefix.respond_to?(:force_encoding)
104 re = %r{^V\s+(#{Regexp.escape(prefix)})?(\/?)([^\/]+)(\/?)\s+(\S+)\r?$}
105 io.each_line do |line|
106 next unless line =~ re
107 name_locale = $3.strip
108 name = scm_iconv('UTF-8', @path_encoding, name_locale)
109 entries << Entry.new({:name => name,
110 :path => ((path.empty? ? "" : "#{path}/") + name),
111 :kind => ($4.blank? ? 'file' : 'dir'),
112 :size => nil,
113 :lastrev => Revision.new(:revision => $5.strip)
114 })
115 end
116 end
117 if logger && logger.debug?
118 logger.debug("Found #{entries.size} entries in the repository for #{target(path)}")
119 end
120 entries.sort_by_name
121 rescue ScmCommandAborted
122 return nil
123 end
124
125 def revisions(path=nil, identifier_from=nil, identifier_to=nil, options={})
126 path ||= ''
127 identifier_from = (identifier_from and identifier_from.to_i > 0) ? identifier_from.to_i : 'last:1'
128 identifier_to = (identifier_to and identifier_to.to_i > 0) ? identifier_to.to_i : 1
129 revisions = Revisions.new
130 cmd_args = %w|log -v --show-ids|
131 cmd_args << "-r#{identifier_to}..#{identifier_from}"
132 cmd_args << bzr_target(path)
133 scm_cmd(*cmd_args) do |io|
134 revision = nil
135 parsing = nil
136 io.each_line do |line|
137 if line =~ /^----/
138 revisions << revision if revision
139 revision = Revision.new(:paths => [], :message => '')
140 parsing = nil
141 else
142 next unless revision
143 if line =~ /^revno: (\d+)($|\s\[merge\]$)/
144 revision.identifier = $1.to_i
145 elsif line =~ /^committer: (.+)$/
146 revision.author = $1.strip
147 elsif line =~ /^revision-id:(.+)$/
148 revision.scmid = $1.strip
149 elsif line =~ /^timestamp: (.+)$/
150 revision.time = Time.parse($1).localtime
151 elsif line =~ /^ -----/
152 # partial revisions
153 parsing = nil unless parsing == 'message'
154 elsif line =~ /^(message|added|modified|removed|renamed):/
155 parsing = $1
156 elsif line =~ /^ (.*)$/
157 if parsing == 'message'
158 revision.message << "#{$1}\n"
159 else
160 if $1 =~ /^(.*)\s+(\S+)$/
161 path_locale = $1.strip
162 path = scm_iconv('UTF-8', @path_encoding, path_locale)
163 revid = $2
164 case parsing
165 when 'added'
166 revision.paths << {:action => 'A', :path => "/#{path}", :revision => revid}
167 when 'modified'
168 revision.paths << {:action => 'M', :path => "/#{path}", :revision => revid}
169 when 'removed'
170 revision.paths << {:action => 'D', :path => "/#{path}", :revision => revid}
171 when 'renamed'
172 new_path = path.split('=>').last
173 if new_path
174 revision.paths << {:action => 'M', :path => "/#{new_path.strip}",
175 :revision => revid}
176 end
177 end
178 end
179 end
180 else
181 parsing = nil
182 end
183 end
184 end
185 revisions << revision if revision
186 end
187 revisions
188 rescue ScmCommandAborted
189 return nil
190 end
191
192 def diff(path, identifier_from, identifier_to=nil)
193 path ||= ''
194 if identifier_to
195 identifier_to = identifier_to.to_i
196 else
197 identifier_to = identifier_from.to_i - 1
198 end
199 if identifier_from
200 identifier_from = identifier_from.to_i
201 end
202 diff = []
203 cmd_args = %w|diff|
204 cmd_args << "-r#{identifier_to}..#{identifier_from}"
205 cmd_args << bzr_target(path)
206 scm_cmd_no_raise(*cmd_args) do |io|
207 io.each_line do |line|
208 diff << line
209 end
210 end
211 diff
212 end
213
214 def cat(path, identifier=nil)
215 cat = nil
216 cmd_args = %w|cat|
217 cmd_args << "-r#{identifier.to_i}" if identifier && identifier.to_i > 0
218 cmd_args << bzr_target(path)
219 scm_cmd(*cmd_args) do |io|
220 io.binmode
221 cat = io.read
222 end
223 cat
224 rescue ScmCommandAborted
225 return nil
226 end
227
228 def annotate(path, identifier=nil)
229 blame = Annotate.new
230 cmd_args = %w|annotate -q --all|
231 cmd_args << "-r#{identifier.to_i}" if identifier && identifier.to_i > 0
232 cmd_args << bzr_target(path)
233 scm_cmd(*cmd_args) do |io|
234 author = nil
235 identifier = nil
236 io.each_line do |line|
237 next unless line =~ %r{^(\d+) ([^|]+)\| (.*)$}
238 rev = $1
239 blame.add_line($3.rstrip,
240 Revision.new(
241 :identifier => rev,
242 :revision => rev,
243 :author => $2.strip
244 ))
245 end
246 end
247 blame
248 rescue ScmCommandAborted
249 return nil
250 end
251
252 def self.branch_conf_path(path)
253 bcp = nil
254 m = path.match(%r{^(.*[/\\])\.bzr.*$})
255 if m
256 bcp = m[1]
257 else
258 bcp = path
259 end
260 bcp.gsub!(%r{[\/\\]$}, "")
261 if bcp
262 bcp = File.join(bcp, ".bzr", "branch", "branch.conf")
263 end
264 bcp
265 end
266
267 def append_revisions_only
268 return @aro if ! @aro.nil?
269 @aro = false
270 bcp = self.class.branch_conf_path(url)
271 if bcp && File.exist?(bcp)
272 begin
273 f = File::open(bcp, "r")
274 cnt = 0
275 f.each_line do |line|
276 l = line.chomp.to_s
277 if l =~ /^\s*append_revisions_only\s*=\s*(\w+)\s*$/
278 str_aro = $1
279 if str_aro.upcase == "TRUE"
280 @aro = true
281 cnt += 1
282 elsif str_aro.upcase == "FALSE"
283 @aro = false
284 cnt += 1
285 end
286 if cnt > 1
287 @aro = false
288 break
289 end
290 end
291 end
292 ensure
293 f.close
294 end
295 end
296 @aro
297 end
298
299 def scm_cmd(*args, &block)
300 full_args = []
301 full_args += args
302 full_args_locale = []
303 full_args.map do |e|
304 full_args_locale << scm_iconv(@path_encoding, 'UTF-8', e)
305 end
306 ret = shellout(
307 self.class.sq_bin + ' ' +
308 full_args_locale.map { |e| shell_quote e.to_s }.join(' '),
309 &block
310 )
311 if $? && $?.exitstatus != 0
312 raise ScmCommandAborted, "bzr exited with non-zero status: #{$?.exitstatus}"
313 end
314 ret
315 end
316 private :scm_cmd
317
318 def scm_cmd_no_raise(*args, &block)
319 full_args = []
320 full_args += args
321 full_args_locale = []
322 full_args.map do |e|
323 full_args_locale << scm_iconv(@path_encoding, 'UTF-8', e)
324 end
325 ret = shellout(
326 self.class.sq_bin + ' ' +
327 full_args_locale.map { |e| shell_quote e.to_s }.join(' '),
328 &block
329 )
330 ret
331 end
332 private :scm_cmd_no_raise
333
334 def bzr_target(path)
335 target(path, false)
336 end
337 private :bzr_target
338 end
339 end
340 end
341 end