X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fhomebank;a=blobdiff_plain;f=src%2Frep-vehicle.c;fp=src%2Frep-vehicle.c;h=e14981cc6589d596c54b4671bb2e213aa0967e14;hp=0000000000000000000000000000000000000000;hb=a6c6b0df5492c2160ed97e3a376bdb2fe7c5ebc4;hpb=cd13d9691c46c2b2d6d459e9e6a76bed1c21b7a6 diff --git a/src/rep-vehicle.c b/src/rep-vehicle.c new file mode 100644 index 0000000..e14981c --- /dev/null +++ b/src/rep-vehicle.c @@ -0,0 +1,1164 @@ +/* HomeBank -- Free, easy, personal accounting for everyone. + * Copyright (C) 1995-2019 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 . + */ + + +#include "homebank.h" + +#include "rep-vehicle.h" + +#include "list-operation.h" +#include "gtk-chart.h" +#include "gtk-dateentry.h" + +#include "dsp-mainwindow.h" +#include "ui-category.h" + + +/****************************************************************************/ +/* Debug macros */ +/****************************************************************************/ +#define MYDEBUG 0 + +#if MYDEBUG +#define DB(x) (x); +#else +#define DB(x); +#endif + +/* our global datas */ +extern struct HomeBank *GLOBALS; +extern struct Preferences *PREFS; + + +/* prototypes */ +static void repvehicle_action_refresh(GtkAction *action, gpointer user_data); +static void repvehicle_action_export(GtkAction *action, gpointer user_data); + +static void repvehicle_export_csv(GtkWidget *widget, gpointer user_data); +static void repvehicle_date_change(GtkWidget *widget, gpointer user_data); +static void repvehicle_range_change(GtkWidget *widget, gpointer user_data); +static void repvehicle_compute(GtkWidget *widget, gpointer user_data); +static void repvehicle_update(GtkWidget *widget, gpointer user_data); +static void repvehicle_toggle_minor(GtkWidget *widget, gpointer user_data); +static void repvehicle_setup(struct repvehicle_data *data); +static gboolean repvehicle_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data); +static GtkWidget *create_list_repvehicle(void); + + +static GtkActionEntry entries[] = { + { "Refresh" , ICONNAME_HB_REFRESH , N_("Refresh"), NULL, N_("Refresh results"), G_CALLBACK (repvehicle_action_refresh) }, + + { "Export" , ICONNAME_HB_FILE_EXPORT, N_("Export") , NULL, N_("Export as CSV"), G_CALLBACK (repvehicle_action_export) }, +}; +static guint n_entries = G_N_ELEMENTS (entries); + +static const gchar *ui_info = +"" +" " +" " +" " +" " +" " +""; + +static void repvehicle_date_change(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; + + DB( g_print("(repvehicle) date change\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + data->filter->mindate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_mindate)); + data->filter->maxdate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_maxdate)); + + // set min/max date for both widget + gtk_date_entry_set_maxdate(GTK_DATE_ENTRY(data->PO_mindate), data->filter->maxdate); + gtk_date_entry_set_mindate(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->mindate); + + g_signal_handler_block(data->CY_range, data->handler_id[HID_REPVEHICLE_RANGE]); + gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), 11); + g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPVEHICLE_RANGE]); + + + repvehicle_compute(widget, NULL); + +} + + +static void repvehicle_action_refresh(GtkAction *action, gpointer user_data) +{ +struct repvehicle_data *data = user_data; + + repvehicle_compute(data->window, NULL); +} + +static void repvehicle_action_export(GtkAction *action, gpointer user_data) +{ +struct repvehicle_data *data = user_data; + + repvehicle_export_csv(data->window, NULL); +} + + + +static void repvehicle_range_change(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; +gint range; + + DB( g_print("(repvehicle) range change\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + range = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_range)); + + if(range != 11) + { + filter_preset_daterange_set(data->filter, range, 0); + + g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]); + g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]); + + gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate); + gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate); + + g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]); + g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]); + + repvehicle_compute(widget, NULL); + } +} + +static gint repvehicle_transaction_compare_func(CarCost *a, CarCost *b) +{ +gint retval; + + //retval = (gint)(a->ope->date - b->ope->date); + //if( retval == 0 ) + retval = a->meter - b->meter; + + return retval; +} + + +//#1277622 +static CarCost *repvehicle_eval_memofield(CarCost *item, gchar *text) +{ +gchar *d, *v1, *v2; +gint len; + + if( text != NULL) + { + len = strlen(text); + d = g_strstr_len(text, len, "d="); + v1 = g_strstr_len(text, len, "v="); + v2 = g_strstr_len(text, len, "v~"); + if(d && (v1 || v2)) + { + item->meter = atol(d+2); + if(v1) + { + item->fuel = g_strtod(v1+2, NULL); + item->partial = FALSE; + } + else + { + item->fuel = g_strtod(v2+2, NULL); + item->partial = TRUE; + } + } + } + + return item; +} + + +static void repvehicle_export_csv(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; +GtkTreeModel *model; +GtkTreeIter iter; +gboolean valid; +gchar *filename = NULL; +GIOChannel *io; +gchar *outstr, *name; + + DB( g_print("\n[repvehicle] export csv\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + name = "hb-vehicle.csv"; + + if( ui_file_chooser_csv(GTK_WINDOW(data->window), GTK_FILE_CHOOSER_ACTION_SAVE, &filename, name) == TRUE ) + { + DB( g_print(" + filename is %s\n", filename) ); + + io = g_io_channel_new_file(filename, "w", NULL); + if(io != NULL) + { + // header + outstr = g_strdup_printf("%s;%s;%s;%s;%s;%s;%s;%s\n", + _("Date"), + _("Meter"), + _("Fuel"), + _("Price"), + _("Amount"), + _("Dist."), + PREFS->vehicle_unit_100, + PREFS->vehicle_unit_distbyvol + ); + g_io_channel_write_chars(io, outstr, -1, NULL, NULL); + + + model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report)); + valid = gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model), &iter); + while (valid) + { + guint32 julian; + gint meter, dist, distbyvol; + gdouble fuel, price, amount, centkm; + gboolean partial; + gchar datebuf[16]; + + gtk_tree_model_get (model, &iter, + LST_CAR_DATE , &julian, + LST_CAR_METER , &meter, + LST_CAR_FUEL , &fuel, + LST_CAR_PRICE , &price, + LST_CAR_AMOUNT , &amount, + LST_CAR_DIST , &dist, + LST_CAR_100KM , ¢km, + LST_CAR_DISTBYVOL, &distbyvol, + LST_CAR_PARTIAL, &partial, + -1); + + hb_sprint_date(datebuf, julian); + + outstr = g_strdup_printf("%s;%d;%.2f;%.2f;%.2f;%d;%.2f;%d;%d\n", + datebuf, meter, fuel, price, amount, dist, centkm, distbyvol, partial); + g_io_channel_write_chars(io, outstr, -1, NULL, NULL); + + DB( g_print("%s", outstr) ); + + g_free(outstr); + + valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(model), &iter); + } + + g_io_channel_unref (io); + } + + g_free( filename ); + } +} + + +static void repvehicle_compute(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; +GList *list; +guint32 catkey; + + DB( g_print("(repvehicle) compute\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + // clear the glist + da_vehiclecost_destroy(data->vehicle_list); + data->vehicle_list = NULL; + + // get the category key + catkey = ui_cat_comboboxentry_get_key(GTK_COMBO_BOX(data->PO_cat)); + + /* do nothing if cat is 0 */ + if( catkey == 0 ) + goto end1; + + DB( g_print(" -> active cat is %d\n", catkey) ); + + g_queue_free (data->txn_queue); + data->txn_queue = hbfile_transaction_get_partial(data->filter->mindate, data->filter->maxdate); + + // collect transactions + // the purpose here is to collect all cat transaction + // and precompute some datas + list = g_queue_peek_head_link(data->txn_queue); + while (list != NULL) + { + Transaction *ope = list->data; + Category *cat; + CarCost *item; + + // eval normal transaction + if(!(ope->flags & OF_SPLIT)) + { + cat = da_cat_get(ope->kcat); + if( cat && (cat->key == catkey || cat->parent == catkey) ) + { + item = da_vehiclecost_malloc(); + item->date = ope->date; + item->memo = ope->memo; + // get amount in base currency + //item->amount = ope->amount; + item->amount = hb_amount_base(ope->amount, ope->kcur); + + item = repvehicle_eval_memofield(item, ope->memo); + data->vehicle_list = g_list_append(data->vehicle_list, item); + DB( g_print(" -> store acc=%d '%s' %.2f\n", ope->kacc, ope->memo, ope->amount) ); + } + } + // eval split transaction + else + { + guint i, nbsplit = da_splits_length(ope->splits); + Split *split; + + DB( g_print(" -> nb split %d\n", nbsplit) ); + + for(i=0;isplits, i); + cat = da_cat_get(split->kcat); + + DB( g_print(" -> eval split '%s'\n", split->memo) ); + + if( cat && (cat->key == catkey || cat->parent == catkey) ) + { + item = da_vehiclecost_malloc(); + item->date = ope->date; + item->memo = split->memo; + // get amount in base currency + //item->amount = split->amount; + item->amount = hb_amount_base(split->amount, ope->kcur); + + item = repvehicle_eval_memofield(item, split->memo); + data->vehicle_list = g_list_append(data->vehicle_list, item); + DB( g_print(" -> store split part acc=%d '%s' %.2f\n", ope->kacc, split->memo, split->amount) ); + } + } + } + + list = g_list_next(list); + } + + // sort by meter #399170 + data->vehicle_list = g_list_sort(data->vehicle_list, (GCompareFunc)repvehicle_transaction_compare_func); + +end1: + repvehicle_update(widget, NULL); +} + + +static void repvehicle_update(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; +GtkTreeModel *model; +GtkTreeIter iter; +GList *list; +gchar *buf; +gint nb_refuel = 0; +guint lastmeter = 0; + + DB( g_print("(repvehicle) update\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + // clear and detach our model + model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report)); + gtk_list_store_clear (GTK_LIST_STORE(model)); + g_object_ref(model); + gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), NULL); + + data->total_misccost = 0; + data->total_fuelcost = 0; + data->total_fuel = 0; + data->total_dist = 0; + + gdouble partial_fuel = 0; + guint partial_dist = 0; + + + list = g_list_first(data->vehicle_list); + while (list != NULL) + { + CarCost *item = list->data; + gint dist; + gdouble centkm; + guint distbyvol; + gdouble trn_amount; + + if( (item->date >= data->filter->mindate) && (item->date <= data->filter->maxdate) ) + { + trn_amount = item->amount; + + if( item->meter == 0 ) + { + data->total_misccost += trn_amount; + } + else + { + if(nb_refuel > 0 ) + { + //previtem = g_list_nth_data(data->vehicle_list, nb_refuel-1); + //if(previtem != NULL) previtem->dist = item->meter - previtem->meter; + //DB( g_print(" + previous item dist = %d\n", item->meter - previtem->meter) ); + item->dist = item->meter - lastmeter; + + //DB( g_print(" + last meter = %d\n", lastmeter) ); + + } + + lastmeter = item->meter; + nb_refuel++; + + DB( g_print(" eval : d=%d v=%4.2f $%8.2f dist=%d\n", item->meter, item->fuel, trn_amount, item->dist) ); + + //bugfix #159066 + if(item->partial == FALSE) + { + // full refuel after partial + if(partial_fuel && partial_dist) + { + DB( g_print(" + full refuel after partial\n") ); + partial_fuel += item->fuel; + partial_dist += item->dist; + dist = item->dist; + centkm = partial_dist != 0 ? partial_fuel * 100 / partial_dist : 0; + } + else + { + DB( g_print(" + real full refuel\n") ); + dist = item->dist; + centkm = item->dist != 0 ? item->fuel * 100 / item->dist : 0; + } + partial_fuel = 0; + partial_dist = 0; + } + // partial refuel + else + { + DB( g_print(" + partial refuel\n") ); + partial_fuel += item->fuel; + partial_dist += item->dist; + dist = item->dist; + centkm = 0; + } + + distbyvol = 0; + if(centkm != 0) + distbyvol = hb_amount_round((1/centkm)*100, 0); + + DB( g_print(" + pf=%.2f pd=%d :: dbv=%d\n", partial_fuel, partial_dist, distbyvol) ); + + + + gtk_list_store_append (GTK_LIST_STORE(model), &iter); + + gtk_list_store_set (GTK_LIST_STORE(model), &iter, + LST_CAR_DATE , item->date, + LST_CAR_MEMO , item->memo, + LST_CAR_METER , item->meter, + LST_CAR_FUEL , item->fuel, + LST_CAR_PRICE , ABS(trn_amount) / item->fuel, + LST_CAR_AMOUNT , trn_amount, + LST_CAR_DIST , dist, + LST_CAR_100KM , centkm, + LST_CAR_DISTBYVOL, distbyvol, + LST_CAR_PARTIAL, item->partial, + -1); + + DB( g_print(" + insert d=%d v=%4.2f $%8.2f %d %5.2f\n", item->meter, item->fuel, trn_amount, dist, centkm) ); + + if(item->dist) + { + data->total_fuelcost += trn_amount; + data->total_fuel += item->fuel; + data->total_dist += item->dist; + } + + + } + } + list = g_list_next(list); + } + + gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model); + g_object_unref(model); + + + gdouble coef = data->total_dist ? 100 / (gdouble)data->total_dist : 0; + + GLOBALS->minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor)); + + + DB( g_print(" coef = 100 / %.2f = %.2f\n", (gdouble)data->total_dist, coef) ); + + // row 1 is for 100km + /* + gtk_label_set_text(GTK_LABEL(data->LA_total[1][1]), "1:1"); //Consumption + gtk_label_set_text(GTK_LABEL(data->LA_total[2][1]), "2:1"); //Fuel cost + gtk_label_set_text(GTK_LABEL(data->LA_total[3][1]), "3:1"); //Other cost + gtk_label_set_text(GTK_LABEL(data->LA_total[4][1]), "4:1"); //Total cost + */ + + // 100km fuel + buf = g_strdup_printf(PREFS->vehicle_unit_vol, data->total_fuel * coef); + gtk_label_set_text(GTK_LABEL(data->LA_avera[CAR_RES_FUEL]), buf); + g_free(buf); + + // 100km fuelcost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_FUELCOST]), data->total_fuelcost * coef, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_FUELCOST]), data->total_fuelcost * coef, GLOBALS->kcur, GLOBALS->minor); + + // 100km other cost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_OTHERCOST]), data->total_misccost * coef, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_OTHERCOST]), data->total_misccost * coef, GLOBALS->kcur, GLOBALS->minor); + + // 100km cost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_TOTALCOST]), (data->total_fuelcost + data->total_misccost) * coef, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_TOTALCOST]), (data->total_fuelcost + data->total_misccost) * coef, GLOBALS->kcur, GLOBALS->minor); + + + // row 2 is for total + /* + gtk_label_set_text(GTK_LABEL(data->LA_total[1][2]), "1:2"); //Consumption + gtk_label_set_text(GTK_LABEL(data->LA_total[2][2]), "2:2"); //Fuel cost + gtk_label_set_text(GTK_LABEL(data->LA_total[3][2]), "3:2"); //Other cost + gtk_label_set_text(GTK_LABEL(data->LA_total[4][2]), "4:2"); //Total + */ + + // total distance + buf = g_strdup_printf(PREFS->vehicle_unit_dist, data->total_dist); + gtk_label_set_text(GTK_LABEL(data->LA_total[CAR_RES_METER]), buf); + g_free(buf); + + // total fuel + buf = g_strdup_printf(PREFS->vehicle_unit_vol, data->total_fuel); + gtk_label_set_text(GTK_LABEL(data->LA_total[CAR_RES_FUEL]), buf); + g_free(buf); + + // total fuelcost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_FUELCOST]), data->total_fuelcost, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_FUELCOST]), data->total_fuelcost, GLOBALS->kcur, GLOBALS->minor); + + // total other cost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_OTHERCOST]), data->total_misccost, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_OTHERCOST]), data->total_misccost, GLOBALS->kcur, GLOBALS->minor); + + // total cost + //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_TOTALCOST]), data->total_fuelcost + data->total_misccost, GLOBALS->kcur); + hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_TOTALCOST]), data->total_fuelcost + data->total_misccost, GLOBALS->kcur, GLOBALS->minor); + + +} + +static void repvehicle_toggle_minor(GtkWidget *widget, gpointer user_data) +{ +struct repvehicle_data *data; + + DB( g_print("(repvehicle) toggle\n") ); + + data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); + + repvehicle_update(widget, NULL); + gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report)); + + + /* + statistic_update_total(widget,NULL); + + //hbfile_update(data->LV_acc, (gpointer)4); + gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report)); + + minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor)); + gtk_chart_show_minor(GTK_CHART(data->RE_bar), minor); + gtk_chart_show_minor(GTK_CHART(data->RE_pie), minor); + */ + +} + +/* +** +*/ +static void repvehicle_setup(struct repvehicle_data *data) +{ + DB( g_print("(repvehicle) setup\n") ); + + data->txn_queue = g_queue_new (); + data->vehicle_list = NULL; + + data->filter = da_flt_malloc(); + filter_reset(data->filter); + + /* 3.4 : make int transfer out of stats */ + data->filter->option[FILTER_PAYMODE] = 1; + data->filter->paymode[PAYMODE_INTXFER] = FALSE; + + filter_preset_daterange_set(data->filter, PREFS->date_range_rep, 0); + + g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]); + g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]); + + gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate); + gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate); + + g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]); + g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]); + + + ui_cat_comboboxentry_populate(GTK_COMBO_BOX(data->PO_cat), GLOBALS->h_cat); + + g_signal_handler_block(data->PO_cat, data->handler_id[HID_REPVEHICLE_VEHICLE]); + ui_cat_comboboxentry_set_active(GTK_COMBO_BOX(data->PO_cat), GLOBALS->vehicle_category); + g_signal_handler_unblock(data->PO_cat, data->handler_id[HID_REPVEHICLE_VEHICLE]); + + + +} + + +/* +** +*/ +static gboolean repvehicle_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data) +{ +struct repvehicle_data *data = user_data; +struct WinGeometry *wg; + + DB( g_print("(repvehicle) dispose\n") ); + + g_queue_free (data->txn_queue); + + da_vehiclecost_destroy(data->vehicle_list); + + da_flt_free(data->filter); + + g_free(data); + + //store position and size + wg = &PREFS->cst_wg; + gtk_window_get_position(GTK_WINDOW(widget), &wg->l, &wg->t); + gtk_window_get_size(GTK_WINDOW(widget), &wg->w, &wg->h); + + DB( g_print(" window: l=%d, t=%d, w=%d, h=%d\n", wg->l, wg->t, wg->w, wg->h) ); + + //enable define windows + GLOBALS->define_off--; + ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE)); + + return FALSE; +} + + +// the window creation +GtkWidget *repcost_window_new(void) +{ +struct repvehicle_data *data; +struct WinGeometry *wg; +GtkWidget *window, *mainvbox, *hbox, *vbox, *treeview; +GtkWidget *label, *widget, *table; +gint row, col; +GtkUIManager *ui; +GtkActionGroup *actions; +//GtkAction *action; +GError *error = NULL; + + data = g_malloc0(sizeof(struct repvehicle_data)); + if(!data) return NULL; + + DB( g_print("(repvehicle) new\n") ); + + //disable define windows + GLOBALS->define_off++; + ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE)); + + /* create window, etc */ + window = gtk_window_new (GTK_WINDOW_TOPLEVEL); + data->window = window; + + //store our window private data + g_object_set_data(G_OBJECT(window), "inst_data", (gpointer)data); + DB( g_print(" - new window=%p, inst_data=%p\n", window, data) ); + + gtk_window_set_title (GTK_WINDOW (window), _("Vehicle cost report")); + + //set the window icon + gtk_window_set_icon_name(GTK_WINDOW (window), ICONNAME_HB_REP_CAR); + + + + //window contents + mainvbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0); + gtk_container_add (GTK_CONTAINER (window), mainvbox); + + hbox = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 0); + gtk_box_pack_start (GTK_BOX (mainvbox), hbox, TRUE, TRUE, 0); + + //control part + table = gtk_grid_new (); + gtk_widget_set_hexpand (GTK_WIDGET(table), FALSE); + gtk_box_pack_start (GTK_BOX (hbox), table, FALSE, FALSE, 0); + + gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL); + gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL); + gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM); + + row = 0; + label = make_label_group(_("Display")); + gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1); + + row++; + label = make_label_widget(_("Vehi_cle:")); + gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); + + widget = ui_cat_comboboxentry_new(label); + data->PO_cat = widget; + gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1); + + row++; + widget = gtk_check_button_new_with_mnemonic (_("Euro _minor")); + data->CM_minor = widget; + gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1); + + row++; + widget = gtk_separator_new(GTK_ORIENTATION_HORIZONTAL); + gtk_grid_attach (GTK_GRID (table), widget, 0, row, 3, 1); + + row++; + label = make_label_group(_("Date filter")); + gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1); + + row++; + label = make_label_widget(_("_Range:")); + gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); + data->CY_range = make_daterange(label, FALSE); + gtk_grid_attach (GTK_GRID (table), data->CY_range, 2, row, 1, 1); + + row++; + label = make_label_widget(_("_From:")); + gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); + data->PO_mindate = gtk_date_entry_new(); + gtk_grid_attach (GTK_GRID (table), data->PO_mindate, 2, row, 1, 1); + + row++; + label = make_label_widget(_("_To:")); + gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); + data->PO_maxdate = gtk_date_entry_new(); + gtk_grid_attach (GTK_GRID (table), data->PO_maxdate, 2, row, 1, 1); + + + //part: info + report + vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0); + gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, TRUE, 0); + + //ui manager + actions = gtk_action_group_new ("default"); + + //as we use gettext + gtk_action_group_set_translation_domain(actions, GETTEXT_PACKAGE); + + // data to action callbacks is set here (data) + gtk_action_group_add_actions (actions, entries, n_entries, data); + + /* set which action should have priority in the toolbar */ + //action = gtk_action_group_get_action(actions, "Refresh"); + //g_object_set(action, "is_important", TRUE, NULL); + + + ui = gtk_ui_manager_new (); + gtk_ui_manager_insert_action_group (ui, actions, 0); + gtk_window_add_accel_group (GTK_WINDOW (window), gtk_ui_manager_get_accel_group (ui)); + + if (!gtk_ui_manager_add_ui_from_string (ui, ui_info, -1, &error)) + { + g_message ("building UI failed: %s", error->message); + g_error_free (error); + } + + data->ui = ui; + data->actions = actions; + + //toolbar + data->TB_bar = gtk_ui_manager_get_widget (ui, "/ToolBar"); + gtk_box_pack_start (GTK_BOX (vbox), data->TB_bar, FALSE, FALSE, 0); + + + // total + table = gtk_grid_new (); + gtk_widget_set_hexpand (GTK_WIDGET(table), FALSE); + gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0); + + gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL); + gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL); + gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM); + + row = 0; col = 1; + + label = make_label_widget(_("Meter:")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + col++; + label = make_label_widget(_("Consumption:")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + col++; + label = make_label_widget(_("Fuel cost:")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + col++; + label = make_label_widget(_("Other cost:")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + col++; + label = make_label_widget(_("Total cost:")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + row++; + col = 0; + label = make_label_widget(PREFS->vehicle_unit_100); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + for(col = 1;colLA_avera[col] = label; + } + + row++; + col = 0; + label = make_label_widget(_("Total")); + gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1); + + for(col = 1;colLA_total[col] = label; + } + + + //detail + widget = gtk_scrolled_window_new (NULL, NULL); + gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget), GTK_SHADOW_ETCHED_IN); + gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); + + treeview = create_list_repvehicle(); + data->LV_report = treeview; + gtk_container_add (GTK_CONTAINER(widget), treeview); + gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0); + + + //todo:should move this + gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_minor),GLOBALS->minor); + + + + /* attach our minor to treeview */ + g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report))), "minor", (gpointer)data->CM_minor); + + + + /* signal connect */ + g_signal_connect (window, "delete-event", G_CALLBACK (repvehicle_window_dispose), (gpointer)data); + + g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (repvehicle_toggle_minor), NULL); + + data->handler_id[HID_REPVEHICLE_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (repvehicle_date_change), (gpointer)data); + data->handler_id[HID_REPVEHICLE_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (repvehicle_date_change), (gpointer)data); + + data->handler_id[HID_REPVEHICLE_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (repvehicle_range_change), NULL); + + data->handler_id[HID_REPVEHICLE_VEHICLE] = g_signal_connect (data->PO_cat, "changed", G_CALLBACK (repvehicle_compute), NULL); + + + //setup, init and show window + repvehicle_setup(data); + + /* toolbar */ + /* + if(PREFS->toolbar_style == 0) + gtk_toolbar_unset_style(GTK_TOOLBAR(data->TB_bar)); + else + gtk_toolbar_set_style(GTK_TOOLBAR(data->TB_bar), PREFS->toolbar_style-1); + */ + + //setup, init and show window + wg = &PREFS->cst_wg; + gtk_window_move(GTK_WINDOW(window), wg->l, wg->t); + gtk_window_resize(GTK_WINDOW(window), wg->w, wg->h); + + gtk_widget_show_all (window); + + //minor ? + if( PREFS->euro_active ) + gtk_widget_show(data->CM_minor); + else + gtk_widget_hide(data->CM_minor); + + + + if( PREFS->date_range_rep ) + gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep); + else + repvehicle_compute(window, NULL); + + return(window); +} + +/* +** ============================================================================ +*/ + +static void repvehicle_date_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data) +{ +GDate *date; +guint32 julian; +gchar buf[256]; + + gtk_tree_model_get(model, iter, + LST_CAR_DATE, &julian, + -1); + + date = g_date_new_julian (julian); + g_date_strftime (buf, 256-1, PREFS->date_format, date); + g_date_free(date); + + g_object_set(renderer, "text", buf, NULL); +} + +static void repvehicle_distance_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data) +{ +guint distance; +gchar *text; + + gtk_tree_model_get(model, iter, user_data, &distance, -1); + + if(distance != 0) + { + text = g_strdup_printf(PREFS->vehicle_unit_dist, distance); + g_object_set(renderer, "text", text, NULL); + g_free(text); + } + else + g_object_set(renderer, "text", "-", NULL); +} + +static void repvehicle_volume_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data) +{ +gdouble volume; +gboolean partial; +gchar *text; + + gtk_tree_model_get(model, iter, user_data, &volume, LST_CAR_PARTIAL, &partial, -1); + + if(volume != 0) + { + text = g_strdup_printf(PREFS->vehicle_unit_vol, volume); + g_object_set(renderer, + "text", text, + "style-set", TRUE, + "style", partial ? PANGO_STYLE_ITALIC : PANGO_STYLE_NORMAL, + NULL); + + g_free(text); + } + else + g_object_set(renderer, "text", "-", NULL); +} + +static void repvehicle_amount_cell_data_function (GtkTreeViewColumn *col, + GtkCellRenderer *renderer, + GtkTreeModel *model, + GtkTreeIter *iter, + gpointer user_data) +{ +gdouble value; +gchar *color; +gchar buf[G_ASCII_DTOSTR_BUF_SIZE]; + + gtk_tree_model_get(model, iter, + user_data, &value, + -1); + + if( value ) + { + hb_strfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->kcur, GLOBALS->minor); + + color = get_normal_color_amount(value); + + g_object_set(renderer, + "foreground", color, + "text", buf, + NULL); } + else + { + g_object_set(renderer, "text", "", NULL); + } +} + +static GtkTreeViewColumn *volume_list_repvehicle_column(gchar *name, gint id) +{ +GtkTreeViewColumn *column; +GtkCellRenderer *renderer; + + column = gtk_tree_view_column_new(); + gtk_tree_view_column_set_title(column, name); + renderer = gtk_cell_renderer_text_new (); + g_object_set(renderer, "xalign", 1.0, NULL); + gtk_tree_view_column_pack_start(column, renderer, TRUE); + gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_volume_cell_data_function, GINT_TO_POINTER(id), NULL); + gtk_tree_view_column_set_alignment (column, 0.5); + //gtk_tree_view_column_set_sort_column_id (column, id); + return column; +} + +static GtkTreeViewColumn *distance_list_repvehicle_column(gchar *name, gint id) +{ +GtkTreeViewColumn *column; +GtkCellRenderer *renderer; + + column = gtk_tree_view_column_new(); + gtk_tree_view_column_set_title(column, name); + renderer = gtk_cell_renderer_text_new (); + g_object_set(renderer, "xalign", 1.0, NULL); + gtk_tree_view_column_pack_start(column, renderer, TRUE); + gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_distance_cell_data_function, GINT_TO_POINTER(id), NULL); + gtk_tree_view_column_set_alignment (column, 0.5); + //gtk_tree_view_column_set_sort_column_id (column, id); + return column; +} + +static GtkTreeViewColumn *amount_list_repvehicle_column(gchar *name, gint id) +{ +GtkTreeViewColumn *column; +GtkCellRenderer *renderer; + + column = gtk_tree_view_column_new(); + gtk_tree_view_column_set_title(column, name); + renderer = gtk_cell_renderer_text_new (); + g_object_set(renderer, "xalign", 1.0, NULL); + gtk_tree_view_column_pack_start(column, renderer, TRUE); + gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_amount_cell_data_function, GINT_TO_POINTER(id), NULL); + gtk_tree_view_column_set_alignment (column, 0.5); + //gtk_tree_view_column_set_sort_column_id (column, id); + return column; +} + + +/* +** create our statistic list +*/ +static GtkWidget *create_list_repvehicle(void) +{ +GtkListStore *store; +GtkWidget *view; +GtkCellRenderer *renderer; +GtkTreeViewColumn *column; + + /* create list store */ + store = gtk_list_store_new( + NUM_LST_CAR, + G_TYPE_UINT, + G_TYPE_STRING, + G_TYPE_UINT, + G_TYPE_DOUBLE, + G_TYPE_DOUBLE, + G_TYPE_DOUBLE, + G_TYPE_UINT, + G_TYPE_DOUBLE, + G_TYPE_UINT, + G_TYPE_BOOLEAN ); + + //treeview + view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store)); + g_object_unref(store); + + gtk_tree_view_set_grid_lines (GTK_TREE_VIEW (view), PREFS->grid_lines); + + /* column date */ + column = gtk_tree_view_column_new(); + gtk_tree_view_column_set_title(column, _("Date")); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + renderer = gtk_cell_renderer_text_new(); + g_object_set(renderer, "xalign", 1.0, NULL); + gtk_tree_view_column_pack_start(column, renderer, TRUE); + //gtk_tree_view_column_add_attribute(column, renderer, "text", LST_CAR_DATE); + gtk_tree_view_column_set_alignment (column, 0.5); + gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_date_cell_data_function, NULL, NULL); + +/* + LST_CAR_DATE, + LST_CAR_MEMO, + LST_CAR_METER, + LST_CAR_FUEL, + LST_CAR_PRICE, + LST_CAR_AMOUNT, + LST_CAR_DIST, + LST_CAR_100KM + +*/ + + /* column: Memo */ +/* + column = gtk_tree_view_column_new(); + gtk_tree_view_column_set_title(column, _("Memo")); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + renderer = gtk_cell_renderer_text_new(); + gtk_tree_view_column_pack_start(column, renderer, TRUE); + gtk_tree_view_column_add_attribute(column, renderer, "text", LST_CAR_MEMO); + //gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_text_cell_data_function, NULL, NULL); +*/ + + /* column: Meter */ + column = distance_list_repvehicle_column(_("Meter"), LST_CAR_METER); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: Fuel load */ + column = volume_list_repvehicle_column(_("Fuel"), LST_CAR_FUEL); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: Price by unit */ + column = amount_list_repvehicle_column(_("Price"), LST_CAR_PRICE); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: Amount */ + column = amount_list_repvehicle_column(_("Amount"), LST_CAR_AMOUNT); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: Distance done */ + column = distance_list_repvehicle_column(_("Dist."), LST_CAR_DIST); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: consumption for 100Km */ + column = volume_list_repvehicle_column(PREFS->vehicle_unit_100, LST_CAR_100KM); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + /* column: km by liter (distance by volume */ + column = distance_list_repvehicle_column(PREFS->vehicle_unit_distbyvol, LST_CAR_DISTBYVOL); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + + /* column last: empty */ + column = gtk_tree_view_column_new(); + gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); + + return(view); +}