;#################################
; 
;    Detector de UDP Floods
;       By [SaRRiO] 2000
;      sarrio@univers.org
;   http://sarrio.univers.org
;
;#################################


; para configurarlo ve a menubar/udpflood

on 1:UDPREAD:udpflood*:{
  if (%udpflood.proteccion == off) {
    if ($sock($sockname,1).saddr == %udpflood.ip) {
      inc %udpflood.total 1
      if (%udpflood.total == 10) {
        echo -s 4[-UDP FLOOD-] 1Detectado de12 %udpflood.ip 1por el puerto12 %udpflood.p
        unset %udpflood.p %udpflood.ip %udpflood.total    
        set %udpflood.proteccion capullo
        .timer 1 120 /set %udpflood.proteccion off
      }
    }
    else {
      set %udpflood.ip $sock($sockname,1).saddr
      set %udpflood.p $sock($sockname,1).port
      set %udpflood.total 0
    }
  }
}

menu menubar {
  ufpflood
  .autostart( $+ $group(#udpflood) $+  ):{
    if ($group(#udpflood) == on) .disable #udpflood | else .enable #udpflood
  }
  .-
  .puerto( $+  %udpflood $+  ):{
    set %udpflood $$?="Puerto a mantener a la escucha para detectar udp floods? (Recomendado el 7 y el 31337)"
  }  
  .-
  .$iif($sock(udpflood).status == active , des) $+ activar:{
    if ($sock(udpflood).status == active) sockclose udpflood
    else  .sockudp -k udpflood %udpflood
  }
}

#udpflood off
on 1:START: sockudp -k udpflood %udflood
#udpflood end

on 1:START:{ unset %udpflood.p %udpflood.ip %udpflood.total | set %udpflood.proteccion off 
  if (%udpflood == $null) || (%udpflood !isnum) set %udpflood 31337
}

on 1:LOAD: set %udpflood.proteccion off | set %udpflood 31337

 Volver a la página principal