module View.Timer
  ( timerView
  ) where

import Html (..)
import Html.Attributes (..)
import Html.Events (..)
import String
import Time (Time)
import Signal

import Model.Timer (..)
import Model.Id (..)

import Update.Update (..)
import Update.UpdateTimer (..)

timerView : (Id, Timer) -> Html
timerView (id, timer) =
  div
    [ class <| "timer" ++ (if timer.isRunning then " isRunning" else "") ]
    [ button
        [ class "name block" ]
        [ text timer.name ]
    , div
        [ class <| "time block" ]
        [ text (timeView timer.currentTime) ]
    , button
        [ class <| "restart block"
        , onClick (Signal.send updates (UpdateTimer id Restart))
        ]
        [ i [ class "fa fa-fw fa-backward" ] [] ]
    , button
        [ class <| "playPause block"
        , onClick (Signal.send updates (UpdateTimer id ToggleRunning))
        ]
        [ let icon = if timer.isRunning then "fa-pause" else "fa-play"
          in  i
                [ class <| "fa fa-fw " ++ icon ]
                []
        ]
    , button
        [ class <| "stop block"
        , onClick (Signal.send updates (UpdateTimer id Stop))
        ]
        [ i [ class "fa fa-fw fa-stop" ] [] ]
    , button
        [ class <| "remove block"
        , onClick (Signal.send updates (RemoveTimer id))
        ]
        [ i [ class "fa fa-fw fa-remove" ] [] ]
    ]

timeView : Time -> String
timeView time =
  let totalSeconds = truncate (time / 1000)
      totalMinutes = totalSeconds // 60
      restSeconds = totalSeconds `rem` 60
  in  (toString totalMinutes) ++ " : " ++ (String.padLeft 2 '0' (toString restSeconds))