Скрипт за "убиване" на неактивни pppoe потребители

[Inkas]

Здравейте колеги!

Имам една драма, която я мъча вече две-три седмици. Имам PPPoE сървър и проблема ми е със спирането на клиентите. Когато искам да спра някой потребител, "билинг-а" го disable-ва (през апи-то), но не го kill-ва от Active Connections. Понеже "билинга" не е писан от мен и едва ли на човека му се занимава да го преправя, според мен решението е да се направи един скрипт, който през 5мин (примерно) да следни да disable-нати потребители и ако са активни, да ги "убива". Някой може ли да помогне с подобен скрипт?

[kokaracha]

http://dmasoftlab.com/

[Inkas]

Здравей,

Не търся софтуер, а скрипт.

[byte]

:log info Starting...
:local username
:local tmp1
:local pppuser
:local userinfo

:foreach file in=[/ppp active print as-value where service=pptp ] do={
   :set username ($file->"name")
   :log info "Cheking $username"
   :set tmp1 [/ppp secret print as-value where name=$username disabled=yes]
   :set pppuser [ :pick $tmp1 0 ]
   :if ( ($pppuser->"name") = $username ) do={
      :log info "Kill $username"
      :ppp active remove numbers=[/ppp active find where name=$username]
     }
}

 

 

Оправи само service=pptp, да е pppoe при теб.

[Inkas]

Преди 1 час, byte написа:

:log info Starting...
:local username
:local tmp1
:local pppuser
:local userinfo

:foreach file in=[/ppp active print as-value where service=pptp ] do={
   :set username ($file->"name")
   :log info "Cheking $username"
   :set tmp1 [/ppp secret print as-value where name=$username disabled=yes]
   :set pppuser [ :pick $tmp1 0 ]
   :if ( ($pppuser->"name") = $username ) do={
      :log info "Kill $username"
      :ppp active remove numbers=[/ppp active find where name=$username]
     }
}

 

 

Оправи само service=pptp, да е pppoe при теб.

Благодаря! Точно това ми трябваше!