mirror of https://github.com/Gnucash/gnucash
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
319 lines
8.0 KiB
319 lines
8.0 KiB
/********************************************************************\
|
|
* qofinstance.c -- handler for fields common to all objects *
|
|
* *
|
|
* 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 *
|
|
* *
|
|
\********************************************************************/
|
|
|
|
/*
|
|
* Object instance holds many common fields that most
|
|
* gnucash objects use.
|
|
*
|
|
* Copyright (C) 2003 Linas Vepstas <linas@linas.org>
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include <glib.h>
|
|
#include "qof.h"
|
|
#include "kvp-util-p.h"
|
|
#include "qofbook-p.h"
|
|
#include "qofid-p.h"
|
|
#include "qofinstance-p.h"
|
|
|
|
static QofLogModule log_module = QOF_MOD_ENGINE;
|
|
|
|
/* ========================================================== */
|
|
|
|
QOF_GOBJECT_GET_TYPE(QofInstance, qof_instance, G_TYPE_OBJECT, {});
|
|
QOF_GOBJECT_FINALIZE(qof_instance);
|
|
|
|
static void qof_instance_dispose(GObject*);
|
|
static void qof_instance_class_init(QofInstanceClass *klass)
|
|
{
|
|
GObjectClass *object_class = G_OBJECT_CLASS(klass);
|
|
object_class->finalize = qof_instance_finalize;
|
|
object_class->dispose = qof_instance_dispose;
|
|
}
|
|
|
|
static void
|
|
qof_instance_init (QofInstance *inst)
|
|
{
|
|
inst->book = NULL;
|
|
inst->kvp_data = kvp_frame_new();
|
|
inst->last_update.tv_sec = 0;
|
|
inst->last_update.tv_nsec = -1;
|
|
inst->editlevel = 0;
|
|
inst->do_free = FALSE;
|
|
inst->dirty = FALSE;
|
|
inst->infant = TRUE;
|
|
}
|
|
|
|
void
|
|
qof_instance_init_data (QofInstance *inst, QofIdType type, QofBook *book)
|
|
{
|
|
QofCollection *col;
|
|
QofIdType col_type;
|
|
|
|
g_return_if_fail(QOF_IS_INSTANCE(inst));
|
|
g_return_if_fail(!inst->book);
|
|
|
|
inst->book = book;
|
|
col = qof_book_get_collection (book, type);
|
|
g_return_if_fail(col != NULL);
|
|
|
|
/* XXX We passed redundant info to this routine ... but I think that's
|
|
* OK, it might eliminate programming errors. */
|
|
|
|
col_type = qof_collection_get_type(col);
|
|
if (safe_strcmp(col_type, type)) {
|
|
PERR ("attempt to insert \"%s\" into \"%s\"", type, col_type);
|
|
return;
|
|
}
|
|
inst->e_type = CACHE_INSERT (type);
|
|
|
|
do {
|
|
guid_new(&inst->guid);
|
|
|
|
if (NULL == qof_collection_lookup_entity (col, &inst->guid))
|
|
break;
|
|
|
|
PWARN("duplicate id created, trying again");
|
|
} while(1);
|
|
|
|
inst->collection = col;
|
|
|
|
qof_collection_insert_entity (col, inst);
|
|
}
|
|
|
|
static void
|
|
qof_instance_dispose (GObject *instp)
|
|
{
|
|
QofInstance* inst = QOF_INSTANCE(instp);
|
|
|
|
if (!inst->collection)
|
|
return;
|
|
qof_collection_remove_entity(inst);
|
|
CACHE_REMOVE(inst->e_type);
|
|
inst->e_type = NULL;
|
|
G_OBJECT_CLASS(qof_instance_parent_class)->dispose(instp);
|
|
}
|
|
|
|
static void
|
|
qof_instance_finalize_real (GObject *instp)
|
|
{
|
|
QofInstance* inst = QOF_INSTANCE(instp);
|
|
|
|
kvp_frame_delete (inst->kvp_data);
|
|
inst->kvp_data = NULL;
|
|
inst->editlevel = 0;
|
|
inst->do_free = FALSE;
|
|
inst->dirty = FALSE;
|
|
}
|
|
|
|
const GUID *
|
|
qof_instance_get_guid (const QofInstance *inst)
|
|
{
|
|
if (!inst) return guid_null();
|
|
return &(inst->guid);
|
|
}
|
|
|
|
QofBook *
|
|
qof_instance_get_book (const QofInstance *inst)
|
|
{
|
|
if (!inst) return NULL;
|
|
return inst->book;
|
|
}
|
|
|
|
void
|
|
qof_instance_set_guid (QofInstance *ent, const GUID *guid)
|
|
{
|
|
QofCollection *col;
|
|
if (guid_equal (guid, &ent->guid)) return;
|
|
|
|
col = ent->collection;
|
|
qof_collection_remove_entity(ent);
|
|
ent->guid = *guid;
|
|
qof_collection_insert_entity(col, ent);
|
|
}
|
|
|
|
KvpFrame*
|
|
qof_instance_get_slots (const QofInstance *inst)
|
|
{
|
|
if (!inst) return NULL;
|
|
return inst->kvp_data;
|
|
}
|
|
|
|
Timespec
|
|
qof_instance_get_last_update (const QofInstance *inst)
|
|
{
|
|
if (!inst)
|
|
{
|
|
Timespec ts = {0,-1};
|
|
return ts;
|
|
}
|
|
return inst->last_update;
|
|
}
|
|
|
|
int
|
|
qof_instance_version_cmp (const QofInstance *left, const QofInstance *right)
|
|
{
|
|
if (!left && !right) return 0;
|
|
if (!left) return -1;
|
|
if (!right) return +1;
|
|
if (left->last_update.tv_sec < right->last_update.tv_sec) return -1;
|
|
if (left->last_update.tv_sec > right->last_update.tv_sec) return +1;
|
|
if (left->last_update.tv_nsec < right->last_update.tv_nsec) return -1;
|
|
if (left->last_update.tv_nsec > right->last_update.tv_nsec) return +1;
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
qof_instance_print_dirty (const QofInstance *entity, gpointer dummy)
|
|
{
|
|
QofInstance *inst = QOF_INSTANCE(entity);
|
|
|
|
if (inst->dirty)
|
|
printf("%s instance %s is dirty.\n", inst->e_type,
|
|
guid_to_string(&inst->guid));
|
|
}
|
|
|
|
gboolean
|
|
qof_instance_is_dirty (QofInstance *inst)
|
|
{
|
|
QofCollection *coll;
|
|
|
|
if (!inst) { return FALSE; }
|
|
if (qof_get_alt_dirty_mode())
|
|
return inst->dirty;
|
|
coll = inst->collection;
|
|
if(qof_collection_is_dirty(coll)) { return inst->dirty; }
|
|
inst->dirty = FALSE;
|
|
return FALSE;
|
|
}
|
|
|
|
void
|
|
qof_instance_set_dirty(QofInstance* inst)
|
|
{
|
|
QofCollection *coll;
|
|
|
|
inst->dirty = TRUE;
|
|
if (!qof_get_alt_dirty_mode()) {
|
|
coll = inst->collection;
|
|
qof_collection_mark_dirty(coll);
|
|
}
|
|
}
|
|
|
|
gboolean
|
|
qof_instance_check_edit(const QofInstance *inst)
|
|
{
|
|
if(inst->editlevel > 0) { return TRUE; }
|
|
return FALSE;
|
|
}
|
|
|
|
gboolean
|
|
qof_instance_do_free(const QofInstance *inst)
|
|
{
|
|
return inst->do_free;
|
|
}
|
|
|
|
void
|
|
qof_instance_mark_free(QofInstance *inst)
|
|
{
|
|
inst->do_free = TRUE;
|
|
}
|
|
|
|
/* ========================================================== */
|
|
/* setters */
|
|
|
|
void
|
|
qof_instance_mark_clean (QofInstance *inst)
|
|
{
|
|
if(!inst) return;
|
|
inst->dirty = FALSE;
|
|
}
|
|
|
|
void
|
|
qof_instance_set_slots (QofInstance *inst, KvpFrame *frm)
|
|
{
|
|
if (!inst) return;
|
|
if (inst->kvp_data && (inst->kvp_data != frm))
|
|
{
|
|
kvp_frame_delete(inst->kvp_data);
|
|
}
|
|
|
|
inst->dirty = TRUE;
|
|
inst->kvp_data = frm;
|
|
}
|
|
|
|
void
|
|
qof_instance_set_last_update (QofInstance *inst, Timespec ts)
|
|
{
|
|
if (!inst) return;
|
|
inst->last_update = ts;
|
|
}
|
|
|
|
/* ========================================================== */
|
|
|
|
void
|
|
qof_instance_gemini (QofInstance *to, const QofInstance *from)
|
|
{
|
|
time_t now;
|
|
|
|
/* Books must differ for a gemini to be meaningful */
|
|
if (!from || !to || (from->book == to->book)) return;
|
|
|
|
now = time(0);
|
|
|
|
/* Make a note of where the copy came from */
|
|
gnc_kvp_bag_add (to->kvp_data, "gemini", now,
|
|
"inst_guid", &from->guid,
|
|
"book_guid", &from->book->inst.guid,
|
|
NULL);
|
|
gnc_kvp_bag_add (from->kvp_data, "gemini", now,
|
|
"inst_guid", &to->guid,
|
|
"book_guid", &to->book->inst.guid,
|
|
NULL);
|
|
|
|
to->dirty = TRUE;
|
|
}
|
|
|
|
QofInstance *
|
|
qof_instance_lookup_twin (const QofInstance *src, QofBook *target_book)
|
|
{
|
|
QofCollection *col;
|
|
KvpFrame *fr;
|
|
GUID * twin_guid;
|
|
QofInstance * twin;
|
|
|
|
if (!src || !target_book) return NULL;
|
|
ENTER (" ");
|
|
|
|
fr = gnc_kvp_bag_find_by_guid (src->kvp_data, "gemini",
|
|
"book_guid", &target_book->inst.guid);
|
|
|
|
twin_guid = kvp_frame_get_guid (fr, "inst_guid");
|
|
|
|
col = qof_book_get_collection (target_book, src->e_type);
|
|
twin = (QofInstance *) qof_collection_lookup_entity (col, twin_guid);
|
|
|
|
LEAVE (" found twin=%p", twin);
|
|
return twin;
|
|
}
|
|
|
|
/* ========================== END OF FILE ======================= */
|