/*
Copyright © Brian Buller <brian@bullercodeworks.com>

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in
all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
THE SOFTWARE.
*/
package widgets

import (
	"encoding/json"
	"fmt"
	"strings"

	wd "git.bullercodeworks.com/brian/tcell-widgets"
	wh "git.bullercodeworks.com/brian/tcell-widgets/helpers"
	"github.com/gdamore/tcell"
)

type JsonContent struct {
	id string

	valueString string
	contents    []string
	style       tcell.Style
	x, y        int
	w, h        int

	border  []rune
	visible bool
	active  bool
	keyMap  *wd.KeyMap

	editable bool
	value    any

	activeNode []string

	vimMode bool
	cursor  int

	editKey, editVal bool
	editValType      int
}

const (
	JsonTpString = iota
	JsonTpBool
	JsonTpNumber
	JsonTpObject
	JsonTpArray
)

var _ wd.Widget = (*JsonContent)(nil)

func NewJsonContent(id string, style tcell.Style) *JsonContent {
	ret := &JsonContent{}
	ret.Init(id, style)
	return ret
}

func (w *JsonContent) Init(id string, style tcell.Style) {
	w.id = id
	w.style = style
	w.visible = true
	w.keyMap = wd.NewKeyMap(
		wd.NewKey(wd.BuildEK(tcell.KeyUp), func(_ *tcell.EventKey) bool { return w.MoveUp() }),
		wd.NewKey(wd.BuildEK(tcell.KeyDown), func(_ *tcell.EventKey) bool { return w.MoveDown() }),
		wd.NewKey(wd.BuildEK(tcell.KeyEnter), func(ev *tcell.EventKey) bool { return false }),
		wd.NewKey(wd.BuildEK(tcell.KeyPgDn), func(_ *tcell.EventKey) bool { return w.PageDn() }),
		wd.NewKey(wd.BuildEK(tcell.KeyPgUp), func(_ *tcell.EventKey) bool { return w.PageUp() }),
		wd.NewKey(wd.BuildEKr('j'), func(ev *tcell.EventKey) bool {
			if !w.vimMode {
				return false
			}
			return w.MoveDown()
		}),
		wd.NewKey(wd.BuildEKr('k'), func(ev *tcell.EventKey) bool {
			if !w.vimMode {
				return false
			}
			return w.MoveUp()
		}),
		wd.NewKey(wd.BuildEKr('b'), func(ev *tcell.EventKey) bool {
			if !w.vimMode {
				return false
			}
			if ev.Modifiers()&tcell.ModCtrl != 0 {
				return w.PageUp()
			}
			return false
		}),
		wd.NewKey(wd.BuildEKr('f'), func(ev *tcell.EventKey) bool {
			if !w.vimMode {
				return false
			}
			if ev.Modifiers()&tcell.ModCtrl != 0 {
				return w.PageDn()
			}
			return false
		}),
	)
}

func (w *JsonContent) Id() string                         { return w.id }
func (w *JsonContent) HandleResize(ev *tcell.EventResize) { w.w, w.h = ev.Size() }

func (w *JsonContent) GetKeyMap() *wd.KeyMap   { return w.keyMap }
func (w *JsonContent) SetKeyMap(km *wd.KeyMap) { w.keyMap = km }

func (w *JsonContent) HandleKey(ev *tcell.EventKey) bool {
	return w.keyMap.Handle(ev)
}
func (w *JsonContent) HandleTime(ev *tcell.EventTime) {}
func (w *JsonContent) Draw(screen tcell.Screen) {
	if !w.visible {
		return
	}
	x, y := w.x, w.y
	brdSz := 0
	if len(w.border) > 0 {
		brdSz = 2
		wh.BorderFilled(x, y, x+w.w, y+w.h, w.border, w.style, screen)
	}
	x, y = x+1, y+1
	h := w.h - brdSz
	ln := len(w.contents)
	start, end := 0, ln-1
	if ln == 0 {
		return
	}
	if ln > w.h-2 {
		mid := h / 2
		if w.cursor < mid {
			// contents need to start at 0
			end = h + 1
		} else if w.cursor > ln-mid {
			// contents need to begin at ln-h
			start = ln - h + 1
		} else {
			start = w.cursor - mid
			end = start + h + 1
		}
	}
	// ed cannot be higher than ln-1
	if start < 0 {
		start = 0
	}
	if end > ln-1 {
		end = ln - 1
	}
	for i := start; i <= end; i++ {
		stl := w.style
		dim := i != w.cursor
		if dim {
			stl = stl.Foreground(tcell.ColorGreen)
		}
		txt := w.contents[i]
		if len(txt) > w.w-brdSz && w.w-brdSz >= 0 {
			txt = txt[:(w.w - brdSz)]
		}
		if w.editable {
			w.drawEditableLine(screen, i, w.x, y, txt, stl, dim)
		} else {
			w.drawReadOnlyLine(screen, i, w.x, y, txt, stl, dim)
		}
		y++
	}
}
func (w *JsonContent) drawReadOnlyLine(screen tcell.Screen, idx, x, y int, txt string, stl tcell.Style, dim bool) {
	wh.DrawText(x, y, txt, stl.Dim(dim).Bold(!dim), screen)
}
func (w *JsonContent) drawEditableLine(screen tcell.Screen, idx, x, y int, txt string, stl tcell.Style, dim bool) {
	parseQuoted := func(txt string) (string, string) {
		var v string
		var slash bool
		for i := range txt {
			if txt[i] == '\\' {
				slash = true
			} else if slash {
				slash = false
			} else if txt[i] == '"' {
				return v, txt[i+1:]
			}
			v = fmt.Sprintf("%s%c", v, txt[i])
		}
		// We didn't hit an ending quote
		return v, ""
	}
	var key, val, wrk string
	// The key should be a quoted value
	for i := range txt {
		if txt[i] == '"' && len(txt) > i {
			key, wrk = parseQuoted(txt[i:])
			break
		}
	}
	txt = strings.Trim(wrk, ": ")
	if len(txt) > 0 {
		switch txt[0] {
		case '"':
			val, wrk = parseQuoted(txt[1:])
			w.editValType = JsonTpString
		case '{':
			w.editValType = JsonTpObject
		case '[':
			w.editValType = JsonTpArray
		default:
			if txt == "true" || txt == "false" {
				// Editing a boolean value
				w.editValType = JsonTpBool
			} else {
				// Must be a number, right?
				w.editValType = JsonTpNumber
			}
		}
	}

	keyStr := fmt.Sprintf("%s: ", key)
	wh.DrawText(w.x, y, keyStr, stl.Dim(dim).Bold(!dim), screen)
	wh.DrawText(w.x, y+len(keyStr), val, stl.Dim(dim).Bold(!dim), screen)
}

func (w *JsonContent) SetStyle(s tcell.Style) { w.style = s }
func (w *JsonContent) Active() bool           { return w.active }
func (w *JsonContent) SetActive(a bool) bool {
	w.active = a
	return w.active
}
func (w *JsonContent) Visible() bool      { return w.visible }
func (w *JsonContent) SetVisible(a bool)  { w.visible = a }
func (w *JsonContent) SetX(x int)         { w.x = x }
func (w *JsonContent) SetY(y int)         { w.y = y }
func (w *JsonContent) GetX() int          { return w.x }
func (w *JsonContent) GetY() int          { return w.y }
func (w *JsonContent) GetPos() wd.Coord   { return wd.Coord{X: w.x, Y: w.y} }
func (w *JsonContent) SetPos(c wd.Coord)  { w.x, w.y = c.X, c.Y }
func (w *JsonContent) SetW(x int)         { w.w = x }
func (w *JsonContent) SetH(y int)         { w.h = y }
func (w *JsonContent) GetW() int          { return w.w }
func (w *JsonContent) GetH() int          { return w.h }
func (w *JsonContent) WantW() int         { return wh.Longest(w.contents) }
func (w *JsonContent) WantH() int         { return len(w.contents) }
func (w *JsonContent) SetSize(c wd.Coord) { w.w, w.h = c.X, c.Y }
func (w *JsonContent) MinW() int          { return wh.Longest(w.contents) }
func (w *JsonContent) MinH() int          { return len(w.contents) }

func (w *JsonContent) SetValue(v any) error {
	w.value = v
	// Go ahead and try to build the json for v
	bts, err := json.MarshalIndent(v, "", "  ")
	if err != nil {
		return fmt.Errorf("error unmarshalling value: %w", err)
	}
	w.valueString = string(bts)
	w.contents = strings.Split(w.valueString, "\n")
	return nil
}
func (w *JsonContent) SetBorder(brd []rune) {
	if len(brd) == 0 {
		w.border = wh.BRD_SIMPLE
	} else {
		w.border = wh.ValidateBorder(brd)
	}
}

func (w *JsonContent) SetEditable(v bool) { w.editable = v }

/*
	func (w *JsonContent) SetJsonContent(txt string) {
		w.text = txt
		if strings.Contains(w.text, "\n") {
			w.contents = strings.Split(w.text, "\n")
		} else {
			w.contents = []string{w.text}
		}
	}

func (w *JsonContent) GetJsonContent() string { return w.text }
func (w *JsonContent) GetContents() []string { return w.contents }
*/

func (w *JsonContent) SetVimMode(b bool) { w.vimMode = b }
func (w *JsonContent) MoveUp() bool {
	w.cursor--
	if w.cursor < 0 {
		w.cursor = 0
	}
	return true
}
func (w *JsonContent) MoveDown() bool {
	w.cursor++
	if w.cursor >= len(w.contents) {
		w.cursor = len(w.contents) - 1
	}
	return true
}
func (w *JsonContent) PageUp() bool {
	w.cursor -= w.h
	if w.cursor < 0 {
		w.cursor = 0
	}
	return true
}
func (w *JsonContent) PageDn() bool {
	w.cursor += w.h
	if w.cursor > len(w.contents)-1 {
		w.cursor = len(w.contents) - 1
	}
	return true
}

func (w *JsonContent) GetSelectedValue() string {
	if w.cursor >= len(w.contents) {
		w.cursor = len(w.contents) - 1
	}
	var ret string
	ret = w.contents[w.cursor]
	ret = ret[strings.Index(ret, "\": \"")+3:]
	ret = ret[1 : len(ret)-1]
	return ret
}