153 lines
3.4 KiB
C
153 lines
3.4 KiB
C
|
|
#ifdef __ORCAC__
|
|
#pragma optimize 79
|
|
#pragma noroot
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "Date-flags.h"
|
|
|
|
void FlagsHelp(void)
|
|
{
|
|
fputs("Date [options]\n", stdout);
|
|
fputs("-a abbreviated date (e.g. Wed, Jun 14, 1995)\n", stdout);
|
|
fputs("-s short date (e.g. 6/14/95)\n", stdout);
|
|
fputs("-s4 short date, using 4-digit year (e.g. 6/14/1995)\n", stdout);
|
|
fputs("-u uniform output format, \1YYYY-MM-DD HH:MM:SS\1\n", stdout);
|
|
fputs("-st omit seconds from time format\n", stdout);
|
|
fputs("-d write date only\n", stdout);
|
|
fputs("-t write time only\n", stdout);
|
|
fputs("-c seconds write date corresponding to seconds\n", stdout);
|
|
fputs("-x date write seconds corresponding to date\n", stdout);
|
|
fputs("-n write seconds since January 1, 1904\n", stdout);
|
|
fputs("-utc write output converted to Universal Time Coordinates\n", stdout);
|
|
fputs("\n", stdout);
|
|
exit(0);
|
|
}
|
|
|
|
struct Flags flags;
|
|
int FlagsParse(int argc, char **argv)
|
|
{
|
|
char *cp;
|
|
char *optarg;
|
|
|
|
char c;
|
|
int i;
|
|
int j;
|
|
int eof; // end-of-flags
|
|
int mindex; // mutation index.
|
|
|
|
memset(&flags, 0, sizeof(flags));
|
|
|
|
for (i = 1, mindex = 1, eof = 0; i < argc; ++i) {
|
|
cp = argv[i];
|
|
c = cp[0];
|
|
|
|
if (c != '-' || eof) {
|
|
if (i != mindex) argv[mindex] = argv[i];
|
|
mindex++;
|
|
continue;
|
|
}
|
|
|
|
// -- = end of options.
|
|
if (cp[1] == '-' && cp[2] == 0) {
|
|
eof = 1;
|
|
continue;
|
|
}
|
|
if (!strcasecmp("s4", cp+1)) {
|
|
flags._s4 = 1;
|
|
continue;
|
|
}
|
|
if (!strcasecmp("st", cp+1)) {
|
|
flags._st = 1;
|
|
continue;
|
|
}
|
|
if (!strcasecmp("utc", cp+1)) {
|
|
flags._utc = 1;
|
|
continue;
|
|
}
|
|
|
|
// now scan all the flags in the string...
|
|
optarg = NULL;
|
|
for (j = 1; ; ++j) {
|
|
c = cp[j];
|
|
if (c == 0) break;
|
|
|
|
switch (c) {
|
|
case 'h':
|
|
FlagsHelp();
|
|
exit(0);
|
|
case 'a':
|
|
case 'A':
|
|
flags._a = 1;
|
|
break;
|
|
case 'c':
|
|
case 'C':
|
|
// -xarg or -x arg
|
|
++j;
|
|
if (cp[j]) {
|
|
optarg = cp + j;
|
|
}
|
|
else {
|
|
if (++i >= argc) {
|
|
fputs("### Date - \"-c\" requires an argument.\n", stderr);
|
|
exit(1);
|
|
}
|
|
optarg = argv[i];
|
|
}
|
|
flags._c = optarg;
|
|
|
|
break;
|
|
case 'd':
|
|
case 'D':
|
|
flags._d = 1;
|
|
break;
|
|
case 'n':
|
|
case 'N':
|
|
flags._n = 1;
|
|
break;
|
|
case 's':
|
|
case 'S':
|
|
flags._s = 1;
|
|
break;
|
|
case 't':
|
|
case 'T':
|
|
flags._t = 1;
|
|
break;
|
|
case 'u':
|
|
case 'U':
|
|
flags._u = 1;
|
|
break;
|
|
case 'x':
|
|
case 'X':
|
|
// -xarg or -x arg
|
|
++j;
|
|
if (cp[j]) {
|
|
optarg = cp + j;
|
|
}
|
|
else {
|
|
if (++i >= argc) {
|
|
fputs("### Date - \"-x\" requires an argument.\n", stderr);
|
|
exit(1);
|
|
}
|
|
optarg = argv[i];
|
|
}
|
|
flags._x = optarg;
|
|
|
|
break;
|
|
|
|
default:
|
|
fprintf(stderr, "### Date - \"-%c\" is not an option.\n", c);
|
|
exit(1);
|
|
}
|
|
|
|
if (optarg) break;
|
|
}
|
|
}
|
|
|
|
return mindex;
|
|
}
|