mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
take a shot at implementing books ...
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6419 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
562bf958ea
commit
51b10b6384
175
src/backend/file/gnc-book-xml-v2.c
Normal file
175
src/backend/file/gnc-book-xml-v2.c
Normal file
@ -0,0 +1,175 @@
|
||||
/********************************************************************\
|
||||
* gnc-book-xml-v2.c -- book xml i/o implementation *
|
||||
* *
|
||||
* Copyright (C) 2001 James LewisMoss <dres@debian.org> *
|
||||
* Copyright (C) 2001 Linas Vepstas <linas@linas.org> *
|
||||
* *
|
||||
* 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 *
|
||||
* 59 Temple Place - Suite 330 Fax: +1-617-542-2652 *
|
||||
* Boston, MA 02111-1307, USA gnu@gnu.org *
|
||||
* *
|
||||
\********************************************************************/
|
||||
|
||||
#include "config.h"
|
||||
|
||||
#include <glib.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
|
||||
#include "gnc-xml-helper.h"
|
||||
|
||||
#include "sixtp.h"
|
||||
#include "sixtp-utils.h"
|
||||
#include "sixtp-parsers.h"
|
||||
#include "sixtp-utils.h"
|
||||
#include "sixtp-dom-parsers.h"
|
||||
#include "sixtp-dom-generators.h"
|
||||
|
||||
#include "gnc-xml.h"
|
||||
#include "io-gncxml-gen.h"
|
||||
#include "io-gncxml-v2.h"
|
||||
|
||||
#include "sixtp-dom-parsers.h"
|
||||
#include "gnc-book-p.h"
|
||||
#include "gnc-book.h"
|
||||
|
||||
const gchar *book_version_string = "2.0.0";
|
||||
|
||||
/* ids */
|
||||
#define gnc_book_string "gnc:book"
|
||||
#define book_id_string "act:id"
|
||||
#define book_slots_string "act:slots"
|
||||
|
||||
xmlNodePtr
|
||||
gnc_book_dom_tree_create(GNCBook *book)
|
||||
{
|
||||
xmlNodePtr ret;
|
||||
|
||||
ret = xmlNewNode(NULL, gnc_book_string);
|
||||
xmlSetProp(ret, "version", book_version_string);
|
||||
|
||||
xmlAddChild(ret, guid_to_dom_tree(book_id_string, gnc_book_get_guid(book)));
|
||||
|
||||
if(gnc_book_get_slots(book))
|
||||
{
|
||||
xmlNodePtr kvpnode = kvp_frame_to_dom_tree(book_slots_string,
|
||||
gnc_book_get_slots(book));
|
||||
if(kvpnode)
|
||||
{
|
||||
xmlAddChild(ret, kvpnode);
|
||||
}
|
||||
}
|
||||
|
||||
return ret;
|
||||
}
|
||||
|
||||
/***********************************************************************/
|
||||
|
||||
static gboolean
|
||||
book_id_handler (xmlNodePtr node, gpointer book_pdata)
|
||||
{
|
||||
GNCBook *book = book_pdata;
|
||||
GUID *guid;
|
||||
|
||||
guid = dom_tree_to_guid(node);
|
||||
gnc_book_set_guid(book, guid);
|
||||
|
||||
g_free(guid);
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
static gboolean
|
||||
book_slots_handler (xmlNodePtr node, gpointer book_pdata)
|
||||
{
|
||||
GNCBook *book = book_pdata;
|
||||
gboolean success;
|
||||
|
||||
/* the below works only because the get is gaurenteed to return
|
||||
* a frame, even if its empty */
|
||||
success = dom_tree_to_kvp_frame_given
|
||||
(node, gnc_book_get_slots (book);
|
||||
|
||||
g_return_val_if_fail(success, FALSE);
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
|
||||
static struct dom_tree_handler book_handlers_v2[] = {
|
||||
{ book_id_string, book_id_handler, 1, 0 },
|
||||
{ act_slots_string, account_slots_handler, 0, 0 },
|
||||
{ NULL, 0, 0, 0 }
|
||||
};
|
||||
|
||||
static gboolean
|
||||
gnc_book_end_handler(gpointer data_for_children,
|
||||
GSList* data_from_children, GSList* sibling_data,
|
||||
gpointer parent_data, gpointer global_data,
|
||||
gpointer *result, const gchar *tag)
|
||||
{
|
||||
int successful;
|
||||
xmlNodePtr tree = (xmlNodePtr)data_for_children;
|
||||
gxpf_data *gdata = (gxpf_data*)global_data;
|
||||
GNCBook *book = gdata->bookdata;
|
||||
|
||||
successful = TRUE;
|
||||
|
||||
if(parent_data)
|
||||
{
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/* OK. For some messed up reason this is getting called again with a
|
||||
NULL tag. So we ignore those cases */
|
||||
if(!tag)
|
||||
{
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
g_return_val_if_fail(tree, FALSE);
|
||||
|
||||
book = dom_tree_to_book(tree, book);
|
||||
if (NULL != book)
|
||||
{
|
||||
gdata->cb(tag, gdata->parsedata, book);
|
||||
}
|
||||
|
||||
xmlFreeNode(tree);
|
||||
|
||||
return book != NULL;
|
||||
}
|
||||
|
||||
GNCBook*
|
||||
dom_tree_to_book (xmlNodePtr node, GNCBook *book)
|
||||
{
|
||||
gboolean successful;
|
||||
|
||||
successful = dom_tree_generic_parse (node, book_handlers_v2,
|
||||
book);
|
||||
if (!successful)
|
||||
{
|
||||
book = NULL;
|
||||
}
|
||||
|
||||
return book;
|
||||
}
|
||||
|
||||
sixtp*
|
||||
gnc_book_sixtp_parser_create(void)
|
||||
{
|
||||
return sixtp_dom_parser_new(gnc_book_end_handler, NULL, NULL);
|
||||
}
|
Loading…
Reference in New Issue
Block a user