mirror of
https://github.com/sstent/Vagrant_Openstack.git
synced 2026-01-25 22:52:45 +00:00
adding new vcsrepo
This commit is contained in:
34
modules/vcsrepo/lib/puppet/provider/vcsrepo.rb
Normal file
34
modules/vcsrepo/lib/puppet/provider/vcsrepo.rb
Normal file
@@ -0,0 +1,34 @@
|
||||
require 'tmpdir'
|
||||
require 'digest/md5'
|
||||
require 'fileutils'
|
||||
|
||||
# Abstract
|
||||
class Puppet::Provider::Vcsrepo < Puppet::Provider
|
||||
|
||||
private
|
||||
|
||||
def set_ownership
|
||||
owner = @resource.value(:owner) || nil
|
||||
group = @resource.value(:group) || nil
|
||||
FileUtils.chown_R(owner, group, @resource.value(:path))
|
||||
end
|
||||
|
||||
def path_exists?
|
||||
File.directory?(@resource.value(:path))
|
||||
end
|
||||
|
||||
# Note: We don't rely on Dir.chdir's behavior of automatically returning the
|
||||
# value of the last statement -- for easier stubbing.
|
||||
def at_path(&block) #:nodoc:
|
||||
value = nil
|
||||
Dir.chdir(@resource.value(:path)) do
|
||||
value = yield
|
||||
end
|
||||
value
|
||||
end
|
||||
|
||||
def tempdir
|
||||
@tempdir ||= File.join(Dir.tmpdir, 'vcsrepo-' + Digest::MD5.hexdigest(@resource.value(:path)))
|
||||
end
|
||||
|
||||
end
|
||||
85
modules/vcsrepo/lib/puppet/provider/vcsrepo/bzr.rb
Normal file
85
modules/vcsrepo/lib/puppet/provider/vcsrepo/bzr.rb
Normal file
@@ -0,0 +1,85 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:bzr, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Supports Bazaar repositories"
|
||||
|
||||
optional_commands :bzr => 'bzr'
|
||||
has_features :reference_tracking
|
||||
|
||||
def create
|
||||
if !@resource.value(:source)
|
||||
create_repository(@resource.value(:path))
|
||||
else
|
||||
clone_repository(@resource.value(:revision))
|
||||
end
|
||||
end
|
||||
|
||||
def working_copy_exists?
|
||||
File.directory?(File.join(@resource.value(:path), '.bzr'))
|
||||
end
|
||||
|
||||
def exists?
|
||||
working_copy_exists?
|
||||
end
|
||||
|
||||
def destroy
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
end
|
||||
|
||||
def revision
|
||||
at_path do
|
||||
current_revid = bzr('version-info')[/^revision-id:\s+(\S+)/, 1]
|
||||
desired = @resource.value(:revision)
|
||||
begin
|
||||
desired_revid = bzr('revision-info', desired).strip.split(/\s+/).last
|
||||
rescue Puppet::ExecutionFailure
|
||||
# Possible revid available during update (but definitely not current)
|
||||
desired_revid = nil
|
||||
end
|
||||
if current_revid == desired_revid
|
||||
desired
|
||||
else
|
||||
current_revid
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def revision=(desired)
|
||||
at_path do
|
||||
begin
|
||||
bzr('update', '-r', desired)
|
||||
rescue Puppet::ExecutionFailure
|
||||
bzr('update', '-r', desired, ':parent')
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def latest
|
||||
at_path do
|
||||
bzr('version-info', ':parent')[/^revision-id:\s+(\S+)/, 1]
|
||||
end
|
||||
end
|
||||
|
||||
def latest?
|
||||
at_path do
|
||||
return self.revision == self.latest
|
||||
end
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def create_repository(path)
|
||||
bzr('init', path)
|
||||
end
|
||||
|
||||
def clone_repository(revision)
|
||||
args = ['branch']
|
||||
if revision
|
||||
args.push('-r', revision)
|
||||
end
|
||||
args.push(@resource.value(:source),
|
||||
@resource.value(:path))
|
||||
bzr(*args)
|
||||
end
|
||||
|
||||
end
|
||||
119
modules/vcsrepo/lib/puppet/provider/vcsrepo/cvs.rb
Normal file
119
modules/vcsrepo/lib/puppet/provider/vcsrepo/cvs.rb
Normal file
@@ -0,0 +1,119 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:cvs, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Supports CVS repositories/workspaces"
|
||||
|
||||
optional_commands :cvs => 'cvs'
|
||||
has_features :gzip_compression, :reference_tracking, :modules
|
||||
|
||||
def create
|
||||
if !@resource.value(:source)
|
||||
create_repository(@resource.value(:path))
|
||||
else
|
||||
checkout_repository
|
||||
end
|
||||
update_owner
|
||||
end
|
||||
|
||||
def exists?
|
||||
if @resource.value(:source)
|
||||
directory = File.join(@resource.value(:path), 'CVS')
|
||||
else
|
||||
directory = File.join(@resource.value(:path), 'CVSROOT')
|
||||
end
|
||||
File.directory?(directory)
|
||||
end
|
||||
|
||||
def working_copy_exists?
|
||||
File.directory?(File.join(@resource.value(:path), 'CVS'))
|
||||
end
|
||||
|
||||
def destroy
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
end
|
||||
|
||||
def latest?
|
||||
debug "Checking for updates because 'ensure => latest'"
|
||||
at_path do
|
||||
# We cannot use -P to prune empty dirs, otherwise
|
||||
# CVS would report those as "missing", regardless
|
||||
# if they have contents or updates.
|
||||
is_current = (cvs('-nq', 'update', '-d').strip == "")
|
||||
if (!is_current) then debug "There are updates available on the checkout's current branch/tag." end
|
||||
return is_current
|
||||
end
|
||||
end
|
||||
|
||||
def latest
|
||||
# CVS does not have a conecpt like commit-IDs or change
|
||||
# sets, so we can only have the current branch name (or the
|
||||
# requested one, if that differs) as the "latest" revision.
|
||||
should = @resource.value(:revision)
|
||||
current = self.revision
|
||||
return should != current ? should : current
|
||||
end
|
||||
|
||||
def revision
|
||||
if !@rev
|
||||
if File.exist?(tag_file)
|
||||
contents = File.read(tag_file).strip
|
||||
# Note: Doesn't differentiate between N and T entries
|
||||
@rev = contents[1..-1]
|
||||
else
|
||||
@rev = 'HEAD'
|
||||
end
|
||||
debug "Checkout is on branch/tag '#{@rev}'"
|
||||
end
|
||||
return @rev
|
||||
end
|
||||
|
||||
def revision=(desired)
|
||||
at_path do
|
||||
cvs('update', '-dr', desired, '.')
|
||||
update_owner
|
||||
@rev = desired
|
||||
end
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def tag_file
|
||||
File.join(@resource.value(:path), 'CVS', 'Tag')
|
||||
end
|
||||
|
||||
def checkout_repository
|
||||
dirname, basename = File.split(@resource.value(:path))
|
||||
Dir.chdir(dirname) do
|
||||
args = ['-d', @resource.value(:source)]
|
||||
if @resource.value(:compression)
|
||||
args.push('-z', @resource.value(:compression))
|
||||
end
|
||||
args.push('checkout')
|
||||
if @resource.value(:revision)
|
||||
args.push('-r', @resource.value(:revision))
|
||||
end
|
||||
args.push('-d', basename, module_name)
|
||||
cvs(*args)
|
||||
end
|
||||
end
|
||||
|
||||
# When the source:
|
||||
# * Starts with ':' (eg, :pserver:...)
|
||||
def module_name
|
||||
if (m = @resource.value(:module))
|
||||
m
|
||||
elsif (source = @resource.value(:source))
|
||||
source[0, 1] == ':' ? File.basename(source) : '.'
|
||||
end
|
||||
end
|
||||
|
||||
def create_repository(path)
|
||||
cvs('-d', path, 'init')
|
||||
end
|
||||
|
||||
def update_owner
|
||||
if @resource.value(:owner) or @resource.value(:group)
|
||||
set_ownership
|
||||
end
|
||||
end
|
||||
end
|
||||
12
modules/vcsrepo/lib/puppet/provider/vcsrepo/dummy.rb
Normal file
12
modules/vcsrepo/lib/puppet/provider/vcsrepo/dummy.rb
Normal file
@@ -0,0 +1,12 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:dummy, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Dummy default provider"
|
||||
|
||||
defaultfor :vcsrepo => :dummy
|
||||
|
||||
def working_copy_exists?
|
||||
providers = @resource.class.providers.map{|x| x.to_s}.sort.reject{|x| x == "dummy"}.join(", ") rescue "none"
|
||||
raise("vcsrepo resource must have a provider, available: #{providers}")
|
||||
end
|
||||
end
|
||||
315
modules/vcsrepo/lib/puppet/provider/vcsrepo/git.rb
Normal file
315
modules/vcsrepo/lib/puppet/provider/vcsrepo/git.rb
Normal file
@@ -0,0 +1,315 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:git, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Supports Git repositories"
|
||||
|
||||
##TODO modify the commands below so that the su - is included
|
||||
optional_commands :git => 'git',
|
||||
:su => 'su'
|
||||
has_features :bare_repositories, :reference_tracking, :ssh_identity, :multiple_remotes, :user
|
||||
|
||||
def create
|
||||
if !@resource.value(:source)
|
||||
init_repository(@resource.value(:path))
|
||||
else
|
||||
clone_repository(@resource.value(:source), @resource.value(:path))
|
||||
if @resource.value(:revision)
|
||||
if @resource.value(:ensure) == :bare
|
||||
notice "Ignoring revision for bare repository"
|
||||
else
|
||||
checkout
|
||||
end
|
||||
end
|
||||
if @resource.value(:ensure) != :bare
|
||||
update_submodules
|
||||
end
|
||||
end
|
||||
update_owner_and_excludes
|
||||
end
|
||||
|
||||
def destroy
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
end
|
||||
|
||||
def latest?
|
||||
at_path do
|
||||
return self.revision == self.latest
|
||||
end
|
||||
end
|
||||
|
||||
def latest
|
||||
branch = on_branch?
|
||||
if branch == 'master'
|
||||
return get_revision("#{@resource.value(:remote)}/HEAD")
|
||||
elsif branch == '(no branch)'
|
||||
return get_revision('HEAD')
|
||||
else
|
||||
return get_revision("#{@resource.value(:remote)}/%s" % branch)
|
||||
end
|
||||
end
|
||||
|
||||
def revision
|
||||
update_references
|
||||
current = at_path { git_with_identity('rev-parse', 'HEAD').chomp }
|
||||
return current unless @resource.value(:revision)
|
||||
|
||||
if tag_revision?(@resource.value(:revision))
|
||||
canonical = at_path { git_with_identity('show', @resource.value(:revision)).scan(/^commit (.*)/).to_s }
|
||||
else
|
||||
canonical = at_path { git_with_identity('rev-parse', @resource.value(:revision)).chomp }
|
||||
end
|
||||
|
||||
if current == canonical
|
||||
@resource.value(:revision)
|
||||
else
|
||||
current
|
||||
end
|
||||
end
|
||||
|
||||
def revision=(desired)
|
||||
checkout(desired)
|
||||
if local_branch_revision?(desired)
|
||||
# reset instead of pull to avoid merge conflicts. assuming remote is
|
||||
# authoritative.
|
||||
# might be worthwhile to have an allow_local_changes param to decide
|
||||
# whether to reset or pull when we're ensuring latest.
|
||||
at_path { git_with_identity('reset', '--hard', "#{@resource.value(:remote)}/#{desired}") }
|
||||
end
|
||||
if @resource.value(:ensure) != :bare
|
||||
update_submodules
|
||||
end
|
||||
update_owner_and_excludes
|
||||
end
|
||||
|
||||
def bare_exists?
|
||||
bare_git_config_exists? && !working_copy_exists?
|
||||
end
|
||||
|
||||
def working_copy_exists?
|
||||
File.directory?(File.join(@resource.value(:path), '.git'))
|
||||
end
|
||||
|
||||
def exists?
|
||||
working_copy_exists? || bare_exists?
|
||||
end
|
||||
|
||||
def update_remote_origin_url
|
||||
current = git_with_identity('config', 'remote.origin.url')
|
||||
unless @resource.value(:source).nil?
|
||||
if current.nil? or current.strip != @resource.value(:source)
|
||||
git_with_identity('config', 'remote.origin.url', @resource.value(:source))
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def update_references
|
||||
at_path do
|
||||
update_remote_origin_url
|
||||
git_with_identity('fetch', @resource.value(:remote))
|
||||
git_with_identity('fetch', '--tags', @resource.value(:remote))
|
||||
update_owner_and_excludes
|
||||
end
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def bare_git_config_exists?
|
||||
File.exist?(File.join(@resource.value(:path), 'config'))
|
||||
end
|
||||
|
||||
def clone_repository(source, path)
|
||||
check_force
|
||||
args = ['clone']
|
||||
if @resource.value(:ensure) == :bare
|
||||
args << '--bare'
|
||||
end
|
||||
if !File.exist?(File.join(@resource.value(:path), '.git'))
|
||||
args.push(source, path)
|
||||
Dir.chdir("/") do
|
||||
git_with_identity(*args)
|
||||
end
|
||||
else
|
||||
notice "Repo has already been cloned"
|
||||
end
|
||||
end
|
||||
|
||||
def check_force
|
||||
if path_exists?
|
||||
if @resource.value(:force)
|
||||
notice "Removing %s to replace with vcsrepo." % @resource.value(:path)
|
||||
destroy
|
||||
else
|
||||
raise Puppet::Error, "Could not create repository (non-repository at path)"
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def init_repository(path)
|
||||
check_force
|
||||
if @resource.value(:ensure) == :bare && working_copy_exists?
|
||||
convert_working_copy_to_bare
|
||||
elsif @resource.value(:ensure) == :present && bare_exists?
|
||||
convert_bare_to_working_copy
|
||||
else
|
||||
# normal init
|
||||
FileUtils.mkdir(@resource.value(:path))
|
||||
FileUtils.chown(@resource.value(:user), nil, @resource.value(:path)) if @resource.value(:user)
|
||||
args = ['init']
|
||||
if @resource.value(:ensure) == :bare
|
||||
args << '--bare'
|
||||
end
|
||||
at_path do
|
||||
git_with_identity(*args)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
# Convert working copy to bare
|
||||
#
|
||||
# Moves:
|
||||
# <path>/.git
|
||||
# to:
|
||||
# <path>/
|
||||
def convert_working_copy_to_bare
|
||||
notice "Converting working copy repository to bare repository"
|
||||
FileUtils.mv(File.join(@resource.value(:path), '.git'), tempdir)
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
FileUtils.mv(tempdir, @resource.value(:path))
|
||||
end
|
||||
|
||||
# Convert bare to working copy
|
||||
#
|
||||
# Moves:
|
||||
# <path>/
|
||||
# to:
|
||||
# <path>/.git
|
||||
def convert_bare_to_working_copy
|
||||
notice "Converting bare repository to working copy repository"
|
||||
FileUtils.mv(@resource.value(:path), tempdir)
|
||||
FileUtils.mkdir(@resource.value(:path))
|
||||
FileUtils.mv(tempdir, File.join(@resource.value(:path), '.git'))
|
||||
if commits_in?(File.join(@resource.value(:path), '.git'))
|
||||
reset('HEAD')
|
||||
git_with_identity('checkout', '-f')
|
||||
update_owner_and_excludes
|
||||
end
|
||||
end
|
||||
|
||||
def commits_in?(dot_git)
|
||||
Dir.glob(File.join(dot_git, 'objects/info/*'), File::FNM_DOTMATCH) do |e|
|
||||
return true unless %w(. ..).include?(File::basename(e))
|
||||
end
|
||||
false
|
||||
end
|
||||
|
||||
def checkout(revision = @resource.value(:revision))
|
||||
if !local_branch_revision? && remote_branch_revision?
|
||||
at_path { git_with_identity('checkout', '-b', revision, '--track', "#{@resource.value(:remote)}/#{revision}") }
|
||||
else
|
||||
at_path { git_with_identity('checkout', '--force', revision) }
|
||||
end
|
||||
end
|
||||
|
||||
def reset(desired)
|
||||
at_path do
|
||||
git_with_identity('reset', '--hard', desired)
|
||||
end
|
||||
end
|
||||
|
||||
def update_submodules
|
||||
at_path do
|
||||
git_with_identity('submodule', 'init')
|
||||
git_with_identity('submodule', 'update')
|
||||
git_with_identity('submodule', 'foreach', 'git', 'submodule', 'init')
|
||||
git_with_identity('submodule', 'foreach', 'git', 'submodule', 'update')
|
||||
end
|
||||
end
|
||||
|
||||
def remote_branch_revision?(revision = @resource.value(:revision))
|
||||
# git < 1.6 returns '#{@resource.value(:remote)}/#{revision}'
|
||||
# git 1.6+ returns 'remotes/#{@resource.value(:remote)}/#{revision}'
|
||||
branch = at_path { branches.grep /(remotes\/)?#{@resource.value(:remote)}\/#{revision}/ }
|
||||
if branch.length > 0
|
||||
return branch
|
||||
end
|
||||
end
|
||||
|
||||
def local_branch_revision?(revision = @resource.value(:revision))
|
||||
at_path { branches.include?(revision) }
|
||||
end
|
||||
|
||||
def tag_revision?(revision = @resource.value(:revision))
|
||||
at_path { tags.include?(revision) }
|
||||
end
|
||||
|
||||
def branches
|
||||
at_path { git_with_identity('branch', '-a') }.gsub('*', ' ').split(/\n/).map { |line| line.strip }
|
||||
end
|
||||
|
||||
def on_branch?
|
||||
at_path { git_with_identity('branch', '-a') }.split(/\n/).grep(/\*/).first.to_s.gsub('*', '').strip
|
||||
end
|
||||
|
||||
def tags
|
||||
at_path { git_with_identity('tag', '-l') }.split(/\n/).map { |line| line.strip }
|
||||
end
|
||||
|
||||
def set_excludes
|
||||
at_path { open('.git/info/exclude', 'w') { |f| @resource.value(:excludes).each { |ex| f.write(ex + "\n") }}}
|
||||
end
|
||||
|
||||
def get_revision(rev)
|
||||
if !working_copy_exists?
|
||||
create
|
||||
end
|
||||
at_path do
|
||||
update_remote_origin_url
|
||||
git_with_identity('fetch', @resource.value(:remote))
|
||||
git_with_identity('fetch', '--tags', @resource.value(:remote))
|
||||
end
|
||||
current = at_path { git_with_identity('rev-parse', rev).strip }
|
||||
if @resource.value(:revision)
|
||||
if local_branch_revision?
|
||||
canonical = at_path { git_with_identity('rev-parse', @resource.value(:revision)).strip }
|
||||
elsif remote_branch_revision?
|
||||
canonical = at_path { git_with_identity('rev-parse', "#{@resource.value(:remote)}/" + @resource.value(:revision)).strip }
|
||||
end
|
||||
current = @resource.value(:revision) if current == canonical
|
||||
end
|
||||
update_owner_and_excludes
|
||||
return current
|
||||
end
|
||||
|
||||
def update_owner_and_excludes
|
||||
if @resource.value(:owner) or @resource.value(:group)
|
||||
set_ownership
|
||||
end
|
||||
if @resource.value(:excludes)
|
||||
set_excludes
|
||||
end
|
||||
end
|
||||
|
||||
def git_with_identity(*args)
|
||||
if @resource.value(:identity)
|
||||
Tempfile.open('git-helper') do |f|
|
||||
f.puts '#!/bin/sh'
|
||||
f.puts "exec ssh -oStrictHostKeyChecking=no -oPasswordAuthentication=no -oKbdInteractiveAuthentication=no -oChallengeResponseAuthentication=no -oConnectTimeout=120 -i #{@resource.value(:identity)} $*"
|
||||
f.close
|
||||
|
||||
FileUtils.chmod(0755, f.path)
|
||||
env_save = ENV['GIT_SSH']
|
||||
ENV['GIT_SSH'] = f.path
|
||||
|
||||
ret = git(*args)
|
||||
|
||||
ENV['GIT_SSH'] = env_save
|
||||
|
||||
return ret
|
||||
end
|
||||
elsif @resource.value(:user)
|
||||
su(@resource.value(:user), '-c', "git #{args.join(' ')}" )
|
||||
else
|
||||
git(*args)
|
||||
end
|
||||
end
|
||||
end
|
||||
103
modules/vcsrepo/lib/puppet/provider/vcsrepo/hg.rb
Normal file
103
modules/vcsrepo/lib/puppet/provider/vcsrepo/hg.rb
Normal file
@@ -0,0 +1,103 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:hg, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Supports Mercurial repositories"
|
||||
|
||||
optional_commands :hg => 'hg'
|
||||
has_features :reference_tracking
|
||||
|
||||
def create
|
||||
if !@resource.value(:source)
|
||||
create_repository(@resource.value(:path))
|
||||
else
|
||||
clone_repository(@resource.value(:revision))
|
||||
end
|
||||
update_owner
|
||||
end
|
||||
|
||||
def working_copy_exists?
|
||||
File.directory?(File.join(@resource.value(:path), '.hg'))
|
||||
end
|
||||
|
||||
def exists?
|
||||
working_copy_exists?
|
||||
end
|
||||
|
||||
def destroy
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
end
|
||||
|
||||
def latest?
|
||||
at_path do
|
||||
return self.revision == self.latest
|
||||
end
|
||||
end
|
||||
|
||||
def latest
|
||||
at_path do
|
||||
begin
|
||||
hg('incoming', '--branch', '.', '--newest-first', '--limit', '1')[/^changeset:\s+(?:-?\d+):(\S+)/m, 1]
|
||||
rescue Puppet::ExecutionFailure
|
||||
# If there are no new changesets, return the current nodeid
|
||||
self.revision
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def revision
|
||||
at_path do
|
||||
current = hg('parents')[/^changeset:\s+(?:-?\d+):(\S+)/m, 1]
|
||||
desired = @resource.value(:revision)
|
||||
if desired
|
||||
# Return the tag name if it maps to the current nodeid
|
||||
mapped = hg('tags')[/^#{Regexp.quote(desired)}\s+\d+:(\S+)/m, 1]
|
||||
if current == mapped
|
||||
desired
|
||||
else
|
||||
current
|
||||
end
|
||||
else
|
||||
current
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def revision=(desired)
|
||||
at_path do
|
||||
begin
|
||||
hg('pull')
|
||||
rescue
|
||||
end
|
||||
begin
|
||||
hg('merge')
|
||||
rescue Puppet::ExecutionFailure
|
||||
# If there's nothing to merge, just skip
|
||||
end
|
||||
hg('update', '--clean', '-r', desired)
|
||||
end
|
||||
update_owner
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def create_repository(path)
|
||||
hg('init', path)
|
||||
end
|
||||
|
||||
def clone_repository(revision)
|
||||
args = ['clone']
|
||||
if revision
|
||||
args.push('-u', revision)
|
||||
end
|
||||
args.push(@resource.value(:source),
|
||||
@resource.value(:path))
|
||||
hg(*args)
|
||||
end
|
||||
|
||||
def update_owner
|
||||
if @resource.value(:owner) or @resource.value(:group)
|
||||
set_ownership
|
||||
end
|
||||
end
|
||||
|
||||
end
|
||||
106
modules/vcsrepo/lib/puppet/provider/vcsrepo/svn.rb
Normal file
106
modules/vcsrepo/lib/puppet/provider/vcsrepo/svn.rb
Normal file
@@ -0,0 +1,106 @@
|
||||
require File.join(File.dirname(__FILE__), '..', 'vcsrepo')
|
||||
|
||||
Puppet::Type.type(:vcsrepo).provide(:svn, :parent => Puppet::Provider::Vcsrepo) do
|
||||
desc "Supports Subversion repositories"
|
||||
|
||||
optional_commands :svn => 'svn',
|
||||
:svnadmin => 'svnadmin'
|
||||
|
||||
has_features :filesystem_types, :reference_tracking, :basic_auth
|
||||
|
||||
def create
|
||||
if !@resource.value(:source)
|
||||
create_repository(@resource.value(:path))
|
||||
else
|
||||
checkout_repository(@resource.value(:source),
|
||||
@resource.value(:path),
|
||||
@resource.value(:revision))
|
||||
end
|
||||
update_owner
|
||||
end
|
||||
|
||||
def working_copy_exists?
|
||||
File.directory?(File.join(@resource.value(:path), '.svn'))
|
||||
end
|
||||
|
||||
def exists?
|
||||
working_copy_exists?
|
||||
end
|
||||
|
||||
def destroy
|
||||
FileUtils.rm_rf(@resource.value(:path))
|
||||
end
|
||||
|
||||
def latest?
|
||||
at_path do
|
||||
if self.revision < self.latest then
|
||||
return false
|
||||
else
|
||||
return true
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def buildargs
|
||||
args = ['--non-interactive']
|
||||
if @resource.value(:basic_auth_username) && @resource.value(:basic_auth_password)
|
||||
args.push('--username', @resource.value(:basic_auth_username))
|
||||
args.push('--password', @resource.value(:basic_auth_password))
|
||||
args.push('--no-auth-cache')
|
||||
end
|
||||
|
||||
if @resource.value(:force)
|
||||
args.push('--force')
|
||||
end
|
||||
|
||||
return args
|
||||
end
|
||||
|
||||
def latest
|
||||
args = buildargs.push('info', '-r', 'HEAD')
|
||||
at_path do
|
||||
svn(*args)[/^Last Changed Rev:\s+(\d+)/m, 1]
|
||||
end
|
||||
end
|
||||
|
||||
def revision
|
||||
args = buildargs.push('info')
|
||||
at_path do
|
||||
svn(*args)[/^Last Changed Rev:\s+(\d+)/m, 1]
|
||||
end
|
||||
end
|
||||
|
||||
def revision=(desired)
|
||||
args = buildargs.push('update', '-r', desired)
|
||||
at_path do
|
||||
svn(*args)
|
||||
end
|
||||
update_owner
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def checkout_repository(source, path, revision)
|
||||
args = buildargs.push('checkout')
|
||||
if revision
|
||||
args.push('-r', revision)
|
||||
end
|
||||
args.push(source, path)
|
||||
svn(*args)
|
||||
end
|
||||
|
||||
def create_repository(path)
|
||||
args = ['create']
|
||||
if @resource.value(:fstype)
|
||||
args.push('--fs-type', @resource.value(:fstype))
|
||||
end
|
||||
args << path
|
||||
svnadmin(*args)
|
||||
end
|
||||
|
||||
def update_owner
|
||||
if @resource.value(:owner) or @resource.value(:group)
|
||||
set_ownership
|
||||
end
|
||||
end
|
||||
end
|
||||
180
modules/vcsrepo/lib/puppet/type/vcsrepo.rb
Normal file
180
modules/vcsrepo/lib/puppet/type/vcsrepo.rb
Normal file
@@ -0,0 +1,180 @@
|
||||
require 'pathname'
|
||||
|
||||
Puppet::Type.newtype(:vcsrepo) do
|
||||
desc "A local version control repository"
|
||||
|
||||
feature :gzip_compression,
|
||||
"The provider supports explicit GZip compression levels"
|
||||
feature :basic_auth,
|
||||
"The provider supports HTTP Basic Authentication"
|
||||
feature :bare_repositories,
|
||||
"The provider differentiates between bare repositories
|
||||
and those with working copies",
|
||||
:methods => [:bare_exists?, :working_copy_exists?]
|
||||
|
||||
feature :filesystem_types,
|
||||
"The provider supports different filesystem types"
|
||||
|
||||
feature :reference_tracking,
|
||||
"The provider supports tracking revision references that can change
|
||||
over time (eg, some VCS tags and branch names)"
|
||||
|
||||
feature :ssh_identity,
|
||||
"The provider supports a configurable SSH identity file"
|
||||
|
||||
feature :user,
|
||||
"The provider can run as a different user"
|
||||
|
||||
feature :modules,
|
||||
"The repository contains modules that can be chosen of"
|
||||
|
||||
feature :multiple_remotes,
|
||||
"The repository tracks multiple remote repositories"
|
||||
|
||||
ensurable do
|
||||
attr_accessor :latest
|
||||
|
||||
def insync?(is)
|
||||
@should ||= []
|
||||
|
||||
case should
|
||||
when :present
|
||||
return true unless [:absent, :purged, :held].include?(is)
|
||||
when :latest
|
||||
if is == :latest
|
||||
return true
|
||||
else
|
||||
return false
|
||||
end
|
||||
when :bare
|
||||
return is == :bare
|
||||
end
|
||||
end
|
||||
|
||||
newvalue :present do
|
||||
notice "Creating repository from present"
|
||||
provider.create
|
||||
end
|
||||
|
||||
newvalue :bare, :required_features => [:bare_repositories] do
|
||||
if !provider.exists?
|
||||
provider.create
|
||||
end
|
||||
end
|
||||
|
||||
newvalue :absent do
|
||||
provider.destroy
|
||||
end
|
||||
|
||||
newvalue :latest, :required_features => [:reference_tracking] do
|
||||
if provider.exists?
|
||||
if provider.respond_to?(:update_references)
|
||||
provider.update_references
|
||||
end
|
||||
if provider.respond_to?(:latest?)
|
||||
reference = provider.latest || provider.revision
|
||||
else
|
||||
reference = resource.value(:revision) || provider.revision
|
||||
end
|
||||
notice "Updating to latest '#{reference}' revision"
|
||||
provider.revision = reference
|
||||
else
|
||||
notice "Creating repository from latest"
|
||||
provider.create
|
||||
end
|
||||
end
|
||||
|
||||
def retrieve
|
||||
prov = @resource.provider
|
||||
if prov
|
||||
if prov.working_copy_exists?
|
||||
(@should.include?(:latest) && prov.latest?) ? :latest : :present
|
||||
elsif prov.class.feature?(:bare_repositories) and prov.bare_exists?
|
||||
:bare
|
||||
else
|
||||
:absent
|
||||
end
|
||||
else
|
||||
raise Puppet::Error, "Could not find provider"
|
||||
end
|
||||
end
|
||||
|
||||
end
|
||||
|
||||
newparam :path do
|
||||
desc "Absolute path to repository"
|
||||
isnamevar
|
||||
validate do |value|
|
||||
path = Pathname.new(value)
|
||||
unless path.absolute?
|
||||
raise ArgumentError, "Path must be absolute: #{path}"
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
newparam :source do
|
||||
desc "The source URI for the repository"
|
||||
end
|
||||
|
||||
newparam :fstype, :required_features => [:filesystem_types] do
|
||||
desc "Filesystem type"
|
||||
end
|
||||
|
||||
newproperty :revision do
|
||||
desc "The revision of the repository"
|
||||
newvalue(/^\S+$/)
|
||||
end
|
||||
|
||||
newparam :owner do
|
||||
desc "The user/uid that owns the repository files"
|
||||
end
|
||||
|
||||
newparam :group do
|
||||
desc "The group/gid that owns the repository files"
|
||||
end
|
||||
|
||||
newparam :user do
|
||||
desc "The user to run for repository operations"
|
||||
end
|
||||
|
||||
newparam :excludes do
|
||||
desc "Files to be excluded from the repository"
|
||||
end
|
||||
|
||||
newparam :force do
|
||||
desc "Force repository creation, destroying any files on the path in the process."
|
||||
newvalues(:true, :false)
|
||||
defaultto false
|
||||
end
|
||||
|
||||
newparam :compression, :required_features => [:gzip_compression] do
|
||||
desc "Compression level"
|
||||
validate do |amount|
|
||||
unless Integer(amount).between?(0, 6)
|
||||
raise ArgumentError, "Unsupported compression level: #{amount} (expected 0-6)"
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
newparam :basic_auth_username, :required_features => [:basic_auth] do
|
||||
desc "HTTP Basic Auth username"
|
||||
end
|
||||
|
||||
newparam :basic_auth_password, :required_features => [:basic_auth] do
|
||||
desc "HTTP Basic Auth password"
|
||||
end
|
||||
|
||||
newparam :identity, :required_features => [:ssh_identity] do
|
||||
desc "SSH identity file"
|
||||
end
|
||||
|
||||
newparam :module, :required_features => [:modules] do
|
||||
desc "The repository module to manage"
|
||||
end
|
||||
|
||||
newparam :remote, :required_features => [:multiple_remotes] do
|
||||
desc "The remote repository to track"
|
||||
defaultto "origin"
|
||||
end
|
||||
|
||||
end
|
||||
Reference in New Issue
Block a user