RE: TCP/IP Sockets from RPG

There are many(almost 20) error conditions that recv can return on the i. A -1 return code means check errno for one of many conditions. In fact, the end of a receive stream does not close a socket connection unless an error should occur on the other end. If you get a 0 return code(amount) then you can close the socket(your end) and re-connect depending on the application. But as I stated before, the amount of transmission send and receive should not be a guesstimate, so you should know when to stop requesting data in some way shape or form. You cannot just keep reading bytes until a return code less than 1.

If you want to get started with socket programming on the i start here:

http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=/apis/aplist.htm

Subject: RE: TCP/IP Sockets from RPG> Date: Wed, 6 Feb 2008 08:54:13 -0600> From: Lim.Hock-Chai@xxxxxxxxxxxxxxx> To: rpg400-l@xxxxxxxxxxxx> > Looking at Scott's rdline example, seems like it will return a -1 when> recv() returned value is less than 1.> > You migth want to debug rdline to see what is the actual value that> recv() returned. If it is a 0, that means the server has disconnected> you connection.> > > > -----Original Message-----> From: rpg400-l-bounces@xxxxxxxxxxxx> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Christopher Anderson> Sent: Monday, February 04, 2008 11:07 AM> To: rpg400-l@xxxxxxxxxxxx> Subject: TCP/IP Sockets from RPG> > > Good morning everyone,> > I've been attempting to create a socket connection to a report vendor> using Scott Klement's (hi Scott) tutorial on that subject. I've managed> to successfully establish the socket connection AND send the request> records downstream but the segment of the program that accepts the> response doesn't work as I anticipated which leads me to believe I'm not> getting the concept very well. > > What I need to do is accept a number of records into the buffer until I> get an END TRANSMISSION record. Each record will be the same length and> is identified internally. So, I'll grab one record, decide what type it> is and process it then read the next record from the buffer. I'm also> supposed to put a 60 second time out on this segment of code but we'll> blow up that bridge later.> > The logic is:> > DOU LastRecord = *On;> rc = rdline(sock: %addr(recbuf): %size(recbuf): *On);> if rc < 0;> err = errno;> callp close(sock);> callp die('rdline(): ' + %str(strerror(err)));> return;> endif;> > TestRecord = recbuf; // This moves what's in the buffer into a> DS that can locate the > // record type field.> // Process record.> > ENDDO;> > What happens is the system works for a while on the rc=rdline... Line> then returns -1 for rc and the errno variable comes back with an error> when I attempt to eval it in debug. (A type error). > > Does anyone have any idea what I'm doing wrong or what I'm missing? > > Thank you,> Chris Anderson> Partners Mutual Insurance> --> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing> list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,> unsubscribe, or change list options,> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l> or email: RPG400-L-request@xxxxxxxxxxxx> Before posting, please take a moment to review the archives at> http://archive.midrange.com/rpg400-l.> > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list> To post a message email: RPG400-L@xxxxxxxxxxxx> To subscribe, unsubscribe, or change list options,> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l> or email: RPG400-L-request@xxxxxxxxxxxx> Before posting, please take a moment to review the archives> at http://archive.midrange.com/rpg400-l.>

_________________________________________________________________
Connect and share in new ways with Windows Live.
http://www.windowslive.com/share.html?ocid=TXT_TAGHM_Wave2_sharelife_012008