/* This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */

#include "prtime.h"

#include "secder.h"

#include "secitem.h"

#include "secerr.h"

static char *DecodeUTCTime2FormattedAscii(SECItem *utcTimeDER, char *format);

static char *DecodeGeneralizedTime2FormattedAscii(SECItem *generalizedTimeDER, char *format);

/* convert DER utc time to ascii time string */

char *

DER_UTCTimeToAscii(SECItem *utcTime)

{

    return (DecodeUTCTime2FormattedAscii(utcTime, "%a %b %d %H:%M:%S %Y"));

}

/* convert DER utc time to ascii time string, only include day, not time */

char *

DER_UTCDayToAscii(SECItem *utctime)

{

    return (DecodeUTCTime2FormattedAscii(utctime, "%a %b %d, %Y"));

}

/* convert DER generalized time to ascii time string, only include day,

   not time */

char *

DER_GeneralizedDayToAscii(SECItem *gentime)

{

    return (DecodeGeneralizedTime2FormattedAscii(gentime, "%a %b %d, %Y"));

}

/* convert DER generalized or UTC time to ascii time string, only include

   day, not time */

char *

DER_TimeChoiceDayToAscii(SECItem *timechoice)

{

    switch (timechoice->type) {

        case siUTCTime:

            return DER_UTCDayToAscii(timechoice);

        case siGeneralizedTime:

            return DER_GeneralizedDayToAscii(timechoice);

        default:

            PORT_Assert(0);

            PORT_SetError(SEC_ERROR_INVALID_ARGS);

            return NULL;

    }

}

char *

CERT_UTCTime2FormattedAscii(PRTime utcTime, char *format)

{

    PRExplodedTime printableTime;

    char *timeString;

    /* Converse time to local time and decompose it into components */

    PR_ExplodeTime(utcTime, PR_LocalTimeParameters, &printableTime);

    timeString = (char *)PORT_Alloc(256);

    if (timeString) {

        if (!PR_FormatTime(timeString, 256, format, &printableTime)) {

            PORT_Free(timeString);

            timeString = NULL;

        }

    }

    return (timeString);

}

char *

CERT_GenTime2FormattedAscii(PRTime genTime, char *format)

{

    PRExplodedTime printableTime;

    char *timeString;

    /* Decompose time into components */

    PR_ExplodeTime(genTime, PR_GMTParameters, &printableTime);

    timeString = (char *)PORT_Alloc(256);

    if (timeString) {

        if (!PR_FormatTime(timeString, 256, format, &printableTime)) {

            PORT_Free(timeString);

            timeString = NULL;

            PORT_SetError(SEC_ERROR_OUTPUT_LEN);

        }

    }

    return (timeString);

}

/* convert DER utc time to ascii time string, The format of the time string

   depends on the input "format"

 */

static char *

DecodeUTCTime2FormattedAscii(SECItem *utcTimeDER, char *format)

{

    PRTime utcTime;

    int rv;

    rv = DER_UTCTimeToTime(&utcTime, utcTimeDER);

    if (rv) {

        return (NULL);

    }

    return (CERT_UTCTime2FormattedAscii(utcTime, format));

}

/* convert DER utc time to ascii time string, The format of the time string

   depends on the input "format"

 */

static char *

DecodeGeneralizedTime2FormattedAscii(SECItem *generalizedTimeDER, char *format)

{

    PRTime generalizedTime;

    int rv;

    rv = DER_GeneralizedTimeToTime(&generalizedTime, generalizedTimeDER);

    if (rv) {

        return (NULL);

    }

    return (CERT_GeneralizedTime2FormattedAscii(generalizedTime, format));

}

/* decode a SECItem containing either a SEC_ASN1_GENERALIZED_TIME

   or a SEC_ASN1_UTC_TIME */

SECStatus

DER_DecodeTimeChoice(PRTime *output, const SECItem *input)

{

    switch (input->type) {

        case siGeneralizedTime:

            return DER_GeneralizedTimeToTime(output, input);

        case siUTCTime:

            return DER_UTCTimeToTime(output, input);

        default:

            PORT_SetError(SEC_ERROR_INVALID_ARGS);

            PORT_Assert(0);

            return SECFailure;

    }

}

/* encode a PRTime to an ASN.1 DER SECItem containing either a

   SEC_ASN1_GENERALIZED_TIME or a SEC_ASN1_UTC_TIME */

SECStatus

DER_EncodeTimeChoice(PLArenaPool *arena, SECItem *output, PRTime input)

{

    SECStatus rv;

    rv = DER_TimeToUTCTimeArena(arena, output, input);

    if (rv == SECSuccess || PORT_GetError() != SEC_ERROR_INVALID_ARGS) {

        return rv;

    }

    return DER_TimeToGeneralizedTimeArena(arena, output, input);

}