/******************************************************************** * test_submodule.c: Example GLib g_test test suite. * * Copyright 2011 John Ralls * * * * 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 // for the gnc_ab_get_book_template_list() et al. functions #include "gnc-ab-kvp.h" #include #include #include "gnc-hooks.h" void test_qofsession_aqb_kvp (void); static char* get_filepath(const char* filename) { char *result; const char *srcdir = g_getenv("SRCDIR"); if (!srcdir) { g_test_message("No env variable SRCDIR exists, assuming \".\"\n"); srcdir = "."; } result = g_strdup_printf("%s/%s", srcdir, filename); g_test_message("Using file path %s\n", result); // Test whether the file really exists g_assert(g_file_test(result, G_FILE_TEST_EXISTS)); return result; } void test_qofsession_aqb_kvp( void ) { /* load the accounts from the users datafile */ /* but first, check to make sure we've got a session going. */ QofBackendError io_err; char *file1 = get_filepath("file-book.gnucash"); char *file2 = get_filepath("file-book-hbcislot.gnucash"); if (1) { // A file with no content at all, but a valid XML file QofBook *book = qof_book_new(); QofSession *new_session = qof_session_new (book); char *newfile = g_strdup_printf("file://%s", file1); qof_session_begin (new_session, newfile, SESSION_READ_ONLY); io_err = qof_session_get_error (new_session); //printf("io_err1 = %d\n", io_err); g_assert(io_err != ERR_BACKEND_NO_HANDLER); // Do not have no handler g_assert(io_err != ERR_BACKEND_NO_SUCH_DB); // DB must exist g_assert(io_err != ERR_BACKEND_LOCKED); g_assert(io_err == 0); qof_session_load (new_session, NULL); io_err = qof_session_get_error (new_session); //printf("io_err2 = %d\n", io_err); g_assert(io_err == 0); g_free(newfile); g_free(file1); gnc_hook_run(HOOK_BOOK_CLOSED, new_session); //qof_session_destroy(new_session); // tries to delete the LCK file but it wasn't created in the first place } if (1) { // A file with no content except for the book_template_list kvp // slot QofBook *book = qof_book_new(); QofSession *new_session = qof_session_new (book); char *newfile = g_strdup_printf("file://%s", file2); qof_session_begin (new_session, newfile, SESSION_READ_ONLY); io_err = qof_session_get_error (new_session); //printf("io_err1 = %d\n", io_err); g_assert(io_err != ERR_BACKEND_NO_HANDLER); // Do not have no handler g_assert(io_err != ERR_BACKEND_NO_SUCH_DB); // DB must exist g_assert(io_err != ERR_BACKEND_LOCKED); g_assert(io_err == 0); qof_session_load (new_session, NULL); io_err = qof_session_get_error (new_session); //printf("io_err2 = %d\n", io_err); g_assert(io_err == 0); { GList *templ_list; GncABTransTempl *templ; QofBook *book = qof_session_get_book(new_session); const char* ORIGINAL_NAME = "Some Name"; const char* CHANGED_NAME = "Some Changed Name"; templ_list = gnc_ab_trans_templ_list_new_from_book (book); g_assert_cmpint(g_list_length(templ_list), ==, 1); templ = templ_list->data; //Raise the edit level so that we can check that it's marked dirty. qof_instance_increase_editlevel(QOF_INSTANCE(book)); g_assert_cmpstr(gnc_ab_trans_templ_get_name(templ), ==, ORIGINAL_NAME); // ok, name from file is here // Now we change the name into something else and verify it can be saved gnc_ab_trans_templ_set_name(templ, CHANGED_NAME); { g_assert(!qof_instance_get_dirty(QOF_INSTANCE(book))); // not yet dirty // Here we save the changed kvp gnc_ab_set_book_template_list(book, templ_list); g_assert(qof_instance_get_dirty(QOF_INSTANCE(book))); // yup, now dirty gnc_ab_trans_templ_list_free(templ_list); } { templ_list = gnc_ab_trans_templ_list_new_from_book (book); g_assert_cmpint(g_list_length(templ_list), ==, 1); templ = templ_list->data; g_assert_cmpstr(gnc_ab_trans_templ_get_name(templ), ==, CHANGED_NAME); // ok, the change has been saved! gnc_ab_trans_templ_list_free(templ_list); } } { // Check the kvp slots of a aqbanking-enabled account QofBook *book = qof_session_get_book(new_session); Account* account = gnc_book_get_root_account(book); struct tm *retrieved_date, *original_date; g_assert(account); // The interesting test case here: Can we read the correct date // from the xml file? if (1) { time64 retrieved = gnc_ab_get_account_trans_retrieval(account); char date_buf [MAX_DATE_LENGTH + 1]; memset (date_buf, 0, sizeof(date_buf)); qof_print_date_buff (date_buf, sizeof(date_buf), retrieved); g_test_message("retrieved=%s\n", date_buf); retrieved_date = gnc_gmtime (&retrieved); g_assert_cmpint (retrieved_date->tm_year, ==, 114); g_assert_cmpint (retrieved_date->tm_mon, ==, 7); g_assert_cmpint (retrieved_date->tm_mday, ==, 29); } // A lower-level test here: Can we write and read again the // trans_retrieval date? This wouldn't need this particular // Account, just a general Account object. if (1) { time64 original = gnc_time (NULL), retrieved; char date_buf_1 [MAX_DATE_LENGTH + 1]; char date_buf_2 [MAX_DATE_LENGTH + 1]; memset (date_buf_1, 0, sizeof(date_buf_1)); memset (date_buf_2, 0, sizeof(date_buf_2)); // Check whether the "ab-trans-retrieval" property of Account // is written and read again correctly. gnc_ab_set_account_trans_retrieval(account, original); retrieved = gnc_ab_get_account_trans_retrieval(account); qof_print_date_buff(date_buf_1, sizeof(date_buf_1), original); qof_print_date_buff(date_buf_2, sizeof(date_buf_2), retrieved); g_test_message("original_ts=%s\n", date_buf_1); g_test_message("retrieved_ts=%s\n", date_buf_2); original_date = gnc_gmtime (&original); retrieved_date = gnc_gmtime (&retrieved); g_assert_cmpint (retrieved_date->tm_year, ==, original_date->tm_year); g_assert_cmpint (retrieved_date->tm_mon, ==, original_date->tm_mon); g_assert_cmpint (retrieved_date->tm_mday, ==, original_date->tm_mday); } } g_free(newfile); g_free(file2); gnc_hook_run(HOOK_BOOK_CLOSED, new_session); //qof_session_destroy(new_session); // tries to delete the LCK file but it wasn't created in the first place } }