| /* vi: set sw=4 ts=4: |
| * |
| * touch.c : change timestamp of a file |
| * Copyright 2012 Choubey Ji <warior.linux@gmail.com> |
| * |
| * See http://pubs.opengroup.org/onlinepubs/9699919799/utilities/touch.html |
| * acmrtd |
| |
| USE_TOUCH(NEWTOY(touch, "acd:mr:t:[!dtr]", TOYFLAG_BIN)) |
| |
| config TOUCH |
| bool "touch" |
| default y |
| help |
| Usage: Usage: touch [OPTION]... FILE... |
| |
| Update the access and modification times of each FILE to the current time. |
| |
| -a change access time |
| -m change modification time |
| -c don't create file |
| -d DATE use YYYY-MM-DDThh:mm:SS[.frac][tz] as time |
| -t TIME use [[CC]YY]MMDDhhmm[.ss][frac] as time |
| -r FILE use reference file's time |
| */ |
| |
| #define FOR_touch |
| #include "toys.h" |
| |
| GLOBALS( |
| char *time; |
| char *file; |
| char *date; |
| ) |
| |
| int fetch(char *file, struct timeval *tv, unsigned flags) |
| { |
| struct stat st; |
| |
| if (stat(TT.file, &st)) return 1; |
| |
| if (flags & FLAG_a) { |
| tv[0].tv_sec = st.st_atime; |
| tv[0].tv_usec = st.st_atim.tv_nsec/1000; |
| } |
| if (flags & FLAG_m) { |
| tv[1].tv_sec = st.st_mtime; |
| tv[1].tv_usec = st.st_mtim.tv_nsec/1000; |
| } |
| |
| return 0; |
| } |
| |
| void touch_main(void) |
| { |
| struct timeval tv[2]; |
| struct tm tm; |
| char **ss; |
| int flag; |
| |
| gettimeofday(tv, NULL); |
| localtime_r(&(tv->tv_sec), &tm); |
| |
| if (toys.optflags & (FLAG_t|FLAG_d)) { |
| char *date, *s; |
| int i, len; |
| |
| if (toys.optflags & FLAG_d) { |
| date = TT.date; |
| i = strlen(date)-1; |
| if (*date && toupper(date[i])=='Z') { |
| putenv("TZ=UTC"); |
| strncpy(toybuf, date, sizeof(toybuf)-1); |
| date = toybuf; |
| date[i]=0; |
| gmtime_r(&(tv->tv_sec), &tm); |
| } |
| s = strptime(date, "%Y-%m-%dT%T", &tm); |
| if (s && *s=='.') { |
| sscanf(s, ".%d%n", &i, &len); |
| s += len; |
| tv->tv_usec = i; |
| } |
| } else { |
| strcpy(toybuf, "%Y%m%d%H%M"); |
| date = TT.time; |
| for (i=0;i<3;i++) { |
| s = strptime(date, toybuf+(i&2), &tm); |
| if (s) break; |
| toybuf[1]='y'; |
| } |
| if (s && *s=='.') { |
| int count = sscanf(s, ".%2d%u%n", &(tm.tm_sec), &i, &len); |
| if (count==2) tv->tv_usec = i; |
| s += len; |
| } |
| } |
| |
| errno = 0; |
| tv->tv_sec = mktime(&tm); |
| if (!s || *s || errno == EOVERFLOW) { |
| // Warn Indiana Jones the monkey died. |
| perror_exit("bad '%s'", date); |
| } |
| } |
| tv[1]=tv[0]; |
| |
| if (TT.file && fetch(TT.file, tv, FLAG_a|FLAG_m)) |
| perror_exit("-r '%s'", TT.file); |
| |
| flag = (~toys.optflags) & (FLAG_m|FLAG_a); |
| if (flag == (FLAG_m|FLAG_a)) flag = 0; |
| for (ss=toys.optargs; *ss;) { |
| int fd; |
| |
| if ((!flag || !fetch(*ss, tv, flag)) && !utimes(*ss, tv)) ss++; |
| else if (toys.optflags & FLAG_c) ss++; |
| else if (-1 != (fd = open(*ss, O_CREAT, 0666))) close(fd); |
| else perror_msg("'%s'", *ss++); |
| } |
| } |