bolt 0.20.0 → 0.20.2

data/vendored/puppet/lib/puppet/type/mailalias.rb

@@ -0,0 +1,46 @@
+module Puppet
+  Type.newtype(:mailalias) do
+    @doc = "Creates an email alias in the local alias database."
+
+    ensurable
+
+    newparam(:name, :namevar => true) do
+      desc "The alias name."
+    end
+
+    newproperty(:recipient, :array_matching => :all) do
+      desc "Where email should be sent.  Multiple values
+        should be specified as an array.  The file and the
+        recipient entries are mutually exclusive."
+    end
+
+    newproperty(:file) do
+      desc "A file containing the alias's contents.  The file and the
+        recipient entries are mutually exclusive."
+
+      validate do |value|
+	unless Puppet::Util.absolute_path?(value)
+	  fail Puppet::Error, _("File paths must be fully qualified, not '%{value}'") % { value: value }
+	end
+      end
+    end
+
+    newproperty(:target) do
+      desc "The file in which to store the aliases.  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
+
+    validate do
+      if self[:recipient] && self[:file]
+	self.fail _("You cannot specify both a recipient and a file")
+      end
+    end
+  end
+end

data/vendored/puppet/lib/puppet/type/maillist.rb

@@ -0,0 +1,62 @@
+module Puppet
+  Type.newtype(:maillist) do
+    @doc = "Manage email lists.  This resource type can only create
+      and remove lists; it cannot currently reconfigure them."
+
+    ensurable do
+      defaultvalues
+
+      newvalue(:purged) do
+        provider.purge
+      end
+
+      def change_to_s(current_value, newvalue)
+        return _("Purged %{resource}") % { resource: resource } if newvalue == :purged
+        super
+      end
+
+      def insync?(is)
+        return true if is == :absent && should == :purged
+        super
+      end
+    end
+
+    newparam(:name, :namevar => true) do
+      desc "The name of the email list."
+    end
+
+    newparam(:description) do
+      desc "The description of the mailing list."
+    end
+
+    newparam(:password) do
+      desc "The admin password."
+    end
+
+    newparam(:webserver) do
+      desc "The name of the host providing web archives and the administrative interface."
+    end
+
+    newparam(:mailserver) do
+      desc "The name of the host handling email for the list."
+    end
+
+    newparam(:admin) do
+      desc "The email address of the administrator."
+    end
+
+    def generate
+      if provider.respond_to?(:aliases)
+        should = self.should(:ensure) || :present
+        if should == :purged
+          should = :absent
+        end
+        atype = Puppet::Type.type(:mailalias)
+
+        provider.aliases.
+          reject  { |name,recipient| catalog.resource(:mailalias, name) }.
+          collect { |name,recipient| atype.new(:name => name, :recipient => recipient, :ensure => should) }
+      end
+    end
+  end
+end

data/vendored/puppet/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/vendored/puppet/lib/puppet/type/mount.rb

@@ -0,0 +1,314 @@
+require 'puppet/property/boolean'
+
+module Puppet
+  # We want the mount to refresh when it changes.
+  Type.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.
+
+      **Autobefores:**  If Puppet is managing any child file paths of a mount
+      point, the mount resource will autobefore 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} to unmounted") % { current: current_value }
+        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 %{name} but it doesn't appear in the current values") % { name: 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}") % { value: 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}") % { value: 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}") % { value: value } if value =~ /\s/
+        raise Puppet::Error, _("fstype must not be an empty string") if value.empty?
+      end
+    end
+
+    newproperty(:options) do
+      desc "A single string containing options for the mount, as they would
+        appear in fstab on Linux. For many platforms this is a comma-delimited
+        string. Consult the fstab(5) man page for system-specific details.
+        AIX options other than dev, nodename, or vfs can be defined here. If
+        specified, AIX options of account, boot, check, free, mount, size,
+        type, vol, log, and quota must be ordered alphabetically at the end of
+        the list."
+
+      validate do |value|
+        raise Puppet::Error, _("options must not contain whitespace: %{value}") % { value: value } if value =~ /\s/
+        raise Puppet::Error, _("options must not be an empty string") if value.empty?
+      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}") % { value: 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", "DragonFly", "OpenBSD"
+          false
+        when "AIX"
+          if Facter.value(:kernelmajversion) == "5300"
+            false
+          elsif resource[:device] and resource[:device].match(%r{^[^/]+:/})
+            false
+          else
+            true
+          end
+        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
+
+    # Autobefore the mount point's child file paths
+    autobefore(:file) do
+      dependencies = []
+      file_resources = catalog.resources.select { |resource| resource.type == :file }
+      children_file_resources = file_resources.select { |resource| File.expand_path(resource[:path]) =~ %r(^#{self[:name]}/.) }
+      children_file_resources.each do |child|
+        dependencies.push Pathname.new(child[:path])
+      end
+      dependencies
+    end
+  end
+end