17c478bd9Sstevel@tonic-gate %{
27c478bd9Sstevel@tonic-gate /*
3fe0e7ec4Smaheshvs * Copyright 2005 Sun Microsystems, Inc. All rights reserved.
4fe0e7ec4Smaheshvs * Use is subject to license terms.
57c478bd9Sstevel@tonic-gate */
67c478bd9Sstevel@tonic-gate
77c478bd9Sstevel@tonic-gate /* $OrigRevision: 2.1 $
87c478bd9Sstevel@tonic-gate **
97c478bd9Sstevel@tonic-gate ** Originally written by Steven M. Bellovin <smb@research.att.com> while
107c478bd9Sstevel@tonic-gate ** at the University of North Carolina at Chapel Hill. Later tweaked by
117c478bd9Sstevel@tonic-gate ** a couple of people on Usenet. Completely overhauled by Rich $alz
127c478bd9Sstevel@tonic-gate ** <rsalz@bbn.com> and Jim Berets <jberets@bbn.com> in August, 1990;
137c478bd9Sstevel@tonic-gate ** send any email to Rich.
147c478bd9Sstevel@tonic-gate **
157c478bd9Sstevel@tonic-gate ** This grammar has eight shift/reduce conflicts.
167c478bd9Sstevel@tonic-gate **
177c478bd9Sstevel@tonic-gate ** This code is in the public domain and has no copyright.
187c478bd9Sstevel@tonic-gate */
197c478bd9Sstevel@tonic-gate /* SUPPRESS 287 on yaccpar_sccsid *//* Unusd static variable */
207c478bd9Sstevel@tonic-gate /* SUPPRESS 288 on yyerrlab *//* Label unused */
217c478bd9Sstevel@tonic-gate #include <stdio.h>
227c478bd9Sstevel@tonic-gate #include <ctype.h>
237c478bd9Sstevel@tonic-gate
247c478bd9Sstevel@tonic-gate #include <sys/types.h>
257c478bd9Sstevel@tonic-gate #define NEED_TZSET
267c478bd9Sstevel@tonic-gate struct timeb {
277c478bd9Sstevel@tonic-gate time_t time; /* Seconds since the epoch */
287c478bd9Sstevel@tonic-gate unsigned short millitm; /* Field not used */
297c478bd9Sstevel@tonic-gate short timezone;
307c478bd9Sstevel@tonic-gate short dstflag; /* Field not used */
317c478bd9Sstevel@tonic-gate };
327c478bd9Sstevel@tonic-gate #include <time.h>
337c478bd9Sstevel@tonic-gate
347c478bd9Sstevel@tonic-gate #include <locale.h>
357c478bd9Sstevel@tonic-gate #include <string.h>
367c478bd9Sstevel@tonic-gate #include <stdlib.h>
377c478bd9Sstevel@tonic-gate #include <note.h>
387c478bd9Sstevel@tonic-gate #include <libintl.h>
397c478bd9Sstevel@tonic-gate
407c478bd9Sstevel@tonic-gate #if !defined(lint) && !defined(SABER)
417c478bd9Sstevel@tonic-gate static char RCS[] =
427c478bd9Sstevel@tonic-gate "$Header: /home/laramie/berliner/ws/backup/usr/src/cmd/backup/lib/getdate.y,v 1.5 1992/06/09 21:46:21 sam Exp $";
437c478bd9Sstevel@tonic-gate #endif /* !defined(lint) && !defined(SABER) */
447c478bd9Sstevel@tonic-gate
457c478bd9Sstevel@tonic-gate
467c478bd9Sstevel@tonic-gate #define EPOCH 1970
477c478bd9Sstevel@tonic-gate #define HOURN(x) (x * 60)
487c478bd9Sstevel@tonic-gate #define SECSPERDAY (24L * 60L * 60L)
497c478bd9Sstevel@tonic-gate
50*2a8bcb4eSToomas Soome #define CHECK_TM(y) (((y) % 100) < 70 ? (y) + 2000 : (y) + 1900)
517c478bd9Sstevel@tonic-gate
527c478bd9Sstevel@tonic-gate /*
537c478bd9Sstevel@tonic-gate ** An entry in the lexical lookup table.
547c478bd9Sstevel@tonic-gate */
557c478bd9Sstevel@tonic-gate typedef struct _TABLE {
567c478bd9Sstevel@tonic-gate char *name;
577c478bd9Sstevel@tonic-gate int type;
587c478bd9Sstevel@tonic-gate time_t value;
597c478bd9Sstevel@tonic-gate } TABLE;
607c478bd9Sstevel@tonic-gate
617c478bd9Sstevel@tonic-gate
627c478bd9Sstevel@tonic-gate /*
637c478bd9Sstevel@tonic-gate ** Daylight-savings mode: on, off, or not yet known.
647c478bd9Sstevel@tonic-gate */
657c478bd9Sstevel@tonic-gate typedef enum _DSTMODE {
667c478bd9Sstevel@tonic-gate DSTon, DSToff, DSTmaybe
677c478bd9Sstevel@tonic-gate } DSTMODE;
687c478bd9Sstevel@tonic-gate
697c478bd9Sstevel@tonic-gate /*
707c478bd9Sstevel@tonic-gate ** Meridian: am, pm, or 24-hour style.
717c478bd9Sstevel@tonic-gate */
727c478bd9Sstevel@tonic-gate typedef enum _MERIDIAN {
737c478bd9Sstevel@tonic-gate MERam, MERpm, MER24
747c478bd9Sstevel@tonic-gate } MERIDIAN;
757c478bd9Sstevel@tonic-gate
767c478bd9Sstevel@tonic-gate
777c478bd9Sstevel@tonic-gate /*
787c478bd9Sstevel@tonic-gate ** Global variables. We could get rid of most of these by using a good
797c478bd9Sstevel@tonic-gate ** union as the yacc stack. (This routine was originally written before
807c478bd9Sstevel@tonic-gate ** yacc had the %union construct.) Maybe someday; right now we only use
817c478bd9Sstevel@tonic-gate ** the %union very rarely.
827c478bd9Sstevel@tonic-gate */
837c478bd9Sstevel@tonic-gate static char *yyInput;
847c478bd9Sstevel@tonic-gate static DSTMODE yyDSTmode;
857c478bd9Sstevel@tonic-gate static time_t yyDayOrdinal;
867c478bd9Sstevel@tonic-gate static time_t yyDayNumber;
877c478bd9Sstevel@tonic-gate static int yyHaveDate;
887c478bd9Sstevel@tonic-gate static int yyHaveDay;
897c478bd9Sstevel@tonic-gate static int yyHaveRel;
907c478bd9Sstevel@tonic-gate static int yyHaveTime;
917c478bd9Sstevel@tonic-gate static int yyHaveZone;
927c478bd9Sstevel@tonic-gate static time_t yyTimezone;
937c478bd9Sstevel@tonic-gate static time_t yyDay;
947c478bd9Sstevel@tonic-gate static time_t yyHour;
957c478bd9Sstevel@tonic-gate static time_t yyMinutes;
967c478bd9Sstevel@tonic-gate static time_t yyMonth;
977c478bd9Sstevel@tonic-gate static time_t yySeconds;
987c478bd9Sstevel@tonic-gate static time_t yyYear;
997c478bd9Sstevel@tonic-gate static MERIDIAN yyMeridian;
1007c478bd9Sstevel@tonic-gate static time_t yyRelMonth;
1017c478bd9Sstevel@tonic-gate static time_t yyRelSeconds;
1027c478bd9Sstevel@tonic-gate
1037c478bd9Sstevel@tonic-gate static char *domainname = "hsm_libdump"; /* for dgettext() */
1047c478bd9Sstevel@tonic-gate
1057c478bd9Sstevel@tonic-gate #define yylex 1 /* suppress yacc's definition */
1067c478bd9Sstevel@tonic-gate %}
1077c478bd9Sstevel@tonic-gate
1087c478bd9Sstevel@tonic-gate %union {
1097c478bd9Sstevel@tonic-gate time_t Number;
1107c478bd9Sstevel@tonic-gate enum _MERIDIAN Meridian;
1117c478bd9Sstevel@tonic-gate }
1127c478bd9Sstevel@tonic-gate
1137c478bd9Sstevel@tonic-gate %token tAGO tDAY tDAYZONE tID tMERIDIAN tMINUTE_UNIT tMONTH tMONTH_UNIT
1147c478bd9Sstevel@tonic-gate %token tSEC_UNIT tSNUMBER tUNUMBER tZONE
1157c478bd9Sstevel@tonic-gate
1167c478bd9Sstevel@tonic-gate %type <Number> tDAY tDAYZONE tMINUTE_UNIT tMONTH tMONTH_UNIT
1177c478bd9Sstevel@tonic-gate %type <Number> tSEC_UNIT tSNUMBER tUNUMBER tZONE
1187c478bd9Sstevel@tonic-gate %type <Meridian> tMERIDIAN o_merid
1197c478bd9Sstevel@tonic-gate
1207c478bd9Sstevel@tonic-gate %%
1217c478bd9Sstevel@tonic-gate
1227c478bd9Sstevel@tonic-gate spec : /* NULL */
1237c478bd9Sstevel@tonic-gate | spec item
1247c478bd9Sstevel@tonic-gate ;
1257c478bd9Sstevel@tonic-gate
1267c478bd9Sstevel@tonic-gate item : time {
1277c478bd9Sstevel@tonic-gate yyHaveTime++;
1287c478bd9Sstevel@tonic-gate }
1297c478bd9Sstevel@tonic-gate | zone {
1307c478bd9Sstevel@tonic-gate yyHaveZone++;
1317c478bd9Sstevel@tonic-gate }
1327c478bd9Sstevel@tonic-gate | date {
1337c478bd9Sstevel@tonic-gate yyHaveDate++;
1347c478bd9Sstevel@tonic-gate }
1357c478bd9Sstevel@tonic-gate | day {
1367c478bd9Sstevel@tonic-gate yyHaveDay++;
1377c478bd9Sstevel@tonic-gate }
1387c478bd9Sstevel@tonic-gate | rel {
1397c478bd9Sstevel@tonic-gate yyHaveRel++;
1407c478bd9Sstevel@tonic-gate }
1417c478bd9Sstevel@tonic-gate | number
1427c478bd9Sstevel@tonic-gate ;
1437c478bd9Sstevel@tonic-gate
1447c478bd9Sstevel@tonic-gate time : tUNUMBER tMERIDIAN {
1457c478bd9Sstevel@tonic-gate yyHour = $1;
1467c478bd9Sstevel@tonic-gate yyMinutes = 0;
1477c478bd9Sstevel@tonic-gate yySeconds = 0;
1487c478bd9Sstevel@tonic-gate yyMeridian = $2;
1497c478bd9Sstevel@tonic-gate }
1507c478bd9Sstevel@tonic-gate | tUNUMBER ':' tUNUMBER o_merid {
1517c478bd9Sstevel@tonic-gate yyHour = $1;
1527c478bd9Sstevel@tonic-gate yyMinutes = $3;
1537c478bd9Sstevel@tonic-gate yySeconds = 0;
1547c478bd9Sstevel@tonic-gate yyMeridian = $4;
1557c478bd9Sstevel@tonic-gate }
1567c478bd9Sstevel@tonic-gate | tUNUMBER ':' tUNUMBER tSNUMBER {
1577c478bd9Sstevel@tonic-gate yyHour = $1;
1587c478bd9Sstevel@tonic-gate yyMinutes = $3;
1597c478bd9Sstevel@tonic-gate yyMeridian = MER24;
1607c478bd9Sstevel@tonic-gate yyDSTmode = DSToff;
1617c478bd9Sstevel@tonic-gate yyTimezone = - ($4 % 100 + ($4 / 100) * 60);
1627c478bd9Sstevel@tonic-gate }
1637c478bd9Sstevel@tonic-gate | tUNUMBER ':' tUNUMBER ':' tUNUMBER o_merid {
1647c478bd9Sstevel@tonic-gate yyHour = $1;
1657c478bd9Sstevel@tonic-gate yyMinutes = $3;
1667c478bd9Sstevel@tonic-gate yySeconds = $5;
1677c478bd9Sstevel@tonic-gate yyMeridian = $6;
1687c478bd9Sstevel@tonic-gate }
1697c478bd9Sstevel@tonic-gate | tUNUMBER ':' tUNUMBER ':' tUNUMBER tSNUMBER {
1707c478bd9Sstevel@tonic-gate yyHour = $1;
1717c478bd9Sstevel@tonic-gate yyMinutes = $3;
1727c478bd9Sstevel@tonic-gate yySeconds = $5;
1737c478bd9Sstevel@tonic-gate yyMeridian = MER24;
1747c478bd9Sstevel@tonic-gate yyDSTmode = DSToff;
1757c478bd9Sstevel@tonic-gate yyTimezone = - ($6 % 100 + ($6 / 100) * 60);
1767c478bd9Sstevel@tonic-gate }
1777c478bd9Sstevel@tonic-gate ;
1787c478bd9Sstevel@tonic-gate
1797c478bd9Sstevel@tonic-gate zone : tZONE {
1807c478bd9Sstevel@tonic-gate yyTimezone = $1;
1817c478bd9Sstevel@tonic-gate yyDSTmode = DSToff;
1827c478bd9Sstevel@tonic-gate }
1837c478bd9Sstevel@tonic-gate | tDAYZONE {
1847c478bd9Sstevel@tonic-gate yyTimezone = $1;
1857c478bd9Sstevel@tonic-gate yyDSTmode = DSTon;
1867c478bd9Sstevel@tonic-gate }
1877c478bd9Sstevel@tonic-gate ;
1887c478bd9Sstevel@tonic-gate
1897c478bd9Sstevel@tonic-gate day : tDAY {
1907c478bd9Sstevel@tonic-gate yyDayOrdinal = 1;
1917c478bd9Sstevel@tonic-gate yyDayNumber = $1;
1927c478bd9Sstevel@tonic-gate }
1937c478bd9Sstevel@tonic-gate | tDAY ',' {
1947c478bd9Sstevel@tonic-gate yyDayOrdinal = 1;
1957c478bd9Sstevel@tonic-gate yyDayNumber = $1;
1967c478bd9Sstevel@tonic-gate }
1977c478bd9Sstevel@tonic-gate | tUNUMBER tDAY {
1987c478bd9Sstevel@tonic-gate yyDayOrdinal = $1;
1997c478bd9Sstevel@tonic-gate yyDayNumber = $2;
2007c478bd9Sstevel@tonic-gate }
2017c478bd9Sstevel@tonic-gate ;
2027c478bd9Sstevel@tonic-gate
2037c478bd9Sstevel@tonic-gate date : tUNUMBER '/' tUNUMBER {
2047c478bd9Sstevel@tonic-gate yyMonth = $1;
2057c478bd9Sstevel@tonic-gate yyDay = $3;
2067c478bd9Sstevel@tonic-gate }
2077c478bd9Sstevel@tonic-gate | tUNUMBER '/' tUNUMBER '/' tUNUMBER {
2087c478bd9Sstevel@tonic-gate yyMonth = $1;
2097c478bd9Sstevel@tonic-gate yyDay = $3;
2107c478bd9Sstevel@tonic-gate yyYear = $5;
2117c478bd9Sstevel@tonic-gate }
2127c478bd9Sstevel@tonic-gate | tMONTH tUNUMBER {
2137c478bd9Sstevel@tonic-gate yyMonth = $1;
2147c478bd9Sstevel@tonic-gate yyDay = $2;
2157c478bd9Sstevel@tonic-gate }
2167c478bd9Sstevel@tonic-gate | tMONTH tUNUMBER ',' tUNUMBER {
2177c478bd9Sstevel@tonic-gate yyMonth = $1;
2187c478bd9Sstevel@tonic-gate yyDay = $2;
2197c478bd9Sstevel@tonic-gate yyYear = $4;
2207c478bd9Sstevel@tonic-gate }
2217c478bd9Sstevel@tonic-gate | tUNUMBER tMONTH {
2227c478bd9Sstevel@tonic-gate yyMonth = $2;
2237c478bd9Sstevel@tonic-gate yyDay = $1;
2247c478bd9Sstevel@tonic-gate }
2257c478bd9Sstevel@tonic-gate | tUNUMBER tMONTH tUNUMBER {
2267c478bd9Sstevel@tonic-gate yyMonth = $2;
2277c478bd9Sstevel@tonic-gate yyDay = $1;
2287c478bd9Sstevel@tonic-gate yyYear = $3;
2297c478bd9Sstevel@tonic-gate }
2307c478bd9Sstevel@tonic-gate ;
2317c478bd9Sstevel@tonic-gate
2327c478bd9Sstevel@tonic-gate rel : relunit tAGO {
2337c478bd9Sstevel@tonic-gate yyRelSeconds = -yyRelSeconds;
2347c478bd9Sstevel@tonic-gate yyRelMonth = -yyRelMonth;
2357c478bd9Sstevel@tonic-gate }
2367c478bd9Sstevel@tonic-gate | relunit
2377c478bd9Sstevel@tonic-gate ;
2387c478bd9Sstevel@tonic-gate
2397c478bd9Sstevel@tonic-gate relunit : tUNUMBER tMINUTE_UNIT {
2407c478bd9Sstevel@tonic-gate yyRelSeconds += $1 * $2 * 60L;
2417c478bd9Sstevel@tonic-gate }
2427c478bd9Sstevel@tonic-gate | tSNUMBER tMINUTE_UNIT {
2437c478bd9Sstevel@tonic-gate yyRelSeconds += $1 * $2 * 60L;
2447c478bd9Sstevel@tonic-gate }
2457c478bd9Sstevel@tonic-gate | tMINUTE_UNIT {
2467c478bd9Sstevel@tonic-gate yyRelSeconds += $1 * 60L;
2477c478bd9Sstevel@tonic-gate }
2487c478bd9Sstevel@tonic-gate | tSNUMBER tSEC_UNIT {
2497c478bd9Sstevel@tonic-gate yyRelSeconds += $1;
2507c478bd9Sstevel@tonic-gate }
2517c478bd9Sstevel@tonic-gate | tUNUMBER tSEC_UNIT {
2527c478bd9Sstevel@tonic-gate yyRelSeconds += $1;
2537c478bd9Sstevel@tonic-gate }
2547c478bd9Sstevel@tonic-gate | tSEC_UNIT {
2557c478bd9Sstevel@tonic-gate yyRelSeconds++;
2567c478bd9Sstevel@tonic-gate }
2577c478bd9Sstevel@tonic-gate | tSNUMBER tMONTH_UNIT {
2587c478bd9Sstevel@tonic-gate yyRelMonth += $1 * $2;
2597c478bd9Sstevel@tonic-gate }
2607c478bd9Sstevel@tonic-gate | tUNUMBER tMONTH_UNIT {
2617c478bd9Sstevel@tonic-gate yyRelMonth += $1 * $2;
2627c478bd9Sstevel@tonic-gate }
2637c478bd9Sstevel@tonic-gate | tMONTH_UNIT {
2647c478bd9Sstevel@tonic-gate yyRelMonth += $1;
2657c478bd9Sstevel@tonic-gate }
2667c478bd9Sstevel@tonic-gate ;
2677c478bd9Sstevel@tonic-gate
2687c478bd9Sstevel@tonic-gate number : tUNUMBER {
2697c478bd9Sstevel@tonic-gate if (yyHaveTime && yyHaveDate && !yyHaveRel)
2707c478bd9Sstevel@tonic-gate yyYear = $1;
2717c478bd9Sstevel@tonic-gate else {
2727c478bd9Sstevel@tonic-gate yyHaveTime++;
2737c478bd9Sstevel@tonic-gate if ($1 < 100) {
2747c478bd9Sstevel@tonic-gate yyHour = $1;
2757c478bd9Sstevel@tonic-gate yyMinutes = 0;
2767c478bd9Sstevel@tonic-gate }
2777c478bd9Sstevel@tonic-gate else {
2787c478bd9Sstevel@tonic-gate yyHour = $1 / 100;
2797c478bd9Sstevel@tonic-gate yyMinutes = $1 % 100;
2807c478bd9Sstevel@tonic-gate }
2817c478bd9Sstevel@tonic-gate yySeconds = 0;
2827c478bd9Sstevel@tonic-gate yyMeridian = MER24;
2837c478bd9Sstevel@tonic-gate }
2847c478bd9Sstevel@tonic-gate }
2857c478bd9Sstevel@tonic-gate ;
2867c478bd9Sstevel@tonic-gate
2877c478bd9Sstevel@tonic-gate o_merid : /* NULL */ {
2887c478bd9Sstevel@tonic-gate $$ = MER24;
2897c478bd9Sstevel@tonic-gate }
2907c478bd9Sstevel@tonic-gate | tMERIDIAN {
2917c478bd9Sstevel@tonic-gate $$ = $1;
2927c478bd9Sstevel@tonic-gate }
2937c478bd9Sstevel@tonic-gate ;
2947c478bd9Sstevel@tonic-gate
2957c478bd9Sstevel@tonic-gate %%
2967c478bd9Sstevel@tonic-gate
2977c478bd9Sstevel@tonic-gate /* Month and day table. */
2987c478bd9Sstevel@tonic-gate static TABLE MonthDayTable[] = {
2997c478bd9Sstevel@tonic-gate { "january", tMONTH, 1 },
3007c478bd9Sstevel@tonic-gate { "february", tMONTH, 2 },
3017c478bd9Sstevel@tonic-gate { "march", tMONTH, 3 },
3027c478bd9Sstevel@tonic-gate { "april", tMONTH, 4 },
3037c478bd9Sstevel@tonic-gate { "may", tMONTH, 5 },
3047c478bd9Sstevel@tonic-gate { "june", tMONTH, 6 },
3057c478bd9Sstevel@tonic-gate { "july", tMONTH, 7 },
3067c478bd9Sstevel@tonic-gate { "august", tMONTH, 8 },
3077c478bd9Sstevel@tonic-gate { "september", tMONTH, 9 },
3087c478bd9Sstevel@tonic-gate { "sept", tMONTH, 9 },
3097c478bd9Sstevel@tonic-gate { "october", tMONTH, 10 },
3107c478bd9Sstevel@tonic-gate { "november", tMONTH, 11 },
3117c478bd9Sstevel@tonic-gate { "december", tMONTH, 12 },
3127c478bd9Sstevel@tonic-gate { "sunday", tDAY, 0 },
3137c478bd9Sstevel@tonic-gate { "monday", tDAY, 1 },
3147c478bd9Sstevel@tonic-gate { "tuesday", tDAY, 2 },
3157c478bd9Sstevel@tonic-gate { "tues", tDAY, 2 },
3167c478bd9Sstevel@tonic-gate { "wednesday", tDAY, 3 },
3177c478bd9Sstevel@tonic-gate { "wednes", tDAY, 3 },
3187c478bd9Sstevel@tonic-gate { "thursday", tDAY, 4 },
3197c478bd9Sstevel@tonic-gate { "thur", tDAY, 4 },
3207c478bd9Sstevel@tonic-gate { "thurs", tDAY, 4 },
3217c478bd9Sstevel@tonic-gate { "friday", tDAY, 5 },
3227c478bd9Sstevel@tonic-gate { "saturday", tDAY, 6 },
3237c478bd9Sstevel@tonic-gate { NULL }
3247c478bd9Sstevel@tonic-gate };
3257c478bd9Sstevel@tonic-gate
3267c478bd9Sstevel@tonic-gate /* Time units table. */
3277c478bd9Sstevel@tonic-gate static TABLE UnitsTable[] = {
3287c478bd9Sstevel@tonic-gate { "year", tMONTH_UNIT, 12 },
3297c478bd9Sstevel@tonic-gate { "month", tMONTH_UNIT, 1 },
3307c478bd9Sstevel@tonic-gate { "fortnight", tMINUTE_UNIT, 14 * 24 * 60 },
3317c478bd9Sstevel@tonic-gate { "week", tMINUTE_UNIT, 7 * 24 * 60 },
3327c478bd9Sstevel@tonic-gate { "day", tMINUTE_UNIT, 1 * 24 * 60 },
3337c478bd9Sstevel@tonic-gate { "hour", tMINUTE_UNIT, 60 },
3347c478bd9Sstevel@tonic-gate { "minute", tMINUTE_UNIT, 1 },
3357c478bd9Sstevel@tonic-gate { "min", tMINUTE_UNIT, 1 },
3367c478bd9Sstevel@tonic-gate { "second", tSEC_UNIT, 1 },
3377c478bd9Sstevel@tonic-gate { "sec", tSEC_UNIT, 1 },
3387c478bd9Sstevel@tonic-gate { NULL }
3397c478bd9Sstevel@tonic-gate };
3407c478bd9Sstevel@tonic-gate
3417c478bd9Sstevel@tonic-gate /* Assorted relative-time words. */
3427c478bd9Sstevel@tonic-gate static TABLE OtherTable[] = {
3437c478bd9Sstevel@tonic-gate { "tomorrow", tMINUTE_UNIT, 1 * 24 * 60 },
3447c478bd9Sstevel@tonic-gate { "yesterday", tMINUTE_UNIT, -1 * 24 * 60 },
3457c478bd9Sstevel@tonic-gate { "today", tMINUTE_UNIT, 0 },
3467c478bd9Sstevel@tonic-gate { "now", tMINUTE_UNIT, 0 },
3477c478bd9Sstevel@tonic-gate { "last", tUNUMBER, -1 },
3487c478bd9Sstevel@tonic-gate { "this", tMINUTE_UNIT, 0 },
3497c478bd9Sstevel@tonic-gate { "next", tUNUMBER, 2 },
3507c478bd9Sstevel@tonic-gate { "first", tUNUMBER, 1 },
3517c478bd9Sstevel@tonic-gate /* { "second", tUNUMBER, 2 }, */
3527c478bd9Sstevel@tonic-gate { "third", tUNUMBER, 3 },
3537c478bd9Sstevel@tonic-gate { "fourth", tUNUMBER, 4 },
3547c478bd9Sstevel@tonic-gate { "fifth", tUNUMBER, 5 },
3557c478bd9Sstevel@tonic-gate { "sixth", tUNUMBER, 6 },
3567c478bd9Sstevel@tonic-gate { "seventh", tUNUMBER, 7 },
3577c478bd9Sstevel@tonic-gate { "eighth", tUNUMBER, 8 },
3587c478bd9Sstevel@tonic-gate { "ninth", tUNUMBER, 9 },
3597c478bd9Sstevel@tonic-gate { "tenth", tUNUMBER, 10 },
3607c478bd9Sstevel@tonic-gate { "eleventh", tUNUMBER, 11 },
3617c478bd9Sstevel@tonic-gate { "twelfth", tUNUMBER, 12 },
3627c478bd9Sstevel@tonic-gate { "ago", tAGO, 1 },
3637c478bd9Sstevel@tonic-gate { NULL }
3647c478bd9Sstevel@tonic-gate };
3657c478bd9Sstevel@tonic-gate
3667c478bd9Sstevel@tonic-gate /* The timezone table. */
3677c478bd9Sstevel@tonic-gate static TABLE TimezoneTable[] = {
3687c478bd9Sstevel@tonic-gate { "gmt", tZONE, HOURN( 0) }, /* Greenwich Mean */
3697c478bd9Sstevel@tonic-gate { "ut", tZONE, HOURN( 0) }, /* Universal (Coordinated) */
3707c478bd9Sstevel@tonic-gate { "utc", tZONE, HOURN( 0) },
3717c478bd9Sstevel@tonic-gate { "wet", tZONE, HOURN( 0) }, /* Western European */
3727c478bd9Sstevel@tonic-gate { "bst", tDAYZONE, HOURN( 0) }, /* British Summer */
3737c478bd9Sstevel@tonic-gate { "wat", tZONE, HOURN( 1) }, /* West Africa */
3747c478bd9Sstevel@tonic-gate { "at", tZONE, HOURN( 2) }, /* Azores */
3757c478bd9Sstevel@tonic-gate #if 0
3767c478bd9Sstevel@tonic-gate /* For completeness. BST is also British Summer, and GST is
3777c478bd9Sstevel@tonic-gate * also Guam Standard. */
3787c478bd9Sstevel@tonic-gate { "bst", tZONE, HOURN( 3) }, /* Brazil Standard */
3797c478bd9Sstevel@tonic-gate { "gst", tZONE, HOURN( 3) }, /* Greenland Standard */
3807c478bd9Sstevel@tonic-gate #endif
3817c478bd9Sstevel@tonic-gate { "nft", tZONE, HOURN(3.5) }, /* Newfoundland */
3827c478bd9Sstevel@tonic-gate { "nst", tZONE, HOURN(3.5) }, /* Newfoundland Standard */
3837c478bd9Sstevel@tonic-gate { "ndt", tDAYZONE, HOURN(3.5) }, /* Newfoundland Daylight */
3847c478bd9Sstevel@tonic-gate { "ast", tZONE, HOURN( 4) }, /* Atlantic Standard */
3857c478bd9Sstevel@tonic-gate { "adt", tDAYZONE, HOURN( 4) }, /* Atlantic Daylight */
3867c478bd9Sstevel@tonic-gate { "est", tZONE, HOURN( 5) }, /* Eastern Standard */
3877c478bd9Sstevel@tonic-gate { "edt", tDAYZONE, HOURN( 5) }, /* Eastern Daylight */
3887c478bd9Sstevel@tonic-gate { "cst", tZONE, HOURN( 6) }, /* Central Standard */
3897c478bd9Sstevel@tonic-gate { "cdt", tDAYZONE, HOURN( 6) }, /* Central Daylight */
3907c478bd9Sstevel@tonic-gate { "mst", tZONE, HOURN( 7) }, /* Mountain Standard */
3917c478bd9Sstevel@tonic-gate { "mdt", tDAYZONE, HOURN( 7) }, /* Mountain Daylight */
3927c478bd9Sstevel@tonic-gate { "pst", tZONE, HOURN( 8) }, /* Pacific Standard */
3937c478bd9Sstevel@tonic-gate { "pdt", tDAYZONE, HOURN( 8) }, /* Pacific Daylight */
3947c478bd9Sstevel@tonic-gate { "yst", tZONE, HOURN( 9) }, /* Yukon Standard */
3957c478bd9Sstevel@tonic-gate { "ydt", tDAYZONE, HOURN( 9) }, /* Yukon Daylight */
3967c478bd9Sstevel@tonic-gate { "hst", tZONE, HOURN(10) }, /* Hawaii Standard */
3977c478bd9Sstevel@tonic-gate { "hdt", tDAYZONE, HOURN(10) }, /* Hawaii Daylight */
3987c478bd9Sstevel@tonic-gate { "cat", tZONE, HOURN(10) }, /* Central Alaska */
3997c478bd9Sstevel@tonic-gate { "ahst", tZONE, HOURN(10) }, /* Alaska-Hawaii Standard */
4007c478bd9Sstevel@tonic-gate { "nt", tZONE, HOURN(11) }, /* Nome */
4017c478bd9Sstevel@tonic-gate { "idlw", tZONE, HOURN(12) }, /* International Date Line West */
4027c478bd9Sstevel@tonic-gate { "cet", tZONE, -HOURN(1) }, /* Central European */
4037c478bd9Sstevel@tonic-gate { "met", tZONE, -HOURN(1) }, /* Middle European */
4047c478bd9Sstevel@tonic-gate { "mewt", tZONE, -HOURN(1) }, /* Middle European Winter */
4057c478bd9Sstevel@tonic-gate { "mest", tDAYZONE, -HOURN(1) }, /* Middle European Summer */
4067c478bd9Sstevel@tonic-gate { "swt", tZONE, -HOURN(1) }, /* Swedish Winter */
4077c478bd9Sstevel@tonic-gate { "sst", tDAYZONE, -HOURN(1) }, /* Swedish Summer */
4087c478bd9Sstevel@tonic-gate { "fwt", tZONE, -HOURN(1) }, /* French Winter */
4097c478bd9Sstevel@tonic-gate { "fst", tDAYZONE, -HOURN(1) }, /* French Summer */
4107c478bd9Sstevel@tonic-gate { "eet", tZONE, -HOURN(2) }, /* Eastern Europe, USSR Zone 1 */
4117c478bd9Sstevel@tonic-gate { "bt", tZONE, -HOURN(3) }, /* Baghdad, USSR Zone 2 */
4127c478bd9Sstevel@tonic-gate { "it", tZONE, -HOURN(3.5) },/* Iran */
4137c478bd9Sstevel@tonic-gate { "zp4", tZONE, -HOURN(4) }, /* USSR Zone 3 */
4147c478bd9Sstevel@tonic-gate { "zp5", tZONE, -HOURN(5) }, /* USSR Zone 4 */
4157c478bd9Sstevel@tonic-gate { "ist", tZONE, -HOURN(5.5) },/* Indian Standard */
4167c478bd9Sstevel@tonic-gate { "zp6", tZONE, -HOURN(6) }, /* USSR Zone 5 */
4177c478bd9Sstevel@tonic-gate #if 0
4187c478bd9Sstevel@tonic-gate /* For completeness. NST is also Newfoundland Stanard, nad SST is
4197c478bd9Sstevel@tonic-gate * also Swedish Summer. */
4207c478bd9Sstevel@tonic-gate { "nst", tZONE, -HOURN(6.5) },/* North Sumatra */
4217c478bd9Sstevel@tonic-gate { "sst", tZONE, -HOURN(7) }, /* South Sumatra, USSR Zone 6 */
4227c478bd9Sstevel@tonic-gate #endif /* 0 */
4237c478bd9Sstevel@tonic-gate { "wast", tZONE, -HOURN(7) }, /* West Australian Standard */
4247c478bd9Sstevel@tonic-gate { "wadt", tDAYZONE, -HOURN(7) }, /* West Australian Daylight */
4257c478bd9Sstevel@tonic-gate { "jt", tZONE, -HOURN(7.5) },/* Java (3pm in Cronusland!) */
4267c478bd9Sstevel@tonic-gate { "cct", tZONE, -HOURN(8) }, /* China Coast, USSR Zone 7 */
4277c478bd9Sstevel@tonic-gate { "jst", tZONE, -HOURN(9) }, /* Japan Standard, USSR Zone 8 */
4287c478bd9Sstevel@tonic-gate { "cast", tZONE, -HOURN(9.5) },/* Central Australian Standard */
4297c478bd9Sstevel@tonic-gate { "cadt", tDAYZONE, -HOURN(9.5) },/* Central Australian Daylight */
4307c478bd9Sstevel@tonic-gate { "east", tZONE, -HOURN(10) }, /* Eastern Australian Standard */
4317c478bd9Sstevel@tonic-gate { "eadt", tDAYZONE, -HOURN(10) }, /* Eastern Australian Daylight */
4327c478bd9Sstevel@tonic-gate { "gst", tZONE, -HOURN(10) }, /* Guam Standard, USSR Zone 9 */
4337c478bd9Sstevel@tonic-gate { "nzt", tZONE, -HOURN(12) }, /* New Zealand */
4347c478bd9Sstevel@tonic-gate { "nzst", tZONE, -HOURN(12) }, /* New Zealand Standard */
4357c478bd9Sstevel@tonic-gate { "nzdt", tDAYZONE, -HOURN(12) }, /* New Zealand Daylight */
4367c478bd9Sstevel@tonic-gate { "idle", tZONE, -HOURN(12) }, /* International Date Line East */
4377c478bd9Sstevel@tonic-gate { NULL }
4387c478bd9Sstevel@tonic-gate };
4397c478bd9Sstevel@tonic-gate
4407c478bd9Sstevel@tonic-gate /* Military timezone table. */
4417c478bd9Sstevel@tonic-gate static TABLE MilitaryTable[] = {
4427c478bd9Sstevel@tonic-gate { "a", tZONE, HOURN( 1) },
4437c478bd9Sstevel@tonic-gate { "b", tZONE, HOURN( 2) },
4447c478bd9Sstevel@tonic-gate { "c", tZONE, HOURN( 3) },
4457c478bd9Sstevel@tonic-gate { "d", tZONE, HOURN( 4) },
4467c478bd9Sstevel@tonic-gate { "e", tZONE, HOURN( 5) },
4477c478bd9Sstevel@tonic-gate { "f", tZONE, HOURN( 6) },
4487c478bd9Sstevel@tonic-gate { "g", tZONE, HOURN( 7) },
4497c478bd9Sstevel@tonic-gate { "h", tZONE, HOURN( 8) },
4507c478bd9Sstevel@tonic-gate { "i", tZONE, HOURN( 9) },
4517c478bd9Sstevel@tonic-gate { "k", tZONE, HOURN( 10) },
4527c478bd9Sstevel@tonic-gate { "l", tZONE, HOURN( 11) },
4537c478bd9Sstevel@tonic-gate { "m", tZONE, HOURN( 12) },
4547c478bd9Sstevel@tonic-gate { "n", tZONE, HOURN(- 1) },
4557c478bd9Sstevel@tonic-gate { "o", tZONE, HOURN(- 2) },
4567c478bd9Sstevel@tonic-gate { "p", tZONE, HOURN(- 3) },
4577c478bd9Sstevel@tonic-gate { "q", tZONE, HOURN(- 4) },
4587c478bd9Sstevel@tonic-gate { "r", tZONE, HOURN(- 5) },
4597c478bd9Sstevel@tonic-gate { "s", tZONE, HOURN(- 6) },
4607c478bd9Sstevel@tonic-gate { "t", tZONE, HOURN(- 7) },
4617c478bd9Sstevel@tonic-gate { "u", tZONE, HOURN(- 8) },
4627c478bd9Sstevel@tonic-gate { "v", tZONE, HOURN(- 9) },
4637c478bd9Sstevel@tonic-gate { "w", tZONE, HOURN(-10) },
4647c478bd9Sstevel@tonic-gate { "x", tZONE, HOURN(-11) },
4657c478bd9Sstevel@tonic-gate { "y", tZONE, HOURN(-12) },
4667c478bd9Sstevel@tonic-gate { "z", tZONE, HOURN( 0) },
4677c478bd9Sstevel@tonic-gate { NULL }
4687c478bd9Sstevel@tonic-gate };
4697c478bd9Sstevel@tonic-gate
4707c478bd9Sstevel@tonic-gate
4717c478bd9Sstevel@tonic-gate
4727c478bd9Sstevel@tonic-gate
4737c478bd9Sstevel@tonic-gate /* ARGSUSED */
4747c478bd9Sstevel@tonic-gate static void
yyerror(s)4757c478bd9Sstevel@tonic-gate yyerror(s)
4767c478bd9Sstevel@tonic-gate char *s;
4777c478bd9Sstevel@tonic-gate {
4787c478bd9Sstevel@tonic-gate }
4797c478bd9Sstevel@tonic-gate
4807c478bd9Sstevel@tonic-gate
4817c478bd9Sstevel@tonic-gate static time_t
ToSeconds(Hours,Minutes,Seconds,Meridian)4827c478bd9Sstevel@tonic-gate ToSeconds(Hours, Minutes, Seconds, Meridian)
4837c478bd9Sstevel@tonic-gate time_t Hours;
4847c478bd9Sstevel@tonic-gate time_t Minutes;
4857c478bd9Sstevel@tonic-gate time_t Seconds;
4867c478bd9Sstevel@tonic-gate MERIDIAN Meridian;
4877c478bd9Sstevel@tonic-gate {
4887c478bd9Sstevel@tonic-gate if (Minutes < 0 || Minutes > 59 || Seconds < 0 || Seconds > 59)
4897c478bd9Sstevel@tonic-gate return -1;
4907c478bd9Sstevel@tonic-gate switch (Meridian) {
4917c478bd9Sstevel@tonic-gate case MER24:
4927c478bd9Sstevel@tonic-gate if (Hours < 0 || Hours > 23)
4937c478bd9Sstevel@tonic-gate return -1;
4947c478bd9Sstevel@tonic-gate return (Hours * 60L + Minutes) * 60L + Seconds;
4957c478bd9Sstevel@tonic-gate case MERam:
4967c478bd9Sstevel@tonic-gate if (Hours < 1 || Hours > 12)
4977c478bd9Sstevel@tonic-gate return -1;
4987c478bd9Sstevel@tonic-gate if (Hours != 12)
4997c478bd9Sstevel@tonic-gate return (Hours * 60L + Minutes) * 60L + Seconds;
5007c478bd9Sstevel@tonic-gate else
5017c478bd9Sstevel@tonic-gate return Minutes * 60L + Seconds;
5027c478bd9Sstevel@tonic-gate case MERpm:
5037c478bd9Sstevel@tonic-gate if (Hours < 1 || Hours > 12)
5047c478bd9Sstevel@tonic-gate return -1;
5057c478bd9Sstevel@tonic-gate if (Hours != 12)
5067c478bd9Sstevel@tonic-gate return ((Hours + 12) * 60L + Minutes) * 60L + Seconds;
5077c478bd9Sstevel@tonic-gate else
5087c478bd9Sstevel@tonic-gate return (720L + Minutes) * 60L + Seconds;
5097c478bd9Sstevel@tonic-gate }
5107c478bd9Sstevel@tonic-gate /* NOTREACHED */
511fe0e7ec4Smaheshvs return (-1);
5127c478bd9Sstevel@tonic-gate }
5137c478bd9Sstevel@tonic-gate
5147c478bd9Sstevel@tonic-gate
5157c478bd9Sstevel@tonic-gate static time_t
Convert(Month,Day,Year,Hours,Minutes,Seconds,Meridian,DSTmode)5167c478bd9Sstevel@tonic-gate Convert(Month, Day, Year, Hours, Minutes, Seconds, Meridian, DSTmode)
5177c478bd9Sstevel@tonic-gate time_t Month;
5187c478bd9Sstevel@tonic-gate time_t Day;
5197c478bd9Sstevel@tonic-gate time_t Year;
5207c478bd9Sstevel@tonic-gate time_t Hours;
5217c478bd9Sstevel@tonic-gate time_t Minutes;
5227c478bd9Sstevel@tonic-gate time_t Seconds;
5237c478bd9Sstevel@tonic-gate MERIDIAN Meridian;
5247c478bd9Sstevel@tonic-gate DSTMODE DSTmode;
5257c478bd9Sstevel@tonic-gate {
5267c478bd9Sstevel@tonic-gate static int DaysInMonth[12] = {
5277c478bd9Sstevel@tonic-gate 31, 0, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31
5287c478bd9Sstevel@tonic-gate };
5297c478bd9Sstevel@tonic-gate time_t tod;
5307c478bd9Sstevel@tonic-gate time_t Julian;
5317c478bd9Sstevel@tonic-gate time_t i;
5327c478bd9Sstevel@tonic-gate
5337c478bd9Sstevel@tonic-gate if (Year < 0)
5347c478bd9Sstevel@tonic-gate Year = -Year;
5357c478bd9Sstevel@tonic-gate if (Year < 138)
5367c478bd9Sstevel@tonic-gate Year += 1900;
5377c478bd9Sstevel@tonic-gate DaysInMonth[1] = Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0)
5387c478bd9Sstevel@tonic-gate ? 29 : 28;
539*2a8bcb4eSToomas Soome if (Year < EPOCH || Year > 2037
5407c478bd9Sstevel@tonic-gate || Month < 1 || Month > 12
5417c478bd9Sstevel@tonic-gate /* LINTED Month is a time_t so intermediate results aren't truncated */
5427c478bd9Sstevel@tonic-gate || Day < 1 || Day > DaysInMonth[(int)--Month])
5437c478bd9Sstevel@tonic-gate return -1;
5447c478bd9Sstevel@tonic-gate
5457c478bd9Sstevel@tonic-gate for (Julian = Day - 1, i = 0; i < Month; i++)
5467c478bd9Sstevel@tonic-gate Julian += DaysInMonth[i];
5477c478bd9Sstevel@tonic-gate for (i = EPOCH; i < Year; i++)
5487c478bd9Sstevel@tonic-gate Julian += 365 + (i % 4 == 0);
5497c478bd9Sstevel@tonic-gate Julian *= SECSPERDAY;
5507c478bd9Sstevel@tonic-gate Julian += yyTimezone * 60L;
5517c478bd9Sstevel@tonic-gate if ((tod = ToSeconds(Hours, Minutes, Seconds, Meridian)) < 0)
5527c478bd9Sstevel@tonic-gate return -1;
5537c478bd9Sstevel@tonic-gate Julian += tod;
5547c478bd9Sstevel@tonic-gate if (DSTmode == DSTon
5557c478bd9Sstevel@tonic-gate || (DSTmode == DSTmaybe && localtime(&Julian)->tm_isdst))
5567c478bd9Sstevel@tonic-gate Julian -= 60 * 60;
5577c478bd9Sstevel@tonic-gate return Julian;
5587c478bd9Sstevel@tonic-gate }
5597c478bd9Sstevel@tonic-gate
5607c478bd9Sstevel@tonic-gate
5617c478bd9Sstevel@tonic-gate static time_t
DSTcorrect(Start,Future)5627c478bd9Sstevel@tonic-gate DSTcorrect(Start, Future)
5637c478bd9Sstevel@tonic-gate time_t Start;
5647c478bd9Sstevel@tonic-gate time_t Future;
5657c478bd9Sstevel@tonic-gate {
5667c478bd9Sstevel@tonic-gate time_t StartDay;
5677c478bd9Sstevel@tonic-gate time_t FutureDay;
5687c478bd9Sstevel@tonic-gate
5697c478bd9Sstevel@tonic-gate StartDay = (localtime(&Start)->tm_hour + 1) % 24;
5707c478bd9Sstevel@tonic-gate FutureDay = (localtime(&Future)->tm_hour + 1) % 24;
5717c478bd9Sstevel@tonic-gate return (Future - Start) + (StartDay - FutureDay) * 60L * 60L;
5727c478bd9Sstevel@tonic-gate }
5737c478bd9Sstevel@tonic-gate
5747c478bd9Sstevel@tonic-gate
5757c478bd9Sstevel@tonic-gate static time_t
RelativeDate(Start,DayOrdinal,DayNumber)5767c478bd9Sstevel@tonic-gate RelativeDate(Start, DayOrdinal, DayNumber)
5777c478bd9Sstevel@tonic-gate time_t Start;
5787c478bd9Sstevel@tonic-gate time_t DayOrdinal;
5797c478bd9Sstevel@tonic-gate time_t DayNumber;
5807c478bd9Sstevel@tonic-gate {
5817c478bd9Sstevel@tonic-gate struct tm *tm;
5827c478bd9Sstevel@tonic-gate time_t now;
5837c478bd9Sstevel@tonic-gate
5847c478bd9Sstevel@tonic-gate now = Start;
5857c478bd9Sstevel@tonic-gate tm = localtime(&now);
5867c478bd9Sstevel@tonic-gate now += SECSPERDAY * ((DayNumber - tm->tm_wday + 7) % 7);
5877c478bd9Sstevel@tonic-gate now += 7 * SECSPERDAY * (DayOrdinal <= 0 ? DayOrdinal : DayOrdinal - 1);
5887c478bd9Sstevel@tonic-gate return DSTcorrect(Start, now);
5897c478bd9Sstevel@tonic-gate }
5907c478bd9Sstevel@tonic-gate
5917c478bd9Sstevel@tonic-gate
5927c478bd9Sstevel@tonic-gate static time_t
RelativeMonth(Start,RelMonth)5937c478bd9Sstevel@tonic-gate RelativeMonth(Start, RelMonth)
5947c478bd9Sstevel@tonic-gate time_t Start;
5957c478bd9Sstevel@tonic-gate time_t RelMonth;
5967c478bd9Sstevel@tonic-gate {
5977c478bd9Sstevel@tonic-gate struct tm *tm;
5987c478bd9Sstevel@tonic-gate time_t Month;
5997c478bd9Sstevel@tonic-gate time_t Year;
6007c478bd9Sstevel@tonic-gate
6017c478bd9Sstevel@tonic-gate if (RelMonth == 0)
6027c478bd9Sstevel@tonic-gate return 0;
6037c478bd9Sstevel@tonic-gate tm = localtime(&Start);
6047c478bd9Sstevel@tonic-gate Month = 12 * tm->tm_year + tm->tm_mon + RelMonth;
6057c478bd9Sstevel@tonic-gate Year = Month / 12;
6067c478bd9Sstevel@tonic-gate Month = Month % 12 + 1;
6077c478bd9Sstevel@tonic-gate return DSTcorrect(Start,
6087c478bd9Sstevel@tonic-gate Convert(Month, (time_t)tm->tm_mday, Year,
6097c478bd9Sstevel@tonic-gate (time_t)tm->tm_hour, (time_t)tm->tm_min, (time_t)tm->tm_sec,
6107c478bd9Sstevel@tonic-gate MER24, DSTmaybe));
6117c478bd9Sstevel@tonic-gate }
6127c478bd9Sstevel@tonic-gate
6137c478bd9Sstevel@tonic-gate
6147c478bd9Sstevel@tonic-gate static int
LookupWord(buff)6157c478bd9Sstevel@tonic-gate LookupWord(buff)
6167c478bd9Sstevel@tonic-gate char *buff;
6177c478bd9Sstevel@tonic-gate {
6187c478bd9Sstevel@tonic-gate char *p;
6197c478bd9Sstevel@tonic-gate char *q;
6207c478bd9Sstevel@tonic-gate TABLE *tp;
6217c478bd9Sstevel@tonic-gate uint_t i;
6227c478bd9Sstevel@tonic-gate int abbrev;
6237c478bd9Sstevel@tonic-gate
6247c478bd9Sstevel@tonic-gate /* Make it lowercase. */
6257c478bd9Sstevel@tonic-gate for (p = buff; *p; p++)
6267c478bd9Sstevel@tonic-gate if (isupper((u_char)*p))
6277c478bd9Sstevel@tonic-gate *p = tolower(*p);
6287c478bd9Sstevel@tonic-gate
6297c478bd9Sstevel@tonic-gate if (strcmp(buff, "am") == 0 || strcmp(buff, "a.m.") == 0) {
6307c478bd9Sstevel@tonic-gate yylval.Meridian = MERam;
6317c478bd9Sstevel@tonic-gate return tMERIDIAN;
6327c478bd9Sstevel@tonic-gate }
6337c478bd9Sstevel@tonic-gate if (strcmp(buff, "pm") == 0 || strcmp(buff, "p.m.") == 0) {
6347c478bd9Sstevel@tonic-gate yylval.Meridian = MERpm;
6357c478bd9Sstevel@tonic-gate return tMERIDIAN;
6367c478bd9Sstevel@tonic-gate }
6377c478bd9Sstevel@tonic-gate
6387c478bd9Sstevel@tonic-gate /* See if we have an abbreviation for a month. */
6397c478bd9Sstevel@tonic-gate if (strlen(buff) == 3)
6407c478bd9Sstevel@tonic-gate abbrev = 1;
6417c478bd9Sstevel@tonic-gate else if (strlen(buff) == 4 && buff[3] == '.') {
6427c478bd9Sstevel@tonic-gate abbrev = 1;
6437c478bd9Sstevel@tonic-gate buff[3] = '\0';
6447c478bd9Sstevel@tonic-gate }
6457c478bd9Sstevel@tonic-gate else
6467c478bd9Sstevel@tonic-gate abbrev = 0;
6477c478bd9Sstevel@tonic-gate
6487c478bd9Sstevel@tonic-gate for (tp = MonthDayTable; tp->name; tp++) {
6497c478bd9Sstevel@tonic-gate if (abbrev) {
6507c478bd9Sstevel@tonic-gate if (strncmp(buff, tp->name, 3) == 0) {
6517c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6527c478bd9Sstevel@tonic-gate return tp->type;
6537c478bd9Sstevel@tonic-gate }
6547c478bd9Sstevel@tonic-gate }
6557c478bd9Sstevel@tonic-gate else if (strcmp(buff, tp->name) == 0) {
6567c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6577c478bd9Sstevel@tonic-gate return tp->type;
6587c478bd9Sstevel@tonic-gate }
6597c478bd9Sstevel@tonic-gate }
6607c478bd9Sstevel@tonic-gate
6617c478bd9Sstevel@tonic-gate for (tp = TimezoneTable; tp->name; tp++)
6627c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
6637c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6647c478bd9Sstevel@tonic-gate return tp->type;
6657c478bd9Sstevel@tonic-gate }
6667c478bd9Sstevel@tonic-gate
6677c478bd9Sstevel@tonic-gate for (tp = UnitsTable; tp->name; tp++)
6687c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
6697c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6707c478bd9Sstevel@tonic-gate return tp->type;
6717c478bd9Sstevel@tonic-gate }
6727c478bd9Sstevel@tonic-gate
6737c478bd9Sstevel@tonic-gate /* Strip off any plural and try the units table again. */
6747c478bd9Sstevel@tonic-gate i = strlen(buff) - 1;
6757c478bd9Sstevel@tonic-gate if (buff[i] == 's') {
6767c478bd9Sstevel@tonic-gate buff[i] = '\0';
6777c478bd9Sstevel@tonic-gate for (tp = UnitsTable; tp->name; tp++)
6787c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
6797c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6807c478bd9Sstevel@tonic-gate return tp->type;
6817c478bd9Sstevel@tonic-gate }
6827c478bd9Sstevel@tonic-gate }
6837c478bd9Sstevel@tonic-gate
6847c478bd9Sstevel@tonic-gate for (tp = OtherTable; tp->name; tp++)
6857c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
6867c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6877c478bd9Sstevel@tonic-gate return tp->type;
6887c478bd9Sstevel@tonic-gate }
6897c478bd9Sstevel@tonic-gate
6907c478bd9Sstevel@tonic-gate /* Military timezones. */
6917c478bd9Sstevel@tonic-gate if (buff[1] == '\0' && isalpha((u_char)*buff)) {
6927c478bd9Sstevel@tonic-gate for (tp = MilitaryTable; tp->name; tp++)
6937c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
6947c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
6957c478bd9Sstevel@tonic-gate return tp->type;
6967c478bd9Sstevel@tonic-gate }
6977c478bd9Sstevel@tonic-gate }
6987c478bd9Sstevel@tonic-gate
6997c478bd9Sstevel@tonic-gate /* Drop out any periods and try the timezone table again. */
7007c478bd9Sstevel@tonic-gate for (i = 0, p = q = buff; *q; q++)
7017c478bd9Sstevel@tonic-gate if (*q != '.')
7027c478bd9Sstevel@tonic-gate *p++ = *q;
7037c478bd9Sstevel@tonic-gate else
7047c478bd9Sstevel@tonic-gate i++;
7057c478bd9Sstevel@tonic-gate *p = '\0';
7067c478bd9Sstevel@tonic-gate if (i)
7077c478bd9Sstevel@tonic-gate for (tp = TimezoneTable; tp->name; tp++)
7087c478bd9Sstevel@tonic-gate if (strcmp(buff, tp->name) == 0) {
7097c478bd9Sstevel@tonic-gate yylval.Number = tp->value;
7107c478bd9Sstevel@tonic-gate return tp->type;
7117c478bd9Sstevel@tonic-gate }
7127c478bd9Sstevel@tonic-gate
7137c478bd9Sstevel@tonic-gate return tID;
7147c478bd9Sstevel@tonic-gate }
7157c478bd9Sstevel@tonic-gate
7167c478bd9Sstevel@tonic-gate void
pdateerr(p)7177c478bd9Sstevel@tonic-gate pdateerr(p)
7187c478bd9Sstevel@tonic-gate char *p;
7197c478bd9Sstevel@tonic-gate {
7207c478bd9Sstevel@tonic-gate char *name = "DATEMSK"; /* env variable for date format */
7217c478bd9Sstevel@tonic-gate char *value;
7227c478bd9Sstevel@tonic-gate char fmt[256], line[256];
7237c478bd9Sstevel@tonic-gate FILE *fp;
7247c478bd9Sstevel@tonic-gate time_t now;
7257c478bd9Sstevel@tonic-gate struct tm *tm;
7267c478bd9Sstevel@tonic-gate
7277c478bd9Sstevel@tonic-gate value = getenv(name);
7287c478bd9Sstevel@tonic-gate if (value == (char *)0) {
7297c478bd9Sstevel@tonic-gate fprintf(stderr,
7307c478bd9Sstevel@tonic-gate dgettext(domainname, "%s: Environment variable %s not set\n"),
7317c478bd9Sstevel@tonic-gate p, name);
7327c478bd9Sstevel@tonic-gate return;
7337c478bd9Sstevel@tonic-gate }
7347c478bd9Sstevel@tonic-gate switch (getdate_err) {
7357c478bd9Sstevel@tonic-gate case 0:
7367c478bd9Sstevel@tonic-gate default:
7377c478bd9Sstevel@tonic-gate fprintf(stderr,
7387c478bd9Sstevel@tonic-gate dgettext(domainname, "%s: Unkown getdate() error\n"), p);
7397c478bd9Sstevel@tonic-gate break;
7407c478bd9Sstevel@tonic-gate case 1:
7417c478bd9Sstevel@tonic-gate fprintf(stderr,
7427c478bd9Sstevel@tonic-gate dgettext(domainname, "%s: %s null or undefined\n"), p, name);
7437c478bd9Sstevel@tonic-gate break;
7447c478bd9Sstevel@tonic-gate case 2:
7457c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7467c478bd9Sstevel@tonic-gate "%s: Cannot read template file %s\n"), p, value);
7477c478bd9Sstevel@tonic-gate break;
7487c478bd9Sstevel@tonic-gate case 3:
7497c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7507c478bd9Sstevel@tonic-gate "%s: Failed to get file status information\n"), p);
7517c478bd9Sstevel@tonic-gate break;
7527c478bd9Sstevel@tonic-gate case 4:
7537c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7547c478bd9Sstevel@tonic-gate "%s: Template file %s not a regular file\n"), p, value);
7557c478bd9Sstevel@tonic-gate break;
7567c478bd9Sstevel@tonic-gate case 5:
7577c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7587c478bd9Sstevel@tonic-gate "%s: Error reading template file %s\n"), p, value);
7597c478bd9Sstevel@tonic-gate break;
7607c478bd9Sstevel@tonic-gate case 6:
7617c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7627c478bd9Sstevel@tonic-gate "%s: %s failed\n"), p, "malloc()");
7637c478bd9Sstevel@tonic-gate break;
7647c478bd9Sstevel@tonic-gate case 7:
7657c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7667c478bd9Sstevel@tonic-gate "%s: Bad date/time format\n"), p);
7677c478bd9Sstevel@tonic-gate fp = fopen(value, "r");
7687c478bd9Sstevel@tonic-gate if (fp == (FILE *)0)
7697c478bd9Sstevel@tonic-gate break;
7707c478bd9Sstevel@tonic-gate now = time((time_t *)0);
7717c478bd9Sstevel@tonic-gate tm = localtime(&now);
7727c478bd9Sstevel@tonic-gate fprintf(stderr, dgettext(domainname,
7737c478bd9Sstevel@tonic-gate "The following are examples of valid formats:\n"));
7747c478bd9Sstevel@tonic-gate while (fgets(fmt, sizeof (fmt), fp)) {
7757c478bd9Sstevel@tonic-gate if (strchr(fmt, '%') == (char *)0)
7767c478bd9Sstevel@tonic-gate continue;
7777c478bd9Sstevel@tonic-gate fprintf(stderr, " ");
7787c478bd9Sstevel@tonic-gate (void) strftime(line, sizeof (line), fmt, tm);
7797c478bd9Sstevel@tonic-gate fprintf(stderr, "%s", line);
7807c478bd9Sstevel@tonic-gate }
7817c478bd9Sstevel@tonic-gate (void) fclose(fp);
7827c478bd9Sstevel@tonic-gate break;
7837c478bd9Sstevel@tonic-gate case 8:
7847c478bd9Sstevel@tonic-gate (void) fprintf(stderr, dgettext(domainname,
7857c478bd9Sstevel@tonic-gate "%s: Invalid date specification\n"), p);
7867c478bd9Sstevel@tonic-gate break;
7877c478bd9Sstevel@tonic-gate }
7887c478bd9Sstevel@tonic-gate }
7897c478bd9Sstevel@tonic-gate
7907c478bd9Sstevel@tonic-gate #undef yylex
7917c478bd9Sstevel@tonic-gate static int
yylex()7927c478bd9Sstevel@tonic-gate yylex()
7937c478bd9Sstevel@tonic-gate {
7947c478bd9Sstevel@tonic-gate char c;
7957c478bd9Sstevel@tonic-gate char *p;
7967c478bd9Sstevel@tonic-gate char buff[20];
7977c478bd9Sstevel@tonic-gate int Count;
7987c478bd9Sstevel@tonic-gate int sign;
7997c478bd9Sstevel@tonic-gate
8007c478bd9Sstevel@tonic-gate for ( ; ; ) {
8017c478bd9Sstevel@tonic-gate while (isspace((u_char)*yyInput))
8027c478bd9Sstevel@tonic-gate yyInput++;
8037c478bd9Sstevel@tonic-gate
8047c478bd9Sstevel@tonic-gate if (isdigit((u_char)(c = *yyInput)) || c == '-' || c == '+') {
8057c478bd9Sstevel@tonic-gate if (c == '-' || c == '+') {
8067c478bd9Sstevel@tonic-gate sign = c == '-' ? -1 : 1;
8077c478bd9Sstevel@tonic-gate if (!isdigit((u_char)*++yyInput))
8087c478bd9Sstevel@tonic-gate /* skip the '-' sign */
8097c478bd9Sstevel@tonic-gate continue;
8107c478bd9Sstevel@tonic-gate }
8117c478bd9Sstevel@tonic-gate else
8127c478bd9Sstevel@tonic-gate sign = 0;
8137c478bd9Sstevel@tonic-gate yylval.Number = 0;
8147c478bd9Sstevel@tonic-gate while (isdigit((u_char)(c = *yyInput++))) {
8157c478bd9Sstevel@tonic-gate int n;
8167c478bd9Sstevel@tonic-gate char digit = c;
8177c478bd9Sstevel@tonic-gate (void) sscanf(&digit, "%1d", &n);
8187c478bd9Sstevel@tonic-gate yylval.Number = 10 * yylval.Number + n;
8197c478bd9Sstevel@tonic-gate }
8207c478bd9Sstevel@tonic-gate yyInput--;
8217c478bd9Sstevel@tonic-gate if (sign < 0)
8227c478bd9Sstevel@tonic-gate yylval.Number = -yylval.Number;
8237c478bd9Sstevel@tonic-gate return sign ? tSNUMBER : tUNUMBER;
8247c478bd9Sstevel@tonic-gate }
8257c478bd9Sstevel@tonic-gate if (isalpha((u_char)c)) {
8267c478bd9Sstevel@tonic-gate for (p = buff; isalpha((u_char)(c = *yyInput++)) || c == '.'; )
8277c478bd9Sstevel@tonic-gate if (p < &buff[sizeof (buff) - 1])
8287c478bd9Sstevel@tonic-gate *p++ = c;
8297c478bd9Sstevel@tonic-gate *p = '\0';
8307c478bd9Sstevel@tonic-gate yyInput--;
8317c478bd9Sstevel@tonic-gate return LookupWord(buff);
8327c478bd9Sstevel@tonic-gate }
8337c478bd9Sstevel@tonic-gate if (c != '(')
8347c478bd9Sstevel@tonic-gate return *yyInput++;
8357c478bd9Sstevel@tonic-gate Count = 0;
8367c478bd9Sstevel@tonic-gate do {
8377c478bd9Sstevel@tonic-gate c = *yyInput++;
8387c478bd9Sstevel@tonic-gate if (c == '\0')
8397c478bd9Sstevel@tonic-gate return c;
8407c478bd9Sstevel@tonic-gate if (c == '(')
8417c478bd9Sstevel@tonic-gate Count++;
8427c478bd9Sstevel@tonic-gate else if (c == ')')
8437c478bd9Sstevel@tonic-gate Count--;
8447c478bd9Sstevel@tonic-gate } while (Count > 0);
8457c478bd9Sstevel@tonic-gate }
8467c478bd9Sstevel@tonic-gate }
8477c478bd9Sstevel@tonic-gate
8487c478bd9Sstevel@tonic-gate
8497c478bd9Sstevel@tonic-gate time_t
getreldate(p,now)8507c478bd9Sstevel@tonic-gate getreldate(p, now)
8517c478bd9Sstevel@tonic-gate char *p;
8527c478bd9Sstevel@tonic-gate struct timeb *now;
8537c478bd9Sstevel@tonic-gate {
8547c478bd9Sstevel@tonic-gate struct tm *tm;
8557c478bd9Sstevel@tonic-gate struct timeb ftz;
8567c478bd9Sstevel@tonic-gate time_t Start;
8577c478bd9Sstevel@tonic-gate time_t tod;
8587c478bd9Sstevel@tonic-gate
8597c478bd9Sstevel@tonic-gate if (strcmp(setlocale(LC_TIME, NULL), "C")) {
8607c478bd9Sstevel@tonic-gate static char localedate[24];
8617c478bd9Sstevel@tonic-gate struct tm ltm;
8627c478bd9Sstevel@tonic-gate
8637c478bd9Sstevel@tonic-gate tm = getdate(p);
8647c478bd9Sstevel@tonic-gate if (getdate_err == 1 /* NODATEMASK */) {
8657c478bd9Sstevel@tonic-gate char buffy[BUFSIZ];
8667c478bd9Sstevel@tonic-gate time_t current;
8677c478bd9Sstevel@tonic-gate
8687c478bd9Sstevel@tonic-gate printf(gettext("environment variable %s not set\n"), "DATEMSK");
8697c478bd9Sstevel@tonic-gate do {
8707c478bd9Sstevel@tonic-gate time(¤t);
8717c478bd9Sstevel@tonic-gate tm = localtime(¤t);
8727c478bd9Sstevel@tonic-gate memcpy(<m, tm, sizeof(ltm));
8737c478bd9Sstevel@tonic-gate tm = <m;
8747c478bd9Sstevel@tonic-gate
8757c478bd9Sstevel@tonic-gate (void) fputs(gettext("Enter date as mmddhhmm[yy]: "), stdout);
8767c478bd9Sstevel@tonic-gate (void) fflush(stdout);
8777c478bd9Sstevel@tonic-gate if (fgets(buffy, sizeof (buffy), stdin) == NULL) {
8787c478bd9Sstevel@tonic-gate (void) printf(gettext("Encountered EOF on stdin\n"));
8797c478bd9Sstevel@tonic-gate return(-1);
8807c478bd9Sstevel@tonic-gate }
8817c478bd9Sstevel@tonic-gate } while (sscanf(buffy, "%2d%2d%2d%2d%2d",
8827c478bd9Sstevel@tonic-gate &(tm->tm_mon), &(tm->tm_mday), &(tm->tm_hour),
8837c478bd9Sstevel@tonic-gate &(tm->tm_min), &(tm->tm_year)) < 4);
8847c478bd9Sstevel@tonic-gate
8857c478bd9Sstevel@tonic-gate (tm->tm_mon)--;
8867c478bd9Sstevel@tonic-gate } else if (tm == NULL)
8877c478bd9Sstevel@tonic-gate return(-1);
8887c478bd9Sstevel@tonic-gate
8897c478bd9Sstevel@tonic-gate (void)sprintf(localedate, "%d:%2.2d %d/%d %d",
8907c478bd9Sstevel@tonic-gate tm->tm_hour, tm->tm_min, tm->tm_mon + 1,
8917c478bd9Sstevel@tonic-gate tm->tm_mday, CHECK_TM(tm->tm_year));
8927c478bd9Sstevel@tonic-gate p = localedate;
8937c478bd9Sstevel@tonic-gate }
8947c478bd9Sstevel@tonic-gate
8957c478bd9Sstevel@tonic-gate yyInput = p;
8967c478bd9Sstevel@tonic-gate if (now == NULL) {
8977c478bd9Sstevel@tonic-gate now = &ftz;
8987c478bd9Sstevel@tonic-gate (void) time(&ftz.time);
8997c478bd9Sstevel@tonic-gate /* Set the timezone global. */
9007c478bd9Sstevel@tonic-gate tzset();
9017c478bd9Sstevel@tonic-gate /* LINTED timezone is time_t so intermediate results aren't truncated */
9027c478bd9Sstevel@tonic-gate ftz.timezone = (int) timezone / 60;
9037c478bd9Sstevel@tonic-gate }
9047c478bd9Sstevel@tonic-gate
9057c478bd9Sstevel@tonic-gate tm = localtime(&now->time);
9067c478bd9Sstevel@tonic-gate yyYear = tm->tm_year;
9077c478bd9Sstevel@tonic-gate yyMonth = tm->tm_mon + 1;
9087c478bd9Sstevel@tonic-gate yyDay = tm->tm_mday;
9097c478bd9Sstevel@tonic-gate yyTimezone = now->timezone;
9107c478bd9Sstevel@tonic-gate yyDSTmode = DSTmaybe;
9117c478bd9Sstevel@tonic-gate yyHour = tm->tm_hour;
9127c478bd9Sstevel@tonic-gate yyMinutes = tm->tm_min;
9137c478bd9Sstevel@tonic-gate yySeconds = tm->tm_sec;
9147c478bd9Sstevel@tonic-gate yyMeridian = MER24;
9157c478bd9Sstevel@tonic-gate yyRelSeconds = 0;
9167c478bd9Sstevel@tonic-gate yyRelMonth = 0;
9177c478bd9Sstevel@tonic-gate yyHaveDate = 0;
9187c478bd9Sstevel@tonic-gate yyHaveDay = 0;
9197c478bd9Sstevel@tonic-gate yyHaveRel = 0;
9207c478bd9Sstevel@tonic-gate yyHaveTime = 0;
9217c478bd9Sstevel@tonic-gate yyHaveZone = 0;
9227c478bd9Sstevel@tonic-gate
9237c478bd9Sstevel@tonic-gate if (yyparse()
9247c478bd9Sstevel@tonic-gate || yyHaveTime > 1 || yyHaveZone > 1 || yyHaveDate > 1 || yyHaveDay > 1)
9257c478bd9Sstevel@tonic-gate return -1;
9267c478bd9Sstevel@tonic-gate
9277c478bd9Sstevel@tonic-gate if (yyHaveDate || yyHaveTime || yyHaveDay) {
9287c478bd9Sstevel@tonic-gate Start = Convert(yyMonth, yyDay, yyYear, yyHour, yyMinutes, yySeconds,
9297c478bd9Sstevel@tonic-gate yyMeridian, yyDSTmode);
9307c478bd9Sstevel@tonic-gate if (Start < 0)
9317c478bd9Sstevel@tonic-gate return -1;
9327c478bd9Sstevel@tonic-gate }
9337c478bd9Sstevel@tonic-gate else {
9347c478bd9Sstevel@tonic-gate Start = now->time;
9357c478bd9Sstevel@tonic-gate if (!yyHaveRel)
9367c478bd9Sstevel@tonic-gate Start -= ((tm->tm_hour * 60L) + tm->tm_min * 60L) + tm->tm_sec;
9377c478bd9Sstevel@tonic-gate }
9387c478bd9Sstevel@tonic-gate
9397c478bd9Sstevel@tonic-gate Start += yyRelSeconds;
9407c478bd9Sstevel@tonic-gate Start += RelativeMonth(Start, yyRelMonth);
9417c478bd9Sstevel@tonic-gate
9427c478bd9Sstevel@tonic-gate if (yyHaveDay && !yyHaveDate) {
9437c478bd9Sstevel@tonic-gate tod = RelativeDate(Start, yyDayOrdinal, yyDayNumber);
9447c478bd9Sstevel@tonic-gate Start += tod;
9457c478bd9Sstevel@tonic-gate }
9467c478bd9Sstevel@tonic-gate
9477c478bd9Sstevel@tonic-gate /* Have to do *something* with a legitimate -1 so it's distinguishable
9487c478bd9Sstevel@tonic-gate * from the error return value. (Alternately could set errno on error.) */
9497c478bd9Sstevel@tonic-gate return Start == -1 ? 0 : Start;
9507c478bd9Sstevel@tonic-gate }
9517c478bd9Sstevel@tonic-gate
9527c478bd9Sstevel@tonic-gate #if defined(TEST)
9537c478bd9Sstevel@tonic-gate
9547c478bd9Sstevel@tonic-gate /* ARGSUSED */
main(ac,av)9557c478bd9Sstevel@tonic-gate main(ac, av)
9567c478bd9Sstevel@tonic-gate int ac;
9577c478bd9Sstevel@tonic-gate char *av[];
9587c478bd9Sstevel@tonic-gate {
9597c478bd9Sstevel@tonic-gate char buff[128];
9607c478bd9Sstevel@tonic-gate time_t d;
9617c478bd9Sstevel@tonic-gate
9627c478bd9Sstevel@tonic-gate (void) setlocale(LC_ALL, "");
9637c478bd9Sstevel@tonic-gate #if !defined(TEXT_DOMAIN)
9647c478bd9Sstevel@tonic-gate #define TEXT_DOMAIN "SYS_TEST"
9657c478bd9Sstevel@tonic-gate #endif
9667c478bd9Sstevel@tonic-gate (void) textdomain(TEXT_DOMAIN);
9677c478bd9Sstevel@tonic-gate
9687c478bd9Sstevel@tonic-gate (void) printf(gettext("Enter date, or blank line to exit.\n\t> "));
9697c478bd9Sstevel@tonic-gate (void) fflush(stdout);
9707c478bd9Sstevel@tonic-gate while (gets(buff) && buff[0]) {
9717c478bd9Sstevel@tonic-gate d = getreldate(buff, (struct timeb *)NULL);
9727c478bd9Sstevel@tonic-gate if (d == -1)
9737c478bd9Sstevel@tonic-gate (void) printf(gettext("Bad format - couldn't convert.\n"));
9747c478bd9Sstevel@tonic-gate else {
9757c478bd9Sstevel@tonic-gate (void) cftime(buff, "%c\n", &d);
9767c478bd9Sstevel@tonic-gate (void) printf("%s", buff);
9777c478bd9Sstevel@tonic-gate }
9787c478bd9Sstevel@tonic-gate (void) printf("\t> ");
9797c478bd9Sstevel@tonic-gate (void) fflush(stdout);
9807c478bd9Sstevel@tonic-gate }
9817c478bd9Sstevel@tonic-gate exit(0);
9827c478bd9Sstevel@tonic-gate /* NOTREACHED */
9837c478bd9Sstevel@tonic-gate }
9847c478bd9Sstevel@tonic-gate #endif /* defined(TEST) */
985