#include "cuTimeStr.h"
#include "cuCdsaUtils.h"
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>
#include <pthread.h>
int cuTimeStringToTm(
const char *str,
unsigned len,
struct tm *tmp)
{
char szTemp[5];
unsigned isUtc = 0;
unsigned noSeconds = 0;
unsigned x;
unsigned i;
char *cp;
if((str == NULL) || (len == 0) || (tmp == NULL)) {
return 1;
}
if(str[len - 1] == '\0') {
len--;
}
switch(len) {
case UTC_TIME_NOSEC_LEN: isUtc = 1;
noSeconds = 1;
break;
case UTC_TIME_STRLEN: isUtc = 1;
break;
case GENERALIZED_TIME_STRLEN: break;
default: return 1;
}
cp = (char *)str;
for(i=0; i<(len - 1); i++) {
if ( !(isdigit(cp[i])) ) {
return 1;
}
}
if(cp[len - 1] != 'Z' ) {
return 1;
}
szTemp[0] = *cp++;
szTemp[1] = *cp++;
if(!isUtc) {
szTemp[2] = *cp++;
szTemp[3] = *cp++;
szTemp[4] = '\0';
}
else {
szTemp[2] = '\0';
}
x = atoi( szTemp );
if(isUtc) {
if(x < 50) {
x += 2000;
}
else {
x += 1900;
}
}
tmp->tm_year = x - 1900;
szTemp[0] = *cp++;
szTemp[1] = *cp++;
szTemp[2] = '\0';
x = atoi( szTemp );
if((x > 12) || (x <= 0)) {
return 1;
}
tmp->tm_mon = x - 1;
szTemp[0] = *cp++;
szTemp[1] = *cp++;
szTemp[2] = '\0';
x = atoi( szTemp );
if((x > 31) || (x <= 0)) {
return 1;
}
tmp->tm_mday = x;
szTemp[0] = *cp++;
szTemp[1] = *cp++;
szTemp[2] = '\0';
x = atoi( szTemp );
if((x > 23) || (x < 0)) {
return 1;
}
tmp->tm_hour = x;
szTemp[0] = *cp++;
szTemp[1] = *cp++;
szTemp[2] = '\0';
x = atoi( szTemp );
if((x > 59) || (x < 0)) {
return 1;
}
tmp->tm_min = x;
if(noSeconds) {
tmp->tm_sec = 0;
}
else {
szTemp[0] = *cp++;
szTemp[1] = *cp++;
szTemp[2] = '\0';
x = atoi( szTemp );
if((x > 59) || (x < 0)) {
return 1;
}
tmp->tm_sec = x;
}
return 0;
}
#define MAX_TIME_STR_LEN 30
static pthread_mutex_t timeMutex = PTHREAD_MUTEX_INITIALIZER;
char *cuTimeAtNowPlus(int secFromNow,
timeSpec spec)
{
struct tm utc;
char *outStr;
time_t baseTime;
pthread_mutex_lock(&timeMutex);
baseTime = time(NULL);
baseTime += (time_t)secFromNow;
utc = *gmtime(&baseTime);
pthread_mutex_unlock(&timeMutex);
outStr = (char *)APP_MALLOC(MAX_TIME_STR_LEN);
switch(spec) {
case TIME_UTC:
if(utc.tm_year >= 100) {
utc.tm_year -= 100;
}
sprintf(outStr, "%02d%02d%02d%02d%02d%02dZ",
utc.tm_year , utc.tm_mon + 1,
utc.tm_mday, utc.tm_hour, utc.tm_min, utc.tm_sec);
break;
case TIME_GEN:
sprintf(outStr, "%04d%02d%02d%02d%02d%02dZ",
utc.tm_year + 1900, utc.tm_mon + 1,
utc.tm_mday, utc.tm_hour, utc.tm_min, utc.tm_sec);
break;
case TIME_CSSM:
sprintf(outStr, "%04d%02d%02d%02d%02d%02d",
utc.tm_year + 1900, utc.tm_mon + 1,
utc.tm_mday, utc.tm_hour, utc.tm_min, utc.tm_sec);
break;
}
return outStr;
}
char *cuX509TimeToCssmTimestring(
const CSSM_X509_TIME *x509Time,
unsigned *rtnLen) {
int len = x509Time->time.Length;
const char *inStr = (char *)x509Time->time.Data;
char *rtn;
*rtnLen = 0;
if((len == 0) || (inStr == NULL)) {
return NULL;
}
rtn = (char *)malloc(CSSM_TIME_STRLEN + 1);
rtn[0] = '\0';
switch(len) {
case UTC_TIME_STRLEN:
{
char tmp[3];
int year;
tmp[0] = inStr[0];
tmp[1] = inStr[1];
tmp[2] = '\0';
year = atoi(tmp);
if(year < 50) {
strcpy(rtn, "20");
}
else if(year < 70) {
free(rtn);
return NULL;
}
else {
strcpy(rtn, "19");
}
memmove(rtn + 2, inStr, len - 1); break;
}
case CSSM_TIME_STRLEN:
memmove(rtn, inStr, len); break;
case GENERALIZED_TIME_STRLEN:
memmove(rtn, inStr, len - 1); break;
default:
free(rtn);
return NULL;
}
rtn[CSSM_TIME_STRLEN] = '\0';
*rtnLen = CSSM_TIME_STRLEN;
return rtn;
}