puppet-retrospec 0.7.0 → 0.7.2

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

@@ -0,0 +1,98 @@
+Puppet::Type.newtype(:mcx) do
+
+  @doc = "MCX object management using DirectoryService on OS X.
+
+The default provider of this type merely manages the XML plist as
+reported by the `dscl -mcxexport` command.  This is similar to the
+content property of the file type in Puppet.
+
+The recommended method of using this type is to use Work Group Manager
+to manage users and groups on the local computer, record the resulting
+puppet manifest using the command `puppet resource mcx`, then deploy it
+to other machines.
+
+**Autorequires:** If Puppet is managing the user, group, or computer that these
+MCX settings refer to, the MCX resource will autorequire that user, group, or computer.
+"
+  feature :manages_content, \
+    "The provider can manage MCXSettings as a string.",
+    :methods => [:content, :content=]
+
+  ensurable do
+    desc "Create or remove the MCX setting."
+
+    newvalue(:present) do
+      provider.create
+    end
+
+    newvalue(:absent) do
+      provider.destroy
+    end
+
+  end
+
+  newparam(:name) do
+    desc "The name of the resource being managed.
+    The default naming convention follows Directory Service paths:
+
+        /Computers/localhost
+        /Groups/admin
+        /Users/localadmin
+
+    The `ds_type` and `ds_name` type parameters are not necessary if the
+    default naming convention is followed."
+    isnamevar
+  end
+
+  newparam(:ds_type) do
+
+    desc "The DirectoryService type this MCX setting attaches to."
+
+    newvalues(:user, :group, :computer, :computerlist)
+
+  end
+
+  newparam(:ds_name) do
+    desc "The name to attach the MCX Setting to. (For example, `localhost`
+    when `ds_type => computer`.) This setting is not required, as it can be
+    automatically discovered when the resource name is parseable.  (For
+    example, in `/Groups/admin`, `group` will be used as the dstype.)"
+  end
+
+  newproperty(:content, :required_features => :manages_content) do
+    desc "The XML Plist used as the value of MCXSettings in DirectoryService.
+    This is the standard output from the system command:
+
+        dscl localhost -mcxexport /Local/Default/<ds_type>/ds_name
+
+    Note that `ds_type` is capitalized and plural in the dscl command."
+  end
+
+  # JJM Yes, this is not DRY at all.  Because of the code blocks
+  # autorequire must be done this way.  I think.
+
+  def setup_autorequire(type)
+    # value returns a Symbol
+    ds_type = value(:ds_type)
+    ds_name = value(:ds_name)
+    if ds_type == type
+      rval = [ ds_name.to_s ]
+    else
+      rval = [ ]
+    end
+    rval
+  end
+
+  autorequire(:user) do
+    setup_autorequire(:user)
+  end
+
+  autorequire(:group) do
+    setup_autorequire(:group)
+  end
+
+  autorequire(:computer) do
+    setup_autorequire(:computer)
+  end
+
+end

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

@@ -0,0 +1,286 @@
+require 'puppet/property/boolean'
+
+module Puppet
+  # We want the mount to refresh when it changes.
+  newtype(:mount, :self_refresh => true) do
+    @doc = "Manages mounted filesystems, including putting mount
+      information into the mount table. The actual behavior depends
+      on the value of the 'ensure' parameter.
+
+      **Refresh:** `mount` resources can respond to refresh events (via
+      `notify`, `subscribe`, or the `~>` arrow). If a `mount` receives an event
+      from another resource **and** its `ensure` attribute is set to `mounted`,
+      Puppet will try to unmount then remount that filesystem.
+
+      **Autorequires:** If Puppet is managing any parents of a mount resource ---
+      that is, other mount points higher up in the filesystem --- the child
+      mount will autorequire them."
+
+    feature :refreshable, "The provider can remount the filesystem.",
+      :methods => [:remount]
+
+    # Use the normal parent class, because we actually want to
+    # call code when sync is called.
+    newproperty(:ensure) do
+      desc "Control what to do with this mount. Set this attribute to
+        `unmounted` to make sure the filesystem is in the filesystem table
+        but not mounted (if the filesystem is currently mounted, it will be
+        unmounted).  Set it to `absent` to unmount (if necessary) and remove
+        the filesystem from the fstab.  Set to `mounted` to add it to the
+        fstab and mount it. Set to `present` to add to fstab but not change
+        mount/unmount status."
+
+      #  IS        -> SHOULD     In Sync  Action
+      #  ghost     -> present    NO       create
+      #  absent    -> present    NO       create
+      # (mounted   -> present    YES)
+      # (unmounted -> present    YES)
+      newvalue(:defined) do
+        provider.create
+        return :mount_created
+      end
+
+      aliasvalue :present, :defined
+
+      #  IS        -> SHOULD     In Sync  Action
+      #  ghost     -> unmounted  NO       create, unmount
+      #  absent    -> unmounted  NO       create
+      #  mounted   -> unmounted  NO       unmount
+      newvalue(:unmounted) do
+        case self.retrieve
+        when :ghost   # (not in fstab but mounted)
+          provider.create
+          @resource.flush
+          provider.unmount
+          return :mount_unmounted
+        when nil, :absent  # (not in fstab and not mounted)
+          provider.create
+          return :mount_created
+        when :mounted # (in fstab and mounted)
+          provider.unmount
+          syncothers # I guess it's more likely that the mount was originally mounted with
+                     # the wrong attributes so I sync AFTER the umount
+          return :mount_unmounted
+        else
+          raise Puppet::Error, "Unexpected change from #{current_value} to unmounted}"
+        end
+      end
+
+      #  IS        -> SHOULD     In Sync  Action
+      #  ghost     -> absent     NO       unmount
+      #  mounted   -> absent     NO       provider.destroy AND unmount
+      #  unmounted -> absent     NO       provider.destroy
+      newvalue(:absent, :event => :mount_deleted) do
+        current_value = self.retrieve
+        provider.unmount if provider.mounted?
+        provider.destroy unless current_value == :ghost
+      end
+
+      #  IS        -> SHOULD     In Sync  Action
+      #  ghost     -> mounted    NO       provider.create
+      #  absent    -> mounted    NO       provider.create AND mount
+      #  unmounted -> mounted    NO       mount
+      newvalue(:mounted, :event => :mount_mounted) do
+        # Create the mount point if it does not already exist.
+        current_value = self.retrieve
+        currently_mounted = provider.mounted?
+        provider.create if [nil, :absent, :ghost].include?(current_value)
+
+        syncothers
+
+        # The fs can be already mounted if it was absent but mounted
+        provider.property_hash[:needs_mount] = true unless currently_mounted
+      end
+
+      # insync: mounted   -> present
+      #         unmounted -> present
+      def insync?(is)
+        if should == :defined and [:mounted,:unmounted].include?(is)
+          true
+        else
+          super
+        end
+      end
+
+      def syncothers
+        # We have to flush any changes to disk.
+        currentvalues = @resource.retrieve_resource
+
+        # Determine if there are any out-of-sync properties.
+        oos = @resource.send(:properties).find_all do |prop|
+          unless currentvalues.include?(prop)
+            raise Puppet::DevError, "Parent has property %s but it doesn't appear in the current values", [prop.name]
+          end
+          if prop.name == :ensure
+            false
+          else
+            ! prop.safe_insync?(currentvalues[prop])
+          end
+        end.each { |prop| prop.sync }.length
+        @resource.flush if oos > 0
+      end
+    end
+
+    newproperty(:device) do
+      desc "The device providing the mount.  This can be whatever
+        device is supporting by the mount, including network
+        devices or devices specified by UUID rather than device
+        path, depending on the operating system."
+
+      validate do |value|
+        raise Puppet::Error, "device must not contain whitespace: #{value}" if value =~ /\s/
+      end
+    end
+
+    # Solaris specifies two devices, not just one.
+    newproperty(:blockdevice) do
+      desc "The device to fsck.  This is property is only valid
+        on Solaris, and in most cases will default to the correct
+        value."
+
+      # Default to the device but with "dsk" replaced with "rdsk".
+      defaultto do
+        if Facter.value(:osfamily) == "Solaris"
+          if device = resource[:device] and device =~ %r{/dsk/}
+            device.sub(%r{/dsk/}, "/rdsk/")
+          elsif fstype = resource[:fstype] and fstype == 'nfs'
+            '-'
+          else
+            nil
+          end
+        else
+          nil
+        end
+      end
+
+      validate do |value|
+        raise Puppet::Error, "blockdevice must not contain whitespace: #{value}" if value =~ /\s/
+      end
+    end
+
+    newproperty(:fstype) do
+      desc "The mount type.  Valid values depend on the
+        operating system.  This is a required option."
+
+      validate do |value|
+        raise Puppet::Error, "fstype must not contain whitespace: #{value}" if value =~ /\s/
+      end
+    end
+
+    newproperty(:options) do
+      desc "Mount options for the mounts, as they would
+        appear in the fstab."
+
+      validate do |value|
+        raise Puppet::Error, "option must not contain whitespace: #{value}" if value =~ /\s/
+      end
+    end
+
+    newproperty(:pass) do
+      desc "The pass in which the mount is checked."
+
+      defaultto {
+        if @resource.managed?
+          if Facter.value(:osfamily) == 'Solaris'
+            '-'
+          else
+            0
+          end
+        end
+      }
+    end
+
+    newproperty(:atboot, :parent => Puppet::Property::Boolean) do
+      desc "Whether to mount the mount at boot.  Not all platforms
+        support this."
+
+      def munge(value)
+        munged = super
+        if munged
+          :yes
+        else
+          :no
+        end
+      end
+    end
+
+    newproperty(:dump) do
+      desc "Whether to dump the mount.  Not all platform support this.
+        Valid values are `1` or `0` (or `2` on FreeBSD). Default is `0`."
+
+      if Facter.value(:operatingsystem) == "FreeBSD"
+        newvalue(%r{(0|1|2)})
+      else
+        newvalue(%r{(0|1)})
+      end
+
+      defaultto {
+        0 if @resource.managed?
+      }
+    end
+
+    newproperty(:target) do
+      desc "The file in which to store the mount table.  Only used by
+        those providers that write to disk."
+
+      defaultto { if @resource.class.defaultprovider.ancestors.include?(Puppet::Provider::ParsedFile)
+          @resource.class.defaultprovider.default_target
+        else
+          nil
+        end
+      }
+    end
+
+    newparam(:name) do
+      desc "The mount path for the mount."
+
+      isnamevar
+
+      validate do |value|
+        raise Puppet::Error, "name must not contain whitespace: #{value}" if value =~ /\s/
+      end
+
+      munge do |value|
+        value.gsub(/^(.+?)\/*$/, '\1')
+      end
+    end
+
+    newparam(:remounts) do
+      desc "Whether the mount can be remounted  `mount -o remount`.  If
+        this is false, then the filesystem will be unmounted and remounted
+        manually, which is prone to failure."
+
+      newvalues(:true, :false)
+      defaultto do
+        case Facter.value(:operatingsystem)
+        when "FreeBSD", "Darwin", "AIX", "DragonFly", "OpenBSD"
+          false
+        else
+          true
+        end
+      end
+    end
+
+    def refresh
+      # Only remount if we're supposed to be mounted.
+      provider.remount if self.should(:fstype) != "swap" and provider.mounted?
+    end
+
+    def value(name)
+      name = name.intern
+      if property = @parameters[name]
+        return property.value
+      end
+    end
+
+    # Ensure that mounts higher up in the filesystem are mounted first
+    autorequire(:mount) do
+      dependencies = []
+      Pathname.new(@parameters[:name].value).ascend do |parent|
+        dependencies.unshift parent.to_s
+      end
+      dependencies[0..-2]
+    end
+
+  end
+end

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :command

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :contact

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :contactgroup

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :host

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :hostdependency

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :hostescalation

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :hostextinfo

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :hostgroup

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :service

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :servicedependency

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :serviceescalation

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :serviceextinfo

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

@@ -0,0 +1,3 @@
+require 'puppet/util/nagios_maker'
+
+Puppet::Util::NagiosMaker.create_nagios_type :servicegroup