package wiki

import (
	"path"
	"strings"

	ice "shylinux.com/x/icebergs"
	"shylinux.com/x/icebergs/base/ctx"
	"shylinux.com/x/icebergs/base/lex"
	"shylinux.com/x/icebergs/base/mdb"
	"shylinux.com/x/icebergs/base/nfs"
	"shylinux.com/x/icebergs/base/web"
	kit "shylinux.com/x/toolkits"
)

func _name(m *ice.Message, arg []string) []string {
	if len(arg) == 1 {
		return []string{"", arg[0]}
	}
	return arg
}
func _option(m *ice.Message, kind, name, text string, arg ...string) *ice.Message {
	m.Option(mdb.TYPE, kind)
	m.Option(mdb.NAME, name)
	m.Option(mdb.TEXT, text)

	extra := kit.Dict()
	m.Optionv(mdb.EXTRA, extra)
	for i := 0; i < len(arg)-1; i += 2 {
		extra[arg[i]] = kit.Format(kit.Parse(nil, "", kit.Split(arg[i+1])...))
	}
	return m
}

func _wiki_path(m *ice.Message, arg ...string) string {
	return path.Join(mdb.Config(m, nfs.PATH), path.Join(arg...))
}
func _wiki_link(m *ice.Message, text string) string {
	if !kit.HasPrefix(text, ice.PS, ice.HTTP) {
		text = path.Join(web.SHARE_LOCAL, _wiki_path(m, text))
	}
	return text
}
func _wiki_list(m *ice.Message, arg ...string) bool {
	if m.Option(nfs.DIR_ROOT, _wiki_path(m)); len(arg) == 0 || kit.HasSuffix(arg[0], ice.PS) {
		if m.Option(nfs.DIR_DEEP) != ice.TRUE {
			m.Cmdy(nfs.DIR, kit.Slice(arg, 0, 1), kit.Dict(nfs.DIR_TYPE, nfs.DIR))
		}
		m.Cmdy(nfs.DIR, kit.Slice(arg, 0, 1), kit.Dict(nfs.DIR_TYPE, nfs.CAT, nfs.DIR_REG, mdb.Config(m, lex.REGEXP)))
		m.StatusTimeCount()
		m.SortTimeR(mdb.TIME)
		return true
	}
	ctx.DisplayLocal(m, path.Join(kit.PathName(2), kit.Keys(kit.FileName(2), ice.JS)))
	return false
}
func _wiki_show(m *ice.Message, name string, arg ...string) {
	m.Cmdy(nfs.CAT, name, kit.Dict(nfs.DIR_ROOT, _wiki_path(m)))
}
func _wiki_save(m *ice.Message, name, text string, arg ...string) {
	m.Cmd(nfs.SAVE, name, text, kit.Dict(nfs.DIR_ROOT, _wiki_path(m)))
}
func _wiki_upload(m *ice.Message, dir string) {
	m.Cmdy(web.CACHE, web.WATCH, m.Option(ice.MSG_UPLOAD), _wiki_path(m, dir, m.Option(mdb.NAME)))
}
func _wiki_template(m *ice.Message, name, text string, arg ...string) *ice.Message {
	return _option(m, m.CommandKey(), name, strings.TrimSpace(text), arg...).RenderTemplate(mdb.Config(m, nfs.TEMPLATE), &Message{m})
}

const WIKI = "wiki"

var Index = &ice.Context{Name: WIKI, Help: "文档中心"}

func init() {
	web.Index.Register(Index, &web.Frame{},
		TITLE, BRIEF, REFER, SPARK, FIELD, PARSE,
		ORDER, TABLE, CHART, IMAGE, VIDEO, AUDIO,
		FEEL, DRAW, DATA, WORD,
	)
}
func Prefix(arg ...string) string { return web.Prefix(WIKI, kit.Keys(arg)) }

func WikiAction(dir string, ext ...string) ice.Actions {
	return ice.Actions{ice.CTX_INIT: mdb.AutoConfig(nfs.PATH, dir, lex.REGEXP, kit.FileReg(ext...)),
		web.UPLOAD: {Hand: func(m *ice.Message, arg ...string) { _wiki_upload(m, m.Option(nfs.PATH)) }},
		nfs.TRASH:  {Name: "trash path*", Hand: func(m *ice.Message, arg ...string) { nfs.Trash(m, _wiki_path(m, m.Option(nfs.PATH))) }},
		nfs.SAVE:   {Name: "save path* text", Hand: func(m *ice.Message, arg ...string) { _wiki_save(m, m.Option(nfs.PATH), m.Option(mdb.TEXT)) }},
		mdb.INPUTS: {Hand: func(m *ice.Message, arg ...string) {
			switch arg[0] {
			case nfs.PATH:
				m.Option(nfs.DIR_REG, mdb.Config(m, lex.REGEXP))
				m.Cmdy(nfs.DIR, path.Join(mdb.Config(m, nfs.PATH), kit.Select("", arg, 1)))
			case ctx.INDEX:
				m.Cmdy(ctx.COMMAND, mdb.SEARCH, ctx.COMMAND, ice.OptionFields(ctx.INDEX))
			}
		}},
	}
}

type Message struct{ *ice.Message }

func (m *Message) OptionTemplate() string {
	res := []string{`class="story"`}
	add := func(pre, key string) {
		if m.Option(key) != "" {
			res = append(res, kit.Format(`%s%s="%s"`, pre, key, m.Option(key)))
		}
	}
	for _, key := range kit.Split("type,name,text") {
		if key == mdb.TEXT && m.Option(mdb.TYPE) == SPARK {
			continue
		}
		add("data-", key)
	}
	kit.Fetch(m.Optionv(mdb.EXTRA), func(key string, value string) {
		switch key {
		case PADDING:
			return
		}
		if !strings.Contains(key, "-") {
			add("data-", key)
		}
	})
	for _, key := range kit.Split(ctx.STYLE) {
		add("", key)
	}
	return kit.Join(res, ice.SP)
}
func (m *Message) OptionKV(key ...string) string {
	res := []string{}
	for _, k := range kit.Split(kit.Join(key)) {
		if m.Option(k) != "" {
			res = append(res, kit.Format("%s='%s'", k, m.Option(k)))
		}
	}
	return kit.Join(res, ice.SP)
}