X-Git-Url: https://git.arvados.org/arvados.git/blobdiff_plain/08fbba821251a58cc99921cb477fbbc076a1bfee..a9e08c498ac8126026d1226f34913f87c8e590a0:/services/datamanager/datamanager.go?ds=sidebyside diff --git a/services/datamanager/datamanager.go b/services/datamanager/datamanager.go index 7b79f0f5bc..a9306ce83a 100644 --- a/services/datamanager/datamanager.go +++ b/services/datamanager/datamanager.go @@ -3,66 +3,188 @@ package main import ( + "errors" "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" + "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 { + err := singlerun(makeArvadosClient()) + if err != nil { + log.Fatalf("singlerun: %v", err) + } + } else { + waitTime := time.Minute * time.Duration(minutesBetweenRuns) + for { + log.Println("Beginning Run") + err := singlerun(makeArvadosClient()) + if err != nil { + log.Printf("singlerun: %v", err) + } + log.Printf("Sleeping for %d minutes", minutesBetweenRuns) + time.Sleep(waitTime) + } + } +} +func makeArvadosClient() arvadosclient.ArvadosClient { arv, err := arvadosclient.MakeArvadosClient() if err != nil { - log.Fatalf("Error setting up arvados client %s", err.Error()) + log.Fatalf("Error setting up arvados client: %s", err) + } + return arv +} + +func singlerun(arv arvadosclient.ArvadosClient) error { + var err error + if isAdmin, err := util.UserIsAdmin(arv); err != nil { + return errors.New("Error verifying admin token: " + err.Error()) + } else if !isAdmin { + return errors.New("Current user is not an admin. Datamanager requires a privileged token.") } - 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)}) } - // TODO(misha): Read Collections and Keep Contents concurrently as goroutines. + loggerutil.LogRunInfo(arvLogger) + if arvLogger != nil { + arvLogger.AddWriteHook(loggerutil.LogMemoryAlloc) + } - // readCollections := collection.GetCollections( - // collection.GetCollectionsParams{ - // Client: arv, BatchSize: 500}) + var ( + dataFetcher summary.DataFetcher + readCollections collection.ReadCollections + keepServerInfo keep.ReadServers + ) - // UserUsage := ComputeSizeOfOwnedCollections(readCollections) - // log.Printf("Uuid to Size used: %v", UserUsage) + if summary.ShouldReadData() { + dataFetcher = summary.ReadData + } else { + dataFetcher = BuildDataFetcher(arv) + } - // // TODO(misha): Add a "readonly" flag. If we're in readonly mode, - // // lots of behaviors can become warnings (and obviously we can't - // // write anything). - // // if !readCollections.ReadAllCollections { - // // log.Fatalf("Did not read all collections") - // // } + dataFetcher(arvLogger, &readCollections, &keepServerInfo) - // log.Printf("Read and processed %d collections", - // len(readCollections.UuidToCollection)) + summary.MaybeWriteData(arvLogger, readCollections, keepServerInfo) - readServers := keep.GetKeepServers( - keep.GetKeepServersParams{Client: arv, Limit: 1000}) + buckets := summary.BucketReplication(readCollections, keepServerInfo) + bucketCounts := buckets.Counts() - log.Printf("Returned %d keep disks", len(readServers.ServerToContents)) + replicationSummary := buckets.SummarizeBuckets(readCollections) + replicationCounts := replicationSummary.ComputeCounts() - blockReplicationCounts := make(map[int]int) - for _, infos := range readServers.BlockToServers { - replication := len(infos) - blockReplicationCounts[replication] += 1 + 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) } - log.Printf("Replication level distribution: %v", blockReplicationCounts) + 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 write timer before exiting. + if arvLogger != nil { + 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 + } + keep.SendTrashLists(kc, trashLists) + + return nil } -func ComputeSizeOfOwnedCollections(readCollections collection.ReadCollections) ( - results map[string]int) { - results = make(map[string]int) - for _, coll := range readCollections.UuidToCollection { - results[coll.OwnerUuid] = results[coll.OwnerUuid] + coll.TotalSize +// BuildDataFetcher 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 } - return }