946 lines
29 KiB
C
946 lines
29 KiB
C
|
/*++
|
||
|
|
|
||
|
|
Copyright (c) 1999-2001 Microsoft Corporation
|
||
|
|
|
||
|
|
Module Name:
|
||
|
|
|
||
|
|
pathping.c
|
||
|
|
|
||
|
|
Abstract:
|
||
|
|
|
||
|
|
PathPing utility
|
||
|
|
|
||
|
|
Author:
|
||
|
|
|
||
|
|
Dave Thaler
|
||
|
|
|
||
|
|
Revision History:
|
||
|
|
|
||
|
|
Who When What
|
||
|
|
-------- -------- ----------------------------------------------
|
||
|
|
rajeshsu Aug 10, 1999 Added QoS support (802.1p and RSVP)
|
||
|
|
dthaler Mar 31, 2001 Added IPv6 support
|
||
|
|
|
||
|
|
Notes:
|
||
|
|
|
||
|
|
--*/
|
||
|
|
|
||
|
|
#include <nt.h>
|
||
|
|
#include <ntrtl.h>
|
||
|
|
#include <nturtl.h>
|
||
|
|
#define NOGDI
|
||
|
|
#define NOMINMAX
|
||
|
|
#include <windows.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <ctype.h>
|
||
|
|
#include <io.h>
|
||
|
|
#include <nls.h>
|
||
|
|
#include <winsock2.h>
|
||
|
|
#include <ws2tcpip.h>
|
||
|
|
#include <ntddip6.h>
|
||
|
|
#include "pathqos.h"
|
||
|
|
#include "ipexport.h"
|
||
|
|
#include "icmpapi.h"
|
||
|
|
#include "nlstxt.h"
|
||
|
|
#include "pathping.h"
|
||
|
|
|
||
|
|
ULONG g_ulTimeout = DEFAULT_TIMEOUT;
|
||
|
|
ULONG g_ulInterval = MIN_INTERVAL;
|
||
|
|
ULONG g_ulNumQueries = DEFAULT_NUM_QUERIES;
|
||
|
|
HANDLE g_hIcmp = NULL;
|
||
|
|
ULONG g_ulRcvBufSize = 0x2000;
|
||
|
|
BOOLEAN g_bDoReverseLookup = TRUE;
|
||
|
|
BOOLEAN g_bDo8021P = FALSE;
|
||
|
|
BOOLEAN g_bDoRSVP = FALSE;
|
||
|
|
BOOLEAN g_bDoRSVPDiag = FALSE;
|
||
|
|
SOCKADDR_STORAGE g_ssMyAddr = {0};
|
||
|
|
socklen_t g_slMyAddrLen = 0;
|
||
|
|
BOOLEAN g_bSetAddr = FALSE;
|
||
|
|
|
||
|
|
HOP hop[MAX_HOPS];
|
||
|
|
|
||
|
|
#ifdef VXD
|
||
|
|
# define FAR _far
|
||
|
|
#endif // VXD
|
||
|
|
|
||
|
|
char SendBuffer[DEFAULT_SEND_SIZE];
|
||
|
|
char RcvBuffer[DEFAULT_RECEIVE_SIZE];
|
||
|
|
WSADATA WsaData;
|
||
|
|
|
||
|
|
struct IPErrorTable {
|
||
|
|
IP_STATUS Error; // The IP Error
|
||
|
|
DWORD ErrorNlsID; // The corresponding NLS string ID.
|
||
|
|
} ErrorTable[] =
|
||
|
|
{
|
||
|
|
{ IP_BUF_TOO_SMALL, PATHPING_BUF_TOO_SMALL },
|
||
|
|
{ IP_DEST_NET_UNREACHABLE, PATHPING_DEST_NET_UNREACHABLE },
|
||
|
|
{ IP_DEST_HOST_UNREACHABLE, PATHPING_DEST_HOST_UNREACHABLE },
|
||
|
|
{ IP_DEST_PROT_UNREACHABLE, PATHPING_DEST_PROT_UNREACHABLE },
|
||
|
|
{ IP_DEST_PORT_UNREACHABLE, PATHPING_DEST_PORT_UNREACHABLE },
|
||
|
|
{ IP_NO_RESOURCES, PATHPING_NO_RESOURCES },
|
||
|
|
{ IP_BAD_OPTION, PATHPING_BAD_OPTION },
|
||
|
|
{ IP_HW_ERROR, PATHPING_HW_ERROR },
|
||
|
|
{ IP_PACKET_TOO_BIG, PATHPING_PACKET_TOO_BIG },
|
||
|
|
{ IP_REQ_TIMED_OUT, PATHPING_REQ_TIMED_OUT },
|
||
|
|
{ IP_BAD_REQ, PATHPING_BAD_REQ },
|
||
|
|
{ IP_BAD_ROUTE, PATHPING_BAD_ROUTE },
|
||
|
|
{ IP_TTL_EXPIRED_TRANSIT, PATHPING_TTL_EXPIRED_TRANSIT },
|
||
|
|
{ IP_TTL_EXPIRED_REASSEM, PATHPING_TTL_EXPIRED_REASSEM },
|
||
|
|
{ IP_PARAM_PROBLEM, PATHPING_PARAM_PROBLEM },
|
||
|
|
{ IP_SOURCE_QUENCH, PATHPING_SOURCE_QUENCH },
|
||
|
|
{ IP_OPTION_TOO_BIG, PATHPING_OPTION_TOO_BIG },
|
||
|
|
{ IP_BAD_DESTINATION, PATHPING_BAD_DESTINATION },
|
||
|
|
{ IP_NEGOTIATING_IPSEC, PATHPING_NEGOTIATING_IPSEC },
|
||
|
|
{ IP_GENERAL_FAILURE, PATHPING_GENERAL_FAILURE }
|
||
|
|
};
|
||
|
|
|
||
|
|
void
|
||
|
|
print_addr(SOCKADDR *sa, socklen_t salen, BOOLEAN DoReverseLookup)
|
||
|
|
{
|
||
|
|
unsigned char hostname[NI_MAXHOST];
|
||
|
|
int i;
|
||
|
|
BOOLEAN didReverse = FALSE;
|
||
|
|
|
||
|
|
if (DoReverseLookup) {
|
||
|
|
i = getnameinfo(sa, salen, hostname, sizeof(hostname),
|
||
|
|
NULL, 0, NI_NAMEREQD);
|
||
|
|
|
||
|
|
if (i == NO_ERROR) {
|
||
|
|
didReverse = TRUE;
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_TARGET_NAME, hostname);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
i = getnameinfo(sa, salen, hostname, sizeof(hostname),
|
||
|
|
NULL, 0, NI_NUMERICHOST);
|
||
|
|
|
||
|
|
if (i != NO_ERROR) {
|
||
|
|
// This should never happen unless there is a memory problem,
|
||
|
|
// in which case the message associated with PATHPING_NO_RESOURCES
|
||
|
|
// is reasonable.
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_NO_RESOURCES);
|
||
|
|
exit (1);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (didReverse) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_BRKT_IP_ADDRESS, hostname );
|
||
|
|
} else {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_IP_ADDRESS, hostname );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
print_ip_addr(IPAddr ipv4Addr, BOOLEAN DoReverseLookup)
|
||
|
|
{
|
||
|
|
SOCKADDR_IN sin;
|
||
|
|
|
||
|
|
memset(&sin, 0, sizeof(sin));
|
||
|
|
sin.sin_family = AF_INET;
|
||
|
|
sin.sin_addr.s_addr = ipv4Addr;
|
||
|
|
|
||
|
|
print_addr((LPSOCKADDR)&sin, sizeof(sin), DoReverseLookup);
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
print_ipv6_addr(USHORT ipv6Addr[8], BOOLEAN DoReverseLookup)
|
||
|
|
{
|
||
|
|
SOCKADDR_IN6 sin;
|
||
|
|
|
||
|
|
memset(&sin, 0, sizeof(sin));
|
||
|
|
sin.sin6_family = AF_INET6;
|
||
|
|
memcpy(&sin.sin6_addr, ipv6Addr, sizeof(sin.sin6_addr));
|
||
|
|
|
||
|
|
print_addr((LPSOCKADDR)&sin, sizeof(sin), DoReverseLookup);
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
print_time(ULONG Time)
|
||
|
|
{
|
||
|
|
if (Time) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_TIME, Time );
|
||
|
|
// printf(" %3lu ms\n", Time);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_TIME_10MS );
|
||
|
|
// printf(" <10 ms\n");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
BOOLEAN
|
||
|
|
param(
|
||
|
|
ULONG *parameter,
|
||
|
|
char **argv,
|
||
|
|
int argc,
|
||
|
|
int current,
|
||
|
|
ULONG min,
|
||
|
|
ULONG max
|
||
|
|
)
|
||
|
|
{
|
||
|
|
ULONG temp;
|
||
|
|
char *dummy;
|
||
|
|
|
||
|
|
if (current == (argc - 1) ) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_NO_OPTION_VALUE, argv[current] );
|
||
|
|
// printf( "Value must be supplied for option %s.\n", argv[current]);
|
||
|
|
return(FALSE);
|
||
|
|
}
|
||
|
|
|
||
|
|
temp = strtoul(argv[current+1], &dummy, 0);
|
||
|
|
if (temp < min || temp > max) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_BAD_OPTION_VALUE, argv[current] );
|
||
|
|
// printf( "Bad value for option %s.\n", argv[current]);
|
||
|
|
return(FALSE);
|
||
|
|
}
|
||
|
|
|
||
|
|
*parameter = temp;
|
||
|
|
|
||
|
|
return(TRUE);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
BOOLEAN
|
||
|
|
ResolveTarget(
|
||
|
|
IN DWORD Family,
|
||
|
|
IN char *TargetString,
|
||
|
|
OUT SOCKADDR_STORAGE *TargetAddress,
|
||
|
|
OUT socklen_t *TargetAddressLen,
|
||
|
|
OUT char *TargetName,
|
||
|
|
IN DWORD TargetNameLen,
|
||
|
|
IN BOOLEAN DoReverseLookup
|
||
|
|
)
|
||
|
|
{
|
||
|
|
int i;
|
||
|
|
struct addrinfo hints, *ai;
|
||
|
|
|
||
|
|
TargetName[0] = '\0';
|
||
|
|
|
||
|
|
memset(&hints, 0, sizeof(hints));
|
||
|
|
hints.ai_family = Family;
|
||
|
|
hints.ai_flags = AI_NUMERICHOST;
|
||
|
|
i = getaddrinfo(TargetString, NULL, &hints, &ai);
|
||
|
|
if (i == NO_ERROR) {
|
||
|
|
*TargetAddressLen = ai->ai_addrlen;
|
||
|
|
memcpy(TargetAddress, ai->ai_addr, ai->ai_addrlen);
|
||
|
|
|
||
|
|
if (DoReverseLookup) {
|
||
|
|
getnameinfo(ai->ai_addr, ai->ai_addrlen,
|
||
|
|
TargetName, TargetNameLen,
|
||
|
|
NULL, 0, NI_NAMEREQD);
|
||
|
|
}
|
||
|
|
|
||
|
|
freeaddrinfo(ai);
|
||
|
|
return(TRUE);
|
||
|
|
} else {
|
||
|
|
hints.ai_flags = AI_CANONNAME;
|
||
|
|
if (getaddrinfo(TargetString, NULL, &hints, &ai) == 0) {
|
||
|
|
*TargetAddressLen = ai->ai_addrlen;
|
||
|
|
memcpy(TargetAddress, ai->ai_addr, ai->ai_addrlen);
|
||
|
|
strcpy(TargetName,
|
||
|
|
(ai->ai_canonname)? ai->ai_canonname : TargetString);
|
||
|
|
freeaddrinfo(ai);
|
||
|
|
return(TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return(FALSE);
|
||
|
|
|
||
|
|
} // ResolveTarget
|
||
|
|
|
||
|
|
ULONG g_ulSendsDone = 0;
|
||
|
|
|
||
|
|
void
|
||
|
|
SleepForTotal(
|
||
|
|
DWORD dwTotal
|
||
|
|
)
|
||
|
|
{
|
||
|
|
DWORD dwStopAt = GetTickCount() + dwTotal;
|
||
|
|
int iLeft = (int)dwTotal;
|
||
|
|
|
||
|
|
while (iLeft > 0) {
|
||
|
|
SleepEx(iLeft, TRUE);
|
||
|
|
iLeft = dwStopAt - GetTickCount();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
VOID
|
||
|
|
EchoDone(
|
||
|
|
IN PVOID pContext,
|
||
|
|
IN PIO_STATUS_BLOCK Ignored1,
|
||
|
|
IN ULONG Ignored2
|
||
|
|
)
|
||
|
|
{
|
||
|
|
PAPC_CONTEXT pApc = (PAPC_CONTEXT)pContext;
|
||
|
|
ULONG ulNumReplies;
|
||
|
|
ULONG i;
|
||
|
|
|
||
|
|
g_ulSendsDone++;
|
||
|
|
if (g_ssMyAddr.ss_family == AF_INET) {
|
||
|
|
ulNumReplies = IcmpParseReplies(pApc->pReply4, g_ulRcvBufSize);
|
||
|
|
|
||
|
|
for (i=0; i<ulNumReplies; i++) {
|
||
|
|
if (pApc->sinAddr.sin_addr.s_addr is pApc->pReply4[i].Address) {
|
||
|
|
pApc->ulNumRcvd++;
|
||
|
|
pApc->ulRTTtotal += pApc->pReply4[i].RoundTripTime;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
ulNumReplies = Icmp6ParseReplies(pApc->pReply6, g_ulRcvBufSize);
|
||
|
|
|
||
|
|
for (i=0; i<ulNumReplies; i++) {
|
||
|
|
if (!memcmp(&pApc->sin6Addr.sin6_addr,
|
||
|
|
&pApc->pReply6[i].Address.sin6_addr,
|
||
|
|
sizeof(struct in6_addr))) {
|
||
|
|
pApc->ulNumRcvd++;
|
||
|
|
pApc->ulRTTtotal += pApc->pReply6[i].RoundTripTime;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
// now that the hop[] array is filled in, ping each one every g_ulInterval
|
||
|
|
// seconds
|
||
|
|
void
|
||
|
|
ComputeStatistics(
|
||
|
|
PIP_OPTION_INFORMATION pOptions
|
||
|
|
)
|
||
|
|
{
|
||
|
|
ULONG h, q;
|
||
|
|
int lost, rcvd, linklost, nodelost, sent, len;
|
||
|
|
ULONG ulHopCount = (ULONG)pOptions->Ttl;
|
||
|
|
|
||
|
|
// Allocate memory for replies
|
||
|
|
for (h=1; h<=ulHopCount; h++)
|
||
|
|
hop[h].pReply = LocalAlloc(LMEM_FIXED, g_ulRcvBufSize);
|
||
|
|
|
||
|
|
for (q=0; q<g_ulNumQueries; q++) {
|
||
|
|
for (h=1; h<=ulHopCount; h++) {
|
||
|
|
if (hop[h].saAddr.sa_family == AF_INET) {
|
||
|
|
// Send ping to h
|
||
|
|
IcmpSendEcho2(g_hIcmp, // handle to icmp
|
||
|
|
NULL, // no event
|
||
|
|
EchoDone, // callback function
|
||
|
|
(LPVOID)&hop[h], // parameter to pass to callback fcn
|
||
|
|
hop[h].sinAddr.sin_addr.s_addr, // destination
|
||
|
|
SendBuffer,
|
||
|
|
DEFAULT_SEND_SIZE,
|
||
|
|
pOptions,
|
||
|
|
hop[h].pReply,
|
||
|
|
g_ulRcvBufSize,
|
||
|
|
g_ulTimeout );
|
||
|
|
} else {
|
||
|
|
Icmp6SendEcho2(g_hIcmp, // handle to icmp
|
||
|
|
NULL, // no event
|
||
|
|
EchoDone, // callback function
|
||
|
|
(LPVOID)&hop[h], // parameter to pass to callback fcn
|
||
|
|
(LPSOCKADDR_IN6)&g_ssMyAddr,
|
||
|
|
&hop[h].sin6Addr,// destination
|
||
|
|
SendBuffer,
|
||
|
|
DEFAULT_SEND_SIZE,
|
||
|
|
pOptions,
|
||
|
|
hop[h].pReply,
|
||
|
|
g_ulRcvBufSize,
|
||
|
|
g_ulTimeout );
|
||
|
|
}
|
||
|
|
|
||
|
|
// Wait alertably for 'delay' ms
|
||
|
|
SleepForTotal(g_ulInterval);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// Wait alertably until Done count hits max
|
||
|
|
while (g_ulSendsDone < ulHopCount * g_ulNumQueries)
|
||
|
|
SleepEx(INFINITE, TRUE);
|
||
|
|
|
||
|
|
// Compute per-hop info
|
||
|
|
// hoprcvd is max rcvd of all hops >= h
|
||
|
|
hop[ulHopCount].ulHopRcvd = hop[ulHopCount].ulNumRcvd;
|
||
|
|
for (h=ulHopCount-1; h>0; h--)
|
||
|
|
hop[h].ulHopRcvd = MAX(hop[h].ulNumRcvd, hop[h+1].ulHopRcvd);
|
||
|
|
hop[0].ulHopRcvd = g_ulNumQueries;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
VOID
|
||
|
|
PrintResults(
|
||
|
|
ULONG ulHopCount
|
||
|
|
)
|
||
|
|
{
|
||
|
|
ULONG h;
|
||
|
|
int sent, rcvd, lost, linklost, nodelost;
|
||
|
|
|
||
|
|
// Now output results
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_STAT_HEADER, GetLastError());
|
||
|
|
// printf(" Source to Here This Node/Link\n");
|
||
|
|
// printf("Hop RTT Lost/Sent = Pct Lost/Sent = Pct Address\n");
|
||
|
|
// printf(" 0 ");
|
||
|
|
print_addr((LPSOCKADDR)&g_ssMyAddr, g_slMyAddrLen, g_bDoReverseLookup);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
// printf("\n");
|
||
|
|
|
||
|
|
for (h=1; h<=ulHopCount; h++) {
|
||
|
|
sent = g_ulNumQueries;
|
||
|
|
rcvd = hop[h].ulNumRcvd;
|
||
|
|
lost = sent - rcvd;
|
||
|
|
|
||
|
|
linklost = hop[h-1].ulHopRcvd - hop[h].ulHopRcvd;
|
||
|
|
nodelost = hop[h].ulHopRcvd - hop[h].ulNumRcvd;
|
||
|
|
|
||
|
|
// Display previous link stats
|
||
|
|
// printf( " %4d/%4d =%3.0f%% |\n",
|
||
|
|
// linklost, sent, 100.0*linklost/sent);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_STAT_LINK,
|
||
|
|
linklost, sent, 100*linklost/sent);
|
||
|
|
|
||
|
|
if (rcvd)
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_HOP_RTT, h, hop[h].ulRTTtotal/rcvd);
|
||
|
|
else
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_HOP_NO_RTT, h);
|
||
|
|
|
||
|
|
// printf("%3d ", h);
|
||
|
|
// if (!rcvd)
|
||
|
|
// printf(" --- ");
|
||
|
|
#if 0
|
||
|
|
// else if (hop[h].ulRTTtotal/rcvd == 0)
|
||
|
|
// printf(" <10ms ");
|
||
|
|
#endif
|
||
|
|
// else
|
||
|
|
// printf("%4dms ", hop[h].ulRTTtotal/rcvd);
|
||
|
|
|
||
|
|
// printf("%4d/%4d =%3.0f%% ", lost, sent, 100.0*lost/sent);
|
||
|
|
// printf("%4d/%4d =%3.0f%% ", nodelost, sent, 100.0*nodelost/sent);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_STAT_LOSS,
|
||
|
|
lost, sent, 100*lost/sent);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_STAT_LOSS,
|
||
|
|
nodelost, sent, 100*nodelost/sent);
|
||
|
|
|
||
|
|
if (!hop[h].saAddr.sa_family) {
|
||
|
|
hop[h].saAddr.sa_family = g_ssMyAddr.ss_family;
|
||
|
|
}
|
||
|
|
print_addr(&hop[h].saAddr, g_slMyAddrLen, g_bDoReverseLookup);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
// printf("\n");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
BOOLEAN
|
||
|
|
SetFamily(DWORD *Family, DWORD Value, char *arg)
|
||
|
|
{
|
||
|
|
if ((*Family != AF_UNSPEC) && (*Family != Value)) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_FAMILY, arg,
|
||
|
|
(Value==AF_INET)? "IPv4" : "IPv6");
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
|
||
|
|
*Family = Value;
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
|
||
|
|
int __cdecl
|
||
|
|
main(int argc, char **argv)
|
||
|
|
{
|
||
|
|
SOCKADDR_STORAGE address, replyAddress;
|
||
|
|
socklen_t addressLen, replyAddressLen;
|
||
|
|
USHORT RcvSize;
|
||
|
|
BOOL result;
|
||
|
|
DWORD numberOfReplies;
|
||
|
|
DWORD status;
|
||
|
|
PICMP_ECHO_REPLY reply4;
|
||
|
|
PICMPV6_ECHO_REPLY reply6;
|
||
|
|
char hostname[NI_MAXHOST], literal[INET6_ADDRSTRLEN];
|
||
|
|
char *arg;
|
||
|
|
int i;
|
||
|
|
ULONG maximumHops = DEFAULT_MAXIMUM_HOPS;
|
||
|
|
BOOLEAN computeStats = FALSE;
|
||
|
|
IP_OPTION_INFORMATION options;
|
||
|
|
char optionsData[MAX_OPT_SIZE];
|
||
|
|
char *optionPtr;
|
||
|
|
BYTE currentIndex;
|
||
|
|
IPAddr tempAddr;
|
||
|
|
BYTE j;
|
||
|
|
BYTE SRIndex = 0;
|
||
|
|
BOOLEAN foundAddress = FALSE;
|
||
|
|
BOOLEAN haveReply;
|
||
|
|
int numRetries = DEFAULT_MAX_RETRIES;
|
||
|
|
ULONG intvl = MIN_INTERVAL;
|
||
|
|
DWORD Family = AF_UNSPEC;
|
||
|
|
|
||
|
|
if (WSAStartup( 0x0101, &WsaData)) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_WSASTARTUP_FAILED, GetLastError());
|
||
|
|
return(1);
|
||
|
|
}
|
||
|
|
|
||
|
|
options.Ttl = 1;
|
||
|
|
options.Tos = DEFAULT_TOS;
|
||
|
|
options.Flags = DEFAULT_FLAGS;
|
||
|
|
options.OptionsSize = 0;
|
||
|
|
options.OptionsData = optionsData;
|
||
|
|
|
||
|
|
if (argc < 2) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_USAGE, argv[0] );
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// process command line
|
||
|
|
//
|
||
|
|
for (i=1; i < argc; i++) {
|
||
|
|
arg = argv[i];
|
||
|
|
|
||
|
|
if ((arg[0] == '-') || (arg[0] == '/')) {
|
||
|
|
switch(arg[1]) {
|
||
|
|
case '?':
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_USAGE, argv[0]);
|
||
|
|
goto error_exit;
|
||
|
|
|
||
|
|
case '4':
|
||
|
|
if (!SetFamily(&Family, AF_INET, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case '6':
|
||
|
|
if (!SetFamily(&Family, AF_INET6, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'g': // Loose source routing
|
||
|
|
|
||
|
|
// Only implemented for IPv4 so far
|
||
|
|
if (!SetFamily(&Family, AF_INET, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
currentIndex = options.OptionsSize;
|
||
|
|
|
||
|
|
if ((currentIndex + 7) > MAX_OPT_SIZE) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_TOO_MANY_OPTIONS);
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
optionPtr = options.OptionsData;
|
||
|
|
optionPtr[currentIndex] = (char) IP_OPT_LSRR;
|
||
|
|
optionPtr[currentIndex+1] = 3;
|
||
|
|
optionPtr[currentIndex + 2] = 4; // Set initial pointer value
|
||
|
|
options.OptionsSize += 3;
|
||
|
|
|
||
|
|
while ( (i < (argc - 2)) && (*argv[i+1] != '-')) {
|
||
|
|
if ((currentIndex + 7) > MAX_OPT_SIZE) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_TOO_MANY_OPTIONS);
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
arg = argv[++i];
|
||
|
|
tempAddr = inet_addr(arg);
|
||
|
|
|
||
|
|
if (tempAddr == INADDR_NONE) {
|
||
|
|
NlsPutMsg(
|
||
|
|
STDOUT,
|
||
|
|
PATHPING_BAD_ROUTE_ADDRESS,
|
||
|
|
arg
|
||
|
|
);
|
||
|
|
// printf("Bad route specified for loose source route");
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
j = optionPtr[currentIndex+1];
|
||
|
|
*(ULONG UNALIGNED *)&optionPtr[j+currentIndex] = tempAddr;
|
||
|
|
optionPtr[currentIndex+1] += 4;
|
||
|
|
options.OptionsSize += 4;
|
||
|
|
}
|
||
|
|
|
||
|
|
SRIndex = optionPtr[currentIndex+1] + currentIndex;
|
||
|
|
optionPtr[currentIndex+1] += 4; // Save space for dest. addr
|
||
|
|
options.OptionsSize += 4;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'h':
|
||
|
|
if (!param(&maximumHops, argv, argc, i, 1, 255)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
i++;
|
||
|
|
break;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
case 'i':
|
||
|
|
{
|
||
|
|
unsigned char tmphostname[NI_MAXHOST];
|
||
|
|
|
||
|
|
arg = argv[++i];
|
||
|
|
if (ResolveTarget(Family,
|
||
|
|
arg,
|
||
|
|
&g_ssMyAddr,
|
||
|
|
&g_slMyAddrLen,
|
||
|
|
tmphostname,
|
||
|
|
sizeof(tmphostname),
|
||
|
|
FALSE)) {
|
||
|
|
g_bSetAddr = TRUE;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'n':
|
||
|
|
g_bDoReverseLookup = FALSE;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'p':
|
||
|
|
if (!param(&g_ulInterval, argv, argc, i, 1, 0xffffffff)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
i++;
|
||
|
|
break;
|
||
|
|
|
||
|
|
|
||
|
|
case 'q':
|
||
|
|
if (!param(&g_ulNumQueries, argv, argc, i, 1, 255)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
i++;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'R':
|
||
|
|
// Only implemented for IPv4 so far
|
||
|
|
if (!SetFamily(&Family, AF_INET, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
g_bDoRSVP = TRUE;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'P':
|
||
|
|
// Only implemented for IPv4 so far
|
||
|
|
if (!SetFamily(&Family, AF_INET, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
g_bDoRSVPDiag = TRUE;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'T':
|
||
|
|
// Only implemented for IPv4 so far
|
||
|
|
if (!SetFamily(&Family, AF_INET, arg)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
g_bDo8021P = TRUE;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'w':
|
||
|
|
if (!param(&g_ulTimeout, argv, argc, i, 1, 0xffffffff)) {
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
i++;
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_INVALID_SWITCH, argv[i]);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_USAGE);
|
||
|
|
goto error_exit;
|
||
|
|
break;
|
||
|
|
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
foundAddress = TRUE;
|
||
|
|
if ( !ResolveTarget(Family,
|
||
|
|
argv[i],
|
||
|
|
&address,
|
||
|
|
&addressLen,
|
||
|
|
hostname,
|
||
|
|
sizeof(hostname),
|
||
|
|
g_bDoReverseLookup) )
|
||
|
|
{
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_1, argv[i] );
|
||
|
|
// printf( "Unable to resolve target name %s.\n", argv[i]);
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (!foundAddress) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_NO_ADDRESS);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_USAGE);
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (SRIndex != 0) {
|
||
|
|
*(ULONG UNALIGNED *)&options.OptionsData[SRIndex] = ((LPSOCKADDR_IN)&address)->sin_addr.s_addr;
|
||
|
|
}
|
||
|
|
|
||
|
|
Family = address.ss_family;
|
||
|
|
if (Family == AF_INET) {
|
||
|
|
g_hIcmp = IcmpCreateFile();
|
||
|
|
} else {
|
||
|
|
g_hIcmp = Icmp6CreateFile();
|
||
|
|
}
|
||
|
|
|
||
|
|
if (g_hIcmp == INVALID_HANDLE_VALUE) {
|
||
|
|
status = GetLastError();
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_2, status );
|
||
|
|
// printf( "Unable to contact IP driver. Error code %d.\n", status);
|
||
|
|
goto error_exit;
|
||
|
|
}
|
||
|
|
|
||
|
|
getnameinfo((LPSOCKADDR)&address, addressLen, literal, sizeof(literal),
|
||
|
|
NULL, 0, NI_NUMERICHOST);
|
||
|
|
|
||
|
|
if (hostname[0]) {
|
||
|
|
NlsPutMsg(
|
||
|
|
STDOUT,
|
||
|
|
PATHPING_HEADER1,
|
||
|
|
hostname,
|
||
|
|
literal,
|
||
|
|
maximumHops
|
||
|
|
);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
NlsPutMsg(
|
||
|
|
STDOUT,
|
||
|
|
PATHPING_HEADER2,
|
||
|
|
literal,
|
||
|
|
maximumHops
|
||
|
|
);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Get local IP address
|
||
|
|
if (!g_bSetAddr)
|
||
|
|
{
|
||
|
|
SOCKET s = socket(address.ss_family, SOCK_RAW, 0);
|
||
|
|
DWORD BytesReturned;
|
||
|
|
|
||
|
|
WSAIoctl(s, SIO_ROUTING_INTERFACE_QUERY,
|
||
|
|
&address, sizeof address,
|
||
|
|
&g_ssMyAddr, sizeof g_ssMyAddr,
|
||
|
|
&BytesReturned, NULL, NULL);
|
||
|
|
g_slMyAddrLen = BytesReturned;
|
||
|
|
|
||
|
|
closesocket(s);
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_4, 0);
|
||
|
|
print_addr((LPSOCKADDR)&g_ssMyAddr, g_slMyAddrLen,
|
||
|
|
g_bDoReverseLookup);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
}
|
||
|
|
|
||
|
|
// First we need to find out the path, so we
|
||
|
|
//
|
||
|
|
while((options.Ttl <= maximumHops) && (options.Ttl != 0)) {
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_4, (UINT)options.Ttl );
|
||
|
|
// printf("[%3lu] ", (UINT)SendOpts.Ttl);
|
||
|
|
|
||
|
|
haveReply = FALSE;
|
||
|
|
|
||
|
|
for (i=0; i<numRetries; i++) {
|
||
|
|
|
||
|
|
if (Family == AF_INET) {
|
||
|
|
numberOfReplies = IcmpSendEcho2( g_hIcmp,
|
||
|
|
0,
|
||
|
|
NULL,
|
||
|
|
NULL,
|
||
|
|
((LPSOCKADDR_IN)&address)->sin_addr.s_addr,
|
||
|
|
SendBuffer,
|
||
|
|
DEFAULT_SEND_SIZE,
|
||
|
|
&options,
|
||
|
|
RcvBuffer,
|
||
|
|
DEFAULT_RECEIVE_SIZE,
|
||
|
|
g_ulTimeout );
|
||
|
|
|
||
|
|
if (numberOfReplies == 0) {
|
||
|
|
status = GetLastError();
|
||
|
|
reply4 = NULL;
|
||
|
|
} else {
|
||
|
|
reply4 = (PICMP_ECHO_REPLY) RcvBuffer;
|
||
|
|
status = reply4->Status;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_SUCCESS) {
|
||
|
|
print_ip_addr(
|
||
|
|
reply4->Address,
|
||
|
|
g_bDoReverseLookup
|
||
|
|
);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
|
||
|
|
ZeroMemory(&hop[options.Ttl], sizeof(HOP));
|
||
|
|
hop[options.Ttl].sinAddr.sin_family = AF_INET;
|
||
|
|
hop[options.Ttl].sinAddr.sin_addr.s_addr = reply4->Address;
|
||
|
|
goto loop_end;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_TTL_EXPIRED_TRANSIT) {
|
||
|
|
ZeroMemory(&hop[options.Ttl], sizeof(HOP));
|
||
|
|
hop[options.Ttl].sinAddr.sin_family = AF_INET;
|
||
|
|
hop[options.Ttl].sinAddr.sin_addr.s_addr = reply4->Address;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_REQ_TIMED_OUT) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_NO_REPLY_TIME);
|
||
|
|
// printf(".");
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status < IP_STATUS_BASE) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_7, status );
|
||
|
|
// printf("Transmit error: code %lu\n", status);
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// Fatal error.
|
||
|
|
//
|
||
|
|
if (reply4 != NULL) {
|
||
|
|
print_ip_addr(
|
||
|
|
reply4->Address,
|
||
|
|
g_bDoReverseLookup
|
||
|
|
);
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_6 );
|
||
|
|
// printf(" reports: ");
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
numberOfReplies = Icmp6SendEcho2(g_hIcmp,
|
||
|
|
0,
|
||
|
|
NULL,
|
||
|
|
NULL,
|
||
|
|
(LPSOCKADDR_IN6)&g_ssMyAddr,
|
||
|
|
(LPSOCKADDR_IN6)&address,
|
||
|
|
SendBuffer,
|
||
|
|
DEFAULT_SEND_SIZE,
|
||
|
|
&options,
|
||
|
|
RcvBuffer,
|
||
|
|
DEFAULT_RECEIVE_SIZE,
|
||
|
|
g_ulTimeout );
|
||
|
|
|
||
|
|
if (numberOfReplies == 0) {
|
||
|
|
status = GetLastError();
|
||
|
|
reply6 = NULL;
|
||
|
|
} else {
|
||
|
|
reply6 = (PICMPV6_ECHO_REPLY) RcvBuffer;
|
||
|
|
status = reply6->Status;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_SUCCESS) {
|
||
|
|
print_ipv6_addr(
|
||
|
|
reply6->Address.sin6_addr,
|
||
|
|
g_bDoReverseLookup
|
||
|
|
);
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
|
||
|
|
ZeroMemory(&hop[options.Ttl], sizeof(HOP));
|
||
|
|
|
||
|
|
hop[options.Ttl].sin6Addr.sin6_family = AF_INET6;
|
||
|
|
memcpy(&hop[options.Ttl].sin6Addr.sin6_addr.s6_words,
|
||
|
|
reply6->Address.sin6_addr,
|
||
|
|
sizeof(reply6->Address.sin6_addr));
|
||
|
|
hop[options.Ttl].sin6Addr.sin6_scope_id = reply6->Address.sin6_scope_id;
|
||
|
|
goto loop_end;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_TTL_EXPIRED_TRANSIT) {
|
||
|
|
ZeroMemory(&hop[options.Ttl], sizeof(HOP));
|
||
|
|
hop[options.Ttl].sin6Addr.sin6_family = AF_INET6;
|
||
|
|
memcpy(&hop[options.Ttl].sin6Addr.sin6_addr.s6_words,
|
||
|
|
reply6->Address.sin6_addr,
|
||
|
|
sizeof(reply6->Address.sin6_addr));
|
||
|
|
hop[options.Ttl].sin6Addr.sin6_scope_id = reply6->Address.sin6_scope_id;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status == IP_REQ_TIMED_OUT) {
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_NO_REPLY_TIME);
|
||
|
|
// printf(".");
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (status < IP_STATUS_BASE) {
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_7, status );
|
||
|
|
// printf("Transmit error: code %lu\n", status);
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// Fatal error.
|
||
|
|
//
|
||
|
|
if (reply6 != NULL) {
|
||
|
|
print_ipv6_addr(
|
||
|
|
reply6->Address.sin6_addr,
|
||
|
|
g_bDoReverseLookup
|
||
|
|
);
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_6 );
|
||
|
|
// printf(" reports: ");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
for (i = 0;
|
||
|
|
( ErrorTable[i].Error != status &&
|
||
|
|
ErrorTable[i].Error != IP_GENERAL_FAILURE
|
||
|
|
);
|
||
|
|
i++
|
||
|
|
);
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, ErrorTable[i].ErrorNlsID );
|
||
|
|
// printf("%s.\n", ErrorTable[i].ErrorString);
|
||
|
|
|
||
|
|
goto loop_end;
|
||
|
|
}
|
||
|
|
if (i==numRetries)
|
||
|
|
break;
|
||
|
|
|
||
|
|
print_addr(&hop[options.Ttl].saAddr,
|
||
|
|
g_slMyAddrLen,
|
||
|
|
g_bDoReverseLookup );
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_CR);
|
||
|
|
|
||
|
|
options.Ttl++;
|
||
|
|
}
|
||
|
|
|
||
|
|
loop_end:
|
||
|
|
|
||
|
|
if(g_bDo8021P)
|
||
|
|
{
|
||
|
|
QoSCheck8021P(((LPSOCKADDR_IN)&address)->sin_addr.s_addr, (ULONG)options.Ttl);
|
||
|
|
}
|
||
|
|
|
||
|
|
if(g_bDoRSVP)
|
||
|
|
{
|
||
|
|
QoSCheckRSVP(1, (ULONG)options.Ttl);
|
||
|
|
}
|
||
|
|
|
||
|
|
if(g_bDoRSVPDiag)
|
||
|
|
{
|
||
|
|
QoSDiagRSVP(1, (ULONG)options.Ttl, TRUE);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
NlsPutMsg(STDOUT, PATHPING_COMPUTING, options.Ttl * g_ulInterval * g_ulNumQueries / 1000);
|
||
|
|
|
||
|
|
// Okay, now that we have the path, we want to go back and
|
||
|
|
// compute statistics over numQueries queries sent every intvl
|
||
|
|
// seconds.
|
||
|
|
|
||
|
|
ComputeStatistics(&options);
|
||
|
|
|
||
|
|
PrintResults((ULONG)options.Ttl);
|
||
|
|
|
||
|
|
NlsPutMsg( STDOUT, PATHPING_MESSAGE_8 );
|
||
|
|
// printf("\nTrace complete.\n");
|
||
|
|
|
||
|
|
IcmpCloseHandle(g_hIcmp);
|
||
|
|
|
||
|
|
WSACleanup();
|
||
|
|
return(0);
|
||
|
|
|
||
|
|
error_exit:
|
||
|
|
|
||
|
|
WSACleanup();
|
||
|
|
return(1);
|
||
|
|
}
|
||
|
|
|