[thirdparty/openssl.git] / crypto / asn1 / a_gentm.c

/* crypto/asn1/a_gentm.c */
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
 * All rights reserved.
 *
 * This package is an SSL implementation written
 * by Eric Young (eay@cryptsoft.com).
 * The implementation was written so as to conform with Netscapes SSL.
 * 
 * This library is free for commercial and non-commercial use as long as
 * the following conditions are aheared to.  The following conditions
 * apply to all code found in this distribution, be it the RC4, RSA,
 * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
 * included with this distribution is covered by the same copyright terms
 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
 * 
 * Copyright remains Eric Young's, and as such any Copyright notices in
 * the code are not to be removed.
 * If this package is used in a product, Eric Young should be given attribution
 * as the author of the parts of the library used.
 * This can be in the form of a textual message at program startup or
 * in documentation (online or textual) provided with the package.
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *    "This product includes cryptographic software written by
 *     Eric Young (eay@cryptsoft.com)"
 *    The word 'cryptographic' can be left out if the rouines from the library
 *    being used are not cryptographic related :-).
 * 4. If you include any Windows specific code (or a derivative thereof) from 
 *    the apps directory (application code) you must include an acknowledgement:
 *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
 * 
 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * 
 * The licence and distribution terms for any publically available version or
 * derivative of this code cannot be changed.  i.e. this code cannot simply be
 * copied and put under another distribution licence
 * [including the GNU Public Licence.]
 */

/* GENERALIZEDTIME implementation, written by Steve Henson. Based on UTCTIME */

#include <stdio.h>
#include <time.h>
#include "cryptlib.h"
#include "o_time.h"
#include <openssl/asn1.h>

#if 0

int i2d_ASN1_GENERALIZEDTIME(ASN1_GENERALIZEDTIME *a, unsigned char **pp)
	{
#ifdef CHARSET_EBCDIC
	/* KLUDGE! We convert to ascii before writing DER */
	int len;
	char tmp[24];
	ASN1_STRING tmpstr = *(ASN1_STRING *)a;

	len = tmpstr.length;
	ebcdic2ascii(tmp, tmpstr.data, (len >= sizeof tmp) ? sizeof tmp : len);
	tmpstr.data = tmp;

	a = (ASN1_GENERALIZEDTIME *) &tmpstr;
#endif
	return(i2d_ASN1_bytes((ASN1_STRING *)a,pp,
		V_ASN1_GENERALIZEDTIME,V_ASN1_UNIVERSAL));
	}


ASN1_GENERALIZEDTIME *d2i_ASN1_GENERALIZEDTIME(ASN1_GENERALIZEDTIME **a,
	     unsigned char **pp, long length)
	{
	ASN1_GENERALIZEDTIME *ret=NULL;

	ret=(ASN1_GENERALIZEDTIME *)d2i_ASN1_bytes((ASN1_STRING **)a,pp,length,
		V_ASN1_GENERALIZEDTIME,V_ASN1_UNIVERSAL);
	if (ret == NULL)
		{
		ASN1err(ASN1_F_D2I_ASN1_GENERALIZEDTIME,ERR_R_NESTED_ASN1_ERROR);
		return(NULL);
		}
#ifdef CHARSET_EBCDIC
	ascii2ebcdic(ret->data, ret->data, ret->length);
#endif
	if (!ASN1_GENERALIZEDTIME_check(ret))
		{
		ASN1err(ASN1_F_D2I_ASN1_GENERALIZEDTIME,ASN1_R_INVALID_TIME_FORMAT);
		goto err;
		}

	return(ret);
err:
	if ((ret != NULL) && ((a == NULL) || (*a != ret)))
		M_ASN1_GENERALIZEDTIME_free(ret);
	return(NULL);
	}

#endif

int ASN1_GENERALIZEDTIME_check(ASN1_GENERALIZEDTIME *d)
	{
	static int min[9]={ 0, 0, 1, 1, 0, 0, 0, 0, 0};
	static int max[9]={99, 99,12,31,23,59,59,12,59};
	char *a;
	int n,i,l,o;

	if (d->type != V_ASN1_GENERALIZEDTIME) return(0);
	l=d->length;
	a=(char *)d->data;
	o=0;
	/* GENERALIZEDTIME is similar to UTCTIME except the year is
         * represented as YYYY. This stuff treats everything as a two digit
         * field so make first two fields 00 to 99
         */
	if (l < 13) goto err;
	for (i=0; i<7; i++)
		{
		if ((i == 6) && ((a[o] == 'Z') ||
			(a[o] == '+') || (a[o] == '-')))
			{ i++; break; }
		if ((a[o] < '0') || (a[o] > '9')) goto err;
		n= a[o]-'0';
		if (++o > l) goto err;

		if ((a[o] < '0') || (a[o] > '9')) goto err;
		n=(n*10)+ a[o]-'0';
		if (++o > l) goto err;

		if ((n < min[i]) || (n > max[i])) goto err;
		}
	if (a[o] == 'Z')
		o++;
	else if ((a[o] == '+') || (a[o] == '-'))
		{
		o++;
		if (o+4 > l) goto err;
		for (i=7; i<9; i++)
			{
			if ((a[o] < '0') || (a[o] > '9')) goto err;
			n= a[o]-'0';
			o++;
			if ((a[o] < '0') || (a[o] > '9')) goto err;
			n=(n*10)+ a[o]-'0';
			if ((n < min[i]) || (n > max[i])) goto err;
			o++;
			}
		}
	return(o == l);
err:
	return(0);
	}

int ASN1_GENERALIZEDTIME_set_string(ASN1_GENERALIZEDTIME *s, char *str)
	{
	ASN1_GENERALIZEDTIME t;

	t.type=V_ASN1_GENERALIZEDTIME;
	t.length=strlen(str);
	t.data=(unsigned char *)str;
	if (ASN1_GENERALIZEDTIME_check(&t))
		{
		if (s != NULL)
			{
			ASN1_STRING_set((ASN1_STRING *)s,
				(unsigned char *)str,t.length);
			s->type=V_ASN1_GENERALIZEDTIME;
			}
		return(1);
		}
	else
		return(0);
	}

ASN1_GENERALIZEDTIME *ASN1_GENERALIZEDTIME_set(ASN1_GENERALIZEDTIME *s,
	     time_t t)
	{
	char *p;
	struct tm *ts;
	struct tm data;

	if (s == NULL)
		s=M_ASN1_GENERALIZEDTIME_new();
	if (s == NULL)
		return(NULL);

	ts=OPENSSL_gmtime(&t, &data);
	if (ts == NULL)
		return(NULL);

	p=(char *)s->data;
	if ((p == NULL) || (s->length < 16))
		{
		p=OPENSSL_malloc(20);
		if (p == NULL) return(NULL);
		if (s->data != NULL)
			OPENSSL_free(s->data);
		s->data=(unsigned char *)p;
		}

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