//go:build !hilbiline
// +build !hilbiline

package main

// Here we define a generic interface for readline and hilbiline,
// making them interchangable during build time
// this is normal readline

import (
	"path/filepath"
	"strings"
	"os"

	"github.com/Rosettea/readline"
	"github.com/yuin/gopher-lua"
)

type LineReader struct {
	Prompt string
}

func NewLineReader(prompt string) *LineReader {
	readline.Completer = func(query string, ctx string) []string {
		var completions []string
		// trim whitespace from ctx
		ctx = strings.TrimLeft(ctx, " ")
		fields := strings.Split(ctx, " ")

		if len(fields) == 0 {
			return nil
		}

		if len(fields) == 1 {
			prefixes := []string{"./", "../"}
			for _, prefix := range prefixes {
				if strings.HasPrefix(query, prefix) {
					if matches, err := filepath.Glob(query + "*"); err == nil {
						for _, match := range matches {
							if info, err := os.Stat(match); err == nil && info.Mode().Perm() & 0100 == 0 {
								continue
							}
							name := filepath.Base(match)
							completions = append(completions, name)
						}
					}
					if len(completions) == 1 {
						// we have add the base dir of query since the completion entries are basename
						// why? so readline will display just that
						// and we want to complete the full path when its the only completion entry
						// query will be incomplete so adding it will be broken
						// also Dir doesn't have a trailing slash so we need to filepath join
						// to account to windows
						// AND ANOTHER THING is it returns . if the arg is ./ and Join will
						// ignore that so we have to check and just add the prefix instead
						if prefix != "./" {
							completions[0] = filepath.Join(filepath.Dir(query), completions[0])
						} else {
							completions[0] = prefix + completions[0]
						}
					}
					return completions
				}
			}

			for _, dir := range filepath.SplitList(os.Getenv("PATH")) {
				// print dir to stderr for debugging
				// search for an executable which matches our query string
				if matches, err := filepath.Glob(filepath.Join(dir, query + "*")); err == nil {
					// get basename from matches
					for _, match := range matches {
						// check if we have execute permissions for our match
						if info, err := os.Stat(match); err == nil && info.Mode().Perm() & 0100 == 0 {
							continue
						}
						// get basename from match
						name := filepath.Base(match)
						// print name to stderr for debugging
						// add basename to completions
						completions = append(completions, name)
					}
				}
			}
			// add lua registered commands to completions
			for cmdName := range commands {
				if strings.HasPrefix(cmdName, query) {
					completions = append(completions, cmdName)
				}
			}
		} else {
			if completecb, ok := luaCompletions["command." + fields[0]]; ok {
				err := l.CallByParam(lua.P{
					Fn: completecb,
					NRet: 1,
					Protect: true,
				})

				if err != nil {
					return []string{}
				}

				luacompleteTable := l.Get(-1)
				l.Pop(1)

				if cmpTbl, ok := luacompleteTable.(*lua.LTable); ok {
					cmpTbl.ForEach(func(key lua.LValue, value lua.LValue) {
						// print key and value to stderr for debugging
						// if key is a number (index), we just check and complete that
						if key.Type() == lua.LTNumber {
							// if we have only 2 fields then this is fine
							if len(fields) == 2 {
								if strings.HasPrefix(value.String(), fields[1]) {
									completions = append(completions, value.String())
								}
							}
						} else if key.Type() == lua.LTString {
							if len(fields) == 2 {
								if strings.HasPrefix(key.String(), fields[1]) {
									completions = append(completions, key.String())
								}
							} else {
								// if we have more than 2 fields, we need to check if the key matches
								// the current field and if it does, we need to check if the value is a string
								// or table (nested sub completions)
								if key.String() == fields[1] {
									// if value is a table, we need to iterate over it
									// and add each value to completions
									valueTbl := value.(*lua.LTable)
									valueTbl.ForEach(func(key lua.LValue, value lua.LValue) {
										val := value.String()
										if val == "<file>" {
											// complete files
											completions = append(completions, readline.FilenameCompleter(query, ctx)...)
										} else {
											if strings.HasPrefix(val, query) {
												completions = append(completions, val)
											}
										}
									})
								}
							}
						}
					})
				}
			}

			if len(completions) == 0 {
				completions = readline.FilenameCompleter(query, ctx)
			}
		}
		return completions
	}
	readline.LoadHistory(defaultHistPath)

	return &LineReader{
		Prompt: prompt,
	}
}

func (lr *LineReader) Read() (string, error) {
	hooks.Em.Emit("command.precmd", nil)
	return readline.String(lr.Prompt)
}

func (lr *LineReader) SetPrompt(prompt string) {
	lr.Prompt = prompt
}

func (lr *LineReader) AddHistory(cmd string) {
	readline.AddHistory(cmd)
	readline.SaveHistory(defaultHistPath)
}

func (lr *LineReader) ClearInput() {
	readline.ReplaceLine("", 0)
	readline.RefreshLine()
}

func (lr *LineReader) Resize() {
	readline.Resize()
}