-- Private class to handle player volume 

local tostring = tostring

local oo                     = require("loop.base")
local os                     = require("os")
local math                   = require("math")

local Framework              = require("jive.ui.Framework")
local Group                  = require("jive.ui.Group")
local Icon                   = require("jive.ui.Icon")
local Label                  = require("jive.ui.Label")
local Popup                  = require("jive.ui.Popup")
local Slider                 = require("jive.ui.Slider")
local Timer                  = require("jive.ui.Timer")
local Window                 = require("jive.ui.Window")

local debug                  = require("jive.utils.debug")
local log                    = require("jive.utils.log").logger("player")


local EVENT_KEY_ALL          = jive.ui.EVENT_KEY_ALL
local EVENT_KEY_DOWN         = jive.ui.EVENT_KEY_DOWN
local EVENT_KEY_UP           = jive.ui.EVENT_KEY_UP
local EVENT_KEY_PRESS        = jive.ui.EVENT_KEY_PRESS
local EVENT_SCROLL           = jive.ui.EVENT_SCROLL

local EVENT_CONSUME          = jive.ui.EVENT_CONSUME
local EVENT_UNUSED           = jive.ui.EVENT_UNUSED

local KEY_GO                 = jive.ui.KEY_GO
local KEY_VOLUME_DOWN        = jive.ui.KEY_VOLUME_DOWN
local KEY_VOLUME_UP          = jive.ui.KEY_VOLUME_UP

-- IR Code and modulation frequence setup. 
-- IR codes based on the RC-5 Spec

local IRFreq    = "0x00008CA0 " -- 36KHz modulation

local M0  = "0x80000002 "  -- pre_data
local M1  = "0x80000379 "  -- Mark 899
local S1  = "0x00000379 "  -- Space 899
local S2  = "0x00016000 "  -- Space 90112

local B0  = M1..S1  -- Bit 0
local B1  = S1..M1  -- Bit 1

local volUp = B1..B1..B1  -- pre_data, Start Bits, Note the third bit should toggle with each key press
volUp = volUp..B1..B0..B0..B1..B1      -- Address 19 -> 10011
volUp = volUp..B0..B1..B0..B0..B0..B0  -- Command 16 -> 010000
-- GGM remove repeats
volUp = IRFreq..volUp..S2

local volDown = B1..B1..B1 -- pre_data,Start Bits, Note the third bit should toggle with each key press
volDown = volDown..B1..B0..B0..B1..B1      -- Address 19 -> 10011
volDown = volDown..B0..B1..B0..B0..B0..B1  -- Command 17 -> 010001
-- GGM remove repeats
volDown = IRFreq..volDown

-- number of volume steps
local VOLUME_STEP = 100 / 40


module(..., oo.class)


local function _updateDisplay(self)
	if self.volume < 0 then
		self.title:setValue(self.applet:string("SLIMBROWSER_VOLUME_MUTED"))
		self.slider:setValue(0)

	else
		self.title:setValue(self.applet:string("SLIMBROWSER_VOLUME"))
		self.slider:setValue(self.volume)
	end
end


local function _openPopup(self)
	if self.popup or not self.player then
		return
	end

	-- we need a local copy of the volume
	self.volume = self.player:getVolume()
	if not self.volume then
		-- don't show the popup if the player state is not loaded
		return
	end

	local popup = Popup("volumePopup")
	popup:setAutoHide(false)

	local title = Label("title", "")
	popup:addWidget(title)

	local slider = Slider("volume")
	slider:setRange(-1, 100, self.volume)
	popup:addWidget(Group("volumeGroup", {
				      Icon("volumeMin"),
				      slider,
				      Icon("volumeMax")
			      }))

	popup:addListener(EVENT_KEY_ALL | EVENT_SCROLL,
			  function(event)
				  return self:event(event)
			  end)

	-- we handle events
	popup.brieflyHandler = false

	-- open the popup
	self.popup = popup
	self.title = title
	self.slider = slider

	_updateDisplay(self)

	popup:showBriefly(2000,
		function()
			self.popup = nil
		end,
		Window.transitionPushPopupUp,
		Window.transitionPushPopupDown
	)
end


local function _updateVolume(self, mute)
	if not self.popup then
		self.timer:stop()
		return
	end

	-- keep the popup window open
	self.popup:showBriefly()

	-- ignore updates while muting
	if self.muting then
		return _updateDisplay(self)
	end

	-- mute?
	if mute then
		self.muting = true
		self.volume = self.player:mute(true)
		return _updateDisplay(self)
	end

	-- accelation
	local now = Framework:getTicks()
	if self.accelDelta ~= self.delta or (now - self.lastUpdate) > 350 then
		self.accelCount = 0
	end

	self.accelCount = math.min(self.accelCount + 1, 20)
	self.accelDelta = self.delta
	self.lastUpdate = now

	-- change volume
	local accel = self.accelCount / 4
	local new = math.abs(self.volume) + self.delta * accel * VOLUME_STEP
	
	if self.delta == 1 then
		_sendIR(KEY_VOLUME_UP)
	elseif self.delta == -1 then
		_sendIR(KEY_VOLUME_DOWN)
	end
	
	if new > 100 then 
		new = 100
	elseif new < 0 then
		new = 0
	end

	self.volume = self.player:volume(new) or self.volume
	_updateDisplay(self)
	
	
end


function __init(self, applet)
	local obj = oo.rawnew(self, {})

	obj.applet = applet
	obj.muting = false
	obj.lastUpdate = 0
	-- GGM 100 was too fast and caused jumps on even the slightest click
	obj.timer = Timer(250, function()
				       _updateVolume(obj)
			       end)

	return obj
end


function setPlayer(self, player)
	self.player = player
end


function event(self, event)
	local onscreen = true
	if not self.popup then
		onscreen = false
		_openPopup(self)
	end

	local type = event:getType()
	
	if type == EVENT_SCROLL then
		local scroll = event:getScroll()

		if scroll > 0 then
			self.delta = 1
		elseif scroll < 0 then
			self.delta = -1
		else
			self.delta = 0
		end
		_updateVolume(self)

	elseif type == EVENT_KEY_PRESS then
		local keycode = event:getKeycode()

		-- GO closes the volume popup
		if keycode & KEY_GO ~= 0 then
			self.popup:showBriefly(0)
			return EVENT_CONSUME
		end

		-- volume + and - for mute
		if keycode & (KEY_VOLUME_UP|KEY_VOLUME_DOWN) == (KEY_VOLUME_UP|KEY_VOLUME_DOWN) then
			_updateVolume(self, self.volume >= 0)
			return EVENT_CONSUME
		end

		-- any other keys forward to the lower window
		if keycode & (KEY_VOLUME_UP|KEY_VOLUME_DOWN) == 0 then
			local lower = self.popup:getLowerWindow()
			if lower then
				Framework:dispatchEvent(lower, event)
			end

			self.popup:showBriefly(0)
			return EVENT_CONSUME
		end

		--handle keyboard volume change
		if (keycode == KEY_VOLUME_UP) then
			self.delta = 1
			_updateVolume(self)
			self.delta = 0
		end
		if (keycode == KEY_VOLUME_DOWN) then
			self.delta = -1
			_updateVolume(self)
			self.delta = 0
		end
					
		return EVENT_CONSUME

	else
		local keycode = event:getKeycode()

		-- we're only interested in volume keys
		if keycode & (KEY_VOLUME_UP|KEY_VOLUME_DOWN) == 0 then
			return EVENT_CONSUME
		end

		-- stop volume update on key up
		if type == EVENT_KEY_UP then
			self.delta = 0
			self.muting = false
			self.timer:stop()
			return EVENT_CONSUME
		end

		-- update volume
		if type == EVENT_KEY_DOWN then
			if keycode == KEY_VOLUME_UP then
				self.delta = 1
			elseif keycode == KEY_VOLUME_DOWN then
				self.delta = -1
			else
				self.delta = 0
			end

			self.timer:restart()
			-- GGM This is redundant and creates multiple adjustments on KEY_DOWN because KEY_PRESS already fired.
			-- if onscreen then
			--	_updateVolume(self)
			-- end

			return EVENT_CONSUME
		end
	end

	return EVENT_CONSUME
end


function _sendIR(keycode)

	 if (keycode == KEY_VOLUME_UP) then
		os.execute("/usr/bin/testir " ..volUp)
	 end

	 if (keycode == KEY_VOLUME_DOWN) then
		os.execute("/usr/bin/testir " ..volDown)
	 end

end

--[[

=head1 LICENSE

Copyright 2007 Logitech. All Rights Reserved.

This file is subject to the Logitech Public Source License Version 1.0. Please see the LICENCE file for details.

=cut
--]]