a_time.c revision 325335
1/* crypto/asn1/a_time.c */ 2/* ==================================================================== 3 * Copyright (c) 1999 The OpenSSL Project. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in 14 * the documentation and/or other materials provided with the 15 * distribution. 16 * 17 * 3. All advertising materials mentioning features or use of this 18 * software must display the following acknowledgment: 19 * "This product includes software developed by the OpenSSL Project 20 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 21 * 22 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 23 * endorse or promote products derived from this software without 24 * prior written permission. For written permission, please contact 25 * licensing@OpenSSL.org. 26 * 27 * 5. Products derived from this software may not be called "OpenSSL" 28 * nor may "OpenSSL" appear in their names without prior written 29 * permission of the OpenSSL Project. 30 * 31 * 6. Redistributions of any form whatsoever must retain the following 32 * acknowledgment: 33 * "This product includes software developed by the OpenSSL Project 34 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 35 * 36 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 37 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 38 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 39 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 40 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 41 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 42 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 43 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 44 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 45 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 46 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 47 * OF THE POSSIBILITY OF SUCH DAMAGE. 48 * ==================================================================== 49 * 50 * This product includes cryptographic software written by Eric Young 51 * (eay@cryptsoft.com). This product includes software written by Tim 52 * Hudson (tjh@cryptsoft.com). 53 * 54 */ 55 56/*- 57 * This is an implementation of the ASN1 Time structure which is: 58 * Time ::= CHOICE { 59 * utcTime UTCTime, 60 * generalTime GeneralizedTime } 61 * written by Steve Henson. 62 */ 63 64#include <stdio.h> 65#include <time.h> 66#include "cryptlib.h" 67#include "o_time.h" 68#include <openssl/asn1t.h> 69#include "asn1_locl.h" 70 71IMPLEMENT_ASN1_MSTRING(ASN1_TIME, B_ASN1_TIME) 72 73IMPLEMENT_ASN1_FUNCTIONS(ASN1_TIME) 74 75#if 0 76int i2d_ASN1_TIME(ASN1_TIME *a, unsigned char **pp) 77{ 78# ifdef CHARSET_EBCDIC 79 /* KLUDGE! We convert to ascii before writing DER */ 80 char tmp[24]; 81 ASN1_STRING tmpstr; 82 83 if (a->type == V_ASN1_UTCTIME || a->type == V_ASN1_GENERALIZEDTIME) { 84 int len; 85 86 tmpstr = *(ASN1_STRING *)a; 87 len = tmpstr.length; 88 ebcdic2ascii(tmp, tmpstr.data, 89 (len >= sizeof tmp) ? sizeof tmp : len); 90 tmpstr.data = tmp; 91 a = (ASN1_GENERALIZEDTIME *)&tmpstr; 92 } 93# endif 94 if (a->type == V_ASN1_UTCTIME || a->type == V_ASN1_GENERALIZEDTIME) 95 return (i2d_ASN1_bytes((ASN1_STRING *)a, pp, 96 a->type, V_ASN1_UNIVERSAL)); 97 ASN1err(ASN1_F_I2D_ASN1_TIME, ASN1_R_EXPECTING_A_TIME); 98 return -1; 99} 100#endif 101 102ASN1_TIME *ASN1_TIME_set(ASN1_TIME *s, time_t t) 103{ 104 return ASN1_TIME_adj(s, t, 0, 0); 105} 106 107ASN1_TIME *ASN1_TIME_adj(ASN1_TIME *s, time_t t, 108 int offset_day, long offset_sec) 109{ 110 struct tm *ts; 111 struct tm data; 112 113 ts = OPENSSL_gmtime(&t, &data); 114 if (ts == NULL) { 115 ASN1err(ASN1_F_ASN1_TIME_ADJ, ASN1_R_ERROR_GETTING_TIME); 116 return NULL; 117 } 118 if (offset_day || offset_sec) { 119 if (!OPENSSL_gmtime_adj(ts, offset_day, offset_sec)) 120 return NULL; 121 } 122 if ((ts->tm_year >= 50) && (ts->tm_year < 150)) 123 return ASN1_UTCTIME_adj(s, t, offset_day, offset_sec); 124 return ASN1_GENERALIZEDTIME_adj(s, t, offset_day, offset_sec); 125} 126 127int ASN1_TIME_check(ASN1_TIME *t) 128{ 129 if (t->type == V_ASN1_GENERALIZEDTIME) 130 return ASN1_GENERALIZEDTIME_check(t); 131 else if (t->type == V_ASN1_UTCTIME) 132 return ASN1_UTCTIME_check(t); 133 return 0; 134} 135 136/* Convert an ASN1_TIME structure to GeneralizedTime */ 137ASN1_GENERALIZEDTIME *ASN1_TIME_to_generalizedtime(ASN1_TIME *t, 138 ASN1_GENERALIZEDTIME **out) 139{ 140 ASN1_GENERALIZEDTIME *ret = NULL; 141 char *str; 142 int newlen; 143 144 if (!ASN1_TIME_check(t)) 145 return NULL; 146 147 if (!out || !*out) { 148 if (!(ret = ASN1_GENERALIZEDTIME_new())) 149 goto err; 150 } else { 151 ret = *out; 152 } 153 154 /* If already GeneralizedTime just copy across */ 155 if (t->type == V_ASN1_GENERALIZEDTIME) { 156 if (!ASN1_STRING_set(ret, t->data, t->length)) 157 goto err; 158 goto done; 159 } 160 161 /* grow the string */ 162 if (!ASN1_STRING_set(ret, NULL, t->length + 2)) 163 goto err; 164 /* ASN1_STRING_set() allocated 'len + 1' bytes. */ 165 newlen = t->length + 2 + 1; 166 str = (char *)ret->data; 167 /* Work out the century and prepend */ 168 if (t->data[0] >= '5') 169 BUF_strlcpy(str, "19", newlen); 170 else 171 BUF_strlcpy(str, "20", newlen); 172 173 BUF_strlcat(str, (char *)t->data, newlen); 174 175 done: 176 if (out != NULL && *out == NULL) 177 *out = ret; 178 return ret; 179 180 err: 181 if (out == NULL || *out != ret) 182 ASN1_GENERALIZEDTIME_free(ret); 183 return NULL; 184} 185 186 187int ASN1_TIME_set_string(ASN1_TIME *s, const char *str) 188{ 189 ASN1_TIME t; 190 191 t.length = strlen(str); 192 t.data = (unsigned char *)str; 193 t.flags = 0; 194 195 t.type = V_ASN1_UTCTIME; 196 197 if (!ASN1_TIME_check(&t)) { 198 t.type = V_ASN1_GENERALIZEDTIME; 199 if (!ASN1_TIME_check(&t)) 200 return 0; 201 } 202 203 if (s && !ASN1_STRING_copy((ASN1_STRING *)s, (ASN1_STRING *)&t)) 204 return 0; 205 206 return 1; 207} 208 209static int asn1_time_to_tm(struct tm *tm, const ASN1_TIME *t) 210{ 211 if (t == NULL) { 212 time_t now_t; 213 time(&now_t); 214 if (OPENSSL_gmtime(&now_t, tm)) 215 return 1; 216 return 0; 217 } 218 219 if (t->type == V_ASN1_UTCTIME) 220 return asn1_utctime_to_tm(tm, t); 221 else if (t->type == V_ASN1_GENERALIZEDTIME) 222 return asn1_generalizedtime_to_tm(tm, t); 223 224 return 0; 225} 226 227int ASN1_TIME_diff(int *pday, int *psec, 228 const ASN1_TIME *from, const ASN1_TIME *to) 229{ 230 struct tm tm_from, tm_to; 231 if (!asn1_time_to_tm(&tm_from, from)) 232 return 0; 233 if (!asn1_time_to_tm(&tm_to, to)) 234 return 0; 235 return OPENSSL_gmtime_diff(pday, psec, &tm_from, &tm_to); 236} 237