195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* Written by Richard Levitte (richard@levitte.org) for the OpenSSL 295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * project 2001. 395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL 495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * project 2008. 595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley */ 695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* ==================================================================== 795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Copyright (c) 2001 The OpenSSL Project. All rights reserved. 895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Redistribution and use in source and binary forms, with or without 1095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * modification, are permitted provided that the following conditions 1195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * are met: 1295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 1395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 1. Redistributions of source code must retain the above copyright 1495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * notice, this list of conditions and the following disclaimer. 1595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 1695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 2. Redistributions in binary form must reproduce the above copyright 1795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * notice, this list of conditions and the following disclaimer in 1895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * the documentation and/or other materials provided with the 1995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * distribution. 2095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 2195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 3. All advertising materials mentioning features or use of this 2295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * software must display the following acknowledgment: 2395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * "This product includes software developed by the OpenSSL Project 2495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 2595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 2695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 2795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * endorse or promote products derived from this software without 2895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * prior written permission. For written permission, please contact 2995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * licensing@OpenSSL.org. 3095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 3195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 5. Products derived from this software may not be called "OpenSSL" 3295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * nor may "OpenSSL" appear in their names without prior written 3395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * permission of the OpenSSL Project. 3495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 3595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 6. Redistributions of any form whatsoever must retain the following 3695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * acknowledgment: 3795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * "This product includes software developed by the OpenSSL Project 3895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 3995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 4095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 4195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 4295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 4395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 4495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 4595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 4695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 4795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 4895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 4995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 5095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 5195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * OF THE POSSIBILITY OF SUCH DAMAGE. 5295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ==================================================================== 5395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 5495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * This product includes cryptographic software written by Eric Young 5595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * (eay@cryptsoft.com). This product includes software written by Tim 5695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Hudson (tjh@cryptsoft.com). */ 5795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 580113a4fb60c3b6e9e93a217d5b4d373eb343a8c6Adam Langley#if !defined(_BSD_SOURCE) 5995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#define _BSD_SOURCE /* for gmtime_r */ 600113a4fb60c3b6e9e93a217d5b4d373eb343a8c6Adam Langley#endif 6195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 6295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/time_support.h> 6395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 6495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#define SECS_PER_DAY (24 * 60 * 60) 6595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 6695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystruct tm *OPENSSL_gmtime(const time_t *time, struct tm *result) { 6795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#if defined(OPENSSL_WINDOWS) 68ded93581f1674f81faa0dba4b15a842756066ab2Adam Langley if (gmtime_s(result, time)) { 6995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return NULL; 7095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 7195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return result; 7295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#else 7395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return gmtime_r(time, result); 7495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#endif 7595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 7695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 7795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* Convert date to and from julian day Uses Fliegel & Van Flandern algorithm */ 7895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystatic long date_to_julian(int y, int m, int d) { 7995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return (1461 * (y + 4800 + (m - 14) / 12)) / 4 + 8095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley (367 * (m - 2 - 12 * ((m - 14) / 12))) / 12 - 8195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley (3 * ((y + 4900 + (m - 14) / 12) / 100)) / 4 + d - 32075; 8295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 8395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 8495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystatic void julian_to_date(long jd, int *y, int *m, int *d) { 8595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long L = jd + 68569; 8695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long n = (4 * L) / 146097; 8795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long i, j; 8895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 8995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley L = L - (146097 * n + 3) / 4; 9095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley i = (4000 * (L + 1)) / 1461001; 9195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley L = L - (1461 * i) / 4 + 31; 9295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley j = (80 * L) / 2447; 9395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *d = L - (2447 * j) / 80; 9495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley L = j / 11; 9595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *m = j + 2 - (12 * L); 9695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *y = 100 * (n - 49) + i + L; 9795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 9895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 9995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* Convert tm structure and offset into julian day and seconds */ 10095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystatic int julian_adj(const struct tm *tm, int off_day, long offset_sec, 10195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long *pday, int *psec) { 10295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley int offset_hms, offset_day; 10395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long time_jd; 10495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley int time_year, time_month, time_day; 10595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* split offset into days and day seconds */ 10695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_day = offset_sec / SECS_PER_DAY; 10795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Avoid sign issues with % operator */ 10895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_hms = offset_sec - (offset_day * SECS_PER_DAY); 10995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_day += off_day; 11095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Add current time seconds to offset */ 11195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_hms += tm->tm_hour * 3600 + tm->tm_min * 60 + tm->tm_sec; 11295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Adjust day seconds if overflow */ 11395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (offset_hms >= SECS_PER_DAY) { 11495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_day++; 11595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_hms -= SECS_PER_DAY; 11695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } else if (offset_hms < 0) { 11795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_day--; 11895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley offset_hms += SECS_PER_DAY; 11995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 12095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 12195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Convert date of time structure into a Julian day number. */ 12295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 12395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley time_year = tm->tm_year + 1900; 12495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley time_month = tm->tm_mon + 1; 12595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley time_day = tm->tm_mday; 12695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 12795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley time_jd = date_to_julian(time_year, time_month, time_day); 12895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 12995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Work out Julian day of new date */ 13095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley time_jd += offset_day; 13195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 13295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (time_jd < 0) 13395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 0; 13495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 13595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *pday = time_jd; 13695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *psec = offset_hms; 13795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 1; 13895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 13995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 14095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleyint OPENSSL_gmtime_adj(struct tm *tm, int off_day, long offset_sec) { 14195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley int time_sec, time_year, time_month, time_day; 14295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long time_jd; 14395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 14495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Convert time and offset into julian day and seconds */ 14595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (!julian_adj(tm, off_day, offset_sec, &time_jd, &time_sec)) 14695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 0; 14795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 14895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Convert Julian day back to date */ 14995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 15095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley julian_to_date(time_jd, &time_year, &time_month, &time_day); 15195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 15295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (time_year < 1900 || time_year > 9999) 15395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 0; 15495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 15595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Update tm structure */ 15695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 15795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_year = time_year - 1900; 15895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_mon = time_month - 1; 15995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_mday = time_day; 16095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 16195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_hour = time_sec / 3600; 16295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_min = (time_sec / 60) % 60; 16395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley tm->tm_sec = time_sec % 60; 16495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 16595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 1; 16695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 16795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 16895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleyint OPENSSL_gmtime_diff(int *pday, int *psec, const struct tm *from, 16995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley const struct tm *to) { 17095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley int from_sec, to_sec, diff_sec; 17195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley long from_jd, to_jd, diff_day; 17295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 17395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (!julian_adj(from, 0, 0, &from_jd, &from_sec)) { 17495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 0; 17595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 17695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (!julian_adj(to, 0, 0, &to_jd, &to_sec)) { 17795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 0; 17895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 17995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 18095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_day = to_jd - from_jd; 18195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_sec = to_sec - from_sec; 18295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley /* Adjust differences so both positive or both negative */ 18395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (diff_day > 0 && diff_sec < 0) { 18495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_day--; 18595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_sec += SECS_PER_DAY; 18695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 18795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (diff_day < 0 && diff_sec > 0) { 18895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_day++; 18995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley diff_sec -= SECS_PER_DAY; 19095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 19195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 19295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (pday) { 19395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *pday = (int)diff_day; 19495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 19595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley if (psec) { 19695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *psec = diff_sec; 19795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley } 19895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley 19995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley return 1; 20095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} 201