X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Fage.c;h=37a49fe6a5678f790bae53f8f0b81c706c097d1f;hb=2907044621b5be3f7c0eab6b364da6f07e74e6be;hp=c597ef3ca663938c6fa5eee337d1a7ce06a7ff83;hpb=6432f3c3174135b38fc4084556cc487619510366;p=gedcom-parse.git

diff --git a/gedcom/age.c b/gedcom/age.c
index c597ef3..37a49fe 100644
--- a/gedcom/age.c
+++ b/gedcom/age.c
@@ -27,11 +27,20 @@
 #include <errno.h>
 #include <limits.h>
 #include "gedcom_internal.h"
+#include "buffer.h"
 #include "age.h"
 
 struct age_value age_s;
 struct age_value def_age_val;
 
+void cleanup_age_buffer();
+struct safe_buffer age_buffer = { NULL, 0, NULL, 0, cleanup_age_buffer };
+
+void cleanup_age_buffer()
+{
+  cleanup_buffer(&age_buffer);
+}
+
 void copy_age(struct age_value *to, struct age_value from)
 {
   memcpy(to, &from, sizeof(struct age_value));
@@ -46,7 +55,7 @@ void init_age(struct age_value *age)
   age->days = -1;
 }
 
-int parse_numeric_age(struct age_value *age, char *ptr)
+int parse_numeric_age(struct age_value *age, const char *ptr)
 {
   char *endptr;
   while (ptr) {
@@ -94,9 +103,24 @@ int parse_numeric_age(struct age_value *age, char *ptr)
   return 0;
 }
 
-struct age_value gedcom_parse_age(char* line_value)
+struct age_value* gedcom_new_age_value(struct age_value* copy_from)
 {
-  char *ptr = line_value;
+  struct age_value* age_ptr;
+  age_ptr = (struct age_value*) malloc(sizeof(struct age_value));
+  if (! age_ptr)
+    MEMORY_ERROR;
+  else {
+    if (copy_from)
+      memcpy(age_ptr, copy_from, sizeof(struct age_value));
+    else 
+      init_age(age_ptr);
+  }
+  return age_ptr;
+}
+
+struct age_value gedcom_parse_age(const char* line_value)
+{
+  const char *ptr = line_value;
   init_age(&age_s);
   init_age(&def_age_val);
 
@@ -111,7 +135,7 @@ struct age_value gedcom_parse_age(char* line_value)
     while (*ptr == ' ') ptr++;
   }
 
-  if (isdigit(*ptr)) {
+  if (isdigit((unsigned char)*ptr)) {
     int result = parse_numeric_age(&age_s, ptr);
     if (result == 0) {
       age_s.type = AGE_NUMERIC;
@@ -130,3 +154,50 @@ struct age_value gedcom_parse_age(char* line_value)
   return age_s;
 }
 
+char* gedcom_age_to_string(struct age_value* val)
+{
+  int num = 0;
+  reset_buffer(&age_buffer);
+
+  switch (val->mod) {
+    case AGE_LESS_THAN:
+      safe_buf_append(&age_buffer, "<"); break;
+    case AGE_GREATER_THAN:
+      safe_buf_append(&age_buffer, ">"); break;
+    default:
+      break;
+  }
+
+  switch (val->type) {
+    case AGE_UNRECOGNIZED:
+      return val->phrase; break;
+    case AGE_CHILD:
+      safe_buf_append(&age_buffer, "CHILD"); break;
+    case AGE_INFANT:
+      safe_buf_append(&age_buffer, "INFANT"); break;
+    case AGE_STILLBORN:
+      safe_buf_append(&age_buffer, "STILLBORN"); break;
+    case AGE_NUMERIC:
+      if (val->years != -1) {
+	num = 1;
+	safe_buf_append(&age_buffer, "%dy", val->years);
+      }
+      if (val->months != -1) {
+	if (num)
+	  safe_buf_append(&age_buffer, " ");
+	num = 1;
+	safe_buf_append(&age_buffer, "%dm", val->months);
+      }
+      if (val->days != -1) {
+	if (num)
+	  safe_buf_append(&age_buffer, " ");
+	num = 1;
+	safe_buf_append(&age_buffer, "%dd", val->days);
+      }
+      break;
+    default:
+      break;
+  }
+  
+  return get_buf_string(&age_buffer);
+}