puppet-retrospec 0.7.0 → 0.7.2

data/vendor/gems/puppet-3.7.3/lib/puppet/type/ssh_authorized_key.rb

@@ -0,0 +1,153 @@
+module Puppet
+  newtype(:ssh_authorized_key) do
+    @doc = "Manages SSH authorized keys. Currently only type 2 keys are supported.
+
+      In their native habitat, SSH keys usually appear as a single long line. This
+      resource type requires you to split that line into several attributes. Thus, a
+      key that appears in your `~/.ssh/id_rsa.pub` file like this...
+
+          ssh-rsa AAAAB3NzaC1yc2EAAAABIwAAAQEAy5mtOAMHwA2ZAIfW6Ap70r+I4EclYHEec5xIN59ROUjss23Skb1OtjzYpVPaPH8mSdSmsN0JHaBLiRcu7stl4O8D8zA4mz/vw32yyQ/Kqaxw8l0K76k6t2hKOGqLTY4aFbFISV6GDh7MYLn8KU7cGp96J+caO5R5TqtsStytsUhSyqH+iIDh4e4+BrwTc6V4Y0hgFxaZV5d18mLA4EPYKeG5+zyBCVu+jueYwFqM55E0tHbfiaIN9IzdLV+7NEEfdLkp6w2baLKPqWUBmuvPF1Mn3FwaFLjVsMT3GQeMue6b3FtUdTDeyAYoTxrsRo/WnDkS6Pa3YhrFwjtUqXfdaQ== nick@magpie.puppetlabs.lan
+
+      ...would translate to the following resource:
+
+          ssh_authorized_key { 'nick@magpie.puppetlabs.lan':
+            user => 'nick',
+            type => 'ssh-rsa',
+            key  => 'AAAAB3NzaC1yc2EAAAABIwAAAQEAy5mtOAMHwA2ZAIfW6Ap70r+I4EclYHEec5xIN59ROUjss23Skb1OtjzYpVPaPH8mSdSmsN0JHaBLiRcu7stl4O8D8zA4mz/vw32yyQ/Kqaxw8l0K76k6t2hKOGqLTY4aFbFISV6GDh7MYLn8KU7cGp96J+caO5R5TqtsStytsUhSyqH+iIDh4e4+BrwTc6V4Y0hgFxaZV5d18mLA4EPYKeG5+zyBCVu+jueYwFqM55E0tHbfiaIN9IzdLV+7NEEfdLkp6w2baLKPqWUBmuvPF1Mn3FwaFLjVsMT3GQeMue6b3FtUdTDeyAYoTxrsRo/WnDkS6Pa3YhrFwjtUqXfdaQ==',
+          }
+
+      To ensure that only the currently approved keys are present, you can purge
+      unmanaged SSH keys on a per-user basis. Do this with the `user` resource
+      type's `purge_ssh_keys` attribute:
+
+          user { 'nick':
+            ensure         => present,
+            purge_ssh_keys => true,
+          }
+
+      This will remove any keys in `~/.ssh/authorized_keys` that aren't being
+      managed with `ssh_authorized_key` resources. See the documentation of the
+      `user` type for more details.
+
+      **Autorequires:** If Puppet is managing the user account in which this
+      SSH key should be installed, the `ssh_authorized_key` resource will autorequire
+      that user."
+
+    ensurable
+
+    newparam(:name) do
+      desc "The SSH key comment. This attribute is currently used as a
+        system-wide primary key and therefore has to be unique."
+
+      isnamevar
+
+    end
+
+    newproperty(:type) do
+      desc "The encryption type used."
+
+      newvalues :'ssh-dss', :'ssh-rsa', :'ecdsa-sha2-nistp256', :'ecdsa-sha2-nistp384', :'ecdsa-sha2-nistp521', :'ssh-ed25519'
+
+      aliasvalue(:dsa, :'ssh-dss')
+      aliasvalue(:ed25519, :'ssh-ed25519')
+      aliasvalue(:rsa, :'ssh-rsa')
+    end
+
+    newproperty(:key) do
+      desc "The public key itself; generally a long string of hex characters. The `key`
+        attribute may not contain whitespace.
+
+        Make sure to omit the following in this attribute (and specify them in
+        other attributes):
+
+        * Key headers (e.g. 'ssh-rsa') --- put these in the `type` attribute.
+        * Key identifiers / comments (e.g. 'joe@joescomputer.local') --- put these in
+          the `name` attribute/resource title."
+
+      validate do |value|
+        raise Puppet::Error, "Key must not contain whitespace: #{value}" if value =~ /\s/
+      end
+    end
+
+    newproperty(:user) do
+      desc "The user account in which the SSH key should be installed. The resource
+        will autorequire this user if it is being managed as a `user` resource."
+    end
+
+    newproperty(:target) do
+      desc "The absolute filename in which to store the SSH key. This
+        property is optional and should only be used in cases where keys
+        are stored in a non-standard location (i.e.` not in
+        `~user/.ssh/authorized_keys`)."
+
+      defaultto :absent
+
+      def should
+        return super if defined?(@should) and @should[0] != :absent
+
+        return nil unless user = resource[:user]
+
+        begin
+          return File.expand_path("~#{user}/.ssh/authorized_keys")
+        rescue
+          Puppet.debug "The required user is not yet present on the system"
+          return nil
+        end
+      end
+
+      def insync?(is)
+        is == should
+      end
+    end
+
+    newproperty(:options, :array_matching => :all) do
+      desc "Key options; see sshd(8) for possible values. Multiple values
+        should be specified as an array."
+
+      defaultto do :absent end
+
+      def is_to_s(value)
+        if value == :absent or value.include?(:absent)
+          super
+        else
+          value.join(",")
+        end
+      end
+
+      def should_to_s(value)
+        if value == :absent or value.include?(:absent)
+          super
+        else
+          value.join(",")
+        end
+      end
+
+      validate do |value|
+        unless value == :absent or value =~ /^[-a-z0-9A-Z_]+(?:=\".*?\")?$/
+          raise Puppet::Error, "Option #{value} is not valid. A single option must either be of the form 'option' or 'option=\"value\". Multiple options must be provided as an array"
+        end
+      end
+    end
+
+    autorequire(:user) do
+      should(:user) if should(:user)
+    end
+
+    validate do
+      # Go ahead if target attribute is defined
+      return if @parameters[:target].shouldorig[0] != :absent
+
+      # Go ahead if user attribute is defined
+      return if @parameters.include?(:user)
+
+      # If neither target nor user is defined, this is an error
+      raise Puppet::Error, "Attribute 'user' or 'target' is mandatory"
+    end
+
+    # regular expression suitable for use by a ParsedFile based provider
+    REGEX = /^(?:(.+) )?(ssh-dss|ssh-ed25519|ssh-rsa|ecdsa-sha2-nistp256|ecdsa-sha2-nistp384|ecdsa-sha2-nistp521) ([^ ]+) ?(.*)$/
+    def self.keyline_regex
+      REGEX
+    end
+  end
+end

data/vendor/gems/puppet-3.7.3/lib/puppet/type/sshkey.rb

@@ -0,0 +1,73 @@
+module Puppet
+  newtype(:sshkey) do
+    @doc = "Installs and manages ssh host keys.  At this point, this type
+      only knows how to install keys into `/etc/ssh/ssh_known_hosts`.  See
+      the `ssh_authorized_key` type to manage authorized keys."
+
+    ensurable
+
+    newproperty(:type) do
+      desc "The encryption type used.  Probably ssh-dss or ssh-rsa."
+
+      newvalues :'ssh-dss', :'ssh-ed25519', :'ssh-rsa', :'ecdsa-sha2-nistp256', :'ecdsa-sha2-nistp384', :'ecdsa-sha2-nistp521'
+
+      aliasvalue(:dsa, :'ssh-dss')
+      aliasvalue(:ed25519, :'ssh-ed25519')
+      aliasvalue(:rsa, :'ssh-rsa')
+    end
+
+    newproperty(:key) do
+      desc "The key itself; generally a long string of uuencoded characters."
+    end
+
+    # FIXME This should automagically check for aliases to the hosts, just
+    # to see if we can automatically glean any aliases.
+    newproperty(:host_aliases) do
+      desc 'Any aliases the host might have.  Multiple values must be
+        specified as an array.'
+
+      attr_accessor :meta
+
+      def insync?(is)
+        is == @should
+      end
+      # We actually want to return the whole array here, not just the first
+      # value.
+      def should
+        defined?(@should) ? @should : nil
+      end
+
+      validate do |value|
+        if value =~ /\s/
+          raise Puppet::Error, "Aliases cannot include whitespace"
+        end
+        if value =~ /,/
+          raise Puppet::Error, "Aliases must be provided as an array, not a comma-separated list"
+        end
+      end
+    end
+
+    newparam(:name) do
+      desc "The host name that the key is associated with."
+
+      isnamevar
+
+      validate do |value|
+        raise Puppet::Error, "Resourcename cannot include whitespaces" if value =~ /\s/
+        raise Puppet::Error, "No comma in resourcename allowed. If you want to specify aliases use the host_aliases property" if value.include?(',')
+      end
+    end
+
+    newproperty(:target) do
+      desc "The file in which to store the ssh key.  Only used by
+        the `parsed` provider."
+
+      defaultto { if @resource.class.defaultprovider.ancestors.include?(Puppet::Provider::ParsedFile)
+        @resource.class.defaultprovider.default_target
+        else
+          nil
+        end
+      }
+    end
+  end
+end

data/vendor/gems/puppet-3.7.3/lib/puppet/type/stage.rb

@@ -0,0 +1,27 @@
+Puppet::Type.newtype(:stage) do
+  desc "A resource type for creating new run stages.  Once a stage is available,
+    classes can be assigned to it by declaring them with the resource-like syntax
+    and using
+    [the `stage` metaparameter](http://docs.puppetlabs.com/references/latest/metaparameter.html#stage).
+
+    Note that new stages are not useful unless you also declare their order
+    in relation to the default `main` stage.
+
+    A complete run stage example:
+
+        stage { 'pre':
+          before => Stage['main'],
+        }
+
+        class { 'apt-updates':
+          stage => 'pre',
+        }
+
+    Individual resources cannot be assigned to run stages; you can only set stages
+    for classes."
+
+  newparam :name do
+    desc "The name of the stage. Use this as the value for the `stage` metaparameter
+      when assigning classes to this stage."
+  end
+end

data/vendor/gems/puppet-3.7.3/lib/puppet/type/tidy.rb

@@ -0,0 +1,324 @@
+require 'puppet/parameter/boolean'
+
+Puppet::Type.newtype(:tidy) do
+  require 'puppet/file_serving/fileset'
+  require 'puppet/file_bucket/dipper'
+
+  @doc = "Remove unwanted files based on specific criteria.  Multiple
+    criteria are OR'd together, so a file that is too large but is not
+    old enough will still get tidied.
+
+    If you don't specify either `age` or `size`, then all files will
+    be removed.
+
+    This resource type works by generating a file resource for every file
+    that should be deleted and then letting that resource perform the
+    actual deletion.
+    "
+
+  newparam(:path) do
+    desc "The path to the file or directory to manage.  Must be fully
+      qualified."
+    isnamevar
+  end
+
+  newparam(:recurse) do
+    desc "If target is a directory, recursively descend
+      into the directory looking for files to tidy."
+
+    newvalues(:true, :false, :inf, /^[0-9]+$/)
+
+    # Replace the validation so that we allow numbers in
+    # addition to string representations of them.
+    validate { |arg| }
+    munge do |value|
+      newval = super(value)
+      case newval
+      when :true, :inf; true
+      when :false; false
+      when Integer, Fixnum, Bignum; value
+      when /^\d+$/; Integer(value)
+      else
+        raise ArgumentError, "Invalid recurse value #{value.inspect}"
+      end
+    end
+  end
+
+  newparam(:matches) do
+    desc <<-'EOT'
+      One or more (shell type) file glob patterns, which restrict
+      the list of files to be tidied to those whose basenames match
+      at least one of the patterns specified. Multiple patterns can
+      be specified using an array.
+
+      Example:
+
+          tidy { "/tmp":
+            age     => "1w",
+            recurse => 1,
+            matches => [ "[0-9]pub*.tmp", "*.temp", "tmpfile?" ]
+          }
+
+      This removes files from `/tmp` if they are one week old or older,
+      are not in a subdirectory and match one of the shell globs given.
+
+      Note that the patterns are matched against the basename of each
+      file -- that is, your glob patterns should not have any '/'
+      characters in them, since you are only specifying against the last
+      bit of the file.
+
+      Finally, note that you must now specify a non-zero/non-false value
+      for recurse if matches is used, as matches only apply to files found
+      by recursion (there's no reason to use static patterns match against
+      a statically determined path).  Requiering explicit recursion clears
+      up a common source of confusion.
+    EOT
+
+    # Make sure we convert to an array.
+    munge do |value|
+      fail "Tidy can't use matches with recurse 0, false, or undef" if "#{@resource[:recurse]}" =~ /^(0|false|)$/
+      [value].flatten
+    end
+
+    # Does a given path match our glob patterns, if any?  Return true
+    # if no patterns have been provided.
+    def tidy?(path, stat)
+      basename = File.basename(path)
+      flags = File::FNM_DOTMATCH | File::FNM_PATHNAME
+      return(value.find {|pattern| File.fnmatch(pattern, basename, flags) } ? true : false)
+    end
+  end
+
+  newparam(:backup) do
+    desc "Whether tidied files should be backed up.  Any values are passed
+      directly to the file resources used for actual file deletion, so consult
+      the `file` type's backup documentation to determine valid values."
+  end
+
+  newparam(:age) do
+    desc "Tidy files whose age is equal to or greater than
+      the specified time.  You can choose seconds, minutes,
+      hours, days, or weeks by specifying the first letter of any
+      of those words (e.g., '1w').
+
+      Specifying 0 will remove all files."
+
+    AgeConvertors = {
+      :s => 1,
+      :m => 60,
+      :h => 60 * 60,
+      :d => 60 * 60 * 24,
+      :w => 60 * 60 * 24 * 7,
+    }
+
+    def convert(unit, multi)
+      if num = AgeConvertors[unit]
+        return num * multi
+      else
+        self.fail "Invalid age unit '#{unit}'"
+      end
+    end
+
+    def tidy?(path, stat)
+      # If the file's older than we allow, we should get rid of it.
+      (Time.now.to_i - stat.send(resource[:type]).to_i) > value
+    end
+
+    munge do |age|
+      unit = multi = nil
+      case age
+      when /^([0-9]+)(\w)\w*$/
+        multi = Integer($1)
+        unit = $2.downcase.intern
+      when /^([0-9]+)$/
+        multi = Integer($1)
+        unit = :d
+      else
+        self.fail "Invalid tidy age #{age}"
+      end
+
+      convert(unit, multi)
+    end
+  end
+
+  newparam(:size) do
+    desc "Tidy files whose size is equal to or greater than
+      the specified size.  Unqualified values are in kilobytes, but
+      *b*, *k*, *m*, *g*, and *t* can be appended to specify *bytes*,
+      *kilobytes*, *megabytes*, *gigabytes*, and *terabytes*, respectively.
+      Only the first character is significant, so the full word can also
+      be used."
+
+    def convert(unit, multi)
+      if num = { :b => 0, :k => 1, :m => 2, :g => 3, :t => 4 }[unit]
+        result = multi
+        num.times do result *= 1024 end
+        return result
+      else
+        self.fail "Invalid size unit '#{unit}'"
+      end
+    end
+
+    def tidy?(path, stat)
+      stat.size >= value
+    end
+
+    munge do |size|
+      case size
+      when /^([0-9]+)(\w)\w*$/
+        multi = Integer($1)
+        unit = $2.downcase.intern
+      when /^([0-9]+)$/
+        multi = Integer($1)
+        unit = :k
+      else
+        self.fail "Invalid tidy size #{age}"
+      end
+
+      convert(unit, multi)
+    end
+  end
+
+  newparam(:type) do
+    desc "Set the mechanism for determining age. Default: atime."
+
+    newvalues(:atime, :mtime, :ctime)
+
+    defaultto :atime
+  end
+
+  newparam(:rmdirs, :boolean => true, :parent => Puppet::Parameter::Boolean) do
+    desc "Tidy directories in addition to files; that is, remove
+      directories whose age is older than the specified criteria.
+      This will only remove empty directories, so all contained
+      files must also be tidied before a directory gets removed."
+  end
+
+  # Erase PFile's validate method
+  validate do
+  end
+
+  def self.instances
+    []
+  end
+
+  def depthfirst?
+    true
+  end
+
+  def initialize(hash)
+    super
+
+    # only allow backing up into filebuckets
+    self[:backup] = false unless self[:backup].is_a? Puppet::FileBucket::Dipper
+  end
+
+  # Make a file resource to remove a given file.
+  def mkfile(path)
+    # Force deletion, so directories actually get deleted.
+    Puppet::Type.type(:file).new :path => path, :backup => self[:backup], :ensure => :absent, :force => true
+  end
+
+  def retrieve
+    # Our ensure property knows how to retrieve everything for us.
+    if obj = @parameters[:ensure]
+      return obj.retrieve
+    else
+      return {}
+    end
+  end
+
+  # Hack things a bit so we only ever check the ensure property.
+  def properties
+    []
+  end
+
+  def generate
+    return [] unless stat(self[:path])
+
+    case self[:recurse]
+    when Integer, Fixnum, Bignum, /^\d+$/
+      parameter = { :recurse => true, :recurselimit => self[:recurse] }
+    when true, :true, :inf
+      parameter = { :recurse => true }
+    end
+
+    if parameter
+      files = Puppet::FileServing::Fileset.new(self[:path], parameter).files.collect do |f|
+        f == "." ? self[:path] : ::File.join(self[:path], f)
+      end
+    else
+      files = [self[:path]]
+    end
+    result = files.find_all { |path| tidy?(path) }.collect { |path| mkfile(path) }.each { |file| notice "Tidying #{file.ref}" }.sort { |a,b| b[:path] <=> a[:path] }
+
+    # No need to worry about relationships if we don't have rmdirs; there won't be
+    # any directories.
+    return result unless rmdirs?
+
+    # Now make sure that all directories require the files they contain, if all are available,
+    # so that a directory is emptied before we try to remove it.
+    files_by_name = result.inject({}) { |hash, file| hash[file[:path]] = file; hash }
+
+    files_by_name.keys.sort { |a,b| b <=> b }.each do |path|
+      dir = ::File.dirname(path)
+      next unless resource = files_by_name[dir]
+      if resource[:require]
+        resource[:require] << Puppet::Resource.new(:file, path)
+      else
+        resource[:require] = [Puppet::Resource.new(:file, path)]
+      end
+    end
+
+    result
+  end
+
+  # Does a given path match our glob patterns, if any?  Return true
+  # if no patterns have been provided.
+  def matches?(path)
+    return true unless self[:matches]
+
+    basename = File.basename(path)
+    flags = File::FNM_DOTMATCH | File::FNM_PATHNAME
+    if self[:matches].find {|pattern| File.fnmatch(pattern, basename, flags) }
+      return true
+    else
+      debug "No specified patterns match #{path}, not tidying"
+      return false
+    end
+  end
+
+  # Should we remove the specified file?
+  def tidy?(path)
+    return false unless stat = self.stat(path)
+
+    return false if stat.ftype == "directory" and ! rmdirs?
+
+    # The 'matches' parameter isn't OR'ed with the other tests --
+    # it's just used to reduce the list of files we can match.
+    return false if param = parameter(:matches) and ! param.tidy?(path, stat)
+
+    tested = false
+    [:age, :size].each do |name|
+      next unless param = parameter(name)
+      tested = true
+      return true if param.tidy?(path, stat)
+    end
+
+    # If they don't specify either, then the file should always be removed.
+    return true unless tested
+    false
+  end
+
+  def stat(path)
+    begin
+      Puppet::FileSystem.lstat(path)
+    rescue Errno::ENOENT => error
+      info "File does not exist"
+      return nil
+    rescue Errno::EACCES => error
+      warning "Could not stat; permission denied"
+      return nil
+    end
+  end
+end