puppet 3.5.0.rc1-x86-mingw32

data/spec/unit/provider/user/aix_spec.rb

@@ -0,0 +1,162 @@
+require 'spec_helper'
+
+provider_class = Puppet::Type.type(:user).provider(:aix)
+
+describe provider_class do
+
+  let(:lsuser_all_example) do
+    <<-OUTPUT
+root id=0 pgrp=system groups=system,bin,sys,security,cron,audit,lp home=/root shell=/usr/bin/bash auditclasses=general login=true su=true rlogin=true daemon=true admin=true sugroups=ALL admgroups=lolt,allstaff tpath=nosak ttys=ALL expires=0 auth1=SYSTEM auth2=NONE umask=22 registry=files SYSTEM=compat logintimes= loginretries=0 pwdwarntime=0 account_locked=false minage=0 maxage=0 maxexpired=-1 minalpha=0 minother=0 mindiff=0 maxrepeats=8 minlen=0 histexpire=0 histsize=0 pwdchecks= dictionlist= default_roles= fsize=2097151 cpu=-1 data=262144 stack=65536 core=2097151 rss=65536 nofiles=2000 time_last_login=1358465855 time_last_unsuccessful_login=1358378454 tty_last_login=ssh tty_last_unsuccessful_login=ssh host_last_login=rpm-builder.puppetlabs.lan host_last_unsuccessful_login=192.168.100.78 unsuccessful_login_count=0 roles=
+guest id=100 pgrp=usr groups=usr home=/home/guest login=true su=true rlogin=true daemon=true admin=false sugroups=ALL admgroups= tpath=nosak ttys=ALL expires=0 auth1=SYSTEM auth2=NONE umask=22 registry=files SYSTEM=compat logintimes= loginretries=0 pwdwarntime=0 account_locked=false minage=0 maxage=0 maxexpired=-1 minalpha=0 minother=0 mindiff=0 maxrepeats=8 minlen=0 histexpire=0 histsize=0 pwdchecks= dictionlist= default_roles= fsize=2097151 cpu=-1 data=262144 stack=65536 core=2097151 rss=65536 nofiles=2000 roles=
+    OUTPUT
+  end
+
+  let(:lsgroup_all_example) do
+    <<-OUTPUT
+root id=0 pgrp=system groups=system,bin,sys,security,cron,audit,lp home=/root shell=/usr/bin/bash
+guest id=100 pgrp=usr groups=usr home=/home/guest
+    OUTPUT
+  end
+
+  before do
+    @resource = stub('resource')
+    @provider = provider_class.new(@resource)
+  end
+
+  it "should be able to return a group name based on a group ID" do
+    @provider.stubs(:lsgroupscmd)
+
+    @provider.stubs(:execute).returns(lsgroup_all_example)
+
+    @provider.groupname_by_id(100).should == 'guest'
+  end
+
+  it "should be able to list all users" do
+    provider_class.stubs(:command)
+
+    provider_class.stubs(:execute).returns(lsuser_all_example)
+
+    provider_class.list_all.should == ['root', 'guest']
+  end
+
+  describe "#managed_attribute_keys" do
+    let(:existing_attributes) do
+      { :account_locked => 'false',
+        :admin => 'false',
+        :login => 'true',
+        'su' => 'true'
+      }
+    end
+
+    before(:each) do
+      original_parameters = { :attributes => attribute_array }
+      @resource.stubs(:original_parameters).returns(original_parameters)
+    end
+
+    describe "invoked via manifest" do
+      let(:attribute_array) { ["rlogin=false", "login =true"] }
+
+      it "should return only the keys of the attribute key=value pair from manifest" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        keys.should be_include(:rlogin)
+        keys.should be_include(:login)
+        keys.should_not be_include(:su)
+      end
+
+      it "should strip spaces from symbols" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        keys.should be_include(:login)
+        keys.should_not be_include(:"login ")
+      end
+
+      it "should have the same count as that from the manifest" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        keys.size.should == attribute_array.size
+      end
+
+      it "should convert the keys to symbols" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        all_symbols = keys.all? {|k| k.is_a? Symbol}
+        all_symbols.should be_true
+      end
+    end
+
+    describe "invoked via RAL" do
+      let(:attribute_array) { nil }
+
+      it "should return the keys in supplied hash" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        keys.should_not be_include(:rlogin)
+        keys.should be_include(:login)
+        keys.should be_include(:su)
+      end
+
+      it "should convert the keys to symbols" do
+        keys = @provider.managed_attribute_keys(existing_attributes)
+        all_symbols = keys.all? {|k| k.is_a? Symbol}
+        all_symbols.should be_true
+      end
+    end
+  end
+
+  describe "#should_include?" do
+    it "should exclude keys translated into something else" do
+      managed_keys = [:rlogin]
+      @provider.class.attribute_mapping_from.stubs(:include?).with(:rlogin).returns(true)
+      @provider.class.stubs(:attribute_ignore).returns([])
+      @provider.should_include?(:rlogin, managed_keys).should be_false
+    end
+
+    it "should exclude keys explicitly ignored" do
+      managed_keys = [:rlogin]
+      @provider.class.attribute_mapping_from.stubs(:include?).with(:rlogin).returns(false)
+      @provider.class.stubs(:attribute_ignore).returns([:rlogin])
+      @provider.should_include?(:rlogin, managed_keys).should be_false
+    end
+
+    it "should exclude keys not specified in manifest" do
+      managed_keys = [:su]
+      @provider.class.attribute_mapping_from.stubs(:include?).with(:rlogin).returns(false)
+      @provider.class.stubs(:attribute_ignore).returns([])
+      @provider.should_include?(:rlogin, managed_keys).should be_false
+    end
+
+    it "should include keys specified in manifest if not translated or ignored" do
+      managed_keys = [:rlogin]
+      @provider.class.attribute_mapping_from.stubs(:include?).with(:rlogin).returns(false)
+      @provider.class.stubs(:attribute_ignore).returns([])
+      @provider.should_include?(:rlogin, managed_keys).should be_true
+    end
+  end
+  describe "when handling passwords" do
+    let(:passwd_without_spaces) do
+        # from http://pic.dhe.ibm.com/infocenter/aix/v7r1/index.jsp?topic=%2Fcom.ibm.aix.files%2Fdoc%2Faixfiles%2Fpasswd_security.htm
+        <<-OUTPUT
+smith:
+  password = MGURSj.F056Dj
+  lastupdate = 623078865
+  flags = ADMIN,NOCHECK
+        OUTPUT
+    end
+
+    let(:passwd_with_spaces) do
+        # add trailing space to the password
+        passwd_without_spaces.gsub(/password = (.*)/, 'password = \1   ')
+    end
+
+
+    it "should be able to read the hashed password" do
+      @provider.stubs(:open_security_passwd).returns(StringIO.new(passwd_without_spaces))
+      @resource.stubs(:[]).returns('smith')
+
+      @provider.password.should == 'MGURSj.F056Dj'
+    end
+
+    it "should be able to read the hashed password, even with trailing spaces" do
+      @provider.stubs(:open_security_passwd).returns(StringIO.new(passwd_with_spaces))
+      @resource.stubs(:[]).returns('smith')
+
+      @provider.password.should == 'MGURSj.F056Dj'
+    end
+  end
+end

data/spec/unit/provider/user/directoryservice_spec.rb

@@ -0,0 +1,1063 @@
+#! /usr/bin/env ruby -S rspec
+# encoding: ASCII-8BIT
+require 'spec_helper'
+require 'facter/util/plist'
+
+describe Puppet::Type.type(:user).provider(:directoryservice) do
+  let(:username) { 'nonexistant_user' }
+  let(:user_path) { "/Users/#{username}" }
+  let(:resource) do
+    Puppet::Type.type(:user).new(
+      :name     => username,
+      :provider => :directoryservice
+    )
+  end
+  let(:provider) { resource.provider }
+  let(:users_plist_dir) { '/var/db/dslocal/nodes/Default/users' }
+  let(:stringio_object) { StringIO.new('new_stringio_object') }
+
+  # This is the output of doing `dscl -plist . read /Users/<username>` which
+  # will return a hash of keys whose values are all arrays.
+  let(:user_plist_xml) do
+    '<?xml version="1.0" encoding="UTF-8"?>
+    <!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+    <plist version="1.0">
+    <dict>
+            <key>dsAttrTypeStandard:NFSHomeDirectory</key>
+            <array>
+            <string>/Users/nonexistant_user</string>
+            </array>
+            <key>dsAttrTypeStandard:RealName</key>
+            <array>
+            <string>nonexistant_user</string>
+            </array>
+            <key>dsAttrTypeStandard:PrimaryGroupID</key>
+            <array>
+            <string>22</string>
+            </array>
+            <key>dsAttrTypeStandard:UniqueID</key>
+            <array>
+            <string>1000</string>
+            </array>
+            <key>dsAttrTypeStandard:RecordName</key>
+            <array>
+            <string>nonexistant_user</string>
+            </array>
+    </dict>
+    </plist>'
+  end
+
+  # This is the same as above, however in a native Ruby hash instead
+  # of XML
+  let(:user_plist_hash) do
+    {
+      "dsAttrTypeStandard:RealName"         => [username],
+      "dsAttrTypeStandard:NFSHomeDirectory" => [user_path],
+      "dsAttrTypeStandard:PrimaryGroupID"   => ["22"],
+      "dsAttrTypeStandard:UniqueID"         => ["1000"],
+      "dsAttrTypeStandard:RecordName"       => [username]
+    }
+  end
+
+  # The below value is the result of executing
+  # `dscl -plist . read /Users/<username> ShadowHashData` on a 10.7
+  # system and converting it to a native Ruby Hash with Plist.parse_xml
+  let(:sha512_shadowhashdata_hash) do
+    {
+      'dsAttrTypeNative:ShadowHashData' => ['62706c69 73743030 d101025d 53414c54 45442d53 48413531 324f1044 7ea7d592 131f57b2 c8f8bdbc ec8d9df1 2128a386 393a4f00 c7619bac 2622a44d 451419d1 1da512d5 915ab98e 39718ac9 4083fe2e fd6bf710 a54d477f 8ff735b1 2587192d 080b1900 00000000 00010100 00000000 00000300 00000000 00000000 00000000 000060']
+    }
+  end
+
+  # The below is a binary plist that is stored in the ShadowHashData key
+  # on a 10.7 system.
+  let(:sha512_embedded_bplist) do
+    "bplist00\321\001\002]SALTED-SHA512O\020D~\247\325\222\023\037W\262\310\370\275\274\354\215\235\361!(\243\2069:O\000\307a\233\254&\"\244ME\024\031\321\035\245\022\325\221Z\271\2169q\212\311@\203\376.\375k\367\020\245MG\177\217\3675\261%\207\031-\b\v\031\000\000\000\000\000\000\001\001\000\000\000\000\000\000\000\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000`"
+  end
+
+  # The below is a Base64 encoded string representing a salted-SHA512 password
+  # hash.
+  let(:sha512_pw_string) do
+    "~\247\325\222\023\037W\262\310\370\275\274\354\215\235\361!(\243\2069:O\000\307a\233\254&\"\244ME\024\031\321\035\245\022\325\221Z\271\2169q\212\311@\203\376.\375k\367\020\245MG\177\217\3675\261%\207\031-"
+  end
+
+  # The below is the result of converting sha512_embedded_bplist to XML and
+  # parsing it with Plist.parse_xml. It is a Ruby Hash whose value is a
+  # StringIO object holding a Base64 encoded salted-SHA512 password hash.
+  let(:sha512_embedded_bplist_hash) do
+    { 'SALTED-SHA512' => StringIO.new(sha512_pw_string) }
+  end
+
+  # The value below is the result of converting sha512_pw_string to Hex.
+  let(:sha512_password_hash) do
+    '7ea7d592131f57b2c8f8bdbcec8d9df12128a386393a4f00c7619bac2622a44d451419d11da512d5915ab98e39718ac94083fe2efd6bf710a54d477f8ff735b12587192d'
+  end
+
+  # The below value is the result of executing
+  # `dscl -plist . read /Users/<username> ShadowHashData` on a 10.8
+  # system and converting it to a native Ruby Hash with Plist.parse_xml
+  let(:pbkdf2_shadowhashdata_hash) do
+    {
+      "dsAttrTypeNative:ShadowHashData"=>["62706c69 73743030 d101025f 10145341 4c544544 2d534841 3531322d 50424b44 4632d303 04050607 0857656e 74726f70 79547361 6c745a69 74657261 74696f6e 734f1080 0590ade1 9e6953c1 35ae872a e7761823 5df7d46c 63de7f9a 0fcdf2cd 9e7d85e4 b7ca8681 01235b61 58e05a30 9805ee48 14b027a4 be9c23ec 2926bc81 72269aff ba5c9a59 85e81091 fa689807 6d297f1f aa75fa61 7551ef16 71d75200 55c4a0d9 7b9b9c58 05aa322b aedbcd8e e9c52381 1653ac2e a9e9c8d8 f1ac519a 0f2b595e 4f102093 77c46908 a1c8ac2c 3e45c0d4 4da8ad0f cd85ec5c 14d9a59f fc40c9da 31f0ec11 60b0080b 22293136 41c4e700 00000000 00010100 00000000 00000900 00000000 00000000 00000000 0000ea"]
+    }
+  end
+
+  # The below value is the result of converting pbkdf2_embedded_bplist to XML and
+  # parsing it with Plist.parse_xml.
+  let(:pbkdf2_embedded_bplist_hash) do
+    {
+      'SALTED-SHA512-PBKDF2' => {
+        'entropy'    => StringIO.new(pbkdf2_pw_string),
+        'salt'       => StringIO.new(pbkdf2_salt_string),
+        'iterations' => pbkdf2_iterations_value
+      }
+    }
+  end
+
+  # The value below is the result of converting pbkdf2_pw_string to Hex.
+  let(:pbkdf2_password_hash) do
+    '0590ade19e6953c135ae872ae77618235df7d46c63de7f9a0fcdf2cd9e7d85e4b7ca868101235b6158e05a309805ee4814b027a4be9c23ec2926bc8172269affba5c9a5985e81091fa6898076d297f1faa75fa617551ef1671d7520055c4a0d97b9b9c5805aa322baedbcd8ee9c523811653ac2ea9e9c8d8f1ac519a0f2b595e'
+  end
+
+  # The below is a binary plist that is stored in the ShadowHashData key
+  # of a 10.8 system.
+  let(:pbkdf2_embedded_plist) do
+    "bplist00\321\001\002_\020\024SALTED-SHA512-PBKDF2\323\003\004\005\006\a\bWentropyTsaltZiterationsO\020\200\005\220\255\341\236iS\3015\256\207*\347v\030#]\367\324lc\336\177\232\017\315\362\315\236}\205\344\267\312\206\201\001#[aX\340Z0\230\005\356H\024\260'\244\276\234#\354)&\274\201r&\232\377\272\\\232Y\205\350\020\221\372h\230\am)\177\037\252u\372auQ\357\026q\327R\000U\304\240\331{\233\234X\005\2522+\256\333\315\216\351\305#\201\026S\254.\251\351\310\330\361\254Q\232\017+Y^O\020 \223w\304i\b\241\310\254,>E\300\324M\250\255\017\315\205\354\\\024\331\245\237\374@\311\3321\360\354\021`\260\b\v\")16A\304\347\000\000\000\000\000\000\001\001\000\000\000\000\000\000\000\t\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\352"
+  end
+
+  # The below value is a Base64 encoded string representing a PBKDF2 password
+  # hash.
+  let(:pbkdf2_pw_string) do
+    "\005\220\255\341\236iS\3015\256\207*\347v\030#]\367\324lc\336\177\232\017\315\362\315\236}\205\344\267\312\206\201\001#[aX\340Z0\230\005\356H\024\260'\244\276\234#\354)&\274\201r&\232\377\272\\\232Y\205\350\020\221\372h\230\am)\177\037\252u\372auQ\357\026q\327R\000U\304\240\331{\233\234X\005\2522+\256\333\315\216\351\305#\201\026S\254.\251\351\310\330\361\254Q\232\017+Y^"
+  end
+
+  # The below value is a Base64 encoded string representing a PBKDF2 salt
+  # string.
+  let(:pbkdf2_salt_string) do
+    "\223w\304i\b\241\310\254,>E\300\324M\250\255\017\315\205\354\\\024\331\245\237\374@\311\3321\360\354"
+  end
+
+  # The below value represents the Hex value of a PBKDF2 salt string
+  let(:pbkdf2_salt_value) do
+    "9377c46908a1c8ac2c3e45c0d44da8ad0fcd85ec5c14d9a59ffc40c9da31f0ec"
+  end
+
+  # The below value is a Fixnum iterations value used in the PBKDF2
+  # key stretching algorithm
+  let(:pbkdf2_iterations_value) do
+    24752
+  end
+
+  # The below represents output of 'dscl -plist . readall /Users' converted to
+  # a native Ruby hash if only one user were installed on the system.
+  # This lets us check the behavior of all the methods necessary to return a
+  # user's groups property by controlling the data provided by dscl
+  let(:testuser_hash) do
+    [{"dsAttrTypeStandard:RecordName"             =>["nonexistant_user"],
+      "dsAttrTypeStandard:UniqueID"               =>["1000"],
+      "dsAttrTypeStandard:AuthenticationAuthority"=>
+       [";Kerberosv5;;testuser@LKDC:SHA1.4383E152D9D394AA32D13AE98F6F6E1FE8D00F81;LKDC:SHA1.4383E152D9D394AA32D13AE98F6F6E1FE8D00F81",
+        ";ShadowHash;HASHLIST:<SALTED-SHA512>"],
+      "dsAttrTypeStandard:AppleMetaNodeLocation"  =>["/Local/Default"],
+      "dsAttrTypeStandard:NFSHomeDirectory"       =>["/Users/nonexistant_user"],
+      "dsAttrTypeStandard:RecordType"             =>["dsRecTypeStandard:Users"],
+      "dsAttrTypeStandard:RealName"               =>["nonexistant_user"],
+      "dsAttrTypeStandard:Password"               =>["********"],
+      "dsAttrTypeStandard:PrimaryGroupID"         =>["22"],
+      "dsAttrTypeStandard:GeneratedUID"           =>["0A7D5B63-3AD4-4CA7-B03E-85876F1D1FB3"],
+      "dsAttrTypeStandard:AuthenticationHint"     =>[""],
+      "dsAttrTypeNative:KerberosKeys"             =>
+       ["30820157 a1030201 02a08201 4e308201 4a3074a1 2b3029a0 03020112 a1220420 54af3992 1c198bf8 94585a6b 2fba445b c8482228 0dcad666 ea62e038 99e59c45 a2453043 a0030201 03a13c04 3a4c4b44 433a5348 41312e34 33383345 31353244 39443339 34414133 32443133 41453938 46364636 45314645 38443030 46383174 65737475 73657230 64a11b30 19a00302 0111a112 04106375 7d97b2ce ca8343a6 3b0f73d5 1001a245 3043a003 020103a1 3c043a4c 4b44433a 53484131 2e343338 33453135 32443944 33393441 41333244 31334145 39384636 46364531 46453844 30304638 31746573 74757365 72306ca1 233021a0 03020110 a11a0418 67b09be3 5131b670 f8e9265e 62459b4c 19435419 fe918519 a2453043 a0030201 03a13c04 3a4c4b44 433a5348 41312e34 33383345 31353244 39443339 34414133 32443133 41453938 46364636 45314645 38443030 46383174 65737475 736572"],
+      "dsAttrTypeStandard:PasswordPolicyOptions"  =>
+       ["<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n          <!DOCTYPE plist PUBLIC \"-//Apple//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n          <plist version=\"1.0\">\n          <dict>\n            <key>failedLoginCount</key>\n            <integer>0</integer>\n            <key>failedLoginTimestamp</key>\n            <date>2001-01-01T00:00:00Z</date>\n            <key>lastLoginTimestamp</key>\n            <date>2001-01-01T00:00:00Z</date>\n            <key>passwordTimestamp</key>\n            <date>2012-08-10T23:53:50Z</date>\n          </dict>\n          </plist>\n          "],
+      "dsAttrTypeStandard:UserShell"              =>["/bin/bash"],
+      "dsAttrTypeNative:ShadowHashData"           =>
+       ["62706c69 73743030 d101025d 53414c54 45442d53 48413531 324f1044 7ea7d592 131f57b2 c8f8bdbc ec8d9df1 2128a386 393a4f00 c7619bac 2622a44d 451419d1 1da512d5 915ab98e 39718ac9 4083fe2e fd6bf710 a54d477f 8ff735b1 2587192d 080b1900 00000000 00010100 00000000 00000300 00000000 00000000 00000000 000060"]}]
+  end
+
+  # The below represents the result of running Plist.parse_xml on XML
+  # data returned from the `dscl -plist . readall /Groups` command.
+  # (AKA: What the get_list_of_groups method returns)
+  let(:group_plist_hash_guid) do
+    [{
+      'dsAttrTypeStandard:RecordName'      => ['testgroup'],
+      'dsAttrTypeStandard:GroupMembership' => [
+                                                username,
+                                                'jeff',
+                                                'zack'
+                                              ],
+      'dsAttrTypeStandard:GroupMembers'    => [
+                                                "guid#{username}",
+                                                'guidtestuser',
+                                                'guidjeff',
+                                                'guidzack'
+                                              ],
+    },
+    {
+      'dsAttrTypeStandard:RecordName'      => ['second'],
+      'dsAttrTypeStandard:GroupMembership' => [
+                                                'jeff',
+                                                'zack'
+                                              ],
+      'dsAttrTypeStandard:GroupMembers'    => [
+                                                "guid#{username}",
+                                                'guidjeff',
+                                                'guidzack'
+                                              ],
+    },
+    {
+      'dsAttrTypeStandard:RecordName'      => ['third'],
+      'dsAttrTypeStandard:GroupMembership' => [
+                                                username,
+                                                'jeff',
+                                                'zack'
+                                              ],
+      'dsAttrTypeStandard:GroupMembers'    => [
+                                                "guid#{username}",
+                                                'guidtestuser',
+                                                'guidjeff',
+                                                'guidzack'
+                                              ],
+    }]
+  end
+
+
+  describe 'Creating a user that does not exist' do
+    # These are the defaults that the provider will use if a user does
+    # not provide a value
+    let(:defaults) do
+      {
+        'UniqueID'         => '1000',
+        'RealName'         => resource[:name],
+        'PrimaryGroupID'   => 20,
+        'UserShell'        => '/bin/bash',
+        'NFSHomeDirectory' => "/Users/#{resource[:name]}"
+      }
+    end
+
+    before :each do
+      # Stub out all calls to dscl with default values from above
+      defaults.each do |key, val|
+        provider.stubs(:merge_attribute_with_dscl).with('Users', username, key, val)
+      end
+
+      # Mock the rest of the dscl calls. We can't assume that our Linux
+      # build system will have the dscl binary
+      provider.stubs(:create_new_user).with(username)
+      provider.class.stubs(:get_attribute_from_dscl).with('Users', username, 'GeneratedUID').returns({'dsAttrTypeStandard:GeneratedUID' => ['GUID']})
+      provider.stubs(:next_system_id).returns('1000')
+    end
+
+    it 'should not raise any errors when creating a user with default values' do
+      provider.create
+    end
+
+    %w{password iterations salt}.each do |value|
+      it "should call ##{value}= if a #{value} attribute is specified" do
+        resource[value.intern] = 'somevalue'
+        setter = (value << '=').intern
+        provider.expects(setter).with('somevalue')
+        provider.create
+      end
+    end
+
+    it 'should merge the GroupMembership and GroupMembers dscl values if a groups attribute is specified' do
+      resource[:groups] = 'somegroup'
+      provider.expects(:merge_attribute_with_dscl).with('Groups', 'somegroup', 'GroupMembership', username)
+      provider.expects(:merge_attribute_with_dscl).with('Groups', 'somegroup', 'GroupMembers', 'GUID')
+      provider.create
+    end
+
+    it 'should convert group names into integers' do
+      resource[:gid] = 'somegroup'
+      Puppet::Util.expects(:gid).with('somegroup').returns(21)
+      provider.expects(:merge_attribute_with_dscl).with('Users', username, 'PrimaryGroupID', 21)
+      provider.create
+    end
+  end
+
+  describe 'self#instances' do
+    it 'should create an array of provider instances' do
+      provider.class.expects(:get_all_users).returns(['foo', 'bar'])
+      ['foo', 'bar'].each do |user|
+        provider.class.expects(:generate_attribute_hash).with(user).returns({})
+      end
+      instances = provider.class.instances
+
+      instances.should be_a_kind_of Array
+      instances.each do |instance|
+        instance.should be_a_kind_of Puppet::Provider
+      end
+    end
+  end
+
+  describe 'self#get_all_users' do
+    let(:empty_plist) do
+      '<?xml version="1.0" encoding="UTF-8"?>
+      <!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+      <plist version="1.0">
+      <dict>
+      </dict>
+      </plist>'
+    end
+
+    it 'should return a hash of user attributes' do
+      provider.class.expects(:dscl).with('-plist', '.', 'readall', '/Users').returns(user_plist_xml)
+      provider.class.get_all_users.should == user_plist_hash
+    end
+
+    it 'should return a hash when passed an empty plist' do
+      provider.class.expects(:dscl).with('-plist', '.', 'readall', '/Users').returns(empty_plist)
+      provider.class.get_all_users.should == {}
+    end
+  end
+
+  describe 'self#generate_attribute_hash' do
+    let(:user_plist_resource) do
+      {
+        :ensure         => :present,
+        :provider       => :directoryservice,
+        :groups         => 'testgroup,third',
+        :comment        => username,
+        :password       => sha512_password_hash,
+        :shadowhashdata => sha512_shadowhashdata_hash,
+        :name           => username,
+        :uid            => 1000,
+        :gid            => 22,
+        :home           => user_path
+      }
+    end
+
+    before :each do
+      provider.class.stubs(:get_os_version).returns('10.7')
+      provider.class.stubs(:get_all_users).returns(testuser_hash)
+      provider.class.stubs(:get_attribute_from_dscl).with('Users', username, 'ShadowHashData').returns(sha512_shadowhashdata_hash)
+      provider.class.stubs(:get_list_of_groups).returns(group_plist_hash_guid)
+      provider.class.stubs(:convert_binary_to_xml).with(sha512_embedded_bplist).returns(sha512_embedded_bplist_hash)
+      provider.class.prefetch({})
+    end
+
+    it 'should return :uid values as a Fixnum' do
+      provider.class.generate_attribute_hash(user_plist_hash)[:uid].should be_a_kind_of Fixnum
+    end
+
+    it 'should return :gid values as a Fixnum' do
+      provider.class.generate_attribute_hash(user_plist_hash)[:gid].should be_a_kind_of Fixnum
+    end
+
+    it 'should return a hash of resource attributes' do
+      provider.class.generate_attribute_hash(user_plist_hash).should == user_plist_resource
+    end
+  end
+
+  describe '#exists?' do
+    # This test expects an error to be raised
+    # I'm PROBABLY doing this wrong...
+    it 'should return false if the dscl command errors out' do
+      provider.expects(:dscl).with('.', 'read', user_path).raises(Puppet::ExecutionFailure, 'Dscl Fails')
+      provider.exists?.should == false
+    end
+
+    it 'should return true if the dscl command does not error' do
+      provider.expects(:dscl).with('.', 'read', user_path).returns(user_plist_xml)
+      provider.exists?.should == true
+    end
+  end
+
+  describe '#delete' do
+    it 'should call dscl when destroying/deleting a resource' do
+      provider.expects(:dscl).with('.', '-delete', user_path)
+      provider.delete
+    end
+  end
+
+  describe 'the groups property' do
+    # The below represents the result of running Plist.parse_xml on XML
+    # data returned from the `dscl -plist . readall /Groups` command.
+    # (AKA: What the get_list_of_groups method returns)
+    let(:group_plist_hash) do
+      [{
+        'dsAttrTypeStandard:RecordName'      => ['testgroup'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  'testuser',
+                                                  username,
+                                                  'jeff',
+                                                  'zack'
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidtestuser',
+                                                  'guidjeff',
+                                                  'guidzack'
+                                                ],
+      },
+      {
+        'dsAttrTypeStandard:RecordName'      => ['second'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  username,
+                                                  'testuser',
+                                                  'jeff',
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidtestuser',
+                                                  'guidjeff',
+                                                ],
+      },
+      {
+        'dsAttrTypeStandard:RecordName'      => ['third'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  'jeff',
+                                                  'zack'
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidjeff',
+                                                  'guidzack'
+                                                ],
+      }]
+    end
+
+
+    before :each do
+      provider.class.stubs(:get_all_users).returns(testuser_hash)
+      provider.class.stubs(:get_attribute_from_dscl).with('Users', username, 'ShadowHashData').returns([])
+      provider.class.stubs(:get_os_version).returns('10.7')
+    end
+
+    it "should return a list of groups if the user's name matches GroupMembership" do
+      provider.class.expects(:get_list_of_groups).returns(group_plist_hash)
+      provider.class.prefetch({}).first.groups.should == 'second,testgroup'
+    end
+
+    it "should return a list of groups if the user's GUID matches GroupMembers" do
+      provider.class.expects(:get_list_of_groups).returns(group_plist_hash_guid)
+      provider.class.prefetch({}).first.groups.should == 'testgroup,third'
+    end
+  end
+
+  describe '#groups=' do
+    let(:group_plist_one_two_three) do
+      [{
+        'dsAttrTypeStandard:RecordName'      => ['one'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  'jeff',
+                                                  'zack'
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidjeff',
+                                                  'guidzack'
+                                                ],
+      },
+      {
+        'dsAttrTypeStandard:RecordName'      => ['two'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  'jeff',
+                                                  'zack',
+                                                  username
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidjeff',
+                                                  'guidzack'
+                                                ],
+      },
+      {
+        'dsAttrTypeStandard:RecordName'      => ['three'],
+        'dsAttrTypeStandard:GroupMembership' => [
+                                                  'jeff',
+                                                  'zack',
+                                                  username
+                                                ],
+        'dsAttrTypeStandard:GroupMembers'    => [
+                                                  'guidjeff',
+                                                  'guidzack'
+                                                ],
+      }]
+    end
+
+    before :each do
+      provider.class.stubs(:get_all_users).returns(testuser_hash)
+      provider.class.stubs(:get_list_of_groups).returns(group_plist_one_two_three)
+    end
+
+    it 'should call dscl to add necessary groups' do
+      provider.class.expects(:get_os_version).returns('10.7')
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'ShadowHashData').returns([])
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'GeneratedUID').returns({'dsAttrTypeStandard:GeneratedUID' => ['guidnonexistant_user']})
+      provider.expects(:groups).returns('two,three')
+      provider.expects(:dscl).with('.', '-merge', '/Groups/one', 'GroupMembership', 'nonexistant_user')
+      provider.expects(:dscl).with('.', '-merge', '/Groups/one', 'GroupMembers', 'guidnonexistant_user')
+      provider.class.prefetch({})
+      provider.groups= 'one,two,three'
+    end
+
+    #describe how passwords are fetched in 10.5 and 10.6
+    ['10.5', '10.6'].each do |os_ver|
+      it "should call the get_sha1 method on #{os_ver}" do
+        provider.class.expects(:get_os_version).returns(os_ver)
+        provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'ShadowHashData').returns([])
+        provider.class.expects(:get_sha1).with('0A7D5B63-3AD4-4CA7-B03E-85876F1D1FB3').returns('password')
+        provider.class.prefetch({}).first.password.should == 'password'
+      end
+    end
+
+    it 'should call the get_salted_sha512 method on 10.7 and return the correct hash' do
+      provider.class.expects(:get_os_version).returns('10.7')
+      provider.class.expects(:convert_binary_to_xml).with(sha512_embedded_bplist).returns(sha512_embedded_bplist_hash)
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'ShadowHashData').returns(sha512_shadowhashdata_hash)
+      provider.class.prefetch({}).first.password.should == sha512_password_hash
+    end
+
+    it 'should call the get_salted_sha512_pbkdf2 method on 10.8 and return the correct hash' do
+      provider.class.expects(:get_os_version).returns('10.8')
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username,'ShadowHashData').returns(pbkdf2_shadowhashdata_hash)
+      provider.class.expects(:convert_binary_to_xml).with(pbkdf2_embedded_plist).returns(pbkdf2_embedded_bplist_hash)
+      provider.class.prefetch({}).first.password.should == pbkdf2_password_hash
+    end
+
+  end
+
+  describe '#password=' do
+    before :each do
+      provider.stubs(:sleep)
+      provider.stubs(:flush_dscl_cache)
+    end
+
+    ['10.5', '10.6'].each do |os_ver|
+      it "should call write_sha1_hash when setting the password on #{os_ver}" do
+        provider.class.stubs(:get_os_version).returns(os_ver)
+        provider.expects(:write_sha1_hash).with('password')
+        provider.password = 'password'
+      end
+    end
+
+    it 'should call write_password_to_users_plist when setting the password on 10.7' do
+      provider.class.stubs(:get_os_version).returns('10.7')
+      provider.expects(:write_password_to_users_plist).with(sha512_password_hash)
+      provider.password = sha512_password_hash
+    end
+
+    it 'should call write_password_to_users_plist when setting the password on 10.8' do
+      provider.class.stubs(:get_os_version).returns('10.8')
+      provider.expects(:write_password_to_users_plist).with(pbkdf2_password_hash)
+      provider.password = pbkdf2_password_hash
+    end
+
+    it "should raise an error on 10.7 if a password hash that doesn't contain 136 characters is passed" do
+      provider.class.stubs(:get_os_version).returns('10.7')
+      expect { provider.password = 'password' }.to raise_error Puppet::Error, /OS X 10\.7 requires a Salted SHA512 hash password of 136 characters\.  Please check your password and try again/
+    end
+
+    it "should raise an error on 10.8 if a password hash that doesn't contain 256 characters is passed" do
+      provider.class.stubs(:get_os_version).returns('10.8')
+      expect { provider.password = 'password' }.to raise_error Puppet::Error, /OS X versions > 10\.7 require a Salted SHA512 PBKDF2 password hash of 256 characters\. Please check your password and try again\./
+    end
+  end
+
+  describe '#get_list_of_groups' do
+    # The below value is the result of running `dscl -plist . readall /Groups`
+    # on an OS X system.
+    let(:groups_xml) do
+      '<?xml version="1.0" encoding="UTF-8"?>
+       <!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+       <plist version="1.0">
+       <array>
+         <dict>
+           <key>dsAttrTypeStandard:AppleMetaNodeLocation</key>
+           <array>
+             <string>/Local/Default</string>
+           </array>
+           <key>dsAttrTypeStandard:GeneratedUID</key>
+           <array>
+             <string>ABCDEFAB-CDEF-ABCD-EFAB-CDEF00000053</string>
+           </array>
+           <key>dsAttrTypeStandard:Password</key>
+           <array>
+             <string>*</string>
+           </array>
+           <key>dsAttrTypeStandard:PrimaryGroupID</key>
+           <array>
+             <string>83</string>
+           </array>
+           <key>dsAttrTypeStandard:RealName</key>
+           <array>
+             <string>SPAM Assassin Group 2</string>
+           </array>
+           <key>dsAttrTypeStandard:RecordName</key>
+           <array>
+             <string>_amavisd</string>
+             <string>amavisd</string>
+           </array>
+           <key>dsAttrTypeStandard:RecordType</key>
+           <array>
+             <string>dsRecTypeStandard:Groups</string>
+           </array>
+         </dict>
+        </array>
+      </plist>'
+    end
+
+    # The below value is the result of executing Plist.parse_xml on
+    # groups_xml
+    let(:groups_hash) do
+      [{ 'dsAttrTypeStandard:AppleMetaNodeLocation' => ['/Local/Default'],
+           'dsAttrTypeStandard:GeneratedUID'          => ['ABCDEFAB-CDEF-ABCD-EFAB-CDEF00000053'],
+           'dsAttrTypeStandard:Password'              => ['*'],
+           'dsAttrTypeStandard:PrimaryGroupID'        => ['83'],
+           'dsAttrTypeStandard:RealName'              => ['SPAM Assassin Group 2'],
+           'dsAttrTypeStandard:RecordName'            => ['_amavisd', 'amavisd'],
+           'dsAttrTypeStandard:RecordType'            => ['dsRecTypeStandard:Groups']
+        }]
+    end
+
+    it 'should return an array of hashes containing group data' do
+      provider.class.expects(:dscl).with('-plist', '.', 'readall', '/Groups').returns(groups_xml)
+      provider.class.get_list_of_groups.should == groups_hash
+    end
+  end
+
+  describe '#get_attribute_from_dscl' do
+    # The below value is the result of executing
+    # `dscl -plist . read /Users/<username/ GeneratedUID`
+    # on an OS X system. 
+    let(:user_guid_xml) do
+      '<?xml version="1.0" encoding="UTF-8"?>
+       <!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+       <plist version="1.0">
+       <dict>
+         <key>dsAttrTypeStandard:GeneratedUID</key>
+         <array>
+           <string>DCC660C6-F5A9-446D-B9FF-3C0258AB5BA0</string>
+         </array>
+       </dict>
+       </plist>'
+    end
+
+    # The below value is the result of parsing user_guid_xml with
+    # Plist.parse_xml
+    let(:user_guid_hash) do
+      { 'dsAttrTypeStandard:GeneratedUID' => ['DCC660C6-F5A9-446D-B9FF-3C0258AB5BA0'] }
+    end
+
+    it 'should return a hash containing a user\'s dscl attribute data' do
+      provider.class.expects(:dscl).with('-plist', '.', 'read', user_path, 'GeneratedUID').returns(user_guid_xml)
+      provider.class.get_attribute_from_dscl('Users', username, 'GeneratedUID').should == user_guid_hash
+    end
+  end
+
+  describe '#convert_xml_to_binary' do
+    # Because this method relies on a binary that only exists on OS X, a stub
+    # object is needed to expect the calls. This makes testing somewhat...uneventful
+    let(:stub_io_object) { stub('connection') }
+
+    it 'should use plutil to successfully convert an xml plist to a binary plist' do
+      IO.expects(:popen).with('plutil -convert binary1 -o - -', 'r+').yields stub_io_object
+      Plist::Emit.expects(:dump).with('ruby_hash').returns('xml_plist_data')
+      stub_io_object.expects(:write).with('xml_plist_data')
+      stub_io_object.expects(:close_write)
+      stub_io_object.expects(:read).returns('binary_plist_data')
+      provider.class.convert_xml_to_binary('ruby_hash').should == 'binary_plist_data'
+    end
+  end
+
+  describe '#convert_binary_to_xml' do
+    let(:stub_io_object) { stub('connection') }
+
+    it 'should accept a binary plist and return a ruby hash containing the plist data' do
+      IO.expects(:popen).with('plutil -convert xml1 -o - -', 'r+').yields stub_io_object
+      stub_io_object.expects(:write).with('binary_plist_data')
+      stub_io_object.expects(:close_write)
+      stub_io_object.expects(:read).returns(user_plist_xml)
+      provider.class.convert_binary_to_xml('binary_plist_data').should == user_plist_hash
+    end
+  end
+
+  describe '#next_system_id' do
+    it 'should return the next available UID number that is not in the list obtained from dscl and is greater than the passed integer value' do
+      provider.expects(:dscl).with('.', '-list', '/Users', 'uid').returns("kathee 312\ngary 11\ntanny 33\njohn 9\nzach 5")
+      provider.next_system_id(30).should == 34
+    end
+  end
+
+  describe '#get_salted_sha512' do
+    it "should accept a hash whose 'SALTED-SHA512' key contains a StringIO object with a base64 encoded salted-SHA512 password hash and return the hex value of that password hash" do
+      provider.class.get_salted_sha512(sha512_embedded_bplist_hash).should == sha512_password_hash
+    end
+  end
+
+  describe '#get_salted_sha512_pbkdf2' do
+    it "should accept a hash containing a PBKDF2 password hash, salt, and iterations value and return the correct password hash" do
+        provider.class.get_salted_sha512_pbkdf2('entropy', pbkdf2_embedded_bplist_hash).should == pbkdf2_password_hash
+    end
+    it "should accept a hash containing a PBKDF2 password hash, salt, and iterations value and return the correct salt value" do
+        provider.class.get_salted_sha512_pbkdf2('salt', pbkdf2_embedded_bplist_hash).should == pbkdf2_salt_value
+    end
+    it "should accept a hash containing a PBKDF2 password hash, salt, and iterations value and return the correct iterations value" do
+        provider.class.get_salted_sha512_pbkdf2('iterations', pbkdf2_embedded_bplist_hash).should == pbkdf2_iterations_value
+    end
+    it "should return a Fixnum value when looking up the PBKDF2 iterations value" do
+        provider.class.get_salted_sha512_pbkdf2('iterations', pbkdf2_embedded_bplist_hash).should be_a_kind_of(Fixnum)
+    end
+    it "should raise an error if a field other than 'entropy', 'salt', or 'iterations' is passed" do
+      expect { provider.class.get_salted_sha512_pbkdf2('othervalue', pbkdf2_embedded_bplist_hash) }.to raise_error(Puppet::Error, /Puppet has tried to read an incorrect value from the SALTED-SHA512-PBKDF2 hash. Acceptable fields are 'salt', 'entropy', or 'iterations'/)
+    end
+  end
+
+  describe '#get_sha1' do
+    let(:password_hash_file) { '/var/db/shadow/hash/user_guid' }
+    let(:stub_password_file) { stub('connection') }
+
+    it 'should return a sha1 hash read from disk' do
+      Puppet::FileSystem.expects(:exist?).with(password_hash_file).returns(true)
+      File.expects(:file?).with(password_hash_file).returns(true)
+      File.expects(:readable?).with(password_hash_file).returns(true)
+      File.expects(:new).with(password_hash_file).returns(stub_password_file)
+      stub_password_file.expects(:read).returns('sha1_password_hash')
+      stub_password_file.expects(:close)
+      provider.class.get_sha1('user_guid').should == 'sha1_password_hash'
+    end
+
+    it 'should return nil if the password_hash_file does not exist' do
+      Puppet::FileSystem.expects(:exist?).with(password_hash_file).returns(false)
+      provider.class.get_sha1('user_guid').should == nil
+    end
+
+    it 'should return nil if the password_hash_file is not a file' do
+      Puppet::FileSystem.expects(:exist?).with(password_hash_file).returns(true)
+      File.expects(:file?).with(password_hash_file).returns(false)
+      provider.class.get_sha1('user_guid').should == nil
+    end
+
+    it 'should raise an error if the password_hash_file is not readable' do
+      Puppet::FileSystem.expects(:exist?).with(password_hash_file).returns(true)
+      File.expects(:file?).with(password_hash_file).returns(true)
+      File.expects(:readable?).with(password_hash_file).returns(false)
+      expect { provider.class.get_sha1('user_guid').should == nil }.to raise_error(Puppet::Error, /Could not read password hash file at #{password_hash_file}/)
+    end
+  end
+
+  describe '#write_password_to_users_plist' do
+    let(:sha512_plist_xml) do
+      "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<!DOCTYPE plist PUBLIC \"-//Apple//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n<plist version=\"1.0\">\n<dict>\n\t<key>KerberosKeys</key>\n\t<array>\n\t\t<data>\n\t\tMIIBS6EDAgEBoIIBQjCCAT4wcKErMCmgAwIBEqEiBCCS/0Im7BAps/YhX/ED\n\t\tKOpDeSMFkUsu3UzEa6gqDu35BKJBMD+gAwIBA6E4BDZMS0RDOlNIQTEuNDM4\n\t\tM0UxNTJEOUQzOTRBQTMyRDEzQUU5OEY2RjZFMUZFOEQwMEY4MWplZmYwYKEb\n\t\tMBmgAwIBEaESBBAk8a3rrFk5mHAdEU5nRgFwokEwP6ADAgEDoTgENkxLREM6\n\t\tU0hBMS40MzgzRTE1MkQ5RDM5NEFBMzJEMTNBRTk4RjZGNkUxRkU4RDAwRjgx\n\t\tamVmZjBooSMwIaADAgEQoRoEGFg71irsV+9ddRNPSn9houo3Q6jZuj55XaJB\n\t\tMD+gAwIBA6E4BDZMS0RDOlNIQTEuNDM4M0UxNTJEOUQzOTRBQTMyRDEzQUU5\n\t\tOEY2RjZFMUZFOEQwMEY4MWplZmY=\n\t\t</data>\n\t</array>\n\t<key>ShadowHashData</key>\n\t<array>\n\t\t<data>\n\t\tYnBsaXN0MDDRAQJdU0FMVEVELVNIQTUxMk8QRFNL0iuruijP6becUWe43GTX\n\t\t5WTgOTi2emx41DMnwnB4vbKieVOE4eNHiyocX5c0GX1LWJ6VlZqZ9EnDLsuA\n\t\tNC5Ga9qlCAsZAAAAAAAAAQEAAAAAAAAAAwAAAAAAAAAAAAAAAAAAAGA=\n\t\t</data>\n\t</array>\n\t<key>authentication_authority</key>\n\t<array>\n\t\t<string>;Kerberosv5;;jeff@LKDC:SHA1.4383E152D9D394AA32D13AE98F6F6E1FE8D00F81;LKDC:SHA1.4383E152D9D394AA32D13AE98F6F6E1FE8D00F81</string>\n\t\t<string>;ShadowHash;HASHLIST:&lt;SALTED-SHA512&gt;</string>\n\t</array>\n\t<key>dsAttrTypeStandard:ShadowHashData</key>\n\t<array>\n\t\t<data>\n\t\tYnBsaXN0MDDRAQJdU0FMVEVELVNIQTUxMk8QRH6n1ZITH1eyyPi9vOyNnfEh\n\t\tKKOGOTpPAMdhm6wmIqRNRRQZ0R2lEtWRWrmOOXGKyUCD/i79a/cQpU1Hf4/3\n\t\tNbElhxktCAsZAAAAAAAAAQEAAAAAAAAAAwAAAAAAAAAAAAAAAAAAAGA=\n\t\t</data>\n\t</array>\n\t<key>generateduid</key>\n\t<array>\n\t\t<string>3AC74939-C14F-45DD-B6A9-D1A82373F0B0</string>\n\t</array>\n\t<key>name</key>\n\t<array>\n\t\t<string>jeff</string>\n\t</array>\n\t<key>passwd</key>\n\t<array>\n\t\t<string>********</string>\n\t</array>\n\t<key>passwordpolicyoptions</key>\n\t<array>\n\t\t<data>\n\t\tPD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiPz4KPCFET0NU\n\t\tWVBFIHBsaXN0IFBVQkxJQyAiLS8vQXBwbGUvL0RURCBQTElTVCAxLjAvL0VO\n\t\tIiAiaHR0cDovL3d3dy5hcHBsZS5jb20vRFREcy9Qcm9wZXJ0eUxpc3QtMS4w\n\t\tLmR0ZCI+CjxwbGlzdCB2ZXJzaW9uPSIxLjAiPgo8ZGljdD4KCTxrZXk+ZmFp\n\t\tbGVkTG9naW5Db3VudDwva2V5PgoJPGludGVnZXI+MDwvaW50ZWdlcj4KCTxr\n\t\tZXk+ZmFpbGVkTG9naW5UaW1lc3RhbXA8L2tleT4KCTxkYXRlPjIwMDEtMDEt\n\t\tMDFUMDA6MDA6MDBaPC9kYXRlPgoJPGtleT5sYXN0TG9naW5UaW1lc3RhbXA8\n\t\tL2tleT4KCTxkYXRlPjIwMDEtMDEtMDFUMDA6MDA6MDBaPC9kYXRlPgoJPGtl\n\t\teT5wYXNzd29yZFRpbWVzdGFtcDwva2V5PgoJPGRhdGU+MjAxMi0wOC0xMVQw\n\t\tMDozNTo1MFo8L2RhdGU+CjwvZGljdD4KPC9wbGlzdD4K\n\t\t</data>\n\t</array>\n\t<key>uid</key>\n\t<array>\n\t\t<string>28</string>\n\t</array>\n</dict>\n</plist>"
+    end
+
+    let(:pbkdf2_plist_xml) do
+      "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<!DOCTYPE plist PUBLIC \"-//Apple//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n<plist version=\"1.0\">\n<dict>\n\t<key>KerberosKeys</key>\n\t<array>\n\t\t<data>\n\t\tMIIBS6EDAgEBoIIBQjCCAT4wcKErMCmgAwIBEqEiBCDrboPy0gxu7oTZR/Pc\n\t\tYdCBC9ivXo1k05gt036/aNe5VqJBMD+gAwIBA6E4BDZMS0RDOlNIQTEuNDEz\n\t\tQTMwRjU5MEVFREM3ODdENTMyOTgxODUwQTk3NTI0NUIwQTcyM2plZmYwYKEb\n\t\tMBmgAwIBEaESBBCm02SYYdsxo2fiDP4KuPtmokEwP6ADAgEDoTgENkxLREM6\n\t\tU0hBMS40MTNBMzBGNTkwRUVEQzc4N0Q1MzI5ODE4NTBBOTc1MjQ1QjBBNzIz\n\t\tamVmZjBooSMwIaADAgEQoRoEGHPBc7Dg7zjaE8g+YXObwupiBLMIlCrN5aJB\n\t\tMD+gAwIBA6E4BDZMS0RDOlNIQTEuNDEzQTMwRjU5MEVFREM3ODdENTMyOTgx\n\t\tODUwQTk3NTI0NUIwQTcyM2plZmY=\n\t\t</data>\n\t</array>\n\t<key>ShadowHashData</key>\n\t<array>\n\t\t<data>\n\t\tYnBsaXN0MDDRAQJfEBRTQUxURUQtU0hBNTEyLVBCS0RGMtMDBAUGBwhXZW50\n\t\tcm9weVRzYWx0Wml0ZXJhdGlvbnNPEIAFkK3hnmlTwTWuhyrndhgjXffUbGPe\n\t\tf5oPzfLNnn2F5LfKhoEBI1thWOBaMJgF7kgUsCekvpwj7CkmvIFyJpr/ulya\n\t\tWYXoEJH6aJgHbSl/H6p1+mF1Ue8WcddSAFXEoNl7m5xYBaoyK67bzY7pxSOB\n\t\tFlOsLqnpyNjxrFGaDytZXk8QIJN3xGkIocisLD5FwNRNqK0PzYXsXBTZpZ/8\n\t\tQMnaMfDsEWCwCAsiKTE2QcTnAAAAAAAAAQEAAAAAAAAACQAAAAAAAAAAAAAA\n\t\tAAAAAOo=\n\t\t</data>\n\t</array>\n\t<key>authentication_authority</key>\n\t<array>\n\t\t<string>;Kerberosv5;;jeff@LKDC:SHA1.413A30F590EEDC787D532981850A975245B0A723;LKDC:SHA1.413A30F590EEDC787D532981850A975245B0A723</string>\n\t\t<string>;ShadowHash;HASHLIST:&lt;SALTED-SHA512-PBKDF2&gt;</string>\n\t</array>\n\t<key>generateduid</key>\n\t<array>\n\t\t<string>1CB825D1-2DF7-43CC-B874-DB6BBB76C402</string>\n\t</array>\n\t<key>gid</key>\n\t<array>\n\t\t<string>21</string>\n\t</array>\n\t<key>name</key>\n\t<array>\n\t\t<string>jeff</string>\n\t</array>\n\t<key>passwd</key>\n\t<array>\n\t\t<string>********</string>\n\t</array>\n\t<key>passwordpolicyoptions</key>\n\t<array>\n\t\t<data>\n\t\tPD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiPz4KPCFET0NU\n\t\tWVBFIHBsaXN0IFBVQkxJQyAiLS8vQXBwbGUvL0RURCBQTElTVCAxLjAvL0VO\n\t\tIiAiaHR0cDovL3d3dy5hcHBsZS5jb20vRFREcy9Qcm9wZXJ0eUxpc3QtMS4w\n\t\tLmR0ZCI+CjxwbGlzdCB2ZXJzaW9uPSIxLjAiPgo8ZGljdD4KCTxrZXk+ZmFp\n\t\tbGVkTG9naW5Db3VudDwva2V5PgoJPGludGVnZXI+MDwvaW50ZWdlcj4KCTxr\n\t\tZXk+ZmFpbGVkTG9naW5UaW1lc3RhbXA8L2tleT4KCTxkYXRlPjIwMDEtMDEt\n\t\tMDFUMDA6MDA6MDBaPC9kYXRlPgoJPGtleT5sYXN0TG9naW5UaW1lc3RhbXA8\n\t\tL2tleT4KCTxkYXRlPjIwMDEtMDEtMDFUMDA6MDA6MDBaPC9kYXRlPgoJPGtl\n\t\teT5wYXNzd29yZExhc3RTZXRUaW1lPC9rZXk+Cgk8ZGF0ZT4yMDEyLTA3LTI1\n\t\tVDE4OjQ3OjU5WjwvZGF0ZT4KPC9kaWN0Pgo8L3BsaXN0Pgo=\n\t\t</data>\n\t</array>\n\t<key>uid</key>\n\t<array>\n\t\t<string>28</string>\n\t</array>\n</dict>\n</plist>"
+    end
+
+    let(:sha512_shadowhashdata) do
+      {
+        'SALTED-SHA512' => StringIO.new('blankvalue')
+      }
+    end
+
+    let(:pbkdf2_shadowhashdata) do
+      {
+        'SALTED-SHA512-PBKDF2' => {
+          'entropy'    => StringIO.new('blank_entropy'),
+          'salt'       => StringIO.new('blank_salt'),
+          'iterations' => 100
+        }
+      }
+    end
+
+    let(:sample_users_plist) do
+      {
+        "shell"                    => ["/bin/zsh"],
+        "passwd"                   => ["********"],
+        "picture"                  => ["/Library/User Pictures/Animals/Eagle.tif"],
+        "_writers_LinkedIdentity"  => ["puppet"], "name"=>["puppet"],
+        "home"                     => ["/Users/puppet"],
+        "_writers_UserCertificate" => ["puppet"],
+        "_writers_passwd"          => ["puppet"],
+        "gid"                      => ["20"],
+        "generateduid"             => ["DA8A0E67-E9BE-4B4F-B34E-8977BAE0D3D4"],
+        "realname"                 => ["Puppet"],
+        "_writers_picture"         => ["puppet"],
+        "uid"                      => ["501"],
+        "hint"                     => [""],
+        "authentication_authority" => [";ShadowHash;HASHLIST:<SALTED-SHA512>",
+          ";Kerberosv5;;puppet@LKDC:S HA1.35580B1D6366D2890A35D430373FF653297F377D;LKDC:SHA1.35580B1D6366D2890A35D430373FF653297F377D"],
+        "_writers_realname"        => ["puppet"],
+        "_writers_hint"            => ["puppet"],
+        "ShadowHashData"           => [StringIO.new('blank')]
+      }
+    end
+
+    it 'should call set_salted_sha512 on 10.7 when given a salted-SHA512 password hash' do
+      provider.expects(:get_users_plist).returns(sample_users_plist)
+      provider.expects(:get_shadow_hash_data).with(sample_users_plist).returns(sha512_shadowhashdata)
+      provider.class.expects(:get_os_version).returns('10.7')
+      provider.expects(:set_salted_sha512).with(sample_users_plist, sha512_shadowhashdata, sha512_password_hash)
+      provider.write_password_to_users_plist(sha512_password_hash)
+    end
+
+    it 'should call set_salted_pbkdf2 on 10.8 when given a PBKDF2 password hash' do
+      provider.expects(:get_users_plist).returns(sample_users_plist)
+      provider.expects(:get_shadow_hash_data).with(sample_users_plist).returns(pbkdf2_shadowhashdata)
+      provider.class.expects(:get_os_version).returns('10.8')
+      provider.expects(:set_salted_pbkdf2).with(sample_users_plist, pbkdf2_shadowhashdata, 'entropy', pbkdf2_password_hash)
+      provider.write_password_to_users_plist(pbkdf2_password_hash)
+    end
+
+    it "should delete the SALTED-SHA512 key in the shadow_hash_data hash if it exists on a 10.8 system and write_password_to_users_plist has been called to set the user's password" do
+      provider.expects(:get_users_plist).returns('users_plist')
+      provider.expects(:get_shadow_hash_data).with('users_plist').returns(sha512_shadowhashdata)
+      provider.class.expects(:get_os_version).returns('10.8')
+      provider.expects(:set_salted_pbkdf2).with('users_plist', {}, 'entropy', pbkdf2_password_hash)
+      provider.write_password_to_users_plist(pbkdf2_password_hash)
+    end
+  end
+
+  describe '#set_salted_sha512' do
+    let(:users_plist) { {'ShadowHashData' => [StringIO.new('string_data')] } }
+    let(:sha512_shadow_hash_data) do
+      {
+        'SALTED-SHA512' => stringio_object
+      }
+    end
+
+    it 'should set the SALTED-SHA512 password hash for a user in 10.7 and call the set_shadow_hash_data method to write the plist to disk' do
+      provider.class.expects(:convert_xml_to_binary).with(sha512_embedded_bplist_hash).returns(sha512_embedded_bplist)
+      provider.expects(:set_shadow_hash_data).with(users_plist, sha512_embedded_bplist)
+      provider.set_salted_sha512(users_plist, sha512_embedded_bplist_hash, sha512_password_hash)
+    end
+
+    it 'should set the salted-SHA512 password, even if a blank shadow_hash_data hash is passed' do
+      provider.expects(:new_stringio_object).returns(stringio_object)
+      provider.class.expects(:convert_xml_to_binary).with(sha512_shadow_hash_data).returns(sha512_embedded_bplist)
+      provider.expects(:set_shadow_hash_data).with(users_plist, sha512_embedded_bplist)
+      provider.set_salted_sha512(users_plist, false, sha512_password_hash)
+    end
+  end
+
+  describe '#set_salted_pbkdf2' do
+    let(:users_plist) { {'ShadowHashData' => [StringIO.new('string_data')] } }
+    let(:entropy_shadow_hash_data) do
+      {
+        'SALTED-SHA512-PBKDF2' =>
+        {
+          'entropy' => stringio_object
+        }
+      }
+    end
+
+    # This will also catch the edge-case where a 10.6-style user exists on
+    # a 10.8 system and Puppet attempts to set a password
+    it 'should not fail if shadow_hash_data is not a Hash' do
+      provider.expects(:new_stringio_object).returns(stringio_object)
+      provider.expects(:base64_decode_string).with(pbkdf2_password_hash).returns('binary_string')
+      provider.class.expects(:convert_xml_to_binary).with(entropy_shadow_hash_data).returns('binary_plist')
+      provider.expects(:set_shadow_hash_data).with({'passwd' => '********'}, 'binary_plist')
+      provider.set_salted_pbkdf2({}, false, 'entropy', pbkdf2_password_hash)
+    end
+
+    it "should set the PBKDF2 password hash when the 'entropy' field is passed with a valid password hash" do
+      provider.class.expects(:convert_xml_to_binary).with(pbkdf2_embedded_bplist_hash).returns(pbkdf2_embedded_plist)
+      provider.expects(:set_shadow_hash_data).with(users_plist, pbkdf2_embedded_plist)
+      users_plist.expects(:[]=).with('passwd', '********')
+      provider.set_salted_pbkdf2(users_plist, pbkdf2_embedded_bplist_hash, 'entropy', pbkdf2_password_hash)
+    end
+
+    it "should set the PBKDF2 password hash when the 'salt' field is passed with a valid password hash" do
+      provider.class.expects(:convert_xml_to_binary).with(pbkdf2_embedded_bplist_hash).returns(pbkdf2_embedded_plist)
+      provider.expects(:set_shadow_hash_data).with(users_plist, pbkdf2_embedded_plist)
+      users_plist.expects(:[]=).with('passwd', '********')
+      provider.set_salted_pbkdf2(users_plist, pbkdf2_embedded_bplist_hash, 'salt', pbkdf2_salt_value)
+    end
+
+    it "should set the PBKDF2 password hash when the 'iterations' field is passed with a valid password hash" do
+      provider.class.expects(:convert_xml_to_binary).with(pbkdf2_embedded_bplist_hash).returns(pbkdf2_embedded_plist)
+      provider.expects(:set_shadow_hash_data).with(users_plist, pbkdf2_embedded_plist)
+      users_plist.expects(:[]=).with('passwd', '********')
+      provider.set_salted_pbkdf2(users_plist, pbkdf2_embedded_bplist_hash, 'iterations', pbkdf2_iterations_value)
+    end
+  end
+
+  describe '#write_users_plist_to_disk' do
+    it 'should save the passed plist to disk and convert it to a binary plist' do
+      Plist::Emit.expects(:save_plist).with(user_plist_xml, "#{users_plist_dir}/nonexistant_user.plist")
+      provider.expects(:plutil).with('-convert', 'binary1', "#{users_plist_dir}/nonexistant_user.plist")
+      provider.write_users_plist_to_disk(user_plist_xml)
+    end
+  end
+
+  describe '#write_sha1_hash' do
+    let(:password_hash_dir) { '/var/db/shadow/hash' }
+
+    it "should write the sha1 hash to a file on disk named after the user's GUID and also ensure that ':ShadowHash;' is included in the user's AuthenticationAuthority" do
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'GeneratedUID').returns({'dsAttrTypeStandard:GeneratedUID' => ['GUID']})
+      provider.expects(:write_to_file).with("#{password_hash_dir}/GUID", 'sha1_password')
+      provider.expects(:dscl).with('.', '-merge', user_path, 'AuthenticationAuthority', ';ShadowHash;').returns(true)
+      provider.write_sha1_hash('sha1_password')
+    end
+
+    it "should raise an error if Puppet cannot write to the file in /var/db/shadow/hash named after the user's GUID" do
+      File.expects(:open).with('filename', 'w').raises(Errno::EACCES, 'boom')
+      expect { provider.write_to_file('filename', 'sha1_password') }.to raise_error Puppet::Error, /Could not write to file filename: Permission denied - boom/
+    end
+
+    it "should raise an error if dscl cannot merge ';ShadowHash;' into the user's AuthenticationAuthority" do
+      provider.class.expects(:get_attribute_from_dscl).with('Users', username, 'GeneratedUID').returns({'dsAttrTypeStandard:GeneratedUID' => ['GUID']})
+      provider.expects(:write_to_file).with("#{password_hash_dir}/GUID", 'sha1_password')
+      provider.expects(:dscl).with('.', '-merge', user_path, 'AuthenticationAuthority', ';ShadowHash;').raises(Puppet::ExecutionFailure, 'boom')
+      expect { provider.write_sha1_hash('sha1_password') }.to raise_error Puppet::Error, /Could not set the dscl AuthenticationAuthority key with value: ;ShadowHash;/
+    end
+  end
+
+  describe '#merge_attribute_with_dscl' do
+    it 'should raise an error if a dscl command raises an error' do
+      provider.expects(:dscl).with('.', '-merge', user_path, 'GeneratedUID', 'GUID').raises(Puppet::ExecutionFailure, 'boom')
+      expect { provider.merge_attribute_with_dscl('Users', username, 'GeneratedUID', 'GUID') }.to raise_error Puppet::Error, /Could not set the dscl GeneratedUID key with value: GUID/
+    end
+  end
+
+  describe '#get_users_plist' do
+    let(:test_plist) do
+      "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n<plist version=\"1.0\">\n<dict>\n\t<key>shell</key>\n\t<string>/bin/bash</string>\n\t<key>user</key>\n\t<string>puppet</string>\n</dict>\n</plist>\n"
+    end
+
+    let(:test_hash) do
+      {
+        'user'  => 'puppet',
+        'shell' => '/bin/bash'
+      }
+    end
+
+    it 'should convert a plist to a valid Ruby hash' do
+      provider.expects(:plutil).with('-convert', 'xml1', '-o', '/dev/stdout', "#{users_plist_dir}/#{username}.plist").returns(test_plist)
+      provider.get_users_plist(username).should == test_hash
+    end
+  end
+
+  describe '#get_shadow_hash_data' do
+    let(:shadow_hash) do
+      {
+        'ShadowHashData' => [StringIO.new('test')]
+      }
+    end
+
+    let(:no_shadow_hash) do
+      {
+        'no' => 'Shadow Hash Data'
+      }
+    end
+
+    it 'should return false if the passed users_plist does NOT have a ShadowHashData key' do
+      provider.get_shadow_hash_data(no_shadow_hash).should == false
+    end
+
+    it 'should call convert_binary_to_xml() with the contents of the StringIO Object ' +
+       'located in the first element of the array of the ShadowHashData key if the ' +
+       'passed users_plist contains a ShadowHashData key' do
+      provider.class.expects(:convert_binary_to_xml).with('test').returns('returnvalue')
+      provider.get_shadow_hash_data(shadow_hash).should == 'returnvalue'
+    end
+  end
+
+  describe 'self#get_os_version' do
+    it 'should call Facter.value(:macosx_productversion_major) ONLY ONCE no matter how ' +
+       'many times get_os_version() is called' do
+      Facter.expects(:value).with(:macosx_productversion_major).once.returns('10.8')
+      provider.class.get_os_version.should == '10.8'
+      provider.class.get_os_version.should == '10.8'
+      provider.class.get_os_version.should == '10.8'
+      provider.class.get_os_version.should == '10.8'
+    end
+  end
+
+  describe '#base64_decode_string' do
+    it 'should return a Base64-decoded string appropriate for use in a user\'s plist' do
+      provider.base64_decode_string(sha512_password_hash).should == sha512_pw_string
+    end
+  end
+
+  describe '(#12833) 10.6-style users on 10.8' do
+    # The below represents output of 'dscl -plist . readall /Users'
+    # converted to a Ruby hash if only one user were installed on the system.
+    # This lets us check the behavior of all the methods necessary to return
+    # a user's groups property by controlling the data provided by dscl. The
+    # differentiating aspect about this plist is that it's from a 10.6-style
+    # user. There's an edge case whereby a user that was created in 10.6, but
+    # who hasn't attempted to login to the system until after it's been
+    # upgraded to 10.8, will experience errors due to assumptions in Puppet
+    # based solely on operatingsystem.
+    let(:all_users_hash) do
+      [
+        {
+          "dsAttrTypeNative:_writers_UserCertificate"  => ["testuser"],
+          "dsAttrTypeStandard:RealName"                => ["testuser"],
+          "dsAttrTypeStandard:NFSHomeDirectory"        => ["/Users/testuser"],
+          "dsAttrTypeNative:_writers_realname"         => ["testuser"],
+          "dsAttrTypeNative:_writers_picture"          => ["testuser"],
+          "dsAttrTypeStandard:AppleMetaNodeLocation"   => ["/Local/Default"],
+          "dsAttrTypeStandard:PrimaryGroupID"          => ["20"],
+          "dsAttrTypeNative:_writers_LinkedIdentity"   => ["testuser"],
+          "dsAttrTypeStandard:UserShell"               => ["/bin/bash"],
+          "dsAttrTypeStandard:UniqueID"                => ["1234"],
+          "dsAttrTypeStandard:RecordName"              => ["testuser"],
+          "dsAttrTypeStandard:Password"                => ["********"],
+          "dsAttrTypeNative:_writers_jpegphoto"        => ["testuser"],
+          "dsAttrTypeNative:_writers_hint"             => ["testuser"],
+          "dsAttrTypeNative:_writers_passwd"           => ["testuser"],
+          "dsAttrTypeStandard:RecordType"              => ["dsRecTypeStandard:Users"],
+          "dsAttrTypeStandard:AuthenticationAuthority" => [
+            ";ShadowHash;",
+            ";Kerberosv5;;testuser@LKDC:SHA1.48AC4BCFEFE9 D66847B5E7D813BC4B12C5513A07;LKDC:SHA1.48AC4BCFEFE9D66847B5E7D813BC4B12C5513A07;"
+                                                          ],
+          "dsAttrTypeStandard:GeneratedUID"            => ["D1AC2ECC-F177-4B45-8B18-59CF002F97FF"]
+        }
+      ]
+    end
+
+    let(:username) { 'testuser' }
+    let(:user_path) { "/Users/#{username}" }
+    let(:resource) do
+      Puppet::Type.type(:user).new(
+        :name     => username,
+        :provider => :directoryservice
+      )
+    end
+    let(:provider) { resource.provider }
+
+    # The below represents the result of get_users_plist on the testuser
+    # account from the 'all_users_hash' helper method. The get_users_plist
+    # method calls the `plutil` binary to do its work, so we want to stub
+    # that out
+    let(:user_plist_hash) do
+      {
+        'realname'                 => ['testuser'],
+        'authentication_authority' => [';ShadowHash;', ';Kerberosv5;;testuser@LKDC:SHA1.48AC4BCFEFE9D66847B5E7D813BC4B12C5513A07;LKDC:SHA1.48AC4BCFEFE9D66847B5E7D813BC4B12C5513A07;'],
+        'home'                     => ['/Users/testuser'],
+        '_writers_realname'        => ['testuser'],
+        'passwd'                   => '********',
+        '_writers_LinkedIdentity'  => ['testuser'],
+        '_writers_picture'         => ['testuser'],
+        'gid'                      => ['20'],
+        '_writers_passwd'          => ['testuser'],
+        '_writers_hint'            => ['testuser'],
+        '_writers_UserCertificate' => ['testuser'],
+        '_writers_jpegphoto'       => ['testuser'],
+        'shell'                    => ['/bin/bash'],
+        'uid'                      => ['1234'],
+        'generateduid'             => ['D1AC2ECC-F177-4B45-8B18-59CF002F97FF'],
+        'name'                     => ['testuser']
+      }
+    end
+
+    before :each do
+      provider.class.stubs(:get_all_users).returns(all_users_hash)
+      provider.class.stubs(:get_list_of_groups).returns(group_plist_hash_guid)
+      provider.class.stubs(:get_attribute_from_dscl).with('Users', 'testuser', 'ShadowHashData').returns({})
+      provider.class.prefetch({})
+    end
+
+    it 'should not raise an error if the password=() method is called on ' +
+       'a user without a ShadowHashData key in their user\'s plist on OS X ' +
+       'version 10.8' do
+      provider.class.stubs(:get_os_version).returns('10.8')
+      provider.stubs(:sleep)
+      provider.stubs(:flush_dscl_cache)
+      provider.expects(:get_users_plist).with('testuser').returns(user_plist_hash)
+      provider.expects(:set_salted_pbkdf2).with(user_plist_hash, false, 'entropy', pbkdf2_password_hash)
+      provider.password = pbkdf2_password_hash
+    end
+  end
+end
+