#!/usr/bin/env ruby
# encoding: UTF-8

# (c) Copyright 2014 Hewlett-Packard Development Company, L.P.
#
#    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 'rubygems'
require 'bundler/setup'

$APP_PATH = File.dirname(__FILE__)
$LIB_PATH = File.expand_path(File.join(File.dirname($APP_PATH),'lib'))
$FORJ_DATA_PATH= File.expand_path('~/.forj')

$LOAD_PATH << './lib'

require 'forj-config.rb' # Load class ForjConfig
require 'log.rb' # Load default loggers
require 'ansi'

include Logging

$FORJ_LOGGER=ForjLog.new('forj-rspec.log', Logger::FATAL)


describe "class: forj-config," do
    context "when creating a new instance" do

      it 'should be loaded' do
         @test_config=ForjConfig.new()
         expect(@test_config).to be
      end

    end

    context "when starting, forj-config" do
      before(:all) do
         @config=ForjConfig.new()
      end

      it 'should be able to create a key/value in local config' do
         @config.LocalSet(:test1,'value')
         expect(@config.LocalGet(:test1)).to eq('value')
      end

      it 'should be able to remove the previously created key/value from local config' do
         @config.LocalDel(:test1)
         expect(@config.exist?(:test1)).to equal(false)
      end
    end

    context "while updating local config file, forj-config" do
      before(:all) do
         @config=ForjConfig.new()
      end

      after(:all)  do
        @config.LocalDel(:test1)
        @config.SaveConfig()
      end

      it 'should save a key/value in local config' do
         @config.LocalSet(:test1,'value')
         expect(@config.SaveConfig()).to equal(true)

         oConfig=ForjConfig.new()
         expect(@config.LocalGet(:test1)).to eq('value')
      end

    end

    context "With another config file - test1.yaml, forj-config" do

      before(:all) do
        if File.exists?('~/.forj/test.yaml')
           File.delete(File.expand_path('~/.forj/test.yaml'))
        end
        File.open(File.expand_path('~/.forj/test1.yaml'), 'w+') { |file| file.write(":default:\n") }
        @config=ForjConfig.new('test.yaml')
        @config2=ForjConfig.new('test1.yaml')
      end

      after(:all)  do
        File.delete(File.expand_path('~/.forj/test1.yaml'))
      end

      it 'won\'t create a new file If we request to load \'test.yaml\'' do
         expect(File.exists?(File.expand_path('~/.forj/test.yaml'))).to equal(false)
      end

      it 'will load the default config file if we request to load \'test.yaml\'' do
         expect(File.basename(@config.sConfigName)).to eq('config.yaml')
      end

      it 'will confirm \'test1.yaml\' config to be loaded.' do
         expect(File.basename(@config2.sConfigName)).to eq('test1.yaml')
      end

      it 'can save \'test2=value\'' do
         @config2.LocalSet('test2','value')
         expect(@config2.SaveConfig()).to equal(true)
         config3=ForjConfig.new('test1.yaml')
         expect(config3.LocalGet('test2')).to eq('value')
      end

    end

   context "with get/set/exists?," do
      before(:all) do
         @config=ForjConfig.new()
         @url = @config.get('maestro_url')
      end

      it 'can set and get data,' do
         expect(@config.set(nil, nil)).to equal(false)
         expect(@config.set(:test, nil)).to equal(true)
         expect(@config.get(:test)).to equal(nil)

         expect(@config.set(:test, 'data')).to equal(true)
         expect(@config.get(:test)).to eq('data')
      end
      
      context 'from defaults,' do
         it 'can get application defaults' do
            expect(@config.get(:maestro_url).class).to equal(String)
            expect(@config.getAppDefault(:default, :maestro_url).class).to equal(String)
            expect(@config.getAppDefault(:description, 'FORJ_HPC').class).to equal(String)

         end
         it 'can get Local defaults instead of application' do
            expect(@config.LocalSet(:maestro_url,'local')).to equal(true)
            expect(@config.LocalGet(:maestro_url)).to eq('local')
            expect(@config.get(:maestro_url)).to eq('local')
         end

         it 'can get runtime defaults instead of Local/application' do
            expect(@config.set(:maestro_url, 'runtime')).to equal(true)
            expect(@config.get(:maestro_url)).to eq('runtime')
            expect(@config.LocalGet(:maestro_url)).to eq('local')
         end

         it 'can get runtime defaults instead of application' do
            expect(@config.LocalDel(:maestro_url)).to equal(true)
            expect(@config.get(:maestro_url)).to eq('runtime')
            expect(@config.LocalGet(:maestro_url)).to equal(nil)
         end

         it 'can get defaults if no key' do
            expect(@config.set(:test1, nil)).to equal(true)
            expect(@config.get(:test1, 'default')).to eq('default')
            expect(@config.get(:test1, nil)).to equal(nil)
            expect(@config.set(:maestro_url,nil)).to equal(true)
            expect(@config.get(:maestro_url)).to eq(@url)
         end
      end
      
      context 'with intermediates,' do
         before(:all) do
            @yYAML1={ :maestro_url => 'url1' }
            @aArray1=[]
            @aArray1[0]={ :maestro_url => 'url2' }
            @aArray1[1]=@yYAML1
            @aArray2=[]
            @aArray2[0] = @aArray1[1]
            @aArray2[1] = @aArray1[0]
            @aArray3=[]
            @aArray3[0] = { :hash_1 => { :maestro_url => 'url3'  }}
            @aArray3[1] = { :hash_2 => { :keypair_name => 'nova' }}
            @aArray4=[]
            @aArray4[0] = { :hash_1 => { :keypair_name => 'nova' }}
            @aArray4[1] = { :hash_2 => { :maestro_url => 'url4'  }}
         end

         # Obsolete.
         #~ it 'can get data from one hash' do
            #~ expect(@config.get(:maestro_url, @yYAML1)).to eq('url1')
            #~ @config.set(:maestro_url, 'runtime')
            #~ expect(@config.get(:maestro_url, @yYAML1)).to eq('runtime')
         #~ end
         #~ 
         #~ it 'can get data from array of hash' do
            #~ @config.set(:maestro_url, nil)
            #~ expect(@config.get(:maestro_url, @aArray1)).to eq('url2')
            #~ expect(@config.get(:maestro_url, @aArray2)).to eq('url1')
         #~ end
         #~ it 'can get data from array of hashes' do
            #~ @config.set('maestro_url', nil)
            #~ expect(@config.exist?(:maestro_url, @aArray3)).to eq('hash_1')
            #~ expect(@config.exist?(:maestro_url, @aArray4)).to eq('hash_2')
            #~ expect(@config.get(:maestro_url, @aArray3)).to eq('url3')
            #~ expect(@config.get(:maestro_url, @aArray4)).to eq('url4')
         #~ end
      end
   end
end

describe 'Recursive Hash functions,' do
   context "With recursive Hash functions" do
      it 'can create a 3 levels of hash' do
         yYAML = rhSet(nil, 'level4', :level1, :level2, :level3)
         expect(yYAML[:level1][:level2][:level3]).to eq('level4')
      end

      it 'can add a 3 levels of hash in an existing hash' do
         yYAML = rhSet(nil, 'level4', :level1, :level2, :level3)
         yYAML = rhSet(yYAML, 'level1.1', :level1_1)
         expect(yYAML[:level1][:level2][:level3]).to eq('level4')
         expect(yYAML[:level1_1]).to eq('level1.1')
      end

      it 'can get each levels of hash data' do
         yYAML = rhSet(nil, 'level4', :level1, :level2, :level3)
         expect(rhGet(yYAML, :level1).class).to equal(Hash)
         expect(rhGet(yYAML, :level1, :level2).class).to equal(Hash)
         expect(rhGet(yYAML, :level1, :level2, :level3).class).to equal(String)
      end

      it 'can check existence of each levels of hash data' do
         yYAML = rhSet(nil, 'level4', :level1, :level2, :level3)
         expect(rhExist?(yYAML, :level1)).to eq(1)
         expect(rhExist?(yYAML, :level1, :level2)).to eq(2)
         expect(rhExist?(yYAML, :level1, :level2, :level3)).to eq(3)
         expect(rhExist?(yYAML, :level1_1, :level2, :level3)).to eq(0)

      end
   end
end