Raw Socket（原始套接字）实现Sniffer（嗅探）

Raw Socket（原始套接字）实现Sniffer（嗅探）(7) void __fastcall lsvPacketColumnClick(TObject *Sender, 
TListColumn *Column); 
void __fastcall lsvPacketCompare(TObject *Sender, TListItem *Item1, 
TListItem *Item2, int Data, int &Compare); 
void __fastcall Label1Click(TObject *Sender); 
private: // User declarations 
AnsiString __fastcall GetProtocolTxt(int Protocol); 
public: // User declarations 
SOCKET sock; 
SOCKADDR_IN addr_in; 
IP ip; 
TCP tcp; 
PSUHDR psdHeader; 
char RecvBuf[BUFFER_SIZE]; 
bool bStop; 

int iSortDirection; 
int iColumnToSort; 

__fastcall TMainForm(TComponent* Owner); 
__fastcall ~TMainForm(); 
}; 
//--------------------------------------------------------------------------- 
extern PACKAGE TMainForm *MainForm; 
//--------------------------------------------------------------------------- 
#endif 

偷了个懒, IP, TCP 头及一些宏定义用了 netmon.h 的头, 这个文件在 BCB6 的 include 目录下可以找得到, 其中与本程序相关内容如下: 

//*************************************************************************// 
//* Header File: netmon.h 
//*************************************************************************// 
// 
// IP Packet Structure 
// 
typedef struct _IP 
{ 
union 
{ 
BYTE Version; 
BYTE HdrLen; 
}; 
BYTE ServiceType; 
WORD TotalLen; 
WORD ID; 
union 
{ 
WORD Flags; 
WORD FragOff; 
}; 
BYTE TimeToLive;