Here is my “mik_collector.py” script:

all you need to change is router_ip variable to match your router IP

after that you can run this script simply with this command:

python mik_collector.py

this will collect data from mikrotik every 5 seconds and store it in data.db sqlite3 database in the same directory as the script is.

All you need to do at mikrotik side is to enable accounting feature:

If you want to analyze your collected data you can do it with sqlite3 command from Ubuntu command prompt:

sqlite3 data.db "select * from sum_per_month order by month"

like this:

you can write your own queries, all data is stored in a table named accounting. You can share your query in the comments :)

Local IP.vbs

I found this script at ardamis.com and adapted to my needs. I removed VMware local IP, because I don’t need it

strMsg = ""
strComputer = "."

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set IPConfigSet = objWMIService.ExecQuery("Select IPAddress,description from Win32_NetworkAdapterConfiguration WHERE IPEnabled = 'True'")

For Each IPConfig in IPConfigSet
	If Not IsNull(IPConfig.IPAddress) Then
	For i = LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
		If Not Instr(IPConfig.IPAddress(i), ":") > 0 Then
			If InStr(1, IPConfig.description(i), "VMware") = 0 Then
				strMsg = strMsg & IPConfig.IPAddress(i)
				If i > 0 Then
					strMsg = strMsg & vbcrlf & VBTab
				End If
			End If
		End If
	Next
	End If
Next
Echo strMsg

Public IP.vbs

Based on script from howtogeek.com
I’m retrieving my public IP from ipify.org

Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "https://api.ipify.org", False
o.send
echo o.responseText

ISP Name.vbs

I’m using whoismyisp.org for this task

Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "https://www.whoismyisp.org", False
o.send
strid = o.responseText
Set myRegExp = New RegExp
With myRegExp
	.Pattern = "< p class=""isp"">(.*)< / p >" 'remove spaces before use :)
	.IgnoreCase = False
	.Global = False
End With
Set myMatches = myRegExp.Execute(strid)

Echo myMatches.Item(0).SubMatches(0)

IMPORTANT:
Because my regex contain HTML tags I added space between < and p. If you want to use my script remove this spaces!

I find a partial solution here.

My first choice was this stored procedure, which needs to be called from command line:

db2 'call get_dbsize_info(?,?,?,1)'

Output:

[db2inst1@gina64 ~]$ db2 "call get_dbsize_info(?,?,?,-1)"

Value of output parameters
--------------------------
Parameter Name : SNAPSHOTTIMESTAMP
Parameter Value : 2013-07-04-13.00.05.476704

Parameter Name : DATABASESIZE
Parameter Value : 6993657856

Parameter Name : DATABASECAPACITY
Parameter Value : 5311283195

Return Status = 0

Later I realized that if I would like to use this data in a script, I will need to parse this data. Before doing that I tried the second option:

db2 "select (SUM(total_pages)*4)/1024.0/1024 TOTAL_ALLOCATED_SPACE_IN_GB from table (snapshot_tbs_cfg('dbname',-1)) TBS_SPCE"

Output:

TOTAL_ALLOCATED_SPACE_IN_GB
---------------------------------
                    6.99011230468

This query is more easy to use in a script, but being a lazy person I corrected this query to work without any “customization” for each database…

As you can see, the original query calculate database size assuming that page size is 4K:

... (SUM(total_pages)*4)/1024.0/1024 ...

I changed to this:

... (SUM(total_pages*page_size))/1024.0/1024/1024 ...

The second thing to change is the dbname value:

From:

... table (snapshot_tbs_cfg('dbname',-1)) ...

to:

... table (snapshot_tbs_cfg(CURRENT SERVER,-1)) ...

The final query looks like this:

select (SUM(total_pages*page_size))/1024.0/1024/1024 TOTAL_ALLOCATED_SPACE_IN_GB from table (snapshot_tbs_cfg(CURRENT SERVER,-1)) TBS_SPCE