/*

* Copyright (c) 2008 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:  CHttpsCertInfo

*

*/

#include <x500dn.h>

#include <ssl.h>

#include "gcf_constants.h"

#include "chttpscertinfo.h"

#ifdef SYMBIAN_ENABLE_SPLIT_HEADERS

#include <x520ava.h>

#endif

_LIT(KX509certificateTypeDescriptor, "X.509");

_LIT(KMD5RSAAlgId,  "md5WithRSAEncryption");

_LIT(KMD2RSAAlgId,  "md2WithRSAEncryption");

_LIT(KSHA1RSAAlgId, "sha-1WithRSAEncryption");

_LIT(KSHA1DSAAlgId, "id-dsa-with-sha1");

_LIT(KEqualsSign,"=");

_LIT(KSeparator,";");

_LIT(KJavaX520CountryName,"C");

_LIT(KJavaX520OrganizationName,"O");

_LIT(KJavaX520OrganizationalUnitName,"OU");

_LIT(KJavaX520LocalityName,"L");

_LIT(KJavaX520CommonName,"CN");

_LIT(KJavaX520StateOrProvinceName,"ST");

_LIT(KJavaX520Surname,"SN");

_LIT(KJavaPKCS9EmailAddress, "EmailAddress");

// 5 * KEqualsSign + 4 * KSeparator + length of each KJavaX520 constants

// + max length of their content (see <x520ava.h>) + 1 padding

#define MAX_DN_LENGTH   (5 * KEqualsSign().Length() + 4 * KSeparator().Length() + KJavaX520CountryName().Length() + KX520MaxCLength + KJavaX520OrganizationName().Length() + KX520MaxOLength + KJavaX520OrganizationalUnitName().Length() + KX520MaxOULength + KJavaX520LocalityName().Length() + KX520MaxLLength + KJavaX520CommonName().Length() + KX520MaxCNLength + 1)

/**

 * KHexaTable translate a number into ascii code for corresponding hexadecimal symbol

 * {'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'}

*/

const TUint16 KHexaTable[] = {48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70};

const TUint16 KColonAsciiCode = 58;

EXPORT_C CHttpsCertInfo* CHttpsCertInfo::NewL(const CX509Certificate& acertInfo, HBufC* aCipherSuite)

{

    CHttpsCertInfo* me = new(ELeave) CHttpsCertInfo(acertInfo,aCipherSuite);

    CleanupStack::PushL(me);

    me->ConstructL();

    CleanupStack::Pop(me);

    return me;

}

CHttpsCertInfo::CHttpsCertInfo(const CX509Certificate& acertInfo, HBufC* aCipherSuite)

        :iCertInfo(acertInfo), iCipherSuite(*aCipherSuite)

{}

EXPORT_C CHttpsCertInfo::~CHttpsCertInfo()

{

    delete iSubject;

    delete iIssuer;

}

void CHttpsCertInfo::ConstructL()

{}

HBufC* CHttpsCertInfo::SerializeDistinguishedNameLC(const CX500DistinguishedName& aDN)

{

    HBufC* result = HBufC::NewLC(MAX_DN_LENGTH);

    TPtr   ptr = result->Des();

    TInt   count = aDN.Count();

    for (TInt index = count -1 ; index >= 0 ; --index)

    {

        const CX520AttributeTypeAndValue& element = aDN.Element(index);

        // get the element type

        const TPtrC type = element.Type();

        // map the type to a string rep

        if (type == KX520CountryName)

        {

            ptr += KJavaX520CountryName;

        }

        else if (type == KX520OrganizationName)

        {

            ptr += KJavaX520OrganizationName;

        }

        else if (type == KX520OrganizationalUnitName)

        {

            ptr += KJavaX520OrganizationalUnitName;

        }

        else if (type == KX520LocalityName)

        {

            ptr += KJavaX520LocalityName;

        }

        else if (type == KX520StateOrProvinceName)

        {

            ptr += KJavaX520StateOrProvinceName;

        }

        else if (type == KX520CommonName)

        {

            ptr += KJavaX520CommonName;

        }

        else if (type == KX520Surname)

        {

            ptr += KJavaX520Surname;

        }

        else if (type == KPKCS9EmailAddress)

        {

            ptr += KJavaPKCS9EmailAddress;

        }

        else

        {

            // unsupported type

            continue;

        }

        ptr += KEqualsSign;

        HBufC* valbuf = element.ValueL();

        ptr += *valbuf;

        delete valbuf;

        if (index > 0)

        {

            ptr += KSeparator;

        }

    }

    return result;

}

void CHttpsCertInfo::GetSecurityInfoL(CDesCArray& aStringResult, TTime& aStartTime, TTime& aEndTime)

{

    aStartTime = iCertInfo.ValidityPeriod().Start();

    aEndTime = iCertInfo.ValidityPeriod().Finish();

    aStringResult.AppendL(iCipherSuite);

    aStringResult.AppendL(KMIDSecureProtocolName());

    aStringResult.AppendL(KMIDSecureProtocolVersion());

    HBufC* buffer = SerializeDistinguishedNameLC(iCertInfo.SubjectName());

    aStringResult.AppendL(*buffer);

    CleanupStack::PopAndDestroy(buffer);

    buffer = SerializeDistinguishedNameLC(iCertInfo.IssuerName());

    aStringResult.AppendL(*buffer);

    CleanupStack::PopAndDestroy(buffer);

    aStringResult.AppendL(KX509certificateTypeDescriptor());

    TBuf<10> versionText;

    versionText.AppendNum(iCertInfo.Version());

    aStringResult.AppendL(versionText);

    switch (iCertInfo.SigningAlgorithm().DigestAlgorithm().Algorithm())

    {

    case EMD2:

        if (iCertInfo.SigningAlgorithm().AsymmetricAlgorithm().Algorithm() == ERSA)

        {

            aStringResult.AppendL(KMD2RSAAlgId());

            break;

        }

        else

        {

            User::Leave(KErrNotSupported);

        }

    case EMD5:

        if (iCertInfo.SigningAlgorithm().AsymmetricAlgorithm().Algorithm() == ERSA)

        {

            aStringResult.AppendL(KMD5RSAAlgId());

            break;

        }

        else

        {

            User::Leave(KErrNotSupported);

        }

    case ESHA1:

        if (iCertInfo.SigningAlgorithm().AsymmetricAlgorithm().Algorithm() == ERSA)

        {

            aStringResult.AppendL(KSHA1RSAAlgId());

            break;

        }

        else if (iCertInfo.SigningAlgorithm().AsymmetricAlgorithm().Algorithm() == EDSA)

        {

            aStringResult.AppendL(KSHA1DSAAlgId());

            break;

        }

        //else fall through and Leave

    default:

        User::Leave(KErrNotSupported);

    }

    TPtrC8 number = iCertInfo.SerialNumber();

    buffer = HBufC::NewLC(number.Length() * 3);

    TPtr serialPtr = buffer->Des();

    for (TInt i = 0; i < number.Length() ; ++i)

    {

        TUint8 quotient = TUint8(number[i]/16);

        serialPtr.Append(KHexaTable[quotient]);

        serialPtr.Append(KHexaTable[number[i] - quotient*16]);

        if (i != number.Length() -1)

        {

            serialPtr.Append(KColonAsciiCode);

        }

    }

    aStringResult.AppendL(*buffer);

    CleanupStack::PopAndDestroy(buffer);

}