Graf o počtu stažených dat

konycz

proto se ptám jestli by si byl moc tak hodny a poskytl script + tebou vytvořený exe soubor. Děkuji

Jinak jsem nainstaloval Cacti a tam lze sledovat všechny prostředky z mikrotiku, ale nikde jsem nenašel možnost sledovat počet přenesených dat od IP adres

konycz

zkousim prijit na to, abych ten vycet neposilal do mailu (scriptem v mikrotiku), ale aby se mi ukladal na disk... a jeste aby ten soubor mel nazev napriklad 12-8-2017.txt a porad na to nemuzu prijit.. Muze mi nekdo poradit ?? A potom jak jeste takto vycitat pocet paketu

PS: Zkousim takto

/file print file=date

/file set date contents=$telo

ale ulozi mi to soubor pod nazvem date.txt

PSS dalsi pokrok

:local months ("jan","feb","mar","apr","may","jun","jul","aug","sep","oct","nov","dec");

:local name [/system identity get name];

:local date ([/system clock get date]);

:local time ([/system clock get time]);

:local telo

:local ds [/system clock get date];

:local month [ :pick $ds 0 3 ];

:local mm ([ :find $months $month -1 ] + 1);

:set ds ([:pick $ds 7 11] . $mm . [:pick $ds 4 6]);

:if ($mm < 10) do={ :set mm ("0" . $mm); }

:log info "Starting Data_Sum Script..."

:set telo ("Suma prenesenych dat za klienty Download / Upload [MB]" . "\n")

/queue simple

:foreach i in=[find] do={

:local totalcurrent ([get $i bytes])

:local pos5 [:find $totalcurrent "/"]

:local pos6 [:len $totalcurrent]

:local bytesupcurrent ([:pick $totalcurrent 0 ($pos5)])

:local bytesdowncurrent ([:pick $totalcurrent ($pos5+1) $pos6])

:local megsupcurrent ($bytesupcurrent / 1048576)

:local megsdowncurrent ($bytesdowncurrent / 1048576)

:set telo ($telo . [get $i name] . " - " . [get $i target] )

:set telo ($telo . ": " . $megsdowncurrent . " / " . $megsupcurrent . "\n" )

}

/file print file=$ds

/file set $ds contents=$telo

ale potom obsah souboru je nesmysl

# aug/14/2017 13:59:14 by RouterOS 6.41rc11

# software id = DVN2-3LN6

# NAME TYPE SIZE CREATION-TIME

0 skins directory jan/01/1970 02:00:01

1 log_provozu file 3418.4KiB jul/10/2017 16:15:57

PSS2: Tak zase pokrok. musim ten script pustit dvakrat, jednou to zapise ten vypis souboru a potom podruhy to smaze obsah souboru a nahraje to tam uz spravne.... no tak nastavim na sheduler aby se script poustel dvakrat a je to

mpcz

Zdravím,

používám tento skript. Určitě by to šlo ještě vylepšit, ale nejsem žádný profesionální programátor a hlavně mě nebaví neustále řešit ty Sergejovy změny v jazyku skriptu, co verze. Dost dlouho jsem si s ním dopisoval (bezvýsledně) ohledně té nepříjemné hranice 4K pro jeden soubor, v důsledku čehož je ten skript i win SW zbytečně komplikovaný a textové soubory je nutné kouskovat na více souborů. Ale třeba to někdy opraví nebo někdo jiný znalý linuxu najde způsob, jak to obejít. Tím by se skript i win SW značně zjednodušil a zpřehlednil.

Co se týká SW do win pro stažení a zpracování těch textových souborů z FILES, na to se ještě musím podívat, tu část pro data klientů mám součástí celého systému vč. účetnictví a odesílání faktur emailem a nevím, kolik práce to dá, vypreparovat to.

mpcz, 15.aug.2017

skript se spouští několikrát denně (dle potřeby)

<--- ia0 -->bytes.png<--- ia0 -->

tady je text skriptu:

# remove bytes.txt;

fileContent "";#### iinitial timestamp ########################

time ;

startTime ;

stopTime ;

qc "";

set stopTime "";

# stopTime "";

date ;

ts "";

month ;

($month = "jan") do={ month "01"} else={

($month = "feb") do={ month "02"} else={

($month = "mar") do={ month "03"} else={

($month = "apr") do={ month "04"} else={

($month = "may") do={ month "05"} else={

($month = "jun") do={ month "06"} else={

($month = "jul") do={ month "07"} else={

($month = "aug") do={ month "08"} else={

($month = "sep") do={ month "09"} else={

($month = "oct") do={ month "10"} else={

($month = "nov") do={ month "11"} else={

($month = "dec") do={ month "12"} else={

month "00" }}}}}}}}}}}};

# "current month is $month";

date (.$month.)

# "current date is $date";

time (..)

# "current time is $time";

set ts (."-".);

###### konec Timestamp ######################

fn01 $ts ;

set fn01 ($fn01."-01.txt");

print file=$fn01;

fn02 $ts ;

set fn02 ($fn02."-02.txt");

print file=$fn02;

fn03 $ts ;

set fn03 ($fn03."-03.txt");

print file=$fn03;

fn04 $ts ;

set fn04 ($fn04."-04.txt");

print file=$fn04;

fn05 $ts ;

set fn05 ($fn05."-05.txt");

print file=$fn05;

fn06 $ts ;

set fn06 ($fn06."-06.txt");

print file=$fn06;

fn07 $ts ;

set fn07 ($fn07."-07.txt");

print file=$fn07;

fn08 $ts ;

set fn08 ($fn08."-08.txt");

print file=$fn08;

fn09 $ts ;

set fn09 ($fn09."-09.txt");

print file=$fn09;

fn10 $ts ;

set fn10 ($fn10."-10.txt");

print file=$fn10;

fn11 $ts ;

set fn11 ($fn11."-11.txt");

print file=$fn11;

fn12 $ts ;

set fn12 ($fn12."-12.txt");

print file=$fn12;

fn13 $ts ;

set fn13 ($fn13."-13.txt");

print file=$fn13;

fn14 $ts ;

set fn14 ($fn14."-14.txt");

print file=$fn14;

fn15 $ts ;

set fn15 ($fn15."-15.txt");

print file=$fn15;

delay 1s

#file set $fn01 contents ""

#/file print file= $fileName01;

#/set fileContent "";

#/file set $fileName01 contents=""

#/file print file=$fn01

#file set contents=""

#/file set "$fn01" contents="";

bbytes;

iip "";

nname;

queueCurrent;

queueCurrent from=0 to=848 do={

#log info $queueCurrent

global delka

#log info $delka

set bbytes ;

set iip ;

set nname ;

#set fileContent (..";"..";".."\r\n") ;

set fileContent (..";"..";"..";".."\r\n") ;

#log info $fileContent

}

file set $fn01 contents= ()

file set $fn02 contents= ()

file set $fn03 contents= ()

file set $fn04 contents= ()

file set $fn05 contents= ()

file set $fn06 contents= ()

file set $fn07 contents= ()

file set $fn08 contents= ()

file set $fn09 contents= ()

file set $fn10 contents= ()

file set $fn11 contents= ()

file set $fn12 contents= ()

file set $fn13 contents= ()

file set $fn14 contents= ()

file set $fn15 contents= ()

konycz

diky moc....

jen se jeste zeptam.... nyni pouzivam na vycet stazenych dat tohle

/queue simple

:foreach i in=[find] do={

:local totalcurrent ([get $i bytes])

:local pos5 [:find $totalcurrent "/"]

:local pos6 [:len $totalcurrent]

:local bytesupcurrent ([:pick $totalcurrent 0 ($pos5)])

:local bytesdowncurrent ([:pick $totalcurrent ($pos5+1) $pos6])

:local megsupcurrent ($bytesupcurrent / 1048576)

:local megsdowncurrent ($bytesdowncurrent / 1048576)

:set telo ($telo . [get $i name] )

:set telo ($telo . ": " . $megsdowncurrent . " / " . $megsupcurrent . "\n" )

to me uklada pocet MB za den, jak zmenit megsdowncurrent a megsupcurrent abych ukladal pocet paketu ?? existuje nekde nejaky manual kde bych nasel co vsechno muzu ukladat a jak se to presne jmenuje ?? protoze samozrejme ve Winboxu je napsano Packet a ne presny nazev..

konycz

mohl by mi prosim nekdo poradit jak vytahnout pocet tech paketu za den ??? ted vytahuju pocet MB za den, ale potreboval bych jeste pocet paketu, abych mohl jeste zjistit kdo mi vytezuje linku ??? Muj ISP ma omezeni poctu paketu a nekdo v siti to zahlcuje, tak bych chtel jenom u toho jednoho omezit pocet paketu/s diky moc

A otazka 2. kolik tak pocet paketu/s je tak optimalni ??

« Předchozí stránka