PolicyInformationSet.cpp

Go to the documentation of this file.

#include "PolicyInformationSet.h"
#include "PolicyInformation.h"
#include "PolicyQualifier.h"

#include "OID.h"
#include "Buffer.h"

#include "ASN1Helper.h"
#include "ToolkitUtils.h"
#include "PKIX1Implicit88.h"
#include "PKIX1Explicit88.h"

#include <iostream>
#include <boost/scoped_array.hpp>
using std::endl;


struct CPKIFPolicyInformationSetImpl
{
    CPKIFPolicyInformationListPtr m_policyList;
    CPKIFBufferPtr m_value;
    bool m_extModified;
};


char CPKIFPolicyInformationSet::extOID[] =      "2.5.29.32";

void FreeList(DList* asn1rtdlist);

CPKIFPolicyInformationSet::CPKIFPolicyInformationSet()
  :m_impl (new CPKIFPolicyInformationSetImpl)
{
}
//commented out - 8/21/2004
//CPKIFPolicyInformationSet::CPKIFPolicyInformationSet(const CPKIFPolicyInformationSet& ext)
//{
//}

CPKIFPolicyInformationListPtr CPKIFPolicyInformationSet::GetPolicySet() const 
{
    return m_impl->m_policyList;
}


void CPKIFPolicyInformationSet::SetPolicySet(CPKIFPolicyInformationListPtr &polSet) 
{
    m_impl->m_policyList = polSet;
    m_impl->m_extModified = true;
}

//CPKIFPolicyInformationSet::CPKIFPolicyInformationSet(
//  //! [in] Reference to an internal structure representation of the extension containing 
//  //! information used to construct the object
//  const CACX509V3Extension& ext) 
//  : CPKIFX509Extension(ext), m_impl (new CPKIFPolicyInformationSetImpl)
//{
//  CACASNWRAPPER_CREATE(CACX509V3CertificatePolicies, objPDU);
//  objPDU.Decode(ext.extnValue.data, ext.extnValue.numocts);
//
//  DListNode* cur = objPDU->head;
//  if(NULL != cur)
//  {
//      CPKIFPolicyInformationListPtr piList(new CPKIFPolicyInformationList);
//      m_impl->m_policyList = piList;
//  }
//  while(NULL != cur)
//  {
//      CACASNWRAPPER_CREATE(CACX509V3PolicyInformation, extsWrapper);
//      ASN1OpenType *data = extsWrapper.Encode ((CACX509V3PolicyInformation*)cur->data);
//      CPKIFBufferPtr tempBuffer(new CPKIFBuffer(data->data, data->numocts));
//      //CPKIFPolicyInformationPtr pi(new CPKIFPolicyInformation((CACX509V3PolicyInformation*)cur->data));
//      CPKIFPolicyInformationPtr pi(new CPKIFPolicyInformation(tempBuffer));
//      m_impl->m_policyList->push_back(pi);
//      cur = cur->next;
//  }
//}

CPKIFPolicyInformationSet::CPKIFPolicyInformationSet(
    const bool& criticality,
    const CPKIFBufferPtr& ext) 
  : CPKIFX509Extension (criticality, ext), m_impl (new CPKIFPolicyInformationSetImpl)
{
    CACASNWRAPPER_CREATE(CACX509V3CertificatePolicies, objPDU);
    objPDU.Decode(ext->GetBuffer(), ext->GetLength());

    DListNode* cur = objPDU->head;
    if(NULL != cur)
    {
        CPKIFPolicyInformationListPtr piList(new CPKIFPolicyInformationList);
        m_impl->m_policyList = piList;
    }
    while(NULL != cur)
    {
        //CACASNWRAPPER_CREATE(CACX509V3PolicyInformation, extsWrapper);
        //ASN1OpenType *data = extsWrapper.Encode ((CACX509V3PolicyInformation*)cur->data);
        //CPKIFBufferPtr tempBuffer(new CPKIFBuffer(data->data, data->numocts));

        ASN1OpenType* openType = (ASN1OpenType*)cur->data;
        CPKIFBufferPtr tmpBuffer(new CPKIFBuffer(openType->data, openType->numocts));
        CPKIFPolicyInformationPtr pi(new CPKIFPolicyInformation(tmpBuffer));
        m_impl->m_policyList->push_back(pi);
        cur = cur->next;
    }

    m_impl->m_value = ext;
    m_impl->m_extModified = false;
}
CPKIFPolicyInformationSet::~CPKIFPolicyInformationSet()
{
    if(m_impl)
    {
        delete m_impl;
        m_impl = 0;
    }
}

const CPKIFOIDPtr CPKIFPolicyInformationSet::oid() const
{
    //added static variable for copying instead of string creation each call
    static CPKIFOID staticOID(extOID);
    //CPKIFOIDPtr tmp(new CPKIFOID(new std::string(extOID)));
    static CPKIFOIDPtr tmp(new CPKIFOID(staticOID));
    return tmp;
}

CPKIFBufferPtr CPKIFPolicyInformationSet::value() const 
{
    if(m_impl->m_policyList && !m_impl->m_policyList->empty() && (m_impl->m_value == (CPKIFBuffer*)NULL || m_impl->m_extModified))
    {
        CACASNWRAPPER_CREATE(CACX509V3CertificatePolicies, objPDU);
        CACX509V3CertificatePolicies policies; 
        memset(&policies, 0, sizeof(CACX509V3CertificatePolicies));

        DListNode* cur = NULL;
        CPKIFPolicyInformationList::iterator pos;
        CPKIFPolicyInformationList::iterator end = m_impl->m_policyList->end();
        for(pos = m_impl->m_policyList->begin(); pos != end; ++pos)
        {
            
            if(NULL == cur)
            {
                NEW_NODE(cur)
            }
            else
            {
                NEW_NEXT_AND_ADVANCE(cur)
            }

            CACASNWRAPPER_CREATE(CACX509V3PolicyInformation, objPolInfo);
            CACX509V3PolicyInformation policyInfo;
            memset(&policyInfo, 0, sizeof(CACX509V3PolicyInformation));
            policyInfo.policyQualifiers.count = 0;
            policyInfo.policyQualifiers.head = NULL;
            policyInfo.policyQualifiers.tail = NULL;

            CPKIFStringPtr str(new std::string((*pos)->PolicyOID()->ToString())); 
            ASN1OBJID* tmpOid = ConvertStringToASN1OBJID(str);
            CopyOID(&policyInfo.policyIdentifier, tmpOid);
            delete tmpOid;

            CPKIFPolicyQualifierListPtr polQuals = (*pos)->Qualifiers();

            if(polQuals != (CPKIFPolicyQualifierList*)NULL)
            {
                policyInfo.m.policyQualifiersPresent = 1;
                DListNode* polQualsCurNode = NULL;
                CPKIFPolicyQualifierList::iterator polQualsPos;
                CPKIFPolicyQualifierList::iterator polQualsEnd = polQuals->end();
                for(polQualsPos = polQuals->begin(); polQualsPos != polQualsEnd; ++polQualsPos)
                {
                    CACASNWRAPPER_CREATE(CACX509V3PolicyQualifierInfo, objPDU2);
                    CACX509V3PolicyQualifierInfo policyQualifier;
                    if(NULL == polQualsCurNode)
                    {
                        NEW_NODE(polQualsCurNode)
                    }
                    else
                    {
                        NEW_NEXT_AND_ADVANCE(polQualsCurNode)
                    }

                    CPKIFStringPtr str2(new std::string((*polQualsPos)->QualifierID()->ToString())); 
                    ASN1OBJID* tmpOid2 = ConvertStringToASN1OBJID(str2);
                    policyQualifier.policyQualifierId = *tmpOid2;

                    policyQualifier.qualifier.numocts = (*polQualsPos)->Qualifier()->GetLength();
                    policyQualifier.qualifier.data = new unsigned char[(*polQualsPos)->Qualifier()->GetLength()];
                    memcpy((void*)policyQualifier.qualifier.data, (*polQualsPos)->Qualifier()->GetBuffer(), (*polQualsPos)->Qualifier()->GetLength());
        
                    ASN1OpenType* data1 = objPDU2.Encode(&policyQualifier);

                    if(policyQualifier.qualifier.data)
                        delete[] policyQualifier.qualifier.data;

                    polQualsCurNode->data = new ASN1OpenType;
                    ((ASN1OpenType*)polQualsCurNode->data)->data = new unsigned char[data1->numocts];
                    memcpy((void*)((ASN1OpenType*)polQualsCurNode->data)->data, data1->data, data1->numocts);
                    ((ASN1OpenType*)polQualsCurNode->data)->numocts = data1->numocts;

                    SET_HEAD_TAIL_INCREMENT(policyInfo.policyQualifiers, polQualsCurNode);

                    delete data1;
                }
            }

            ASN1OpenType* data2 = objPolInfo.Encode(&policyInfo);

            FreeList(&policyInfo.policyQualifiers);

            cur->data = new ASN1OpenType;
            ((ASN1OpenType*)cur->data)->data = new unsigned char[data2->numocts];
            memcpy((void*)((ASN1OpenType*)cur->data)->data, data2->data, data2->numocts);
            ((ASN1OpenType*)cur->data)->numocts = data2->numocts;

            SET_HEAD_TAIL_INCREMENT(policies, cur)

            delete data2;
        }

        
        ASN1OpenType* extEncoded = objPDU.Encode(&policies);
        CPKIFBufferPtr tmp(new CPKIFBuffer(extEncoded->data, extEncoded->numocts));

        m_impl->m_value = tmp;
        m_impl->m_extModified = false;

        FreeList(&policies);
        delete extEncoded;
    }

    return m_impl->m_value;
}

void FreeOpenType(
    ASN1OpenType* asn1ot)
{
    if(NULL != asn1ot)
    {
        if(NULL != asn1ot->data)
        {
            delete asn1ot->data;
        }
        delete asn1ot;
    }
}

void FreeList(
    DList* asn1rtdlist)
{
    if(NULL != asn1rtdlist)
    {
        if(NULL != asn1rtdlist->head)
        {
            DListNode* cur = NULL, *tmp = NULL;
            cur = asn1rtdlist->head;
            while(NULL != cur)
            {
                FreeOpenType((ASN1OpenType*)cur->data);
                tmp = cur->next;
                delete cur;
                cur = tmp;
            }
        }
    }
}

CAC_API std::ostream& operator<<(std::ostream & os, const CPKIFPolicyInformationSetPtr & extension)
{
    return operator<<(os,*extension);
}

CAC_API std::ostream& operator<<(std::ostream & os, const CPKIFPolicyInformationSet & extension)
{
    CPKIFPolicyInformationListPtr polSet = extension.GetPolicySet();
    if(!polSet)
        return os;

    CPKIFPolicyInformationList::iterator pos = polSet->begin();
    CPKIFPolicyInformationList::iterator end = polSet->end();

    for(int count = 1; pos != end; ++count, ++pos)
    {
        if(count != 1) os << endl;
        os << "[" << count << "] Certificate Policy:" << endl;
        os << "\tPolicy Identifier=" << (*pos)->PolicyOID()->ToString();

        CPKIFPolicyQualifierListPtr qList = (*pos)->Qualifiers();
        if(qList != (CPKIFPolicyQualifierList*)NULL && !qList->empty())
        {

            CPKIFPolicyQualifierList::iterator qpos = qList->begin();
            CPKIFPolicyQualifierList::iterator qend = qList->end();

            for(int qcount = 1; qpos != qend; qcount++, ++qpos)
            {
                os << endl;
                os << "\t[" << qcount << "] Policy Qualifier Info:" << endl;
                CPKIFOIDPtr qualifierOID = (*qpos)->QualifierID();
                CPKIFBufferPtr qualifier = (*qpos)->Qualifier();

                if(0 == strcmp(qualifierOID->ToString(), "1.3.6.1.5.5.7.2.1"))
                {
                    os << "\t\tPolicy Qualifier Id: User Notice" << endl;
                    os << "\t\t\tQualifier:" << endl;
                    if(qualifier->GetLength() > 257)
                    {
                        std::string ql((char*)qualifier->GetBuffer(),3,qualifier->GetLength()-3);
                        os << "\t\t\t\t" << ql;
                    }
                    else
                    {
                        std::string ql((char*)qualifier->GetBuffer(),2,qualifier->GetLength()-2);
                        os << "\t\t\t\t" << ql;
                    }
                }
                else if(0 == strcmp(qualifierOID->ToString(), "1.3.6.1.5.5.7.2.2"))
                {
                    // can we do better than dumping hex-ascii? this is what resources code was doing.
                    os << "\t\tPolicy Qualifier Id: CPS" << endl;
                    os << "\t\t\tQualifier:" << endl;

                    boost::scoped_array<char> buf(new char[2*qualifier->GetLength()+1]);
                    btoa((char*)qualifier->GetBuffer(), buf.get(), qualifier->GetLength());
                    os << "\t\t\t\t" << buf.get();
                }
                else 
                {
                    os << "\t\tPolicy Qualifier Id: " << qualifierOID->ToString() << endl;
                    os << "\t\t\tQualifier:" << endl;

                    boost::scoped_array<char> buf(new char[2*qualifier->GetLength()+1]);
                    btoa((char*)qualifier->GetBuffer(), buf.get(), qualifier->GetLength());
                    os << "\t\t\t\t" << buf.get();
                }
            }

        }
    }
    return os;
}