filer.go

import (
	"os"
)

// file://home/ow/
// https://google.com

//TODO: G error
//enter file://file
//press 'G'
//crash?

// file links
func fvalid (f string) (bool) {
	return strings.Index(f, "file:/")==0
}

func fexists (f string) (bool) {
	return exists(f[6:])
}

func fcan (f string) (bool) {
	return fvalid(f) && fexists(f)
}

func flist (f string) ([]string) {
	return ls(f[6:])
}

func fload (f string) ([]string) {
	if fcan(f) {
		return strings.Split(ReadFile(f[6:]), "\n")
	} else {
		ReportInternalError("faild to prevent opening an invalid link", 1)
		return []string{"nawh man"}
	}
}

//true:quit
func fopen (f string) (bool) {
	// try to read as dir
	clear()
	fi, err := os.Stat(f[6:])
	panic(err)
	if fi.Mode().IsDir() {
		if f[len(f)-1] != '/' {
			f+="/"
		}
		return Folder(f)
	} else {
		return Reader(fload(f), f[6:])
	}
}

//init vars
var (
	ModeText [3]string
	bkgrey string
	FileColor string
	FolderColor string
	HiddenFileColor string

	// temp
	ShowHiddenFiles bool
	ShowFiles bool
	ShowDirs bool
	tstring string
	tint int
	tbool bool
	terror error
	Few *Window
	SaveOnReturn bool

	mode = 0
)

// config file -> vars
func InitFiler() {
	// define colors
	bkgrey = colors["bkgrey"]
	FileColor = colors["Folder.FileColor"]
	FolderColor = colors["Folder.FolderColor"]
	HiddenFileColor = colors["Folder.HiddenFileColor"]
	//modes
	ModeText = [...]string{
		colors["Modes.Normal"]+" NORMAL "+AirLineText+" ",
		colors["Modes.Insert"]+" INSERT "+AirLineText+" ",
		colors["Modes.NewTree"]+" NEWTREE "+AirLineText+" ",
	}
	// read cfg
	SaveOnReturn = RCfgB("SaveOnReturn")
	ShowHiddenFiles = RCfgB("ShowHiddenFiles")
	ShowFiles = RCfgB("ShowFiles")
	ShowDirs = RCfgB("ShowDirs")
	// make window
	Few = MakeWin(
		"Filer/Editor Window",
		stdout, stdin,
		0, Win.LenY-Alw.LenY,
		0, Win.LenX,
	)
}

func ShorthenName (f string) (string) {
	var out = ""
	var in = strings.Split(f, "/")
	// exclude 1° (''/) and last (filename)
	for i:=1;i<len(in)-1;i++{
		out+="/"+string(in[i][0])
	}
	out += "/"+in[len(in)-1]
	return out
}

func MakeAirLine (s string) {
	ClearAirLine()
	AirLine(
		ModeText[mode]+s,
	)
}

func ReaderAirLine (filename, k string, y, x int) {
	MakeAirLine( spf(
		"%s%s@%d:%d %s%s",
		AirLineText,
		filename,
		y+1, x,
		k,
		txt,
	))
}

func WriterAirLine (filename, k string, y, x, tint int) {
	MakeAirLine( spf(
		"%s%s@%s%d:%d::%d %s%s",
		bk, filename,
		AirLineText, y+1, x, tint,
		k,
		txt,
	))
}

func FolderAirLine ( dir string, git string ) () {
	MakeAirLine( spf(
		"%s %s %s%s",
		AirLineText, dir, git, txt,
	))
}

func ClearAll () () {
	for i:=0;i<Few.MaxY;i++{
		wprint(Few, i, 0, "\033[2K")
	}
	ClearAllAirLine()
	ReportLine(bkgrey+sws)
}

func l( s string ) ( int ) {
	x:=len(s)
	if x == 0 {
		return 0
	}
	return x-1
}

func retab ( l string ) ( string ) {
	for i:=0; len(l)-1 > i && (l[i]==' ') && (l[i+1] == ' ');i++ {
		l = strings.Replace(l, " "+" ", "\t", 1)
	}
	return l
}

func untab ( l string ) ( string ) {
	return strings.Replace(l, "\t", " "+" ", 1)
}

func Reader (c []string, filename string) (bool) {
	// normal mode
	mode = 0
	// set cursor type
	ShowCursor()
	wuprint(Few, 0, 0, "\033[2 q") // block
	var (

		cmd string
		args []string
		shortname string
		// loop
		k string
		i = 0
		// read
		cl = len(c)
		off = cl-Few.LenY-1

		y = 0
		x = 0
		w = 0//window shift
		//TODO: maybe make w+y var
	)

	shortname = ShorthenName(filename)

	for i:=0;i<len(c);i++ {
		c[i] = untab(c[i])
	}

	if off < 0 {
		off = 0
	}

	// div
	ClearAllAirLine()

	// clear temps
	tint = 0

	for {
		// clear;draw text
		for i=0;(i+w)<cl&&(i<Few.LenY);i++{
			wprint(Few, i, 0, "\033[2K"+bkgrey)
			wprint(Few, i, 0, c[i+w])
		}

		// print airline
		ReaderAirLine(shortname, k, y+w, x)

		// move cursor;get k
		wmove(Few, y, x)
		k = wgtk(Few)

		// use k
		switch (k) {
			case ("NULL"):
				//TODO: no such key
			case ("w"):
				//TODO: jump to next line
				tint = strings.Index(c[w+y][x+1:], " ")+x+1
				if tint > 0 {
					x = tint
				}
			case (":"):
				// change cursor type
				print("\033[6 q") // I-beam
				ClearReport()
				wmove(Alw, Alw.LenY-2, 0)// move to report line
				tstring = ":"
				for {
					ReportLine(tstring)
					k = wgtk(Alw)
					if len(k) == 1 {
						tstring += k
					} else if k == "backspace" && len(tstring) != 0 {
						tstring = tstring[:len(tstring)-1]
					} else if k == "space" {
						tstring += " "
					} else if k == "enter" {
						break
					}
					if len(tstring) == 0 {
						break
					}
				}
				// reset cursor type
				print("\033[2 q") // block
				if len(tstring) == 0 {
					break
				}

				args = strings.Split(tstring, " ")
				if len(args) == 0 {
					Warn(E_Empty_Command)// Empty
				}

				if len(args) > 1 {
					cmd = args[0]
					args = args[1:]
				} else {
					cmd = args[0]
					args = []string{}
				}

				// report command
				ReportLine(tstring)
				switch cmd {
					case (":w"):
						//save
						// retab
						if len(args) == 1 {
							filename = args[0]
							shortname = ShorthenName(args[0])
							_, terror = os.OpenFile(args[0], os.O_CREATE|os.O_WRONLY, 0644)
							if terror != nil {
								AdvWarn(E_Cant_Create_File,
								spf("%v", terror))
							}
						}
						terror = os.WriteFile(
							filename,
							[]byte(retab(strings.Join(c, "\n"))),
							0644,
							//TODO: change file 0otype
						)
						if !exists(filename) {
							AdvWarn(E_Cant_Write_To_File,
							filename + spf("%v", terror), "d")
						}
					case (":q"):
						clear()
						// reset cursor type
						print("\033[1 q") // blink block
						return true
					case (":wq"):
						clear()
						print("\033[1 q")
						WriteFile(filename, retab(strings.Join(c, "\n")))
						return true
					default:
						// overwrite report with error
						AdvWarn(E_No_Such_Command, tstring)
						//ReportLine(ErrorText[3]+" '"+tstring+"'"+txt)
				tstring = ""
				}
			case "backspace", "^H":
				ClearAll()
				if SaveOnReturn {
					WriteFile(filename, retab(strings.Join(c, "\n")))
				}
				return false
			case ("space"):
				ClearAllAirLine()
			case ("_"):
				x = 0
				tint = x
			case ("$"):
				x = l(c[y+w])
				tint = x
			case ("enter"):
				tstring = c[y+w][x:]
				tstring = strings.Split(tstring, " ")[0]
				if fcan(tstring) {
						ClearAll()
						if (fopen(tstring)) {
							if SaveOnReturn {
								WriteFile(filename, retab(strings.Join(c, "\n")))
							}
							return true
						}
				} else {
					Warn(E_Invalid_Link) // warn: no file from link
				}
			case ("g"):
				w = 0
				y = 0
				x = 0
			case ("G"):
				w = off
				y = cl-w-1 // -1 for the y
				if w != 0 {
					y-- //-1 for the w
				}
				x = 0
				tint = 0
			case ("c"):
				if w > 0 {
					if Few.LenY-2 >= y {
						y++
					}
					w--
				}
				if x >= len(c[w+y]) {
					x = len(c[w+y])
				}
			case ("z"):
				if off > w {
					if y > 0 {
						y--
					}
					w++
				}
				if x >= len(c[w+y]) {
					x = len(c[w+y])
				}
			case ("x"):
				if len(c[y+w])!=0 {
					c[y+w] = c[y+w][:x]+c[y+w][x+1:]
				}
				if len(c[y+w]) < x {
					x--
				}
			case ("j"):
				if y < Few.LenY-1 && (y+w+1) < cl {
					y++
					x = tint
					//ll
					if l(c[y+w]) < x {
						x = l(c[y+w])
					}
				} else {
					if off > w {
						w++
					}
				}
			case ("k"):
				if y > 0 {
					y--
					x = tint
					if l(c[y+w]) < x {
						x = l(c[y+w])
					}// else if ll[y+w] >= x {
					//	x = tint
					//}
				} else {
					if w > 0 {
						w--
					}
				}
			case ("l"):
				if x < l(c[y+w]) { // -1 no overhang
					x++
					tint=x
				}
			case ("h"):
				if x > 0 {
					x--
					tint=x
				}
			case "a", "i", "o":
				if k == "a" {
					x++
				}
				if k == "o" {
					c = append(c[:y+w+1], c[y+w:]...)
					c[y+w+1] = ""
					cl++
					off = cl-Few.LenY-1
					if y < Few.LenY-1 {
						y++
					} else {
						w++
					}
					tint = 0
					x = 0
				}
				if x > len(c[w+y]) {
					x = len(c[w+y])
				} else if x < 0 {
					x = 0
				}
				// insert mode
				mode = 1
				// change cursor type
				print("\033[6 q") // I-beam
				for k!="esc" {
					// clear;draw text
					for i=0;(i+w)<cl&&(i<Few.LenY);i++{
						wprint(Few, i, 0, "\033[2K")
						wprint(Few, i, 0, c[i+w])
					}

					// print airline
					WriterAirLine(filename, k, y+w, x, tint)
					// move cursor;get k
					wmove(Few, y, x)
					//
					k = wgtk(Few)
					//
					if len(k) == 1{
						c[y+w] = c[y+w][:x]+k+c[y+w][x:]
						x++
						continue
					}
					switch k {
						case ("NULL"):
							//TODO: no such key
						case ("enter"):
							tstring = c[y+w][x:]
							c = append(c[:y+w+1], c[y+w:]...)
							c[1+y+w] = tstring
							c[y+w] = c[y+w][:x]
							cl++
							off = cl-Few.LenY-1
							if y < Few.LenY-1 {
								y++
							} else {
								w++
							}
							tint = 0
							x = 0
						case ("backspace"):
							if x == 0 {
								if y+w != 0 {
									if y != 0 {
										y--
									} else {
										w--
									}
									x = len(c[y+w])
									c[y+w] = c[y+w]+c[y+w+1]
									c = RemoveIndex(c, y+w+1)
									cl--
								}
							} else {
								if len(c[y+w])!=0 {
									c[y+w] = c[y+w][:x-1]+c[y+w][x:]
									x--
								}
							}
						case ("space"):
							c[y+w] = c[y+w][:x]+" "+c[y+w][x:]
							x++
						case ("left"):
							if x != 0 {
								x--
								tint = x
							}
						case ("right"):
							if x < len(c[y+w]) {
								x++
								tint = x
							}
						case ("down"):
							if y == Few.LenY-1 {
								if w < off {
									w++
								}
							} else {
								if y+1 < cl {
									y++
								}
							}
							if tint > x {
								x = tint
							}
							if l(c[y+w]) < x {
								x = len(c[y+w])
							}
						case ("up"):
							if y == 0 {
								if w != 0 {
									w--
								}
							} else {
								y--
							}
							if tint > x {
								x = tint
							}
							if l(c[y+w]) < x {
								x = len(c[y+w])
							}
						case ("tab"):
							c[y+w] = c[y+w][:x]+" "+" "+c[y+w][x:]
							x+=2
					}
				}
				x--
				if x == -1 {
					x = 0
				}

				// normal mode
				mode = 0
				// change cursor type
				print("\033[1 q") // block
		}
	}
}

//TODO: wrap or shift when dir > win.LenY
//TODO: r[emove] file
//FOLDER
func Folder ( folder string ) (bool) {
	// dir mode
	mode = 2
	// set cursor type
	HideCursor()
	FolderAirLine(folder, "git not loaded yet")

	var (
		dir []string
		Cdir []string
		fl = flist(folder)
		git string
		k string
		ld int
		i int
		y = 0
		mark string
	)
	fl = append(fl, "../")
	mark = colors["Folder.Mark"]+"*"+colors["Text"]

	git = GetGs(folder[6:])

	Cdir = FilterFolder(fl,
		ShowHiddenFiles, ShowFiles, ShowDirs, false,
	)

	dir = FilterFolder(Cdir,
		ShowHiddenFiles, ShowFiles, ShowDirs, true,
	)

	ld = len(dir)
	if len(Cdir) != ld {
		wuprint(Few, 0, 0, "fuck")
		wuprint(Few, 1, 0, spf("%v", Cdir))
		wuprint(Few, 2, 0, spf("%v", dir))
		wgtk(Few)
	}

	// clear screen
	ClearReport()
	wColor(bkgrey)
	for i:=0;i<Few.LenY;i++ {
		wprint(Few, i, 0, "\033[2K")
	}

	// only load once (no need to update for now)
	FolderAirLine(folder, git)
	for k!="backspace"&&k!="^H"{
		for i=0;i<ld;i++ {
			if i < ld {
				wprint(Few, i, 0, "\033[2K")
				if i == y {
					wprint(Few, i, 0, Cdir[i]+mark)
				} else {
					wprint(Few, i, 0, Cdir[i])
				}
			}
		}
		wmove(Few, y, 0)
		k = wgtk(Few)
		switch (k) {
			case ("j"):
				if ld != y+1{
					y++
				}
			case ("k"):
				if y != 0 {
					y--
				}
			case ("u"):
				s := strings.Split(folder, "/")
				s = s[:len(s)-2]
				clear()
				if fopen(strings.Join(s, "/")+"/") {
					return true
				}
			case ("enter"):
				if dir[y] == "../" {
					s := strings.Split(folder, "/")
					s = s[:len(s)-2]
					clear()
					if fopen(strings.Join(s, "/")+"/") {
						return true
					}
				} else if fopen(folder+dir[y]) {
					return true
				}
				ClearAirLine()
				mode = 2
				FolderAirLine(folder, git)
				HideCursor()
			case ("q"):
				return true
		}
		ReportLine(spf("%v", y))
	}

	ShowCursor()
	return false
}

// 'ret' so *dir isn't changed
//Show [Hidden] File/Dir
//S[H]F, SD
//Use Colors
func FilterFolder ( dir []string, SHF, SF, SD, UC bool) ( []string ) {
	var ret []string
	for i:=0;i<len(dir);i++ {
		if dir[i][0] == '.' && dir[i] != "../" {
			if SHF {
				ret = append(ret, dir[i])
				if UC {
					dir[i] = HiddenFileColor+dir[i]
				}
			}
		} else if ( dir[i][len(dir[i])-1] == '/' ) {
			if SD {
				ret = append(ret, dir[i])
				if UC {
					dir[i] = FolderColor+dir[i]
				}
			}
		} else {
			ret = append(ret, dir[i])
			if SF {
				tint = strings.Index(dir[i], ".")
				if tint != -1 && len(dir[i]) != 1 {
					tstring = dir[i][tint:]
					if tstring, tbool = FileColors[tstring]; tbool {
						if UC {
							dir[i] = tstring+dir[i]
						}
					} else {
						if UC {
							dir[i] = txt+dir[i]
						}
					}
				} else {
					if UC {
						dir[i] = txt+dir[i]
					}
				}
			}
		}
	}
	ret = RemoveDuplicate(ret)
	return ret
}

//testing generics
func RemoveDuplicate[T string](sliceList []T) []T {
	AllKeys := make(map[T]bool)
	list := []T{}
	for _, item := range sliceList {
		if _, ok := AllKeys[item]; !ok {
			AllKeys[item] = true
			list = append(list, item)
		}
	}
	return list
}

func RemoveIndex[T string | int] ( s []T, i int ) ( []T ) {
	s = append(s[:i], s[i+1:]...)
	return s
}


//HTTP?
// https links
func lvalid (f string) (bool) {
	return strings.Index(f, "https:/")==0
}