// ------------------------------------------------------------------------------------------------
#include "JValue.hpp"

// ------------------------------------------------------------------------------------------------
namespace SqMod {

// ------------------------------------------------------------------------------------------------
std::size_t JValue::s_Flags = JSON_ENCODE_ANY;

// ------------------------------------------------------------------------------------------------
SQInteger JValue::Typename(HSQUIRRELVM vm)
{
    static const SQChar name[] = _SC("SqJSONValue");
    sq_pushstring(vm, name, sizeof(name));
    return 1;
}

// ------------------------------------------------------------------------------------------------
Object JValue::ToString() const
{
    // Dump the values to a string
    const CStrGuard csg(json_dumps(m_Ptr, s_Flags));
    // Remember the current stack size
    const StackGuard sg;
    // Transform the string into a script object
    sq_pushstring(_SqVM, csg.mPtr ? csg.mPtr : _SC(""), -1);
    // Return the created script object
    return Var< Object >(_SqVM, -1).value;
}

// ================================================================================================
void Register_JValue(Table & jns)
{
    jns.Bind(_SC("Value"), Class< JValue >(jns.GetVM(), _SC("SqJSONValue"))
        // Constructors
        .Ctor()
        .Ctor< const JValue & >()
        // Core Meta-methods
        .Func(_SC("_cmp"), &JValue::Cmp)
        .SquirrelFunc(_SC("_typename"), &JValue::Typename)
        .Func(_SC("_tostring"), &JValue::ToString)
        // Properties
        //.Prop(_SC("Prop"), &JValue::Prop)
        // Member Methods
        //.Func(_SC("Func"), &JValue::Func)
    );
}

} // Namespace:: SqMod