X-Git-Url: https://git.arvados.org/arvados.git/blobdiff_plain/75f4b70625086aaa8ecf8daed23e4d151e54949f..27daf08f38eec505c224e7776678b32d50241e13:/services/datamanager/datamanager.go

diff --git a/services/datamanager/datamanager.go b/services/datamanager/datamanager.go
index 398c877092..70a9ae7859 100644
--- a/services/datamanager/datamanager.go
+++ b/services/datamanager/datamanager.go
@@ -4,36 +4,62 @@ package main
 
 import (
 	"flag"
+	"fmt"
 	"git.curoverse.com/arvados.git/sdk/go/arvadosclient"
+	"git.curoverse.com/arvados.git/sdk/go/keepclient"
 	"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"
-	"os"
-	"runtime"
 	"time"
 )
 
 var (
-	logEventType        string
+	logEventTypePrefix  string
 	logFrequencySeconds int
+	minutesBetweenRuns  int
 )
 
 func init() {
-	flag.StringVar(&logEventType,
-		"log-event-type",
-		"experimental-data-manager-report",
-		"event_type to use in our arvados log entries. Set to empty to turn off logging")
+	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 {
+		err := singlerun()
+		if err != nil {
+			log.Fatalf("Got an error: %v", err)
+		}
+	} else {
+		waitTime := time.Minute * time.Duration(minutesBetweenRuns)
+		for {
+			log.Println("Beginning Run")
+			err := singlerun()
+			if err != nil {
+				log.Printf("Got an error: %v", err)
+			}
+			log.Printf("Sleeping for %d minutes", minutesBetweenRuns)
+			time.Sleep(waitTime)
+		}
+	}
+}
 
+func singlerun() error {
 	arv, err := arvadosclient.MakeArvadosClient()
 	if err != nil {
 		log.Fatalf("Error setting up arvados client %s", err.Error())
@@ -46,60 +72,115 @@ func main() {
 	}
 
 	var arvLogger *logger.Logger
-	if logEventType != "" {
-		arvLogger = logger.NewLogger(logger.LoggerParams{Client: arv,
-			EventType:            logEventType,
-			MinimumWriteInterval: time.Second * time.Duration(logFrequencySeconds)})
+	if logEventTypePrefix != "" {
+		arvLogger = logger.NewLogger(logger.LoggerParams{
+			Client:          arv,
+			EventTypePrefix: logEventTypePrefix,
+			WriteInterval:   time.Second * time.Duration(logFrequencySeconds)})
 	}
 
+	loggerutil.LogRunInfo(arvLogger)
 	if arvLogger != nil {
-		arvLogger.Update(func(p map[string]interface{}, e map[string]interface{}) {
-			runInfo := make(map[string]interface{})
-			runInfo["time_started"] = time.Now()
-			runInfo["args"] = os.Args
-			hostname, err := os.Hostname()
-			if err != nil {
-				runInfo["hostname_error"] = err.Error()
-			} else {
-				runInfo["hostname"] = hostname
-			}
-			runInfo["pid"] = os.Getpid()
-			p["run_info"] = runInfo
-		})
+		arvLogger.AddWriteHook(loggerutil.LogMemoryAlloc)
+	}
+
+	var (
+		dataFetcher     summary.DataFetcher
+		readCollections collection.ReadCollections
+		keepServerInfo  keep.ReadServers
+	)
 
-		arvLogger.AddWriteHook(LogMemoryAlloc)
+	if summary.ShouldReadData() {
+		dataFetcher = summary.ReadData
+	} else {
+		dataFetcher = BuildDataFetcher(arv)
 	}
 
-	collectionChannel := make(chan collection.ReadCollections)
+	dataFetcher(arvLogger, &readCollections, &keepServerInfo)
 
-	go func() {
-		collectionChannel <- collection.GetCollectionsAndSummarize(
-			collection.GetCollectionsParams{
-				Client: arv, Logger: arvLogger, BatchSize: 50})
-	}()
+	summary.MaybeWriteData(arvLogger, readCollections, keepServerInfo)
 
-	keepServerInfo := keep.GetKeepServersAndSummarize(
-		keep.GetKeepServersParams{Client: arv, Logger: arvLogger, Limit: 1000})
+	buckets := summary.BucketReplication(readCollections, keepServerInfo)
+	bucketCounts := buckets.Counts()
 
-	readCollections := <-collectionChannel
+	replicationSummary := buckets.SummarizeBuckets(readCollections)
+	replicationCounts := replicationSummary.ComputeCounts()
 
-	// TODO(misha): Use these together to verify replication.
-	_ = readCollections
-	_ = keepServerInfo
+	log.Printf("Blocks In Collections: %d, "+
+		"\nBlocks In Keep: %d.",
+		len(readCollections.BlockToDesiredReplication),
+		len(keepServerInfo.BlockToServers))
+	log.Println(replicationCounts.PrettyPrint())
+
+	log.Printf("Blocks Histogram:")
+	for _, rlbss := range bucketCounts {
+		log.Printf("%+v: %10d",
+			rlbss.Levels,
+			rlbss.Count)
+	}
+
+	kc, err := keepclient.MakeKeepClient(&arv)
+	if err != nil {
+		loggerutil.FatalWithMessage(arvLogger,
+			fmt.Sprintf("Error setting up keep client %s", err.Error()))
+	}
 
 	// Log that we're finished. We force the recording, since go will
-	// not wait for the timer before exiting.
+	// not wait for the write timer before exiting.
 	if arvLogger != nil {
-		arvLogger.ForceUpdate(func(p map[string]interface{}, e map[string]interface{}) {
-			p["run_info"].(map[string]interface{})["time_finished"] = time.Now()
+		defer arvLogger.FinalUpdate(func(p map[string]interface{}, e map[string]interface{}) {
+			summaryInfo := logger.GetOrCreateMap(p, "summary_info")
+			summaryInfo["block_replication_counts"] = bucketCounts
+			summaryInfo["replication_summary"] = replicationCounts
+			p["summary_info"] = summaryInfo
+
+			p["run_info"].(map[string]interface{})["finished_at"] = time.Now()
 		})
 	}
+
+	pullServers := summary.ComputePullServers(kc,
+		&keepServerInfo,
+		readCollections.BlockToDesiredReplication,
+		replicationSummary.UnderReplicatedBlocks)
+
+	pullLists := summary.BuildPullLists(pullServers)
+
+	trashLists, trashErr := summary.BuildTrashLists(kc,
+		&keepServerInfo,
+		replicationSummary.KeepBlocksNotInCollections)
+
+	summary.WritePullLists(arvLogger, pullLists)
+
+	if trashErr != nil {
+		return err
+	} else {
+		keep.SendTrashLists(keep.GetDataManagerToken(arvLogger), kc, trashLists)
+	}
+
+	return nil
 }
 
-// TODO(misha): Consider moving this to loggerutil
-func LogMemoryAlloc(properties map[string]interface{}, entry map[string]interface{}) {
-	runInfo := properties["run_info"].(map[string]interface{})
-	var memStats runtime.MemStats
-	runtime.ReadMemStats(&memStats)
-	runInfo["alloc_bytes_in_use"] = memStats.Alloc
+// Returns a data fetcher that fetches data from remote servers.
+func BuildDataFetcher(arv arvadosclient.ArvadosClient) summary.DataFetcher {
+	return func(arvLogger *logger.Logger,
+		readCollections *collection.ReadCollections,
+		keepServerInfo *keep.ReadServers) {
+		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
+	}
 }