Re: CONTENT_LENGTH = 0?

[Aaron Bartell <aaronbartell@xxxxxxxxx>]

I am going to guess it is .NET invoking the RPG program?  If it is then you
need to get up to date on PTF's.  Apache had/has a bug where it doesn't
process "HTTP Continue" interactions correctly which .NET uses liberally -
whether necessary or not.  How do I know this?  Well, let's just say I have
been on the phone with IBM more than once for over 8hrs at a time while I
proved it wasn't my software (www.rpg-xml.com) and instead that it was
Apache.  They ended up having to wake up the Apache developer in Mexico and
get them to confirm the bug :-P

A way you could address this without applying PTF's is to specify HTTP
version 1.0 on the interaction, by default version 1.1 is probably being
used.  Of course you would have to figure out how to do that from the .NET
end of things which can be difficult if you're using their canned HTTP/SOAP
API's.

Aaron Bartell
www.SoftwareSavesLives.com


On Wed, Dec 23, 2009 at 11:35 AM, Mike <koldark@xxxxxxxxx> wrote:

> I have been using the below listed article [1] to figure out how to pass
> parameters to my RPG-CGI program. I have a problem getting the
> CONTENT_LENGTH. It always seems to return 0. We are on V5R4.
>
> [1] http://systeminetwork.com/node/26490
>
>     P*--------------------------------------------------
>     P* Procedure name: CgiParseInz
>     P* Purpose: http://systeminetwork.com/node/26490
>     P* Returns:
>     P*--------------------------------------------------
>     P CgiParseInz     B                   EXPORT
>     D CgiParseInz     PI            10I 0
>
>     D cgiBuffer       S           4096A
>     D reqMethod       S             10A
>     D nContentLen     S             10I 0
>     D nBytesRead      S             10I 0
>     D api_error       S             64A   Inz(*ALLX'00')
>      /free
>
>       reqMethod = %str(getenv('REQUEST_METHOD'));
>       nContentLen = %int(%str(getenv('CONTENT_LENGTH')));
>
>       if (reqMethod = 'POST' and nContentLen  > 0);
>       //if (reqMethod = 'POST');
>         cgiParse('-i ':'CGII0100': cgiBuffer: %size(cgiBuffer) :
>                  nBytesRead : api_error);
>         if (nBytesRead  > 0);
>           putenv(%subst(cgiBuffer:1:nBytesRead)); // Set QRY_STR
>           putenv('REQUEST_METHOD=GET');  // Override method
>         endif;
>
>       endif;
>       return nBytesRead;
>      /end-free
>     P CgiParseInz     E
>
> I am claiming stupid here so I am not sure what I maybe doing wrong. I am
> using Poster (a Mozilla plugin)(http://code.google.com/p/poster-extension/
> )
> to test POST to this program.
>
> --
> Mike Wills
> http://mikewills.info
> P: (507) 933-0880 | Skype: koldark
> --
> This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/web400.