/* Keep Datamanager. Responsible for checking on and reporting on Keep Storage */

package main

import (
	"flag"
	"git.curoverse.com/arvados.git/sdk/go/arvadosclient"
	"git.curoverse.com/arvados.git/sdk/go/logger"
	"git.curoverse.com/arvados.git/sdk/go/util"
	"git.curoverse.com/arvados.git/services/datamanager/collection"
	"git.curoverse.com/arvados.git/services/datamanager/keep"
	"git.curoverse.com/arvados.git/services/datamanager/loggerutil"
	"git.curoverse.com/arvados.git/services/datamanager/summary"
	"log"
	"time"
)

var (
	logEventTypePrefix  string
	logFrequencySeconds int
	minutesBetweenRuns  int
)

func init() {
	flag.StringVar(&logEventTypePrefix,
		"log-event-type-prefix",
		"experimental-data-manager",
		"Prefix to use in the event_type of our arvados log entries. Set to empty to turn off logging")
	flag.IntVar(&logFrequencySeconds,
		"log-frequency-seconds",
		20,
		"How frequently we'll write log entries in seconds.")
	flag.IntVar(&minutesBetweenRuns,
		"minutes-between-runs",
		0,
		"How many minutes we wait betwen data manager runs. 0 means run once and exit.")
}

func main() {
	flag.Parse()
	if minutesBetweenRuns == 0 {
		singlerun()
	} else {
		waitTime := time.Minute * time.Duration(minutesBetweenRuns)
		for {
			log.Println("Beginning Run")
			singlerun()
			log.Printf("Sleeping for %d minutes", minutesBetweenRuns)
			time.Sleep(waitTime)
		}
	}
}

func singlerun() {
	arv, err := arvadosclient.MakeArvadosClient()
	if err != nil {
		log.Fatalf("Error setting up arvados client %s", err.Error())
	}

	if is_admin, err := util.UserIsAdmin(arv); err != nil {
		log.Fatalf("Error querying current arvados user %s", err.Error())
	} else if !is_admin {
		log.Fatalf("Current user is not an admin. Datamanager can only be run by admins.")
	}

	var arvLogger *logger.Logger
	if logEventTypePrefix != "" {
		arvLogger = logger.NewLogger(logger.LoggerParams{
			Client: arv,
			EventTypePrefix: logEventTypePrefix,
			WriteInterval:   time.Second * time.Duration(logFrequencySeconds)})
	}

	loggerutil.LogRunInfo(arvLogger)
	if arvLogger != nil {
		arvLogger.AddWriteHook(loggerutil.LogMemoryAlloc)
	}

	var (
		readCollections collection.ReadCollections
		keepServerInfo keep.ReadServers
	)

	if !summary.MaybeReadData(arvLogger, &readCollections, &keepServerInfo) {
		collectionChannel := make(chan collection.ReadCollections)

		go func() {
			collectionChannel <- collection.GetCollectionsAndSummarize(
				collection.GetCollectionsParams{
					Client: arv,
					Logger: arvLogger,
					BatchSize: 50})
		}()

		keepServerInfo = keep.GetKeepServersAndSummarize(
			keep.GetKeepServersParams{
				Client: arv,
				Logger: arvLogger,
				Limit: 1000})

		readCollections = <-collectionChannel
	}

	summary.MaybeWriteData(arvLogger, readCollections, keepServerInfo)

	replicationSummary :=
		summary.SummarizeReplication(arvLogger, readCollections, keepServerInfo)

	log.Printf("Replication Counts:" +
		"\nBlocks In Collections: %d, " +
		"\nBlocks In Keep: %d, " +
		"\nMissing From Keep: %d, " +
		"\nUnder Replicated: %d, " +
		"\nOver Replicated: %d, " +
		"\nReplicated Just Right: %d, " +
		"\nNot In Any Collection: %d.",
		len(readCollections.BlockToReplication),
		len(keepServerInfo.BlockToServers),
		len(replicationSummary.CollectionBlocksNotInKeep),
		len(replicationSummary.UnderReplicatedBlocks),
		len(replicationSummary.OverReplicatedBlocks),
		len(replicationSummary.CorrectlyReplicatedBlocks),
		len(replicationSummary.KeepBlocksNotInCollections))

	// Log that we're finished. We force the recording, since go will
	// not wait for the timer before exiting.
	if arvLogger != nil {
		arvLogger.FinalUpdate(func(p map[string]interface{}, e map[string]interface{}) {
			p["run_info"].(map[string]interface{})["finished_at"] = time.Now()
		})
	}
}