🚀 go-pugleaf

Bob Gonder wrote:
> 
> Look at the first link in Extras...RFC 1393.
> Then look back in this group to last week:
> 
> Date: Thu, 19 Jun 2008 00:49:44 -0500
> From: DreamChaser
> Newsgroups: borland.public.cppbuilder.internet.socket
> Subject: IP_OPT_RR and IcmpSendEcho() anybody how how?
> Message-ID: <4859f37d@newsgroups.borland.com>
> 
Thanks for the shout out Bob, but I haven't gotten IP_OPT_RR to work 
yet. Using the pseudo code that Gambit provided I am still getting an 
Options Bad error from IcmpSendEcho().

#pragma pack(push,1)
typedef struct {
    BYTE   cbType;
    BYTE   cbSize;
    BYTE   pointer;
    IPAddr addresses[62];
} RecordRouteOption, *PRecordRouteOption;
#pragma pack(pop)

     HANDLE icmp = IcmpCreateFile();
     IPAddr addr;
     char *SendData = "Hello";

    //This is www.google.com
    ipaddr.S_un.S_addr = inet_addr("74.125.47.147");


     BYTE options[sizeof(RecordRouteOption)+1] = {0};

     PRecordRouteOption option = (PRecordRouteOption) options;
     option->type = IP_OPT_RR;
     option->length = sizeof(RecordRouteOption);
     option->pointer = 4;

     (++option)->type = IP_OPT_EOL;

     IP_OPTION_INFORMATION info = {0};
     info.Ttl = 256;
     //info.Tos = ...;
     //info.Flags = ...;
     info.OptionsSize = sizeof(options);
     info.OptionsData = options;

     DWORD ReplySize = sizeof(ICMP_ECHO_REPLY) + strlen(SendData);
     ICMP_ECHO_REPLY *reply = (ICMP_ECHO_REPLY*) malloc(ReplySize);
     ...
     if( IcmpSendEcho(icmp, addr, SendData, strlen(SendData), &info, 
reply, ReplySize, 1000) > 0 )     {
       struct in_addr ReplyAddr;
       ReplyAddr.S_un.S_addr = reply.Address;
       switch (reply.Status) {
          case IP_SUCCESS:
             S.sprintf("%s Reply from %s: bytes=%d, time=%3dms, TTL=%3d",
                         Now().FormatString(TIME_FORMAT),
                         inet_ntoa(ReplyAddr),
                         reply.DataSize,
                         reply.RoundTripTime,
                         reply.Options.Ttl
                      );
             nMaxTime = (reply.RoundTripTime > nMaxTime) ? 
reply.RoundTripTime : nMaxTime;
             idx = 0xFF;
             break;
          case IP_TTL_EXPIRED_TRANSIT:
             hst = gethostbyaddr((char *) &ReplyAddr, 4, AF_INET);
             S.sprintf("\t[Hop:%3d] %15s: Time=%3dms, TOS=%3d, %s",
                         idx,
                         inet_ntoa(ReplyAddr),
                         reply.RoundTripTime,
                         reply.Options.Tos,
                         (hst) ? hst->h_name : ""
                      );
             break;
          default:
             S.sprintf("%s %s %s",
                         Now().FormatString(TIME_FORMAT),
                         inet_ntoa(ReplyAddr),
                         ErrorStrings[reply.Status - IP_STATUS_BASE]
                   );
             idx = 0xFF;
       } //EndIf (reply.Status != IP_SUCCESS)
       Memo1->Lines->Add(S);
     }
     ...
     free(reply);
     IcmpCloseHandle(icmp);