PING,ip ping .c

//
// PingI.c -- Simple ping program using the proprietary
//              Microsoft ICMP API
//
#include "ping.h"

#include <windows.h>
#include <winsock.h>
#include <stdio.h>
#include <string.h>
#include <winbase.h>
#include <istream>
//#include <buffer>

//using namespace std;

typedef struct tagIPINFO
{
    u_char Ttl;                // Time To Live
    u_char Tos;                // Type Of Service
    u_char IPFlags;            // IP flags
    u_char OptSize;            // Size of options data
    u_char FAR *Options;    // Options data buffer
}IPINFO, *PIPINFO;

typedef struct tagICMPECHO
{
    u_long Source;            // Source address
    u_long Status;            // IP status
    u_long RTTime;            // Round trip time in milliseconds
    u_short DataSize;        // Reply data size
    u_short Reserved;        // Unknown
    void FAR *pData;        // Reply data buffer
    IPINFO    ipInfo;            // Reply options
}ICMPECHO, *PICMPECHO;

// ICMP.DLL Export Function Pointers
typedef HANDLE* (*PICMPCREATEFILE)(VOID);
typedef BOOL (*PICMPCLOSEHANDLE)(HANDLE);
typedef DWORD (*PICMPSENDECHO)(HANDLE,DWORD,LPVOID,WORD,PIPINFO,LPVOID,DWORD,DWORD);

//HANDLE (WINAPI *pIcmpCreateFile)(VOID);
PICMPCREATEFILE pIcmpCreateFile;
//BOOL (WINAPI *pIcmpCloseHandle)(HANDLE);
PICMPCLOSEHANDLE pIcmpCloseHandle;
//DWORD (WINAPI *pIcmpSendEcho)(HANDLE,DWORD,LPVOID,WORD,PIPINFO,LPVOID,DWORD,DWORD);
PICMPSENDECHO pIcmpSendEcho;

void ping(char *hostName);

//void main ()
//void main(int argc, char **argv)
//{
//    // Check arguments
//    if (argc != 2)
//    {
//        fprintf(stderr,"/nSyntax: pingi HostNameOrIPAddress/n");
//        return;
//    }
//    //istream in;
//    //buffer buff (&in);
//    ping(argv[0]);

//
void main(int argc, char **argv)
{
    WSADATA wsaData;            // WSADATA
    ICMPECHO icmpEcho;            // ICMP Echo reply buffer
    HINSTANCE  hndlIcmp;            // LoadLibrary() handle to ICMP.DLL
    HANDLE hndlFile;            // Handle for IcmpCreateFile()
    LPHOSTENT pHost;            // Pointer to host entry structure
    struct in_addr iaDest;        // Internet address structure
    DWORD *dwAddress;            // IP Address
    IPINFO ipInfo;                // IP Options structure
    int nRet;                    // General use return code
    DWORD dwRet;                // DWORD return code
    int x;
   
    // Dynamically load the ICMP.DLL
    hndlIcmp = LoadLibrary("ICMP.DLL");
    if (hndlIcmp == NULL)
    {
        fprintf(stderr,"/nCould not load ICMP.DLL/n");
        return;
    }
    // Retrieve ICMP function pointers   
    pIcmpCreateFile = (PICMPCREATEFILE)GetProcAddress((HMODULE)hndlIcmp,"IcmpCreateFile");
    pIcmpCloseHandle = (PICMPCLOSEHANDLE)GetProcAddress((HMODULE)hndlIcmp,"IcmpCloseHandle");
    pIcmpSendEcho = (PICMPSENDECHO)GetProcAddress((HINSTANCE)hndlIcmp,"IcmpSendEcho");
    // Check all the function pointers
    if (pIcmpCreateFile == NULL    || pIcmpCloseHandle == NULL||pIcmpSendEcho == NULL)
    {
        fprintf(stderr,"/nError getting ICMP proc address/n");
        FreeLibrary(hndlIcmp);
        return;
    }

    // Init WinSock
    nRet = WSAStartup(0x0101, &wsaData );
    if (nRet)
    {
        fprintf(stderr,"/nWSAStartup() error: %d/n", nRet);
        WSACleanup();
        FreeLibrary(hndlIcmp);
        return;
    }
    // Check WinSock version
    if (0x0101 != wsaData.wVersion)
    {
        fprintf(stderr,"/nWinSock version 1.1 not supported/n");
        WSACleanup();
        FreeLibrary(hndlIcmp);
        return;
    }

    // Lookup destination
    // Use inet_addr() to determine if we're dealing with a name
    // or an address
    iaDest.s_addr = inet_addr(argv[1]);
    if (iaDest.s_addr == INADDR_NONE)
        pHost = gethostbyname(argv[1]);
    else
        pHost = gethostbyaddr((const char *)&iaDest,
                        sizeof(struct in_addr), AF_INET);
    if (pHost == NULL)
    {
        fprintf(stderr, "/n%s not found/n", argv[1]);
        WSACleanup();
        FreeLibrary(hndlIcmp);
        return;
    }

    // Tell the user what we're doing
    printf("/nPinging %s [%s]", pHost->h_name,
            inet_ntoa((*(LPIN_ADDR)pHost->h_addr_list[0])));

    // Copy the IP address
    dwAddress = (DWORD*)(*pHost->h_addr_list);

    // Get an ICMP echo request handle       
    hndlFile = pIcmpCreateFile();
   
    for (x = 0; x < 4; x++)
    {
        // Set some reasonable default values
        ipInfo.Ttl = 255;
        ipInfo.Tos = 0;
        ipInfo.IPFlags = 0;
        ipInfo.OptSize = 0;
        ipInfo.Options = NULL;
        //icmpEcho.ipInfo.Ttl = 256;
        // Reqest an ICMP echo
        dwRet = pIcmpSendEcho(
            hndlFile,        // Handle from IcmpCreateFile()
            *dwAddress,        // Destination IP address
            NULL,            // Pointer to buffer to send
            0,                // Size of buffer in bytes
            &ipInfo,        // Request options
            &icmpEcho,        // Reply buffer
            sizeof(ICMPECHO),
            5000);            // Time to wait in milliseconds
        // Print the results
        iaDest.s_addr = icmpEcho.Source;
        printf("/nReply from %s  Time=%ldms  TTL=%d",
            inet_ntoa(iaDest),
            icmpEcho.RTTime,
            icmpEcho.ipInfo.Ttl);
        if (icmpEcho.Status)
        {
            printf("/nError: icmpEcho.Status=%ld",
                icmpEcho.Status);
            break;
        }
    }
    printf("/n");
    // Close the echo request file handle
    pIcmpCloseHandle(hndlFile);
    FreeLibrary(hndlIcmp);
    WSACleanup();
}