[thirdparty/openssl.git] / crypto / asn1 / a_utctm.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.]
 */

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

int asn1_utctime_to_tm(struct tm *tm, const ASN1_UTCTIME *d)
{
    static const int min[8] = { 0, 1, 1, 0, 0, 0, 0, 0 };
    static const int max[8] = { 99, 12, 31, 23, 59, 59, 12, 59 };
    char *a;
    int n, i, l, o;

    if (d->type != V_ASN1_UTCTIME)
        return (0);
    l = d->length;
    a = (char *)d->data;
    o = 0;

    if (l < 11)
        goto err;
    for (i = 0; i < 6; i++) {
        if ((i == 5) && ((a[o] == 'Z') || (a[o] == '+') || (a[o] == '-'))) {
            i++;
            if (tm)
                tm->tm_sec = 0;
            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 (tm) {
            switch (i) {
            case 0:
                tm->tm_year = n < 50 ? n + 100 : n;
                break;
            case 1:
                tm->tm_mon = n - 1;
                break;
            case 2:
                tm->tm_mday = n;
                break;
            case 3:
                tm->tm_hour = n;
                break;
            case 4:
                tm->tm_min = n;
                break;
            case 5:
                tm->tm_sec = n;
                break;
            }
        }
    }
    if (a[o] == 'Z')
        o++;
    else if ((a[o] == '+') || (a[o] == '-')) {
        int offsign = a[o] == '-' ? -1 : 1, offset = 0;
        o++;
        if (o + 4 > l)
            goto err;
        for (i = 6; i < 8; 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;
            if (tm) {
                if (i == 6)
                    offset = n * 3600;
                else if (i == 7)
                    offset += n * 60;
            }
            o++;
        }
        if (offset && !OPENSSL_gmtime_adj(tm, 0, offset * offsign))
            return 0;
    }
    return o == l;
 err:
    return 0;
}

int ASN1_UTCTIME_check(const ASN1_UTCTIME *d)
{
    return asn1_utctime_to_tm(NULL, d);
}

int ASN1_UTCTIME_set_string(ASN1_UTCTIME *s, const char *str)
{
    ASN1_UTCTIME t;

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

ASN1_UTCTIME *ASN1_UTCTIME_set(ASN1_UTCTIME *s, time_t t)
{
    return ASN1_UTCTIME_adj(s, t, 0, 0);
}

ASN1_UTCTIME *ASN1_UTCTIME_adj(ASN1_UTCTIME *s, time_t t,
                               int offset_day, long offset_sec)
{
    char *p;
    struct tm *ts;
    struct tm data;
    size_t len = 20;
    int free_s = 0;

    if (s == NULL) {
        s = ASN1_UTCTIME_new();
        if (s == NULL)
            goto err;
        free_s = 1;
    }

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

    if (offset_day || offset_sec) {
        if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec))
            goto err;
    }

    if ((ts->tm_year < 50) || (ts->tm_year >= 150))
        goto err;

    p = (char *)s->data;
    if ((p == NULL) || ((size_t)s->length < len)) {
        p = OPENSSL_malloc(len);
        if (p == NULL) {
            ASN1err(ASN1_F_ASN1_UTCTIME_ADJ, ERR_R_MALLOC_FAILURE);
            goto err;
        }
        OPENSSL_free(s->data);
        s->data = (unsigned char *)p;
    }

    BIO_snprintf(p, len, "%02d%02d%02d%02d%02d%02dZ", ts->tm_year % 100,
                 ts->tm_mon + 1, ts->tm_mday, ts->tm_hour, ts->tm_min,
                 ts->tm_sec);
    s->length = strlen(p);
    s->type = V_ASN1_UTCTIME;
#ifdef CHARSET_EBCDIC_not
    ebcdic2ascii(s->data, s->data, s->length);
#endif
    return (s);
 err:
    if (free_s)
        ASN1_UTCTIME_free(s);
    return NULL;
}

int ASN1_UTCTIME_cmp_time_t(const ASN1_UTCTIME *s, time_t t)
{
    struct tm stm, ttm;
    int day, sec;

    if (!asn1_utctime_to_tm(&stm, s))
        return -2;

    if (!OPENSSL_gmtime(&t, &ttm))
        return -2;

    if (!OPENSSL_gmtime_diff(&day, &sec, &ttm, &stm))
        return -2;

    if (day > 0)
        return 1;
    if (day < 0)
        return -1;
    if (sec > 0)
        return 1;
    if (sec < 0)
        return -1;
    return 0;
}

int ASN1_UTCTIME_print(BIO *bp, const ASN1_UTCTIME *tm)
{
    const char *v;
    int gmt = 0;
    int i;
    int y = 0, M = 0, d = 0, h = 0, m = 0, s = 0;

    i = tm->length;
    v = (const char *)tm->data;

    if (i < 10)
        goto err;
    if (v[i - 1] == 'Z')
        gmt = 1;
    for (i = 0; i < 10; i++)
        if ((v[i] > '9') || (v[i] < '0'))
            goto err;
    y = (v[0] - '0') * 10 + (v[1] - '0');
    if (y < 50)
        y += 100;
    M = (v[2] - '0') * 10 + (v[3] - '0');
    if ((M > 12) || (M < 1))
        goto err;
    d = (v[4] - '0') * 10 + (v[5] - '0');
    h = (v[6] - '0') * 10 + (v[7] - '0');
    m = (v[8] - '0') * 10 + (v[9] - '0');
    if (tm->length >= 12 &&
        (v[10] >= '0') && (v[10] <= '9') && (v[11] >= '0') && (v[11] <= '9'))
        s = (v[10] - '0') * 10 + (v[11] - '0');

    if (BIO_printf(bp, "%s %2d %02d:%02d:%02d %d%s",
                   _asn1_mon[M - 1], d, h, m, s, y + 1900,
                   (gmt) ? " GMT" : "") <= 0)
        return (0);
    else
        return (1);
 err:
    BIO_write(bp, "Bad time value", 14);
    return (0);
}
Commit	Line	Data
58964a49	1	/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
d02b48c6 RE	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.
0f113f3e	7	*
d02b48c6 RE	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).
0f113f3e	14	*
d02b48c6 RE	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.
0f113f3e	21	*
d02b48c6 RE	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 :-).
0f113f3e	36	* 4. If you include any Windows specific code (or a derivative thereof) from
d02b48c6 RE	37	* the apps directory (application code) you must include an acknowledgement:
d02b48c6 RE	38	* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
0f113f3e	39	*
d02b48c6 RE	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.
0f113f3e	51	*
d02b48c6 RE	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
	58	#include <stdio.h>
	59	#include <time.h>
b39fc560	60	#include "internal/cryptlib.h"
7ab1a391	61	#include <openssl/asn1.h>
1c455bc0	62	#include "asn1_locl.h"
d02b48c6	63
1c455bc0	64	int asn1_utctime_to_tm(struct tm tm, const ASN1_UTCTIME d)
0f113f3e MC	65	{
	66	static const int min[8] = { 0, 1, 1, 0, 0, 0, 0, 0 };
	67	static const int max[8] = { 99, 12, 31, 23, 59, 59, 12, 59 };
	68	char *a;
	69	int n, i, l, o;
	70
	71	if (d->type != V_ASN1_UTCTIME)
	72	return (0);
	73	l = d->length;
	74	a = (char *)d->data;
	75	o = 0;
	76
	77	if (l < 11)
	78	goto err;
	79	for (i = 0; i < 6; i++) {
	80	if ((i == 5) && ((a[o] == 'Z') \|\| (a[o] == '+') \|\| (a[o] == '-'))) {
	81	i++;
	82	if (tm)
	83	tm->tm_sec = 0;
	84	break;
	85	}
	86	if ((a[o] < '0') \|\| (a[o] > '9'))
	87	goto err;
	88	n = a[o] - '0';
	89	if (++o > l)
	90	goto err;
	91
	92	if ((a[o] < '0') \|\| (a[o] > '9'))
	93	goto err;
	94	n = (n * 10) + a[o] - '0';
	95	if (++o > l)
	96	goto err;
	97
	98	if ((n < min[i]) \|\| (n > max[i]))
	99	goto err;
	100	if (tm) {
	101	switch (i) {
	102	case 0:
	103	tm->tm_year = n < 50 ? n + 100 : n;
	104	break;
	105	case 1:
	106	tm->tm_mon = n - 1;
	107	break;
	108	case 2:
	109	tm->tm_mday = n;
	110	break;
	111	case 3:
	112	tm->tm_hour = n;
	113	break;
	114	case 4:
	115	tm->tm_min = n;
	116	break;
	117	case 5:
	118	tm->tm_sec = n;
	119	break;
	120	}
	121	}
	122	}
	123	if (a[o] == 'Z')
	124	o++;
	125	else if ((a[o] == '+') \|\| (a[o] == '-')) {
	126	int offsign = a[o] == '-' ? -1 : 1, offset = 0;
	127	o++;
	128	if (o + 4 > l)
129	goto err;
130	for (i = 6; i < 8; i++) {
131	if ((a[o] < '0') \|\| (a[o] > '9'))
132	goto err;
133	n = a[o] - '0';
134	o++;
135	if ((a[o] < '0') \|\| (a[o] > '9'))
136	goto err;
137	n = (n * 10) + a[o] - '0';
138	if ((n < min[i]) \|\| (n > max[i]))
139	goto err;
140	if (tm) {
141	if (i == 6)
142	offset = n * 3600;
143	else if (i == 7)
144	offset += n * 60;
145	}
146	o++;
147	}
148	if (offset && !OPENSSL_gmtime_adj(tm, 0, offset * offsign))
149	return 0;
150	}
151	return o == l;
152	err:
153	return 0;
154	}
1c455bc0 DSH	155
1c455bc0 DSH	156	int ASN1_UTCTIME_check(const ASN1_UTCTIME *d)
0f113f3e MC	157	{
	158	return asn1_utctime_to_tm(NULL, d);
	159	}
d02b48c6	160
875a644a	161	int ASN1_UTCTIME_set_string(ASN1_UTCTIME s, const char str)
0f113f3e MC	162	{
	163	ASN1_UTCTIME t;
	164
	165	t.type = V_ASN1_UTCTIME;
	166	t.length = strlen(str);
	167	t.data = (unsigned char *)str;
	168	if (ASN1_UTCTIME_check(&t)) {
	169	if (s != NULL) {
	170	if (!ASN1_STRING_set((ASN1_STRING *)s,
	171	(unsigned char *)str, t.length))
	172	return 0;
	173	s->type = V_ASN1_UTCTIME;
	174	}
	175	return (1);
	176	} else
	177	return (0);
	178	}
58964a49	179
6b691a5c	180	ASN1_UTCTIME ASN1_UTCTIME_set(ASN1_UTCTIME s, time_t t)
0f113f3e MC	181	{
	182	return ASN1_UTCTIME_adj(s, t, 0, 0);
	183	}
87d3a0cd DSH	184
87d3a0cd DSH	185	ASN1_UTCTIME ASN1_UTCTIME_adj(ASN1_UTCTIME s, time_t t,
0f113f3e MC	186	int offset_day, long offset_sec)
	187	{
	188	char *p;
	189	struct tm *ts;
	190	struct tm data;
	191	size_t len = 20;
	192	int free_s = 0;
	193
	194	if (s == NULL) {
f422a514	195	s = ASN1_UTCTIME_new();
0dfb9398 RS	196	if (s == NULL)
	197	goto err;
	198	free_s = 1;
0f113f3e	199	}
0f113f3e MC	200
	201	ts = OPENSSL_gmtime(&t, &data);
	202	if (ts == NULL)
	203	goto err;
	204
	205	if (offset_day \|\| offset_sec) {
	206	if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec))
	207	goto err;
	208	}
	209
	210	if ((ts->tm_year < 50) \|\| (ts->tm_year >= 150))
	211	goto err;
	212
	213	p = (char *)s->data;
	214	if ((p == NULL) \|\| ((size_t)s->length < len)) {
	215	p = OPENSSL_malloc(len);
	216	if (p == NULL) {
	217	ASN1err(ASN1_F_ASN1_UTCTIME_ADJ, ERR_R_MALLOC_FAILURE);
	218	goto err;
	219	}
b548a1f1	220	OPENSSL_free(s->data);
0f113f3e MC	221	s->data = (unsigned char *)p;
	222	}
	223
	224	BIO_snprintf(p, len, "%02d%02d%02d%02d%02d%02dZ", ts->tm_year % 100,
	225	ts->tm_mon + 1, ts->tm_mday, ts->tm_hour, ts->tm_min,
	226	ts->tm_sec);
	227	s->length = strlen(p);
	228	s->type = V_ASN1_UTCTIME;
a53955d8	229	#ifdef CHARSET_EBCDIC_not
0f113f3e	230	ebcdic2ascii(s->data, s->data, s->length);
a53955d8	231	#endif
0f113f3e MC	232	return (s);
0f113f3e MC	233	err:
0dfb9398	234	if (free_s)
f422a514	235	ASN1_UTCTIME_free(s);
0f113f3e MC	236	return NULL;
0f113f3e MC	237	}
61f175f4 BM	238
61f175f4 BM	239	int ASN1_UTCTIME_cmp_time_t(const ASN1_UTCTIME *s, time_t t)
0f113f3e MC	240	{
	241	struct tm stm, ttm;
	242	int day, sec;
	243
	244	if (!asn1_utctime_to_tm(&stm, s))
	245	return -2;
	246
	247	if (!OPENSSL_gmtime(&t, &ttm))
	248	return -2;
	249
da27006d	250	if (!OPENSSL_gmtime_diff(&day, &sec, &ttm, &stm))
0f113f3e MC	251	return -2;
	252
	253	if (day > 0)
	254	return 1;
	255	if (day < 0)
	256	return -1;
	257	if (sec > 0)
	258	return 1;
	259	if (sec < 0)
	260	return -1;
	261	return 0;
	262	}
0d0099ea DSH	263
	264	int ASN1_UTCTIME_print(BIO bp, const ASN1_UTCTIME tm)
	265	{
	266	const char *v;
	267	int gmt = 0;
	268	int i;
	269	int y = 0, M = 0, d = 0, h = 0, m = 0, s = 0;
	270
	271	i = tm->length;
	272	v = (const char *)tm->data;
	273
	274	if (i < 10)
	275	goto err;
	276	if (v[i - 1] == 'Z')
	277	gmt = 1;
	278	for (i = 0; i < 10; i++)
	279	if ((v[i] > '9') \|\| (v[i] < '0'))
	280	goto err;
	281	y = (v[0] - '0') * 10 + (v[1] - '0');
	282	if (y < 50)
	283	y += 100;
	284	M = (v[2] - '0') * 10 + (v[3] - '0');
	285	if ((M > 12) \|\| (M < 1))
	286	goto err;
	287	d = (v[4] - '0') * 10 + (v[5] - '0');
	288	h = (v[6] - '0') * 10 + (v[7] - '0');
	289	m = (v[8] - '0') * 10 + (v[9] - '0');
	290	if (tm->length >= 12 &&
	291	(v[10] >= '0') && (v[10] <= '9') && (v[11] >= '0') && (v[11] <= '9'))
	292	s = (v[10] - '0') * 10 + (v[11] - '0');
	293
	294	if (BIO_printf(bp, "%s %2d %02d:%02d:%02d %d%s",
	295	_asn1_mon[M - 1], d, h, m, s, y + 1900,
	296	(gmt) ? " GMT" : "") <= 0)
	297	return (0);
	298	else
	299	return (1);
	300	err:
	301	BIO_write(bp, "Bad time value", 14);
	302	return (0);
	303	}