From 3fe8c1157aeead95bb67979ac05b3fa61e3cde9c Mon Sep 17 00:00:00 2001
From: Insality <insality@gmail.com>
Date: Thu, 26 Sep 2019 08:46:12 +0300
Subject: [PATCH] #20 radio_group component (based on checkbox)

---
 druid/base/radio_group.lua | 52 ++++++++++++++++++++++++++++++++++++++
 druid/druid.lua            |  2 ++
 2 files changed, 54 insertions(+)
 create mode 100644 druid/base/radio_group.lua

diff --git a/druid/base/radio_group.lua b/druid/base/radio_group.lua
new file mode 100644
index 0000000..25e74b6
--- /dev/null
+++ b/druid/base/radio_group.lua
@@ -0,0 +1,52 @@
+--- Radio group module
+-- @module base.checkbox_group
+
+local M = {}
+
+
+local function on_checkbox_click(self, index)
+	for i = 1, #self.checkboxes do
+		self.checkboxes[i]:set_state(i == index, true)
+	end
+
+	if self.callback then
+		self.callback(self.parent.parent, index)
+	end
+end
+
+
+function M.set_state(self, index)
+	on_checkbox_click(self, index)
+end
+
+
+function M.get_state(self)
+	local result = -1
+
+	for i = 1, #self.checkboxes do
+		if self.checkboxes[i]:get_state() then
+			result = i
+			break
+		end
+	end
+
+	return result
+end
+
+
+function M.init(self, nodes, callback, click_nodes)
+	self.checkboxes = {}
+	self.callback = callback
+
+	for i = 1, #nodes do
+		local click_node = click_nodes and click_nodes[i] or nil
+		local checkbox = self.parent:new_checkbox(nodes[i], function()
+			on_checkbox_click(self, i)
+		end, click_node)
+
+		table.insert(self.checkboxes, checkbox)
+	end
+end
+
+
+return M
diff --git a/druid/druid.lua b/druid/druid.lua
index ad3618c..24795d3 100644
--- a/druid/druid.lua
+++ b/druid/druid.lua
@@ -15,6 +15,8 @@ M.comps = {
 	progress = require("druid.base.progress"),
 	grid = require("druid.base.grid"),
 	scroll = require("druid.base.scroll"),
+	checkbox = require("druid.base.checkbox"),
+	radio_group = require("druid.base.radio_group"),
 
 	progress_rich = require("druid.rich.progress_rich"),
 }