142 lines
3.5 KiB
Lua
142 lines
3.5 KiB
Lua
local Widget = require 'Widget'
|
|
local Text = require 'Text'
|
|
local Line = require 'Line'
|
|
local ScalePlot = require 'ScalePlot'
|
|
local util = require 'util'
|
|
local schema = require 'default_patterns'
|
|
|
|
local __tonumber = tonumber
|
|
local __string_match = string.match
|
|
|
|
local _PLOT_SEC_BREAK_ = 20
|
|
local _PLOT_HEIGHT_ = 56
|
|
|
|
local BLOCK_SIZE_BYTES = 512
|
|
local STAT_FILE = '/sys/block/sda/stat'
|
|
|
|
-- fields 3 and 7 (sectors read and written)
|
|
local RW_REGEX = '%s+%d+%s+%d+%s+(%d+)%s+%d+%s+%d+%s+%d+%s+(%d+)'
|
|
|
|
local read_stat_file = function()
|
|
local bytes_r, bytes_w = __string_match(util.read_file(STAT_FILE), RW_REGEX)
|
|
return __tonumber(bytes_r) * BLOCK_SIZE_BYTES, __tonumber(bytes_w) * BLOCK_SIZE_BYTES
|
|
end
|
|
|
|
local update_stat = function(cr, stat, byte_cnt, update_frequency)
|
|
local delta_bytes = byte_cnt - stat.prev_byte_cnt
|
|
stat.prev_byte_cnt = byte_cnt
|
|
|
|
if delta_bytes > 0 then
|
|
local bps = delta_bytes * update_frequency
|
|
local unit = util.get_unit(bps)
|
|
stat.rate.append_end = ' '..unit..'/s'
|
|
Text.set(stat.rate, cr, util.precision_convert_bytes(bps, 'B', unit, 3))
|
|
ScalePlot.update(stat.plot, cr, bps)
|
|
else
|
|
stat.rate.append_end = ' B/s'
|
|
Text.set(stat.rate, cr, '0.00')
|
|
ScalePlot.update(stat.plot, cr, 0)
|
|
end
|
|
end
|
|
|
|
local io_label_function = function(bytes)
|
|
local new_unit = util.get_unit(bytes)
|
|
|
|
local converted = util.convert_bytes(bytes, 'B', new_unit)
|
|
local precision = 0
|
|
if converted < 10 then precision = 1 end
|
|
|
|
return util.round_to_string(converted, precision)..' '..new_unit..'/s'
|
|
end
|
|
|
|
local header = Widget.Header{
|
|
x = _G_INIT_DATA_.CENTER_LEFT_X,
|
|
y = _G_INIT_DATA_.TOP_Y,
|
|
width = _G_INIT_DATA_.SECTION_WIDTH,
|
|
header = 'INPUT / OUTPUT'
|
|
}
|
|
|
|
local _RIGHT_X_ = _G_INIT_DATA_.CENTER_LEFT_X + _G_INIT_DATA_.SECTION_WIDTH
|
|
|
|
local reads = {
|
|
label = Widget.Text{
|
|
x = _G_INIT_DATA_.CENTER_LEFT_X,
|
|
y = header.bottom_y,
|
|
text = 'Reads',
|
|
},
|
|
rate = Widget.Text{
|
|
x = _RIGHT_X_,
|
|
y = header.bottom_y,
|
|
x_align = 'right',
|
|
append_end=' B/s',
|
|
text_color = schema.BLUE
|
|
},
|
|
plot = Widget.ScalePlot{
|
|
x = _G_INIT_DATA_.CENTER_LEFT_X,
|
|
y = header.bottom_y + _PLOT_SEC_BREAK_,
|
|
width = _G_INIT_DATA_.SECTION_WIDTH,
|
|
height = _PLOT_HEIGHT_,
|
|
y_label_func = io_label_function,
|
|
}
|
|
}
|
|
|
|
local _WRITE_Y_ = header.bottom_y + _PLOT_HEIGHT_ + _PLOT_SEC_BREAK_ * 2
|
|
|
|
local writes = {
|
|
label = Widget.Text{
|
|
x = _G_INIT_DATA_.CENTER_LEFT_X,
|
|
y = _WRITE_Y_,
|
|
text = 'Writes',
|
|
},
|
|
rate = Widget.Text{
|
|
x = _RIGHT_X_,
|
|
y = _WRITE_Y_,
|
|
x_align = 'right',
|
|
append_end =' B/s',
|
|
text_color = schema.BLUE
|
|
},
|
|
plot = Widget.ScalePlot{
|
|
x = _G_INIT_DATA_.CENTER_LEFT_X,
|
|
y = _WRITE_Y_ + _PLOT_SEC_BREAK_,
|
|
width = _G_INIT_DATA_.SECTION_WIDTH,
|
|
height = _PLOT_HEIGHT_,
|
|
y_label_func = io_label_function,
|
|
}
|
|
}
|
|
|
|
Widget = nil
|
|
schema = nil
|
|
_PLOT_SEC_BREAK_ = nil
|
|
_PLOT_HEIGHT_ = nil
|
|
_RIGHT_X_ = nil
|
|
_WRITE_Y_ = nil
|
|
|
|
reads.byte_cnt = 0
|
|
writes.byte_cnt = 0
|
|
reads.prev_byte_cnt, writes.prev_byte_cnt = read_stat_file()
|
|
|
|
local update = function(cr, update_frequency)
|
|
local read_byte_cnt, write_byte_cnt = read_stat_file()
|
|
update_stat(cr, reads, read_byte_cnt, update_frequency)
|
|
update_stat(cr, writes, write_byte_cnt, update_frequency)
|
|
end
|
|
|
|
local draw = function(cr, current_interface, update_frequency)
|
|
update(cr, update_frequency)
|
|
|
|
if current_interface == 0 then
|
|
Text.draw(header.text, cr)
|
|
Line.draw(header.underline, cr)
|
|
|
|
Text.draw(reads.label, cr)
|
|
Text.draw(reads.rate, cr)
|
|
ScalePlot.draw(reads.plot, cr)
|
|
|
|
Text.draw(writes.label, cr)
|
|
Text.draw(writes.rate, cr)
|
|
ScalePlot.draw(writes.plot, cr)
|
|
end
|
|
end
|
|
|
|
return draw
|