1/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
2 * All rights reserved.
3 *
4 * This package is an SSL implementation written
5 * by Eric Young (eay@cryptsoft.com).
6 * The implementation was written so as to conform with Netscapes SSL.
7 *
8 * This library is free for commercial and non-commercial use as long as
9 * the following conditions are aheared to.  The following conditions
10 * apply to all code found in this distribution, be it the RC4, RSA,
11 * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
12 * included with this distribution is covered by the same copyright terms
13 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
14 *
15 * Copyright remains Eric Young's, and as such any Copyright notices in
16 * the code are not to be removed.
17 * If this package is used in a product, Eric Young should be given attribution
18 * as the author of the parts of the library used.
19 * This can be in the form of a textual message at program startup or
20 * in documentation (online or textual) provided with the package.
21 *
22 * Redistribution and use in source and binary forms, with or without
23 * modification, are permitted provided that the following conditions
24 * are met:
25 * 1. Redistributions of source code must retain the copyright
26 *    notice, this list of conditions and the following disclaimer.
27 * 2. Redistributions in binary form must reproduce the above copyright
28 *    notice, this list of conditions and the following disclaimer in the
29 *    documentation and/or other materials provided with the distribution.
30 * 3. All advertising materials mentioning features or use of this software
31 *    must display the following acknowledgement:
32 *    "This product includes cryptographic software written by
33 *     Eric Young (eay@cryptsoft.com)"
34 *    The word 'cryptographic' can be left out if the rouines from the library
35 *    being used are not cryptographic related :-).
36 * 4. If you include any Windows specific code (or a derivative thereof) from
37 *    the apps directory (application code) you must include an acknowledgement:
38 *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
39 *
40 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50 * SUCH DAMAGE.
51 *
52 * The licence and distribution terms for any publically available version or
53 * derivative of this code cannot be changed.  i.e. this code cannot simply be
54 * copied and put under another distribution licence
55 * [including the GNU Public Licence.] */
56
57#include <openssl/asn1.h>
58
59#include <openssl/err.h>
60#include <openssl/mem.h>
61#include <openssl/time_support.h>
62
63
64int asn1_generalizedtime_to_tm(struct tm *tm, const ASN1_GENERALIZEDTIME *d)
65	{
66	static const int min[9]={ 0, 0, 1, 1, 0, 0, 0, 0, 0};
67	static const int max[9]={99, 99,12,31,23,59,59,12,59};
68	char *a;
69	int n,i,l,o;
70
71	if (d->type != V_ASN1_GENERALIZEDTIME) return(0);
72	l=d->length;
73	a=(char *)d->data;
74	o=0;
75	/* GENERALIZEDTIME is similar to UTCTIME except the year is
76         * represented as YYYY. This stuff treats everything as a two digit
77         * field so make first two fields 00 to 99
78         */
79	if (l < 13) goto err;
80	for (i=0; i<7; i++)
81		{
82		if ((i == 6) && ((a[o] == 'Z') ||
83			(a[o] == '+') || (a[o] == '-')))
84			{
85			i++;
86			if (tm)
87				tm->tm_sec = 0;
88			break;
89			}
90		if ((a[o] < '0') || (a[o] > '9')) goto err;
91		n= a[o]-'0';
92		if (++o > l) goto err;
93
94		if ((a[o] < '0') || (a[o] > '9')) goto err;
95		n=(n*10)+ a[o]-'0';
96		if (++o > l) goto err;
97
98		if ((n < min[i]) || (n > max[i])) goto err;
99		if (tm)
100			{
101			switch(i)
102				{
103			case 0:
104				tm->tm_year = n * 100 - 1900;
105				break;
106			case 1:
107				tm->tm_year += n;
108				break;
109			case 2:
110				tm->tm_mon = n - 1;
111				break;
112			case 3:
113				tm->tm_mday = n;
114				break;
115			case 4:
116				tm->tm_hour = n;
117				break;
118			case 5:
119				tm->tm_min = n;
120				break;
121			case 6:
122				tm->tm_sec = n;
123				break;
124				}
125			}
126		}
127	/* Optional fractional seconds: decimal point followed by one
128	 * or more digits.
129	 */
130	if (a[o] == '.')
131		{
132		if (++o > l) goto err;
133		i = o;
134		while ((a[o] >= '0') && (a[o] <= '9') && (o <= l))
135			o++;
136		/* Must have at least one digit after decimal point */
137		if (i == o) goto err;
138		}
139
140	if (a[o] == 'Z')
141		o++;
142	else if ((a[o] == '+') || (a[o] == '-'))
143		{
144		int offsign = a[o] == '-' ? -1 : 1, offset = 0;
145		o++;
146		if (o+4 > l) goto err;
147		for (i=7; i<9; i++)
148			{
149			if ((a[o] < '0') || (a[o] > '9')) goto err;
150			n= a[o]-'0';
151			o++;
152			if ((a[o] < '0') || (a[o] > '9')) goto err;
153			n=(n*10)+ a[o]-'0';
154			if ((n < min[i]) || (n > max[i])) goto err;
155			if (tm)
156				{
157				if (i == 7)
158					offset = n * 3600;
159				else if (i == 8)
160					offset += n * 60;
161				}
162			o++;
163			}
164		if (offset && !OPENSSL_gmtime_adj(tm, 0, offset * offsign))
165			return 0;
166		}
167	else if (a[o])
168		{
169		/* Missing time zone information. */
170		goto err;
171		}
172	return(o == l);
173err:
174	return(0);
175	}
176
177int ASN1_GENERALIZEDTIME_check(const ASN1_GENERALIZEDTIME *d)
178	{
179	return asn1_generalizedtime_to_tm(NULL, d);
180	}
181
182int ASN1_GENERALIZEDTIME_set_string(ASN1_GENERALIZEDTIME *s, const char *str)
183	{
184	ASN1_GENERALIZEDTIME t;
185
186	t.type=V_ASN1_GENERALIZEDTIME;
187	t.length=strlen(str);
188	t.data=(unsigned char *)str;
189	if (ASN1_GENERALIZEDTIME_check(&t))
190		{
191		if (s != NULL)
192			{
193			if (!ASN1_STRING_set((ASN1_STRING *)s,
194				(unsigned char *)str,t.length))
195				return 0;
196			s->type=V_ASN1_GENERALIZEDTIME;
197			}
198		return(1);
199		}
200	else
201		return(0);
202	}
203
204ASN1_GENERALIZEDTIME *ASN1_GENERALIZEDTIME_set(ASN1_GENERALIZEDTIME *s,
205	     time_t t)
206	{
207		return ASN1_GENERALIZEDTIME_adj(s, t, 0, 0);
208	}
209
210ASN1_GENERALIZEDTIME *ASN1_GENERALIZEDTIME_adj(ASN1_GENERALIZEDTIME *s,
211	     time_t t, int offset_day, long offset_sec)
212	{
213	char *p;
214	struct tm *ts;
215	struct tm data;
216	size_t len = 20;
217
218	if (s == NULL)
219		s=M_ASN1_GENERALIZEDTIME_new();
220	if (s == NULL)
221		return(NULL);
222
223	ts=OPENSSL_gmtime(&t, &data);
224	if (ts == NULL)
225		return(NULL);
226
227	if (offset_day || offset_sec)
228		{
229		if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec))
230			return NULL;
231		}
232
233	p=(char *)s->data;
234	if ((p == NULL) || ((size_t)s->length < len))
235		{
236		p=OPENSSL_malloc(len);
237		if (p == NULL)
238			{
239			OPENSSL_PUT_ERROR(ASN1, ASN1_GENERALIZEDTIME_adj, ERR_R_MALLOC_FAILURE);
240			return(NULL);
241			}
242		if (s->data != NULL)
243			OPENSSL_free(s->data);
244		s->data=(unsigned char *)p;
245		}
246
247	BIO_snprintf(p,len,"%04d%02d%02d%02d%02d%02dZ",ts->tm_year + 1900,
248		     ts->tm_mon+1,ts->tm_mday,ts->tm_hour,ts->tm_min,ts->tm_sec);
249	s->length=strlen(p);
250	s->type=V_ASN1_GENERALIZEDTIME;
251	return(s);
252	}
253