/*     Copyright 2015-2018 Egor Yusov
 *  
 *  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
 * 
 *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 *  IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 *  FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF ANY PROPRIETARY RIGHTS.
 *
 *  In no event and under no legal theory, whether in tort (including negligence), 
 *  contract, or otherwise, unless required by applicable law (such as deliberate 
 *  and grossly negligent acts) or agreed to in writing, shall any Contributor be
 *  liable for any damages, including any direct, indirect, special, incidental, 
 *  or consequential damages of any character arising as a result of this License or 
 *  out of the use or inability to use the software (including but not limited to damages 
 *  for loss of goodwill, work stoppage, computer failure or malfunction, or any and 
 *  all other commercial damages or losses), even if such Contributor has been advised 
 *  of the possibility of such damages.
 */

#pragma once

#include <functional>
#include <memory>
#include <cstring>

#include "../../Primitives/interface/Errors.h"
#include "../../Platforms/Basic/interface/DebugUtilities.h"

#define LOG_HASH_CONFLICTS 1

namespace Diligent
{
    // http://www.boost.org/doc/libs/1_35_0/doc/html/hash/combine.html
    template<typename T>
    void HashCombine(std::size_t &Seed, const T& Val)
    {
        Seed ^= std::hash<T>()(Val) + 0x9e3779b9 + (Seed << 6) + (Seed >> 2);
    }

    template<typename FirstArgType, typename... RestArgsType>
    void HashCombine( std::size_t &Seed, const FirstArgType& FirstArg, const RestArgsType&... RestArgs )
    {
        HashCombine( Seed, FirstArg );
        HashCombine( Seed, RestArgs... ); // recursive call using pack expansion syntax
    }

    template<typename... ArgsType>
    std::size_t ComputeHash( const ArgsType&... Args )
    {
        std::size_t Seed = 0;
        HashCombine( Seed, Args... );
        return Seed;
    }

    template<typename CharType>
    struct CStringHash
    {
        size_t operator()( const CharType *str ) const
        {
            // http://www.cse.yorku.ca/~oz/hash.html
            std::size_t Seed = 0;
            while( size_t Ch = *(str++) )
                Seed = Seed * 65599 + Ch;
            return Seed;
        }
    };

    template<typename CharType>
    struct CStringCompare
    {
        bool operator()( const CharType *str1, const CharType *str2 )const
        {
            UNSUPPORTED( "Template specialization is not implemented" );
            return false;
        }
    };

    template<>
    struct CStringCompare<Char>
    {
        bool operator()( const Char *str1, const Char *str2 )const
        {
            return strcmp( str1, str2 ) == 0;
        }
    };
    
    /// This helper structure is intended to facilitate using strings as a 
    /// hash table key. It provides constructors that can make a copy of the
    /// source string or just keep pointer to it, which enables searching in 
    /// the hash using raw const Char* pointers.
    struct HashMapStringKey
    {
    public:
        // This constructor can perform implicit const Char* -> HashMapStringKey
        // conversion without copying the string
        HashMapStringKey(const Char* Str, bool bMakeCopy = false) :
            StrPtr(nullptr),
            Hash(0)
        {
            VERIFY( Str, "String pointer cannot be null" );
            if( bMakeCopy )
            {
                MakeCopy( Str );
            }
            else
            {
                StrPtr = Str;
            }
        }
        
        explicit // Make this constructor explicit to avoid unintentional string copies 
        HashMapStringKey(const String &Str) :
            StrPtr( nullptr ),
            Hash(0)
        {
            MakeCopy( Str.c_str() );
        }

        HashMapStringKey(HashMapStringKey &&Key)noexcept :
            StringBuff( std::move(Key.StringBuff) ),
            StrPtr( std::move(Key.StrPtr) ),
            Hash(0)
        {
            Key.StrPtr = nullptr;
            Key.Hash = 0;
        }

        // Disable copy constuctor and assignments. The struct is designed
        // to be initialized at creation time only
        HashMapStringKey( const HashMapStringKey& )              = delete;
        HashMapStringKey& operator = ( const HashMapStringKey& ) = delete;
        HashMapStringKey& operator = ( HashMapStringKey&& )      = delete;

        // Comparison operator
        bool operator == (const HashMapStringKey& RHS)const
        {
            if( StrPtr == RHS.StrPtr )
                return true;
            
            // Hash member might not have been initialized
            if( (Hash != 0 && RHS.Hash !=0 && Hash != RHS.Hash) || StrPtr == nullptr || RHS.StrPtr == nullptr )
                return false;

            bool IsEqual = strcmp( StrPtr, RHS.StrPtr ) == 0;

#if LOG_HASH_CONFLICTS
            if( Hash != 0 && RHS.Hash !=0 && Hash == RHS.Hash && !IsEqual )
            {
                LOG_WARNING_MESSAGE("Unequal strings \"", StrPtr, "\" and \"", RHS.StrPtr, "\" hashed to the same bucket. "
                                    "You may want to use better hash function. You may disable this warning by defining LOG_HASH_CONFLICTS to 0");
            }
#endif
            return IsEqual;
        }

        size_t GetHash()const
        {
            if( Hash == 0 )
                Hash = CStringHash<Char>()(StrPtr);

            return Hash;
        }

        const Char* GetStr()const{ return StrPtr; }

    private:
        void MakeCopy( const Char* Str )
        {
            auto LenWithZeroTerm = strlen( Str ) + 1;
            StringBuff.reset( new char[ LenWithZeroTerm ] );
            memcpy( StringBuff.get(), Str, LenWithZeroTerm );
            StrPtr = StringBuff.get();
        }

        //                  !!! WARNING !!! 
        // We can't use String to store the buffer, because String default 
        // constructor always allocates memory even when the string is empty, 
        // nor can we use vector for the same reason
        std::unique_ptr< Char[] > StringBuff; // Must be declared first
        const Char* StrPtr;// Must be declared after StringBuff
        mutable size_t Hash;
    };
}

namespace std
{
    template<>
    struct hash<Diligent::HashMapStringKey>
    {
        size_t operator()( const Diligent::HashMapStringKey &Key ) const
        {
            return Key.GetHash();
        }                  
    };
}
