package eqn

import "fmt"

type RecordType uint8
type OptionType uint8

const (
	END            RecordType = 0
	LINE           RecordType = 1
	CHAR           RecordType = 2
	TMPL           RecordType = 3
	PILE           RecordType = 4
	MATRIX         RecordType = 5
	EMBELL         RecordType = 6
	RULER          RecordType = 7
	FONT_STYLE_DEF RecordType = 8
	SIZE           RecordType = 9
	FULL           RecordType = 10
	SUB            RecordType = 11
	SUB2           RecordType = 12
	SYM            RecordType = 13
	SUBSYM         RecordType = 14
	COLOR          RecordType = 15
	COLOR_DEF      RecordType = 16
	FONT_DEF       RecordType = 17
	EQN_PREFS      RecordType = 18
	ENCODING_DEF   RecordType = 19
	FUTURE         RecordType = 100
	ROOT           RecordType = 255
)

const (
	MtefOptNudge           OptionType = 0x08
	MtefOptCharEmbell      OptionType = 0x01
	MtefOptCharFuncStart   OptionType = 0x02
	MtefOptCharEncChar8    OptionType = 0x04
	MtefOptCharEncChar16   OptionType = 0x10
	MtefOptCharEncNoMtcode OptionType = 0x20
	MtefOptLineNull        OptionType = 0x01
	mtefOPT_LP_RULER       OptionType = 0x02
	MtefOptLineLspace      OptionType = 0x04
	MtefOptLpRuler         OptionType = 0x02
	MtefColorCmyk          OptionType = 0x01
	MtefColorSpot          OptionType = 0x02
	MtefColorName          OptionType = 0x04
	mtefCOLOR_CMYK         OptionType = 0x01
	mtefCOLOR_SPOT         OptionType = 0x02
	mtefCOLOR_NAME         OptionType = 0x04
)

const (
	fnTEXT     uint8 = 1
	fnFUNCTION uint8 = 2
	fnVARIABLE uint8 = 3
	fnLCGREEK  uint8 = 4
	fnUCGREEK  uint8 = 5
	fnSYMBOL   uint8 = 6
	fnVECTOR   uint8 = 7
	fnNUMBER   uint8 = 8
	fnUSER1    uint8 = 9
	fnUSER2    uint8 = 10
	fnMTEXTRA  uint8 = 11
	fnTEXT_FE  uint8 = 12
	fnEXPAND   uint8 = 22
	fnMARKER   uint8 = 23
	fnSPACE    uint8 = 24
)

type MtTabStop struct {
	next   *MtTabStop
	_type  int16
	offset int16
}

type MtRuler struct {
	nStops      int16
	tabStopList *MtTabStop
}

type MtLine struct {
	nudgeX     int16
	nudgeY     int16
	lineSpace  uint8
	null       bool
	ruler      *MtRuler
	objectList *MtObjList
}

type MtEmbell struct {
	next   *MtEmbell
	nudgeX int16
	nudgeY int16
	embell uint8
}

type MtChar struct {
	nudgeX   int16
	nudgeY   int16
	options  uint8
	typeface uint8
	//16-bit integer MTCode value
	mtcode uint16
	//8-bit font position
	bits8 uint8
	//16-bit integer font position
	bits16         uint16
	embellishments *MtEmbell
}

type MtEqnPrefs struct {
	sizes  []string
	spaces []string
	styles []byte
}

type MtSize struct {
	lsize uint8
	dsize uint8
}

type MtfontStyleDef struct {
	fontDefIndex uint8
	name         string
}

type MtfontDef struct {
	encDefIndex uint8
	name        string
}

type MtColorDefIndex struct {
	index uint8
}

type MtColorDef struct {
	values []uint8
	name   string
}

type MtObjList struct {
	next   *MtObjList
	tag    RecordType
	objPtr []MtObject
}

type MtTmpl struct {
	nudgeX     int16
	nudgeY     int16
	selector   uint8
	variation  uint16
	options    uint8
	objectList *MtObjList
}

type MtPile struct {
	nudgeX int16
	nudgeY int16
	halign uint8
	valign uint8

	//ruler可以不读，不影响后面字节错位，因为这个是一个完整的额外record数据
	ruler *MtRuler

	//objectList可以不读，不影响后面字节错位，因为这个是一个完整的额外record数据
	objectList *MtObjList
}

type MtMatrix struct {
	nudgeX int16
	nudgeY int16
	valign uint8
	h_just uint8
	v_just uint8

	rows uint8
	cols uint8

	//row_parts uint8
	//col_parts uint8

	//objectList可以不读，不影响后面字节错位，因为这个是一个完整的额外record数据
	objectList *MtObjList
}

type MtEmbellRd struct {
	options    uint8
	nudgeX     int16
	nudgeY     int16
	embellType uint8
}

type MtAST struct {
	tag      RecordType
	value    MtObject
	children []*MtAST
}

type MtObject interface{}

func (ast *MtAST) debug(indent int) {
	fmt.Printf("> %#v MtAST %#v\n", indent, ast)
	indent += 1
	for _, ele := range ast.children {
		ele.debug(indent)
	}
}

type SelectorType uint8

//Template selectors and variations:
const (
	//Fences (parentheses, etc.):
	//selector	symbol	description	class
	tmANGLE   SelectorType = 0 //	angle brackets	ParBoxClass
	tmPAREN   SelectorType = 1 //	parentheses	ParBoxClass
	tmBRACE   SelectorType = 2 //	braces (curly brackets)	ParBoxClass
	tmBRACK   SelectorType = 3 //	square brackets	ParBoxClass
	tmBAR     SelectorType = 4 //	vertical bars	ParBoxClass
	tmDBAR    SelectorType = 5 //	double vertical bars	ParBoxClass
	tmFLOOR   SelectorType = 6 //	floor brackets	ParBoxClass
	tmCEILING SelectorType = 7 //	ceiling brackets	ParBoxClass
	tmOBRACK  SelectorType = 8 //	open (white) brackets	ParBoxClass
	//variations	variation bits	symbol	description
	//0×0001	tvFENCE_L	left fence is present
	//0×0002	tvFENCE_R	right fence is present

	//Intervals:
	//selector	symbol	description	class
	tmINTERVAL SelectorType = 9 //	unmatched brackets and parentheses	ParBoxClass
	//variations	variation bits	symbol	description
	//0×0000	tvINTV_LEFT_LP	left fence is left parenthesis
	//0×0001	tvINTV_LEFT_RP	left fence is right parenthesis
	//0×0002	tvINTV_LEFT_LB	left fence is left bracket
	//0×0003	tvINTV_LEFT_RB	left fence is right bracket
	//0×0000	tvINTV_RIGHT_LP	right fence is left parenthesis
	//0×0010	tvINTV_RIGHT_RP	right fence is right parenthesis
	//0×0020	tvINTV_RIGHT_LB	right fence is left bracket
	//0×0030	tvINTV_RIGHT_RB	right fence is right bracket

	//Radicals (square and nth roots):
	//selector	symbol	description	class
	tmROOT SelectorType = 10 //	radical	RootBoxClass
	//variations	variation	symbol	description
	//0	tvROOT_SQ	square root
	//1	tvROOT_NTH	nth root

	//Fractions:
	//selector	symbol	description	class
	tmFRACT SelectorType = 11 //	fractions
	//variations	variation bits	symbol	description
	//0×0001	tvFR_SMALL	subscript-size slots (piece fraction)
	//0×0002	tvFR_SLASH	fraction bar is a slash
	//0×0004	tvFR_BASE	num. and denom. are baseline aligned

	//Over and Underbars:
	//selector	symbol	description	class
	tmUBAR SelectorType = 12 //	underbar	BarBoxClass
	tmOBAR SelectorType = 13 //	overbar	BarBoxClass
	//variations	variation bits	symbol	description
	//0×0001	tvBAR_DOUBLE	bar is doubled, else single

	//Arrows:
	//selector	symbol	description	class
	tmARROW SelectorType = 14 //	arrow	ArroBoxClass
	//variations	variation	symbol	description
	//0×0000	tvAR_SINGLE	single arrow
	//0×0001	tvAR_DOUBLE	double arrow
	//0×0002	tvAR_HARPOON	harpoon
	//0×0004	tvAR_TOP	top slot is present
	//0×0008	tvAR_BOTTOM	bottom slot is present
	//0×0010	tvAR_LEFT	if single, arrow points left
	//0×0020	tvAR_RIGHT	if single, arrow points right
	//0×0010	tvAR_LOS	if double or harpoon, large over small
	//0×0020	tvAR_SOL	if double or harpoon, small over large

	//Integrals (see Limit Variations):
	//selector	symbol	description	class
	tmINTEG SelectorType = 15 //	integral	BigOpBoxClass
	//variations	variation	symbol	description
	//0×0001	tvINT_1	single integral sign
	//0×0002	tvINT_2	double integral sign
	//0×0003	tvINT_3	triple integral sign
	//0×0004	tvINT_LOOP	has loop w/o arrows
	//0×0008	tvINT_CW_LOOP	has clockwise loop
	//0×000C	tvINT_CCW_LOOP	has counter-clockwise loop
	//0×0100	tvINT_EXPAND	integral signs expand

	//Sums, products, coproducts, unions, intersections, etc. (see Limit Variations):
	//selector	symbol	description	class
	tmSUM    SelectorType = 16 //	sum	BigOpBoxClass
	tmPROD   SelectorType = 17 //	product	BigOpBoxClass
	tmCOPROD SelectorType = 18 //	coproduct	BigOpBoxClass
	tmUNION  SelectorType = 19 //	union	BigOpBoxClass
	tmINTER  SelectorType = 20 //	intersection	BigOpBoxClass
	tmINTOP  SelectorType = 21 //	integral-style big operator	BigOpBoxClass
	tmSUMOP  SelectorType = 22 //	summation-style big operator	BigOpBoxClass

	//Limits (see Limit Variations):
	//selector	symbol	description	class
	tmLIM SelectorType = 23 //	limits	LimBoxClass
	//variations	variation	symbol	description
	//0	tvSUBAR	single underbar
	//1	tvDUBAR	double underbar

	//Horizontal braces and brackets:
	//selector	symbol	description	class
	tmHBRACE SelectorType = 24 //	horizontal brace	HFenceBoxClass
	tmHBRACK SelectorType = 25 //	horizontal bracket	HFenceBoxClass
	//variations	variation	symbol	description
	//0×0001	tvHB_TOP	slot is on the top, else on the bottom

	//Long division:
	//selector	symbol	description	class
	tmLDIV SelectorType = 26 //	long division	LDivBoxClass
	//variations	variation	symbol	description
	//0×0001	tvLD_UPPER	upper slot is present

	//Subscripts and superscripts:
	//selector	symbol	description	class
	tmSUB    SelectorType = 27 //	subscript	ScrBoxClass
	tmSUP    SelectorType = 28 //	superscript	ScrBoxClass
	tmSUBSUP SelectorType = 29 //	subscript and superscript	ScrBoxClass
	//variations	variation	symbol	description
	//0×0001	tvSU_PRECEDES	script precedes scripted item,

	//else follows
	//Dirac bra-ket notation:
	//selector	symbol	description	class
	tmDIRAC SelectorType = 30 //	bra-ket notation	DiracBoxClass
	//variations	variation	symbol	description
	//0×0001	tvDI_LEFT	left part is present
	//0×0002	tvDI_RIGHT	right part is present

	//Vectors:
	//selector	symbol	description	class
	tmVEC SelectorType = 31 //	vector	HatBoxClass
	//variations	variation	symbol	description
	//0×0001	tvVE_LEFT	arrow points left
	//0×0002	tvVE_RIGHT	arrow points right
	//0×0004	tvVE_UNDER	arrow under slot, else over slot
	//0×0008	tvVE_HARPOON	harpoon

	//Hats, arcs, tilde, joint status:
	//selector	symbol	description	class
	tmTILDE   SelectorType = 32 //	tilde over characters	HatBoxClass
	tmHAT     SelectorType = 33 //	hat over characters	HatBoxClass
	tmARC     SelectorType = 34 //	arc over characters	HatBoxClass
	tmJSTATUS SelectorType = 35 //	joint status construct	HatBoxClass

	//Overstrikes (cross-outs):
	//selector	symbol	description	class
	tmSTRIKE SelectorType = 36 //	overstrike (cross-out)	StrikeBoxClass
	//variations	variation	symbol	description
	//0×0001	tvST_HORIZ	line is horizontal, else slashes
	//0×0002	tvST_UP	if slashes, slash from lower-left to upper-right is present
	//0×0004	tvST_DOWN	if slashes, slash from upper-left to lower-right is present

	//Boxes:
	//selector	symbol	description	class
	tmBOX SelectorType = 37 //	box	TBoxBoxClass
	//variations	variation	symbol	description
	//0×0001	tvBX_ROUND	corners are round, else square
	//0×0002	tvBX_LEFT	left side is present
	//0×0004	tvBX_RIGHT	right side is present
	//0×0008	tvBX_TOP	top side is present
	//0×0010	tvBX_BOTTOM	bottom side is present
)

type EmbellType uint8

const (
	emb1DOT      EmbellType = 2
	emb2DOT      EmbellType = 3
	emb3DOT      EmbellType = 4
	emb1PRIME    EmbellType = 5
	emb2PRIME    EmbellType = 6
	embBPRIME    EmbellType = 7
	embTILDE     EmbellType = 8
	embHAT       EmbellType = 9
	embNOT       EmbellType = 10
	embRARROW    EmbellType = 11
	embLARROW    EmbellType = 12
	embBARROW    EmbellType = 13
	embR1ARROW   EmbellType = 14
	embL1ARROW   EmbellType = 15
	embMBAR      EmbellType = 16
	embOBAR      EmbellType = 17
	emb3PRIME    EmbellType = 18
	embFROWN     EmbellType = 19
	embSMILE     EmbellType = 20
	embX_BARS    EmbellType = 21
	embUP_BAR    EmbellType = 22
	embDOWN_BAR  EmbellType = 23
	emb4DOT      EmbellType = 24
	embU_1DOT    EmbellType = 25
	embU_2DOT    EmbellType = 26
	embU_3DOT    EmbellType = 27
	embU_4DOT    EmbellType = 28
	embU_BAR     EmbellType = 29
	embU_TILDE   EmbellType = 30
	embU_FROWN   EmbellType = 31
	embU_SMILE   EmbellType = 32
	embU_RARROW  EmbellType = 33
	embU_LARROW  EmbellType = 34
	embU_BARROW  EmbellType = 35
	embU_R1ARROW EmbellType = 36
	embU_L1ARROW EmbellType = 37
)