jro_apps/redmine Commit - r1873:36aeeb99d901

90

$force = false

90

$force = false

91

$scm = 'Subversion'

91

$scm = 'Subversion'

92

93

def log(text,level=0, exit=false)

93

def log(text, options={})

94

level = options[:level] || 0

94

puts text unless $quiet or level > $verbose

95

puts text unless $quiet or level > $verbose

95

exit 1 if exit

96

exit 1 if options[:exit]

96

end

97

end

97

98

def system_or_raise(command)

99

def system_or_raise(command)

126

when '--redmine-host'; $redmine_host = arg.dup

127

when '--redmine-host'; $redmine_host = arg.dup

127

when '--owner'; $svn_owner = arg.dup; $use_groupid = false;

128

when '--owner'; $svn_owner = arg.dup; $use_groupid = false;

128

when '--url'; $svn_url = arg.dup

129

when '--url'; $svn_url = arg.dup

129

when '--scm'; $scm = arg.dup.capitalize; log("Invalid SCM: #{$scm}", 0, true) unless SUPPORTED_SCM.include?($scm)

130

when '--scm'; $scm = arg.dup.capitalize; log("Invalid SCM: #{$scm}", :exit => true) unless SUPPORTED_SCM.include?($scm)

130

when '--command'; $command = arg.dup

131

when '--command'; $command = arg.dup

131

when '--verbose'; $verbose += 1

132

when '--verbose'; $verbose += 1

132

when '--test'; $test = true

133

when '--test'; $test = true

149

begin

150

begin

150

scm_module = SCM.const_get($scm)

151

scm_module = SCM.const_get($scm)

151

rescue

152

rescue

152

log("Please use --command option to specify how to create a #{$scm} repository.", 0, true)

153

log("Please use --command option to specify how to create a #{$scm} repository.", :exit => true)

153

end

154

end

154

end

155

end

155

156

160

end

161

end

161

162

unless File.directory?($repos_base)

163

unless File.directory?($repos_base)

163

log("directory '#{$repos_base}' doesn't exists", 0, true)

164

log("directory '#{$repos_base}' doesn't exists", :exit => true)

164

end

165

end

165

166

log("querying Redmine for projects...", 1);

167

log("querying Redmine for projects...", :level => 1);

167

168

$redmine_host.gsub!(/^/, "http://") unless $redmine_host.match("^https?://")

169

$redmine_host.gsub!(/^/, "http://") unless $redmine_host.match("^https?://")

169

$redmine_host.gsub!(/\/$/, '')

170

$redmine_host.gsub!(/\/$/, '')

173

begin

174

begin

174

soap = SOAP::WSDLDriverFactory.new(wsdl_url).create_rpc_driver

175

soap = SOAP::WSDLDriverFactory.new(wsdl_url).create_rpc_driver

175

rescue => e

176

rescue => e

176

log("Unable to connect to #{wsdl_url} : #{e}", 0, true)

177

log("Unable to connect to #{wsdl_url} : #{e}", :exit => true)

177

end

178

end

178

179

projects = soap.ProjectsWithRepositoryEnabled

180

projects = soap.ProjectsWithRepositoryEnabled

180

181

if projects.nil?

182

if projects.nil?

182

log('no project found, perhaps you forgot to "Enable WS for repository management"', 0, true)

183

log('no project found, perhaps you forgot to "Enable WS for repository management"', :exit => true)

183

end

184

end

184

185

log("retrieved #{projects.size} projects", 1)

186

log("retrieved #{projects.size} projects", :level => 1)

186

187

def set_owner_and_rights(project, repos_path, &block)

188

def set_owner_and_rights(project, repos_path, &block)

188

if RUBY_PLATFORM =~ /mswin/

189

if RUBY_PLATFORM =~ /mswin/

209

end

210

end

210

211

projects.each do |project|

212

projects.each do |project|

212

log("treating project #{project.name}", 1)

213

log("treating project #{project.name}", :level => 1)

213

214

if project.identifier.empty?

215

if project.identifier.empty?

215

log("\tno identifier for project #{project.name}")

216

log("\tno identifier for project #{project.name}")

247

# if repository is already declared in redmine, we don't create

248

# if repository is already declared in redmine, we don't create

248

# unless user use -f with reposman

249

# unless user use -f with reposman

249

if $force == false and not project.repository.nil?

250

if $force == false and not project.repository.nil?

250

log("\trepository for project #{project.identifier} already exists in Redmine", 1)

251

log("\trepository for project #{project.identifier} already exists in Redmine", :level => 1)

251

end

253

end

253

254

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

             $force        = false
             $scm          = 'Subversion'
-            def log(text,level=0, exit=false)
+            def log(text, options={})
+              level = options[:level] || 0
               puts text unless $quiet or level > $verbose
-              exit 1 if exit
+              exit 1 if options[:exit]
             end
             def system_or_raise(command)
                 when '--redmine-host';   $redmine_host = arg.dup
                 when '--owner';          $svn_owner    = arg.dup; $use_groupid = false;
                 when '--url';            $svn_url      = arg.dup
-                when '--scm';            $scm          = arg.dup.capitalize; log("Invalid SCM: #{$scm}", 0, true) unless SUPPORTED_SCM.include?($scm)
+                when '--scm';            $scm          = arg.dup.capitalize; log("Invalid SCM: #{$scm}", :exit => true) unless SUPPORTED_SCM.include?($scm)
                 when '--command';        $command =      arg.dup
                 when '--verbose';        $verbose += 1
                 when '--test';           $test = true
               begin
                 scm_module = SCM.const_get($scm)
               rescue
-                log("Please use --command option to specify how to create a #{$scm} repository.", 0, true)
+                log("Please use --command option to specify how to create a #{$scm} repository.", :exit => true)
               end
             end
             end
             unless File.directory?($repos_base)
-              log("directory '#{$repos_base}' doesn't exists", 0, true)
+              log("directory '#{$repos_base}' doesn't exists", :exit => true)
             end
-            log("querying Redmine for projects...", 1);
+            log("querying Redmine for projects...", :level => 1);
             $redmine_host.gsub!(/^/, "http://") unless $redmine_host.match("^https?://")
             $redmine_host.gsub!(/\/$/, '')
             begin
               soap = SOAP::WSDLDriverFactory.new(wsdl_url).create_rpc_driver
             rescue => e
-              log("Unable to connect to #{wsdl_url} : #{e}", 0, true)
+              log("Unable to connect to #{wsdl_url} : #{e}", :exit => true)
             end
             projects = soap.ProjectsWithRepositoryEnabled
             if projects.nil?
-              log('no project found, perhaps you forgot to "Enable WS for repository management"', 0, true)
+              log('no project found, perhaps you forgot to "Enable WS for repository management"', :exit => true)
             end
-            log("retrieved #{projects.size} projects", 1)
+            log("retrieved #{projects.size} projects", :level => 1)
             def set_owner_and_rights(project, repos_path, &block)
               if RUBY_PLATFORM =~ /mswin/
             end
             projects.each do |project|
-              log("treating project #{project.name}", 1)
+              log("treating project #{project.name}", :level => 1)
               if project.identifier.empty?
                 log("\tno identifier for project #{project.name}")
                 # if repository is already declared in redmine, we don't create
                 # unless user use -f with reposman
                 if $force == false and not project.repository.nil?
-                  log("\trepository for project #{project.identifier} already exists in Redmine", 1)
+                  log("\trepository for project #{project.identifier} already exists in Redmine", :level => 1)
                   next
                 end