#define YYBISON 1
#define YYBISON_VERSION "2.1"
#define YYSKELETON_NAME "yacc.c"
#define YYPURE 0
#define YYLSP_NEEDED 0
#ifndef YYTOKENTYPE
# define YYTOKENTYPE
enum yytokentype {
tAGO = 258,
tDAY = 259,
tDAYZONE = 260,
tAMPM = 261,
tMONTH = 262,
tMONTH_UNIT = 263,
tSEC_UNIT = 264,
tUNUMBER = 265,
tZONE = 266,
tDST = 267
};
#endif
#define tAGO 258
#define tDAY 259
#define tDAYZONE 260
#define tAMPM 261
#define tMONTH 262
#define tMONTH_UNIT 263
#define tSEC_UNIT 264
#define tUNUMBER 265
#define tZONE 266
#define tDST 267
#line 1 "getdate.y"
#ifdef __FreeBSD__
#include <sys/cdefs.h>
__FBSDID("$FreeBSD: src/usr.bin/tar/getdate.y,v 1.9 2007/07/20 01:27:50 kientzle Exp $");
#endif
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#define YYINCLUDED_STDLIB_H
#include <string.h>
#include <time.h>
#define yyparse getdate_yyparse
#define yylex getdate_yylex
#define yyerror getdate_yyerror
static int yyparse(void);
static int yylex(void);
static int yyerror(const char *);
time_t get_date(char *);
#define EPOCH 1970
#define HOUR(x) ((time_t)(x) * 60)
#define SECSPERDAY (24L * 60L * 60L)
typedef enum _DSTMODE {
DSTon, DSToff, DSTmaybe
} DSTMODE;
enum { tAM, tPM };
static char *yyInput;
static DSTMODE yyDSTmode;
static time_t yyDayOrdinal;
static time_t yyDayNumber;
static int yyHaveDate;
static int yyHaveDay;
static int yyHaveRel;
static int yyHaveTime;
static int yyHaveZone;
static time_t yyTimezone;
static time_t yyDay;
static time_t yyHour;
static time_t yyMinutes;
static time_t yyMonth;
static time_t yySeconds;
static time_t yyYear;
static time_t yyRelMonth;
static time_t yyRelSeconds;
#ifndef YYDEBUG
# define YYDEBUG 0
#endif
#ifdef YYERROR_VERBOSE
# undef YYERROR_VERBOSE
# define YYERROR_VERBOSE 1
#else
# define YYERROR_VERBOSE 0
#endif
#ifndef YYTOKEN_TABLE
# define YYTOKEN_TABLE 0
#endif
#if ! defined (YYSTYPE) && ! defined (YYSTYPE_IS_DECLARED)
#line 94 "getdate.y"
typedef union YYSTYPE {
time_t Number;
} YYSTYPE;
#line 206 "tar/getdate.c"
# define yystype YYSTYPE
# define YYSTYPE_IS_DECLARED 1
# define YYSTYPE_IS_TRIVIAL 1
#endif
#line 218 "tar/getdate.c"
#if ! defined (YYSIZE_T) && defined (__SIZE_TYPE__)
# define YYSIZE_T __SIZE_TYPE__
#endif
#if ! defined (YYSIZE_T) && defined (size_t)
# define YYSIZE_T size_t
#endif
#if ! defined (YYSIZE_T) && (defined (__STDC__) || defined (__cplusplus))
# include <stddef.h>
# define YYSIZE_T size_t
#endif
#if ! defined (YYSIZE_T)
# define YYSIZE_T unsigned int
#endif
#ifndef YY_
# if YYENABLE_NLS
# if ENABLE_NLS
# include <libintl.h>
# define YY_(msgid) dgettext ("bison-runtime", msgid)
# endif
# endif
# ifndef YY_
# define YY_(msgid) msgid
# endif
#endif
#if ! defined (yyoverflow) || YYERROR_VERBOSE
# ifdef YYSTACK_USE_ALLOCA
# if YYSTACK_USE_ALLOCA
# ifdef __GNUC__
# define YYSTACK_ALLOC __builtin_alloca
# else
# define YYSTACK_ALLOC alloca
# if defined (__STDC__) || defined (__cplusplus)
# include <stdlib.h>
# define YYINCLUDED_STDLIB_H
# endif
# endif
# endif
# endif
# ifdef YYSTACK_ALLOC
# define YYSTACK_FREE(Ptr) do { ; } while (0)
# ifndef YYSTACK_ALLOC_MAXIMUM
# define YYSTACK_ALLOC_MAXIMUM 4032
# endif
# else
# define YYSTACK_ALLOC YYMALLOC
# define YYSTACK_FREE YYFREE
# ifndef YYSTACK_ALLOC_MAXIMUM
# define YYSTACK_ALLOC_MAXIMUM ((YYSIZE_T) -1)
# endif
# ifdef __cplusplus
extern "C" {
# endif
# ifndef YYMALLOC
# define YYMALLOC malloc
# if (! defined (malloc) && ! defined (YYINCLUDED_STDLIB_H) \
&& (defined (__STDC__) || defined (__cplusplus)))
void *malloc (YYSIZE_T);
# endif
# endif
# ifndef YYFREE
# define YYFREE free
# if (! defined (free) && ! defined (YYINCLUDED_STDLIB_H) \
&& (defined (__STDC__) || defined (__cplusplus)))
void free (void *);
# endif
# endif
# ifdef __cplusplus
}
# endif
# endif
#endif
#if (! defined (yyoverflow) \
&& (! defined (__cplusplus) \
|| (defined (YYSTYPE_IS_TRIVIAL) && YYSTYPE_IS_TRIVIAL)))
union yyalloc
{
short int yyss;
YYSTYPE yyvs;
};
# define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1)
# define YYSTACK_BYTES(N) \
((N) * (sizeof (short int) + sizeof (YYSTYPE)) \
+ YYSTACK_GAP_MAXIMUM)
# ifndef YYCOPY
# if defined (__GNUC__) && 1 < __GNUC__
# define YYCOPY(To, From, Count) \
__builtin_memcpy (To, From, (Count) * sizeof (*(From)))
# else
# define YYCOPY(To, From, Count) \
do \
{ \
YYSIZE_T yyi; \
for (yyi = 0; yyi < (Count); yyi++) \
(To)[yyi] = (From)[yyi]; \
} \
while (0)
# endif
# endif
# define YYSTACK_RELOCATE(Stack) \
do \
{ \
YYSIZE_T yynewbytes; \
YYCOPY (&yyptr->Stack, Stack, yysize); \
Stack = &yyptr->Stack; \
yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \
yyptr += yynewbytes / sizeof (*yyptr); \
} \
while (0)
#endif
#if defined (__STDC__) || defined (__cplusplus)
typedef signed char yysigned_char;
#else
typedef short int yysigned_char;
#endif
#define YYFINAL 2
#define YYLAST 50
#define YYNTOKENS 18
#define YYNNTS 11
#define YYNRULES 41
#define YYNSTATES 59
#define YYUNDEFTOK 2
#define YYMAXUTOK 267
#define YYTRANSLATE(YYX) \
((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
static const unsigned char yytranslate[] =
{
0, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 13, 16, 14, 2, 17, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 15, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 1, 2, 3, 4,
5, 6, 7, 8, 9, 10, 11, 12
};
#if YYDEBUG
static const unsigned char yyprhs[] =
{
0, 0, 3, 4, 7, 9, 11, 13, 15, 17,
19, 22, 24, 27, 31, 35, 39, 45, 47, 49,
52, 54, 57, 60, 64, 70, 76, 82, 85, 90,
93, 97, 100, 102, 106, 110, 113, 115, 119, 123,
126, 128
};
static const yysigned_char yyrhs[] =
{
19, 0, -1, -1, 19, 20, -1, 21, -1, 23,
-1, 25, -1, 24, -1, 26, -1, 28, -1, 10,
6, -1, 22, -1, 22, 6, -1, 22, 13, 10,
-1, 22, 14, 10, -1, 10, 15, 10, -1, 10,
15, 10, 15, 10, -1, 11, -1, 5, -1, 11,
12, -1, 4, -1, 4, 16, -1, 10, 4, -1,
10, 17, 10, -1, 10, 17, 10, 17, 10, -1,
10, 14, 10, 14, 10, -1, 10, 14, 7, 14,
10, -1, 7, 10, -1, 7, 10, 16, 10, -1,
10, 7, -1, 10, 7, 10, -1, 27, 3, -1,
27, -1, 14, 10, 9, -1, 13, 10, 9, -1,
10, 9, -1, 9, -1, 14, 10, 8, -1, 13,
10, 8, -1, 10, 8, -1, 8, -1, 10, -1
};
static const unsigned short int yyrline[] =
{
0, 106, 106, 107, 110, 111, 112, 113, 114, 115,
118, 128, 131, 138, 143, 150, 155, 162, 166, 170,
176, 180, 185, 192, 197, 216, 222, 235, 240, 246,
251, 259, 263, 266, 270, 274, 278, 282, 286, 290,
294, 300
};
#endif
#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE
static const char *const yytname[] =
{
"$end", "error", "$undefined", "tAGO", "tDAY", "tDAYZONE", "tAMPM",
"tMONTH", "tMONTH_UNIT", "tSEC_UNIT", "tUNUMBER", "tZONE", "tDST", "'+'",
"'-'", "':'", "','", "'/'", "$accept", "spec", "item", "time",
"bare_time", "zone", "day", "date", "rel", "relunit", "number", 0
};
#endif
# ifdef YYPRINT
static const unsigned short int yytoknum[] =
{
0, 256, 257, 258, 259, 260, 261, 262, 263, 264,
265, 266, 267, 43, 45, 58, 44, 47
};
# endif
static const unsigned char yyr1[] =
{
0, 18, 19, 19, 20, 20, 20, 20, 20, 20,
21, 21, 21, 21, 21, 22, 22, 23, 23, 23,
24, 24, 24, 25, 25, 25, 25, 25, 25, 25,
25, 26, 26, 27, 27, 27, 27, 27, 27, 27,
27, 28
};
static const unsigned char yyr2[] =
{
0, 2, 0, 2, 1, 1, 1, 1, 1, 1,
2, 1, 2, 3, 3, 3, 5, 1, 1, 2,
1, 2, 2, 3, 5, 5, 5, 2, 4, 2,
3, 2, 1, 3, 3, 2, 1, 3, 3, 2,
1, 1
};
static const unsigned char yydefact[] =
{
2, 0, 1, 20, 18, 0, 40, 36, 41, 17,
0, 0, 3, 4, 11, 5, 7, 6, 8, 32,
9, 21, 27, 22, 10, 29, 39, 35, 0, 0,
0, 19, 0, 0, 12, 0, 0, 31, 0, 30,
0, 0, 15, 23, 38, 34, 37, 33, 13, 14,
28, 0, 0, 0, 0, 26, 25, 16, 24
};
static const yysigned_char yydefgoto[] =
{
-1, 1, 12, 13, 14, 15, 16, 17, 18, 19,
20
};
#define YYPACT_NINF -8
static const yysigned_char yypact[] =
{
-8, 0, -8, 14, -8, 2, -8, -8, 11, 15,
19, 21, -8, -8, 10, -8, -8, -8, -8, 29,
-8, -8, 17, -8, -8, 24, -8, -8, -4, 25,
26, -8, -7, 13, -8, 27, 28, -8, 30, -8,
31, 32, 33, 22, -8, -8, -8, -8, -8, -8,
-8, 34, 37, 39, 40, -8, -8, -8, -8
};
static const yysigned_char yypgoto[] =
{
-8, -8, -8, -8, -8, -8, -8, -8, -8, -8,
-8
};
#define YYTABLE_NINF -1
static const unsigned char yytable[] =
{
2, 44, 45, 40, 3, 4, 41, 5, 6, 7,
8, 9, 22, 10, 11, 23, 34, 24, 25, 26,
27, 46, 47, 35, 36, 28, 29, 31, 30, 32,
21, 33, 37, 38, 39, 42, 43, 48, 49, 54,
50, 0, 0, 0, 55, 51, 52, 56, 53, 57,
58
};
static const yysigned_char yycheck[] =
{
0, 8, 9, 7, 4, 5, 10, 7, 8, 9,
10, 11, 10, 13, 14, 4, 6, 6, 7, 8,
9, 8, 9, 13, 14, 14, 15, 12, 17, 10,
16, 10, 3, 16, 10, 10, 10, 10, 10, 17,
10, -1, -1, -1, 10, 14, 14, 10, 15, 10,
10
};
static const unsigned char yystos[] =
{
0, 19, 0, 4, 5, 7, 8, 9, 10, 11,
13, 14, 20, 21, 22, 23, 24, 25, 26, 27,
28, 16, 10, 4, 6, 7, 8, 9, 14, 15,
17, 12, 10, 10, 6, 13, 14, 3, 16, 10,
7, 10, 10, 10, 8, 9, 8, 9, 10, 10,
10, 14, 14, 15, 17, 10, 10, 10, 10
};
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#define YYEMPTY (-2)
#define YYEOF 0
#define YYACCEPT goto yyacceptlab
#define YYABORT goto yyabortlab
#define YYERROR goto yyerrorlab
#define YYFAIL goto yyerrlab
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(Token, Value) \
do \
if (yychar == YYEMPTY && yylen == 1) \
{ \
yychar = (Token); \
yylval = (Value); \
yytoken = YYTRANSLATE (yychar); \
YYPOPSTACK; \
goto yybackup; \
} \
else \
{ \
yyerror (YY_("syntax error: cannot back up")); \
YYERROR; \
} \
while (0)
#define YYTERROR 1
#define YYERRCODE 256
#define YYRHSLOC(Rhs, K) ((Rhs)[K])
#ifndef YYLLOC_DEFAULT
# define YYLLOC_DEFAULT(Current, Rhs, N) \
do \
if (N) \
{ \
(Current).first_line = YYRHSLOC (Rhs, 1).first_line; \
(Current).first_column = YYRHSLOC (Rhs, 1).first_column; \
(Current).last_line = YYRHSLOC (Rhs, N).last_line; \
(Current).last_column = YYRHSLOC (Rhs, N).last_column; \
} \
else \
{ \
(Current).first_line = (Current).last_line = \
YYRHSLOC (Rhs, 0).last_line; \
(Current).first_column = (Current).last_column = \
YYRHSLOC (Rhs, 0).last_column; \
} \
while (0)
#endif
#ifndef YY_LOCATION_PRINT
# if YYLTYPE_IS_TRIVIAL
# define YY_LOCATION_PRINT(File, Loc) \
fprintf (File, "%d.%d-%d.%d", \
(Loc).first_line, (Loc).first_column, \
(Loc).last_line, (Loc).last_column)
# else
# define YY_LOCATION_PRINT(File, Loc) ((void) 0)
# endif
#endif
#ifdef YYLEX_PARAM
# define YYLEX yylex (YYLEX_PARAM)
#else
# define YYLEX yylex ()
#endif
#if YYDEBUG
# ifndef YYFPRINTF
# include <stdio.h>
# define YYFPRINTF fprintf
# endif
# define YYDPRINTF(Args) \
do { \
if (yydebug) \
YYFPRINTF Args; \
} while (0)
# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \
do { \
if (yydebug) \
{ \
YYFPRINTF (stderr, "%s ", Title); \
yysymprint (stderr, \
Type, Value); \
YYFPRINTF (stderr, "\n"); \
} \
} while (0)
#if defined (__STDC__) || defined (__cplusplus)
static void
yy_stack_print (short int *bottom, short int *top)
#else
static void
yy_stack_print (bottom, top)
short int *bottom;
short int *top;
#endif
{
YYFPRINTF (stderr, "Stack now");
for (; bottom <= top; ++bottom)
YYFPRINTF (stderr, " %d", *bottom);
YYFPRINTF (stderr, "\n");
}
# define YY_STACK_PRINT(Bottom, Top) \
do { \
if (yydebug) \
yy_stack_print ((Bottom), (Top)); \
} while (0)
#if defined (__STDC__) || defined (__cplusplus)
static void
yy_reduce_print (int yyrule)
#else
static void
yy_reduce_print (yyrule)
int yyrule;
#endif
{
int yyi;
unsigned long int yylno = yyrline[yyrule];
YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu), ",
yyrule - 1, yylno);
for (yyi = yyprhs[yyrule]; 0 <= yyrhs[yyi]; yyi++)
YYFPRINTF (stderr, "%s ", yytname[yyrhs[yyi]]);
YYFPRINTF (stderr, "-> %s\n", yytname[yyr1[yyrule]]);
}
# define YY_REDUCE_PRINT(Rule) \
do { \
if (yydebug) \
yy_reduce_print (Rule); \
} while (0)
int yydebug;
#else
# define YYDPRINTF(Args)
# define YY_SYMBOL_PRINT(Title, Type, Value, Location)
# define YY_STACK_PRINT(Bottom, Top)
# define YY_REDUCE_PRINT(Rule)
#endif
#ifndef YYINITDEPTH
# define YYINITDEPTH 200
#endif
#ifndef YYMAXDEPTH
# define YYMAXDEPTH 10000
#endif
#if YYERROR_VERBOSE
# ifndef yystrlen
# if defined (__GLIBC__) && defined (_STRING_H)
# define yystrlen strlen
# else
static YYSIZE_T
# if defined (__STDC__) || defined (__cplusplus)
yystrlen (const char *yystr)
# else
yystrlen (yystr)
const char *yystr;
# endif
{
const char *yys = yystr;
while (*yys++ != '\0')
continue;
return yys - yystr - 1;
}
# endif
# endif
# ifndef yystpcpy
# if defined (__GLIBC__) && defined (_STRING_H) && defined (_GNU_SOURCE)
# define yystpcpy stpcpy
# else
static char *
# if defined (__STDC__) || defined (__cplusplus)
yystpcpy (char *yydest, const char *yysrc)
# else
yystpcpy (yydest, yysrc)
char *yydest;
const char *yysrc;
# endif
{
char *yyd = yydest;
const char *yys = yysrc;
while ((*yyd++ = *yys++) != '\0')
continue;
return yyd - 1;
}
# endif
# endif
# ifndef yytnamerr
static YYSIZE_T
yytnamerr (char *yyres, const char *yystr)
{
if (*yystr == '"')
{
size_t yyn = 0;
char const *yyp = yystr;
for (;;)
switch (*++yyp)
{
case '\'':
case ',':
goto do_not_strip_quotes;
case '\\':
if (*++yyp != '\\')
goto do_not_strip_quotes;
default:
if (yyres)
yyres[yyn] = *yyp;
yyn++;
break;
case '"':
if (yyres)
yyres[yyn] = '\0';
return yyn;
}
do_not_strip_quotes: ;
}
if (! yyres)
return yystrlen (yystr);
return yystpcpy (yyres, yystr) - yyres;
}
# endif
#endif
#if YYDEBUG
#if defined (__STDC__) || defined (__cplusplus)
static void
yysymprint (FILE *yyoutput, int yytype, YYSTYPE *yyvaluep)
#else
static void
yysymprint (yyoutput, yytype, yyvaluep)
FILE *yyoutput;
int yytype;
YYSTYPE *yyvaluep;
#endif
{
(void) yyvaluep;
if (yytype < YYNTOKENS)
YYFPRINTF (yyoutput, "token %s (", yytname[yytype]);
else
YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]);
# ifdef YYPRINT
if (yytype < YYNTOKENS)
YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep);
# endif
switch (yytype)
{
default:
break;
}
YYFPRINTF (yyoutput, ")");
}
#endif
#if defined (__STDC__) || defined (__cplusplus)
static void
yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep)
#else
static void
yydestruct (yymsg, yytype, yyvaluep)
const char *yymsg;
int yytype;
YYSTYPE *yyvaluep;
#endif
{
(void) yyvaluep;
if (!yymsg)
yymsg = "Deleting";
YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp);
switch (yytype)
{
default:
break;
}
}
#ifdef YYPARSE_PARAM
# if defined (__STDC__) || defined (__cplusplus)
int yyparse (void *YYPARSE_PARAM);
# else
int yyparse ();
# endif
#else
#if defined (__STDC__) || defined (__cplusplus)
int yyparse (void);
#else
int yyparse ();
#endif
#endif
int yychar;
YYSTYPE yylval;
int yynerrs;
#ifdef YYPARSE_PARAM
# if defined (__STDC__) || defined (__cplusplus)
int yyparse (void *YYPARSE_PARAM)
# else
int yyparse (YYPARSE_PARAM)
void *YYPARSE_PARAM;
# endif
#else
#if defined (__STDC__) || defined (__cplusplus)
int
yyparse (void)
#else
int
yyparse ()
;
#endif
#endif
{
int yystate;
int yyn;
int yyresult;
int yyerrstatus;
int yytoken = 0;
short int yyssa[YYINITDEPTH];
short int *yyss = yyssa;
short int *yyssp;
YYSTYPE yyvsa[YYINITDEPTH];
YYSTYPE *yyvs = yyvsa;
YYSTYPE *yyvsp;
#define YYPOPSTACK (yyvsp--, yyssp--)
YYSIZE_T yystacksize = YYINITDEPTH;
YYSTYPE yyval;
int yylen;
YYDPRINTF ((stderr, "Starting parse\n"));
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
yychar = YYEMPTY;
yyssp = yyss;
yyvsp = yyvs;
goto yysetstate;
yynewstate:
yyssp++;
yysetstate:
*yyssp = yystate;
if (yyss + yystacksize - 1 <= yyssp)
{
YYSIZE_T yysize = yyssp - yyss + 1;
#ifdef yyoverflow
{
YYSTYPE *yyvs1 = yyvs;
short int *yyss1 = yyss;
yyoverflow (YY_("memory exhausted"),
&yyss1, yysize * sizeof (*yyssp),
&yyvs1, yysize * sizeof (*yyvsp),
&yystacksize);
yyss = yyss1;
yyvs = yyvs1;
}
#else
# ifndef YYSTACK_RELOCATE
goto yyexhaustedlab;
# else
if (YYMAXDEPTH <= yystacksize)
goto yyexhaustedlab;
yystacksize *= 2;
if (YYMAXDEPTH < yystacksize)
yystacksize = YYMAXDEPTH;
{
short int *yyss1 = yyss;
union yyalloc *yyptr =
(union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
if (! yyptr)
goto yyexhaustedlab;
YYSTACK_RELOCATE (yyss);
YYSTACK_RELOCATE (yyvs);
# undef YYSTACK_RELOCATE
if (yyss1 != yyssa)
YYSTACK_FREE (yyss1);
}
# endif
#endif
yyssp = yyss + yysize - 1;
yyvsp = yyvs + yysize - 1;
YYDPRINTF ((stderr, "Stack size increased to %lu\n",
(unsigned long int) yystacksize));
if (yyss + yystacksize - 1 <= yyssp)
YYABORT;
}
YYDPRINTF ((stderr, "Entering state %d\n", yystate));
goto yybackup;
yybackup:
yyn = yypact[yystate];
if (yyn == YYPACT_NINF)
goto yydefault;
if (yychar == YYEMPTY)
{
YYDPRINTF ((stderr, "Reading a token: "));
yychar = YYLEX;
}
if (yychar <= YYEOF)
{
yychar = yytoken = YYEOF;
YYDPRINTF ((stderr, "Now at end of input.\n"));
}
else
{
yytoken = YYTRANSLATE (yychar);
YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
}
yyn += yytoken;
if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
goto yydefault;
yyn = yytable[yyn];
if (yyn <= 0)
{
if (yyn == 0 || yyn == YYTABLE_NINF)
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
}
if (yyn == YYFINAL)
YYACCEPT;
YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
if (yychar != YYEOF)
yychar = YYEMPTY;
*++yyvsp = yylval;
if (yyerrstatus)
yyerrstatus--;
yystate = yyn;
goto yynewstate;
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
goto yyreduce;
yyreduce:
yylen = yyr2[yyn];
yyval = yyvsp[1-yylen];
YY_REDUCE_PRINT (yyn);
switch (yyn)
{
case 4:
#line 110 "getdate.y"
{ yyHaveTime++; }
break;
case 5:
#line 111 "getdate.y"
{ yyHaveZone++; }
break;
case 6:
#line 112 "getdate.y"
{ yyHaveDate++; }
break;
case 7:
#line 113 "getdate.y"
{ yyHaveDay++; }
break;
case 8:
#line 114 "getdate.y"
{ yyHaveRel++; }
break;
case 10:
#line 118 "getdate.y"
{
yyHour = (yyvsp[-1].Number);
if (yyHour == 12)
yyHour = 0;
yyMinutes = 0;
yySeconds = 0;
if ((yyvsp[0].Number) == tPM)
yyHour += 12;
}
break;
case 11:
#line 128 "getdate.y"
{
}
break;
case 12:
#line 131 "getdate.y"
{
if (yyHour == 12)
yyHour = 0;
if ((yyvsp[0].Number) == tPM)
yyHour += 12;
}
break;
case 13:
#line 138 "getdate.y"
{
yyDSTmode = DSToff;
yyTimezone = - ((yyvsp[0].Number) % 100 + ((yyvsp[0].Number) / 100) * 60);
}
break;
case 14:
#line 143 "getdate.y"
{
yyDSTmode = DSToff;
yyTimezone = + ((yyvsp[0].Number) % 100 + ((yyvsp[0].Number) / 100) * 60);
}
break;
case 15:
#line 150 "getdate.y"
{
yyHour = (yyvsp[-2].Number);
yyMinutes = (yyvsp[0].Number);
yySeconds = 0;
}
break;
case 16:
#line 155 "getdate.y"
{
yyHour = (yyvsp[-4].Number);
yyMinutes = (yyvsp[-2].Number);
yySeconds = (yyvsp[0].Number);
}
break;
case 17:
#line 162 "getdate.y"
{
yyTimezone = (yyvsp[0].Number);
yyDSTmode = DSToff;
}
break;
case 18:
#line 166 "getdate.y"
{
yyTimezone = (yyvsp[0].Number);
yyDSTmode = DSTon;
}
break;
case 19:
#line 170 "getdate.y"
{
yyTimezone = (yyvsp[-1].Number);
yyDSTmode = DSTon;
}
break;
case 20:
#line 176 "getdate.y"
{
yyDayOrdinal = 1;
yyDayNumber = (yyvsp[0].Number);
}
break;
case 21:
#line 180 "getdate.y"
{
yyDayOrdinal = 1;
yyDayNumber = (yyvsp[-1].Number);
}
break;
case 22:
#line 185 "getdate.y"
{
yyDayOrdinal = (yyvsp[-1].Number);
yyDayNumber = (yyvsp[0].Number);
}
break;
case 23:
#line 192 "getdate.y"
{
yyMonth = (yyvsp[-2].Number);
yyDay = (yyvsp[0].Number);
}
break;
case 24:
#line 197 "getdate.y"
{
if ((yyvsp[-4].Number) >= 13) {
yyYear = (yyvsp[-4].Number);
yyMonth = (yyvsp[-2].Number);
yyDay = (yyvsp[0].Number);
} else if (((yyvsp[0].Number) >= 13) || ((yyvsp[-2].Number) >= 13)) {
yyMonth = (yyvsp[-4].Number);
yyDay = (yyvsp[-2].Number);
yyYear = (yyvsp[0].Number);
} else {
yyMonth = (yyvsp[-4].Number);
yyDay = (yyvsp[-2].Number);
yyYear = (yyvsp[0].Number);
}
}
break;
case 25:
#line 216 "getdate.y"
{
yyYear = (yyvsp[-4].Number);
yyMonth = (yyvsp[-2].Number);
yyDay = (yyvsp[0].Number);
}
break;
case 26:
#line 222 "getdate.y"
{
if ((yyvsp[-4].Number) > 31) {
yyYear = (yyvsp[-4].Number);
yyMonth = (yyvsp[-2].Number);
yyDay = (yyvsp[0].Number);
} else {
yyDay = (yyvsp[-4].Number);
yyMonth = (yyvsp[-2].Number);
yyYear = (yyvsp[0].Number);
}
}
break;
case 27:
#line 235 "getdate.y"
{
yyMonth = (yyvsp[-1].Number);
yyDay = (yyvsp[0].Number);
}
break;
case 28:
#line 240 "getdate.y"
{
yyMonth = (yyvsp[-3].Number);
yyDay = (yyvsp[-2].Number);
yyYear = (yyvsp[0].Number);
}
break;
case 29:
#line 246 "getdate.y"
{
yyDay = (yyvsp[-1].Number);
yyMonth = (yyvsp[0].Number);
}
break;
case 30:
#line 251 "getdate.y"
{
yyDay = (yyvsp[-2].Number);
yyMonth = (yyvsp[-1].Number);
yyYear = (yyvsp[0].Number);
}
break;
case 31:
#line 259 "getdate.y"
{
yyRelSeconds = -yyRelSeconds;
yyRelMonth = -yyRelMonth;
}
break;
case 33:
#line 266 "getdate.y"
{
yyRelSeconds -= (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 34:
#line 270 "getdate.y"
{
yyRelSeconds += (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 35:
#line 274 "getdate.y"
{
yyRelSeconds += (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 36:
#line 278 "getdate.y"
{
yyRelSeconds += (yyvsp[0].Number);
}
break;
case 37:
#line 282 "getdate.y"
{
yyRelMonth -= (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 38:
#line 286 "getdate.y"
{
yyRelMonth += (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 39:
#line 290 "getdate.y"
{
yyRelMonth += (yyvsp[-1].Number) * (yyvsp[0].Number);
}
break;
case 40:
#line 294 "getdate.y"
{
yyRelMonth += (yyvsp[0].Number);
}
break;
case 41:
#line 300 "getdate.y"
{
if (yyHaveTime && yyHaveDate && !yyHaveRel)
yyYear = (yyvsp[0].Number);
else {
if((yyvsp[0].Number)>10000) {
yyHaveDate++;
yyDay= ((yyvsp[0].Number))%100;
yyMonth= ((yyvsp[0].Number)/100)%100;
yyYear = (yyvsp[0].Number)/10000;
}
else {
yyHaveTime++;
if ((yyvsp[0].Number) < 100) {
yyHour = (yyvsp[0].Number);
yyMinutes = 0;
}
else {
yyHour = (yyvsp[0].Number) / 100;
yyMinutes = (yyvsp[0].Number) % 100;
}
yySeconds = 0;
}
}
}
break;
default: break;
}
#line 1592 "tar/getdate.c"
yyvsp -= yylen;
yyssp -= yylen;
YY_STACK_PRINT (yyss, yyssp);
*++yyvsp = yyval;
yyn = yyr1[yyn];
yystate = yypgoto[yyn - YYNTOKENS] + *yyssp;
if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp)
yystate = yytable[yystate];
else
yystate = yydefgoto[yyn - YYNTOKENS];
goto yynewstate;
yyerrlab:
if (!yyerrstatus)
{
++yynerrs;
#if YYERROR_VERBOSE
yyn = yypact[yystate];
if (YYPACT_NINF < yyn && yyn < YYLAST)
{
int yytype = YYTRANSLATE (yychar);
YYSIZE_T yysize0 = yytnamerr (0, yytname[yytype]);
YYSIZE_T yysize = yysize0;
YYSIZE_T yysize1;
int yysize_overflow = 0;
char *yymsg = 0;
# define YYERROR_VERBOSE_ARGS_MAXIMUM 5
char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM];
int yyx;
#if 0
YY_("syntax error, unexpected %s");
YY_("syntax error, unexpected %s, expecting %s");
YY_("syntax error, unexpected %s, expecting %s or %s");
YY_("syntax error, unexpected %s, expecting %s or %s or %s");
YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s");
#endif
char *yyfmt;
char const *yyf;
static char const yyunexpected[] = "syntax error, unexpected %s";
static char const yyexpecting[] = ", expecting %s";
static char const yyor[] = " or %s";
char yyformat[sizeof yyunexpected
+ sizeof yyexpecting - 1
+ ((YYERROR_VERBOSE_ARGS_MAXIMUM - 2)
* (sizeof yyor - 1))];
char const *yyprefix = yyexpecting;
int yyxbegin = yyn < 0 ? -yyn : 0;
int yychecklim = YYLAST - yyn;
int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
int yycount = 1;
yyarg[0] = yytname[yytype];
yyfmt = yystpcpy (yyformat, yyunexpected);
for (yyx = yyxbegin; yyx < yyxend; ++yyx)
if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
{
if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM)
{
yycount = 1;
yysize = yysize0;
yyformat[sizeof yyunexpected - 1] = '\0';
break;
}
yyarg[yycount++] = yytname[yyx];
yysize1 = yysize + yytnamerr (0, yytname[yyx]);
yysize_overflow |= yysize1 < yysize;
yysize = yysize1;
yyfmt = yystpcpy (yyfmt, yyprefix);
yyprefix = yyor;
}
yyf = YY_(yyformat);
yysize1 = yysize + yystrlen (yyf);
yysize_overflow |= yysize1 < yysize;
yysize = yysize1;
if (!yysize_overflow && yysize <= YYSTACK_ALLOC_MAXIMUM)
yymsg = (char *) YYSTACK_ALLOC (yysize);
if (yymsg)
{
char *yyp = yymsg;
int yyi = 0;
while ((*yyp = *yyf))
{
if (*yyp == '%' && yyf[1] == 's' && yyi < yycount)
{
yyp += yytnamerr (yyp, yyarg[yyi++]);
yyf += 2;
}
else
{
yyp++;
yyf++;
}
}
yyerror (yymsg);
YYSTACK_FREE (yymsg);
}
else
{
yyerror (YY_("syntax error"));
goto yyexhaustedlab;
}
}
else
#endif
yyerror (YY_("syntax error"));
}
if (yyerrstatus == 3)
{
if (yychar <= YYEOF)
{
if (yychar == YYEOF)
YYABORT;
}
else
{
yydestruct ("Error: discarding", yytoken, &yylval);
yychar = YYEMPTY;
}
}
goto yyerrlab1;
yyerrorlab:
if (0)
goto yyerrorlab;
yyvsp -= yylen;
yyssp -= yylen;
yystate = *yyssp;
goto yyerrlab1;
yyerrlab1:
yyerrstatus = 3;
for (;;)
{
yyn = yypact[yystate];
if (yyn != YYPACT_NINF)
{
yyn += YYTERROR;
if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
{
yyn = yytable[yyn];
if (0 < yyn)
break;
}
}
if (yyssp == yyss)
YYABORT;
yydestruct ("Error: popping", yystos[yystate], yyvsp);
YYPOPSTACK;
yystate = *yyssp;
YY_STACK_PRINT (yyss, yyssp);
}
if (yyn == YYFINAL)
YYACCEPT;
*++yyvsp = yylval;
YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
yystate = yyn;
goto yynewstate;
yyacceptlab:
yyresult = 0;
goto yyreturn;
yyabortlab:
yyresult = 1;
goto yyreturn;
#ifndef yyoverflow
yyexhaustedlab:
yyerror (YY_("memory exhausted"));
yyresult = 2;
#endif
yyreturn:
if (yychar != YYEOF && yychar != YYEMPTY)
yydestruct ("Cleanup: discarding lookahead",
yytoken, &yylval);
while (yyssp != yyss)
{
yydestruct ("Cleanup: popping",
yystos[*yyssp], yyvsp);
YYPOPSTACK;
}
#ifndef yyoverflow
if (yyss != yyssa)
YYSTACK_FREE (yyss);
#endif
return yyresult;
}
#line 329 "getdate.y"
static struct TABLE {
size_t abbrev;
const char *name;
int type;
time_t value;
} const TimeWords[] = {
{ 0, "am", tAMPM, tAM },
{ 0, "pm", tAMPM, tPM },
{ 3, "january", tMONTH, 1 },
{ 3, "february", tMONTH, 2 },
{ 3, "march", tMONTH, 3 },
{ 3, "april", tMONTH, 4 },
{ 3, "may", tMONTH, 5 },
{ 3, "june", tMONTH, 6 },
{ 3, "july", tMONTH, 7 },
{ 3, "august", tMONTH, 8 },
{ 3, "september", tMONTH, 9 },
{ 3, "october", tMONTH, 10 },
{ 3, "november", tMONTH, 11 },
{ 3, "december", tMONTH, 12 },
{ 2, "sunday", tDAY, 0 },
{ 3, "monday", tDAY, 1 },
{ 2, "tuesday", tDAY, 2 },
{ 3, "wednesday", tDAY, 3 },
{ 2, "thursday", tDAY, 4 },
{ 2, "friday", tDAY, 5 },
{ 2, "saturday", tDAY, 6 },
{ 0, "gmt", tZONE, HOUR( 0) },
{ 0, "ut", tZONE, HOUR( 0) },
{ 0, "utc", tZONE, HOUR( 0) },
{ 0, "wet", tZONE, HOUR( 0) },
{ 0, "bst", tDAYZONE, HOUR( 0) },
{ 0, "wat", tZONE, HOUR( 1) },
{ 0, "at", tZONE, HOUR( 2) },
{ 0, "nft", tZONE, HOUR(3)+30 },
{ 0, "nst", tZONE, HOUR(3)+30 },
{ 0, "ndt", tDAYZONE, HOUR(3)+30 },
{ 0, "ast", tZONE, HOUR( 4) },
{ 0, "adt", tDAYZONE, HOUR( 4) },
{ 0, "est", tZONE, HOUR( 5) },
{ 0, "edt", tDAYZONE, HOUR( 5) },
{ 0, "cst", tZONE, HOUR( 6) },
{ 0, "cdt", tDAYZONE, HOUR( 6) },
{ 0, "mst", tZONE, HOUR( 7) },
{ 0, "mdt", tDAYZONE, HOUR( 7) },
{ 0, "pst", tZONE, HOUR( 8) },
{ 0, "pdt", tDAYZONE, HOUR( 8) },
{ 0, "yst", tZONE, HOUR( 9) },
{ 0, "ydt", tDAYZONE, HOUR( 9) },
{ 0, "hst", tZONE, HOUR(10) },
{ 0, "hdt", tDAYZONE, HOUR(10) },
{ 0, "cat", tZONE, HOUR(10) },
{ 0, "ahst", tZONE, HOUR(10) },
{ 0, "nt", tZONE, HOUR(11) },
{ 0, "idlw", tZONE, HOUR(12) },
{ 0, "cet", tZONE, -HOUR(1) },
{ 0, "met", tZONE, -HOUR(1) },
{ 0, "mewt", tZONE, -HOUR(1) },
{ 0, "mest", tDAYZONE, -HOUR(1) },
{ 0, "swt", tZONE, -HOUR(1) },
{ 0, "sst", tDAYZONE, -HOUR(1) },
{ 0, "fwt", tZONE, -HOUR(1) },
{ 0, "fst", tDAYZONE, -HOUR(1) },
{ 0, "eet", tZONE, -HOUR(2) },
{ 0, "bt", tZONE, -HOUR(3) },
{ 0, "it", tZONE, -HOUR(3)-30 },
{ 0, "zp4", tZONE, -HOUR(4) },
{ 0, "zp5", tZONE, -HOUR(5) },
{ 0, "ist", tZONE, -HOUR(5)-30 },
{ 0, "zp6", tZONE, -HOUR(6) },
{ 0, "wast", tZONE, -HOUR(7) },
{ 0, "wadt", tDAYZONE, -HOUR(7) },
{ 0, "jt", tZONE, -HOUR(7)-30 },
{ 0, "cct", tZONE, -HOUR(8) },
{ 0, "jst", tZONE, -HOUR(9) },
{ 0, "cast", tZONE, -HOUR(9)-30 },
{ 0, "cadt", tDAYZONE, -HOUR(9)-30 },
{ 0, "east", tZONE, -HOUR(10) },
{ 0, "eadt", tDAYZONE, -HOUR(10) },
{ 0, "gst", tZONE, -HOUR(10) },
{ 0, "nzt", tZONE, -HOUR(12) },
{ 0, "nzst", tZONE, -HOUR(12) },
{ 0, "nzdt", tDAYZONE, -HOUR(12) },
{ 0, "idle", tZONE, -HOUR(12) },
{ 0, "dst", tDST, 0 },
{ 4, "years", tMONTH_UNIT, 12 },
{ 5, "months", tMONTH_UNIT, 1 },
{ 9, "fortnights", tSEC_UNIT, 14 * 24 * 60 * 60 },
{ 4, "weeks", tSEC_UNIT, 7 * 24 * 60 * 60 },
{ 3, "days", tSEC_UNIT, 1 * 24 * 60 * 60 },
{ 4, "hours", tSEC_UNIT, 60 * 60 },
{ 3, "minutes", tSEC_UNIT, 60 },
{ 3, "seconds", tSEC_UNIT, 1 },
{ 0, "tomorrow", tSEC_UNIT, 1 * 24 * 60 * 60 },
{ 0, "yesterday", tSEC_UNIT, -1 * 24 * 60 * 60 },
{ 0, "today", tSEC_UNIT, 0 },
{ 0, "now", tSEC_UNIT, 0 },
{ 0, "last", tUNUMBER, -1 },
{ 0, "this", tSEC_UNIT, 0 },
{ 0, "next", tUNUMBER, 2 },
{ 0, "first", tUNUMBER, 1 },
{ 0, "1st", tUNUMBER, 1 },
{ 0, "2nd", tUNUMBER, 2 },
{ 0, "third", tUNUMBER, 3 },
{ 0, "3rd", tUNUMBER, 3 },
{ 0, "fourth", tUNUMBER, 4 },
{ 0, "4th", tUNUMBER, 4 },
{ 0, "fifth", tUNUMBER, 5 },
{ 0, "5th", tUNUMBER, 5 },
{ 0, "sixth", tUNUMBER, 6 },
{ 0, "seventh", tUNUMBER, 7 },
{ 0, "eighth", tUNUMBER, 8 },
{ 0, "ninth", tUNUMBER, 9 },
{ 0, "tenth", tUNUMBER, 10 },
{ 0, "eleventh", tUNUMBER, 11 },
{ 0, "twelfth", tUNUMBER, 12 },
{ 0, "ago", tAGO, 1 },
{ 0, "a", tZONE, HOUR( 1) },
{ 0, "b", tZONE, HOUR( 2) },
{ 0, "c", tZONE, HOUR( 3) },
{ 0, "d", tZONE, HOUR( 4) },
{ 0, "e", tZONE, HOUR( 5) },
{ 0, "f", tZONE, HOUR( 6) },
{ 0, "g", tZONE, HOUR( 7) },
{ 0, "h", tZONE, HOUR( 8) },
{ 0, "i", tZONE, HOUR( 9) },
{ 0, "k", tZONE, HOUR( 10) },
{ 0, "l", tZONE, HOUR( 11) },
{ 0, "m", tZONE, HOUR( 12) },
{ 0, "n", tZONE, HOUR(- 1) },
{ 0, "o", tZONE, HOUR(- 2) },
{ 0, "p", tZONE, HOUR(- 3) },
{ 0, "q", tZONE, HOUR(- 4) },
{ 0, "r", tZONE, HOUR(- 5) },
{ 0, "s", tZONE, HOUR(- 6) },
{ 0, "t", tZONE, HOUR(- 7) },
{ 0, "u", tZONE, HOUR(- 8) },
{ 0, "v", tZONE, HOUR(- 9) },
{ 0, "w", tZONE, HOUR(-10) },
{ 0, "x", tZONE, HOUR(-11) },
{ 0, "y", tZONE, HOUR(-12) },
{ 0, "z", tZONE, HOUR( 0) },
{ 0, NULL, 0, 0 }
};
static int
yyerror(const char *s)
{
(void)s;
return 0;
}
static time_t
ToSeconds(time_t Hours, time_t Minutes, time_t Seconds)
{
if (Minutes < 0 || Minutes > 59 || Seconds < 0 || Seconds > 59)
return -1;
if (Hours < 0 || Hours > 23)
return -1;
return (Hours * 60L + Minutes) * 60L + Seconds;
}
static time_t
Convert(time_t Month, time_t Day, time_t Year,
time_t Hours, time_t Minutes, time_t Seconds, DSTMODE DSTmode)
{
static int DaysInMonth[12] = {
31, 0, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31
};
time_t tod;
time_t Julian;
int i;
if (Year < 69)
Year += 2000;
else if (Year < 100)
Year += 1900;
DaysInMonth[1] = Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0)
? 29 : 28;
if (Year < EPOCH || Year > 2038
|| Month < 1 || Month > 12
|| Day < 1 || Day > DaysInMonth[(int)--Month])
return -1;
Julian = Day - 1;
for (i = 0; i < Month; i++)
Julian += DaysInMonth[i];
for (i = EPOCH; i < Year; i++)
Julian += 365 + (i % 4 == 0);
Julian *= SECSPERDAY;
Julian += yyTimezone * 60L;
if ((tod = ToSeconds(Hours, Minutes, Seconds)) < 0)
return -1;
Julian += tod;
if (DSTmode == DSTon
|| (DSTmode == DSTmaybe && localtime(&Julian)->tm_isdst))
Julian -= 60 * 60;
return Julian;
}
static time_t
DSTcorrect(time_t Start, time_t Future)
{
time_t StartDay;
time_t FutureDay;
StartDay = (localtime(&Start)->tm_hour + 1) % 24;
FutureDay = (localtime(&Future)->tm_hour + 1) % 24;
return (Future - Start) + (StartDay - FutureDay) * 60L * 60L;
}
static time_t
RelativeDate(time_t Start, time_t DayOrdinal, time_t DayNumber)
{
struct tm *tm;
time_t now;
now = Start;
tm = localtime(&now);
now += SECSPERDAY * ((DayNumber - tm->tm_wday + 7) % 7);
now += 7 * SECSPERDAY * (DayOrdinal <= 0 ? DayOrdinal : DayOrdinal - 1);
return DSTcorrect(Start, now);
}
static time_t
RelativeMonth(time_t Start, time_t RelMonth)
{
struct tm *tm;
time_t Month;
time_t Year;
if (RelMonth == 0)
return 0;
tm = localtime(&Start);
Month = 12 * (tm->tm_year + 1900) + tm->tm_mon + RelMonth;
Year = Month / 12;
Month = Month % 12 + 1;
return DSTcorrect(Start,
Convert(Month, (time_t)tm->tm_mday, Year,
(time_t)tm->tm_hour, (time_t)tm->tm_min, (time_t)tm->tm_sec,
DSTmaybe));
}
static int
yylex(void)
{
char c;
char buff[64];
for ( ; ; ) {
while (isspace((unsigned char)*yyInput))
yyInput++;
if (*yyInput == '(') {
int Count = 0;
do {
c = *yyInput++;
if (c == '\0')
return c;
if (c == '(')
Count++;
else if (c == ')')
Count--;
} while (Count > 0);
continue;
}
{
char *src = yyInput;
const struct TABLE *tp;
unsigned i = 0;
while (*src != '\0'
&& (isalnum((unsigned char)*src) || *src == '.')
&& i < sizeof(buff)-1) {
if (*src != '.') {
if (isupper((unsigned char)*src))
buff[i++] = tolower((unsigned char)*src);
else
buff[i++] = *src;
}
src++;
}
buff[i++] = '\0';
for (tp = TimeWords; tp->name; tp++) {
size_t abbrev = tp->abbrev;
if (abbrev == 0)
abbrev = strlen(tp->name);
if (strlen(buff) >= abbrev
&& strncmp(tp->name, buff, strlen(buff))
== 0) {
yyInput = src;
yylval.Number = tp->value;
return tp->type;
}
}
}
if (isdigit((unsigned char)(c = *yyInput))) {
for (yylval.Number = 0; isdigit((unsigned char)(c = *yyInput++)); )
yylval.Number = 10 * yylval.Number + c - '0';
yyInput--;
return (tUNUMBER);
}
return (*yyInput++);
}
}
#define TM_YEAR_ORIGIN 1900
static long
difftm (struct tm *a, struct tm *b)
{
int ay = a->tm_year + (TM_YEAR_ORIGIN - 1);
int by = b->tm_year + (TM_YEAR_ORIGIN - 1);
int days = (
a->tm_yday - b->tm_yday
+ ((ay >> 2) - (by >> 2))
- (ay/100 - by/100)
+ ((ay/100 >> 2) - (by/100 >> 2))
+ (long)(ay-by) * 365
);
return (60*(60*(24*days + (a->tm_hour - b->tm_hour))
+ (a->tm_min - b->tm_min))
+ (a->tm_sec - b->tm_sec));
}
time_t
get_date(char *p)
{
struct tm *tm;
struct tm gmt, *gmt_ptr;
time_t Start;
time_t tod;
time_t nowtime;
long tzone;
memset(&gmt, 0, sizeof(gmt));
yyInput = p;
(void)time (&nowtime);
gmt_ptr = gmtime (&nowtime);
if (gmt_ptr != NULL) {
gmt = *gmt_ptr;
}
if (! (tm = localtime (&nowtime)))
return -1;
if (gmt_ptr != NULL)
tzone = difftm (&gmt, tm) / 60;
else
tzone = 0;
if(tm->tm_isdst)
tzone += 60;
yyYear = tm->tm_year + 1900;
yyMonth = tm->tm_mon + 1;
yyDay = tm->tm_mday;
yyTimezone = tzone;
yyDSTmode = DSTmaybe;
yyHour = 0;
yyMinutes = 0;
yySeconds = 0;
yyRelSeconds = 0;
yyRelMonth = 0;
yyHaveDate = 0;
yyHaveDay = 0;
yyHaveRel = 0;
yyHaveTime = 0;
yyHaveZone = 0;
if (yyparse()
|| yyHaveTime > 1 || yyHaveZone > 1
|| yyHaveDate > 1 || yyHaveDay > 1)
return -1;
if (yyHaveDate || yyHaveTime || yyHaveDay) {
Start = Convert(yyMonth, yyDay, yyYear,
yyHour, yyMinutes, yySeconds, yyDSTmode);
if (Start < 0)
return -1;
} else {
Start = nowtime;
if (!yyHaveRel)
Start -= ((tm->tm_hour * 60L + tm->tm_min) * 60L) + tm->tm_sec;
}
Start += yyRelSeconds;
Start += RelativeMonth(Start, yyRelMonth);
if (yyHaveDay && !yyHaveDate) {
tod = RelativeDate(Start, yyDayOrdinal, yyDayNumber);
Start += tod;
}
return Start == -1 ? 0 : Start;
}
#if defined(TEST)
int
main(int argc, char **argv)
{
time_t d;
while (*++argv != NULL) {
(void)printf("Input: %s\n", *argv);
d = get_date(*argv);
if (d == -1)
(void)printf("Bad format - couldn't convert.\n");
else
(void)printf("Output: %s\n", ctime(&d));
}
exit(0);
}
#endif