Extra test.

[gedcom-parse.git] / t / standalone.c

diff --git a/t/standalone.c b/t/standalone.c
index 3db5eda7af45b2fcb98d3437dba9ac3d7f66354a..fdf26611000dffbda46cc905e22d8b54922d2956 100644 (file)
--- a/t/standalone.c
+++ b/t/standalone.c
@@ -32,6 +32,7 @@
 #include "utf8-locale.h"
 
 #define OUTFILE "testgedcom.out"
+#define BOGUS_FILE_NAME "Makefile.am"
 FILE* outfile = NULL;
 int quiet = 0;
 
@@ -62,10 +63,11 @@ void show_help ()
   printf("  -da   Debug setting: libgedcom + yacc debug messages\n");
   printf("  -2    Run the test parse 2 times instead of once\n");
   printf("  -3    Run the test parse 3 times instead of once\n");
+  printf("  -b    Parse a bogus file before parsing the main file\n");
   printf("  -q    No output to standard output\n");
 }
 
-Gedcom_ctxt header_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt header_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
                         char *raw_value, int tag_value,
                         Gedcom_val parsed_value)
 {
@@ -73,7 +75,7 @@ Gedcom_ctxt header_start(int level, Gedcom_val xref, char *tag,
   return (Gedcom_ctxt)1;
 }
 
-void header_end(Gedcom_ctxt self)
+void header_end(Gedcom_rec rec, Gedcom_ctxt self)
 {
   output(1, "Header end, context is %d\n", (int)self);
 }
@@ -81,7 +83,7 @@ void header_end(Gedcom_ctxt self)
 char family_xreftags[100][255];
 int  family_nr = 1;
 
-Gedcom_ctxt family_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt family_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
                         char *raw_value, int tag_value,
                         Gedcom_val parsed_value)
 {
@@ -92,7 +94,7 @@ Gedcom_ctxt family_start(int level, Gedcom_val xref, char *tag,
   return (Gedcom_ctxt)(family_nr++);
 }
 
-Gedcom_ctxt rec_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt rec_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
                      char *raw_value, int tag_value,
                      Gedcom_val parsed_value)
 {
@@ -103,7 +105,7 @@ Gedcom_ctxt rec_start(int level, Gedcom_val xref, char *tag,
   return (Gedcom_ctxt)tag_value;
 }
 
-Gedcom_ctxt note_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt note_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
                       char *raw_value, int tag_value,
                       Gedcom_val parsed_value)
 {
@@ -113,12 +115,12 @@ Gedcom_ctxt note_start(int level, Gedcom_val xref, char *tag,
   return (Gedcom_ctxt)tag_value;
 }
 
-void family_end(Gedcom_ctxt self)
+void family_end(Gedcom_rec rec, Gedcom_ctxt self)
 {
   output(1, "Family end, xref is %s\n", family_xreftags[(int)self]);
 }
 
-Gedcom_ctxt submit_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt submit_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
                         char *raw_value, int tag_value,
                         Gedcom_val parsed_value)
 {
@@ -126,8 +128,8 @@ Gedcom_ctxt submit_start(int level, Gedcom_val xref, char *tag,
   return (Gedcom_ctxt)10000;
 }
 
-Gedcom_ctxt source_start(Gedcom_ctxt parent, int level, char *tag,
-                        char* raw_value,
+Gedcom_ctxt source_start(Gedcom_elt elt, Gedcom_ctxt parent, int level,
+                        char *tag, char* raw_value,
                         int tag_value, Gedcom_val parsed_value)
 {
   Gedcom_ctxt self = (Gedcom_ctxt)((int) parent + 1000);
@@ -136,14 +138,15 @@ Gedcom_ctxt source_start(Gedcom_ctxt parent, int level, char *tag,
   return self;
 }
 
-void source_end(Gedcom_ctxt parent, Gedcom_ctxt self, Gedcom_val parsed_value)
+void source_end(Gedcom_elt elt, Gedcom_ctxt parent, Gedcom_ctxt self,
+               Gedcom_val parsed_value)
 {
   output(1, "Source context %d in parent %d\n", (int)self, (int)parent);
 }
 
-Gedcom_ctxt source_date_start(Gedcom_ctxt parent, int level, char *tag,
-                             char* raw_value,
-                             int tag_value, Gedcom_val parsed_value)
+Gedcom_ctxt date_start(Gedcom_elt elt, Gedcom_ctxt parent, int level,
+                      char *tag, char* raw_value,
+                      int tag_value, Gedcom_val parsed_value)
 {
   struct date_value dv;
   Gedcom_ctxt self = (Gedcom_ctxt)((int) parent + 1000);
@@ -171,8 +174,26 @@ Gedcom_ctxt source_date_start(Gedcom_ctxt parent, int level, char *tag,
   return self;
 }
 
-void default_cb(Gedcom_ctxt ctxt, int level, char *tag, char *raw_value,
-               int tag_value)
+Gedcom_ctxt age_start(Gedcom_elt elt, Gedcom_ctxt parent, int level,
+                     char *tag, char *raw_value,
+                     int tag_value, Gedcom_val parsed_value)
+{
+  struct age_value age;
+  Gedcom_ctxt self = (Gedcom_ctxt)((int) parent + 1000);
+  age = GEDCOM_AGE(parsed_value);
+  output(1, "Contents of the age_value:\n");
+  output(1, "  raw value: %s\n", raw_value);
+  output(1, "  type: %d\n", age.type);
+  output(1, "  modifier: %d\n", age.mod);
+  output(1, "  years: %d\n", age.years);
+  output(1, "  months: %d\n", age.months);
+  output(1, "  days: %d\n", age.days);
+  output(1, "  phrase: %s\n", age.phrase);
+  return self;
+}
+
+void default_cb(Gedcom_elt elt, Gedcom_ctxt ctxt, int level, char *tag,
+               char *raw_value, int tag_value)
 {
   char   *converted = NULL;
   int    conv_fails = 0;
@@ -196,7 +217,9 @@ void subscribe_callbacks()
   gedcom_subscribe_to_record(REC_USER, rec_start, NULL);
   gedcom_subscribe_to_element(ELT_HEAD_SOUR, source_start, source_end);
   gedcom_subscribe_to_element(ELT_SOUR_DATA_EVEN_DATE,
-                             source_date_start, NULL);
+                             date_start, NULL);
+  gedcom_subscribe_to_element(ELT_SUB_EVT_DATE, date_start, NULL);
+  gedcom_subscribe_to_element(ELT_SUB_FAM_EVT_AGE, age_start, NULL);
 }
 
 void gedcom_message_handler(Gedcom_msg_type type, char *msg)
@@ -216,6 +239,7 @@ int main(int argc, char* argv[])
   int compat_enabled = 1;
   int debug_level = 0;
   int run_times   = 1;
+  int bogus       = 0;
   int result      = 0;
   char* file_name = NULL;
 
@@ -244,6 +268,9 @@ int main(int argc, char* argv[])
       else if (!strncmp(argv[i], "-3", 3)) {
        run_times = 3;
       }
+      else if (!strncmp(argv[i], "-b", 3)) {
+       bogus = 1;
+      }
       else if (!strncmp(argv[i], "-q", 3)) {
        quiet = 1;
       }
@@ -265,8 +292,8 @@ int main(int argc, char* argv[])
     exit(1);
   }
 
-  setlocale(LC_ALL, "");
   gedcom_init();
+  setlocale(LC_ALL, "");
   gedcom_set_debug_level(debug_level, NULL);
   gedcom_set_compat_handling(compat_enabled);
   gedcom_set_error_handling(mech);
@@ -278,17 +305,20 @@ int main(int argc, char* argv[])
   if (!outfile) {
     printf("Could not open %s for appending\n", OUTFILE);
   }
+  if (bogus) {
+    output(0, "\n=== Parsing bogus file %s\n", BOGUS_FILE_NAME);
+    gedcom_parse_file(BOGUS_FILE_NAME);
+  }
   while (run_times-- > 0) {
     output(0, "\n=== Parsing file %s\n", file_name);
     result |= gedcom_parse_file(file_name);
   }
-  fclose(outfile);
   if (result == 0) {
     output(1, "Parse succeeded\n");
-    return 0;
   }
   else {
     output(1, "Parse failed\n");
-    return 1;
-  }  
+  }
+  fclose(outfile);
+  return result;
 }