1 /* Test program for the Gedcom library.
2 Copyright (C) 2001, 2002 The Genes Development Team
3 This file is part of the Gedcom parser library.
4 Contributed by Peter Verthez <Peter.Verthez@advalvas.be>, 2001.
6 The Gedcom parser library is free software; you can redistribute it
7 and/or modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The Gedcom parser library is distributed in the hope that it will be
12 useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the Gedcom parser library; if not, write to the
18 Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
33 printf("gedcom-parse test program for libgedcom and libgom\n\n");
34 printf("Usage: gom_test [options] file\n");
36 printf(" -h Show this help text\n");
37 printf(" -nc Disable compatibility mode\n");
38 printf(" -fi Fail immediately on errors\n");
39 printf(" -fd Deferred fail on errors, but parse completely\n");
40 printf(" -fn No fail on errors\n");
41 printf(" -dg Debug setting: only libgedcom debug messages\n");
42 printf(" -da Debug setting: libgedcom + yacc debug messages\n");
43 printf(" -q No output to standard output\n");
46 void gedcom_message_handler(Gedcom_msg_type type, char *msg)
48 output(1, "%s\n", msg);
51 int main(int argc, char* argv[])
53 Gedcom_err_mech mech = IMMED_FAIL;
54 int compat_enabled = 1;
57 char* file_name = NULL;
61 for (i=1; i<argc; i++) {
62 if (!strncmp(argv[i], "-da", 4))
64 else if (!strncmp(argv[i], "-dg", 4))
66 else if (!strncmp(argv[i], "-fi", 4))
68 else if (!strncmp(argv[i], "-fd", 4))
70 else if (!strncmp(argv[i], "-fn", 4))
72 else if (!strncmp(argv[i], "-nc", 4))
74 else if (!strncmp(argv[i], "-h", 3)) {
78 else if (!strncmp(argv[i], "-q", 3)) {
81 else if (strncmp(argv[i], "-", 1)) {
86 printf ("Unrecognized option: %s\n", argv[i]);
94 printf("No file name given\n");
100 setlocale(LC_ALL, "");
101 gedcom_set_debug_level(debug_level, NULL);
102 gedcom_set_compat_handling(compat_enabled);
103 gedcom_set_error_handling(mech);
104 gedcom_set_message_handler(gedcom_message_handler);
107 output(0, "\n=== Parsing file %s\n", file_name);
108 result = gom_parse_file(file_name);
110 output(1, "Parse succeeded\n");
113 output(1, "Parse failed\n");