From d70e2fdb664f6723cd8a1c131fdbeb39cb75d7be Mon Sep 17 00:00:00 2001
From: Peter Verthez <Peter.Verthez@advalvas.be>
Date: Sat, 4 Jan 2003 15:22:13 +0000
Subject: [PATCH] Added functions to update timestamps in records.

---
 gom/change_date.c | 73 +++++++++++++++++++++++++++++++++++++++++++++++
 include/gom.h     |  4 +++
 2 files changed, 77 insertions(+)

diff --git a/gom/change_date.c b/gom/change_date.c
index 0e56869..1038df3 100644
--- a/gom/change_date.c
+++ b/gom/change_date.c
@@ -23,6 +23,7 @@
 
 #include <stdlib.h>
 #include <string.h>
+#include <time.h>
 #include "change_date.h"
 #include "family.h"
 #include "individual.h"
@@ -103,6 +104,78 @@ void CLEANFUNC(change_date)(struct change_date *chan)
   SAFE_FREE(chan);
 }
 
+struct change_date* gom_add_change_date(struct change_date** chan)
+{
+  struct change_date *obj = NULL;
+  if (chan && ! *chan) {
+    obj = (struct change_date*) malloc(sizeof(struct change_date));
+    if (! obj)
+      MEMORY_ERROR;
+    else {
+      memset(obj, 0, sizeof(struct change_date));
+      *chan = obj;
+    }
+  }
+  return obj;
+}
+
+int gom_delete_change_date(struct change_date** chan)
+{
+  int result = 1;
+  if (chan && *chan) {
+    CLEANFUNC(change_date)(*chan);
+    free(*chan);
+    *chan = NULL;
+    result = 0;
+  }
+  return result;
+}
+
+int update_date(struct date_value** dv, struct tm* tm_ptr)
+{
+  int result;
+  struct date_value* dval = gedcom_new_date_value(NULL);
+  dval->type        = DV_NO_MODIFIER;
+  dval->date1.cal   = CAL_GREGORIAN;
+  dval->date1.day   = tm_ptr->tm_mday;
+  dval->date1.month = tm_ptr->tm_mon + 1;
+  dval->date1.year  = tm_ptr->tm_year + 1900;
+  result = gedcom_normalize_date(DI_FROM_NUMBERS, dval);
+
+  if (result == 0) {
+    if (*dv) free(*dv);
+    *dv = dval;
+  }
+  return result;
+}
+
+int update_time(char** tv, struct tm* tm_ptr)
+{
+  char tval[16];
+  sprintf(tval, "%02d:%02d:%02d",
+	  tm_ptr->tm_hour, tm_ptr->tm_min, tm_ptr->tm_sec);
+
+  if (gom_set_string(tv, tval))
+    return 0;
+  else
+    return 1;
+}
+
+int gom_update_timestamp(struct change_date** chan, time_t t)
+{
+  int result = 1;
+  if (chan) {
+    if (! *chan) gom_add_change_date(chan);
+    if (*chan) {
+      struct tm *tm_ptr = localtime(&t);
+      result = 0;
+      result |= update_date(&((*chan)->date), tm_ptr);
+      result |= update_time(&((*chan)->time), tm_ptr);
+    }
+  }
+  return result;
+}
+
 int write_change_date(Gedcom_write_hndl hndl, int parent,
 		      struct change_date *chan)
 {
diff --git a/include/gom.h b/include/gom.h
index 4d56a6c..7424143 100644
--- a/include/gom.h
+++ b/include/gom.h
@@ -476,6 +476,10 @@ char* gom_get_string_for_locale(char* data, int* conversion_failures);
 char* gom_set_string_for_locale(char** data, const char* locale_str);
 void  gom_set_unknown(const char* unknown);
 
+struct change_date* gom_add_change_date(struct change_date** obj);
+int   gom_delete_change_date(struct change_date** obj);
+int   gom_update_timestamp(struct change_date** obj, time_t t);
+  
 #ifdef __cplusplus
 }
 #endif
-- 
2.30.2