core/: touch

Signed-off-by: Ferass El Hafidi <vitali64pmemail@protonmail.com>

2 files changed, 82 insertions, 0 deletions

diff --git a/config.mk b/config.mk
index 4c263e7..7ff6038 100644
--- a/config.mk
+++ b/config.mk
@@ -33,6 +33,7 @@ CORE=\
 	tail\
 	tee\
 	test\
+	touch\
 	true\
 	tty\
 	uname\
diff --git a/core/touch.c b/core/touch.c
new file mode 100644
index 0000000..845c76b
--- /dev/null
+++ b/core/touch.c
@@ -0,0 +1,81 @@
+/* SPDX-License-Identifier: BSD-3-Clause */
+#define _XOPEN_SOURCE /* WHY???? */
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <stdint.h>
+#include <errno.h>
+#include <time.h>
+
+/* Requirements in common.h */
+#define REQ_PRINT_USAGE
+#define REQ_ERRPRINT
+#include "../common/common.h"
+
+#define DESCRIPTION "Change file access and modification times."
+#define OPERANDS    "[-acm] [-t [[CC]YY]MMDDhhmm[.SS]] file..."
+
+int main(int argc, char *argv[]) {
+	int file, i, argument;
+	struct timespec times[2];
+	struct tm time_tm = { 0 }; /* Used by strptime() */
+	char param[256], *argv0 = strdup(argv[0]), *datefmt, *date_string;
+	for (i = 0; i < 256 && (param[i] = 0); i++);
+	while ((argument = getopt(argc, argv, "acmt:")) != -1) {
+		if (argument == '?')
+			return print_usage(argv0, DESCRIPTION, OPERANDS, VERSION);
+		else if (argument == 't') {
+			switch (strlen(optarg)) {
+				case 8: /* MMDDhhmm */
+					datefmt = "%m%d%H%M";
+					break;
+				case 10: /* YYMMDDhhmm */
+					datefmt = "%y%m%d%H%M";
+					break;
+				case 12: /* CCYYMMDDhhmm */
+					datefmt = "%C%y%m%d%H%M";
+					break;
+				case 13: /* MMDDhhmm.SS */
+					datefmt = "%m%d%H%M.%S";
+					break;
+				case 15: /* YYMMDDhhmm.SS */
+					datefmt = "%y%m%d%H%M.%S";
+					break;
+				case 17: /* CCYYMMDDhhmm.SS */
+					datefmt = "%C%y%m%d%H%M.%S";
+					break;
+				default:
+					return print_usage(argv0, DESCRIPTION, OPERANDS, VERSION);
+			}
+			date_string = optarg;
+		}
+		param[(uint8_t)argument] = 1;
+	} argc -= optind; argv += optind;
+	if (argc < 1) return print_usage(argv0, DESCRIPTION, OPERANDS, VERSION);
+	if (param['t']) {
+		strptime(date_string, datefmt, &time_tm);
+		if (errno) return errprint(argv0, "strptime()", errno);
+		if (param['a'])
+			times[0].tv_sec = mktime(&time_tm);
+		if (param['m'])
+			times[1].tv_sec = mktime(&time_tm);
+		times[0].tv_nsec = 0; times[1].tv_nsec = 0;
+	} else {
+		times[0].tv_sec = time(NULL); times[1].tv_sec = time(NULL);
+		times[0].tv_nsec = 0; times[1].tv_nsec = 0;
+	}
+	for (i = 0; i < argc; i++) {
+		if (access(argv[i], F_OK) == -1 && errno == ENOENT && !param['c']) {
+			/* File does not exist */
+			file = creat(argv[i], 
+				S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH);
+			futimens(file, times);
+		} else if (access(argv[i], F_OK) != -1)
+			/* File exists */
+			utimensat(AT_FDCWD, argv[i], times, 0);
+		else if (errno != ENOENT) return errprint(argv0, argv[i], errno);
+	}
+}