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 <string.h>
60 #include <time.h>
61 
62 #include <openssl/err.h>
63 #include <openssl/mem.h>
64 #include <openssl/time_support.h>
65 
66 
asn1_generalizedtime_to_tm(struct tm * tm,const ASN1_GENERALIZEDTIME * d)67 int asn1_generalizedtime_to_tm(struct tm *tm, const ASN1_GENERALIZEDTIME *d)
68 	{
69 	static const int min[9]={ 0, 0, 1, 1, 0, 0, 0, 0, 0};
70 	static const int max[9]={99, 99,12,31,23,59,59,12,59};
71 	char *a;
72 	int n,i,l,o;
73 
74 	if (d->type != V_ASN1_GENERALIZEDTIME) return(0);
75 	l=d->length;
76 	a=(char *)d->data;
77 	o=0;
78 	/* GENERALIZEDTIME is similar to UTCTIME except the year is
79          * represented as YYYY. This stuff treats everything as a two digit
80          * field so make first two fields 00 to 99
81          */
82 	if (l < 13) goto err;
83 	for (i=0; i<7; i++)
84 		{
85 		if ((i == 6) && ((a[o] == 'Z') ||
86 			(a[o] == '+') || (a[o] == '-')))
87 			{
88 			i++;
89 			if (tm)
90 				tm->tm_sec = 0;
91 			break;
92 			}
93 		if ((a[o] < '0') || (a[o] > '9')) goto err;
94 		n= a[o]-'0';
95 		if (++o > l) goto err;
96 
97 		if ((a[o] < '0') || (a[o] > '9')) goto err;
98 		n=(n*10)+ a[o]-'0';
99 		if (++o > l) goto err;
100 
101 		if ((n < min[i]) || (n > max[i])) goto err;
102 		if (tm)
103 			{
104 			switch(i)
105 				{
106 			case 0:
107 				tm->tm_year = n * 100 - 1900;
108 				break;
109 			case 1:
110 				tm->tm_year += n;
111 				break;
112 			case 2:
113 				tm->tm_mon = n - 1;
114 				break;
115 			case 3:
116 				tm->tm_mday = n;
117 				break;
118 			case 4:
119 				tm->tm_hour = n;
120 				break;
121 			case 5:
122 				tm->tm_min = n;
123 				break;
124 			case 6:
125 				tm->tm_sec = n;
126 				break;
127 				}
128 			}
129 		}
130 	/* Optional fractional seconds: decimal point followed by one
131 	 * or more digits.
132 	 */
133 	if (a[o] == '.')
134 		{
135 		if (++o > l) goto err;
136 		i = o;
137 		while ((a[o] >= '0') && (a[o] <= '9') && (o <= l))
138 			o++;
139 		/* Must have at least one digit after decimal point */
140 		if (i == o) goto err;
141 		}
142 
143 	if (a[o] == 'Z')
144 		o++;
145 	else if ((a[o] == '+') || (a[o] == '-'))
146 		{
147 		int offsign = a[o] == '-' ? -1 : 1, offset = 0;
148 		o++;
149 		if (o+4 > l) goto err;
150 		for (i=7; i<9; i++)
151 			{
152 			if ((a[o] < '0') || (a[o] > '9')) goto err;
153 			n= a[o]-'0';
154 			o++;
155 			if ((a[o] < '0') || (a[o] > '9')) goto err;
156 			n=(n*10)+ a[o]-'0';
157 			if ((n < min[i]) || (n > max[i])) goto err;
158 			if (tm)
159 				{
160 				if (i == 7)
161 					offset = n * 3600;
162 				else if (i == 8)
163 					offset += n * 60;
164 				}
165 			o++;
166 			}
167 		if (offset && !OPENSSL_gmtime_adj(tm, 0, offset * offsign))
168 			return 0;
169 		}
170 	else if (a[o])
171 		{
172 		/* Missing time zone information. */
173 		goto err;
174 		}
175 	return(o == l);
176 err:
177 	return(0);
178 	}
179 
ASN1_GENERALIZEDTIME_check(const ASN1_GENERALIZEDTIME * d)180 int ASN1_GENERALIZEDTIME_check(const ASN1_GENERALIZEDTIME *d)
181 	{
182 	return asn1_generalizedtime_to_tm(NULL, d);
183 	}
184 
ASN1_GENERALIZEDTIME_set_string(ASN1_GENERALIZEDTIME * s,const char * str)185 int ASN1_GENERALIZEDTIME_set_string(ASN1_GENERALIZEDTIME *s, const char *str)
186 	{
187 	ASN1_GENERALIZEDTIME t;
188 
189 	t.type=V_ASN1_GENERALIZEDTIME;
190 	t.length=strlen(str);
191 	t.data=(unsigned char *)str;
192 	if (ASN1_GENERALIZEDTIME_check(&t))
193 		{
194 		if (s != NULL)
195 			{
196 			if (!ASN1_STRING_set((ASN1_STRING *)s,
197 				(unsigned char *)str,t.length))
198 				return 0;
199 			s->type=V_ASN1_GENERALIZEDTIME;
200 			}
201 		return(1);
202 		}
203 	else
204 		return(0);
205 	}
206 
ASN1_GENERALIZEDTIME_set(ASN1_GENERALIZEDTIME * s,time_t t)207 ASN1_GENERALIZEDTIME *ASN1_GENERALIZEDTIME_set(ASN1_GENERALIZEDTIME *s,
208 	     time_t t)
209 	{
210 		return ASN1_GENERALIZEDTIME_adj(s, t, 0, 0);
211 	}
212 
ASN1_GENERALIZEDTIME_adj(ASN1_GENERALIZEDTIME * s,time_t t,int offset_day,long offset_sec)213 ASN1_GENERALIZEDTIME *ASN1_GENERALIZEDTIME_adj(ASN1_GENERALIZEDTIME *s,
214 	     time_t t, int offset_day, long offset_sec)
215 	{
216 	char *p;
217 	struct tm *ts;
218 	struct tm data;
219 	size_t len = 20;
220 
221 	if (s == NULL)
222 		s=M_ASN1_GENERALIZEDTIME_new();
223 	if (s == NULL)
224 		return(NULL);
225 
226 	ts=OPENSSL_gmtime(&t, &data);
227 	if (ts == NULL)
228 		return(NULL);
229 
230 	if (offset_day || offset_sec)
231 		{
232 		if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec))
233 			return NULL;
234 		}
235 
236 	p=(char *)s->data;
237 	if ((p == NULL) || ((size_t)s->length < len))
238 		{
239 		p=OPENSSL_malloc(len);
240 		if (p == NULL)
241 			{
242 			OPENSSL_PUT_ERROR(ASN1, ASN1_GENERALIZEDTIME_adj, ERR_R_MALLOC_FAILURE);
243 			return(NULL);
244 			}
245 		if (s->data != NULL)
246 			OPENSSL_free(s->data);
247 		s->data=(unsigned char *)p;
248 		}
249 
250 	BIO_snprintf(p,len,"%04d%02d%02d%02d%02d%02dZ",ts->tm_year + 1900,
251 		     ts->tm_mon+1,ts->tm_mday,ts->tm_hour,ts->tm_min,ts->tm_sec);
252 	s->length=strlen(p);
253 	s->type=V_ASN1_GENERALIZEDTIME;
254 	return(s);
255 	}
256