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, _ 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)
37 return service.ErrorHandler(ctx, cluster, fmt.Errorf("error initializing client from cluster config: %s", err))
40 if cluster.SystemLogs.LogLevel == "debug" {
44 if options.Logger == nil {
45 options.Logger = ctxlog.FromContext(ctx)
52 Metrics: newMetrics(),
53 Logger: options.Logger,
54 Dumper: options.Dumper,
62 os.Exit(runCommand(os.Args[0], os.Args[1:], os.Stdin, os.Stdout, os.Stderr))
65 func runCommand(prog string, args []string, stdin io.Reader, stdout, stderr io.Writer) int {
66 logger := ctxlog.FromContext(context.Background())
68 flags := flag.NewFlagSet(prog, flag.ExitOnError)
69 flags.BoolVar(&options.Once, "once", false,
70 "balance once and then exit")
71 flags.BoolVar(&options.CommitPulls, "commit-pulls", false,
72 "send pull requests (make more replicas of blocks that are underreplicated or are not in optimal rendezvous probe order)")
73 flags.BoolVar(&options.CommitTrash, "commit-trash", false,
74 "send trash requests (delete unreferenced old blocks, and excess replicas of overreplicated blocks)")
75 flags.Bool("version", false, "Write version information to stdout and exit 0")
76 dumpFlag := flags.Bool("dump", false, "dump details for each block to stdout")
78 loader := config.NewLoader(os.Stdin, logger)
79 loader.SetupFlags(flags)
81 munged := loader.MungeLegacyConfigArgs(logger, args, "-legacy-keepbalance-config")
85 dumper := logrus.New()
86 dumper.Out = os.Stdout
87 dumper.Formatter = &logrus.TextFormatter{}
88 options.Dumper = dumper
91 // Only pass along the version flag, which gets handled in RunCommand
93 flags.Visit(func(f *flag.Flag) {
94 if f.Name == "version" {
95 args = append(args, "-"+f.Name, f.Value.String())
99 return command.RunCommand(prog, args, stdin, stdout, stderr)