Re: Garbage in HTTP response

[Steve Richter <stephenrichter@xxxxxxxxx>]

not sure about RPG CGI, but I got this sort of data a lot when sending JSON
from PHP to Javascript.   Had to do with translating from EBCDIC to ASCII.
 In my case I changed the CCSID of some columns to 1208.  ( which actually
might not have been necessary. )   Also had to work with the parameters in
PHP when converting to JSON.

On Fri, May 24, 2019 at 11:43 AM Justin Taylor <JUSTIN@xxxxxxxxxxxxx> wrote:

> I have a CGI webservice written in RPG that returns JSON.  It processes
> about 200 requests a day and has been in production for a couple of weeks.
> I have one request that consistently returns strange garbage at the
> beginning of the response.  So far, I’ve only seen a single request that
> does this.  I can’t see anything unusual about this request.  I’ve debugged
> the RPG code, and it looks to be functioning correctly.
>
> Any suggestions on where to look now?  TIA
>
>
> Here is what a normal response looks like:
> HTTP/1.1 200 OK
> Date: Fri, 24 May 2019 15:05:38 GMT
> Server: Apache
> Content-Type: application/json; charset=utf-8
> Content-Length: 80297
>
> {json_data_here}
>
>
>
> Here is what the bogus response consistently shows:
> HTTP/1.1 200 OK
> Date: Fri, 24 May 2019 15:27:05 GMT
> Server: Apache
> Content-Type: image/x-portable-graymap
> Content-Length: 91261
>
>
> �`鉗@�K��@@Ö�������@M�]@����`����@ɇ��@ׁ����@@����`��`��%�����@兙����@�K��@M������~��m��k䣆��~��kȤ��Ɖ���~��k�@���]%%י��������@�������z@a
> ���a���`������������`����`�����m������m��������������������K���%%ŧ��������@@�����K���%ŧ��������@@�����K���%ŧ��������@@����K���%ŧ��������@@������K���%ŧ��������@@�ä���K���%%ť��������@��@֒%%Ɖ���z@
> �%≩�z@@@@@@@�����%Ö��������z@����%⣁���z@���@��
> %�����`����z@�����������a����^@�������~���`�
> %
> %{json_data_here}
>
>
>
> RPG snippet:
>        yajl_genOpen(*off);
>        yajl_beginObj();
>        yajl_addChar('' : );
>        yajl_addCharPtr('' : :);
>
>        yajl_endObj();
>
>        yajl_copyBuf( 1208
>                    : %addr(lJsonData)
>                    : %size(lJsonData)
>                    : lLength );
>
>        yajl_genClose();
>
>        lDataOut = 'Status: 200 OK'
>                 + CRLF
>                 + 'Content-type: application/json; charset=utf-8'
>                 + CRLF + CRLF
>                 + lJsonData
>                 + CRLF
>                 ;
>        lLength = %len(%trimr(lDataOut));
>
>        QtmhWrStoutAPI(lDataOut :lLength :QUSEC);
>        If QUSEI = *blank;
>        Else;
>        Endif;
> --
> This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing
> list
> To post a message email: WEB400@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/web400.