pviewer.lua

local _tl_compat; if (tonumber((_VERSION or ''):match('[%d.]*$')) or 0) < 5.3 then local p, m = pcall(require, 'compat53.module'); if p then _tl_compat = m end end; local ipairs = _tl_compat and _tl_compat.ipairs or ipairs; local math = _tl_compat and _tl_compat.math or math; local os = _tl_compat and _tl_compat.os or os; local table = _tl_compat and _tl_compat.table or table; require("button")
require("common")
require("drawstat")
require("layout")
require("love")
require("menu-main")
require("nback")
require("tiledbackground")

local inspect = require("inspect")

local List = require("pviewer_list")
local cam = require("camera").new()
local fonts = require("fonts")
local g = love.graphics
local i18n = require("i18n")
local pallete = require("pallete")
local serpent = require("serpent")

__MORE_DATA__ = false

 Pviewer = {}























local pviewer_mt = {
   __index = Pviewer,
}

function Pviewer.new()
   local self = {
      font = require("fonts").pviewer,
      activeIndex = 0,
   }
   self.w, self.h = g.getDimensions()
   return setmetatable(self, pviewer_mt)
end

function Pviewer:init(save_name)
   print("save_name", save_name)
   self.save_name = save_name
   self:resize(g.getDimensions())


   self.timer = require('Timer').new()
end




function Pviewer:updateRender(index)
   print("updateRender()", index)
   if self.data and index >= 1 and index <= #self.data then
      local data = self.data[index]
      self.statisticRender = require("drawstat").new({
         signals = data.signals,
         pressed = data.pressed,
         level = data.level,
         pause_time = data.pause_time,

         x0 = 0,
         y0 = 0,

         font = self.font,
         border = nback.border,
         durationMin = 0,
         durationSec = 0,
      })
   else
      colprint("no self.data or 'index' out of range")
      self.statisticRender = nil
   end
end

local function removeDataWithoutDateField(data)
   local cleanedData = {}
   for _, v in ipairs(data) do
      if v.date then
         cleanedData[#cleanedData + 1] = v
      end
   end
   return cleanedData
end

function Pviewer:makeList()
   if #self.data ~= 0 then
      self.list = List.new(self.layout.left.x, self.layout.left.y,
      self.layout.left.w, self.layout.left.h, fonts.pviewer)
      self.list.onclick = function(_, idx, _)
         self:updateRender(math.floor(idx))
      end

      local str
      for _, v in ipairs(self.data) do
         str = compareDates(os.date("*t"), v.date)







         local item = self.list:add(str)
         item.data = v

         item.colors = pallete.levelColors[v.level]
      end

      self.list:done()
      self.list.onclick(nil, 1)
   end
end

function Pviewer:sortByDate()
   table.sort(self.data, function(h1, h2)
      local a, b = h1.date, h2.date
      return a.year * 365 * 24 + a.yday * 24 + a.hour > b.year * 365 * 24 + b.yday * 24 + b.hour
   end)
end

function Pviewer:enter()
   print("pviewer:enter()")
   local tmp, _ = love.filesystem.read(self.save_name)
   if tmp ~= nil then

      local ok, t = serpent.load(tmp)
      self.data = t
      if not ok then


         error("Something wrong in restoring data " .. self.save_name)
      end
   else
      self.data = {}
   end











































   if #self.data == 0 then
      print("self.layout", inspect(self.layout))
      self.backButton = Button.new(
      i18n("backToMainMenu"),

      ((self.layout).nodata).top.x,
      ((self.layout).nodata).top.y,
      ((self.layout).nodata).top.w,
      ((self.layout).nodata).top.h)
   else
      self.backButton = Button.new(
      i18n("backToMainMenu"),
      self.layout.top.x,
      self.layout.top.x,
      self.layout.top.x,
      self.layout.top.x)
   end

   self.backButton.onMouseReleased = function()
      mainMenu:goBack()
   end
   self.backButton.bgColor = { 0.208, 0.220, 0.222 }
   self.backButton.font = self.font

   self:sortByDate()
   self:makeList()
   self.data = removeDataWithoutDateField(self.data)
   self.activeIndex = #self.data >= 1 and 1 or 0
   self:updateRender(1)
end

function Pviewer:leave()
   print("pviewer:leave()")
   self.data = nil
end

function Pviewer:resize(neww, newh)

   local w, h = neww, newh
   self:buildLayout()

   self.rt = g.newCanvas(w, h, { format = "normal", msaa = 4 })
   if not self.rt then
      error("Sorry, canvases are not supported!")
   end
end

function Pviewer:buildLayout()
   local screen = {}
   screen.left, screen.right = splitv(makeScreenTable(), 0.2, 0.8)
   screen.right.x = screen.right.x + 3
   screen.right.w = screen.right.w - 3
   screen.top, screen.bottom = splith(screen.right, 0.1, 0.9)

   self.layout_nodata = {}
   self.layout_nodata.top, self.layout_nodata.bottom = splith(makeScreenTable(), 0.2, 0.8)
   self.layout_nodata.top = shrink(self.layout_nodata.top, 3)

   self.layout = screen
end

function Pviewer:drawNodata()
   local str = i18n("nodata")
   g.setFont(self.font)
   g.setColor({ 0, 0, 0, 1 })
   g.printf(str, 0, self.layout_nodata.bottom.y, self.layout_nodata.bottom.w, "center")
end

function Pviewer:draw()
   g.push("all")

   g.clear(pallete.background)
   tiledback:draw(0.3)


   if #self.data == 0 then
      self:drawNodata()
      self.backButton:draw()
   else
      self.list:draw()

      g.setColor({ 1, 1, 1 })
      g.setCanvas(self.rt)
      g.clear(pallete.background)
      cam:attach()
      if self.statisticRender then
         self.statisticRender:beforeDraw()
         local y = self.layout.bottom.y + (self.layout.bottom.h - self.statisticRender:getHitsRectHeight()) / 2
         self.statisticRender:drawHits(self.layout.bottom.x, y)
      end
      cam:detach()
      g.setCanvas()

      g.setColor({ 1, 1, 1 })

      g.draw(self.rt)
   end

   g.pop()
end


function Pviewer:keypressed(key)
   if key == "escape" or key == "acback" then
      mainMenu:goBack()
   elseif key == "return" or key == "space" then

   elseif key == "home" or key == "kp7" then
   elseif key == "end" or key == "kp1" then
   elseif key == "up" or key == "k" then


   elseif key == "down" or key == "j" then


   end
end

function Pviewer:wheelmoved(x, y)
   if self.list then
      self.list:wheelmoved(x, y)
   end
end

function Pviewer:mousepressed(x, y, btn, _)
   if self.list then
      self.list:mousepressed(x, y, btn)
   else
      self.backButton:mousePressed()
   end
end

function Pviewer:mousereleased(x, y, btn, _)
   if self.list then
      self.list:mousereleased(x, y, btn)
   else
      self.backButton:mouseReleased()
   end
end

function Pviewer:mousemoved(x, y, dx, dy)
   local mouse = love.mouse
   if mouse.isDown(2) then
      cam:move(-dx, -dy)
   end
   if self.list then
      self.list:mousemoved(x, y, dx, dy)
   end
end





















function Pviewer:update(dt)
   self.backButton:update(dt)
   self.timer:update(dt)
end





pviewer = Pviewer.new()