ROS 自动修改PCC脚本

用易-小卢

{
:local pppoeclientAllNum
:local pppoeclientRunNum
:local pppoeclientName
:local z 0

:set pppoeclientAllNum [:len [/interface pppoe-client find ]]
:log info ("pppoeclientAllNum".$pppoeclientAllNum)
:set pppoeclientRunNum [:len [/interface pppoe-client find running=yes]]
:log info ("pppoeclientRunNum".$pppoeclientRunNum)
:if ($pppoeclientRunNum < $pppoeclientAllNum) do={
  :for ii from=0 to=($pppoeclientAllNum-1) do={
   :log info $ii


   :if ($ii<=($pppoeclientRunNum-1)) do={
    /ip firewall mangle set [find per-connection-classifier~("/".$ii."\$")] per-connection-classifier=("both-addresses:".$pppoeclientRunNum."/".$ii) comment=("PCC" . $pppoeclientRunNum . "-" . $ii) disable=no
    /ip firewall mangle set [find action="mark-routing" connection-mark=[/ip firewall mangle get [find per-connection-classifier~("/".$ii."\$")] new-connection-mark ]] disable=no
    :log warning ("both-addresses:".$pppoeclientRunNum."/".$ii)
   } else={
    /ip firewall mangle set [find per-connection-classifier~("/".$ii."\$")] disable=yes
    /ip firewall mangle set [find action="mark-routing" connection-mark=[/ip firewall mangle get [find per-connection-classifier~("/".$ii."\$")] new-connection-mark ]] disable=yes
    :log warning ("both-addresses:".$pppoeclientAllNum."/".$ii."disable")
   }
  }
}
:if ($pppoeclientRunNum = $pppoeclientAllNum) do={
  :set z [:len [/ip firewall mangle find action="mark-connection" disabled=yes chain=prerouting]]
  :log info $z
  :if ($z>0) do={
   :for ii from=0 to=($pppoeclientRunNum-1) do={
    /ip firewall mangle set [find per-connection-classifier~("/".$ii."\$")] per-connection-classifier=("both-addresses:".$pppoeclientRunNum."/".$ii) comment=("PCC" . $pppoeclientRunNum . "-" . $ii) disable=no
    /ip firewall mangle set [find action="mark-routing" connection-mark=[/ip firewall mangle get [find per-connection-classifier~("/".$ii."\$")] new-connection-mark ]] disable=no
    :log warning ("both-addresses:".$pppoeclientRunNum."/".$ii)
   }
  }
}
}