// Copyright © 2019 Ettore Di Giacinto <mudler@gentoo.org>
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License along
// with this program; if not, see <http://www.gnu.org/licenses/>.
package cmd

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

	"github.com/ghodss/yaml"
	"github.com/jedib0t/go-pretty/table"
	"github.com/jedib0t/go-pretty/v6/list"
	. "github.com/mudler/luet/pkg/config"
	installer "github.com/mudler/luet/pkg/installer"
	. "github.com/mudler/luet/pkg/logger"
	pkg "github.com/mudler/luet/pkg/package"
	"github.com/spf13/cobra"
)

type PackageResult struct {
	Name       string `json:"name"`
	Category   string `json:"category"`
	Version    string `json:"version"`
	Repository string `json:"repository"`
	Target     string `json:"target"`
	Hidden     bool   `json:"hidden"`
}

type Results struct {
	Packages []PackageResult `json:"packages"`
}

func (r PackageResult) String() string {
	return fmt.Sprintf("%s/%s-%s required for %s", r.Category, r.Name, r.Version, r.Target)
}

var rows table.Row = table.Row{"Package", "Category", "Name", "Version", "Repository", "Description", "License", "URI"}

func packageToRow(repo string, p pkg.Package) table.Row {
	return table.Row{p.HumanReadableString(), p.GetCategory(), p.GetName(), p.GetVersion(), repo, p.GetDescription(), p.GetLicense(), strings.Join(p.GetURI(), "\n")}
}

func packageToList(l list.Writer, repo string, p pkg.Package) {
	l.AppendItem(p.HumanReadableString())
	l.Indent()
	l.AppendItem(fmt.Sprintf("Category: %s", p.GetCategory()))
	l.AppendItem(fmt.Sprintf("Name: %s", p.GetCategory()))
	l.AppendItem(fmt.Sprintf("Version: %s", p.GetVersion()))
	l.AppendItem(fmt.Sprintf("Description: %s", p.GetDescription()))
	l.AppendItem(fmt.Sprintf("Repository: %s ", repo))
	l.AppendItem(fmt.Sprintf("Uri: %s ", strings.Join(p.GetURI(), "\n")))
	l.UnIndent()
}

var searchCmd = &cobra.Command{
	Use:     "search <term>",
	Short:   "Search packages",
	Long:    `Search for installed and available packages`,
	Aliases: []string{"s"},
	PreRun: func(cmd *cobra.Command, args []string) {
		LuetCfg.Viper.BindPFlag("system.database_path", cmd.Flags().Lookup("system-dbpath"))
		LuetCfg.Viper.BindPFlag("system.rootfs", cmd.Flags().Lookup("system-target"))
		LuetCfg.Viper.BindPFlag("installed", cmd.Flags().Lookup("installed"))
		LuetCfg.Viper.BindPFlag("solver.type", cmd.Flags().Lookup("solver-type"))
		LuetCfg.Viper.BindPFlag("solver.discount", cmd.Flags().Lookup("solver-discount"))
		LuetCfg.Viper.BindPFlag("solver.rate", cmd.Flags().Lookup("solver-rate"))
		LuetCfg.Viper.BindPFlag("solver.max_attempts", cmd.Flags().Lookup("solver-attempts"))
	},
	Run: func(cmd *cobra.Command, args []string) {
		var systemDB pkg.PackageDatabase
		var results Results
		if len(args) > 1 {
			Fatal("Wrong number of arguments (expected 1)")
		} else if len(args) == 0 {
			args = []string{"."}
		}
		hidden, _ := cmd.Flags().GetBool("hidden")

		installed := LuetCfg.Viper.GetBool("installed")
		stype := LuetCfg.Viper.GetString("solver.type")
		discount := LuetCfg.Viper.GetFloat64("solver.discount")
		rate := LuetCfg.Viper.GetFloat64("solver.rate")
		attempts := LuetCfg.Viper.GetInt("solver.max_attempts")
		searchWithLabel, _ := cmd.Flags().GetBool("by-label")
		searchWithLabelMatch, _ := cmd.Flags().GetBool("by-label-regex")
		revdeps, _ := cmd.Flags().GetBool("revdeps")
		tableMode, _ := cmd.Flags().GetBool("table")

		out, _ := cmd.Flags().GetString("output")
		if out != "terminal" {
			LuetCfg.GetLogging().SetLogLevel("error")
		}

		LuetCfg.GetSolverOptions().Type = stype
		LuetCfg.GetSolverOptions().LearnRate = float32(rate)
		LuetCfg.GetSolverOptions().Discount = float32(discount)
		LuetCfg.GetSolverOptions().MaxAttempts = attempts

		l := list.NewWriter()
		t := table.NewWriter()
		t.AppendHeader(rows)
		Debug("Solver", LuetCfg.GetSolverOptions().CompactString())

		if !installed {

			repos := installer.Repositories{}
			for _, repo := range LuetCfg.SystemRepositories {
				if !repo.Enable {
					continue
				}
				r := installer.NewSystemRepository(repo)
				repos = append(repos, r)
			}

			inst := installer.NewLuetInstaller(
				installer.LuetInstallerOptions{
					Concurrency:   LuetCfg.GetGeneral().Concurrency,
					SolverOptions: *LuetCfg.GetSolverOptions(),
				},
			)
			inst.Repositories(repos)
			synced, err := inst.SyncRepositories(false)
			if err != nil {
				Fatal("Error: " + err.Error())
			}

			Info("--- Search results (" + args[0] + "): ---")

			matches := []installer.PackageMatch{}
			if searchWithLabel {
				matches = synced.SearchLabel(args[0])
			} else if searchWithLabelMatch {
				matches = synced.SearchLabelMatch(args[0])
			} else {
				matches = synced.Search(args[0])
			}
			for _, m := range matches {
				if !revdeps {
					if !m.Package.IsHidden() || m.Package.IsHidden() && hidden {
						t.AppendRow(packageToRow(m.Repo.GetName(), m.Package))
						packageToList(l, m.Repo.GetName(), m.Package)
						results.Packages = append(results.Packages,
							PackageResult{
								Name:       m.Package.GetName(),
								Version:    m.Package.GetVersion(),
								Category:   m.Package.GetCategory(),
								Repository: m.Repo.GetName(),
								Hidden:     m.Package.IsHidden(),
							})
					}
				} else {
					packs, _ := m.Repo.GetTree().GetDatabase().GetRevdeps(m.Package)
					for _, revdep := range packs {
						if !revdep.IsHidden() || revdep.IsHidden() && hidden {
							t.AppendRow(packageToRow(m.Repo.GetName(), revdep))
							packageToList(l, m.Repo.GetName(), revdep)
							results.Packages = append(results.Packages,
								PackageResult{
									Name:       revdep.GetName(),
									Version:    revdep.GetVersion(),
									Category:   revdep.GetCategory(),
									Repository: m.Repo.GetName(),
									Hidden:     revdep.IsHidden(),
								})
						}
					}
				}
			}
		} else {

			if LuetCfg.GetSystem().DatabaseEngine == "boltdb" {
				systemDB = pkg.NewBoltDatabase(
					filepath.Join(LuetCfg.GetSystem().GetSystemRepoDatabaseDirPath(), "luet.db"))
			} else {
				systemDB = pkg.NewInMemoryDatabase(true)
			}
			system := &installer.System{Database: systemDB, Target: LuetCfg.GetSystem().Rootfs}

			var err error
			iMatches := pkg.Packages{}
			if searchWithLabel {
				iMatches, err = system.Database.FindPackageLabel(args[0])
			} else if searchWithLabelMatch {
				iMatches, err = system.Database.FindPackageLabelMatch(args[0])
			} else {
				iMatches, err = system.Database.FindPackageMatch(args[0])
			}

			if err != nil {
				Fatal("Error: " + err.Error())
			}

			for _, pack := range iMatches {
				if !revdeps {
					if !pack.IsHidden() || pack.IsHidden() && hidden {
						t.AppendRow(packageToRow("system", pack))
						packageToList(l, "system", pack)
						results.Packages = append(results.Packages,
							PackageResult{
								Name:       pack.GetName(),
								Version:    pack.GetVersion(),
								Category:   pack.GetCategory(),
								Repository: "system",
								Hidden:     pack.IsHidden(),
							})
					}
				} else {
					packs, _ := system.Database.GetRevdeps(pack)
					for _, revdep := range packs {
						if !revdep.IsHidden() || revdep.IsHidden() && hidden {
							t.AppendRow(packageToRow("system", pack))
							packageToList(l, "system", pack)
							results.Packages = append(results.Packages,
								PackageResult{
									Name:       revdep.GetName(),
									Version:    revdep.GetVersion(),
									Category:   revdep.GetCategory(),
									Repository: "system",
									Hidden:     revdep.IsHidden(),
								})
						}
					}
				}
			}
		}

		t.AppendFooter(rows)
		t.SetStyle(table.StyleColoredBright)

		l.SetStyle(list.StyleConnectedRounded)
		if tableMode {
			Info(t.Render())
		} else {
			Info(l.Render())
		}

		y, err := yaml.Marshal(results)
		if err != nil {
			fmt.Printf("err: %v\n", err)
			return
		}
		switch out {
		case "yaml":
			fmt.Println(string(y))
		case "json":
			j2, err := yaml.YAMLToJSON(y)
			if err != nil {
				fmt.Printf("err: %v\n", err)
				return
			}
			fmt.Println(string(j2))
		}

	},
}

func init() {
	path, err := os.Getwd()
	if err != nil {
		Fatal(err)
	}
	searchCmd.Flags().String("system-dbpath", path, "System db path")
	searchCmd.Flags().String("system-target", path, "System rootpath")
	searchCmd.Flags().Bool("installed", false, "Search between system packages")
	searchCmd.Flags().String("solver-type", "", "Solver strategy ( Defaults none, available: "+AvailableResolvers+" )")
	searchCmd.Flags().StringP("output", "o", "terminal", "Output format ( Defaults: terminal, available: json,yaml )")
	searchCmd.Flags().Float32("solver-rate", 0.7, "Solver learning rate")
	searchCmd.Flags().Float32("solver-discount", 1.0, "Solver discount rate")
	searchCmd.Flags().Int("solver-attempts", 9000, "Solver maximum attempts")
	searchCmd.Flags().Bool("by-label", false, "Search packages through label")
	searchCmd.Flags().Bool("by-label-regex", false, "Search packages through label regex")
	searchCmd.Flags().Bool("revdeps", false, "Search package reverse dependencies")
	searchCmd.Flags().Bool("hidden", false, "Include hidden packages")
	searchCmd.Flags().Bool("table", false, "show output in a table (wider screens)")

	RootCmd.AddCommand(searchCmd)
}