2 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (c) 1999 by Internet Software Consortium.
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
15 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19 static const char rcsid
[] = "$Id: ns_date.c,v 1.3.2.2 2004/03/16 12:35:32 marka Exp $";
24 #include "port_before.h"
26 #include <arpa/nameser.h>
34 #include "port_after.h"
37 # define SPRINTF(x) strlen(sprintf/**/x)
39 # define SPRINTF(x) ((size_t)sprintf x)
44 static int datepart(const char *, int, int, int, int *);
48 /* Convert a date in ASCII into the number of seconds since
49 1 January 1970 (GMT assumed). Format is yyyymmddhhmmss, all
50 digits required, no spaces allowed. */
53 ns_datetosecs(const char *cp
, int *errp
) {
57 static const int days_per_month
[12] =
58 {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
60 if (strlen(cp
) != 14U) {
66 memset(&time
, 0, sizeof time
);
67 time
.tm_year
= datepart(cp
+ 0, 4, 1990, 9999, errp
) - 1900;
68 time
.tm_mon
= datepart(cp
+ 4, 2, 01, 12, errp
) - 1;
69 time
.tm_mday
= datepart(cp
+ 6, 2, 01, 31, errp
);
70 time
.tm_hour
= datepart(cp
+ 8, 2, 00, 23, errp
);
71 time
.tm_min
= datepart(cp
+ 10, 2, 00, 59, errp
);
72 time
.tm_sec
= datepart(cp
+ 12, 2, 00, 59, errp
);
73 if (*errp
) /* Any parse errors? */
77 * OK, now because timegm() is not available in all environments,
78 * we will do it by hand. Roll up sleeves, curse the gods, begin!
81 #define SECS_PER_DAY ((u_int32_t)24*60*60)
82 #define isleap(y) ((((y) % 4) == 0 && ((y) % 100) != 0) || ((y) % 400) == 0)
84 result
= time
.tm_sec
; /* Seconds */
85 result
+= time
.tm_min
* 60; /* Minutes */
86 result
+= time
.tm_hour
* (60*60); /* Hours */
87 result
+= (time
.tm_mday
- 1) * SECS_PER_DAY
; /* Days */
89 /* Months are trickier. Look without leaping, then leap */
91 for (i
= 0; i
< time
.tm_mon
; i
++)
92 mdays
+= days_per_month
[i
];
93 result
+= mdays
* SECS_PER_DAY
; /* Months */
94 if (time
.tm_mon
> 1 && isleap(1900+time
.tm_year
))
95 result
+= SECS_PER_DAY
; /* Add leapday for this year */
97 /* First figure years without leapdays, then add them in. */
98 /* The loop is slow, FIXME, but simple and accurate. */
99 result
+= (time
.tm_year
- 70) * (SECS_PER_DAY
*365); /* Years */
100 for (i
= 70; i
< time
.tm_year
; i
++)
102 result
+= SECS_PER_DAY
; /* Add leapday for prev year */
110 * Parse part of a date. Set error flag if any error.
111 * Don't reset the flag if there is no error.
114 datepart(const char *buf
, int size
, int min
, int max
, int *errp
) {
118 for (i
= 0; i
< size
; i
++) {
119 if (!isdigit((unsigned char)(buf
[i
])))
121 result
= (result
* 10) + buf
[i
] - '0';