TrafStat

Файл ./scripts/trafsave.pl

 1     # проверим вносимые записи
 2     if (($pId == $proto{'tcp'}) || ($pId == $proto{'udp'})) {
 3         if (($srcPort && $dstPort) || ($srcPort == $dstPort)) {
 4             # не удается определить клиента в полученном TCP или UDP пакете
 5             $warnMsg = "Can not determine the client: srcIp = " . long2ip($srcIp) . ", srcPort = $srcPort, " .
 6                 "dstIp = " . long2ip($dstIp) . ", dstPort = $dstPort, pId = $protoName";
 7             warning($warnMsg);
 8             next;
 9         }
10     } else {
11         # протоколы отличные от TCP и UDP не поддерживаются
12         #
13         # NOTE: в текущюю структуру таблиц пока не понятно как добовлять
14         #        информацию о протоколах отличных от TCP и UDP. Данный вопрос
15         #        требует дополнительного изучения и дороботки.
16         $warnMsg = "Protocol is not supported: srcIp = " . long2ip($srcIp) . ", srcPort = $srcPort, " .
17             "dstIp = " . long2ip($dstIp) . ", dstPort = $dstPort, pId = $protoName";
18         warning($warnMsg);
19         <---- ЗДЕСЬ ДОЛЖНА БЫТЬ ИНСТРУКЦИЯ 'next' ---->
20     }
21 

После того как обнаружен протокол отличный от TCP или UDP, данная строчка должна пропускаться и выполнятся выборка новой строки для обработки.