// SPDX-License-Identifier: GPL-2.0+

/*

 * Copyright (C) 2013 Red Hat, Inc.

 */

/**

 * SECTION:nmt-address-list

 * @short_description: An editable list of IP addresses or hostnames

 *

 * #NmtAddressList is a subclass of #NmtWidgetList that contains

 * entries displaying IP addresses, address/prefix strings, or

 * hostnames. This is designed for binding its #NmtAddressList:strings

 * property to an appropriate #NMSettingIP4Config or

 * #NMSettingIP6Config property via one of the nm-editor-bindings

 * functions.

 */

#include "nm-default.h"

#include "nmt-address-list.h"

#include <arpa/inet.h>

#include <netinet/in.h>

#include <stdlib.h>

#include "nmt-ip-entry.h"

G_DEFINE_TYPE (NmtAddressList, nmt_address_list, NMT_TYPE_WIDGET_LIST)

#define NMT_ADDRESS_LIST_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), NMT_TYPE_ADDRESS_LIST, NmtAddressListPrivate))

typedef struct {

	NmtAddressListType list_type;

	char **strings;

} NmtAddressListPrivate;

enum {

	PROP_0,

	PROP_LIST_TYPE,

	PROP_STRINGS,

	LAST_PROP

};

/**

 * NmtAddressListType:

 * @NMT_ADDRESS_LIST_IP4_WITH_PREFIX: IPv4 address/prefix strings

 * @NMT_ADDRESS_LIST_IP4: IPv4 addresses

 * @NMT_ADDRESS_LIST_IP6_WITH_PREFIX: IPv6 address/prefix strings

 * @NMT_ADDRESS_LIST_IP6: IPv6 addresses

 * @NMT_ADDRESS_LIST_HOSTNAME: hostnames

 *

 * The type of address in an #NmtAddressList

 */

/**

 * nmt_address_list_new:

 * @list_type: the type of address the list will contain

 *

 * Creates a new #NmtAddressList

 *

 * Returns: a new #NmtAddressList

 */

NmtNewtWidget *

nmt_address_list_new (NmtAddressListType list_type)

{

	return g_object_new (NMT_TYPE_ADDRESS_LIST,

	                     "list-type", list_type,

	                     NULL);

}

static void

nmt_address_list_init (NmtAddressList *list)

{

}

static gboolean

strings_transform_to_entry (GBinding     *binding,

                            const GValue *source_value,

                            GValue       *target_value,

                            gpointer      user_data)

{

	int n = GPOINTER_TO_INT (user_data);

	char **strings;

	strings = g_value_get_boxed (source_value);

	if (n >= g_strv_length (strings))

		return FALSE;

	g_value_set_string (target_value, strings[n]);

	return TRUE;

}

static gboolean

strings_transform_from_entry (GBinding     *binding,

                              const GValue *source_value,

                              GValue       *target_value,

                              gpointer      user_data)

{

	NmtAddressList *list = NMT_ADDRESS_LIST (g_binding_get_source (binding));

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (list);

	int n = GPOINTER_TO_INT (user_data);

	if (n >= g_strv_length (priv->strings))

		return FALSE;

	g_free (priv->strings[n]);

	priv->strings[n] = g_value_dup_string (source_value);

	g_value_set_boxed (target_value, priv->strings);

	return TRUE;

}

static gboolean

hostname_filter (NmtNewtEntry *entry,

                 const char   *text,

                 int           ch,

                 int           position,

                 gpointer      user_data)

{

	return g_ascii_isalnum (ch) || ch == '.' || ch == '-';

}

static NmtNewtWidget *

nmt_address_list_create_widget (NmtWidgetList *list,

                                int            num)

{

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (list);

	NmtNewtWidget *entry;

	if (priv->list_type == NMT_ADDRESS_LIST_IP4_WITH_PREFIX)

		entry = nmt_ip_entry_new (25, AF_INET, TRUE, FALSE);

	else if (priv->list_type == NMT_ADDRESS_LIST_IP4)

		entry = nmt_ip_entry_new (25, AF_INET, FALSE, FALSE);

	else if (priv->list_type == NMT_ADDRESS_LIST_IP6_WITH_PREFIX)

		entry = nmt_ip_entry_new (25, AF_INET6, TRUE, FALSE);

	else if (priv->list_type == NMT_ADDRESS_LIST_IP6)

		entry = nmt_ip_entry_new (25, AF_INET6, FALSE, FALSE);

	else if (priv->list_type == NMT_ADDRESS_LIST_HOSTNAME) {

		entry = nmt_newt_entry_new (25, NMT_NEWT_ENTRY_NONEMPTY);

		nmt_newt_entry_set_filter (NMT_NEWT_ENTRY (entry), hostname_filter, list);

	} else

		g_assert_not_reached ();

	g_object_bind_property_full (list, "strings", entry, "text",

	                             G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE,

	                             strings_transform_to_entry,

	                             strings_transform_from_entry,

	                             GINT_TO_POINTER (num), NULL);

	return entry;

}

static void

nmt_address_list_add_clicked (NmtWidgetList *list)

{

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (list);

	int len;

	len = priv->strings ? g_strv_length (priv->strings) : 0;

	priv->strings = g_renew (char *, priv->strings, len + 2);

	priv->strings[len] = g_strdup ("");

	priv->strings[len + 1] = NULL;

	nmt_widget_list_set_length (list, len + 1);

	g_object_notify (G_OBJECT (list), "strings");

}

static void

nmt_address_list_remove_clicked (NmtWidgetList *list,

                                 int            num)

{

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (list);

	int len;

	len = g_strv_length (priv->strings);

	g_free (priv->strings[num]);

	memmove (priv->strings + num, priv->strings + num + 1, (len - num) * sizeof (char *));

	nmt_widget_list_set_length (list, len - 1);

	g_object_notify (G_OBJECT (list), "strings");

}

static void

nmt_address_list_set_property (GObject      *object,

                               guint         prop_id,

                               const GValue *value,

                               GParamSpec   *pspec)

{

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (object);

	switch (prop_id) {

	case PROP_LIST_TYPE:

		priv->list_type = g_value_get_uint (value);

		break;

	case PROP_STRINGS:

		g_strfreev (priv->strings);

		priv->strings = g_value_dup_boxed (value);

		if (!priv->strings)

			priv->strings = g_new0 (char *, 1);

		nmt_widget_list_set_length (NMT_WIDGET_LIST (object),

		                            g_strv_length (priv->strings));

		break;

	default:

		G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

		break;

	}

}

static void

nmt_address_list_get_property (GObject    *object,

                               guint       prop_id,

                               GValue     *value,

                               GParamSpec *pspec)

{

	NmtAddressListPrivate *priv = NMT_ADDRESS_LIST_GET_PRIVATE (object);

	switch (prop_id) {

	case PROP_LIST_TYPE:

		g_value_set_uint (value, priv->list_type);

		break;

	case PROP_STRINGS:

		g_value_set_boxed (value, priv->strings);

		break;

	default:

		G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

		break;

	}

}

static void

nmt_address_list_class_init (NmtAddressListClass *list_class)

{

	GObjectClass *object_class = G_OBJECT_CLASS (list_class);

	NmtWidgetListClass *widget_list_class = NMT_WIDGET_LIST_CLASS (list_class);

	g_type_class_add_private (list_class, sizeof (NmtAddressListPrivate));

	/* virtual methods */

	object_class->set_property = nmt_address_list_set_property;

	object_class->get_property = nmt_address_list_get_property;

	widget_list_class->create_widget  = nmt_address_list_create_widget;

	widget_list_class->add_clicked    = nmt_address_list_add_clicked;

	widget_list_class->remove_clicked = nmt_address_list_remove_clicked;

	/**

	 * NmtAddressList:list-type:

	 *

	 * The type of address the list holds.

	 */

	g_object_class_install_property

		(object_class, PROP_LIST_TYPE,

		 g_param_spec_uint ("list-type", "", "",

		                    0, G_MAXUINT, 0,

		                    G_PARAM_READWRITE |

		                    G_PARAM_CONSTRUCT_ONLY |

		                    G_PARAM_STATIC_STRINGS));

	/**

	 * NmtAddressList:strings:

	 *

	 * The strings in the list's entries.

	 */

	g_object_class_install_property

		(object_class, PROP_STRINGS,

		 g_param_spec_boxed ("strings", "", "",

		                     G_TYPE_STRV,

		                     G_PARAM_READWRITE |

		                     G_PARAM_STATIC_STRINGS));

}