/*
 * Copyright (c) Contributors to the Open 3D Engine Project.
 * For complete copyright and license terms please see the LICENSE at the root of this distribution.
 *
 * SPDX-License-Identifier: Apache-2.0 OR MIT
 *
 */

#include <Atom/RPI.Edit/Common/AssetUtils.h>
#include <Atom/RPI.Edit/Common/JsonUtils.h>
#include <Atom/RPI.Reflect/System/AnyAsset.h>
#include <AtomToolsFramework/Graph/DynamicNode/DynamicNode.h>
#include <AtomToolsFramework/Graph/DynamicNode/DynamicNodeManager.h>
#include <AtomToolsFramework/Graph/DynamicNode/DynamicNodePaletteItem.h>
#include <AtomToolsFramework/Util/Util.h>
#include <AzCore/IO/FileIO.h>
#include <AzCore/IO/SystemFile.h>
#include <AzCore/Serialization/Json/JsonUtils.h>
#include <AzCore/Serialization/Utils.h>
#include <AzCore/std/algorithm.h>
#include <AzCore/std/sort.h>
#include <AzCore/std/string/regex.h>
#include <AzFramework/StringFunc/StringFunc.h>
#include <AzToolsFramework/API/EditorAssetSystemAPI.h>
#include <GraphCanvas/Widgets/NodePalette/TreeItems/IconDecoratedNodePaletteTreeItem.h>
#include <GraphModel/Integration/NodePalette/GraphCanvasNodePaletteItems.h>

namespace AtomToolsFramework
{
    void DynamicNodeManager::Reflect(AZ::ReflectContext* context)
    {
        if (auto serializeContext = azrtti_cast<AZ::SerializeContext*>(context))
        {
            serializeContext->Class<DynamicNodeManager>()
                ->Version(0)
                ;
        }

        if (auto behaviorContext = azrtti_cast<AZ::BehaviorContext*>(context))
        {
            behaviorContext->EBus<DynamicNodeManagerRequestBus>("DynamicNodeManagerRequestBus")
                ->Attribute(AZ::Script::Attributes::Scope, AZ::Script::Attributes::ScopeFlags::Common)
                ->Attribute(AZ::Script::Attributes::Category, "Editor")
                ->Attribute(AZ::Script::Attributes::Module, "atomtools")
                ->Event("LoadConfigFiles", &DynamicNodeManagerRequestBus::Events::LoadConfigFiles)
                ->Event("RegisterConfig", &DynamicNodeManagerRequestBus::Events::RegisterConfig)
                ->Event("GetConfigById", &DynamicNodeManagerRequestBus::Events::GetConfigById)
                ->Event("Clear", &DynamicNodeManagerRequestBus::Events::Clear)
                ->Event("CreateNodeById", &DynamicNodeManagerRequestBus::Events::CreateNodeById)
                ->Event("CreateNodeByName", &DynamicNodeManagerRequestBus::Events::CreateNodeByName)
                ;
        }
    }

    DynamicNodeManager::DynamicNodeManager(const AZ::Crc32& toolId)
        : m_toolId(toolId)
    {
        DynamicNodeManagerRequestBus::Handler::BusConnect(m_toolId);
    }

    DynamicNodeManager::~DynamicNodeManager()
    {
        DynamicNodeManagerRequestBus::Handler::BusDisconnect();
    }

    void DynamicNodeManager::RegisterDataTypes(const GraphModel::DataTypeList& dataTypes)
    {
        m_registeredDataTypes.insert(m_registeredDataTypes.end(), dataTypes.begin(), dataTypes.end());
    }

    GraphModel::DataTypeList DynamicNodeManager::GetRegisteredDataTypes()
    {
        return m_registeredDataTypes;
    }

    void DynamicNodeManager::LoadConfigFiles(const AZStd::string& extension)
    {
        AZ_TracePrintf("DynamicNodeManager", "Load %s config files started.", extension.c_str());

        // Load and register all discovered dynamic node configuration
        for (const auto& configPath : GetPathsInSourceFoldersMatchingExtension(extension))
        {
            DynamicNodeConfig config;
            if (config.Load(configPath))
            {
                // Automatically fill missing display names and descriptions if they were not specified in the config file
                config.AutoFillMissingData();

                AZ_TracePrintf_IfTrue(
                    "DynamicNodeManager", IsNodeConfigLoggingEnabled(), "DynamicNodeConfig \"%s\" loaded.\n", configPath.c_str());
                RegisterConfig(config);
            }
        }

        AZ_TracePrintf("DynamicNodeManager", "Load %s config files finished.", extension.c_str());
    }

    bool DynamicNodeManager::RegisterConfig(const DynamicNodeConfig& config)
    {
        AZ_TracePrintf_IfTrue(
            "DynamicNodeManager", IsNodeConfigLoggingEnabled(), "DynamicNodeConfig \"%s\" registering.\n", config.m_id.ToFixedString().c_str());

        if (!ValidateSlotConfigVec(config.m_id, config.m_inputSlots) ||
            !ValidateSlotConfigVec(config.m_id, config.m_outputSlots) ||
            !ValidateSlotConfigVec(config.m_id, config.m_propertySlots))
        {
            AZ_Error("DynamicNodeManager", false, "DynamicNodeConfig \"%s\" could not be registered.", config.m_id.ToFixedString().c_str());
            return false;
        }

        if (m_nodeConfigMap.find(config.m_id) != m_nodeConfigMap.end())
        {
            AZ_Error("DynamicNodeManager", false, "DynamicNodeConfig with id \"%s\" is already registered.", config.m_id.ToFixedString().c_str());
            return false;
        }

        m_nodeConfigMap[config.m_id] = config;

        AZ_TracePrintf_IfTrue(
            "DynamicNodeManager", IsNodeConfigLoggingEnabled(), "DynamicNodeConfig \"%s\" registered.\n", config.m_id.ToFixedString().c_str());
        return true;
    }

    DynamicNodeConfig DynamicNodeManager::GetConfigById(const AZ::Uuid& configId) const
    {
        auto configItr = m_nodeConfigMap.find(configId);
        if (configItr != m_nodeConfigMap.end())
        {
            return configItr->second;
        }

        AZ_Error("DynamicNodeManager", false, "DynamicNodeConfig \"%s\" could not be found.", configId.ToFixedString().c_str());
        return DynamicNodeConfig();
    }
    
    void DynamicNodeManager::Clear()
    {
        m_nodeConfigMap.clear();
    }

    GraphCanvas::GraphCanvasTreeItem* DynamicNodeManager::CreateNodePaletteTree() const
    {
        auto rootItem = aznew GraphCanvas::NodePaletteTreeItem("Root", m_toolId);

        AZStd::unordered_map<AZStd::string, GraphCanvas::GraphCanvasTreeItem*> categoryMap;
        categoryMap[""] = rootItem;

        // Create the node palette tree by traversing the configuration container, registering any unique categories and child items
        for (const auto& configPair : m_nodeConfigMap)
        {
            const auto& config = configPair.second;
            auto categoryItr = categoryMap.find(config.m_category);
            if (categoryItr == categoryMap.end())
            {
                // Creating a new node palette tree item category and setting the title palette based on the 1st dynamic node config added
                auto categoryTreeItem =
                    rootItem->CreateChildNode<GraphCanvas::IconDecoratedNodePaletteTreeItem>(config.m_category, m_toolId);
                categoryTreeItem->SetTitlePalette(config.m_titlePaletteName);
                categoryItr = categoryMap.emplace(config.m_category, categoryTreeItem).first;
            }

            categoryItr->second->CreateChildNode<DynamicNodePaletteItem>(m_toolId, config);
        }

        GraphModelIntegration::AddCommonNodePaletteUtilities(rootItem, m_toolId);
        return rootItem;
    }

    GraphModel::NodePtr DynamicNodeManager::CreateNodeById(GraphModel::GraphPtr graph, const AZ::Uuid& configId)
    {
        const auto configItr = m_nodeConfigMap.find(configId);
        if (configItr != m_nodeConfigMap.end())
        {
            return AZStd::make_shared<DynamicNode>(graph, m_toolId, configItr->first);
        }
        return GraphModel::NodePtr();
    }

    GraphModel::NodePtr DynamicNodeManager::CreateNodeByName(GraphModel::GraphPtr graph, const AZStd::string& name)
    {
        const auto configItr = AZStd::find_if(
            m_nodeConfigMap.begin(),
            m_nodeConfigMap.end(),
            [&name](const auto& configPair)
            {
                return AZ::StringFunc::Equal(name, configPair.second.m_title);
            });

        if (configItr != m_nodeConfigMap.end())
        {
            return AZStd::make_shared<DynamicNode>(graph, m_toolId, configItr->first);
        }
        return GraphModel::NodePtr();
    }

    void DynamicNodeManager::RegisterEditDataForSetting(const AZStd::string& settingName, const AZ::Edit::ElementData& editData)
    {
        m_editDataForSettingName[settingName] = editData;
    }

    AZStd::vector<AZStd::string> DynamicNodeManager::GetRegisteredEditDataSettingNames() const
    {
        AZStd::vector<AZStd::string> names;
        names.reserve(m_editDataForSettingName.size());

        for (const auto& editDataPair : m_editDataForSettingName)
        {
            names.push_back(editDataPair.first);
        }
        return names;
    }

    const AZ::Edit::ElementData* DynamicNodeManager::GetEditDataForSetting(const AZStd::string& settingName) const
    {
        for (const auto& editDataPair : m_editDataForSettingName)
        {
            if (AZ::StringFunc::Equal(editDataPair.first, settingName))
            {
                return &editDataPair.second;
            }
        }
        return nullptr;
    }

    bool DynamicNodeManager::ValidateSlotConfig(
        [[maybe_unused]] const AZ::Uuid& configId, const DynamicNodeSlotConfig& slotConfig) const
    {
        if (slotConfig.m_supportedDataTypeRegex.empty())
        {
            AZ_Error(
                "DynamicNodeManager",
                false,
                "DynamicNodeConfig \"%s\" could not be validated because DynamicNodeSlotConfig \"%s\" has no supported data types.",
                configId.ToFixedString().c_str(),
                slotConfig.m_displayName.c_str());
            return false;
        }

        AZStd::regex supportedDataTypeRegex(slotConfig.m_supportedDataTypeRegex, AZStd::regex::flag_type::icase);
        if (!AZStd::any_of(
                m_registeredDataTypes.begin(),
                m_registeredDataTypes.end(),
                [&](const auto& dataType)
                {
                    return AZStd::regex_match(dataType->GetCppName(), supportedDataTypeRegex) ||
                        AZStd::regex_match(dataType->GetDisplayName(), supportedDataTypeRegex);
                }))
        {
            AZ_Error(
                "DynamicNodeManager",
                false,
                "DynamicNodeConfig \"%s\" could not be validated because DynamicNodeSlotConfig \"%s\" does not match any registered data type."
                "types.",
                configId.ToFixedString().c_str(),
                slotConfig.m_displayName.c_str());
            return false;
        }

        return true;
    }

    bool DynamicNodeManager::ValidateSlotConfigVec(
        [[maybe_unused]] const AZ::Uuid& configId, const AZStd::vector<DynamicNodeSlotConfig>& slotConfigVec) const
    {
        for (const auto& slotConfig : slotConfigVec)
        {
            if (!ValidateSlotConfig(configId, slotConfig))
            {
                AZ_Error(
                    "DynamicNodeManager",
                    false,
                    "DynamicNodeConfig \"%s\" could not be validated because DynamicNodeSlotConfig \"%s\" could not be validated.",
                    configId.ToFixedString().c_str(),
                    slotConfig.m_displayName.c_str());
                return false;
            }
        }

        return true;
    }

    bool DynamicNodeManager::IsNodeConfigLoggingEnabled() const
    {
        return GetSettingsValue("/O3DE/AtomToolsFramework/DynamicNodeManager/NodeConfigLoggingEnabled", false);
    }
} // namespace AtomToolsFramework