local M = {}

local Arc = require 'Arc'
local Text = require 'Text'
local CriticalText = require 'CriticalText'
local TextColumn = require 'TextColumn'
local Line = require 'Line'
local LabelPlot = require 'LabelPlot'
local ScalePlot = require 'ScalePlot'

local HEADER_HEIGHT = 45
local HEADER_FONT_SIZE = 15
-- TODO move all this font stuff to the theme file
-- local HEADER_FONT_SLANT = CAIRO_FONT_SLANT_NORMAL
-- local HEADER_FONT_WEIGHT = CAIRO_FONT_WEIGHT_BOLD
local HEADER_UNDERLINE_CAP = CAIRO_LINE_CAP_ROUND
local HEADER_UNDERLINE_OFFSET = -20
local HEADER_UNDERLINE_THICKNESS = 3

local _bare_text = function(pt, text, font_spec, pattern, x_align)
   return _G_Widget_.Text(pt, text, font_spec, pattern, x_align, 'center', nil, nil)
end

local _left_text = function(pt, text, font_spec, pattern)
   return _bare_text(pt, text, font_spec, pattern, 'left')
end

local _right_text = function(pt, text, font_spec, pattern)
   return _bare_text(pt, text, font_spec, pattern, 'right')
end

M.make_font_spec = function(f, s, bold)
   return {
      family = f,
      size = s,
      weight = bold and CAIRO_FONT_WEIGHT_BOLD or CAIRO_FONT_WEIGHT_NORMAL,
      slant = CAIRO_FONT_WEIGHT_NORMAL,
   }
end

M.normal_font_spec = M.make_font_spec(_G_Patterns_.FONT, 13, false)
M.label_font_spec = M.make_font_spec(_G_Patterns_.FONT, 8, false)

--------------------------------------------------------------------------------
-- header

M.Header = function(x, y, w, s)
   -- TODO what's the point of bottom_y?
   local bottom_y = y + HEADER_HEIGHT
   local underline_y = bottom_y + HEADER_UNDERLINE_OFFSET

   local obj = {
      -- text = _G_Widget_.Text{
      --    x 			= x,
      --    y 			= y,
      --    text 		= s,
      --    font_spec = M.make_font_spec(_G_Patterns_.FONT, HEADER_FONT_SIZE, true),
      --    -- font_size 	= HEADER_FONT_SIZE,
      --    x_align 	= 'left',
      --    y_align 	= 'top',
      --    text_color = _G_Patterns_.HEADER_FG,
      --    -- slant 		= HEADER_FONT_SLANT,
      --    -- weight 	= HEADER_FONT_WEIGHT
      -- },
      text = _G_Widget_.Text(
         _G_Widget_.make_point(x, y),
         s,
         M.make_font_spec(_G_Patterns_.FONT, HEADER_FONT_SIZE, true),
         _G_Patterns_.HEADER_FG,
         'left',
         'top',
         nil,
         nil
      ),
      bottom_y = bottom_y,
      -- underline = _G_Widget_.Line{
      --    p1 			= {x = x, y = underline_y},
      --    p2 			= {x = x + w, y = underline_y},
      --    thickness 		= HEADER_UNDERLINE_THICKNESS,
      --    line_pattern 	= _G_Patterns_.HEADER_FG,
      --    cap 			= HEADER_UNDERLINE_CAP
      -- }
      underline = _G_Widget_.Line(
         HEADER_UNDERLINE_THICKNESS,
         HEADER_UNDERLINE_CAP,
         _G_Patterns_.HEADER_FG,
         {x = x, y = underline_y},
         {x = x + w, y = underline_y}
      )
   }

   return obj
end

M.drawHeader = function(cr, header)
   Text.draw(header.text, cr)
   Line.draw(header.underline, cr)
end

--------------------------------------------------------------------------------
-- label plot

M.initThemedLabelPlot = function(x, y, w, h)
   return _G_Widget_.LabelPlot{
      x = x,
      y = y,
      width = w,
      height = h,
      outline_pattern = _G_Patterns_.BORDER_FG,
      intrvl_pattern = _G_Patterns_.BORDER_FG,
      data_line_pattern = _G_Patterns_.PLOT_FILL_BORDER_PRIMARY,
      data_fill_pattern = _G_Patterns_.PLOT_FILL_BG_PRIMARY,
      label_color = _G_Patterns_.INACTIVE_TEXT_FG,
      label_font_spec = M.label_font_spec,
   }
end

--------------------------------------------------------------------------------
-- percent plot (label plot with percent signs and some indicator data above it)

M.initPercentPlot = function(x, y, w, h, spacing, label)
   return {
      -- label = _G_Widget_.Text{
      --    x = x,
      --    y = y,
      --    text = label,
      --    x_align = 'left',
      --    text_color = _G_Patterns_.INACTIVE_TEXT_FG,
      --    font_spec = M.normal_font_spec,
      -- },
      label = _left_text(
         _G_Widget_.make_point(x, y),
         label,
         M.normal_font_spec,
         _G_Patterns_.INACTIVE_TEXT_FG
      ),
      value = _G_Widget_.CriticalText(
         _G_Widget_.make_point(x, y),
         nil,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG,
         _G_Patterns_.CRITICAL_FG,
         80,
         'right',
         'center',
         nil,
         '%'
      ),
      -- value = _G_Widget_.CriticalText{
      --    x = x + w,
      --    y = y,
      --    x_align = 'right',
      --    y_align = 'center',
      --    append_end = '%',
      --    critical_limit = 80,
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    critical_color = _G_Patterns_.PRIMARY_FG,
      --    font_spec = M.normal_font_spec,
      -- },
      plot = M.initThemedLabelPlot(x, y + spacing, w, h),
   }
end

M.percent_plot_draw_static = function(pp, cr)
   Text.draw(pp.label, cr)
   LabelPlot.draw_static(pp.plot, cr)
end

M.percent_plot_draw_dynamic = function(pp, cr)
   CriticalText.draw(pp.value, cr)
   LabelPlot.draw_dynamic(pp.plot, cr)
end

M.percent_plot_set = function(pp, cr, value)
   Text.set(pp.value, cr, math.floor(value))
   LabelPlot.update(pp.plot, value * 0.01)
end

--------------------------------------------------------------------------------
-- scaled plot

M.initThemedScalePlot = function(x, y, w, h, f)
   return _G_Widget_.ScalePlot{
      x = x,
      y = y,
      width = w,
      height = h,
      y_label_func = f,
      outline_pattern = _G_Patterns_.BORDER_FG,
      intrvl_pattern = _G_Patterns_.BORDER_FG,
      data_line_pattern = _G_Patterns_.PLOT_FILL_BORDER_PRIMARY,
      data_fill_pattern = _G_Patterns_.PLOT_FILL_BG_PRIMARY,
      label_color = _G_Patterns_.INACTIVE_TEXT_FG,
      label_font_spec = M.label_font_spec,
   }
end

--------------------------------------------------------------------------------
-- scaled plot (with textual data above it)

M.initLabeledScalePlot = function(x, y, w, h, f, spacing, label)
   return {
      -- label = _G_Widget_.Text{
      --    x = x,
      --    y = y,
      --    text = label,
      --    x_align = 'left',
      --    text_color = _G_Patterns_.INACTIVE_TEXT_FG,
      --    font_spec = M.normal_font_spec,
      -- },
      label = _left_text(
         _G_Widget_.make_point(x, y),
         label,
         M.normal_font_spec,
         _G_Patterns_.INACTIVE_TEXT_FG
      ),
      -- value = _G_Widget_.Text{
      --    x = x + w,
      --    y = y,
      --    x_align = 'right',
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    font_spec = M.normal_font_spec,
      -- },
      value = _right_text(
         _G_Widget_.make_point(x + w, y),
         label,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG
      ),
      plot = M.initThemedScalePlot(x, y + spacing, w, h, f),
   }
end

M.annotated_scale_plot_draw_static = function(asp, cr)
   Text.draw(asp.label, cr)
end

M.annotated_scale_plot_draw_dynamic = function(asp, cr)
   Text.draw(asp.value, cr)
   ScalePlot.draw_dynamic(asp.plot, cr)
end

M.annotated_scale_plot_set = function(asp, cr, text_value, plot_value)
   -- TODO this could be made more intelligent
   Text.set(asp.value, cr, text_value)
   ScalePlot.update(asp.plot, cr, plot_value)
end

--------------------------------------------------------------------------------
-- ring

M.initRing = function(x, y, r)
   return _G_Widget_.Arc(
      _G_Widget_.make_semicircle(
         _G_Widget_.make_point(x, y),
         r,
         0,
         360
      ),
      2,
      _G_Patterns_.BORDER_FG
   )
end

--------------------------------------------------------------------------------
-- ring with text data in the center

M.initTextRing = function(x, y, r, append_end, limit)
   return {
	  ring = M.initRing(x, y, r),
	  -- value = _G_Widget_.CriticalText{
	  --    x = x,
	  --    y = y,
	  --    x_align = 'center',
	  --    y_align = 'center',
	  --    append_end = append_end,
	  --    critical_limit = limit,
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    critical_color = _G_Patterns_.CRITICAL_FG,
      --    font_spec = M.normal_font_spec,
	  -- },
	  value = _G_Widget_.CriticalText(
         _G_Widget_.make_point(x, y),
         nil,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG,
         _G_Patterns_.CRITICAL_FG,
		 limit,
		 'center',
		 'center',
         nil,
		 append_end
	  ),
   }
end

M.text_ring_draw_static = function(tr, cr)
   Arc.draw(tr.ring, cr)
end

M.text_ring_draw_dynamic = function(tr, cr)
   CriticalText.draw(tr.value, cr)
end

M.text_ring_set = function(tr, cr, value)
   CriticalText.set(tr.value, cr, value)
end

--------------------------------------------------------------------------------
-- separator (eg a horizontal line)

M.initSeparator = function(x, y, w)
   -- return _G_Widget_.Line{
   --    p1 = {x = x, y = y},
   --    p2 = {x = x + w, y = y},
   --    line_pattern = _G_Patterns_.BORDER_FG,
   -- }
   return _G_Widget_.Line(
      1,
      CAIRO_LINE_CAP_BUTT,
      _G_Patterns_.BORDER_FG,
      {x = x, y = y},
      {x = x + w, y = y}
   )
end

--------------------------------------------------------------------------------
-- text row (label with a value, aligned as far apart as possible)


M.initTextRow = function(x, y, w, label)
   return {
      -- label = _G_Widget_.Text{
      --    x = x,
      --    y = y,
      --    x_align = 'left',
      --    text_color = _G_Patterns_.INACTIVE_TEXT_FG,
      --    text = label,
      --    font_spec = M.normal_font_spec,
      -- },
      label = _left_text(
         _G_Widget_.make_point(x, y),
         label,
         M.normal_font_spec,
         _G_Patterns_.INACTIVE_TEXT_FG
      ),
      -- value = _G_Widget_.Text{
      --    x = x + w,
      --    y = y,
      --    x_align = 'right',
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    text = "<NA>",
      --    font_spec = M.normal_font_spec,
      -- }
      value = _right_text(
         _G_Widget_.make_point(x + w, y),
         nil,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG
      ),
   }
end

M.text_row_draw_static = function(row, cr)
   Text.draw(row.label, cr)
end

M.text_row_draw_dynamic = function(row, cr)
   Text.draw(row.value, cr)
end

M.text_row_set = function(row, cr, value)
   Text.set(row.value, cr, value)
end

--------------------------------------------------------------------------------
-- text row with critical indicator

-- TODO add limit to this
M.initTextRowCrit = function(x, y, w, label, append_end, limit)
   return{
      -- label = _G_Widget_.Text{
      --    x = x,
      --    y = y,
      --    text = label,
      --    x_align = 'left',
      --    text_color = _G_Patterns_.INACTIVE_TEXT_FG,
      --    font_spec = M.normal_font_spec,
      -- },
      label = _left_text(
         _G_Widget_.make_point(x, y),
         label,
         M.normal_font_spec,
         _G_Patterns_.INACTIVE_TEXT_FG
      ),
      -- value = _G_Widget_.CriticalText{
      --    x = x + w,
      --    y = y,
      --    x_align = 'right',
      --    y_align = 'center',
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    critical_color = _G_Patterns_.CRITICAL_FG,
      --    critical_limit = limit,
      --    append_end = append_end,
      --    text = '<NA>',
      --    font_spec = M.normal_font_spec,
      -- }
      value = _G_Widget_.CriticalText(
         _G_Widget_.make_point(x + w, y),
         nil,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG,
         _G_Patterns_.CRITICAL_FG,
         limit,
         'right',
         'center',
         nil,
         append_end
      )
   }
end

M.text_row_crit_draw_static = M.text_row_draw_static

M.text_row_crit_draw_dynamic = function(row, cr)
   CriticalText.draw(row.value, cr)
end

M.text_row_crit_set = function(row, cr, value)
   CriticalText.set(row.value, cr, value)
end

--------------------------------------------------------------------------------
-- multiple text row separated by spacing

M.initTextRows = function(x, y, w, spacing, labels)
   return {
      labels = _G_Widget_.TextColumn(
         -- x = x,
         -- y = y,
         -- spacing = spacing,
         -- x_align = 'left',
         -- y_align = 'center',
         -- text_color = _G_Patterns_.INACTIVE_TEXT_FG,
         -- font_spec = M.normal_font_spec,
         -- table.unpack(labels),
         _G_Widget_.make_point(x, y),
         spacing,
         nil,
         M.normal_font_spec,
         _G_Patterns_.INACTIVE_TEXT_FG,
         'left',
         'center',
         nil,
         nil,
         labels
      ),
      -- values = _G_Widget_.TextColumn{
      --    x = x + w,
      --    y = y,
      --    spacing = spacing,
      --    x_align = 'right',
      --    y_align = 'center',
      --    text_color = _G_Patterns_.PRIMARY_FG,
      --    font_spec = M.normal_font_spec,
      --    num_rows = #labels,
      -- }
      values = _G_Widget_.initTextColumnN(
         _G_Widget_.make_point(x + w, y),
         spacing,
         nil,
         M.normal_font_spec,
         _G_Patterns_.PRIMARY_FG,
         'right',
         'center',
         nil,
         nil,
         #labels
      )
   }
end

M.text_rows_draw_static = function(rows, cr)
   TextColumn.draw(rows.labels, cr)
end

M.text_rows_draw_dynamic = function(rows, cr)
   TextColumn.draw(rows.values, cr)
end

M.text_rows_set = function(rows, cr, i, value)
   TextColumn.set(rows.values, cr, i, value)
end

--------------------------------------------------------------------------------
-- table

M.initTable = function(x, y, w, h, n, labels)
   return _G_Widget_.Table{
      x = x,
      y = y,
      width = w,
      height = h,
      num_rows = n,
      body_color = _G_Patterns_.INACTIVE_TEXT_FG,
      header_color = _G_Patterns_.PRIMARY_FG,
      line_pattern = _G_Patterns_.BORDER_FG,
      separator_pattern = _G_Patterns_.BORDER_FG,
      body_font_spec = M.make_font_spec(_G_Patterns_.FONT, 11, false),
      header_font_spec = M.make_font_spec(_G_Patterns_.FONT, 11, false),
      table.unpack(labels),
   }
end

--------------------------------------------------------------------------------
-- panel

M.initPanel = function(x, y, w, h)
   return _G_Widget_.FillRect(
      _G_Widget_.make_box(
         _G_Widget_.make_point(x + 0.5, y + 0.5),
         w,
         h
      ),
      1,
      _G_Patterns_.BORDER_FG,
      _G_Patterns_.PANEL_BG
   )
end

return M