mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-11-29 12:14:31 -06:00
bbb4113a5a
Move all of the #include <glib> to before the extern "C" blocks so that the include guards will protect against headers inside the extern "C" block also including glib.h.
464 lines
14 KiB
C++
464 lines
14 KiB
C++
/********************************************************************\
|
|
* gnc-employee-xml-v2.c -- employee xml i/o implementation *
|
|
* *
|
|
* Copyright (C) 2002 Derek Atkins <warlord@MIT.EDU> *
|
|
* *
|
|
* 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 <glib.h>
|
|
|
|
extern "C"
|
|
{
|
|
#include <config.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include "gncEmployeeP.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 "gnc-employee-xml-v2.h"
|
|
#include "gnc-address-xml-v2.h"
|
|
|
|
#define _GNC_MOD_NAME GNC_ID_EMPLOYEE
|
|
|
|
static QofLogModule log_module = GNC_MOD_IO;
|
|
|
|
const gchar* employee_version_string = "2.0.0";
|
|
|
|
/* ids */
|
|
#define gnc_employee_string "gnc:GncEmployee"
|
|
#define employee_username_string "employee:username"
|
|
#define employee_guid_string "employee:guid"
|
|
#define employee_id_string "employee:id"
|
|
#define employee_addr_string "employee:addr"
|
|
#define employee_language_string "employee:language"
|
|
#define employee_acl_string "employee:acl"
|
|
#define employee_active_string "employee:active"
|
|
#define employee_workday_string "employee:workday"
|
|
#define employee_rate_string "employee:rate"
|
|
#define employee_currency_string "employee:currency"
|
|
#define employee_ccard_string "employee:ccard"
|
|
#define employee_slots_string "employee:slots"
|
|
|
|
static void
|
|
maybe_add_string (xmlNodePtr ptr, const char* tag, const char* str)
|
|
{
|
|
if (str && strlen (str) > 0)
|
|
xmlAddChild (ptr, text_to_dom_tree (tag, str));
|
|
}
|
|
|
|
static xmlNodePtr
|
|
employee_dom_tree_create (GncEmployee* employee)
|
|
{
|
|
xmlNodePtr ret;
|
|
gnc_numeric num;
|
|
Account* ccard_acc;
|
|
|
|
ret = xmlNewNode (NULL, BAD_CAST gnc_employee_string);
|
|
xmlSetProp (ret, BAD_CAST "version", BAD_CAST employee_version_string);
|
|
|
|
xmlAddChild (ret, guid_to_dom_tree (employee_guid_string,
|
|
qof_instance_get_guid (QOF_INSTANCE (employee))));
|
|
|
|
xmlAddChild (ret, text_to_dom_tree (employee_username_string,
|
|
gncEmployeeGetUsername (employee)));
|
|
|
|
xmlAddChild (ret, text_to_dom_tree (employee_id_string,
|
|
gncEmployeeGetID (employee)));
|
|
|
|
xmlAddChild (ret, gnc_address_to_dom_tree (employee_addr_string,
|
|
gncEmployeeGetAddr (employee)));
|
|
|
|
maybe_add_string (ret, employee_language_string,
|
|
gncEmployeeGetLanguage (employee));
|
|
maybe_add_string (ret, employee_acl_string, gncEmployeeGetAcl (employee));
|
|
|
|
xmlAddChild (ret, int_to_dom_tree (employee_active_string,
|
|
gncEmployeeGetActive (employee)));
|
|
|
|
num = gncEmployeeGetWorkday (employee);
|
|
xmlAddChild (ret, gnc_numeric_to_dom_tree (employee_workday_string, &num));
|
|
|
|
num = gncEmployeeGetRate (employee);
|
|
xmlAddChild (ret, gnc_numeric_to_dom_tree (employee_rate_string, &num));
|
|
|
|
xmlAddChild
|
|
(ret,
|
|
commodity_ref_to_dom_tree (employee_currency_string,
|
|
gncEmployeeGetCurrency (employee)));
|
|
|
|
ccard_acc = gncEmployeeGetCCard (employee);
|
|
if (ccard_acc)
|
|
xmlAddChild (ret, guid_to_dom_tree (employee_ccard_string,
|
|
qof_instance_get_guid (QOF_INSTANCE (ccard_acc))));
|
|
|
|
/* xmlAddChild won't do anything with a NULL, so tests are superfluous. */
|
|
xmlAddChild (ret, qof_instance_slots_to_dom_tree (employee_slots_string,
|
|
QOF_INSTANCE (employee)));
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************/
|
|
|
|
struct employee_pdata
|
|
{
|
|
GncEmployee* employee;
|
|
QofBook* book;
|
|
};
|
|
|
|
static gboolean
|
|
set_string (xmlNodePtr node, GncEmployee* employee,
|
|
void (*func) (GncEmployee* employee, const char* txt))
|
|
{
|
|
char* txt = dom_tree_to_text (node);
|
|
g_return_val_if_fail (txt, FALSE);
|
|
|
|
func (employee, txt);
|
|
|
|
g_free (txt);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_username_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
|
|
return set_string (node, pdata->employee, gncEmployeeSetUsername);
|
|
}
|
|
|
|
static gboolean
|
|
employee_guid_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
GncGUID* guid;
|
|
GncEmployee* employee;
|
|
|
|
guid = dom_tree_to_guid (node);
|
|
g_return_val_if_fail (guid, FALSE);
|
|
|
|
/* See if we've already created this one */
|
|
employee = gncEmployeeLookup (pdata->book, guid);
|
|
if (employee)
|
|
{
|
|
gncEmployeeDestroy (pdata->employee);
|
|
pdata->employee = employee;
|
|
gncEmployeeBeginEdit (employee);
|
|
}
|
|
else
|
|
{
|
|
gncEmployeeSetGUID (pdata->employee, guid);
|
|
}
|
|
|
|
guid_free (guid);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_id_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
|
|
return set_string (node, pdata->employee, gncEmployeeSetID);
|
|
}
|
|
|
|
static gboolean
|
|
employee_language_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
|
|
return set_string (node, pdata->employee, gncEmployeeSetLanguage);
|
|
}
|
|
|
|
static gboolean
|
|
employee_acl_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
|
|
return set_string (node, pdata->employee, gncEmployeeSetAcl);
|
|
}
|
|
|
|
static gboolean
|
|
employee_addr_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
|
|
return gnc_dom_tree_to_address (node, gncEmployeeGetAddr (pdata->employee));
|
|
}
|
|
|
|
static gboolean
|
|
employee_active_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
gint64 val;
|
|
gboolean ret;
|
|
|
|
ret = dom_tree_to_integer (node, &val);
|
|
if (ret)
|
|
gncEmployeeSetActive (pdata->employee, (gboolean)val);
|
|
|
|
return ret;
|
|
}
|
|
|
|
static gboolean
|
|
employee_workday_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
gnc_numeric* val;
|
|
|
|
val = dom_tree_to_gnc_numeric (node);
|
|
g_return_val_if_fail (val, FALSE);
|
|
gncEmployeeSetWorkday (pdata->employee, *val);
|
|
g_free (val);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_rate_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
gnc_numeric* val;
|
|
|
|
val = dom_tree_to_gnc_numeric (node);
|
|
g_return_val_if_fail (val, FALSE);
|
|
gncEmployeeSetRate (pdata->employee, *val);
|
|
g_free (val);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_currency_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
gnc_commodity* com;
|
|
|
|
com = dom_tree_to_commodity_ref (node, pdata->book);
|
|
g_return_val_if_fail (com, FALSE);
|
|
|
|
gncEmployeeSetCurrency (pdata->employee, com);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_ccard_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
GncGUID* guid;
|
|
Account* ccard_acc;
|
|
|
|
guid = dom_tree_to_guid (node);
|
|
g_return_val_if_fail (guid, FALSE);
|
|
|
|
ccard_acc = xaccAccountLookup (guid, pdata->book);
|
|
guid_free (guid);
|
|
|
|
g_return_val_if_fail (ccard_acc, FALSE);
|
|
gncEmployeeSetCCard (pdata->employee, ccard_acc);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
employee_slots_handler (xmlNodePtr node, gpointer employee_pdata)
|
|
{
|
|
struct employee_pdata* pdata = static_cast<decltype (pdata)> (employee_pdata);
|
|
return dom_tree_create_instance_slots (node, QOF_INSTANCE (pdata->employee));
|
|
}
|
|
|
|
static struct dom_tree_handler employee_handlers_v2[] =
|
|
{
|
|
{ employee_username_string, employee_username_handler, 1, 0 },
|
|
{ employee_guid_string, employee_guid_handler, 1, 0 },
|
|
{ employee_id_string, employee_id_handler, 1, 0 },
|
|
{ employee_addr_string, employee_addr_handler, 1, 0 },
|
|
{ employee_language_string, employee_language_handler, 0, 0 },
|
|
{ employee_acl_string, employee_acl_handler, 0, 0 },
|
|
{ employee_active_string, employee_active_handler, 1, 0 },
|
|
{ employee_workday_string, employee_workday_handler, 1, 0 },
|
|
{ employee_rate_string, employee_rate_handler, 1, 0 },
|
|
{ employee_currency_string, employee_currency_handler, 0, 0 }, /* XXX */
|
|
{ "employee:commodity", employee_currency_handler, 0, 0 }, /* XXX */
|
|
{ employee_ccard_string, employee_ccard_handler, 0, 0 },
|
|
{ employee_slots_string, employee_slots_handler, 0, 0 },
|
|
{ NULL, 0, 0, 0 }
|
|
};
|
|
|
|
static GncEmployee*
|
|
dom_tree_to_employee (xmlNodePtr node, QofBook* book)
|
|
{
|
|
struct employee_pdata employee_pdata;
|
|
gboolean successful;
|
|
|
|
employee_pdata.employee = gncEmployeeCreate (book);
|
|
employee_pdata.book = book;
|
|
gncEmployeeBeginEdit (employee_pdata.employee);
|
|
|
|
successful = dom_tree_generic_parse (node, employee_handlers_v2,
|
|
&employee_pdata);
|
|
if (successful)
|
|
gncEmployeeCommitEdit (employee_pdata.employee);
|
|
else
|
|
{
|
|
PERR ("failed to parse employee tree");
|
|
gncEmployeeDestroy (employee_pdata.employee);
|
|
employee_pdata.employee = NULL;
|
|
}
|
|
|
|
return employee_pdata.employee;
|
|
}
|
|
|
|
static gboolean
|
|
gnc_employee_end_handler (gpointer data_for_children,
|
|
GSList* data_from_children, GSList* sibling_data,
|
|
gpointer parent_data, gpointer global_data,
|
|
gpointer* result, const gchar* tag)
|
|
{
|
|
GncEmployee* employee;
|
|
xmlNodePtr tree = (xmlNodePtr)data_for_children;
|
|
gxpf_data* gdata = (gxpf_data*)global_data;
|
|
QofBook* book = static_cast<decltype (book)> (gdata->bookdata);
|
|
|
|
|
|
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);
|
|
|
|
employee = dom_tree_to_employee (tree, book);
|
|
if (employee != NULL)
|
|
{
|
|
gdata->cb (tag, gdata->parsedata, employee);
|
|
}
|
|
|
|
xmlFreeNode (tree);
|
|
|
|
return employee != NULL;
|
|
}
|
|
|
|
static sixtp*
|
|
employee_sixtp_parser_create (void)
|
|
{
|
|
return sixtp_dom_parser_new (gnc_employee_end_handler, NULL, NULL);
|
|
}
|
|
|
|
static gboolean
|
|
employee_should_be_saved (GncEmployee* employee)
|
|
{
|
|
const char* id;
|
|
|
|
/* make sure this is a valid employee before we save it -- should have an ID */
|
|
id = gncEmployeeGetID (employee);
|
|
if (id == NULL || *id == '\0')
|
|
return FALSE;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static void
|
|
do_count (QofInstance* employee_p, gpointer count_p)
|
|
{
|
|
int* count = static_cast<decltype (count)> (count_p);
|
|
if (employee_should_be_saved ((GncEmployee*) employee_p))
|
|
(*count)++;
|
|
}
|
|
|
|
static int
|
|
employee_get_count (QofBook* book)
|
|
{
|
|
int count = 0;
|
|
qof_object_foreach (_GNC_MOD_NAME, book, do_count, (gpointer) &count);
|
|
return count;
|
|
}
|
|
|
|
static void
|
|
xml_add_employee (QofInstance* employee_p, gpointer out_p)
|
|
{
|
|
xmlNodePtr node;
|
|
GncEmployee* employee = (GncEmployee*) employee_p;
|
|
FILE* out = static_cast<decltype (out)> (out_p);
|
|
|
|
if (ferror (out))
|
|
return;
|
|
if (!employee_should_be_saved (employee))
|
|
return;
|
|
|
|
node = employee_dom_tree_create (employee);
|
|
xmlElemDump (out, NULL, node);
|
|
xmlFreeNode (node);
|
|
if (ferror (out) || fprintf (out, "\n") < 0)
|
|
return;
|
|
}
|
|
|
|
static gboolean
|
|
employee_write (FILE* out, QofBook* book)
|
|
{
|
|
qof_object_foreach_sorted (_GNC_MOD_NAME, book, xml_add_employee,
|
|
(gpointer) out);
|
|
return ferror (out) == 0;
|
|
}
|
|
|
|
static gboolean
|
|
employee_ns (FILE* out)
|
|
{
|
|
g_return_val_if_fail (out, FALSE);
|
|
return gnc_xml2_write_namespace_decl (out, "employee");
|
|
}
|
|
|
|
void
|
|
gnc_employee_xml_initialize (void)
|
|
{
|
|
static GncXmlDataType_t be_data =
|
|
{
|
|
GNC_FILE_BACKEND_VERS,
|
|
gnc_employee_string,
|
|
employee_sixtp_parser_create,
|
|
NULL, /* add_item */
|
|
employee_get_count,
|
|
employee_write,
|
|
NULL, /* scrub */
|
|
employee_ns,
|
|
};
|
|
|
|
gnc_xml_register_backend (be_data);
|
|
}
|