/*  HomeBank -- Free, easy, personal accounting for everyone.
 *  Copyright (C) 1995-2025 Maxime DOYEN
 *
 *  This file is part of HomeBank.
 *
 *  HomeBank 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 2 of the License, or
 *  (at your option) any later version.
 *
 *  HomeBank 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 "homebank.h"

#include "hb-preferences.h"
#include "hb-pref-data.h"
#include "hb-filter.h"
#include "gtk-chart-colors.h"

#ifdef G_OS_WIN32
#include <windows.h>
#endif

/****************************************************************************/
/* Debug macros                                                             */
/****************************************************************************/
#define MYDEBUG 0

#if MYDEBUG
#define DB(x) (x);
#else
#define DB(x);
#endif


#define DBKF(x);
//#define DBKF(x) (x);


/* our global datas */
extern struct HomeBank *GLOBALS;
extern struct Preferences *PREFS;

/* = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = */


static void homebank_pref_init_wingeometry(struct WinGeometry *wg, gint l, gint t, gint w, gint h)
{
	wg->l = l;
	wg->t = t;
	wg->w = w;
	wg->h = h;
	wg->s = 0;
}


//vehicle_unit_100
//vehicle_unit_distbyvol
//=> used for column title

static void _homebank_pref_init_measurement_units(void)
{
	// unit is kilometer
	if(!PREFS->vehicle_unit_ismile)
	{
		PREFS->vehicle_unit_dist0 = "%d km";
		PREFS->vehicle_unit_dist1 = "%.1f km";
		PREFS->vehicle_unit_100  = "100 km";
	}
	// unit is miles
	else
	{
		PREFS->vehicle_unit_dist0 = "%d mi.";
		PREFS->vehicle_unit_dist1 = "%.1f mi.";
		PREFS->vehicle_unit_100  = "100 mi.";
	}

	// unit is Liters
	if(!PREFS->vehicle_unit_isgal)
	{
		//TRANSLATORS: format a liter number with l/L as abbreviation
		PREFS->vehicle_unit_vol  = _("%.2f l");
		if(!PREFS->vehicle_unit_ismile)
			//TRANSLATORS: kilometer per liter
			PREFS->vehicle_unit_distbyvol  = _("km/l");
		else
			//TRANSLATORS: miles per liter
			PREFS->vehicle_unit_distbyvol  = _("mi./l");
	}
	// unit is gallon
	else
	{
		PREFS->vehicle_unit_vol  = "%.2f gal.";
		if(!PREFS->vehicle_unit_ismile)
			PREFS->vehicle_unit_distbyvol  = "km/gal.";
		else
			PREFS->vehicle_unit_distbyvol  = "mi./gal.";
	}

}


void homebank_pref_free(void)
{
	DB( g_print("\n[preferences] free\n") );


	g_free(PREFS->date_format);

	g_free(PREFS->api_rate_url);
	g_free(PREFS->api_rate_key);

	g_free(PREFS->icontheme);

	g_free(PREFS->color_exp);
	g_free(PREFS->color_inc);
	g_free(PREFS->color_warn);
	g_free(PREFS->color_bg_future);

	g_free(PREFS->path_hbfile);
	g_free(PREFS->path_import);
	g_free(PREFS->path_export);
	//g_free(PREFS->path_navigator);

	g_free(PREFS->language);

	g_free(PREFS->pnl_list_tab);

	g_free(PREFS->minor_cur.symbol);
	g_free(PREFS->minor_cur.decimal_char);
	g_free(PREFS->minor_cur.grouping_char);

	memset(PREFS, 0, sizeof(struct Preferences));
}


gint
homebank_pref_list_column_get(gint *cols_id, gint uid, gint maxcol)
{
gint i;

	for(i=0; i < maxcol ; i++ )
	{
		if( uid == ABS(cols_id[i]) )
			return cols_id[i];

		/* secure point */
		if( i > 50)
			break;
	}
	return uid;
}


void homebank_pref_setdefault_lst_det_columns(void)
{
gint i = 0;

	PREFS->lst_det_columns[i++] = LST_DSPOPE_STATUS;  //always displayed
	PREFS->lst_det_columns[i++] = LST_DSPOPE_DATE;	  //always displayed
	PREFS->lst_det_columns[i++] = -LST_DSPOPE_PAYNUMBER;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_PAYEE;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_CATEGORY;
	PREFS->lst_det_columns[i++] = -LST_DSPOPE_TAGS;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_CLR;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_AMOUNT;
	PREFS->lst_det_columns[i++] = -LST_DSPOPE_EXPENSE;
	PREFS->lst_det_columns[i++] = -LST_DSPOPE_INCOME;
	PREFS->lst_det_columns[i++] = -LST_DSPOPE_BALANCE;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_MEMO;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_ACCOUNT;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_MATCH;
	PREFS->lst_det_columns[i++] = LST_DSPOPE_GRPFLAG;

	for( i=0;i<NUM_LST_DSPOPE;i++)
		PREFS->lst_det_col_width[i] = -1;
}


void homebank_pref_setdefault_lst_ope_columns(void)
{
gint i = 0;

	PREFS->lst_ope_columns[i++] = LST_DSPOPE_STATUS;  //always displayed
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_DATE;	  //always displayed
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_PAYNUMBER;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_PAYEE;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_CATEGORY;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_TAGS;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_CLR;
	PREFS->lst_ope_columns[i++] = -LST_DSPOPE_AMOUNT;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_EXPENSE;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_INCOME;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_BALANCE;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_MEMO;
	PREFS->lst_ope_columns[i++] = -LST_DSPOPE_ACCOUNT;
	PREFS->lst_ope_columns[i++] = -LST_DSPOPE_MATCH;
	PREFS->lst_ope_columns[i++] = LST_DSPOPE_GRPFLAG;

	PREFS->lst_ope_sort_id    = LST_DSPOPE_DATE;
	PREFS->lst_ope_sort_order = GTK_SORT_ASCENDING;

	for( i=0;i<NUM_LST_DSPOPE;i++)
		PREFS->lst_ope_col_width[i] = -1;

}


void homebank_pref_setdefault_lst_sch_columns(void)
{
gint i = 0;
								  //nextdate here
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_PAYNUMBER;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_PAYEE;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_CATEGORY;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_CLR;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_AMOUNT;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_EXPENSE;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_INCOME;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_MEMO;
	PREFS->lst_sch_columns[i++] = COL_SCH_UID_ACCOUNT;

	PREFS->pnl_upc_col_pay_show  = 1;
	PREFS->pnl_upc_col_pay_width = -1;
	PREFS->pnl_upc_col_cat_show  = 1;
	PREFS->pnl_upc_col_cat_width = -1;
	PREFS->pnl_upc_col_mem_show  = 1;
	PREFS->pnl_upc_col_mem_width = -1;
	PREFS->pnl_upc_range = FLT_SCHEDULED_ALLDATE;
}


void homebank_pref_setdefault_win(void)
{
gint w = 1024, h = 600;

	// windows position/size 1024x600 for netbook
	// see https://gs.statcounter.com/screen-resolution-stats/desktop/worldwide
	// and gnome HIG

	homebank_pref_init_wingeometry(&PREFS->wal_wg, 0, 0, w, h);
	homebank_pref_init_wingeometry(&PREFS->acc_wg, 0, 0, w, h);

	w = (w * 0.8);
	h = (h * 0.8);
	homebank_pref_init_wingeometry(&PREFS->sta_wg, 0, 0, w, h);
	homebank_pref_init_wingeometry(&PREFS->tme_wg, 0, 0, w, h);
	homebank_pref_init_wingeometry(&PREFS->ove_wg, 0, 0, w, h);
	homebank_pref_init_wingeometry(&PREFS->bud_wg, 0, 0, w, h);
	homebank_pref_init_wingeometry(&PREFS->cst_wg, 0, 0, w, h);

	homebank_pref_init_wingeometry(&PREFS->txn_wg, 0, 0, -1, -1);
}


void homebank_pref_setdefault(void)
{
gint i;

	DB( g_print("\n[preferences] pref init\n") );

	homebank_pref_free();

	PREFS->language = NULL;

	PREFS->date_format = g_strdup(DEFAULT_FORMAT_DATE);

	PREFS->path_hbfile = g_strdup_printf("%s", g_get_home_dir ());
	PREFS->path_hbbak  = g_strdup_printf("%s", g_get_home_dir ());
	PREFS->path_import = g_strdup_printf("%s", g_get_home_dir ());
	PREFS->path_export = g_strdup_printf("%s", g_get_home_dir ());



	PREFS->showsplash = TRUE;
	PREFS->showwelcome = TRUE;
	PREFS->loadlast = TRUE;
	PREFS->appendscheduled = FALSE;
	PREFS->do_update_currency = FALSE;

	PREFS->bak_is_automatic = TRUE;
	PREFS->bak_max_num_copies = 5;

	PREFS->heritdate = FALSE;

	PREFS->txn_showconfirm = FALSE;
	PREFS->txn_showtemplate = FALSE;
	PREFS->hidereconciled = FALSE;
	PREFS->showremind = TRUE;
	//#1918334 no reason to show void by default
	PREFS->showvoid = FALSE;
	PREFS->includeremind = FALSE;
	//#1980562
	PREFS->safe_lock_recon = TRUE;
	PREFS->safe_pend_recon = TRUE;
	PREFS->safe_pend_past  = TRUE;
	PREFS->safe_pend_past_days = 90;

	//#1673048
	PREFS->txn_memoacp = TRUE;
	PREFS->txn_memoacp_days = 365;

	//5.8 paymode
	i = 0;
	PREFS->lst_paymode[i++] = PAYMODE_NONE;
	PREFS->lst_paymode[i++] = PAYMODE_CCARD;
	PREFS->lst_paymode[i++] = PAYMODE_CHECK;
	PREFS->lst_paymode[i++] = PAYMODE_CASH;
	PREFS->lst_paymode[i++] = PAYMODE_XFER;
	PREFS->lst_paymode[i++] = PAYMODE_DCARD;
	PREFS->lst_paymode[i++] = PAYMODE_REPEATPMT;
	PREFS->lst_paymode[i++] = PAYMODE_EPAYMENT;
	PREFS->lst_paymode[i++] = PAYMODE_DEPOSIT;
	PREFS->lst_paymode[i++] = PAYMODE_FEE;
	PREFS->lst_paymode[i++] = PAYMODE_DIRECTDEBIT;
	PREFS->lst_paymode[i++] = PAYMODE_MOBPHONE;

	//#2044601
	PREFS->xfer_showdialog = TRUE;
	//#1887212
	PREFS->xfer_daygap = 2;
	PREFS->xfer_syncstat = FALSE;

	PREFS->toolbar_style = 4;	//text beside icons
	PREFS->grid_lines = GTK_TREE_VIEW_GRID_LINES_NONE;
	
	PREFS->gtk_override = FALSE;
	PREFS->gtk_fontsize = 10;

	PREFS->icontheme = g_strdup("Default");

	PREFS->custom_colors = TRUE;
	PREFS->custom_bg_future = TRUE;
	PREFS->color_use_palette = TRUE;
	PREFS->color_exp  = g_strdup(DEFAULT_EXP_COLOR);
	PREFS->color_inc  = g_strdup(DEFAULT_INC_COLOR);
	PREFS->color_warn = g_strdup(DEFAULT_WARN_COLOR);
	PREFS->color_bg_future = g_strdup(DEFAULT_FUTURE_BG_COLOR);

	/* fiscal year */
	PREFS->fisc_year_day = 1;
	PREFS->fisc_year_month = 1;

	homebank_pref_setdefault_win();

	currency_get_system_iso();

	PREFS->wal_toolbar = TRUE;
	PREFS->wal_totchart = TRUE;	
	PREFS->wal_timchart = TRUE;
	PREFS->wal_upcoming = TRUE;

	PREFS->pnl_acc_col_acc_width = -1;
	PREFS->pnl_acc_show_by = DSPACC_GROUP_BY_TYPE;

	PREFS->hub_tot_view  = 1;
	PREFS->hub_tot_range = FLT_RANGE_THIS_MONTH;
	PREFS->hub_tim_view  = 1;
	PREFS->hub_tim_range = FLT_RANGE_LAST_12MONTHS;

	i = 0;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_STATUS;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_ACCOUNTS;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_CLEAR;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_RECON;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_TODAY;
	PREFS->lst_acc_columns[i++] = COL_DSPACC_FUTURE;

	//5.8 schedule/upcoming
	homebank_pref_setdefault_lst_sch_columns();

	i = 0;
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_DATE;	  //always displayed
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_MEMO;
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_AMOUNT;
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_PAYNUMBER;
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_PAYEE;
	PREFS->lst_impope_columns[i++] = LST_DSPOPE_CATEGORY;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_CLR;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_STATUS;  //always displayed
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_EXPENSE;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_INCOME;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_BALANCE;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_ACCOUNT;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_MATCH;
	PREFS->lst_impope_columns[i++] = -LST_DSPOPE_GRPFLAG;

	//book list column
	homebank_pref_setdefault_lst_ope_columns();

	//detail list column
	homebank_pref_setdefault_lst_det_columns();

	//PREFS->base_cur.nbdecimal = 2;
	//PREFS->base_cur.separator = TRUE;

	//PREFS->date_range_wal = FLT_RANGE_LASTMONTH;
	//PREFS->date_range_txn = FLT_RANGE_LAST12MONTHS;
	//PREFS->date_range_rep = FLT_RANGE_THISYEAR;

	//v5.2 change to let the example file show things
	//PREFS->date_range_wal = FLT_RANGE_MISC_ALLDATE;
	PREFS->date_range_txn = FLT_RANGE_MISC_ALLDATE;
	PREFS->date_range_rep = FLT_RANGE_MISC_ALLDATE;
	PREFS->date_future_nbdays = 0;
	PREFS->rep_maxspenditems = 10;

	//forecast
	PREFS->rep_forcast = TRUE;
	PREFS->rep_forecat_nbmonth = 6;

	//import/export
	PREFS->dtex_nointro = TRUE;
	PREFS->dtex_dodefpayee = FALSE;
	PREFS->dtex_doautoassign = FALSE;

	PREFS->dtex_ucfirst = FALSE;
	//#2040010
	PREFS->dtex_datefmt = PRF_DATEFMT_YMD;
	PREFS->dtex_ofxname = 1;
	PREFS->dtex_ofxmemo = 2;
	PREFS->dtex_qifmemo = TRUE;
	PREFS->dtex_qifswap = FALSE;
	PREFS->dtex_csvsep = PRF_DTEX_CSVSEP_SEMICOLON;

	//currency api
	PREFS->api_rate_url = g_strdup("https://api.frankfurter.app/latest");
	PREFS->api_rate_key = NULL;

	//todo: add intelligence here
	PREFS->euro_active  = FALSE;

	PREFS->euro_country = 0;
	PREFS->euro_value   = 1.0;

	da_cur_initformat(&PREFS->minor_cur);

	//PREFS->euro_nbdec   = 2;
	//PREFS->euro_thsep   = TRUE;
	//PREFS->euro_symbol	= g_strdup("??");

	PREFS->stat_byamount    = FALSE;
	PREFS->stat_showdetail  = FALSE;
	PREFS->stat_showrate    = FALSE;
	PREFS->stat_includexfer = FALSE;

	PREFS->budg_showdetail  = FALSE;
	PREFS->budg_unexclsub   = FALSE;

	PREFS->report_color_scheme = CHART_COLMAP_HOMEBANK;

	//PREFS->chart_legend = FALSE;

	PREFS->vehicle_unit_ismile = FALSE;
	PREFS->vehicle_unit_isgal  = FALSE;

	_homebank_pref_init_measurement_units();

}


/*
** load preference from homedir/.homebank (HB_DATA_PATH)
*/
static void homebank_pref_get_wingeometry(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	struct WinGeometry *storage)
{
	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
	gint *wg;
	gsize length;

		wg = g_key_file_get_integer_list(key_file, group_name, key, &length, NULL);
		memcpy(storage, wg, 5*sizeof(gint));
		g_free(wg);
		// #606613 ensure left/top to be > 0
		if(storage->l < 0)
			storage->l = 0;

		if(storage->t < 0)
			storage->t = 0;
	}
}


static void homebank_pref_get_intlist(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gint *storage,
	gsize maxlength)
{

	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
	gint *src;
	gsize length;

		src = g_key_file_get_integer_list(key_file, group_name, key, &length, NULL);

		DBKF( g_print(" - length %d (max=%d)\n", (int)length, (int)maxlength) );
		if( length == maxlength )
		{
			DBKF( g_print(" > storing\n") );
			memcpy(storage, src, length*sizeof(gint));
		}
		
		g_free(src);
	}
}


static void homebank_pref_get_boolean(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gboolean *storage)
{
	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
		*storage = g_key_file_get_boolean(key_file, group_name, key, NULL);
		DBKF( g_print(" > stored boolean %d for %s at %p\n", *storage, key, storage) );
	}
}

static void homebank_pref_get_integer(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gint *storage)
{
	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
		*storage = g_key_file_get_integer(key_file, group_name, key, NULL);
		DBKF( g_print(" > stored integer %d for %s at %p\n", *storage, key, storage) );
	}
}

static void homebank_pref_get_guint32(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	guint32 *storage)
{
	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
		*storage = g_key_file_get_integer(key_file, group_name, key, NULL);
		DBKF( g_print(" > stored guint32 %d for %s at %p\n", *storage, key, storage) );
	}
}

static void homebank_pref_get_short(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gshort *storage)
{
	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
		*storage = (gshort)g_key_file_get_integer(key_file, group_name, key, NULL);
		DBKF( g_print(" > stored short %d for %s at %p\n", *storage, key, storage) );
	}
}

static void homebank_pref_get_string(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gchar **storage)
{
gchar *string;

	DBKF( g_print(" search %s in %s\n", key, group_name) );

	if( g_key_file_has_key(key_file, group_name, key, NULL) )
	{
		/* free any previous string */
		if( *storage != NULL )
		{
			DBKF( g_print(" storage was not null, freeing\n") );

			g_free(*storage);
		}

		*storage = NULL;

		string = g_key_file_get_string(key_file, group_name, key, NULL);
		if( string != NULL )
		{
			//*storage = g_strdup(string);
			//leak
			*storage = string;	//already a new allocated string

			DBKF( g_print(" > stored '%s' for %s at %p\n", *storage, key, *storage) );
		}
	}

/*
	if (error)
    {
      g_warning ("error: %s\n", error->message);
      g_error_free(error);
      error = NULL;
    }
*/


}


static gint homebank_pref_upgrade_560_daterange(gint oldrange)
{
gint newrange = FLT_RANGE_UNSET;

	switch(oldrange)
	{
		case OLD56_FLT_RANGE_THISMONTH:    newrange = FLT_RANGE_THIS_MONTH; break;
		case OLD56_FLT_RANGE_LASTMONTH:    newrange = FLT_RANGE_LAST_MONTH; break;
		case OLD56_FLT_RANGE_THISQUARTER:  newrange = FLT_RANGE_THIS_QUARTER; break;
		case OLD56_FLT_RANGE_LASTQUARTER:  newrange = FLT_RANGE_LAST_QUARTER; break;
		case OLD56_FLT_RANGE_THISYEAR:     newrange = FLT_RANGE_THIS_YEAR; break;
		case OLD56_FLT_RANGE_LASTYEAR:     newrange = FLT_RANGE_LAST_YEAR; break;
		case OLD56_FLT_RANGE_LAST30DAYS:   newrange = FLT_RANGE_LAST_30DAYS; break;
		case OLD56_FLT_RANGE_LAST60DAYS:   newrange = FLT_RANGE_LAST_60DAYS; break;
		case OLD56_FLT_RANGE_LAST90DAYS:   newrange = FLT_RANGE_LAST_90DAYS; break;
		case OLD56_FLT_RANGE_LAST12MONTHS: newrange = FLT_RANGE_LAST_12MONTHS; break;
		case OLD56_FLT_RANGE_ALLDATE:      newrange = FLT_RANGE_MISC_ALLDATE; break;
	}
	DB( g_print(" %d => %d\n", oldrange, newrange) );
	return newrange;
}


static void homebank_pref_currfmt_convert(Currency *cur, gchar *prefix, gchar *suffix)
{

	if( (prefix != NULL) && (strlen(prefix) > 0) )
	{
		cur->symbol = g_strdup(prefix);
		cur->sym_prefix = TRUE;
	}
	else if( (suffix != NULL) )
	{
		cur->symbol = g_strdup(suffix);
		cur->sym_prefix = FALSE;
	}
}


//#beta start

void homebank_pref_icon_symbolic(gboolean active)
{
	//ensure we have a provider
	if(!GLOBALS->provider)
	{
		GLOBALS->provider = gtk_css_provider_new ();
        gtk_style_context_add_provider_for_screen (gdk_screen_get_default (),
                   GTK_STYLE_PROVIDER (GLOBALS->provider),
                   GTK_STYLE_PROVIDER_PRIORITY_APPLICATION);
	}

	if( active )
	{
		gtk_css_provider_load_from_data (GLOBALS->provider, "* {-gtk-icon-style: symbolic;}", -1, NULL);
	}
	else if(GLOBALS->provider != NULL )
	{
		gtk_style_context_remove_provider_for_screen (gdk_screen_get_default (),
						  GTK_STYLE_PROVIDER (GLOBALS->provider));
		
		g_clear_object (&GLOBALS->provider);
	}
}
//#beta end


//#2076474
void homebank_pref_apply_scheme(void)
{
GtkSettings *settings = gtk_settings_get_default();

	DB( g_print("\n[preferences] pref apply scheme\n") );

	DB( g_print(" scheme : %d\n", GLOBALS->color_scheme) );
	DB( g_print(" appdark: %d\n", PREFS->gtk_darktheme) );

	GLOBALS->theme_is_dark = FALSE;

	if( (GLOBALS->color_scheme == DEFAULT) && PREFS->gtk_darktheme )
		GLOBALS->theme_is_dark = TRUE;
	else
	if( GLOBALS->color_scheme == PREFER_DARK )
		GLOBALS->theme_is_dark = TRUE;

	g_object_set(settings, "gtk-application-prefer-dark-theme", GLOBALS->theme_is_dark, NULL);
}


void homebank_pref_apply(void)
{
GtkSettings *settings = gtk_settings_get_default();

	DB( g_print("\n[preferences] pref apply\n") );

	if( PREFS->gtk_override == TRUE )
	{
	PangoFontDescription *pfd;
	gchar *oldfn, *newfn;

		g_object_get(settings, "gtk-font-name", &oldfn, NULL);
		pfd = pango_font_description_from_string(oldfn);
		DB( g_print(" font-name '%s' == '%s' %d\n", oldfn, pango_font_description_get_family(pfd), pango_font_description_get_size(pfd)/PANGO_SCALE) );
		g_free(oldfn);

		pango_font_description_set_size(pfd, PREFS->gtk_fontsize*PANGO_SCALE);

		newfn = pango_font_description_to_string(pfd);
		DB( g_print(" font-name '%s' == '%s' %d\n", newfn, pango_font_description_get_family(pfd), pango_font_description_get_size(pfd)/PANGO_SCALE) );
		g_object_set(settings, "gtk-font-name", newfn, NULL);
		g_free(newfn);

		pango_font_description_free(pfd);
	}
	else
	{
		gtk_settings_reset_property(settings, "gtk-font-name");
	}

	homebank_pref_apply_scheme();

	//gtk_settings_set_string_property (gtk_settings_get_default (), "gtk-icon-theme-name", PREFS->icontheme, "gtkrc:0");
	g_object_set(gtk_settings_get_default (), "gtk-icon-theme-name", PREFS->icontheme, NULL);

	homebank_pref_icon_symbolic(PREFS->icon_symbolic);

}


gboolean homebank_pref_load(void)
{
GKeyFile *keyfile;
gboolean retval = FALSE;
gchar *group, *filename;
guint32 version = 0;
gboolean loaded;
GError *error = NULL;

	DB( g_print("\n[preferences] pref load\n") );

	keyfile = g_key_file_new();
	if(keyfile)
	{
		filename = g_build_filename(homebank_app_get_config_dir(), "preferences", NULL );

		DB( g_print(" - filename: %s\n", filename) );

		error = NULL;
		loaded = g_key_file_load_from_file (keyfile, filename, G_KEY_FILE_NONE, &error);
		if( error )
		{
			g_warning("unable to load file %s: %s", filename, error->message);
			g_error_free (error);
		}
			
		if( loaded == TRUE )
		{

			group = "General";

				DBKF( g_print(" -> ** General\n") );

				//since 4.51 > integer 1 digit each
				//since 5.5.6 > 2 digit each
				homebank_pref_get_guint32 (keyfile, group, "Version", &version);
				if(version == 0)	// old double number
				{
					gdouble v = g_key_file_get_double (keyfile, group, "Version", NULL);
					version = (guint32)(v * 10);
				}

				DBKF( g_print(" - version: %d\n", version) );

				homebank_pref_get_string(keyfile, group, "Language", &PREFS->language);

				homebank_pref_get_short(keyfile, group, "BarStyle" , &PREFS->toolbar_style);

				if(version <= 6 && PREFS->toolbar_style == 0)	// force system to text beside
				{
					PREFS->toolbar_style = 4;
				}

				//5.4.3
				homebank_pref_get_boolean(keyfile, group, "GtkOverride", &PREFS->gtk_override);
				homebank_pref_get_short(keyfile, group, "GtkFontSize" , &PREFS->gtk_fontsize);
				homebank_pref_get_boolean(keyfile, group, "GtkDarkTheme", &PREFS->gtk_darktheme);

				//beta
				homebank_pref_get_string(keyfile, group, "IconTheme", &PREFS->icontheme);
				homebank_pref_get_boolean(keyfile, group, "IconSymbolic", &PREFS->icon_symbolic);

				if(version <= 2)	// retrieve old settings
				{
				guint32 color = 0;

					homebank_pref_get_guint32(keyfile, group, "ColorExp" , &color);
					g_free(PREFS->color_exp);
					PREFS->color_exp = g_strdup_printf("#%06x", color);

					homebank_pref_get_guint32(keyfile, group, "ColorInc" , &color);
					g_free(PREFS->color_inc);
					PREFS->color_inc = g_strdup_printf("#%06x", color);

					homebank_pref_get_guint32(keyfile, group, "ColorWarn", &color);
					g_free(PREFS->color_warn);
					PREFS->color_warn = g_strdup_printf("#%06x", color);
				}
				else
				{
					homebank_pref_get_boolean(keyfile, group, "CustomColors", &PREFS->custom_colors);
					homebank_pref_get_boolean(keyfile, group, "CustomBgFuture", &PREFS->custom_bg_future);
					homebank_pref_get_boolean(keyfile, group, "ColorUsePalette", &PREFS->color_use_palette);

					homebank_pref_get_string(keyfile, group, "ColorExp" , &PREFS->color_exp);
					homebank_pref_get_string(keyfile, group, "ColorInc" , &PREFS->color_inc);
					homebank_pref_get_string(keyfile, group, "ColorWarn", &PREFS->color_warn);
					homebank_pref_get_string(keyfile, group, "ColorBgFuture", &PREFS->color_bg_future);

					if( version <= 500 )
					{
					gboolean rules_hint = FALSE;

						homebank_pref_get_boolean(keyfile, group, "RulesHint", &rules_hint);
						if( rules_hint == TRUE )
							PREFS->grid_lines = GTK_TREE_VIEW_GRID_LINES_HORIZONTAL;

					}
					else
						homebank_pref_get_short(keyfile, group, "GridLines", &PREFS->grid_lines);

					//we disable showwelcome for old users
					if( version < 540 )
						PREFS->showwelcome = FALSE;
				}

				DBKF( g_print(" - color exp: %s\n", PREFS->color_exp) );
				DBKF( g_print(" - color inc: %s\n", PREFS->color_inc) );
				DBKF( g_print(" - color wrn: %s\n", PREFS->color_warn) );


				homebank_pref_get_string(keyfile, group, "WalletPath", &PREFS->path_hbfile);
				homebank_pref_get_string(keyfile, group, "BackupPath", &PREFS->path_hbbak);
				//#1870433 default backup path folder not initialized with wallet folder			
				if( version < 530 )
				{
					homebank_pref_get_string(keyfile, group, "WalletPath", &PREFS->path_hbbak);
				}
				homebank_pref_get_string(keyfile, group, "ImportPath", &PREFS->path_import);
				homebank_pref_get_string(keyfile, group, "ExportPath", &PREFS->path_export);

				homebank_pref_get_boolean(keyfile, group, "ShowSplash", &PREFS->showsplash);
				homebank_pref_get_boolean(keyfile, group, "ShowWelcome", &PREFS->showwelcome);
				homebank_pref_get_boolean(keyfile, group, "LoadLast", &PREFS->loadlast);
				homebank_pref_get_boolean(keyfile, group, "AppendScheduled", &PREFS->appendscheduled);
				homebank_pref_get_boolean(keyfile, group, "UpdateCurrency", &PREFS->do_update_currency);	

				homebank_pref_get_boolean(keyfile, group, "BakIsAutomatic", &PREFS->bak_is_automatic);
				homebank_pref_get_short  (keyfile, group, "BakMaxNumCopies", &PREFS->bak_max_num_copies);

				homebank_pref_get_boolean(keyfile, group, "HeritDate", &PREFS->heritdate);

				homebank_pref_get_boolean(keyfile, group, "ShowConfirm", &PREFS->txn_showconfirm);
				homebank_pref_get_boolean(keyfile, group, "ShowTemplate", &PREFS->txn_showtemplate);
				homebank_pref_get_boolean(keyfile, group, "HideReconciled", &PREFS->hidereconciled);
				homebank_pref_get_boolean(keyfile, group, "ShowRemind", &PREFS->showremind);
				homebank_pref_get_boolean(keyfile, group, "ShowVoid", &PREFS->showvoid);
				homebank_pref_get_boolean(keyfile, group, "IncludeRemind", &PREFS->includeremind);
				homebank_pref_get_boolean(keyfile, group, "LockReconciled", &PREFS->safe_lock_recon);
				homebank_pref_get_boolean(keyfile, group, "SafePendRecon", &PREFS->safe_pend_recon);
				homebank_pref_get_boolean(keyfile, group, "SafePendPast", &PREFS->safe_pend_past);
				homebank_pref_get_short  (keyfile, group, "SafePendPastDays", &PREFS->safe_pend_past_days);
				homebank_pref_get_boolean(keyfile, group, "TxnMemoAcp", &PREFS->txn_memoacp);
				homebank_pref_get_short  (keyfile, group, "TxnMemoAcpDays", &PREFS->txn_memoacp_days);
				
				homebank_pref_get_boolean(keyfile, group, "TxnXferShowDialog", &PREFS->xfer_showdialog);
				homebank_pref_get_short  (keyfile, group, "TxnXferDayGap", &PREFS->xfer_daygap);
				homebank_pref_get_boolean(keyfile, group, "TxnXferSyncDate", &PREFS->xfer_syncdate);				
				homebank_pref_get_boolean(keyfile, group, "TxnXferSyncStatus", &PREFS->xfer_syncstat);
				

				if( g_key_file_has_key(keyfile, group, "ColumnsOpe", NULL) )
				{
				gboolean *bsrc;
				gint *src, i, j;
				gsize length;

					if(version <= 2)	//retrieve old 0.1 or 0.2 visibility boolean
					{
						bsrc = g_key_file_get_boolean_list(keyfile, group, "ColumnsOpe", &length, NULL);
						if( length == NUM_LST_DSPOPE-1 )
						{
							//and convert
							for(i=0; i<NUM_LST_DSPOPE-1 ; i++)
							{
								PREFS->lst_ope_columns[i] = (bsrc[i] == TRUE) ? i+1 : -(i+1);
							}
						}
						g_free(bsrc);
					}
					else
					{
						src = g_key_file_get_integer_list(keyfile, group, "ColumnsOpe", &length, NULL);

						DBKF( g_print(" - length %d (max=%d)\n", (int)length, NUM_LST_DSPOPE) );

						if( length == NUM_LST_DSPOPE )
						{
							DBKF( g_print(" - copying column order from pref file\n") );
							memcpy(PREFS->lst_ope_columns, src, length*sizeof(gint));
						}
						else
						{
							if(version <= 7)
							{
								if( length == NUM_LST_DSPOPE-2 )	//1 less column before v4.5.1
								{
									DBKF( g_print(" - upgrade from v7\n") );
									DBKF( g_print(" - copying column order from pref file\n") );
									memcpy(PREFS->lst_ope_columns, src, length*sizeof(gint));
									//append balance column
									PREFS->lst_ope_columns[10] = LST_DSPOPE_BALANCE;
								}
							}

							if(version < 500)
							{
								if( length == NUM_LST_DSPOPE-2 )	//1 less column before v4.5.1
								{
									DBKF( g_print(" - upgrade prior v5.0\n") );
									DBKF( g_print(" - copying column order from pref file\n") );
									gboolean added = FALSE;
									for(i=0,j=0; i<NUM_LST_DSPOPE-1 ; i++)
									{
										if( added == FALSE &&
										    (ABS(src[i]) == LST_DSPOPE_AMOUNT ||
										    ABS(src[i]) == LST_DSPOPE_EXPENSE ||
										    ABS(src[i]) == LST_DSPOPE_INCOME) )
										{
											PREFS->lst_ope_columns[j++] = LST_DSPOPE_CLR;
											added = TRUE;
										}
										PREFS->lst_ope_columns[j++] = src[i];
									}
								}
							}

						}

						g_free(src);
					}

				}


				homebank_pref_get_intlist(keyfile, group, "ColumnsOpeWidth", PREFS->lst_ope_col_width, NUM_LST_DSPOPE);

				homebank_pref_get_integer(keyfile, group, "OpeSortId", &PREFS->lst_ope_sort_id);
				homebank_pref_get_integer(keyfile, group, "OpeSortOrder", &PREFS->lst_ope_sort_order);

			    DBKF( g_print(" - set sort to %d %d\n", PREFS->lst_ope_sort_id, PREFS->lst_ope_sort_order) );

				//detail list
				homebank_pref_get_intlist(keyfile, group, "ColumnsDet", PREFS->lst_det_columns, NUM_LST_DSPOPE);

				homebank_pref_get_intlist(keyfile, group, "ColumnsDetWidth", PREFS->lst_det_col_width, NUM_LST_DSPOPE);


				homebank_pref_get_short(keyfile, group, "FiscYearDay", &PREFS->fisc_year_day);
				homebank_pref_get_short(keyfile, group, "FiscYearMonth", &PREFS->fisc_year_month);

				//5.8 payment, NUM_PAYMODE_KEY-1 because PAYMODE_OBSOLETEINTXFER
				PREFS->lst_paymode[0] = PAYMODE_NONE;
				homebank_pref_get_intlist(keyfile, group, "Payment", &PREFS->lst_paymode[1], NUM_PAYMODE_KEY-1);


			group = "Windows";

				DBKF( g_print(" -> ** Windows\n") );

				homebank_pref_get_wingeometry(keyfile, group, "Wal", &PREFS->wal_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Acc", &PREFS->acc_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Sta", &PREFS->sta_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Tme", &PREFS->tme_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Ove", &PREFS->ove_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Bud", &PREFS->bud_wg);
				homebank_pref_get_wingeometry(keyfile, group, "Car", &PREFS->cst_wg);

				homebank_pref_get_wingeometry(keyfile, group, "Txn", &PREFS->txn_wg);
				homebank_pref_get_wingeometry(keyfile, group, "DBud", &PREFS->dbud_wg);

				if(version <= 7)	//set maximize to 0
				{
					PREFS->wal_wg.s = 0;
					PREFS->acc_wg.s = 0;
					PREFS->txn_wg.s = 0;
					PREFS->sta_wg.s = 0;
					PREFS->tme_wg.s = 0;
					PREFS->ove_wg.s = 0;
					PREFS->bud_wg.s = 0;
					PREFS->cst_wg.s = 0;
				}
				homebank_pref_get_integer(keyfile, group, "WalVPaned", &PREFS->wal_vpaned);
				homebank_pref_get_integer(keyfile, group, "WalHPaned", &PREFS->wal_hpaned);
				homebank_pref_get_boolean(keyfile, group, "WalToolbar", &PREFS->wal_toolbar);
				homebank_pref_get_boolean(keyfile, group, "WalTotalChart", &PREFS->wal_totchart);
				homebank_pref_get_boolean(keyfile, group, "WalTimeChart", &PREFS->wal_timchart);
				homebank_pref_get_boolean(keyfile, group, "WalUpcoming", &PREFS->wal_upcoming);
				if( version < 570 )
				{
					homebank_pref_get_boolean(keyfile, group, "WalSpending", &PREFS->wal_totchart);
				}

			//since 5.1.3
			group = "Panels";

				DBKF( g_print(" -> ** Panels\n") );

				homebank_pref_get_short(keyfile, group, "AccColAccW", &PREFS->pnl_acc_col_acc_width);
				homebank_pref_get_short(keyfile, group, "AccShowBy" , &PREFS->pnl_acc_show_by);

				{
				gint *src;
				gsize length;
					src = g_key_file_get_integer_list(keyfile, group, "AccColumns", &length, NULL);

					DB( g_print(" - length %d (max=%d)\n", (int)length, NUM_LST_DSPOPE) );

					if( length == NUM_LST_COL_DSPACC )
					{
						DB( g_print(" - copying column order from pref file\n") );
						memcpy(PREFS->lst_acc_columns, src, length*sizeof(gint));
					}
					g_free(src);
				}						

				//hub total/time
				homebank_pref_get_short(keyfile, group, "HubTotView" , &PREFS->hub_tot_view);
				homebank_pref_get_short(keyfile, group, "HubTotViewRange", &PREFS->hub_tot_range);
				homebank_pref_get_short(keyfile, group, "HubTotRaw" , &PREFS->hub_tot_raw);
				
				homebank_pref_get_short(keyfile, group, "HubTimView" , &PREFS->hub_tim_view);
				homebank_pref_get_short(keyfile, group, "HubTimViewRange", &PREFS->hub_tim_range);
				homebank_pref_get_short(keyfile, group, "HubTimRaw" , &PREFS->hub_tim_raw);

				//scheduled/upcoming
				if( g_key_file_has_key(keyfile, group, "ColumnsSch", NULL) )
				{
				gint *src;
				gsize length;

					src = g_key_file_get_integer_list(keyfile, group, "ColumnsSch", &length, NULL);

					DBKF( g_print(" - length %d (max=%d)\n", (int)length, NUM_COL_SCH_UID) );
					if( length == NUM_COL_SCH_UID )
					{
						DBKF( g_print(" - copying column order from pref file\n") );
						memcpy(PREFS->lst_sch_columns, src, length*sizeof(gint));
					}
					
					g_free(src);
				}

				homebank_pref_get_short(keyfile, group, "UpcColPayV", &PREFS->pnl_upc_col_pay_show);
				homebank_pref_get_short(keyfile, group, "UpcColCatV", &PREFS->pnl_upc_col_cat_show);
				homebank_pref_get_short(keyfile, group, "UpcColMemV", &PREFS->pnl_upc_col_mem_show);
				homebank_pref_get_short(keyfile, group, "UpcColPayW", &PREFS->pnl_upc_col_pay_width);
				homebank_pref_get_short(keyfile, group, "UpcColCatW", &PREFS->pnl_upc_col_cat_width);
				homebank_pref_get_short(keyfile, group, "UpcColMemW", &PREFS->pnl_upc_col_mem_width);
				homebank_pref_get_integer(keyfile, group, "UpcRange", &PREFS->pnl_upc_range);

				homebank_pref_get_string(keyfile, group, "PnlLstTab", &PREFS->pnl_list_tab);

			group = "Format";

				DBKF( g_print(" -> ** Format\n") );

				homebank_pref_get_string(keyfile, group, "DateFmt", &PREFS->date_format);

				if(version < 460)
				{
				gboolean useimperial = FALSE;

					homebank_pref_get_boolean(keyfile, group, "UKUnits", &useimperial);
					if(useimperial)
					{
						PREFS->vehicle_unit_ismile = TRUE;
						PREFS->vehicle_unit_isgal = TRUE;
					}
				}

				homebank_pref_get_boolean(keyfile, group, "UnitIsMile", &PREFS->vehicle_unit_ismile);
				homebank_pref_get_boolean(keyfile, group, "UnitIsGal", &PREFS->vehicle_unit_isgal);


			group = "Filter";

				DBKF( g_print(" -> ** Filter\n") );

				//homebank_pref_get_integer(keyfile, group, "DateRangeWal", &PREFS->date_range_wal);
				homebank_pref_get_integer(keyfile, group, "DateRangeTxn", &PREFS->date_range_txn);
				homebank_pref_get_integer(keyfile, group, "DateFutureNbDays", &PREFS->date_future_nbdays);
				homebank_pref_get_integer(keyfile, group, "DateRangeRep", &PREFS->date_range_rep);

				if(version <= 7)
				{
					// shift date range >= 5, since we inserted a new one at position 5
					//if(PREFS->date_range_wal >= OLD56_FLT_RANGE_LASTYEAR)
					//	PREFS->date_range_wal++;
					if(PREFS->date_range_txn >= OLD56_FLT_RANGE_LASTYEAR)
						PREFS->date_range_txn++;
					if(PREFS->date_range_rep >= OLD56_FLT_RANGE_LASTYEAR)
						PREFS->date_range_rep++;
				}

			group = "API";

				DBKF( g_print(" -> ** API\n") );

				homebank_pref_get_string(keyfile, group, "APIRateUrl", &PREFS->api_rate_url);
				homebank_pref_get_string(keyfile, group, "APIRateKey", &PREFS->api_rate_key);

				//5.7.2 fix wrong host set as defaut in 5.7
				if(version < 572)
				{
					if( hb_string_ascii_compare("https://api.exchangerate.host", PREFS->api_rate_url) == 0 )
					{
						DBKF( g_print(" fix bad host in 5.7\n") );
						g_free(PREFS->api_rate_url);
						PREFS->api_rate_url = g_strdup("https://api.frankfurter.app/latest");
					}
				}

			group = "Euro";

				DBKF( g_print(" -> ** Euro\n") );

				//homebank_pref_get_string(keyfile, group, "DefCurrency" , &PREFS->curr_default);

				homebank_pref_get_boolean(keyfile, group, "Active", &PREFS->euro_active);
				homebank_pref_get_integer(keyfile, group, "Country", &PREFS->euro_country);

				//2066110
				PREFS->euro_mceii = euro_country_is_mceii(PREFS->euro_country);

				gchar *ratestr = g_key_file_get_string (keyfile, group, "ChangeRate", NULL);
				if(ratestr != NULL) PREFS->euro_value = g_ascii_strtod(ratestr, NULL);

				if(version <= 1)
				{
					homebank_pref_get_string(keyfile, group, "Symbol", &PREFS->minor_cur.symbol);
					PREFS->minor_cur.frac_digits = g_key_file_get_integer (keyfile, group, "NBDec", NULL);

					//PREFS->euro_nbdec = g_key_file_get_integer (keyfile, group, "NBDec", NULL);
					//PREFS->euro_thsep = g_key_file_get_boolean (keyfile, group, "Sep", NULL);
					//gchar *tmpstr = g_key_file_get_string  (keyfile, group, "Symbol", &error);
				}
				else
				{
					if(version < 460)
					{
					gchar *prefix = NULL;
					gchar *suffix = NULL;

						homebank_pref_get_string(keyfile, group, "PreSymbol", &prefix);
						homebank_pref_get_string(keyfile, group, "SufSymbol", &suffix);
						homebank_pref_currfmt_convert(&PREFS->minor_cur, prefix, suffix);
						g_free(prefix);
						g_free(suffix);
					}
					else
					{
						homebank_pref_get_string(keyfile, group, "Symbol", &PREFS->minor_cur.symbol);
						homebank_pref_get_boolean(keyfile, group, "IsPrefix", &PREFS->minor_cur.sym_prefix);
					}
					homebank_pref_get_string(keyfile, group, "DecChar"  , &PREFS->minor_cur.decimal_char);
					homebank_pref_get_string(keyfile, group, "GroupChar", &PREFS->minor_cur.grouping_char);
					homebank_pref_get_short(keyfile, group, "FracDigits", &PREFS->minor_cur.frac_digits);

					//fix 378992/421228
					if( PREFS->minor_cur.frac_digits > MAX_FRAC_DIGIT )
						PREFS->minor_cur.frac_digits = MAX_FRAC_DIGIT;

					da_cur_initformat(&PREFS->minor_cur);
				}

			//PREFS->euro_symbol = g_locale_to_utf8(tmpstr, -1, NULL, NULL, NULL);

			group = "Report";

				DBKF( g_print(" -> ** Report\n") );

				homebank_pref_get_boolean(keyfile, group, "StatByAmount", &PREFS->stat_byamount);
				homebank_pref_get_boolean(keyfile, group, "StatDetail", &PREFS->stat_showdetail);
				homebank_pref_get_boolean(keyfile, group, "StatRate", &PREFS->stat_showrate);
				homebank_pref_get_boolean(keyfile, group, "StatIncXfer", &PREFS->stat_includexfer);
				homebank_pref_get_boolean(keyfile, group, "BudgDetail", &PREFS->budg_showdetail);
				homebank_pref_get_boolean(keyfile, group, "BudgUnExclSub", &PREFS->budg_unexclsub);
				homebank_pref_get_integer(keyfile, group, "ColorScheme", &PREFS->report_color_scheme);
				homebank_pref_get_boolean(keyfile, group, "SmallFont", &PREFS->rep_smallfont);
				homebank_pref_get_integer(keyfile, group, "MaxSpendItems", &PREFS->rep_maxspenditems);

				homebank_pref_get_boolean(keyfile, group, "Forecast", &PREFS->rep_forcast);
				homebank_pref_get_integer(keyfile, group, "ForecastNbMonth", &PREFS->rep_forecat_nbmonth);

			group = "Exchange";

				DBKF( g_print(" -> ** Exchange\n") );

				homebank_pref_get_boolean(keyfile, group, "DoIntro", &PREFS->dtex_nointro);
				homebank_pref_get_boolean(keyfile, group, "UcFirst", &PREFS->dtex_ucfirst);
				homebank_pref_get_integer(keyfile, group, "DateFmt", &PREFS->dtex_datefmt);
				homebank_pref_get_integer(keyfile, group, "DayGap", &PREFS->dtex_daygap);
				homebank_pref_get_integer(keyfile, group, "OfxName", &PREFS->dtex_ofxname);
				homebank_pref_get_integer(keyfile, group, "OfxMemo", &PREFS->dtex_ofxmemo);
				homebank_pref_get_boolean(keyfile, group, "QifMemo", &PREFS->dtex_qifmemo);
				homebank_pref_get_boolean(keyfile, group, "QifSwap", &PREFS->dtex_qifswap);
				homebank_pref_get_integer(keyfile, group, "CsvSep", &PREFS->dtex_csvsep);
				homebank_pref_get_boolean(keyfile, group, "DoDefPayee", &PREFS->dtex_dodefpayee);
				homebank_pref_get_boolean(keyfile, group, "DoAutoAssign", &PREFS->dtex_doautoassign);

			//group = "Chart";
			//PREFS->chart_legend = g_key_file_get_boolean (keyfile, group, "Legend", NULL);

			/* file upgrade */
			if(version < 560)
			{
				DBKF( g_print(" ugrade 5.6 daterange\n") );
				//convert old daterange
				//PREFS->date_range_wal = homebank_pref_upgrade_560_daterange(PREFS->date_range_wal);	//top spending	
				PREFS->date_range_txn = homebank_pref_upgrade_560_daterange(PREFS->date_range_txn);	//transactions
				PREFS->date_range_rep = homebank_pref_upgrade_560_daterange(PREFS->date_range_rep);	//report options
			}


			/*
			#if MYDEBUG == 1
			gsize length;
			gchar *contents = g_key_file_to_data (keyfile, &length, NULL);
			//g_print(" keyfile:\n%s\n len=%d\n", contents, length);
			g_free(contents);
			#endif
			*/

		}
		g_free(filename);
		g_key_file_free (keyfile);

		_homebank_pref_init_measurement_units();
	}

	return retval;
}


static void homebank_pref_set_string(
	GKeyFile *key_file,
    const gchar *group_name,
    const gchar *key,
	gchar *string)
{

	DB( g_print(" - homebank_pref_set_string :: group='%s' key='%s' value='%s'\n", group_name, key, string) );

	if( string != NULL && *string != '\0')
		g_key_file_set_string  (key_file, group_name, key, string);
	else
		g_key_file_set_string  (key_file, group_name, key, "");

}


/*
** save preference to homedir/.homebank (HB_DATA_PATH)
*/
gboolean homebank_pref_save(void)
{
GKeyFile *keyfile;
gboolean retval = FALSE;
gchar *group, *filename;
gsize length;
GError *error = NULL;

	DB( g_print("\n[preferences] pref save\n") );

	keyfile = g_key_file_new();
	if(keyfile )
	{

		DBKF( g_print(" -> ** general\n") );


		group = "General";
		//g_key_file_set_integer  (keyfile, group, "Version", PREF_VERSION);
		//5.9.6 integer with 2 digit each
		g_key_file_set_integer  (keyfile, group, "Version", HB_VERSION_NUM);

		homebank_pref_set_string  (keyfile, group, "Language", PREFS->language);

		g_key_file_set_integer (keyfile, group, "BarStyle", PREFS->toolbar_style);
		//g_key_file_set_integer (keyfile, group, "BarImageSize", PREFS->image_size);

		g_key_file_set_boolean (keyfile, group, "GtkOverride", PREFS->gtk_override);
		g_key_file_set_integer (keyfile, group, "GtkFontSize", PREFS->gtk_fontsize);
		g_key_file_set_boolean (keyfile, group, "GtkDarkTheme", PREFS->gtk_darktheme);

		g_key_file_set_string (keyfile, group, "IconTheme", PREFS->icontheme);
		g_key_file_set_boolean (keyfile, group, "IconSymbolic", PREFS->icon_symbolic);

		g_key_file_set_boolean (keyfile, group, "CustomColors", PREFS->custom_colors);
		g_key_file_set_boolean (keyfile, group, "CustomBgFuture", PREFS->custom_bg_future);
		g_key_file_set_boolean (keyfile, group, "ColorUsePalette", PREFS->color_use_palette);
		g_key_file_set_string (keyfile, group, "ColorExp" , PREFS->color_exp);
		g_key_file_set_string (keyfile, group, "ColorInc" , PREFS->color_inc);
		g_key_file_set_string (keyfile, group, "ColorWarn", PREFS->color_warn);
		g_key_file_set_string (keyfile, group, "ColorBgFuture", PREFS->color_bg_future);

		g_key_file_set_integer (keyfile, group, "GridLines", PREFS->grid_lines);

		homebank_pref_set_string  (keyfile, group, "WalletPath"   , PREFS->path_hbfile);
		homebank_pref_set_string  (keyfile, group, "BackupPath"   , PREFS->path_hbbak);
		homebank_pref_set_string  (keyfile, group, "ImportPath"   , PREFS->path_import);
		homebank_pref_set_string  (keyfile, group, "ExportPath"   , PREFS->path_export);


		g_key_file_set_boolean (keyfile, group, "BakIsAutomatic", PREFS->bak_is_automatic);
		g_key_file_set_integer (keyfile, group, "BakMaxNumCopies", PREFS->bak_max_num_copies);

		g_key_file_set_boolean (keyfile, group, "ShowSplash", PREFS->showsplash);
		g_key_file_set_boolean (keyfile, group, "ShowWelcome", PREFS->showwelcome);
		g_key_file_set_boolean (keyfile, group, "LoadLast", PREFS->loadlast);
		g_key_file_set_boolean (keyfile, group, "AppendScheduled", PREFS->appendscheduled);
		g_key_file_set_boolean (keyfile, group, "UpdateCurrency", PREFS->do_update_currency);

		g_key_file_set_boolean (keyfile, group, "HeritDate", PREFS->heritdate);

		g_key_file_set_boolean (keyfile, group, "ShowConfirm", PREFS->txn_showconfirm);
		g_key_file_set_boolean (keyfile, group, "ShowTemplate", PREFS->txn_showtemplate);
		g_key_file_set_boolean (keyfile, group, "HideReconciled", PREFS->hidereconciled);
		g_key_file_set_boolean (keyfile, group, "ShowRemind", PREFS->showremind);
		g_key_file_set_boolean (keyfile, group, "ShowVoid", PREFS->showvoid);
		g_key_file_set_boolean (keyfile, group, "IncludeRemind", PREFS->includeremind);
		g_key_file_set_boolean (keyfile, group, "LockReconciled", PREFS->safe_lock_recon);
		g_key_file_set_boolean (keyfile, group, "SafePendRecon", PREFS->safe_pend_recon);
		g_key_file_set_boolean (keyfile, group, "SafePendPast", PREFS->safe_pend_past);
		g_key_file_set_integer (keyfile, group, "SafePendPastDays" , PREFS->safe_pend_past_days);

		g_key_file_set_boolean (keyfile, group, "TxnMemoAcp", PREFS->txn_memoacp);
		g_key_file_set_integer (keyfile, group, "TxnMemoAcpDays" , PREFS->txn_memoacp_days);
		
		g_key_file_set_boolean (keyfile, group, "TxnXferShowDialog", PREFS->xfer_showdialog);
		g_key_file_set_integer (keyfile, group, "TxnXferDayGap" , PREFS->xfer_daygap);
		g_key_file_set_boolean (keyfile, group, "TxnXferSyncDate", PREFS->xfer_syncdate);
		g_key_file_set_boolean (keyfile, group, "TxnXferSyncStatus", PREFS->xfer_syncstat);

		//ledger colums
		g_key_file_set_integer_list(keyfile, group, "ColumnsOpe", PREFS->lst_ope_columns, NUM_LST_DSPOPE);
		g_key_file_set_integer_list(keyfile, group, "ColumnsOpeWidth", PREFS->lst_ope_col_width, NUM_LST_DSPOPE);
		g_key_file_set_integer     (keyfile, group, "OpeSortId" , PREFS->lst_ope_sort_id);
		g_key_file_set_integer     (keyfile, group, "OpeSortOrder" , PREFS->lst_ope_sort_order);

		//detail colmuns
		g_key_file_set_integer_list(keyfile, group, "ColumnsDet", PREFS->lst_det_columns, NUM_LST_DSPOPE);
		g_key_file_set_integer_list(keyfile, group, "ColumnsDetWidth", PREFS->lst_det_col_width, NUM_LST_DSPOPE);

		g_key_file_set_integer     (keyfile, group, "FiscYearDay" , PREFS->fisc_year_day);
		g_key_file_set_integer     (keyfile, group, "FiscYearMonth" , PREFS->fisc_year_month);

		//5.8 payment, NUM_PAYMODE_KEY-1 because PAYMODE_OBSOLETEINTXFER
		g_key_file_set_integer_list(keyfile, group, "Payment", &PREFS->lst_paymode[1], NUM_PAYMODE_KEY-1);

		// added v3.4
		DBKF( g_print(" -> ** windows\n") );

		group = "Windows";
		g_key_file_set_integer_list(keyfile, group, "Wal", (gint *)&PREFS->wal_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Acc", (gint *)&PREFS->acc_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Sta", (gint *)&PREFS->sta_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Tme", (gint *)&PREFS->tme_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Ove", (gint *)&PREFS->ove_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Bud", (gint *)&PREFS->bud_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "Car", (gint *)&PREFS->cst_wg, 5);

		g_key_file_set_integer_list(keyfile, group, "Txn", (gint *)&PREFS->txn_wg, 5);
		g_key_file_set_integer_list(keyfile, group, "DBud", (gint *)&PREFS->dbud_wg, 5);

		g_key_file_set_integer (keyfile, group, "WalVPaned" , PREFS->wal_vpaned);
		g_key_file_set_integer (keyfile, group, "WalHPaned" , PREFS->wal_hpaned);
		g_key_file_set_boolean (keyfile, group, "WalToolbar", PREFS->wal_toolbar);
		g_key_file_set_boolean (keyfile, group, "WalTotalChart", PREFS->wal_totchart);
		g_key_file_set_boolean (keyfile, group, "WalTimeChart", PREFS->wal_timchart);
		g_key_file_set_boolean (keyfile, group, "WalUpcoming", PREFS->wal_upcoming);

		//since 5.1.3
		DBKF( g_print(" -> ** Panels\n") );

		group = "Panels";
		g_key_file_set_integer(keyfile, group, "AccColAccW", PREFS->pnl_acc_col_acc_width);
		g_key_file_set_integer(keyfile, group, "AccShowBy" , PREFS->pnl_acc_show_by);
		g_key_file_set_integer_list(keyfile, group, "AccColumns", PREFS->lst_acc_columns, NUM_LST_COL_DSPACC);

		//hub total/time
		g_key_file_set_integer(keyfile, group, "HubTotView" , PREFS->hub_tot_view);
		g_key_file_set_integer(keyfile, group, "HubTotViewRange" , PREFS->hub_tot_range);
		g_key_file_set_integer(keyfile, group, "HubTotRaw" , PREFS->hub_tot_raw);
		
		g_key_file_set_integer(keyfile, group, "HubTimView" , PREFS->hub_tim_view);
		g_key_file_set_integer(keyfile, group, "HubTimViewRange" , PREFS->hub_tim_range);
		g_key_file_set_integer(keyfile, group, "HubTimRaw" , PREFS->hub_tim_raw);

		//scheduled/upcoming
		g_key_file_set_integer_list(keyfile, group, "ColumnsSch", PREFS->lst_sch_columns, NUM_COL_SCH_UID);
		g_key_file_set_integer(keyfile, group, "UpcColPayV", PREFS->pnl_upc_col_pay_show);
		g_key_file_set_integer(keyfile, group, "UpcColCatV", PREFS->pnl_upc_col_cat_show);
		g_key_file_set_integer(keyfile, group, "UpcColMemV", PREFS->pnl_upc_col_mem_show);
		g_key_file_set_integer(keyfile, group, "UpcColPayW", PREFS->pnl_upc_col_pay_width);
		g_key_file_set_integer(keyfile, group, "UpcColCatW", PREFS->pnl_upc_col_cat_width);
		g_key_file_set_integer(keyfile, group, "UpcColMemW", PREFS->pnl_upc_col_mem_width);
		g_key_file_set_integer(keyfile, group, "UpcRange", PREFS->pnl_upc_range);

		homebank_pref_set_string  (keyfile, group, "PnlLstTab", PREFS->pnl_list_tab);

		DBKF( g_print(" -> ** format\n") );

		group = "Format";
		homebank_pref_set_string  (keyfile, group, "DateFmt"   , PREFS->date_format);

		//g_key_file_set_boolean (keyfile, group, "UKUnits" , PREFS->imperial_unit);
		g_key_file_set_boolean (keyfile, group, "UnitIsMile" , PREFS->vehicle_unit_ismile);
		g_key_file_set_boolean (keyfile, group, "UnitIsGal" , PREFS->vehicle_unit_isgal);


		DBKF( g_print(" -> ** filter\n") );

		group = "Filter";
		//g_key_file_set_integer (keyfile, group, "DateRangeWal", PREFS->date_range_wal);
		g_key_file_set_integer (keyfile, group, "DateRangeTxn", PREFS->date_range_txn);
		g_key_file_set_integer (keyfile, group, "DateFutureNbDays", PREFS->date_future_nbdays);
		g_key_file_set_integer (keyfile, group, "DateRangeRep", PREFS->date_range_rep);

		DBKF( g_print(" -> ** API\n") );

		group = "API";

		homebank_pref_set_string(keyfile, group, "APIRateUrl", PREFS->api_rate_url);
		homebank_pref_set_string(keyfile, group, "APIRateKey", PREFS->api_rate_key);


		DBKF( g_print(" -> ** euro\n") );

	//euro options
		group = "Euro";

		//homebank_pref_set_string(keyfile, group, "DefCurrency" , PREFS->curr_default);

		g_key_file_set_boolean (keyfile, group, "Active" , PREFS->euro_active);
		if( PREFS->euro_active )
		{
			g_key_file_set_integer (keyfile, group, "Country", PREFS->euro_country);
			gchar ratestr[64];
			g_ascii_dtostr(ratestr, 63, PREFS->euro_value);
			homebank_pref_set_string  (keyfile, group, "ChangeRate", ratestr);
			homebank_pref_set_string  (keyfile, group, "Symbol" , PREFS->minor_cur.symbol);
			g_key_file_set_boolean    (keyfile, group, "IsPrefix" , PREFS->minor_cur.sym_prefix);
			homebank_pref_set_string  (keyfile, group, "DecChar"   , PREFS->minor_cur.decimal_char);
			homebank_pref_set_string  (keyfile, group, "GroupChar" , PREFS->minor_cur.grouping_char);
			g_key_file_set_integer (keyfile, group, "FracDigits", PREFS->minor_cur.frac_digits);
		}

	//report options
		DBKF( g_print(" -> ** report\n") );

		group = "Report";
		g_key_file_set_boolean (keyfile, group, "StatByAmount" , PREFS->stat_byamount);
		g_key_file_set_boolean (keyfile, group, "StatDetail"   , PREFS->stat_showdetail);
		g_key_file_set_boolean (keyfile, group, "StatRate"     , PREFS->stat_showrate);
		g_key_file_set_boolean (keyfile, group, "StatIncXfer"  , PREFS->stat_includexfer);
		g_key_file_set_boolean (keyfile, group, "BudgDetail"   , PREFS->budg_showdetail);
		g_key_file_set_boolean (keyfile, group, "BudgUnExclSub", PREFS->budg_unexclsub);
		g_key_file_set_integer (keyfile, group, "ColorScheme"  , PREFS->report_color_scheme);
		g_key_file_set_boolean (keyfile, group, "SmallFont"    , PREFS->rep_smallfont);
		g_key_file_set_integer (keyfile, group, "MaxSpendItems", PREFS->rep_maxspenditems);

		g_key_file_set_boolean (keyfile, group, "Forecast"    , PREFS->rep_forcast);
		g_key_file_set_integer (keyfile, group, "ForecastNbMonth", PREFS->rep_forecat_nbmonth);


		group = "Exchange";
		g_key_file_set_boolean (keyfile, group, "DoIntro", PREFS->dtex_nointro);
		g_key_file_set_boolean (keyfile, group, "UcFirst", PREFS->dtex_ucfirst);
		g_key_file_set_integer (keyfile, group, "DateFmt", PREFS->dtex_datefmt);
		g_key_file_set_integer (keyfile, group, "DayGap", PREFS->dtex_daygap);
		g_key_file_set_integer (keyfile, group, "OfxName", PREFS->dtex_ofxname);
		g_key_file_set_integer (keyfile, group, "OfxMemo", PREFS->dtex_ofxmemo);
		g_key_file_set_boolean (keyfile, group, "QifMemo", PREFS->dtex_qifmemo);
		g_key_file_set_boolean (keyfile, group, "QifSwap", PREFS->dtex_qifswap);
		g_key_file_set_integer (keyfile, group, "CsvSep", PREFS->dtex_csvsep);
		g_key_file_set_boolean (keyfile, group, "DoDefPayee", PREFS->dtex_dodefpayee);
		g_key_file_set_boolean (keyfile, group, "DoAutoAssign", PREFS->dtex_doautoassign);

		//group = "Chart";
		//g_key_file_set_boolean (keyfile, group, "Legend", PREFS->chart_legend);

		//g_key_file_set_string  (keyfile, group, "", PREFS->);
		//g_key_file_set_boolean (keyfile, group, "", PREFS->);
		//g_key_file_set_integer (keyfile, group, "", PREFS->);

		DB( g_print(" -> ** g_key_file_to_data\n") );

		gchar *contents = g_key_file_to_data (keyfile, &length, NULL);

		//DB( g_print(" keyfile:\n%s\nlen=%d\n", contents, length) );

		filename = g_build_filename(homebank_app_get_config_dir(), "preferences", NULL );

		DB( g_print(" -> filename: %s\n", filename) );

		g_file_set_contents(filename, contents, length, &error);
		if( error )
		{
			g_warning("unable to save file %s: %s", filename, error->message);
			g_error_free (error);
			error = NULL;
		}
		
		DB( g_print(" -> contents: %s\n", contents) );

		DB( g_print(" -> freeing filename\n") );
		g_free(filename);

		DB( g_print(" -> freeing buffer\n") );

		g_free(contents);

		DB( g_print(" -> freeing keyfile\n") );

		g_key_file_free (keyfile);
	}

	_homebank_pref_init_measurement_units();

	return retval;
}

