Биллинговая система Nodeny

'mode' => {
                title   => 'Режим',
                ...

    {
        name    => 'mode',
        type    => 20,
        %{$l{mode}},
    },

    $actions->{set_service} = {
        period  => int $service_new->{param}{period},
        tags    => ',inet,speed,',
    };

    $actions->{set_service} = {
        period  => int $service_new->{param}{period},
        tags    => ',inet,speed,',
        mode    => int $service_new->{param}{mode},
    };

#!/bin/sh
user="nas2"
pass="xxxxxxxxxxx"
db="nodeny"
/bin/cat /dev/null > /tmp/test.txt
sql1="SELECT INET_NTOA(ip) FROM ip_pool  WHERE uid  IN(SELECT uid FROM users_services WHERE service_id=18)" #18 у меня услуга TV "УКРАЇНА"
res1=`mysql -hXXX.XXX.XX.3 -u $user -p$pass $db -N -e "$sql1"`
printf "$res1" > /tmp/iptv-ukraina.txt

sql2="SELECT INET_NTOA(ip) FROM ip_pool  WHERE uid  IN(SELECT uid FROM users_services WHERE service_id=19)" #19 у меня услуга TV "ВСЕСВІТ"
res2=`mysql -hXXX.XXX.XX.3 -u $user -p$pass $db -N -e "$sql2"`
printf "$res2" > /tmp/iptv-vsesvit.txt

sed '/:[0-9]*$/ ! s:$:/32:' /tmp/iptv-ukraina.txt
/sbin/ipfw table 80 flush
for i in `cat /tmp/iptv-ukraina.txt`;
do /sbin/ipfw table 80 add $i;
 done

sed '/:[0-9]*$/ ! s:$:/32:' /tmp/iptv-vsesvit.txt
/sbin/ipfw table 81 flush
for i in `cat /tmp/iptv-vsesvit.txt`;
do /sbin/ipfw table 81 add $i;
 done

$service->{price} > 0 or next;

$service->{price} >= 0 or next;

$service->{price} > 0 or next;

$service->{price} >= 0 or next;

            if( $service_new{price} <= 0 )
            {
                debug('error', $L->('клиент не должен сам себе подключать бонусы'));

            if( $service_new{price} < 0 )
            {
                debug('error', $L->('клиент не должен сам себе подключать бонусы'));