Re: Getting Bad Request from a HTTPAPI call

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Hi

That JSONDATA is an ASCII (or UTF-8) string displayed in EBCDIC encoding -

I believe the string is something like this -

{grant_typeclient_credentials

Is that correct?

Then there is some kind of CCSID problem.

Good luck!
Vern

On 5/12/2016 10:16 AM, Shubhadeep Roy wrote:
> Hi,
>
> A couple of points I need to mention-
> 1. getLogonInfo and http_setauth are working fine. I can confirm this with
> the header info being passed. I compared it with another application I used
> - Postman, for getting an OAUTH2 Token.
>
> 2. I tried replacing the JSON creation code exactly as in Scott Klement's
> example but the result is the same. I am not sure if the CCSID is causing
> an issue or not. When I display jsonData, it shows junk values as shown
> below-
> JSONDATA =
> ​​
>            ....5...10...15...20...25...30...35...40...45
>       1   '#ÅÊ/>ȬÈ`øÁÄ%ÑÁ>ȬÄÊÁÀÁ>ÈÑ/%Ë'
>
>
> Please help. Thank you.
>
>
> Here is the code-
>
>       D authUrl         S           1024A   Inz
>       D authToken       S             24A   Inz
>
>       D data_t          s             20A   Varying
>       D                                     template
>       D jsonBuf_t       s         200000a   varying
>       D                                     template
>       D JSON_BUF_SIZE   c                   %len(jsonBuf_t)
>
>       P getAuthToken    B                   Export
>       D getAuthToken    PI            24A
>        *
>       D fd              S             10I 0 Inz(3)
>       D CRLF            C                   X'0d25'
>       D rc              S             10I 0 Inz
>       D msg             S            500A   Inz
>       D runFlag         S               N   Static
>       D size            S             10I 0 Inz
>       D jsonBuf         S                   like(jsonBuf_t)
>       D grant_type      S                   like(data_t)
>
>       D dsLogonDetails  DS                  Static
>       D  dsAuthUsr                    24A
>       D  dsAuthPwd                    24A
>       D  dsAuthUrl                  1024A
>
>        * getLogonInfo Prototype
>       D getLogonInfo    PR          1072A
>        *
>        * Parse Incoming Data from http_url_post_raw
>       D parseHeader     PR            10I 0
>       D                               10I 0 Value
>       D                                 *   Value
>       D                               10I 0 Value
>        *
>       D createJSON      PR            10i 0
>       D   data                              like(data_t) const
>       D   jsonData                          like(jsonBuf_t)
>        *
>        /Free
>
>         http_debug(*ON : '/tmp/ShubhDebugLog.txt');
>
>         Clear authUrl;
>
>         // If not run, set static variables
>         If Not runFlag;
>            runFlag = *On;
>
>            // Get logon info
>            dsLogonDetails = getLogonInfo();
>         EndIf;
>
>         // Set Authorization
>         http_setauth(HTTP_AUTH_BASIC : dsAuthUsr : dsAuthPwd);
>
>         http_setCCSIDs( 1208: 0 );
>
>         grant_type = 'client_credentials';
>         createJSON(grant_type : jsonBuf);
>
>         rc = http_url_post_raw(dsAuthUrl : %addr(jsonBuf : *data) : size :
>                                1 : %paddr('PARSEHEADER'));
>
>         If rc <> 1;
>            msg = http_error;
>            Clear authToken;
>         EndIf;
>
>         Return authToken;
>
>        /End-Free
>       P getAuthToken    E
>
>
>       P createJSON      B                   Export
>
>       D                 PI            10i 0
>
>       D   grant_type                        like(data_t) const
>
>       D   jsonData                          like(jsonBuf_t)
>
>        *
>
>       D rc              s             10i 0
>
>       D len             s             10i 0
>
>       D x               s             10i 0
>
>        *
>
>        /Free
>
>
>
>         yajl_genOpen(*ON);
>
>         yajl_beginObj();
>
>         yajl_addChar('grant_type': %trimr(grant_type));
>
>         yajl_endObj();
>
>
>
>         %len(jsonData) = JSON_BUF_SIZE;
>
>         rc = yajl_copyBuf( 1208 : %addr(jsonData : *data) : JSON_BUF_SIZE :
> len);
>         %len(jsonData) = len;
>
>         yajl_genClose();
>
>         Return rc;
>
>        /end-free
>       P createJSON      E
>
>
>
> *Debug Log*
> HTTPAPI Ver 1.17 released 2006-09-23
>
>
>
> New iconv() objects set, PostRem=819. PostLoc=0. ProtRem=819. ProtLoc=0
>
> http_setauth(): entered
>
> New iconv() objects set, PostRem=1208. PostLoc=0. ProtRem=819. ProtLoc=0
>
> http_persist_open(): entered
>
> http_long_ParseURL(): entered
>
> https_init(): entered
>
> -------------------------------------------------------------------------------------
> Dump of local-side certificate information:
>
> -------------------------------------------------------------------------------------
> -------------------------------------------------------------------------------------
> Dump of server-side certificate information:
>
> -------------------------------------------------------------------------------------
> Cert Validation Code = 6000
>
> -----BEGIN CERTIFICATE-----
>
> udCsbg==
> -----END CERTIFICATE-----
> Serial Number: 18:C9:45:F1:B9:82:23:D9
> Common Name: *.api.manheim.com
> Org: Domain Control Validated
> Issuer CN: Go Daddy Secure Certificate Authority - G2
> Issuer Country: US
> Issuer State/Province: Arizona
> Issuer Locality: Scottsdale
> Issuer Org: GoDaddy.com, Inc.
> Issuer Org Unit: http://certs.godaddy.com/repository/
> Unknown Field: 3
> Unknown Field: 20150723153240
> Unknown Field: 15:32:40 23-07-2015
> Unknown Field: 20170723153240
> Unknown Field: 15:32:40 23-07-2017
> Unknown Field: 1.2.840.113549.1.1.11
>
> Protocol Used: TLS Version 1
> http_persist_post(): entered
> http_long_ParseURL(): entered
> do_post(): entered
> POST /oauth2/token
> Host: integration1.api.manheim.com
> User-Agent: http-api/1.17
> Content-Type: text/xml
> Expect: 100-continue
> Content-Length: 0
> Authorization: Basic c2h2bWFoNXB1dTZ5OGsydGFkNTZ3eWdlOjN3Q0NjZ3VyRzg=
>
>
> recvresp(): entered
> HTTP/1.1 400 BAD_REQUEST
> Content-Length: 0
> Connection: Close
>
>
> SetError() #13: HTTP/1.1 400 BAD_REQUEST
> recvdoc parms: identity 0
> header_load_cookies() entered
> recvdoc(): entered
> SetError() #0:
> SetError() #13: HTTP/1.1 400 BAD_REQUEST
> http_close(): entered
>
>
> On Mon, May 9, 2016 at 12:12 PM, Shubhadeep Roy <shubhadeep.roy@xxxxxxxxx>
> wrote:
>
> > Hi,
> >
> > I am trying to Post to a URL with a username and password to get a token
> > back using HTTPAPI and YAJL and am getting BAD_REQUEST error. I have also
> > tried using the following instead of using the yajl set of commands to
> > generate the JSON-
> > myJson = '{ "grant_type": "client_credentials" }';
> >
> > When I debug and check the contents of myJSON, I get junk values-
> > MYJSON =
> >            ....5...10...15...20...25...30...35...40...45
> >       1   ' ÅÊ/>ȬÈ`øÁ Ä%ÑÁ>ȬÄÊÁÀÁ>ÈÑ/%Ë '
> >
> > Can someone please help?
> >
> >
> > Here's the code below-
> > P getAuthToken    B                   Export
> > D getAuthToken    PI            24A
> >   *
> > D CRLF            C                   X'0d25'
> > D rc              S             10I 0 Inz
> > D msg             S             80A   Inz
> > D runFlag         S               N   Static
> > D myJSON          S          65535A   Varying
> > D size            S             10I 0 Inz
> >   *
> > D dsLogonDetails  DS                  Static
> > D  dsAuthUsr                    24A
> > D  dsAuthPwd                    24A
> > D  dsAuthUrl                  1024A
> >   *
> >   * getLogonInfo Prototype
> > D getLogonInfo    PR          1072A
> >   *
> >   * Parse Incoming Data from http_url_post_raw
> > D parseHeader     PR            10I 0
> > D                               10I 0 Value
> > D                                 *   Value
> > D                               10I 0 Value
> >   *
> >   /Free
> >
> >    http_debug(*ON : '/tmp/ShubhDebugLog.txt');
> >
> >    Clear authUrl;
> >
> >    // If not run, set static variables
> >    If Not runFlag;
> >       runFlag = *On;
> >
> >       // Get logon info
> >       dsLogonDetails = getLogonInfo();
> >    EndIf;
> >
> >
> >    // Set Authorization
> >    http_setauth(HTTP_AUTH_BASIC : dsAuthUsr : dsAuthPwd);
> >
> >    http_setCCSIDs( 1208: 0 );
> >
> >
> >    yajl_genOpen(*ON);
> >    yajl_beginObj();
> >
> >    yajl_addChar('grant_type': 'client_credentials');
> >
> >    yajl_endObj();
> >
> >    yajl_copyBuf( 1208 : %addr(myJson) : %size(myJson) : size);
> >    yajl_genClose();
> >
> >    rc = http_url_post_raw(dsAuthUrl : %addr(myJSON : *data) : size :
> >                           1 : %paddr('PARSEHEADER'));
> >
> >    If rc <> 1;
> >       msg = http_error;
> >    EndIf;
> >
> >    Return authToken;
> >
> >   /End-Free
> > P getAuthToken    E
> >
> >
> > Here's the error message: HTTP/1.1 400 BAD_REQUEST
> >
> > --
> >
> > Warm regards,
> > Shubh
> > All is well. Everything will be OK!!! - Shubh
> > ​​