/*==============================================================================

 Copyright 2019 by Roland Rabien
 For more information visit www.rabiensoftware.com

 ==============================================================================*/

//==============================================================================
static var toVar (const juce::ValueTree& v)
{
    auto obj = new DynamicObject();
    
    obj->setProperty ("_name", v.getType().toString());
    
    Array<var> children;
    
    for (auto c : v)
        children.add (toVar (c));
    
    if (children.size() > 0)
        obj->setProperty ("_children", children);
    
    for (int i = 0; i < v.getNumProperties(); i++)
    {
        auto name = v.getPropertyName (i).toString();
        auto val  = v.getProperty (name, {});
        
        if (auto mb = val.getBinaryData())
        {
            obj->setProperty ("base64:" + name, mb->toBase64Encoding());
        }
        else
        {
            // These types can't be stored as JSON!
            jassert (! val.isObject());
            jassert (! val.isMethod());
            jassert (! val.isArray());
            
            obj->setProperty (name, val.toString());
        }
    }
    
    return var (obj);
}

juce::String valueTreeToJSON (const juce::ValueTree& v)
{
    auto obj = toVar (v);
    return JSON::toString (obj);
}

//==============================================================================
juce::ValueTree fromVar (const juce::var& obj)
{
    if (auto dobj = obj.getDynamicObject())
    {
        ValueTree v (dobj->getProperty ("_name").toString());
        
        auto c = dobj->getProperty ("_children");
        if (c.isArray())
            for (auto& child : *c.getArray())
                v.addChild (fromVar (child), -1, nullptr);
        
        auto properties = dobj->getProperties();
        for (auto itr : properties)
        {
            auto name = itr.name.toString();
            if (name == "_name" || name == "_children") continue;
            
            if (name.startsWith ("base64:"))
            {
                MemoryBlock mb;
                if (mb.fromBase64Encoding (itr.value.toString()))
                    v.setProperty (name.substring (7), var (mb), nullptr);
            }
            else
            {
                v.setProperty (name, var (itr.value), nullptr);
            }
        }
        
        return v;
    }
    return {};
}

juce::ValueTree valueTreeFromJSON (const juce::String& jsonText)
{
    var obj = JSON::parse (jsonText);
    if (obj.isObject())
        return fromVar (obj);
    return {};
}