Implement timestamps for AmigaOS.

setter/src/amiga/time.c

@@ -22,9 +22,82 @@ Aaru Data Preservation Suite
 Copyright (C) 2011-2021 Natalia Portillo
 *****************************************************************************/
 
+#include <proto/dos.h>
+#include <stdio.h>
+#include <string.h>
+
+#include "time.h"
+
 #include "../include/defs.h"
+#include "../log.h"
 
 void Timestamps(const char* path)
 {
-    // TODO
+    BPTR             pathLock;
+    BPTR             dirLock;
+    int              ret;
+    BPTR             h;
+    int              rc, wRc, cRc, tRc;
+    struct DateStamp times;
+    int              i;
+    char             buffer[256];
+
+    pathLock = Lock((CONST_STRPTR)path, SHARED_LOCK);
+
+    if(!pathLock)
+    {
+        log_write("Error %d changing to specified path.\n", IoErr());
+        return;
+    }
+
+    CurrentDir(pathLock);
+
+    dirLock = CreateDir((CONST_STRPTR) "TIMES");
+
+    if(!dirLock)
+    {
+        log_write("Error %d creating working directory.\n", IoErr());
+        return;
+    }
+
+    CurrentDir(dirLock);
+
+    log_write("Creating timestamped files.\n");
+
+    for(i = 0; i < KNOWN_AMIGA_TIMES; i++)
+    {
+        memset(&times, 0, sizeof(struct DateStamp));
+        h   = Open((CONST_STRPTR)amiga_times[i].filename, MODE_NEWFILE);
+        rc  = 0;
+        wRc = 0;
+        cRc = 0;
+        tRc = 0;
+
+        if(!h) rc = IoErr();
+        else
+        {
+            times.ds_Days   = amiga_times[i].days;
+            times.ds_Minute = amiga_times[i].minutes;
+            times.ds_Tick   = amiga_times[i].ticks;
+
+            memset(buffer, 0, 255);
+            snprintf(buffer, 255, DATETIME_FORMAT, amiga_times[i].message);
+
+            ret = Write(h, buffer, 255);
+            if(ret < 0) wRc = IoErr();
+
+            ret = Close(h);
+            if(!ret) cRc = IoErr();
+
+            ret = SetFileDate((CONST_STRPTR)amiga_times[i].filename, &times);
+            if(!ret) tRc = IoErr();
+        }
+
+        log_write("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n",
+                  amiga_times[i].filename,
+                  rc,
+                  wRc,
+                  cRc,
+                  tRc);
+    }
 }