package main

import (
	"code.gitea.io/sdk/gitea"
	"fmt"
	"git.nevets.tech/Steven/ezconf"
	"github.com/go-git/go-git/v5/plumbing/object"
	"os/exec"
	"strings"
	"time"

	billy "github.com/go-git/go-billy/v5"
	memfs "github.com/go-git/go-billy/v5/memfs"
	git "github.com/go-git/go-git/v5"
	http "github.com/go-git/go-git/v5/plumbing/transport/http"
	memory "github.com/go-git/go-git/v5/storage/memory"
	"os"
)

var config *ezconf.Configuration
var giteaClient *gitea.Client
var domain string
var legoBaseArgs []string

var storage *memory.Storage
var fs billy.Filesystem
var workTree *git.Worktree
var creds *http.BasicAuth

var repo *git.Repository

func main() {
	var err error
	args := os.Args

	// -c
	hasConfig, configIndex := contains(args, "-c")
	if hasConfig {
		config = ezconf.NewConfiguration(args[configIndex+1])
	} else {
		fmt.Printf("Error, no config passed. Please add '-c /path/to/config.ini' to the command\n")
		os.Exit(1)
	}

	// -d
	hasDomain, domainIndex := contains(args, "-d")
	if hasDomain {
		domain = args[domainIndex+1]
	} else {
		fmt.Printf("Error, no domain passed. Please add '-d domain.tld' to the command\n")
		os.Exit(1)
	}

	legoBaseArgs = []string{
		"-a",
		"--dns",
		"cloudflare",
		"--email=" + config.GetAsString("Cloudflare.cf_email"),
		"--domains=" + domain,
		"--domains=*." + domain,
		"--path=" + config.GetAsString("Certificates.certs_path"),
	}
	legoNewSiteArgs := append(legoBaseArgs, "run")
	legoRenewSiteArgs := append(legoBaseArgs, "renew", "--days", "90")

	subdomains := config.GetAsStrings("Certificates.subdomains")
	if subdomains != nil {
		for i, subdomain := range subdomains {
			insert(legoBaseArgs, 5+i, "--domains=*."+subdomain)
		}
	}

	err = os.Setenv("CF_API_TOKEN", config.GetAsString("Cloudflare.cf_api_token"))
	err = os.Setenv("CF_EMAIL", config.GetAsString("Cloudflare.cf_email"))
	if err != nil {
		fmt.Printf("Error setting environment variable: %v\n", err)
		os.Exit(1)
	}

	creds = &http.BasicAuth{
		Username: config.GetAsString("Git.username"),
		Password: config.GetAsString("Git.api_token"),
	}
	giteaClient, err = gitea.NewClient(config.GetAsString("Git.server"), gitea.SetToken(config.GetAsString("Git.api_token")))
	if err != nil {
		fmt.Printf("Error connecting to gitea instance: %v\n", err)
		os.Exit(1)
	}

	storage = memory.NewStorage()
	fs = memfs.New()

	var cmd *exec.Cmd
	switch args[len(args)-1] {
	case "gen":
		{
			url := createGiteaRepo()
			cloneRepo(url)
			fixUpdateSh()
			cmd = exec.Command("lego", legoNewSiteArgs...)
		}
	case "renew":
		{
			cloneRepo(config.GetAsString("Git.server") + "/" + config.GetAsString("Git.org_name"))
			cmd = exec.Command("lego", legoRenewSiteArgs...)
		}
	default:
		{
			fmt.Println("Missing arguments: conclude command with 'gen' or 'renew'")
			os.Exit(1)
		}
	}
	fmt.Printf("Env Vars: %v", cmd.Env)
	out, err := cmd.CombinedOutput()
	if err != nil {
		fmt.Printf("Error creating certs with lego: %v", err)
		os.Exit(1)
	}
	fmt.Println(string(out))
	addAndPushCerts()
}

func createGiteaRepo() string {
	options := gitea.CreateRepoFromTemplateOption{
		Avatar:      true,
		Description: "Certificates storage for " + domain,
		GitContent:  true,
		GitHooks:    true,
		Labels:      true,
		Name:        domain + "-certificates",
		Owner:       config.GetAsString("Git.org_name"),
		Private:     true,
		Topics:      true,
		Webhooks:    true,
	}
	giteaRepo, _, err := giteaClient.CreateRepoFromTemplate(config.GetAsString("Git.org_name"), config.GetAsString("Git.template_name"), options)
	if err != nil {
		fmt.Printf("Error creating repo: %v\n", err)
		os.Exit(1)
	}
	return giteaRepo.CloneURL
}

func cloneRepo(url string) {
	var err error
	repo, err = git.Clone(storage, fs, &git.CloneOptions{URL: url, Auth: creds})
	if err != nil {
		fmt.Printf("Error clone git repo: %v\n", err)
		os.Exit(1)
	}

	workTree, err = repo.Worktree()
	if err != nil {
		fmt.Printf("Error getting worktree from repo: %v\n", err)
		os.Exit(1)
	}
}

func fixUpdateSh() {
	updateSh, err := fs.Open("update.sh")
	if err != nil {
		fmt.Printf("Error opening update.sh: %v", err)
		os.Exit(1)
	}
	content := "#!/bin/env bash\necho Starting cert pull\ngit pull https://Steven:07026d2d4e99614ec98fc2a8357f108f78f52682@git.nevets.tech/Keys/" + domain + "-certificates.git --force --no-rebase\nexit 0"
	fmt.Printf("Update.sh Content: %v\n", content)
	_, err = updateSh.Write([]byte(content))
	err = updateSh.Close()
	if err != nil {
		fmt.Printf("Error writing update.sh: %v", err)
		os.Exit(1)
	}
}

func addAndPushCerts() {
	//TODO integrate SOPS api when stable release
	certs, err := os.ReadDir(config.GetAsString("Certificates.certs_path"))
	if err != nil {
		fmt.Printf("Error reading from directory: %v\n", err)
		os.Exit(1)
	}
	for _, cert := range certs {
		if strings.HasPrefix(cert.Name(), domain) {
			file, err := fs.Create(config.GetAsString("Certificates.certs_path" + "/" + cert.Name()))
			if err != nil {
				fmt.Printf("Error copying cert to memfs: %v\n", err)
				os.Exit(1)
			}
			certFile, err := os.ReadFile(config.GetAsString("Certificates.certs_path" + "/" + cert.Name()))
			_, err = file.Write(certFile)
			if err != nil {
				fmt.Printf("Error writing to memfs: %v\n", err)
				os.Exit(1)
			}
		}
	}

	_, err = workTree.Add(".")
	if err != nil {
		fmt.Printf("Error adding certificates to workTree: %v\n", err)
		os.Exit(1)
	}
	status, err := workTree.Status()
	if err != nil {
		fmt.Printf("Error getting repo status: %v\n", err)
		os.Exit(1)
	}
	fmt.Println(status.String())
	signature := &object.Signature{
		Name:  "Cert Manager",
		Email: "certs@nevets.tech",
		When:  time.Now(),
	}
	_, err = workTree.Commit("Update "+domain+" @ "+time.Now().String(), &git.CommitOptions{Author: signature, Committer: signature})
	if err != nil {
		fmt.Printf("Error committing certs: %v\n", err)
		os.Exit(1)
	}
	err = repo.Push(&git.PushOptions{Auth: creds, Force: true, RemoteName: "origin"})
	if err != nil {
		fmt.Printf("Error pushing to origin: %v\n", err)
		os.Exit(1)
	}

	fmt.Println("Successfully uploaded to repo")
}

func contains(slice []string, value string) (sliceHas bool, index int) {
	for i, entry := range slice {
		if entry == value {
			return true, i
		}
	}
	return false, -1
}

func insert(a []string, index int, value string) []string {
	last := len(a) - 1
	a = append(a, a[last])
	copy(a[index+1:], a[index:last])
	a[index] = value
	return a
}