GnuCash  2.6.99
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
gncmod-qif-import.c
1 /*********************************************************************
2  * gncmod-qif-import.c
3  * module definition/initialization for old QIF importer (deprecated)
4  *
5  * Copyright (c) 2001 Linux Developers Group, Inc.
6  *********************************************************************/
7 
8 #include "config.h"
9 #include <gmodule.h>
10 #include <libguile.h>
11 
12 #include "gnc-module.h"
13 #include "gnc-module-api.h"
14 #include "assistant-qif-import.h"
15 #include "dialog-new-user.h"
16 
17 #include "gnc-plugin-qif-import.h"
18 
19 GNC_MODULE_API_DECL(libgncmod_qif_import)
20 
21 /* version of the gnc module system interface we require */
22 int libgncmod_qif_import_gnc_module_system_interface = 0;
23 
24 /* module versioning uses libtool semantics. */
25 int libgncmod_qif_import_gnc_module_current = 0;
26 int libgncmod_qif_import_gnc_module_revision = 0;
27 int libgncmod_qif_import_gnc_module_age = 0;
28 
29 
30 char *
31 libgncmod_qif_import_gnc_module_path(void)
32 {
33  return g_strdup("gnucash/import-export/qif-import");
34 }
35 
36 char *
37 libgncmod_qif_import_gnc_module_description(void)
38 {
39  return g_strdup("Gnome GUI and Scheme code for QIF importer");
40 }
41 
42 int
43 libgncmod_qif_import_gnc_module_init(int refcount)
44 {
45  if (!gnc_module_load("gnucash/engine", 0))
46  {
47  return FALSE;
48  }
49 
50  if (!gnc_module_load("gnucash/app-utils", 0))
51  {
52  return FALSE;
53  }
54 
55  if (!gnc_module_load("gnucash/gnome-utils", 0))
56  {
57  return FALSE;
58  }
59 
60  /* If the recount == 0 then register the qif-import-assistant for the new-user
61  * dialog.
62  */
63  if (refcount == 0)
64  {
65  gnc_new_user_dialog_register_qif_assistant
66  ((void (*)())gnc_file_qif_import);
67  }
68 
69  scm_c_eval_string("(use-modules (gnucash import-export qif-import))");
70 
71  gnc_plugin_qif_import_create_plugin();
72 
73  return TRUE;
74 }
75 
76 int
77 libgncmod_qif_import_gnc_module_end(int refcount)
78 {
79  return TRUE;
80 }