From: Andrea Zagli <azagli@libero.it>
Date: Sun, 6 Dec 2015 09:16:24 +0000 (+0100)
Subject: Added functions ::format_money and ::unformat_money.
X-Git-Tag: v0.0.1~11
X-Git-Url: https://saetta.ns0.it/gitweb?a=commitdiff_plain;h=319f74b6636cdcb7264bc67a573fcb251948158e;p=libzakutils

Added functions ::format_money and ::unformat_money.
---

diff --git a/src/generic.c b/src/generic.c
index 3522f64..76c9ee3 100644
--- a/src/generic.c
+++ b/src/generic.c
@@ -69,6 +69,129 @@ zak_utils_round (gdouble value, guint n_decimals)
 	return ret;
 }
 
+/**
+ * zak_utils_format_money:
+ * @number:
+ * @decimals:
+ * with_currency_symbol:
+ *
+ */
+gchar
+*zak_utils_format_money (gdouble number,
+						 gint decimals,
+						 gboolean with_currency_symbol)
+{
+	gchar *ret;
+
+	GRegex *regex;
+	GError *error;
+
+	gchar *str_format;
+	gchar *str;
+	gssize str_len;
+
+	/* TODO
+	 * - get number of decimals from locale
+	 * - get grouping char from locale
+	 * - get currency symbol from locale
+	 */
+
+	ret = g_strdup ("");
+
+	error = NULL;
+	regex = g_regex_new ("(^[-\\d]?\\d+)(\\d\\d\\d)", 0, 0, &error);
+	if (regex == NULL || error != NULL)
+		{
+			g_warning ("Error on creating regex: %s.",
+			           error->message != NULL ? error->message : "no details");
+			return "";
+		}
+
+	str_format = g_strdup_printf ("%%0%sf", decimals == 0 ? ".0" : (decimals < 0 ? ".2" : g_strdup_printf (".%d", decimals)));
+	ret = g_strdup_printf (str_format, number);
+
+	while (TRUE)
+		{
+			error = NULL;
+			str_len = g_utf8_strlen (ret, -1);
+			str = g_regex_replace ((const GRegex *)regex,
+			                       ret, str_len, 0,
+			                       "\\1.\\2", 0,
+			                       &error);
+			if (error != NULL)
+				{
+					g_warning ("Error on regex replacing: %s.",
+					           error->message != NULL ? error->message : "no details");
+					g_regex_unref (regex);
+					return "";
+				}
+			if (g_strcmp0 (ret, str) != 0)
+				{
+					ret = g_strdup (str);
+					g_free (str);
+				}
+			else
+				{
+					break;
+				}
+		}
+
+	if (with_currency_symbol)
+		{
+			ret = g_strconcat ("€ ", ret, NULL);
+		}
+
+	g_regex_unref (regex);
+
+	return ret;
+}
+
+/**
+ * zak_utils_unformat_money:
+ * @value:
+ *
+ */
+gdouble
+zak_utils_unformat_money (const gchar *value)
+{
+	gdouble ret;
+
+	GRegex *regex;
+	GError *error;
+
+	gchar *str;
+
+	ret = 0.0;
+
+	error = NULL;
+	regex = g_regex_new ("[€ .]", 0, 0, &error);
+	if (error != NULL)
+		{
+			g_warning ("Error on creating regex: %s.",
+			           error->message != NULL ? error->message : "no details");
+			return ret;
+		}
+
+	error = NULL;
+	str = g_regex_replace ((const GRegex *)regex,
+	                       value, -1, 0,
+	                       "", 0,
+	                       &error);
+	if (error != NULL)
+		{
+			g_warning ("Error on regex replacing: %s.",
+			           error->message != NULL ? error->message : "no details");
+			g_regex_unref (regex);
+			return ret;
+		}
+
+	ret = g_strtod (str, NULL);
+
+	g_regex_unref (regex);
+
+	return ret;
+}
+
 /**
  * zak_utils_gstring_initial_capital:
  * @gstring:
diff --git a/src/generic.h b/src/generic.h
index d654bc5..8ea64e1 100644
--- a/src/generic.h
+++ b/src/generic.h
@@ -32,6 +32,9 @@ gboolean zak_utils_file_exists (const gchar *filename);
 
 gdouble zak_utils_round (gdouble value, guint n_decimals);
 
+gchar *zak_utils_format_money (gdouble number, gint decimals, gboolean with_currency_symbol);
+gdouble zak_utils_unformat_money (const gchar *value);
+
 void zak_utils_gstring_initial_capital (GString *gstring);
 
 int zak_utils_compare_version (const gchar *ver1, const gchar *ver2, const gchar *delimiters, guint *part);