监听指定的端口并且截获所有从这个端口传输的数据保存为txt文本文件。

Keng 2002-06-04 06:17:24
监听网络端口传输的所有信息并且保存为文本文件。。谢谢。。最好代码简单易懂。
...全文
411 23 打赏 收藏 转发到动态 举报
写回复
用AI写文章
23 条回复
切换为时间正序
请发表友善的回复…
发表回复
sncel 2002-11-27
  • 打赏
  • 举报
回复
都等了一晚上怎么还没有给呀,我可等你的分上星的。
sncel 2002-11-26
  • 打赏
  • 举报
回复
//.....................................................
char * CheckProtocol(int iProtocol)
{
for(int i=0; i<MAX_PROTO_NUM; i++)
if(ProtoMap[i].ProtoNum==iProtocol)
return ProtoMap[i].ProtoText;
return "";
}

//TCP解包程序
int DecodeTcpPack(char * TcpBuf, int iBufSize)
{
TCP_HEADER * pTcpHeader;
int i;
int iSourcePort,iDestPort;

pTcpHeader = (TCP_HEADER * )TcpBuf;
//计算TCP首部长度
int TcpHeaderLen = pTcpHeader->th_lenres>>4;
TcpHeaderLen *= sizeof(unsigned long);
char * TcpData=TcpBuf+TcpHeaderLen;
//如果过滤敏感字符串则判断是否包含
if (strSensitive)
if ((strstr(TcpData, strSensitive))==NULL) return true;
//对端口进行过滤
iSourcePort = ntohs(pTcpHeader->th_sport);
iDestPort = ntohs(pTcpHeader->th_dport);
if ((iPortFilter) && (iSourcePort!=iPortFilter) && (iDestPort!=iPortFilter))
return true;
//输出
/*
printf("%s ", szProtocol);
printf("%15s:%5d ->%15s:%5d ", szSourceIP, iSourcePort, szDestIP, iDestPort);
printf("TTL=%3d ", iTTL);
*/
Form1->Memo1->Lines->Add(AnsiString(szProtocol)+" "+AnsiString(szSourceIP)+": "+(iSourcePort)+"-->"+AnsiString(szDestIP)+": "+AnsiString(iDestPort)+" TTL="+AnsiString(iTTL)+" bytes="+AnsiString(iBufSize));
//判断TCP标志位
unsigned char FlagMask = 1;
for( i=0; i<6; i++ )
{
// if((pTcpHeader->th_flag) & FlagMask) printf("%c",TcpFlag[i]);
// else printf("-");
// Form1->Memo1->Lines->Add(AnsiString(TcpFlag[i]));
// Form1->Memo1->Lines->Add("-");
FlagMask=FlagMask<<1;
}
// printf(" bytes=%4d", iBufSize);
// Form1->Memo1->Lines->Add(IntToStr(iBufSize));
// printf("\n");
Form1->Memo1->Lines->Add(" ");
//对于长度大于40字节的包进行数据分析(IP_HEADER+TCP_HEADER=40)
if ((ParamDecode) && (iBufSize>40))
{
//分析TCP数据段
if ((!strSensitive) || (strstr(TcpData,strSensitive)))
{
/*
printf(" [DATA]\n");
printf("%s",TcpData);
printf("\n [DATA END]\n\n\n");
*/
Form1->Memo1->Lines->Add(" tcp [DATA]");
Form1->Memo1->Lines->Add(AnsiString(TcpData));
Form1->Memo1->Lines->Add("tcp [DATA END]");
}
}
return true;
}

//UDP解包程序
int DecodeUdpPack(char * UdpBuf, int iBufSize)
{
UDP_HEADER *pUdpHeader;
pUdpHeader = (UDP_HEADER * )UdpBuf;
int iSourcePort = ntohs(pUdpHeader->uh_sport);
int iDestPort = ntohs(pUdpHeader->uh_dport);
//对端口进行过滤
if(iPortFilter)
if ((iSourcePort!=iPortFilter) && (iDestPort!=iPortFilter)) return true;
/*
printf("%s ", szProtocol);
printf("%15s:%5d ->%15s:%5d ", szSourceIP, iSourcePort, szDestIP, iDestPort);
printf("TTL=%3d ", iTTL);
printf("Len=%4d ", ntohs(pUdpHeader->uh_len));
printf("bytes=%4d", iBufSize);
printf("\n");
*/
Form1->Memo1->Lines->Add(AnsiString(szProtocol)+" "+AnsiString(szSourceIP)+": "+AnsiString(iSourcePort)+"-->"+AnsiString(szDestIP)+": "+AnsiString(iDestPort)+" TTL="+AnsiString(iTTL)+" Len="+AnsiString(ntohs(pUdpHeader->uh_len))+" bytes="+AnsiString(iBufSize));
//对于长度大于28字节的包进行数据分析(IP_HEADER+UDP_HEADER>28)
if ((ParamDecode) && (iBufSize>28))
{
// printf(" [DATA]\n");
Form1->Memo1->Lines->Add("udp data ");
//UDP首部长度为8
char * UdpData=UdpBuf+8;
//分析UDP数据段
for(unsigned int i=0;i<(iBufSize-sizeof(UDP_HEADER));i++)
{
// if (!(i%8)) printf("\n");
if (!(i%8)) Form1->Memo1->Lines->Add(" ");
if ( (UdpData[i]>33) && (UdpData[i]<122) )
// printf("%3c [%3x]", UdpData[i], UdpData[i]);
Form1->Memo1->Lines->Add(AnsiString(UdpData[i])+" "+AnsiString(UdpData[i]));
// else printf(" [%3x]", abs(UdpData[i]));
else
Form1->Memo1->Lines->Add( AnsiString(abs(UdpData[i])));
}
// printf("\n [DATA END]\n\n\n");
Form1->Memo1->Lines->Add("udp data end");
}
return true;
}

//ICMP解包程序
int DecodeIcmpPack(char * IcmpBuf, int iBufSize)
{
ICMP_HEADER * pIcmpHeader;
pIcmpHeader = (ICMP_HEADER * )IcmpBuf;
int iIcmpType = pIcmpHeader->i_type;
int iIcmpCode = pIcmpHeader->i_code;
//对类型进行过滤
/*
if ((iPortFilter) && (iIcmpType!=iPortFilter)) return true;
printf("%s ", szProtocol);
//printf("%15s Type%d ->%15s Code%d ", szSourceIP, iIcmpType, szDestIP, iIcmpCode);
printf("%15s ->%15s ", szSourceIP, szDestIP);
printf("TTL=%3d ", iTTL);
printf("Type%2d,%d ",iIcmpType,iIcmpCode);
printf("bytes=%4d", iBufSize);
*/
if ((iPortFilter) && (iIcmpType!=iPortFilter)) return true;


Form1->Memo1->Lines->Add(AnsiString(szProtocol)+" "+AnsiString(szSourceIP)+"--->"+AnsiString(szDestIP)+" TTL="+AnsiString(iTTL)+" Type "+AnsiString(iIcmpCode)+","+AnsiString(iIcmpCode)+" bytes="+AnsiString(iBufSize));

// printf("\n");
Form1->Memo1->Lines->Add("");
//对于包含数据段的包进行数据分析
if ((ParamDecode) && (iBufSize>28))
{
char * IcmpData=IcmpBuf+4;
//分析ICMP数据段
// printf(" [DATA]");
Form1->Memo1->Lines->Add(" icmp data");
for(unsigned int i=0;i<(iBufSize-sizeof(ICMP_HEADER));i++)
{
// if (!(i%8)) printf("\n");
if (!(i%8)) Form1->Memo1->Lines->Add("");
if ( (IcmpData[i]>33) && (IcmpData[i]<122) )
// printf("%3c [%3x]", IcmpData[i], IcmpData[i]);
Form1->Memo1->Lines->Add(AnsiString(IcmpData[i])+" "+AnsiString(IcmpData[i]));
// else printf(" [%3x]", abs(IcmpData[i]));
Form1->Memo1->Lines->Add(AnsiString(abs(IcmpData[i])));
}
// printf("\n [DATA END]\n\n\n");
Form1->Memo1->Lines->Add("icmp data end");
}
return true;
}
//................................................................
bool GetCmdLine()
{

ParamTcp=true;
ParamUdp=true;
ParamIcmp=true;
// ParamDecode=true;

/*
{
strFromIpFilter=(char*)malloc(16*sizeof(char));
memset(strFromIpFilter,0,16*sizeof(char));
strcpy(strFromIpFilter,argv[i]+3);
break;
}
case 'd':
case 'D':
{
strDestIpFilter=(char*)malloc(16*sizeof(char));
memset(strDestIpFilter,0,16*sizeof(char));
strcpy(strDestIpFilter,argv[i]+3);
break;
}
case 's':
case 'S':
{
strSensitive=(char*)malloc(255*sizeof(char));
memset(strSensitive,0,255*sizeof(char));
strcpy(strSensitive,argv[i]+3);
break;
}
case 'o':
case 'O':
{
iPortFilter=atoi(argv[i]+3);
break;
}
}
}
printf("\nWill Sniffer");
if(ParamTcp) printf(" TCP");
if(ParamUdp) printf(" UDP");
if(ParamIcmp) printf(" ICMP");
if(strFromIpFilter) printf(" FromIp:%s",strFromIpFilter);
if(strDestIpFilter) printf(" DestIp:%s",strDestIpFilter);
if(ParamDecode) printf(" DECODE ON");
if(strSensitive) printf(" Sensitive String:'%s'",strSensitive);
// printf("\n\tCTRL+C to quit\nStart:\n");
return (!CMD_PARAM_HELP);
*/
}
//...................................................................
void CheckSockError(int iErrorCode, char *pErrorMsg)
{
if(iErrorCode==SOCKET_ERROR)
{
// printf("%s Error:%d\n", pErrorMsg, GetLastError());
Form1->Memo1->Lines->Add("出错了");
closesocket(SockRaw);
exit(0);
}

}
//------------------------------------------------------------------
void usage(void)
{
Form1->Memo1->Lines->Add("请输入参数");
}
sncel 2002-11-26
  • 打赏
  • 举报
回复
//Unit1.cpp
//---------------------------------------------------------------------------
//////////////////////////////////////////////////////////////////////////
// //
// GUNiffer For Win2K by Shotgun //
// //
// Version: 0.30 Beta //
// Released: [2001.4] //
// Author: [Shotgun] //
// Homepage: //
// [http://IT.Xici.Net] //
// [http://www.Patching.Net] //
// //
//////////////////////////////////////////////////////////////////////////
#include <math.h>
#include <stdio.h>
#include <string.h>
#include <Winsock2.h>
#include <mstcpip.h>
// #include <MSTcpIP.h>
#define STATUS_FAILED 0xFFFF //定义异常出错代码
#define MAX_PACK_LEN 65535 //接收的最大IP报文
#define MAX_ADDR_LEN 16 //点分十进制地址的最大长度
#define MAX_PROTO_TEXT_LEN 16 //子协议名称(如"TCP")最大长度
#define MAX_PROTO_NUM 12 //子协议数量
#define MAX_HOSTNAME_LAN 255 //最大主机名长度
#define CMD_PARAM_HELP true

typedef struct _iphdr
{
unsigned char h_lenver; //4位首部长度+4位IP版本号
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地址
}IP_HEADER;

typedef struct _tcphdr //定义TCP首部
{
USHORT th_sport; //16位源端口
USHORT th_dport; //16位目的端口
unsigned int th_seq; //32位序列号
unsigned int th_ack; //32位确认号
unsigned char th_lenres; //4位首部长度/6位保留字
unsigned char th_flag; //6位标志位
USHORT th_win; //16位窗口大小
USHORT th_sum; //16位校验和
USHORT th_urp; //16位紧急数据偏移量
}TCP_HEADER;

typedef struct _udphdr //定义UDP首部
{
unsigned short uh_sport; //16位源端口
unsigned short uh_dport; //16位目的端口
unsigned short uh_len; //16位长度
unsigned short uh_sum; //16位校验和
} UDP_HEADER;

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

typedef struct _protomap //定义子协议映射表
{
int ProtoNum;
char ProtoText[MAX_PROTO_TEXT_LEN];
}PROTOMAP;

PROTOMAP ProtoMap[MAX_PROTO_NUM]={ //为子协议映射表赋值
{ IPPROTO_IP , "IP " },
{ IPPROTO_ICMP , "ICMP" },
{ IPPROTO_IGMP , "IGMP" },
{ IPPROTO_GGP , "GGP " },
{ IPPROTO_TCP , "TCP " },
{ IPPROTO_PUP , "PUP " },
{ IPPROTO_UDP , "UDP " },
{ IPPROTO_IDP , "IDP " },
{ IPPROTO_ND , "NP " },
{ IPPROTO_RAW , "RAW " },
{ IPPROTO_MAX , "MAX " },
{ NULL , "" } };

SOCKET SockRaw;
char TcpFlag[6]={'F','S','R','P','A','U'}; //定义TCP标志位
bool ParamTcp =false; // -t关注TCP 报文
bool ParamUdp =false; // -u关注UDP 报文
bool ParamIcmp =false; // -i关注ICMP报文
bool ParamDecode=false; // -d对协议进行解码
char *strFromIpFilter=NULL; // 源IP地址过滤
char *strDestIpFilter=NULL; // 目的地址过滤
char *strSensitive=NULL; // 敏感字符串
int iPortFilter=0; // 端口过滤
int iProtocol, iTTL;
char szProtocol[MAX_PROTO_TEXT_LEN];
char szSourceIP[MAX_ADDR_LEN], szDestIP[MAX_ADDR_LEN];

int DecodeIpPack(char *, int); //IP解包函数
int DecodeTcpPack(char *, int); //TCP解包函数
int DecodeUdpPack(char *, int); //UDP解包函数
int DecodeIcmpPack(char *, int); //ICMP解包函数
void CheckSockError(int, char*); //出错处理函数
char * CheckProtocol(int); //协议检查
void usage(void); //使用说明
bool GetCmdLine(); //命令行参数处理
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{

int iErrorCode;
char RecvBuf[MAX_PACK_LEN] = {0};
usage();
GetCmdLine();
//初始化SOCKET
WSADATA wsaData;
iErrorCode = WSAStartup(MAKEWORD(2,1),&wsaData);
CheckSockError(iErrorCode, "WSAStartup");
SockRaw = socket(AF_INET , SOCK_RAW , IPPROTO_IP);
CheckSockError(SockRaw, "socket");
//获取本机IP地址
char FAR name[MAX_HOSTNAME_LAN];
iErrorCode = gethostname(name, MAX_HOSTNAME_LAN);
CheckSockError(iErrorCode, "gethostname");
struct hostent FAR * pHostent;
pHostent = (struct hostent * )malloc(sizeof(struct hostent));
pHostent = gethostbyname(name);
SOCKADDR_IN sa;
sa.sin_family = AF_INET;
sa.sin_port = htons(6000);
memcpy(&sa.sin_addr.S_un.S_addr, pHostent->h_addr_list[0], pHostent->h_length);
free(pHostent);
iErrorCode = bind(SockRaw, (PSOCKADDR)&sa, sizeof(sa));
CheckSockError(iErrorCode, "bind");
//设置SOCK_RAW为SIO_RCVALL,以便接收所有的IP包
DWORD dwBufferLen[10] ;
DWORD dwBufferInLen = 1 ;
DWORD dwBytesReturned = 0 ;
iErrorCode=WSAIoctl(SockRaw, SIO_RCVALL,&dwBufferInLen, sizeof(dwBufferInLen),
&dwBufferLen, sizeof(dwBufferLen),&dwBytesReturned , NULL , NULL );
CheckSockError(iErrorCode, "Ioctl");
//侦听IP报文
while(1)
{
memset(RecvBuf, 0, sizeof(RecvBuf));
iErrorCode = recv(SockRaw, RecvBuf, sizeof(RecvBuf), 0);
CheckSockError(iErrorCode, "recv");
iErrorCode = DecodeIpPack(RecvBuf, iErrorCode);
CheckSockError(iErrorCode, "Decode");
}
}
//---------------------------------------------------------------------------
int DecodeIpPack(char *buf, int iBufSize)
{
IP_HEADER *pIpheader;
SOCKADDR_IN saSource, saDest;
pIpheader = (IP_HEADER *)buf;
//协议甄别
iProtocol = pIpheader->proto;
strncpy(szProtocol, CheckProtocol(iProtocol), MAX_PROTO_TEXT_LEN);
if((iProtocol==IPPROTO_TCP) && (!ParamTcp)) return true;
if((iProtocol==IPPROTO_UDP) && (!ParamUdp)) return true;
if((iProtocol==IPPROTO_ICMP) && (!ParamIcmp)) return true;
//源地址
saSource.sin_addr.s_addr = pIpheader->sourceIP;
strncpy(szSourceIP, inet_ntoa(saSource.sin_addr), MAX_ADDR_LEN);
if (strFromIpFilter)
if (strcmp(strFromIpFilter,szSourceIP)) return true;
//目的地址
saDest.sin_addr.s_addr = pIpheader->destIP;
strncpy(szDestIP, inet_ntoa(saDest.sin_addr), MAX_ADDR_LEN);
if (strDestIpFilter)
if (strcmp(strDestIpFilter,szDestIP)) return true;
iTTL = pIpheader->ttl;
//计算IP首部的长度
int iIphLen = sizeof(unsigned long) * (pIpheader->h_lenver & 0xf);
//根据协议类型分别调用相应的函数
switch(iProtocol)
{
case IPPROTO_TCP :DecodeTcpPack(buf+iIphLen, iBufSize);break;
case IPPROTO_UDP :DecodeUdpPack(buf+iIphLen, iBufSize);break;
case IPPROTO_ICMP :DecodeIcmpPack(buf+iIphLen, iBufSize);break;
default :break;
}
//printf("\n");
return true;
}

sncel 2002-11-26
  • 打赏
  • 举报
回复
//Mstcpip.h

// Copyright (C) Microsoft Corporation, 1996-1999
#if _MSC_VER > 1000
#pragma once
#endif

/* Argument structure for SIO_KEEPALIVE_VALS */

struct tcp_keepalive {
u_long onoff;
u_long keepalivetime;
u_long keepaliveinterval;
};

// New WSAIoctl Options

#define SIO_RCVALL _WSAIOW(IOC_VENDOR,1)
#define SIO_RCVALL_MCAST _WSAIOW(IOC_VENDOR,2)
#define SIO_RCVALL_IGMPMCAST _WSAIOW(IOC_VENDOR,3)
#define SIO_KEEPALIVE_VALS _WSAIOW(IOC_VENDOR,4)
#define SIO_ABSORB_RTRALERT _WSAIOW(IOC_VENDOR,5)
#define SIO_UCAST_IF _WSAIOW(IOC_VENDOR,6)
#define SIO_LIMIT_BROADCASTS _WSAIOW(IOC_VENDOR,7)
#define SIO_INDEX_BIND _WSAIOW(IOC_VENDOR,8)
#define SIO_INDEX_MCASTIF _WSAIOW(IOC_VENDOR,9)
#define SIO_INDEX_ADD_MCAST _WSAIOW(IOC_VENDOR,10)
#define SIO_INDEX_DEL_MCAST _WSAIOW(IOC_VENDOR,11)


Keng 2002-11-26
  • 打赏
  • 举报
回复
做毕业设计我最近没时间试了。给分。。谢谢sncel(地狱情人-杨勇)

zbc 2002-11-25
  • 打赏
  • 举报
回复
不知道用套接字行不?
表示关注!
Keng 2002-11-25
  • 打赏
  • 举报
回复
有没有具体的例子呀??
我的Email:sunshinesun_1@163.com
zjp666 2002-06-06
  • 打赏
  • 举报
回复
使用TClientSocket控件便可实现读数据功能
pp616 2002-06-06
  • 打赏
  • 举报
回复
你是要接收所有的数据吗。这个不难啊。
zwqljh 2002-06-06
  • 打赏
  • 举报
回复
发信给我吧! zwqljh@sina.com
zwqljh 2002-06-06
  • 打赏
  • 举报
回复
这个技术很容易实现
zwqljh 2002-06-06
  • 打赏
  • 举报
回复
这要看你想用什么协议,有SOCKET,HTTP,FTP,你想用那个?
我不懂电脑 2002-06-06
  • 打赏
  • 举报
回复
利用隧道技术截获ip数据报,然后解密保存。如果数据没有加密最好了,否则你需要解密知识。
Keng 2002-06-06
  • 打赏
  • 举报
回复
:`````(
我痛苦死了。。难道真的没人知道吗?
Keng 2002-06-05
  • 打赏
  • 举报
回复
wsa socket也叫套接字。。有人会吗?
如果有知道相关资料的朋友也可以贴。。
Keng 2002-06-05
  • 打赏
  • 举报
回复
我知道有WSA可以拦截的。。有人会吗?
gfh21cn 2002-06-05
  • 打赏
  • 举报
回复
用TClientSoket监听
Keng 2002-06-05
  • 打赏
  • 举报
回复
关注
codecb 2002-06-04
  • 打赏
  • 举报
回复
internet编程不会!
关注!
Keng 2002-06-04
  • 打赏
  • 举报
回复
我是指在internet上的!
加载更多回复(3)

13,824

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧