//
//  rhlibrary
//
//  The Radio Helsinki Rivendell Library
//
//
//  Copyright (C) 2016 Christian Pointner <equinox@helsinki.at>
//
//  This file is part of rhlibrary.
//
//  rhlibrary is free software: you can redistribute it and/or modify
//  it under the terms of the GNU General Public License as published by
//  the Free Software Foundation, either version 3 of the License, or
//  any later version.
//
//  rhlibrary is distributed in the hope that it will be useful,
//  but WITHOUT ANY WARRANTY; without even the implied warranty of
//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//  GNU General Public License for more details.
//
//  You should have received a copy of the GNU General Public License
//  along with rhlibrary. If not, see <http://www.gnu.org/licenses/>.
//

package main

import (
	"sort"
	"strconv"
	"sync"

	"code.helsinki.at/rhrd-go/player"
	"code.helsinki.at/rhrd-go/rddb"
	"github.com/gotk3/gotk3/glib"
	"github.com/gotk3/gotk3/gtk"
)

var (
	showsMutex       sync.Mutex
	shows            rddb.ShowList
	showsComboBox    *gtk.ComboBoxText
	showsCurrentID   uint
	showsCartListBin *gtk.Bin
	showsCartList    *gtk.Grid
)

func fetchShows(db *rddb.DBChan) (err error) {
	showsMutex.Lock()
	defer showsMutex.Unlock()

	if shows, err = db.GetShowList(rhuser.Username); err != nil {
		return err
	}
	return
}

func updateShows(db *rddb.DBChan) (err error) {
	if err = fetchShows(db); err != nil {
		return
	}

	var keys []int
	for k, _ := range shows {
		keys = append(keys, int(k))
	}
	sort.Ints(keys)

	showsComboBox.RemoveAll()
	for _, showid := range keys {
		showsComboBox.Append(strconv.FormatUint(uint64(showid), 10), shows[uint(showid)].Title)
	}

	if !showsComboBox.SetActiveID(strconv.FormatUint(uint64(showsCurrentID), 10)) {
		showsComboBox.SetActive(0)
	}
	return
}

func selectShow() rddb.ShowListEntry {
	id := showsComboBox.GetActiveID()
	if id == "" {
		return rddb.ShowListEntry{}
	}
	showid64, err := strconv.ParseUint(id, 10, 32)
	if err != nil {
		rhdl.Printf("invalid show-id in combo box: %v", err)
		return rddb.ShowListEntry{}
	}
	showsCurrentID = uint(showid64)

	showsMutex.Lock()
	defer showsMutex.Unlock()

	return shows[showsCurrentID]
}

func addShowComboBox(grid *gtk.Grid, db *rddb.DBChan, p *player.PlayerChan) (err error) {
	var box *gtk.Box
	if box, err = gtk.BoxNew(gtk.ORIENTATION_HORIZONTAL, 10); err != nil {
		return
	}

	var label *gtk.Label
	if label, err = gtk.LabelNew("Sendung auswählen"); err != nil {
		return
	}
	box.PackStart(label, false, false, 0)

	if showsComboBox, err = gtk.ComboBoxTextNew(); err != nil {
		return
	}
	if err = updateShows(db); err != nil {
		return err
	}
	showsComboBox.Connect("changed", func(_ *gtk.ComboBoxText) {
		show := selectShow()
		if show.ID == 0 {
			return
		}

		glib.IdleAdd(func() {
			if err = updateShowCartListRows(show, db, p); err != nil {
				rhdl.Printf("error loading show carts for %d", show.ID)
				return
			}
		})
		rhdl.Printf("show %d is now selected: %s", show.ID, show.Title)
	})

	box.PackStart(showsComboBox, true, true, 0)
	box.SetHExpand(true)

	grid.Attach(box, 1, 1, 1, 1)
	return
}

func addShowCartListEntry(idx int, cart rddb.CartListEntry, p *player.PlayerChan) (err error) {
	var lcart *gtk.Label
	if lcart, err = gtk.LabelNew(strconv.FormatUint(uint64(cart.Number), 10)); err != nil {
		return
	}
	showsCartList.Attach(lcart, 1, idx+1, 1, 1)

	var ltitle *gtk.Label
	if ltitle, err = gtk.LabelNew(cart.Title); err != nil {
		return
	}
	ltitle.SetHExpand(true)
	showsCartList.Attach(ltitle, 2, idx+1, 1, 1)

	var btn *gtk.Button
	if btn, err = gtk.ButtonNewWithLabel("play"); err != nil {
		return
	}
	if len(cart.Cuts) < 1 {
		btn.SetSensitive(false)
	} else {
		btn.Connect("clicked", func(_ *gtk.Button) {
			if err := p.Load(cart.Number, cart.Cuts[0].Number); err != nil {
				rhdl.Println(err) // TODO: feedback at GUI?
				return
			}
			if err := p.Play(); err != nil {
				rhdl.Println(err) // TODO: feedback at GUI?
			}
		})
		if len(cart.Cuts) > 1 {
			rhl.Println("ingoring additionla cuts for show cart %d", cart.Number)
		}
	}
	showsCartList.Attach(btn, 3, idx+1, 1, 1)

	return
}

func updateShowCartListRows(show rddb.ShowListEntry, db *rddb.DBChan, p *player.PlayerChan) (err error) {
	if showsCartList != nil {
		showsCartListBin.Remove(showsCartList)
	}

	if showsCartList, err = gtk.GridNew(); err != nil {
		return
	}
	showsCartList.SetHExpand(true)
	showsCartList.SetVExpand(true)
	showsCartList.SetColumnSpacing(10)

	carts, err := db.GetShowCartList(show)
	if err != nil {
		return err
	}

	for idx, cart := range carts {
		addShowCartListEntry(idx, cart, p)
	}

	showsCartListBin.Add(showsCartList)
	showsCartList.ShowAll()
	return
}

func addShowCartList(grid *gtk.Grid, db *rddb.DBChan, p *player.PlayerChan) (err error) {
	var frame *gtk.Frame
	if frame, err = gtk.FrameNew(""); err != nil {
		return
	}
	showsCartListBin = &frame.Bin
	var cp *gtk.CssProvider

	if cp, err = gtk.CssProviderNew(); err != nil {
		return
	}
	if err = cp.LoadFromData(".frame { border: 0; }"); err != nil {
		return
	}
	var sc *gtk.StyleContext
	if sc, err = frame.GetStyleContext(); err != nil {
		return
	}
	sc.AddProvider(cp, 600) // TOOD: hardcoded value

	var sw *gtk.ScrolledWindow
	if sw, err = gtk.ScrolledWindowNew(nil, nil); err != nil {
		return
	}
	sw.SetHExpand(true)
	sw.SetVExpand(true)
	sw.Add(frame)

	grid.Attach(sw, 1, 2, 1, 1)
	return
}

func getShowsSelectorWidget(db *rddb.DBChan, p *player.PlayerChan) (gtk.IWidget, error) {
	grid, err := gtk.GridNew()
	if err != nil {
		return nil, err
	}
	grid.SetRowSpacing(25)
	grid.SetHExpand(true)
	grid.SetVExpand(true)

	if err = addShowComboBox(grid, db, p); err != nil {
		return nil, err
	}
	if err = addShowCartList(grid, db, p); err != nil {
		return nil, err
	}

	var frame *gtk.Frame
	if frame, err = gtk.FrameNew(""); err != nil {
		return nil, err
	}

	var cp *gtk.CssProvider
	if cp, err = gtk.CssProviderNew(); err != nil {
		return nil, err
	}
	if err = cp.LoadFromData(".frame { border: 0; padding: 25px 42px; }"); err != nil {
		return nil, err
	}
	var sc *gtk.StyleContext
	if sc, err = frame.GetStyleContext(); err != nil {
		return nil, err
	}
	sc.AddProvider(cp, 600) // TOOD: hardcoded value

	frame.Add(grid)

	return frame, nil
}