/********************************************************************\ * top-level.c -- Gnome GUI main for GnuCash * * Copyright (C) 1997 Robin D. Clark * * Copyright (C) 1998-2000 Linas Vepstas * * * * This program 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. * * * * This program 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, contact: * * * * Free Software Foundation Voice: +1-617-542-5942 * * 51 Franklin Street, Fifth Floor Fax: +1-617-542-2652 * * Boston, MA 02110-1301, USA gnu@gnu.org * * * \********************************************************************/ #include #include #include #include #include "TransLog.h" #include "business-options-gnome.h" #include "business-urls.h" #include "combocell.h" #include "dialog-account.h" #include "dialog-doclink.h" #include "dialog-commodity.h" #include "dialog-invoice.h" #include "dialog-preferences.h" #include "dialog-sx-editor.h" #include "dialog-transfer.h" #include "dialog-totd.h" #include "assistant-hierarchy.h" #include "file-utils.h" #include "gnc-component-manager.h" #include "gnc-engine.h" #include "gnc-file.h" #include "gnc-hooks.h" #include "gncInvoice.h" #include "gfec.h" #include "gnc-main-window.h" #include "gnc-menu-extensions.h" #include "gnc-plugin-menu-additions.h" /* FIXME Remove this line*/ #include "gnc-plugin-account-tree.h" /* FIXME Remove this line*/ #include "gnc-plugin-basic-commands.h" /* FIXME Remove this line*/ #include "gnc-plugin-file-history.h" /* FIXME Remove this line*/ #include "gnc-plugin-register.h" /* FIXME Remove this line*/ #include "gnc-plugin-budget.h" #include "gnc-plugin-business.h" #include "gnc-plugin-page-register.h" #include "gnc-plugin-manager.h" /* FIXME Remove this line*/ #include "gnc-html.h" #include "gnc-gnome-utils.h" #include "gnc-report.h" #include "gnc-split-reg.h" #include "gnc-state.h" #include "gnc-ui.h" #include "gnc-ui-util.h" #include "gnucash-color.h" #include "gnucash-sheet.h" #include "gnucash-style.h" #include "search-core-type.h" #include "search-owner.h" #include "top-level.h" #include "window-report.h" #include "gnc-window.h" #include "gnc-gkeyfile-utils.h" /** GLOBALS *********************************************************/ /* This static indicates the debugging module that this .o belongs to. */ static QofLogModule log_module = GNC_MOD_GUI; /* ============================================================== */ /* HTML Handler for reports. */ static gboolean validate_type(const char *url_type, const char *location, const char *entity_type, GNCURLResult *result, GncGUID *guid, QofInstance **entity) { QofCollection *col; QofBook * book = gnc_get_current_book(); if (!string_to_guid (location + strlen(url_type), guid)) { result->error_message = g_strdup_printf (_("Bad URL: %s"), location); return FALSE; } col = qof_book_get_collection (book, entity_type); *entity = qof_collection_lookup_entity (col, guid); if (NULL == *entity) { result->error_message = g_strdup_printf (_("Entity Not Found: %s"), location); return FALSE; } return TRUE; } static gboolean gnc_html_register_url_cb (const char *location, const char *label, gboolean new_window, GNCURLResult *result) { GncPluginPage *page = NULL; GNCSplitReg * gsr = NULL; Split * split = NULL; Account * account = NULL; Transaction * trans; GncInvoice * invoice; GList * node; GncGUID guid; QofInstance * entity = NULL; g_return_val_if_fail (location != NULL, FALSE); g_return_val_if_fail (result != NULL, FALSE); result->load_to_stream = FALSE; /* href="gnc-register:account=My Bank Account" */ if (strncmp("account=", location, 8) == 0) { account = gnc_account_lookup_by_full_name (gnc_get_current_root_account (), location + 8); } /* href="gnc-register:guid=12345678901234567890123456789012" */ else if (strncmp ("acct-guid=", location, strlen ("acct-guid=")) == 0) { if (!validate_type("acct-guid=", location, GNC_ID_ACCOUNT, result, &guid, &entity)) return FALSE; account = GNC_ACCOUNT(entity); } else if (strncmp ("trans-guid=", location, strlen ("trans-guid=")) == 0) { if (!validate_type("trans-guid=", location, GNC_ID_TRANS, result, &guid, &entity)) return FALSE; trans = (Transaction *) entity; for (node = xaccTransGetSplitList (trans); node; node = node->next) { split = node->data; account = xaccSplitGetAccount(split); if (account) break; } if (!account) { result->error_message = g_strdup_printf (_("Transaction with no Accounts: %s"), location); return FALSE; } } else if (strncmp ("trans-doclink-guid=", location, strlen ("trans-doclink-guid=")) == 0) { if (!validate_type("trans-doclink-guid=", location, GNC_ID_TRANS, result, &guid, &entity)) return FALSE; trans = (Transaction *) entity; gnc_doclink_open_uri (gnc_ui_get_gtk_window (GTK_WIDGET (result->parent)), xaccTransGetDocLink (trans)); return TRUE; } else if (strncmp ("invoice-doclink-guid=", location, strlen ("invoice-doclink-guid=")) == 0) { if (!validate_type("invoice-doclink-guid=", location, GNC_ID_INVOICE, result, &guid, &entity)) return FALSE; invoice = (GncInvoice *) entity; gnc_doclink_open_uri (gnc_ui_get_gtk_window (GTK_WIDGET (result->parent)), gncInvoiceGetDocLink (invoice)); return TRUE; } else if (strncmp ("split-guid=", location, strlen ("split-guid=")) == 0) { if (!validate_type("split-guid=", location, GNC_ID_SPLIT, result, &guid, &entity)) return FALSE; split = (Split *) entity; account = xaccSplitGetAccount(split); } else { result->error_message = g_strdup_printf (_("Unsupported entity type: %s"), location); return FALSE; } page = gnc_plugin_page_register_new (account, FALSE); gnc_main_window_open_page (GNC_MAIN_WINDOW (result->parent), page); if (split) { gsr = gnc_plugin_page_register_get_gsr (page); /* Test for visibility of split */ if (gnc_split_reg_clear_filter_for_split (gsr, split)) gnc_plugin_page_register_clear_current_filter (page); gnc_split_reg_jump_to_split (gsr, split); } return TRUE; } /* ============================================================== */ static gboolean gnc_html_price_url_cb (const char *location, const char *label, gboolean new_window, GNCURLResult *result) { GncGUID guid; QofInstance * entity = NULL; g_return_val_if_fail (location != NULL, FALSE); g_return_val_if_fail (result != NULL, FALSE); result->load_to_stream = FALSE; /* href="gnc-register:guid=12345678901234567890123456789012" */ if (strncmp ("price-guid=", location, strlen ("price-guid=")) == 0) { if (!validate_type("price-guid=", location, GNC_ID_PRICE, result, &guid, &entity)) return FALSE; if (!gnc_price_edit_by_guid (GTK_WIDGET (result->parent), &guid)) { result->error_message = g_strdup_printf (_("No such price: %s"), location); return FALSE; } } else { result->error_message = g_strdup_printf (_("Badly formed URL %s"), location); return FALSE; } return TRUE; } /** Restore all persistent program state. This function finds the * "new" state file associated with the current session. It then * iterates through this state information, calling a helper function * to recreate each open window. * * @note The name of the state file is based on the name of the data * file, not the path name of the data file. If there are multiple * data files with the same name, the state files will be suffixed * with a number. E.G. test_account, test_account_2, test_account_3, * etc. * * @param session A pointer to the current session. * * @param unused An unused pointer. */ static void gnc_restore_all_state (gpointer session, gpointer unused) { GKeyFile *keyfile = NULL; gchar *file_guid = NULL; GError *error = NULL; keyfile = gnc_state_load (session); #ifdef DEBUG /* Debugging: dump a copy to the trace log */ { gchar *file_data; gsize file_length; file_data = g_key_file_to_data(keyfile, &file_length, NULL); DEBUG("=== File Data Read===\n%s\n=== File End ===\n", file_data); g_free(file_data); } #endif /* If no state file was found, keyfile will be empty * In that case, let's load the default state */ if (!g_key_file_has_group (keyfile, STATE_FILE_TOP)) { gnc_main_window_restore_default_state(NULL); LEAVE("no state file"); goto cleanup; } /* report any other keyfile read error as a warning * but still load default state */ file_guid = g_key_file_get_string(keyfile, STATE_FILE_TOP, STATE_FILE_BOOK_GUID, &error); if (error) { gnc_main_window_restore_default_state(NULL); g_warning("error reading group %s key %s: %s", STATE_FILE_TOP, STATE_FILE_BOOK_GUID, error->message); LEAVE("no guid in state file"); goto cleanup; } gnc_main_window_restore_all_windows(keyfile); /* Clean up */ LEAVE("ok"); cleanup: if (error) g_error_free(error); if (file_guid) g_free(file_guid); gnc_totd_dialog_reparent (); } /** Save all persistent program state to disk. This function finds the * name of the "new" state file associated with a specific book guid. * It saves some top level data, then iterates through the list of * open windows calling a helper function to save each window. * * @note The name of the state file is based on the name of the data * file, not the path name of the data file. If there are multiple * data files with the same name, the state files will be suffixed * with a number. E.G. test_account, test_account_2, test_account_3, * etc. * * @param session The QofSession whose state should be saved. * * @param unused */ static void gnc_save_all_state (gpointer session, gpointer unused) { QofBook *book; gchar guid_string[GUID_ENCODING_LENGTH+1]; const GncGUID *guid; GKeyFile *keyfile = NULL; keyfile = gnc_state_get_current (); if (keyfile) { /* Remove existing Window and Page groups from the keyfile * They will be regenerated. */ gsize num_groups, curr; gchar **groups = g_key_file_get_groups (keyfile, &num_groups); for (curr=0; curr < num_groups; curr++) { if (g_str_has_prefix (groups[curr], "Window ") || g_str_has_prefix (groups[curr], "Page ")) { DEBUG ("Removing state group %s", groups[curr]); g_key_file_remove_group (keyfile, groups[curr], NULL); } } g_strfreev (groups); } /* Store the book's GncGUID in the top level group */ book = qof_session_get_book(session); if (!book) { PERR("Session has no book!"); return; } guid = qof_entity_get_guid(QOF_INSTANCE(book)); guid_to_string_buff(guid, guid_string); g_key_file_set_string(keyfile, STATE_FILE_TOP, STATE_FILE_BOOK_GUID, guid_string); gnc_main_window_save_all_windows(keyfile); #ifdef DEBUG /* Debugging: dump a copy to the trace log */ { gchar *file_data; gsize file_length; file_data = g_key_file_to_data(keyfile, &file_length, NULL); DEBUG("=== File Data Written===\n%s\n=== File End ===\n", file_data); g_free(file_data); } #endif LEAVE(""); } void gnc_main_gui_init (void) { ENTER(" "); if (!gnucash_style_init()) gnc_shutdown(1); gnucash_color_init(); gnc_html_register_url_handler (URL_TYPE_REGISTER, gnc_html_register_url_cb); gnc_html_register_url_handler (URL_TYPE_PRICE, gnc_html_price_url_cb); /* Register the Owner search type */ gnc_search_core_register_type (GNC_OWNER_MODULE_NAME, (GNCSearchCoreNew) gnc_search_owner_new); gnc_business_urls_initialize (); gnc_business_options_gnome_initialize (); /* FIXME Remove this test code */ gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_account_tree_new ()); gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_basic_commands_new ()); gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_file_history_new ()); gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_menu_additions_new ()); gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_register_new ()); gnc_plugin_manager_add_plugin ( gnc_plugin_manager_get (), gnc_plugin_business_new ()); /* I'm not sure why the FIXME note says to remove this. Maybe each module should be adding its own plugin to the manager? Anyway... Oh, maybe... nah */ gnc_plugin_manager_add_plugin (gnc_plugin_manager_get (), gnc_plugin_budget_new ()); gnc_ui_hierarchy_assistant_initialize(); /* Run the ui startup hooks. */ gnc_hook_run(HOOK_UI_STARTUP, NULL); gnc_hook_add_dangler(HOOK_BOOK_OPENED, gnc_restore_all_state, NULL, NULL); gnc_hook_add_dangler(HOOK_BOOK_CLOSED, gnc_save_all_state, NULL, NULL); gnc_hook_add_dangler(HOOK_BOOK_CLOSED, (GFunc)gnc_reports_flush_global, NULL, NULL); gnc_hook_add_dangler(HOOK_BOOK_OPENED, (GFunc)gnc_invoice_remind_bills_due_cb, NULL, NULL); gnc_hook_add_dangler(HOOK_BOOK_OPENED, (GFunc)gnc_invoice_remind_invoices_due_cb, NULL, NULL); gnc_ui_sx_initialize(); /* Add to preferences under Business */ /* The parameters are; glade file, items to add from glade file - last being the dialog, preference tab name */ gnc_preferences_add_page("business-prefs.glade", "liststore_printinvoice,days_in_adj,cust_days_in_adj,business_prefs", _("Business")); LEAVE(" "); return; } /****************** END OF FILE **********************/