写了一个垃圾邮件过滤程序（PHP）

xggabc

如下：

1. 
   
2. <?
   
3.      $QMAILDUID='id -u qmaild';
   
4.      $NOFILESGID='id -g qmaild';
   
5. 
   
6.      if(!file_exists("/home/vpopmail/etc/tcp.smtp.cdb"))
   
7.      {
   
8.          echo "file not exist<br>";
   
9.          exit();
   
10.      }
    
11.      else
    
12.      {
    
13.          $result=exec("/usr/local/bin/softlimit -m 2000000 \
    
14.          /usr/local/bin/tcpserver -v -p -x /home/vpopmail/etc/tcp.smtp.cdb -c 5 \
    
15.          -u $QMAILDUID -g $NOFILESGID 0 smtp /var/qmail/bin/rblsmtpd \
    
16.          /var/qmail/bin/qmail-smtpd 2>&1");
    
17.          echo "result: $result<br>";
    
18.      }
    
19. 
    
20.      $file=fopen("/var/qmail/control/badmailfrom","r");
    
21.      if($file)
    
22.      {
    
23.         $IPtext=file("/var/qmail/control/badmailfrom");
    
24.         for($i=0;$i<count(IPtext);$i++)
    
25.         {
    
26.            //echo ("<p>$IPtext[$i]</p>");
    
27.            $rblresult=exec("/var/qmail/bin/rblsmtpd $IPtext[$i]");
    
28.            echo "filter result: $rblresult<br>");
    
29.            $rbladd=exec("/var/qmail/bin/rblsmtpd -r relays.orbs.org -r rbl.maps.vix.com");
    
30.            echo "add result: $rbladd<br>");
    
31.         }
    
32.         //$respond="no this mailbox";
    
33.         //passthru("/home/vpopmail/bin/vdelivermail '' bounce-no-mailbox");
    
34. 
    
35.      }
    
36.      else
    
37.         echo "open file fail<br>";
    
38. 
    
39.      fclose($file);
    
40. ?>
    

复制代码

麻烦提供一个意见，说明错处，让我修改。我感觉垃圾邮件过滤程序无法确定是对还是错，所以贴出来。
谢谢！