// SPDX-License-Identifier: LGPL-2.1+

/*

 * Copyright (C) 2018 Red Hat, Inc.

 */

#ifndef __NM_JANSSON_H__

#define __NM_JANSSON_H__

/* you need to include at least "config.h" first, possibly "nm-default.h". */

#if WITH_JANSSON

#include <jansson.h>

/* Added in Jansson v2.7 */

#ifndef json_boolean_value

#define json_boolean_value json_is_true

#endif

/* Added in Jansson v2.8 */

#ifndef json_object_foreach_safe

#define json_object_foreach_safe(object, n, key, value)     \

    for (key = json_object_iter_key(json_object_iter(object)), \

             n = json_object_iter_next(object, json_object_key_to_iter(key)); \

         key && (value = json_object_iter_value(json_object_key_to_iter(key))); \

         key = json_object_iter_key(n), \

             n = json_object_iter_next(object, json_object_key_to_iter(key)))

#endif

NM_AUTO_DEFINE_FCN0 (json_t *, _nm_auto_decref_json, json_decref)

#define nm_auto_decref_json nm_auto(_nm_auto_decref_json)

/*****************************************************************************/

static inline int

nm_jansson_json_as_bool (const json_t *elem,

                         bool *out_val)

{

	if (!elem)

		return 0;

	if (!json_is_boolean (elem))

		return -EINVAL;

	NM_SET_OUT (out_val, json_boolean_value (elem));

	return 1;

}

static inline int

nm_jansson_json_as_int32 (const json_t *elem,

                          gint32 *out_val)

{

	json_int_t v;

	if (!elem)

		return 0;

	if (!json_is_integer (elem))

		return -EINVAL;

	v = json_integer_value (elem);

	if (   v < (gint64) G_MININT32

	    || v > (gint64) G_MAXINT32)

		return -ERANGE;

	NM_SET_OUT (out_val, v);

	return 1;

}

static inline int

nm_jansson_json_as_int (const json_t *elem,

                        int *out_val)

{

	json_int_t v;

	if (!elem)

		return 0;

	if (!json_is_integer (elem))

		return -EINVAL;

	v = json_integer_value (elem);

	if (   v < (gint64) G_MININT

	    || v > (gint64) G_MAXINT)

		return -ERANGE;

	NM_SET_OUT (out_val, v);

	return 1;

}

static inline int

nm_jansson_json_as_string (const json_t *elem,

                           const char **out_val)

{

	if (!elem)

		return 0;

	if (!json_is_string (elem))

		return -EINVAL;

	NM_SET_OUT (out_val, json_string_value (elem));

	return 1;

}

/*****************************************************************************/

#ifdef NM_VALUE_TYPE_DEFINE_FUNCTIONS

#include "nm-value-type.h"

static inline gboolean

nm_value_type_from_json (NMValueType value_type,

                         const json_t *elem,

                         gpointer out_val)

{

	switch (value_type) {

	case NM_VALUE_TYPE_BOOL:   return (nm_jansson_json_as_bool   (elem, out_val) > 0);

	case NM_VALUE_TYPE_INT32:  return (nm_jansson_json_as_int32  (elem, out_val) > 0);

	case NM_VALUE_TYPE_INT:    return (nm_jansson_json_as_int    (elem, out_val) > 0);

	/* warning: this overwrites/leaks the previous value. You better have *out_val

	 * point to uninitialized memory or NULL. */

	case NM_VALUE_TYPE_STRING: return (nm_jansson_json_as_string (elem, out_val) > 0);

	case NM_VALUE_TYPE_UNSPEC:

		break;

	}

	nm_assert_not_reached ();

	return FALSE;

}

#endif

/*****************************************************************************/

#endif /* WITH_JANSON */

#endif  /* __NM_JANSSON_H__ */