From 7e0f021a9aec35fd8e6725e87e3313b101d26f5e Mon Sep 17 00:00:00 2001
From: Tobias Klauser <tklauser@distanz.ch>
Date: Sun, 27 Jan 2008 11:37:44 +0100
Subject: Initial import (2.0.2-6)

---
 reference/C/CONTRIB/SNIP/setimeto.c | 64 +++++++++++++++++++++++++++++++++++++
 1 file changed, 64 insertions(+)
 create mode 100755 reference/C/CONTRIB/SNIP/setimeto.c

(limited to 'reference/C/CONTRIB/SNIP/setimeto.c')

diff --git a/reference/C/CONTRIB/SNIP/setimeto.c b/reference/C/CONTRIB/SNIP/setimeto.c
new file mode 100755
index 0000000..3d32827
--- /dev/null
+++ b/reference/C/CONTRIB/SNIP/setimeto.c
@@ -0,0 +1,64 @@
+/*
+**  SETIMETO.C - Set the timestamp of one file to match another.
+**
+**  public domain demo by Bob Stout
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <dos.h>
+#include <io.h>
+#include <fcntl.h>
+
+#ifdef __ZTC__
+ #define GETFTIME dos_getftime
+ #define SETFTIME dos_setftime
+#else
+ #define GETFTIME _dos_getftime
+ #define SETFTIME _dos_setftime
+#endif
+
+int main(int argc, char *argv[])
+{
+      int fd0, fd1;
+
+#ifdef __TURBOC__
+      struct ftime Ftime;
+#else
+      unsigned date, time;
+#endif
+
+      if (3 > argc)
+      {
+            puts("Usage: SETIMETO old_filename new_filename");
+            return EXIT_FAILURE;
+      }
+
+      if (-1 == (fd0 = open(argv[1], O_RDONLY)))
+      {
+            printf("Unable to open %s\n", argv[1]);
+            return EXIT_FAILURE;
+      }
+
+#ifdef __TURBOC__                         /* Save the time/date         */
+      getftime(fd0, &Ftime);
+#else
+      GETFTIME(fd0, &date, &time);
+#endif
+
+      if (-1 == (fd1 = open(argv[2], O_WRONLY)))
+      {
+            printf("Unable to open %s\n", argv[2]);
+            return EXIT_FAILURE;
+      }
+
+#ifdef __TURBOC__                         /* Set the time/date          */
+      setftime(fd1, &Ftime);
+#else
+      SETFTIME(fd1, date, time);
+#endif
+
+      close(fd0);
+      close(fd1);
+      return EXIT_SUCCESS;
+}
-- 
cgit v1.2.3-54-g00ecf