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

/*
 * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
 *
 * Licensed under the OpenSSL license (the "License").  You may not use
 * this file except in compliance with the License.  You can obtain a copy
 * in the file LICENSE in the source distribution or at
 * https://www.openssl.org/source/license.html
 */

#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
2039c421 RS	1	/*
2039c421 RS	2	* Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
d02b48c6	3	*
2039c421 RS	4	* Licensed under the OpenSSL license (the "License"). You may not use
	5	* this file except in compliance with the License. You can obtain a copy
	6	* in the file LICENSE in the source distribution or at
	7	* https://www.openssl.org/source/license.html
d02b48c6 RE	8	*/
	9
	10	#include <stdio.h>
	11	#include <time.h>
b39fc560	12	#include "internal/cryptlib.h"
7ab1a391	13	#include <openssl/asn1.h>
1c455bc0	14	#include "asn1_locl.h"
d02b48c6	15
1c455bc0	16	int asn1_utctime_to_tm(struct tm tm, const ASN1_UTCTIME d)
0f113f3e MC	17	{
	18	static const int min[8] = { 0, 1, 1, 0, 0, 0, 0, 0 };
	19	static const int max[8] = { 99, 12, 31, 23, 59, 59, 12, 59 };
	20	char *a;
	21	int n, i, l, o;
	22
	23	if (d->type != V_ASN1_UTCTIME)
	24	return (0);
	25	l = d->length;
	26	a = (char *)d->data;
	27	o = 0;
	28
	29	if (l < 11)
	30	goto err;
	31	for (i = 0; i < 6; i++) {
	32	if ((i == 5) && ((a[o] == 'Z') \|\| (a[o] == '+') \|\| (a[o] == '-'))) {
	33	i++;
	34	if (tm)
	35	tm->tm_sec = 0;
	36	break;
	37	}
	38	if ((a[o] < '0') \|\| (a[o] > '9'))
	39	goto err;
	40	n = a[o] - '0';
	41	if (++o > l)
	42	goto err;
	43
	44	if ((a[o] < '0') \|\| (a[o] > '9'))
	45	goto err;
	46	n = (n * 10) + a[o] - '0';
	47	if (++o > l)
	48	goto err;
	49
	50	if ((n < min[i]) \|\| (n > max[i]))
	51	goto err;
	52	if (tm) {
	53	switch (i) {
	54	case 0:
	55	tm->tm_year = n < 50 ? n + 100 : n;
	56	break;
	57	case 1:
	58	tm->tm_mon = n - 1;
	59	break;
	60	case 2:
	61	tm->tm_mday = n;
	62	break;
	63	case 3:
	64	tm->tm_hour = n;
	65	break;
	66	case 4:
	67	tm->tm_min = n;
	68	break;
	69	case 5:
	70	tm->tm_sec = n;
	71	break;
	72	}
	73	}
	74	}
	75	if (a[o] == 'Z')
	76	o++;
	77	else if ((a[o] == '+') \|\| (a[o] == '-')) {
	78	int offsign = a[o] == '-' ? -1 : 1, offset = 0;
	79	o++;
	80	if (o + 4 > l)
81	goto err;
82	for (i = 6; i < 8; i++) {
83	if ((a[o] < '0') \|\| (a[o] > '9'))
84	goto err;
85	n = a[o] - '0';
86	o++;
87	if ((a[o] < '0') \|\| (a[o] > '9'))
88	goto err;
89	n = (n * 10) + a[o] - '0';
90	if ((n < min[i]) \|\| (n > max[i]))
91	goto err;
92	if (tm) {
93	if (i == 6)
94	offset = n * 3600;
95	else if (i == 7)
96	offset += n * 60;
97	}
98	o++;
99	}
100	if (offset && !OPENSSL_gmtime_adj(tm, 0, offset * offsign))
101	return 0;
102	}
103	return o == l;
104	err:
105	return 0;
106	}
1c455bc0 DSH	107
1c455bc0 DSH	108	int ASN1_UTCTIME_check(const ASN1_UTCTIME *d)
0f113f3e MC	109	{
	110	return asn1_utctime_to_tm(NULL, d);
	111	}
d02b48c6	112
875a644a	113	int ASN1_UTCTIME_set_string(ASN1_UTCTIME s, const char str)
0f113f3e MC	114	{
	115	ASN1_UTCTIME t;
	116
	117	t.type = V_ASN1_UTCTIME;
	118	t.length = strlen(str);
	119	t.data = (unsigned char *)str;
	120	if (ASN1_UTCTIME_check(&t)) {
	121	if (s != NULL) {
	122	if (!ASN1_STRING_set((ASN1_STRING *)s,
	123	(unsigned char *)str, t.length))
	124	return 0;
	125	s->type = V_ASN1_UTCTIME;
	126	}
	127	return (1);
	128	} else
	129	return (0);
	130	}
58964a49	131
6b691a5c	132	ASN1_UTCTIME ASN1_UTCTIME_set(ASN1_UTCTIME s, time_t t)
0f113f3e MC	133	{
	134	return ASN1_UTCTIME_adj(s, t, 0, 0);
	135	}
87d3a0cd DSH	136
87d3a0cd DSH	137	ASN1_UTCTIME ASN1_UTCTIME_adj(ASN1_UTCTIME s, time_t t,
0f113f3e MC	138	int offset_day, long offset_sec)
	139	{
	140	char *p;
	141	struct tm *ts;
	142	struct tm data;
	143	size_t len = 20;
	144	int free_s = 0;
	145
	146	if (s == NULL) {
f422a514	147	s = ASN1_UTCTIME_new();
0dfb9398 RS	148	if (s == NULL)
	149	goto err;
	150	free_s = 1;
0f113f3e	151	}
0f113f3e MC	152
	153	ts = OPENSSL_gmtime(&t, &data);
	154	if (ts == NULL)
	155	goto err;
	156
	157	if (offset_day \|\| offset_sec) {
	158	if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec))
	159	goto err;
	160	}
	161
	162	if ((ts->tm_year < 50) \|\| (ts->tm_year >= 150))
	163	goto err;
	164
	165	p = (char *)s->data;
	166	if ((p == NULL) \|\| ((size_t)s->length < len)) {
	167	p = OPENSSL_malloc(len);
	168	if (p == NULL) {
	169	ASN1err(ASN1_F_ASN1_UTCTIME_ADJ, ERR_R_MALLOC_FAILURE);
	170	goto err;
	171	}
b548a1f1	172	OPENSSL_free(s->data);
0f113f3e MC	173	s->data = (unsigned char *)p;
	174	}
	175
	176	BIO_snprintf(p, len, "%02d%02d%02d%02d%02d%02dZ", ts->tm_year % 100,
	177	ts->tm_mon + 1, ts->tm_mday, ts->tm_hour, ts->tm_min,
	178	ts->tm_sec);
	179	s->length = strlen(p);
	180	s->type = V_ASN1_UTCTIME;
a53955d8	181	#ifdef CHARSET_EBCDIC_not
0f113f3e	182	ebcdic2ascii(s->data, s->data, s->length);
a53955d8	183	#endif
0f113f3e MC	184	return (s);
0f113f3e MC	185	err:
0dfb9398	186	if (free_s)
f422a514	187	ASN1_UTCTIME_free(s);
0f113f3e MC	188	return NULL;
0f113f3e MC	189	}
61f175f4 BM	190
61f175f4 BM	191	int ASN1_UTCTIME_cmp_time_t(const ASN1_UTCTIME *s, time_t t)
0f113f3e MC	192	{
	193	struct tm stm, ttm;
	194	int day, sec;
	195
	196	if (!asn1_utctime_to_tm(&stm, s))
	197	return -2;
	198
	199	if (!OPENSSL_gmtime(&t, &ttm))
	200	return -2;
	201
da27006d	202	if (!OPENSSL_gmtime_diff(&day, &sec, &ttm, &stm))
0f113f3e MC	203	return -2;
	204
	205	if (day > 0)
	206	return 1;
	207	if (day < 0)
	208	return -1;
	209	if (sec > 0)
	210	return 1;
	211	if (sec < 0)
	212	return -1;
	213	return 0;
	214	}
0d0099ea DSH	215
	216	int ASN1_UTCTIME_print(BIO bp, const ASN1_UTCTIME tm)
	217	{
	218	const char *v;
	219	int gmt = 0;
	220	int i;
	221	int y = 0, M = 0, d = 0, h = 0, m = 0, s = 0;
	222
	223	i = tm->length;
	224	v = (const char *)tm->data;
	225
	226	if (i < 10)
	227	goto err;
	228	if (v[i - 1] == 'Z')
	229	gmt = 1;
	230	for (i = 0; i < 10; i++)
	231	if ((v[i] > '9') \|\| (v[i] < '0'))
	232	goto err;
	233	y = (v[0] - '0') * 10 + (v[1] - '0');
	234	if (y < 50)
	235	y += 100;
	236	M = (v[2] - '0') * 10 + (v[3] - '0');
	237	if ((M > 12) \|\| (M < 1))
	238	goto err;
	239	d = (v[4] - '0') * 10 + (v[5] - '0');
	240	h = (v[6] - '0') * 10 + (v[7] - '0');
	241	m = (v[8] - '0') * 10 + (v[9] - '0');
	242	if (tm->length >= 12 &&
	243	(v[10] >= '0') && (v[10] <= '9') && (v[11] >= '0') && (v[11] <= '9'))
	244	s = (v[10] - '0') * 10 + (v[11] - '0');
	245
	246	if (BIO_printf(bp, "%s %2d %02d:%02d:%02d %d%s",
	247	_asn1_mon[M - 1], d, h, m, s, y + 1900,
	248	(gmt) ? " GMT" : "") <= 0)
	249	return (0);
	250	else
	251	return (1);
	252	err:
	253	BIO_write(bp, "Bad time value", 14);
	254	return (0);
	255	}