graph: Enable the property system

And add the missing documentation
This commit is contained in:
Emmanuel Lepage Vallee 2016-05-26 17:39:04 -04:00
parent 03e2310c54
commit ea16481228
1 changed files with 51 additions and 51 deletions

View File

@ -21,47 +21,40 @@ local graph = { mt = {} }
--- Set the graph border color. --- Set the graph border color.
-- If the value is nil, no border will be drawn. -- If the value is nil, no border will be drawn.
-- --
-- @function set_border_color -- @property border_color
-- @param graph The graph. -- @tparam geats.color border_color The border color to set.
-- @param color The border color to set.
--- Set the graph foreground color. --- Set the graph foreground color.
-- --
-- @function set_color -- @property color
-- @param graph The graph. -- @tparam color color The graph color.
-- @param color The graph color.
-- @see gears.color.create_pattern -- @see gears.color.create_pattern
--- Set the graph background color. --- Set the graph background color.
-- --
-- @function set_background_color -- @property background_color
-- @param graph The graph. -- @tparam gears.color background_color The graph background color.
-- @param color The graph background color.
--- Set the maximum value the graph should handle. --- Set the maximum value the graph should handle.
-- If "scale" is also set, the graph never scales up below this value, but it -- If "scale" is also set, the graph never scales up below this value, but it
-- automatically scales down to make all data fit. -- automatically scales down to make all data fit.
-- --
-- @function set_max_value -- @property max_value
-- @param graph The graph. -- @param number
-- @param value The value.
--- Set the graph to automatically scale its values. Default is false. --- Set the graph to automatically scale its values. Default is false.
-- --
-- @function set_scale -- @property scale
-- @param graph The graph. -- @param boolean
-- @param scale A boolean value
--- Set the graph to draw stacks. Default is false. --- Set the graph to draw stacks. Default is false.
-- --
-- @function set_stack -- @property stack
-- @param graph The graph. -- @param boolean
-- @param stack A boolean value.
--- Set the graph stacking colors. Order matters. --- Set the graph stacking colors. Order matters.
-- --
-- @function set_stack_colors -- @property stack_colors
-- @param graph The graph.
-- @param stack_colors A table with stacking colors. -- @param stack_colors A table with stacking colors.
local properties = { "width", "height", "border_color", "stack", local properties = { "width", "height", "border_color", "stack",
@ -69,26 +62,26 @@ local properties = { "width", "height", "border_color", "stack",
"max_value", "scale" } "max_value", "scale" }
function graph.draw(_graph, _, cr, width, height) function graph.draw(_graph, _, cr, width, height)
local max_value = _graph._data.max_value local max_value = _graph._private.max_value
local values = _graph._data.values local values = _graph._private.values
cr:set_line_width(1) cr:set_line_width(1)
-- Draw the background first -- Draw the background first
cr:set_source(color(_graph._data.background_color or "#000000aa")) cr:set_source(color(_graph._private.background_color or "#000000aa"))
cr:paint() cr:paint()
-- Account for the border width -- Account for the border width
cr:save() cr:save()
if _graph._data.border_color then if _graph._private.border_color then
cr:translate(1, 1) cr:translate(1, 1)
width, height = width - 2, height - 2 width, height = width - 2, height - 2
end end
-- Draw a stacked graph -- Draw a stacked graph
if _graph._data.stack then if _graph._private.stack then
if _graph._data.scale then if _graph._private.scale then
for _, v in ipairs(values) do for _, v in ipairs(values) do
for _, sv in ipairs(v) do for _, sv in ipairs(v) do
if sv > max_value then if sv > max_value then
@ -102,8 +95,8 @@ function graph.draw(_graph, _, cr, width, height)
local rel_i = 0 local rel_i = 0
local rel_x = i + 0.5 local rel_x = i + 0.5
if _graph._data.stack_colors then if _graph._private.stack_colors then
for idx, col in ipairs(_graph._data.stack_colors) do for idx, col in ipairs(_graph._private.stack_colors) do
local stack_values = values[idx] local stack_values = values[idx]
if stack_values and i < #stack_values then if stack_values and i < #stack_values then
local value = stack_values[#stack_values - i] + rel_i local value = stack_values[#stack_values - i] + rel_i
@ -117,7 +110,7 @@ function graph.draw(_graph, _, cr, width, height)
end end
end end
else else
if _graph._data.scale then if _graph._private.scale then
for _, v in ipairs(values) do for _, v in ipairs(values) do
if v > max_value then if v > max_value then
max_value = v max_value = v
@ -136,7 +129,7 @@ function graph.draw(_graph, _, cr, width, height)
cr:line_to(i + 0.5, height) cr:line_to(i + 0.5, height)
end end
end end
cr:set_source(color(_graph._data.color or "#ff0000")) cr:set_source(color(_graph._private.color or "#ff0000"))
cr:stroke() cr:stroke()
end end
@ -146,19 +139,19 @@ function graph.draw(_graph, _, cr, width, height)
cr:restore() cr:restore()
-- Draw the border last so that it overlaps already drawn values -- Draw the border last so that it overlaps already drawn values
if _graph._data.border_color then if _graph._private.border_color then
-- We decremented these by two above -- We decremented these by two above
width, height = width + 2, height + 2 width, height = width + 2, height + 2
-- Draw the border -- Draw the border
cr:rectangle(0.5, 0.5, width - 1, height - 1) cr:rectangle(0.5, 0.5, width - 1, height - 1)
cr:set_source(color(_graph._data.border_color or "#ffffff")) cr:set_source(color(_graph._private.border_color or "#ffffff"))
cr:stroke() cr:stroke()
end end
end end
function graph.fit(_graph) function graph.fit(_graph)
return _graph._data.width, _graph._data.height return _graph._private.width, _graph._private.height
end end
--- Add a value to the graph --- Add a value to the graph
@ -167,28 +160,28 @@ end
-- @param group The stack color group index. -- @param group The stack color group index.
function graph:add_value(value, group) function graph:add_value(value, group)
value = value or 0 value = value or 0
local values = self._data.values local values = self._private.values
local max_value = self._data.max_value local max_value = self._private.max_value
value = math.max(0, value) value = math.max(0, value)
if not self._data.scale then if not self._private.scale then
value = math.min(max_value, value) value = math.min(max_value, value)
end end
if self._data.stack and group then if self._private.stack and group then
if not self._data.values[group] if not self._private.values[group]
or type(self._data.values[group]) ~= "table" or type(self._private.values[group]) ~= "table"
then then
self._data.values[group] = {} self._private.values[group] = {}
end end
values = self._data.values[group] values = self._private.values[group]
end end
table.insert(values, value) table.insert(values, value)
local border_width = 0 local border_width = 0
if self._data.border_color then border_width = 2 end if self._private.border_color then border_width = 2 end
-- Ensure we never have more data than we can draw -- Ensure we never have more data than we can draw
while #values > self._data.width - border_width do while #values > self._private.width - border_width do
table.remove(values, 1) table.remove(values, 1)
end end
@ -198,7 +191,7 @@ end
--- Clear the graph. --- Clear the graph.
function graph:clear() function graph:clear()
self._data.values = {} self._private.values = {}
self:emit_signal("widget::redraw_needed") self:emit_signal("widget::redraw_needed")
return self return self
end end
@ -207,7 +200,7 @@ end
-- @param height The height to set. -- @param height The height to set.
function graph:set_height(height) function graph:set_height(height)
if height >= 5 then if height >= 5 then
self._data.height = height self._private.height = height
self:emit_signal("widget::layout_changed") self:emit_signal("widget::layout_changed")
end end
return self return self
@ -217,7 +210,7 @@ end
-- @param width The width to set. -- @param width The width to set.
function graph:set_width(width) function graph:set_width(width)
if width >= 5 then if width >= 5 then
self._data.width = width self._private.width = width
self:emit_signal("widget::layout_changed") self:emit_signal("widget::layout_changed")
end end
return self return self
@ -227,8 +220,8 @@ end
for _, prop in ipairs(properties) do for _, prop in ipairs(properties) do
if not graph["set_" .. prop] then if not graph["set_" .. prop] then
graph["set_" .. prop] = function(_graph, value) graph["set_" .. prop] = function(_graph, value)
if _graph._data[prop] ~= value then if _graph._private[prop] ~= value then
_graph._data[prop] = value _graph._private[prop] = value
_graph:emit_signal("widget::redraw_needed") _graph:emit_signal("widget::redraw_needed")
end end
return _graph return _graph
@ -236,7 +229,7 @@ for _, prop in ipairs(properties) do
end end
if not graph["get_" .. prop] then if not graph["get_" .. prop] then
graph["get_" .. prop] = function(_graph) graph["get_" .. prop] = function(_graph)
return _graph._data[prop] return _graph._private[prop]
end end
end end
end end
@ -254,9 +247,12 @@ function graph.new(args)
if width < 5 or height < 5 then return end if width < 5 or height < 5 then return end
local _graph = base.make_widget() local _graph = base.make_widget(nil, nil, {enable_properties = true})
_graph._data = { width = width, height = height, values = {}, max_value = 1 } _graph._private.width = width
_graph._private.height = height
_graph._private.values = {}
_graph._private.max_value = 1
-- Set methods -- Set methods
_graph.add_value = graph["add_value"] _graph.add_value = graph["add_value"]
@ -276,6 +272,10 @@ function graph.mt:__call(...)
return graph.new(...) return graph.new(...)
end end
--@DOC_widget_COMMON@
--@DOC_object_COMMON@
return setmetatable(graph, graph.mt) return setmetatable(graph, graph.mt)
-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80 -- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80