Re: result from recv() missing imbedded blank (occasionally)

[Alan Campin <alan0307d@xxxxxxxxx>]

   I would say it has absolutely nothing to do with HTTP. The telephone
   switch equipment has a bug and is occasionally returning without the
   blanks. The socket just returns what it is given.

   On Wed, Aug 10, 2011 at 4:34 PM, Koester, Michael
   <[1]mkoester@xxxxxxxxxxxxx> wrote:

     I've been using the sockets routines from the LIBHTTP set to send
     commands to telephone switch equipment, and it has been serving our
     needs nicely.  One little quirk appears on occasion that messes me
     up, though.  To verify that the switch has properly updated a
     subscriber's phone service, I send it a "QUE STN" command, and then
     parse the reply for the expected features.  These features are
     expected to appear with spaces between them, just as what would
     display in a telnet session used by the service center techs.  In a
     return string containing "... CND PRS2 6745 CNAM ACR ...", I can
     easily know that the CND, CNAM, and PRS2 features are on the line.
      Every once in a while, a space is missing, which makes it
     difficult to find SUPR and CNAM in the string "... UAR 1 CND
     SUPRCNAM ACR ...".
     The string comes back from recv() and is translated to EBCDIC
     before writing it to the "text" column (3000A Varying) in my
     Switchlog table.  And if it helps, when the space is missing, it
     appears to consistently be absent from either position 134 or 136
     of the "text" column.  (Hmmmm...)
     My program has the following:
         D RecBuf          S           3000A
         D RecLen          S             10I 0
     ...
           recbuf = *blanks;
           rc = recv(sock: %addr(recbuf):3000:0);
           reclen = rc;
           // translate the line of text into EBCDIC to make it readable
           if rc > 0;
              Translate(reclen: recbuf: 'QTCPEBC');
              LogSwitchActivity(FromSwitch : recbuf);
           endif;
     ...
         P*--------------------------------------------------
         P LogSwitchActivity...
         P                 B
         D LogSwitchActivity...
         D                 PI
         D  FromWhere                    12A
         D  LogText                    3000A   OPTIONS(*VARSIZE)
         D                                     const
          /free
           exec sql
            insert into SwitchLog
                     (Order,
                      Direction,
                      TFStime,
                      Text)
               VALUES(:ServiceOrder,
                      :FromWhere,
                      NOW(),
                      trim(:LogText))
               with nc;
           return;
          /end-free
         P LogSwitchActivity...
         P                 E
     I could add some complexity to my %scan statements in my parsing
     routine, but if there's a better fix to the root cause, I'd rather
     not hack it up.  Running at OS version 6.1.
     Any ideas as to what is causing this?
     Many thanks.
      Michael Koester
     -------------------------------------------------------------------
     ----
     This is the FTPAPI mailing list.  To unsubscribe, please go to:
     [2]http://www.scottklement.com/mailman/listinfo/ftpapi
     -------------------------------------------------------------------
     ----

References

   1. mailto:mkoester@xxxxxxxxxxxxx
   2. http://www.scottklement.com/mailman/listinfo/ftpapi

-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubscribe, please go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------