Sample code for 30+ languages & platforms
Unicode C

Combine Timestamp Reply and Content File into a TimeStampData

See more ASN.1 Examples

Demonstrates how to combine a timestamp reply (RFC 3161) with a data file (any type of file) to create a TimeStampData structure (RFC 5544).

Chilkat Unicode C Downloads

Unicode C
#include <C_CkBinDataW.h>
#include <C_CkAsnW.h>
#include <C_CkXmlW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkBinDataW bdTsr;
    HCkAsnW asnTsr;
    HCkXmlW xmlTsr;
    HCkBinDataW bdContent;
    HCkXmlW xml;
    HCkXmlW xContext;
    HCkAsnW tsd;
    const wchar_t *tsdBase64;

    success = FALSE;

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // Also see this example:
    // Send a TimeStamp Request to a TimeStamp Authority and get the Response

    // Load a timestamp reply file
    bdTsr = CkBinDataW_Create();
    success = CkBinDataW_LoadFile(bdTsr,L"qa_data/tsd/sample.tsr");
    if (success != TRUE) {
        wprintf(L"Failed to load timestamp reply file.\n");
        CkBinDataW_Dispose(bdTsr);
        return;
    }

    // Load the tsr into an ASN.1 object.
    asnTsr = CkAsnW_Create();
    success = CkAsnW_LoadEncoded(asnTsr,CkBinDataW_getEncoded(bdTsr,L"base64"),L"base64");
    if (success != TRUE) {
        wprintf(L"%s\n",CkAsnW_lastErrorText(asnTsr));
        CkBinDataW_Dispose(bdTsr);
        CkAsnW_Dispose(asnTsr);
        return;
    }

    // Get the timestamp reply as XML.
    xmlTsr = CkXmlW_Create();
    CkXmlW_LoadXml(xmlTsr,CkAsnW_asnToXml(asnTsr));

    // The timestamp reply XML begins like this:
    // We'll want to remove the 1st "sequence" subtree.

    //     <?xml version="1.0" encoding="utf-8"?>
    //     <sequence>
    //         <sequence>       <---- Remove this sub-tree.
    //             <int>00</int>
    //             <sequence>
    //                 <utf8>Operation Okay</utf8>
    //             </sequence>
    //         </sequence>
    //         <sequence>   
    //             <oid>1.2.840.113549.1.7.2</oid>
    //             <contextSpecific tag="0" constructed="1">
    //             ...

    // Remove the 1st sub-tree..
    CkXmlW_RemoveChildByIndex(xmlTsr,0);

    // In this example, the data file we're combining with the timestamp into a timestampData is a .p7m.
    // However, it can be any type of file (text or binary), it doesn't matter..
    bdContent = CkBinDataW_Create();
    success = CkBinDataW_LoadFile(bdContent,L"qa_data/tsd/sample.p7m");
    if (success != TRUE) {
        wprintf(L"Failed to load content file.\n");
        CkBinDataW_Dispose(bdTsr);
        CkAsnW_Dispose(asnTsr);
        CkXmlW_Dispose(xmlTsr);
        CkBinDataW_Dispose(bdContent);
        return;
    }

    // Begin building the TimeStampData.  
    // We'll build as XML and then convert to ASN.1
    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"sequence");
    CkXmlW_UpdateChildContent(xml,L"oid",L"1.2.840.113549.1.9.16.1.31");
    CkXmlW_UpdateAttrAt(xml,L"contextSpecific",TRUE,L"tag",L"0");
    CkXmlW_UpdateAttrAt(xml,L"contextSpecific",TRUE,L"constructed",L"1");
    CkXmlW_UpdateChildContent(xml,L"contextSpecific|sequence|int",L"01");
    CkXmlW_UpdateChildContent(xml,L"contextSpecific|sequence|octets",CkBinDataW_getEncoded(bdContent,L"base64"));
    CkXmlW_UpdateAttrAt(xml,L"contextSpecific|sequence|contextSpecific",TRUE,L"tag",L"0");
    CkXmlW_UpdateAttrAt(xml,L"contextSpecific|sequence|contextSpecific",TRUE,L"constructed",L"1");

    xContext = CkXmlW_GetChildWithTag(xml,L"contextSpecific|sequence|contextSpecific");
    CkXmlW_AddChildTree(xContext,xmlTsr);
    CkXmlW_Dispose(xContext);

    // Convert the XML to ASN.1
    tsd = CkAsnW_Create();
    CkAsnW_LoadAsnXml(tsd,CkXmlW_getXml(xml));

    // Write the timestamped data to a file.
    success = CkAsnW_WriteBinaryDer(tsd,L"qa_output/sample.tsd");

    // Alternatively, get the tsd ASN.1 as base64..
    tsdBase64 = CkAsnW_getEncodedDer(tsd,L"base64_mime");
    wprintf(L"%s\n",tsdBase64);


    CkBinDataW_Dispose(bdTsr);
    CkAsnW_Dispose(asnTsr);
    CkXmlW_Dispose(xmlTsr);
    CkBinDataW_Dispose(bdContent);
    CkXmlW_Dispose(xml);
    CkAsnW_Dispose(tsd);

    }