1 // Copyright (C) The Arvados Authors. All rights reserved.
3 // SPDX-License-Identifier: AGPL-3.0
15 "git.curoverse.com/arvados.git/lib/config"
16 "git.curoverse.com/arvados.git/lib/service"
17 "git.curoverse.com/arvados.git/sdk/go/arvados"
18 "git.curoverse.com/arvados.git/sdk/go/ctxlog"
19 "github.com/sirupsen/logrus"
24 debugf = func(string, ...interface{}) {}
25 command = service.Command(arvados.ServiceNameKeepbalance, newHandler)
29 func newHandler(ctx context.Context, cluster *arvados.Cluster, token string) service.Handler {
30 if !options.Once && cluster.Collections.BalancePeriod == arvados.Duration(0) {
31 return service.ErrorHandler(ctx, cluster, fmt.Errorf("You must either run keep-balance with the -once flag, or set Collections.BalancePeriod in the config. "+
32 "If using the legacy keep-balance.yml config, RunPeriod is the equivalant of Collections.BalancePeriod."))
35 ac, err := arvados.NewClientFromConfig(cluster)
38 return service.ErrorHandler(ctx, cluster, fmt.Errorf("error initializing client from cluster config: %s", err))
41 if cluster.SystemLogs.LogLevel == "debug" {
45 if options.Logger == nil {
46 options.Logger = ctxlog.FromContext(ctx)
53 Metrics: newMetrics(),
54 Logger: options.Logger,
55 Dumper: options.Dumper,
63 os.Exit(runCommand(os.Args[0], os.Args[1:], os.Stdin, os.Stdout, os.Stderr))
66 func runCommand(prog string, args []string, stdin io.Reader, stdout, stderr io.Writer) int {
67 logger := ctxlog.FromContext(context.Background())
69 flags := flag.NewFlagSet(prog, flag.ExitOnError)
70 flags.BoolVar(&options.Once, "once", false,
71 "balance once and then exit")
72 flags.BoolVar(&options.CommitPulls, "commit-pulls", false,
73 "send pull requests (make more replicas of blocks that are underreplicated or are not in optimal rendezvous probe order)")
74 flags.BoolVar(&options.CommitTrash, "commit-trash", false,
75 "send trash requests (delete unreferenced old blocks, and excess replicas of overreplicated blocks)")
76 flags.Bool("version", false, "Write version information to stdout and exit 0")
77 dumpFlag := flags.Bool("dump", false, "dump details for each block to stdout")
79 loader := config.NewLoader(os.Stdin, logger)
80 loader.SetupFlags(flags)
82 munged := loader.MungeLegacyConfigArgs(logger, args, "-legacy-keepbalance-config")
86 dumper := logrus.New()
87 dumper.Out = os.Stdout
88 dumper.Formatter = &logrus.TextFormatter{}
89 options.Dumper = dumper
92 // Only pass along the version flag, which gets handled in RunCommand
94 flags.Visit(func(f *flag.Flag) {
95 if f.Name == "version" {
96 args = append(args, "-"+f.Name, f.Value.String())
100 return command.RunCommand(prog, args, stdin, stdout, stderr)