#
# Author:: Lamont Granquist (<lamont@opscode.com>)
# Copyright:: Copyright (c) 2012 OpsCode, Inc.
# License:: Apache License, Version 2.0
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#

require 'spec_helper'

describe Chef::Resource::RegistryKey, "initialize" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should create a new Chef::Resource::RegistryKey" do
    expect(@resource).to be_a_kind_of(Chef::Resource)
    expect(@resource).to be_a_kind_of(Chef::Resource::RegistryKey)
  end

  it "should set the resource_name to :registry_key" do
    expect(@resource.resource_name).to eql(:registry_key)
  end

  it "should set the key equal to the argument to initialize" do
    expect(@resource.key).to eql('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should default recursive to false" do
    expect(@resource.recursive).to eql(false)
  end

  it "should default architecture to :machine" do
    expect(@resource.architecture).to eql(:machine)
  end

  it "should set action to :create" do
    expect(@resource.action).to eql(:create)
  end

  %w{create create_if_missing delete delete_key}.each do |action|
    it "should allow action #{action}" do
      expect(@resource.allowed_actions.detect { |a| a == action.to_sym }).to eql(action.to_sym)
    end
  end
end

describe Chef::Resource::RegistryKey, "key" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should allow a string" do
    @resource.key 'HKCU\Software\Poosh'
    expect(@resource.key).to eql('HKCU\Software\Poosh')
  end

  it "should not allow an integer" do
    expect { @resource.send(:key, 100) }.to raise_error(ArgumentError)
  end

  it "should not allow a hash" do
    expect { @resource.send(:key, { :sonic => "screwdriver" }) }.to raise_error(ArgumentError)
  end
end

describe Chef::Resource::RegistryKey, "values" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should allow a single proper hash of registry values" do
    @resource.values( { :name => 'poosh', :type => :string, :data => 'carmen' } )
    expect(@resource.values).to eql([ { :name => 'poosh', :type => :string, :data => 'carmen' } ])
  end

  it "should allow an array of proper hashes of registry values" do
    @resource.values [ { :name => 'poosh', :type => :string, :data => 'carmen' } ]
    expect(@resource.values).to eql([ { :name => 'poosh', :type => :string, :data => 'carmen' } ])
  end

  it "should return checksummed data if the type is unsafe" do
    @resource.values( { :name => 'poosh', :type => :binary, :data => 255.chr * 1 })
    expect(@resource.values).to eql([ { :name => 'poosh', :type => :binary, :data => "00594fd4f42ba43fc1ca0427a0576295" } ])
  end

  it "should throw an exception if the name field is missing" do
    expect { @resource.values [ { :type => :string, :data => 'carmen' } ] }.to raise_error(ArgumentError)
  end

  it "should throw an exception if the type field is missing" do
    expect { @resource.values [ { :name => 'poosh', :data => 'carmen' } ] }.to raise_error(ArgumentError)
  end

  it "should throw an exception if the data field is missing" do
    expect { @resource.values [ { :name => 'poosh', :type => :string } ] }.to raise_error(ArgumentError)
  end

  it "should throw an exception if extra fields are present" do
    expect { @resource.values [ { :name => 'poosh', :type => :string, :data => 'carmen', :screwdriver => 'sonic' } ] }.to raise_error(ArgumentError)
  end

  it "should not allow a string" do
    expect { @resource.send(:values, 'souffle') }.to raise_error(ArgumentError)
  end

  it "should not allow an integer" do
    expect { @resource.send(:values, 100) }.to raise_error(ArgumentError)
  end
end

describe Chef::Resource::RegistryKey, "recursive" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should allow a boolean" do
    @resource.recursive(true)
    expect(@resource.recursive).to eql(true)
  end

  it "should not allow a hash" do
    expect { @resource.recursive({:sonic => :screwdriver}) }.to raise_error(ArgumentError)
  end

  it "should not allow an array" do
    expect { @resource.recursive([:nose, :chin]) }.to raise_error(ArgumentError)
  end

  it "should not allow a string" do
    expect { @resource.recursive('souffle') }.to raise_error(ArgumentError)
  end

  it "should not allow an integer" do
    expect { @resource.recursive(100) }.to raise_error(ArgumentError)
  end
end

describe Chef::Resource::RegistryKey, "architecture" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  [ :i386, :x86_64, :machine ].each do |arch|
    it "should allow #{arch} as a symbol" do
      @resource.architecture(arch)
      expect(@resource.architecture).to eql(arch)
    end
  end

  it "should not allow a hash" do
    expect { @resource.architecture({:sonic => :screwdriver}) }.to raise_error(ArgumentError)
  end

  it "should not allow an array" do
    expect { @resource.architecture([:nose, :chin]) }.to raise_error(ArgumentError)
  end

  it "should not allow a string" do
    expect { @resource.architecture('souffle') }.to raise_error(ArgumentError)
  end

  it "should not allow an integer" do
    expect { @resource.architecture(100) }.to raise_error(ArgumentError)
  end
end

describe Chef::Resource::RegistryKey, ":unscrubbed_values" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should return unsafe data as-is" do
    key_values = [ { :name => 'poosh', :type => :binary, :data => 255.chr * 1 } ]
    @resource.values(key_values)
    expect(@resource.unscrubbed_values).to eql(key_values)
  end
end

describe Chef::Resource::RegistryKey, "state" do
  before(:each) do
    @resource = Chef::Resource::RegistryKey.new('HKCU\Software\Raxicoricofallapatorius')
  end

  it "should return scrubbed values" do
    @resource.values([ { :name => 'poosh', :type => :binary, :data => 255.chr * 1 } ])
    expect(@resource.state).to eql( { :values => [{ :name => 'poosh', :type => :binary, :data => "00594fd4f42ba43fc1ca0427a0576295" }] } )
  end
end