利用操作系统提供的API编写防火墙

天云上人

作者： zzwinner ，如转载请保证本文档的完整性，并注明出处。
欢迎光临 C++ Builder 研究，http://www.ccrun.com/doc/go.asp?id=593
3 F% o& T) b7 F0 {. s- c  c4 r( C: s5 D/*
" m. X+ J! g, a7 j1 r1 w3 o- L利用操作系统提供的API编写防火墙.
; i! s& D6 @1 {# h该程序涉及到的API说明请访问微软的MSDN Library
代码在C++ Builder 5编译通过
如果您想和我交流请email:zzwinner@163.com
*/
#pragma hdrstop
7 B! C1 Z0 n" o5 ^% V: Q#include "windows.h"
#include "Fltdefs.h"
// 需要加载"iphlpapi.lib"
+ ~7 t' n/ M: t6 U& \/ h//---------------------------------------------------------------------------

# u) P; s$ Q! X" y#pragma argsused
int main(int argc, char* argv[])
{
    // 一个创建网络包过滤接口
' ?% z* E( N5 `4 b. [. w- ]    INTERFACE_HANDLE hInterface;
    PfCreateInterface(0,
: L  S2 D( K9 m9 X* f3 W. P; y                     PF_ACTION_DROP,//PF_ACTION_FORWARD,
6 O/ K# P' M. B# c                     PF_ACTION_DROP,//PF_ACTION_FORWARD,
                     FALSE,
0 y& J% c: u3 K0 |                     TRUE,
                     &hInterface);
6 p9 J2 t+ v2 P. s/ {" K) {6 i% ]2 [( g
/ j7 [4 R0 l2 C+ O    // 绑定需要网络包过滤的IP地址
4 U6 Y1 K1 y# b! ~    BYTE localIp[] = {192,168,0,2};
) \8 b" N7 G4 R! \7 U    PfBindInterfaceToIPAddress(hInterface, PF_IPV4, localIp);
. A4 q; o4 v( s) G    // 现在我们开始过滤HTTP协议的的接口
9 {4 k, N* Z2 Z' g    FILTER_HANDLE fHandle;
    // 填充过滤包的规则结构
: A) q2 ^% [' }, f5 D* z9 H    PF_FILTER_DESCRIPTOR inFilter;
    inFilter.dwFilterFlags = FD_FLAGS_NOSYN; //一直添这个值
    inFilter.dwRule = 0; //一直添这个值
    inFilter.pfatType = PF_IPV4; //用 ipV4 地址
9 |+ |) T8 f9 S$ ?5 o; N5 q3 x: Z    inFilter.SrcAddr = localIp; //设置本地IP地址
    inFilter.SrcMask = "\xff\xff\xff\xff"; //设置本地子网掩码
& J( ?; ^  x! Z2 _* {    inFilter.wSrcPort = FILTER_TCPUDP_PORT_ANY; //任意来源端口
    inFilter.wSrcPortHighRange = FILTER_TCPUDP_PORT_ANY;
) o2 k) Z0 ]! T+ X" j    inFilter.DstAddr = 0; //任意目标地址
    inFilter.DstMask = 0;
    inFilter.wDstPort = 80; //目标端口 80(http 服务)
. m: Y$ a7 R1 d& P  v% G* f0 c* Z    inFilter.wDstPortHighRange = 80;
    inFilter.dwProtocol = FILTER_PROTO_TCP; // 过滤的协议
9 G  E7 L( j  ^- _    // 加入一个过滤接口
    PfAddFiltersToInterface(hInterface, 1, &inFilter, 0, NULL, &fHandle);
    // 请在这设置一个调试断点,然后看看你的IE是否不能访问WEB页. :)
    // 移除过滤接口
  y2 M% d2 o6 B; {. e" P    PfRemoveFilterHandles(hInterface, 1, &fHandle);
. x% [" `+ H* u7 N" E    PfUnBindInterface(hInterface);
/ O+ b1 q4 ^6 ]- S! j    PfDeleteInterface(hInterface);
    return 0;
}