/**
 * vim: set ts=4 :
 * =============================================================================
 * SourceMod REST in Pawn Extension
 * Copyright 2017-2026 Erik Minekus
 * =============================================================================
 *
 * This program is free software: you can redistribute it and/or modify it under
 * the terms of the GNU General Public License as published by the Free Software
 * Foundation, either version 3 of the License, or (at your option) any later
 * version.
 *
 * This program is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
 * details.
 *
 * You should have received a copy of the GNU General Public License along with
 * this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "extension.h"

static json_t *GetJSONFromHandle(IPluginContext *pContext, Handle_t hndl)
{
	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());

	json_t *json;
	if ((err=handlesys->ReadHandle(hndl, htJSON, &sec, (void **)&json)) != HandleError_None)
	{
		pContext->ThrowNativeError("Invalid JSON handle %x (error %d)", hndl, err);
		return NULL;
	}

	return json;
}

static cell_t CreateObject(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = json_object();

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndl = handlesys->CreateHandleEx(htJSON, object, &sec, NULL, &err);
	if (hndl == BAD_HANDLE)
	{
		json_decref(object);

		pContext->ThrowNativeError("Could not create object handle (error %d)", err);
		return BAD_HANDLE;
	}

	return hndl;
}

static cell_t GetObjectSize(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	return json_object_size(object);
}

static cell_t GetObjectValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return BAD_HANDLE;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
		return BAD_HANDLE;
	}

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndlValue = handlesys->CreateHandleEx(htJSON, value, &sec, NULL, &err);
	if (hndlValue == BAD_HANDLE)
	{
		pContext->ThrowNativeError("Could not create value handle (error %d)", err);
		return BAD_HANDLE;
	}

	// Increase the reference counter, meaning the value handle must be
	// freed via delete or CloseHandle().
	json_incref(value);

	return hndlValue;
}

static cell_t GetObjectBoolValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
	}

	return json_boolean_value(value);
}

static cell_t GetObjectFloatValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
	}

	return sp_ftoc(static_cast<float>(json_number_value(value)));
}

static cell_t GetObjectIntValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
	}

	return static_cast<cell_t>(json_integer_value(value));
}

static cell_t GetObjectInt64Value(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return 0;
	}

	char result[20];
	snprintf(result, sizeof(result), "%" JSON_INTEGER_FORMAT, json_integer_value(value));
	pContext->StringToLocalUTF8(params[3], params[4], result, NULL);

	return 1;
}

static cell_t GetObjectStringValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return 0;
	}

	const char *result = json_string_value(value);
	if (result == NULL)
	{
		return 0;
	}

	pContext->StringToLocalUTF8(params[3], params[4], result, NULL);

	return 1;
}

static cell_t GetObjectType(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return -1;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
	}

	return json_typeof(value);
}

static cell_t IsObjectNullValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_object_get(object, key);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value for key '%s'", key);
	}

	return json_is_null(value);
}

static cell_t IsObjectKeyValid(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	return json_object_get(object, key) != NULL;
}

static cell_t SetObjectValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = GetJSONFromHandle(pContext, params[3]);
	if (value == NULL)
	{
		return 0;
	}

	return (json_object_set(object, key, value) == 0);
}

static cell_t SetObjectBoolValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_boolean(params[3]);

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t SetObjectFloatValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_real(sp_ctof(params[3]));

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t SetObjectIntValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_integer(params[3]);

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t SetObjectInt64Value(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	char *val;
	pContext->LocalToString(params[3], &val);

	json_t *value = json_integer(strtoll(val, NULL, 10));

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t SetObjectNullValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	json_t *value = json_null();

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t SetObjectStringValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	char *val;
	pContext->LocalToString(params[3], &val);

	json_t *value = json_string(val);

	return (json_object_set_new(object, key, value) == 0);
}

static cell_t RemoveFromObject(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *key;
	pContext->LocalToString(params[2], &key);

	return (json_object_del(object, key) == 0);
}

static cell_t ClearObject(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	return (json_object_clear(object) == 0);
}

static cell_t CreateObjectKeys(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return BAD_HANDLE;
	}

	struct JSONObjectKeys *keys = new struct JSONObjectKeys(object);

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndlKeys = handlesys->CreateHandleEx(htJSONObjectKeys, keys, &sec, NULL, &err);
	if (hndlKeys == BAD_HANDLE)
	{
		delete keys;

		pContext->ThrowNativeError("Could not create object keys handle (error %d)", err);
		return BAD_HANDLE;
	}

	return hndlKeys;
}

static cell_t ReadObjectKey(IPluginContext *pContext, const cell_t *params)
{
	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());

	struct JSONObjectKeys *keys;
	Handle_t hndlKeys = static_cast<Handle_t>(params[1]);
	if ((err=handlesys->ReadHandle(hndlKeys, htJSONObjectKeys, &sec, (void **)&keys)) != HandleError_None)
	{
		return pContext->ThrowNativeError("Invalid object keys handle %x (error %d)", hndlKeys, err);
	}

	const char *key = keys->GetKey();
	if (key == NULL)
	{
		return 0;
	}

	pContext->StringToLocalUTF8(params[2], params[3], key, NULL);
	keys->Next();

	return 1;
}

static cell_t CreateArray(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = json_array();

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndl = handlesys->CreateHandleEx(htJSON, object, &sec, NULL, &err);
	if (hndl == BAD_HANDLE)
	{
		json_decref(object);

		pContext->ThrowNativeError("Could not create array handle.");
		return BAD_HANDLE;
	}

	return hndl;
}

static cell_t GetArraySize(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	return json_array_size(object);
}

static cell_t GetArrayValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return BAD_HANDLE;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		pContext->ThrowNativeError("Could not retrieve value at index %d", index);
		return BAD_HANDLE;
	}

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndlValue = handlesys->CreateHandleEx(htJSON, value, &sec, NULL, &err);
	if (hndlValue == BAD_HANDLE)
	{
		pContext->ThrowNativeError("Could not create value handle (error %d)", err);
		return BAD_HANDLE;
	}

	// Increase the reference counter, meaning the value handle must be
	// freed via delete or CloseHandle().
	json_incref(value);

	return hndlValue;
}

static cell_t GetArrayBoolValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	return json_boolean_value(value);
}

static cell_t GetArrayFloatValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	return sp_ftoc(static_cast<float>(json_number_value(value)));
}

static cell_t GetArrayIntValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	return static_cast<cell_t>(json_integer_value(value));
}

static cell_t GetArrayInt64Value(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	char result[20];
	snprintf(result, sizeof(result), "%" JSON_INTEGER_FORMAT, json_integer_value(value));
	pContext->StringToLocalUTF8(params[3], params[4], result, NULL);

	return 1;
}

static cell_t GetArrayStringValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	const char *result = json_string_value(value);
	if (result == NULL)
	{
		return 0;
	}

	pContext->StringToLocalUTF8(params[3], params[4], result, NULL);

	return 1;
}

static cell_t GetArrayType(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return -1;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	return json_typeof(value);
}

static cell_t IsArrayNullValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_array_get(object, index);
	if (value == NULL)
	{
		return pContext->ThrowNativeError("Could not retrieve value at index %d", index);
	}

	return json_is_null(value);
}

static cell_t SetArrayValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = GetJSONFromHandle(pContext, params[3]);
	if (value == NULL)
	{
		return 0;
	}

	return (json_array_set(object, index, value) == 0);
}

static cell_t SetArrayBoolValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_boolean(params[3]);

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t SetArrayFloatValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_real(sp_ctof(params[3]));

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t SetArrayIntValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_integer(params[3]);

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t SetArrayInt64Value(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	char *val;
	pContext->LocalToString(params[3], &val);

	json_t *value = json_integer(json_strtoint(val, NULL, 10));

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t SetArrayNullValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	json_t *value = json_null();

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t SetArrayStringValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	char *val;
	pContext->LocalToString(params[3], &val);

	json_t *value = json_string(val);

	return (json_array_set_new(object, index, value) == 0);
}

static cell_t PushArrayValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	json_t *value = GetJSONFromHandle(pContext, params[2]);
	if (value == NULL)
	{
		return 0;
	}

	return (json_array_append(object, value) == 0);
}

static cell_t PushArrayBoolValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	json_t *value = json_boolean(params[2]);

	return (json_array_append_new(object, value) == 0);
}

static cell_t PushArrayFloatValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	json_t *value = json_real(sp_ctof(params[2]));

	return (json_array_append_new(object, value) == 0);
}

static cell_t PushArrayIntValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	json_t *value = json_integer(params[2]);

	return (json_array_append_new(object, value) == 0);
}

static cell_t PushArrayInt64Value(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *val;
	pContext->LocalToString(params[2], &val);

	json_t *value = json_integer(json_strtoint(val, NULL, 10));

	return (json_array_append_new(object, value) == 0);
}

static cell_t PushArrayNullValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	json_t *value = json_null();

	return (json_array_append_new(object, value) == 0);
}

static cell_t PushArrayStringValue(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *val;
	pContext->LocalToString(params[2], &val);

	json_t *value = json_string(val);

	return (json_array_append_new(object, value) == 0);
}

static cell_t RemoveFromArray(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	int index = params[2];

	return (json_array_remove(object, index) == 0);
}

static cell_t ClearArray(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	return (json_array_clear(object) == 0);
}

static cell_t FromString(IPluginContext *pContext, const cell_t *params)
{
	char *buffer;
	pContext->LocalToString(params[1], &buffer);

	size_t flags = (size_t)params[2];

	json_error_t error;
	json_t *object = json_loads(buffer, flags, &error);
	if (object == NULL)
	{
		pContext->ThrowNativeError("Invalid JSON in line %d, column %d: %s", error.line, error.column, error.text);
		return BAD_HANDLE;
	}

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndlObject = handlesys->CreateHandleEx(htJSON, object, &sec, NULL, &err);
	if (hndlObject == BAD_HANDLE)
	{
		json_decref(object);

		pContext->ThrowNativeError("Could not create object handle (error %d)", err);
		return BAD_HANDLE;
	}

	return hndlObject;
}

static cell_t FromFile(IPluginContext *pContext, const cell_t *params)
{
	char *path;
	pContext->LocalToString(params[1], &path);

	char realpath[PLATFORM_MAX_PATH];
	smutils->BuildPath(Path_Game, realpath, sizeof(realpath), "%s", path);

	size_t flags = (size_t)params[2];

	json_error_t error;
	json_t *object = json_load_file(realpath, flags, &error);
	if (object == NULL)
	{
		pContext->ThrowNativeError("Invalid JSON in line %d, column %d: %s", error.line, error.column, error.text);
		return BAD_HANDLE;
	}

	HandleError err;
	HandleSecurity sec(pContext->GetIdentity(), myself->GetIdentity());
	Handle_t hndlObject = handlesys->CreateHandleEx(htJSON, object, &sec, NULL, &err);
	if (hndlObject == BAD_HANDLE)
	{
		json_decref(object);

		pContext->ThrowNativeError("Could not create object handle (error %d)", err);
		return BAD_HANDLE;
	}

	return hndlObject;
}

static cell_t ToString(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	size_t flags = (size_t)params[4];

	char *result = json_dumps(object, flags);
	if (result == NULL)
	{
		return 0;
	}

	pContext->StringToLocalUTF8(params[2], params[3], result, NULL);
	free(result);

	return 1;
}

static cell_t ToFile(IPluginContext *pContext, const cell_t *params)
{
	json_t *object = GetJSONFromHandle(pContext, params[1]);
	if (object == NULL)
	{
		return 0;
	}

	char *path;
	pContext->LocalToString(params[2], &path);

	char realpath[PLATFORM_MAX_PATH];
	smutils->BuildPath(Path_Game, realpath, sizeof(realpath), "%s", path);

	size_t flags = (size_t)params[3];

	return (json_dump_file(object, realpath, flags) == 0);
}


const sp_nativeinfo_t json_natives[] =
{
	// Objects
	{"JSONObject.JSONObject",			CreateObject},
	{"JSONObject.Size.get",				GetObjectSize},
	{"JSONObject.Get",					GetObjectValue},
	{"JSONObject.GetBool",				GetObjectBoolValue},
	{"JSONObject.GetFloat",				GetObjectFloatValue},
	{"JSONObject.GetInt",				GetObjectIntValue},
	{"JSONObject.GetInt64",				GetObjectInt64Value},
	{"JSONObject.GetString",			GetObjectStringValue},
	{"JSONObject.GetType",				GetObjectType},
	{"JSONObject.IsNull",				IsObjectNullValue},
	{"JSONObject.HasKey",				IsObjectKeyValid},
	{"JSONObject.Set",					SetObjectValue},
	{"JSONObject.SetBool",				SetObjectBoolValue},
	{"JSONObject.SetFloat",				SetObjectFloatValue},
	{"JSONObject.SetInt",				SetObjectIntValue},
	{"JSONObject.SetInt64",				SetObjectInt64Value},
	{"JSONObject.SetNull",				SetObjectNullValue},
	{"JSONObject.SetString",			SetObjectStringValue},
	{"JSONObject.Remove",				RemoveFromObject},
	{"JSONObject.Clear",				ClearObject},

	{"JSONObject.Keys",					CreateObjectKeys},
	{"JSONObjectKeys.ReadKey",			ReadObjectKey},

	// Arrays
	{"JSONArray.JSONArray",				CreateArray},
	{"JSONArray.Length.get",			GetArraySize},
	{"JSONArray.Get",					GetArrayValue},
	{"JSONArray.GetBool",				GetArrayBoolValue},
	{"JSONArray.GetFloat",				GetArrayFloatValue},
	{"JSONArray.GetInt",				GetArrayIntValue},
	{"JSONArray.GetInt64",				GetArrayInt64Value},
	{"JSONArray.GetString",				GetArrayStringValue},
	{"JSONArray.GetType",				GetArrayType},
	{"JSONArray.IsNull",				IsArrayNullValue},
	{"JSONArray.Set",					SetArrayValue},
	{"JSONArray.SetBool",				SetArrayBoolValue},
	{"JSONArray.SetFloat",				SetArrayFloatValue},
	{"JSONArray.SetInt",				SetArrayIntValue},
	{"JSONArray.SetInt64",				SetArrayInt64Value},
	{"JSONArray.SetNull",				SetArrayNullValue},
	{"JSONArray.SetString",				SetArrayStringValue},
	{"JSONArray.Push",					PushArrayValue},
	{"JSONArray.PushBool",				PushArrayBoolValue},
	{"JSONArray.PushFloat",				PushArrayFloatValue},
	{"JSONArray.PushInt",				PushArrayIntValue},
	{"JSONArray.PushInt64",				PushArrayInt64Value},
	{"JSONArray.PushNull",				PushArrayNullValue},
	{"JSONArray.PushString",			PushArrayStringValue},
	{"JSONArray.Remove",				RemoveFromArray},
	{"JSONArray.Clear",					ClearArray},

	// Decoding
	{"JSONObject.FromString",			FromString},
	{"JSONObject.FromFile",				FromFile},
	{"JSONArray.FromString",			FromString},
	{"JSONArray.FromFile",				FromFile},

	// Encoding
	{"JSON.ToString",					ToString},
	{"JSON.ToFile",						ToFile},

	{NULL,								NULL}
};