// This is not done yet
package markup

import (
	"fmt"
	"html"
	"regexp"
	"strings"

	"github.com/bouncepaw/mycorrhiza/util"
)

// A Mycomarkup-formatted document
type MycoDoc struct {
	// data
	hyphaName string
	contents  string
	// indicators
	parsedAlready bool
	// results
	ast           []Line
	html          string
	firstImageURL string
	description   string
}

// Constructor
func Doc(hyphaName, contents string) *MycoDoc {
	md := &MycoDoc{
		hyphaName: hyphaName,
		contents:  contents,
	}
	return md
}

func (md *MycoDoc) Lex(recursionLevel int) *MycoDoc {
	if !md.parsedAlready {
		md.ast = md.lex()
	}
	md.parsedAlready = true
	return md
}

// AsHtml returns an html representation of the document
func (md *MycoDoc) AsHTML() string {
	md.html = Parse(md.Lex(0).ast, 0, 0, 0)
	return md.html
}

// Used to clear opengraph description from html tags. This method is usually bad because of dangers of malformed HTML, but I'm going to use it only for Mycorrhiza-generated HTML, so it's okay. The question mark is required; without it the whole string is eaten away.
var htmlTagRe = regexp.MustCompile(`<.*?>`)

// OpenGraphHTML returns an html representation of og: meta tags.
func (md *MycoDoc) OpenGraphHTML() string {
	md.ogFillVars()
	return strings.Join([]string{
		ogTag("title", md.hyphaName),
		ogTag("type", "article"),
		ogTag("image", md.firstImageURL),
		ogTag("url", util.URL+"/page/"+md.hyphaName),
		ogTag("determiner", ""),
		ogTag("description", htmlTagRe.ReplaceAllString(md.description, "")),
	}, "\n")
}

func (md *MycoDoc) ogFillVars() *MycoDoc {
	foundDesc := false
	md.firstImageURL = HyphaImageForOG(md.hyphaName)
	for _, line := range md.ast {
		switch v := line.contents.(type) {
		case string:
			if !foundDesc {
				md.description = v
				foundDesc = true
			}
		case Img:
			if len(v.entries) > 0 {
				md.firstImageURL = v.entries[0].path.String()
			}
		}
	}
	return md
}

func ogTag(property, content string) string {
	return fmt.Sprintf(`<meta property="og:%s" content="%s"/>`, property, content)
}

/* The rest of this file is currently unused. TODO: use it I guess */

type BlockType int

const (
	BlockH1 = iota
	BlockH2
	BlockH3
	BlockH4
	BlockH5
	BlockH6
	BlockRocket
	BlockPre
	BlockQuote
	BlockPara
)

type CrawlWhere int

const (
	inSomewhere = iota
	inPre
	inEnd
)

func crawl(name, content string) []string {
	stateStack := []CrawlWhere{inSomewhere}

	startsWith := func(token string) bool {
		return strings.HasPrefix(content, token)
	}

	pop := func() {
		stateStack = stateStack[:len(stateStack)-1]
	}

	push := func(s CrawlWhere) {
		stateStack = append(stateStack, s)
	}

	readln := func(c string) (string, string) {
		parts := strings.SplitN(c, "\n", 1)
		return parts[0], parts[1]
	}

	preAcc := ""
	line := ""

	for {
		switch stateStack[0] {
		case inSomewhere:
			switch {
			case startsWith("```"):
				push(inPre)
				_, content = readln(content)
			default:
			}
		case inPre:
			switch {
			case startsWith("```"):
				pop()
				_, content = readln(content)
			default:
				line, content = readln(content)
				preAcc += html.EscapeString(line)
			}
		}
	}

	return []string{}
}