#
# Author:: Adam Jacob (<adam@opscode.com>)
# Copyright:: Copyright (c) 2008 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 'chef/resource'

class Chef
  class Resource
    class Link < Chef::Resource

      def initialize(name, run_context=nil)
        super
        @resource_name = :link
        @to = nil
        @action = :create
        @link_type = :symbolic
        @target_file = name
        @allowed_actions.push(:create, :delete)
      end

      def to(arg=nil)
        set_or_return(
          :source_file,
          arg,
          :kind_of => String
        )
      end

      def target_file(arg=nil)
        set_or_return(
          :target_file,
          arg,
          :kind_of => String
        )
      end

      def link_type(arg=nil)
        real_arg = arg.kind_of?(String) ? arg.to_sym : arg
        set_or_return(
          :link_type,
          real_arg,
          :equal_to => [ :symbolic, :hard ]
        )
      end

      def group(arg=nil)
        set_or_return(
          :group,
          arg,
          :regex => Chef::Config[:group_valid_regex]
        )
      end

      def owner(arg=nil)
        set_or_return(
          :owner,
          arg,
          :regex => Chef::Config[:user_valid_regex]
        )
      end

    end
  end
end

if $testrun
  class Chef::Resource::Link < Chef::Resource
    alias chef_to to
    alias chef_target_file target_file

    def to(arg=nil)
      if (chef_to(arg).start_with?("//"))
        if $testrun_path
          ::File.join($testrun_path, chef_to(arg).sub("//","/"))
        else
          chef_to(arg).sub("//","/")
        end
      else
        chef_to(arg)
      end
    end

    def target_file(arg=nil)
      if (chef_target_file(arg).start_with?($testrun_path))
        chef_target_file(arg)
      else
        ::File.join($testrun_path, chef_target_file(arg))
      end
    end
  end
end