diff options
Diffstat (limited to 'src/libopts/time.c')
-rw-r--r-- | src/libopts/time.c | 145 |
1 files changed, 0 insertions, 145 deletions
diff --git a/src/libopts/time.c b/src/libopts/time.c deleted file mode 100644 index debaa7aed3..0000000000 --- a/src/libopts/time.c +++ /dev/null @@ -1,145 +0,0 @@ - -/** - * \file time.c - * - * @addtogroup autoopts - * @{ - */ -/* - * This file is part of AutoOpts, a companion to AutoGen. - * AutoOpts is free software. - * AutoOpts is Copyright (C) 1992-2018 by Bruce Korb - all rights reserved - * - * AutoOpts is available under any one of two licenses. The license - * in use must be one of these two and the choice is under the control - * of the user of the license. - * - * The GNU Lesser General Public License, version 3 or later - * See the files "COPYING.lgplv3" and "COPYING.gplv3" - * - * The Modified Berkeley Software Distribution License - * See the file "COPYING.mbsd" - * - * These files have the following sha256 sums: - * - * 8584710e9b04216a394078dc156b781d0b47e1729104d666658aecef8ee32e95 COPYING.gplv3 - * 4379e7444a0e2ce2b12dd6f5a52a27a4d02d39d247901d3285c88cf0d37f477b COPYING.lgplv3 - * 13aa749a5b0a454917a944ed8fffc530b784f5ead522b1aacaf4ec8aa55a6239 COPYING.mbsd - */ - -/*=export_func optionTimeVal - * private: - * - * what: process an option with a time duration. - * arg: + tOptions * + opts + program options descriptor + - * arg: + tOptDesc * + od + the descriptor for this arg + - * - * doc: - * Decipher a time duration value. -=*/ -void -optionTimeVal(tOptions * opts, tOptDesc * od) -{ - time_t val; - - if (INQUERY_CALL(opts, od)) - return; - - val = parse_duration(od->optArg.argString); - if (val == BAD_TIME) { - fprintf(stderr, zNotDuration, opts->pzProgName, od->optArg.argString); - if ((opts->fOptSet & OPTPROC_ERRSTOP) != 0) - (*(opts->pUsageProc))(opts, EXIT_FAILURE); - } - - if (od->fOptState & OPTST_ALLOC_ARG) { - AGFREE(od->optArg.argString); - od->fOptState &= ~OPTST_ALLOC_ARG; - } - - od->optArg.argInt = (long)val; -} - -/*=export_func optionTimeDate - * private: - * - * what: process an option with a time and date. - * arg: + tOptions * + opts + program options descriptor + - * arg: + tOptDesc * + od + the descriptor for this arg + - * - * doc: - * Decipher a time and date value. -=*/ -void -optionTimeDate(tOptions * opts, tOptDesc * od) -{ -#if defined(HAVE_GETDATE_R) && defined(HAVE_PUTENV) - if (INQUERY_CALL(opts, od)) - return; - - if ((! HAS_pzPkgDataDir(opts)) || (opts->pzPkgDataDir == NULL)) - goto default_action; - - /* - * Export the DATEMSK environment variable. getdate_r() uses it to - * find the file with the strptime formats. If we cannot find the file - * we need ($PKGDATADIR/datemsk), then fall back to just a time duration. - */ - { - static char * envptr = NULL; - - if (envptr == NULL) { - static char const fmt[] = "DATEMSK=%s/datemsk"; - size_t sz = sizeof(fmt) + strlen(opts->pzPkgDataDir); - envptr = AGALOC(sz, fmt); - if (snprintf(envptr, sz, fmt, opts->pzPkgDataDir) >= (int)sz) - option_exits(EXIT_FAILURE); - - putenv(envptr); - } - - if (access(envptr+8, R_OK) != 0) - goto default_action; - } - - /* - * Convert the date to a time since the epoch and stash it in a long int. - */ - { - struct tm stm; - time_t tm; - - if (getdate_r(od->optArg.argString, &stm) != 0) { - fprintf(stderr, zNotDate, opts->pzProgName, - od->optArg.argString); - if ((opts->fOptSet & OPTPROC_ERRSTOP) != 0) - (*(opts->pUsageProc))(opts, EXIT_FAILURE); - return; - } - - tm = mktime(&stm); - - if (od->fOptState & OPTST_ALLOC_ARG) { - AGFREE(od->optArg.argString); - od->fOptState &= ~OPTST_ALLOC_ARG; - } - - od->optArg.argInt = tm; - } - return; - - default_action: - -#endif - optionTimeVal(opts, od); - if (od->optArg.argInt != BAD_TIME) - od->optArg.argInt += (long)time(NULL); -} -/** @} - * - * Local Variables: - * mode: C - * c-file-style: "stroustrup" - * indent-tabs-mode: nil - * End: - * end of autoopts/time.c */ |