(Unicode C) HTTP multipart-mixed POST (for a UPS Package Level Detail PLD Request)

Important: This example requires Chilkat v9.5.0.59 or greater.

Demonstrates how to create a POST for a UPS Package Level Detail PLD Request. The request must be a multipart-mixed request having two sub-parts. The first is a application/x-www-form-urlencoded with name=value URL encoded pairs. The second is a application/x-ups-binary containing a UPS PLD request.

The HTTP request created by this example looks like this:

POST /hapld/tos/kdwhapltos HTTP/1.1
Content-Type: multipart/mixed; boundary=------------050801040202040701030308
Host: domain
Content-Length: 658

--------------050801040202040701030308
Content-type: application/x-www-form-urlencoded
Content-length: 134

AppVersion=1.0&AcceptUPSLicenseAgreement=YES&VersionNumber=V4R1&UserId=myUser&Password=myPassword&ResponseType=application/x-ups-pld

--------------050801040202040701030308
Content-type: application/x-ups-binary
Content-length: 721

020094 2014041500000594196532600 000000001*AAV0Y203 DE 5941965326000001*BA1ZV0Y2036650001829 00001+0000000000000012 +0000000000000000KGS07COL10 3CMEUR000001*CA18TC239 AOK Bahnhofstr. Dresden 01099 DE *EAEVS+000000000000104200EUR*PA1ZV0Y2036650001829 02+0000012 +0000000+00000000+00000000+00000000*SA000005

--------------050801040202040701030308--

The HTTP response (if successful) is multipart MIME as shown below. This example will extract the response content using the Chilkat MIME API.

Content-type: text/html
Content-length: 138

<HTML>
<HEAD>
<TITLE>UPS Internet Software</TITLE>
</HEAD>
<BODY>
<P>UPS Internet Software, Copyright UPS 1998</P>
</BODY>
</HTML>

--BOUNDARY
Content-type: application/x-ups-psmpld
Content-length: 104

UPSOnLine%1.0%0000%0000Successful completion - No errors found.                                    

--BOUNDARY
Content-type: application/x-ups-pld
Content-length: 800

000200000787300000640 KDGPLCR1                   United Parcel Service                      09/06/16  Page:1                    Test PLD Control Report                     05:44 PM                                                                                  ------------------------------------------------------------------------------- Pickup Date:20030813 Sequence#:000005900000002 #of Segments:000000000000000005                                                                                                                                                                  Shipper#:0TEST0     Book/Page#:5900000002 Shipments:000001 Packages:0000000001 10000012900000000Successful completion - No errors found.                                        
!!! Test Upload !!!
File Uploaded: n/a

--BOUNDARY--

Chilkat C/C++ Library Downloads

MS Visual C/C++

Linux/CentOS C/C++

Alpine Linux C/C++

MAC OS X C/C++

armhf/aarch64 C/C++

C++ Builder

iOS C/C++

Android C/C++

Solaris C/C++

MinGW C/C++

#include <C_CkHttpRequestW.h>
#include <C_CkStringBuilderW.h>
#include <C_CkHttpW.h>
#include <C_CkHttpResponseW.h>
#include <C_CkMimeW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkHttpRequestW req;
    HCkHttpRequestW paramEncoder;
    const wchar_t *urlEncodedParams;
    HCkStringBuilderW sbParams;
    const wchar_t *pld;
    HCkHttpW http;
    HCkHttpResponseW resp;
    HCkMimeW mime;
    HCkMimeW part0;
    HCkMimeW part1;
    HCkMimeW part2;

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

    req = CkHttpRequestW_Create();

    // The ContentType, HttpVerb, and Path properties should
    // always be explicitly set.
    CkHttpRequestW_putHttpVerb(req,L"POST");
    CkHttpRequestW_putPath(req,L"/hapld/tos/kdwhapltos");
    CkHttpRequestW_putContentType(req,L"multipart/mixed");

    // The 1st body of the multipart/mixed HTTP request will have a content-type of application/x-www-form-urlencoded
    // It contains URL encoded parameters.
    // We'll use a temporary HTTP request object solely for the purpose of generating our URL encoded parameter string.
    paramEncoder = CkHttpRequestW_Create();
    CkHttpRequestW_AddParam(paramEncoder,L"AppVersion",L"1.0");
    CkHttpRequestW_AddParam(paramEncoder,L"AcceptUPSLicenseAgreement",L"YES");
    CkHttpRequestW_AddParam(paramEncoder,L"VersionNumber",L"V4R1");
    CkHttpRequestW_AddParam(paramEncoder,L"UserId",L"UPS_USERID");
    CkHttpRequestW_AddParam(paramEncoder,L"Password",L"UPS_PASSWORD");
    urlEncodedParams = CkHttpRequestW_getUrlEncodedParams(paramEncoder);

    // The UPS server wants all params to be URL encoded except for the ResponseType param.
    // Therefore, we'll add ResponseType unencoded at the end, like this:
    sbParams = CkStringBuilderW_Create();
    CkStringBuilderW_Append(sbParams,urlEncodedParams);
    CkStringBuilderW_Append(sbParams,L"&ResponseType=application/x-ups-pld");
    // Also, it is very important to include a CRLF at the end.  (This is to satisfy undocumented details
    // required by the UPS PLD server.)
    CkStringBuilderW_Append(sbParams,L"\r\n");

    // Add the params as the 1st sub-part of the multipart/mixed request
    CkHttpRequestW_AddStringForUpload2(req,L"",L"",CkStringBuilderW_getAsString(sbParams),L"",L"application/x-www-form-urlencoded");

    // Now for the 2nd part (using some junk data found on the developerkitcommunity.ups.com site.
    // Notice the CRLF at the end of the string.  This is important.
    pld = L"020094                                  2003081300000590000000200   000000001*AA0TEST0    DE                5900000002000001*BA1Z0TEST06800000018                 00001+0000000000000010 +0000000000000000KGS11PRE10                                   3CMEUR000001*CA18                                   United Parcel Service              Goerlitzer Str 1                                                                                         Neuss                              41460    DE                                                        *PA1Z0TEST06800000018                 02+0000010                                                                                      +0000000+00000000+00000000+00000000*SA000004\r\n";

    CkHttpRequestW_AddStringForUpload2(req,L"",L"",pld,L"",L"application/x-ups-binary");

    // The UPS PLD server requires Content-Length headers within the MIME sub-parts of the request.
    // A new feature of Chilkat v9.5.0.59 is if a Content-Length sub-header is added (with an arbitrary value, such as 0),
    // then Chilkat will compute the actual sub-part size and replace the value when the request is sent.
    CkHttpRequestW_AddSubHeader(req,0,L"Content-Length",L"0");
    CkHttpRequestW_AddSubHeader(req,1,L"Content-Length",L"0");

    // A few important comments about the HTTP request that is generated:
    // 
    // 1) Chilkat automatically generates a random boundary string.   In 99.999% of cases, this should 
    //    be sufficient.
    // 2) The top-level Content-Length header is automatically generated based on the actual length of the MIME message
    //    that follows the intial (topmost) MIME header.
    // 3) The HOST header will automatically get filled in with the actual domain when SynchronousRequest
    //    method is called.

    // Now send the request...
    http = CkHttpW_Create();

    // If desired (for debugging), provide a flie path for a session log.
    // The session log can be sent to support@chilkatsoft.com if the PLD request fails.
    CkHttpW_putSessionLogFilename(http,L"c:/aaworkarea/ups_pld/sessionLog.txt");

    // Send the PLD request over TLS..
    resp = CkHttpW_SynchronousRequest(http,L"www.pld-certify.ups.com",443,TRUE,req);
    if (CkHttpW_getLastMethodSuccess(http) != TRUE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkHttpRequestW_Dispose(req);
        CkHttpRequestW_Dispose(paramEncoder);
        CkStringBuilderW_Dispose(sbParams);
        CkHttpW_Dispose(http);
        return;
    }

    // Load the response MIME.
    mime = CkMimeW_Create();
    CkMimeW_LoadMime(mime,CkHttpResponseW_fullMime(resp));

    // If it does not have 3 sub-parts, then something is amiss...
    if (CkMimeW_getNumParts(mime) != 3) {
        wprintf(L"Unexpected number of MIME parts.\n");
        wprintf(L"%s\n",CkHttpResponseW_fullMime(resp));
        CkHttpRequestW_Dispose(req);
        CkHttpRequestW_Dispose(paramEncoder);
        CkStringBuilderW_Dispose(sbParams);
        CkHttpW_Dispose(http);
        CkMimeW_Dispose(mime);
        return;
    }

    // Examine each response part.
    part0 = CkMimeW_GetPart(mime,0);
    wprintf(L"---- text/html part ----\n");
    wprintf(L"%s\n",CkMimeW_getBodyDecoded(part0));

    part1 = CkMimeW_GetPart(mime,1);
    wprintf(L"---- application/x-ups-psmpld part ----\n");
    wprintf(L"%s\n",CkMimeW_getBodyDecoded(part1));

    part2 = CkMimeW_GetPart(mime,2);
    wprintf(L"---- application/x-ups-pld part ----\n");
    wprintf(L"%s\n",CkMimeW_getBodyDecoded(part2));

    CkMimeW_Dispose(part0);
    CkMimeW_Dispose(part1);
    CkMimeW_Dispose(part2);
    CkHttpResponseW_Dispose(resp);


    CkHttpRequestW_Dispose(req);
    CkHttpRequestW_Dispose(paramEncoder);
    CkStringBuilderW_Dispose(sbParams);
    CkHttpW_Dispose(http);
    CkMimeW_Dispose(mime);

    }