【正文】 (con.) ? 修改 POP3配置信息 [rootspark root] cd /etc/ [rootspark ] cp ipop3 [rootspark ] vim ipop3 將原有配置： service pop3 { disable = yes flags = REUSE socket_type = stream wait = no user = root server = /usr/sbin/ipop3d log_on_failure += HOST } 修改為： service pop3 { disable = no flags = REUSE socket_type = stream wait = no user = root server = /root/DNS/ log_on_failure += HOST } 警示服務(wù)器上針對 POP3協(xié)議的警示方案 () ?重新啟動 xid服務(wù) /etc/基于端口轉(zhuǎn)發(fā)方式的系統(tǒng)結(jié)構(gòu)示意圖 基于端口轉(zhuǎn)發(fā)方式的系統(tǒng)實施方案 ? 檢測服務(wù)器 – 配置在邊界路由器上，根據(jù)蠕蟲特征紀(jì)錄染毒計算機 IP地址； ? 端口轉(zhuǎn)發(fā)服務(wù)器 – 獲取染毒計算機 IP地址列表； – 過濾染毒計算機 IP地址產(chǎn)生的 DNS請求； – 將正常 DNS請求轉(zhuǎn)向 DNS服務(wù)器； – 向染毒計算機返回警示服務(wù)器 IP地址； ? DNS服務(wù)器 – 響應(yīng)正常 DNS請求； ? 警示服務(wù)器 – 建立針對 HTTP協(xié)議的 Web警示頁面； – 建立針對 Tel協(xié)議的警示信息； – 建立針對 SMTP協(xié)議的警示信息； – 建立針對 POP3協(xié)議的警示郵件； 配置端口轉(zhuǎn)發(fā)服務(wù)器 (con.) ?確定原 DNS服務(wù)程序的新位置； – 在本機另一端口； – 在另一 IP地址； ?確定檢測服務(wù)器 IP地址； – 獲取染毒計算機 IP地址列表； ?確定警示服務(wù)器 IP地址； – 作為偽造的 DNS請求響應(yīng)報文返回內(nèi)容； ?在原 DNS服務(wù)程序端口運行端口轉(zhuǎn)發(fā)服務(wù)程序； 配置端口轉(zhuǎn)發(fā)服務(wù)器 () ?Perl語言實現(xiàn)腳本： !/usr/bin/perl w DNS isolation concept samples. Program Name: Funciton Desription: Listening on a port(53), as a DNS server, response normal DNS query. If client in black list, a fake response packet given. By . use strict。 my $paddr = sockaddr_in($port,INADDR_ANY)。 my unpackdata。 same request! $fakeip=85800001000100010001037777770563636572740365647502636e0000010001c00c00010001000151800004ca703909c0100002022100015180000603646e73c010c03e00010001000151800004ca703906。 } sub InFile { my $ip = shift。 ||B ( k )||||I ( t )B ( k )||1E ( k )N1kt??????清華校園網(wǎng)實施效果（ 5） ? DNS方案效果： 3~4天， 80