scalar.c

   1 /*
   2  * The Scalar command-line interface.
   3  */
   4
   5 #define USE_THE_REPOSITORY_VARIABLE
   6
   7 #include "git-compat-util.h"
   8 #include "abspath.h"
   9 #include "gettext.h"
  10 #include "parse-options.h"
  11 #include "config.h"
  12 #include "run-command.h"
  13 #include "simple-ipc.h"
  14 #include "fsmonitor-ipc.h"
  15 #include "fsmonitor-settings.h"
  16 #include "refs.h"
  17 #include "dir.h"
  18 #include "packfile.h"
  19 #include "help.h"
  20 #include "setup.h"
  21 #include "trace2.h"
  22
  23 static void setup_enlistment_directory(int argc, const char **argv,
  24                                        const char * const *usagestr,
  25                                        const struct option *options,
  26                                        struct strbuf *enlistment_root)
  27 {
  28         struct strbuf path = STRBUF_INIT;
  29         int enlistment_is_repo_parent = 0;
  30         size_t len;
  31
  32         if (startup_info->have_repository)
  33                 BUG("gitdir already set up?!?");
  34
  35         if (argc > 1)
  36                 usage_with_options(usagestr, options);
  37
  38         /* find the worktree, determine its corresponding root */
  39         if (argc == 1) {
  40                 strbuf_add_absolute_path(&path, argv[0]);
  41                 if (!is_directory(path.buf))
  42                         die(_("'%s' does not exist"), path.buf);
  43                 if (chdir(path.buf) < 0)
  44                         die_errno(_("could not switch to '%s'"), path.buf);
  45         } else if (strbuf_getcwd(&path) < 0)
  46                 die(_("need a working directory"));
  47
  48         strbuf_trim_trailing_dir_sep(&path);
  49
  50         /* check if currently in enlistment root with src/ workdir */
  51         len = path.len;
  52         strbuf_addstr(&path, "/src");
  53         if (is_nonbare_repository_dir(&path)) {
  54                 enlistment_is_repo_parent = 1;
  55                 if (chdir(path.buf) < 0)
  56                         die_errno(_("could not switch to '%s'"), path.buf);
  57         }
  58         strbuf_setlen(&path, len);
  59
  60         setup_git_directory();
  61
  62         if (!the_repository->worktree)
  63                 die(_("Scalar enlistments require a worktree"));
  64
  65         if (enlistment_root) {
  66                 if (enlistment_is_repo_parent)
  67                         strbuf_addbuf(enlistment_root, &path);
  68                 else
  69                         strbuf_addstr(enlistment_root, the_repository->worktree);
  70         }
  71
  72         strbuf_release(&path);
  73 }
  74
  75 LAST_ARG_MUST_BE_NULL
  76 static int run_git(const char *arg, ...)
  77 {
  78         struct child_process cmd = CHILD_PROCESS_INIT;
  79         va_list args;
  80         const char *p;
  81
  82         va_start(args, arg);
  83         strvec_push(&cmd.args, arg);
  84         while ((p = va_arg(args, const char *)))
  85                 strvec_push(&cmd.args, p);
  86         va_end(args);
  87
  88         cmd.git_cmd = 1;
  89         return run_command(&cmd);
  90 }
  91
  92 struct scalar_config {
  93         const char *key;
  94         const char *value;
  95         int overwrite_on_reconfigure;
  96 };
  97
  98 static int set_scalar_config(const struct scalar_config *config, int reconfigure)
  99 {
 100         char *value = NULL;
 101         int res;
 102
 103         if ((reconfigure && config->overwrite_on_reconfigure) ||
 104             git_config_get_string(config->key, &value)) {
 105                 trace2_data_string("scalar", the_repository, config->key, "created");
 106                 res = git_config_set_gently(config->key, config->value);
 107         } else {
 108                 trace2_data_string("scalar", the_repository, config->key, "exists");
 109                 res = 0;
 110         }
 111
 112         free(value);
 113         return res;
 114 }
 115
 116 static int have_fsmonitor_support(void)
 117 {
 118         return fsmonitor_ipc__is_supported() &&
 119                fsm_settings__get_reason(the_repository) == FSMONITOR_REASON_OK;
 120 }
 121
 122 static int set_recommended_config(int reconfigure)
 123 {
 124         struct scalar_config config[] = {
 125                 /* Required */
 126                 { "am.keepCR", "true", 1 },
 127                 { "core.FSCache", "true", 1 },
 128                 { "core.multiPackIndex", "true", 1 },
 129                 { "core.preloadIndex", "true", 1 },
 130 #ifndef WIN32
 131                 { "core.untrackedCache", "true", 1 },
 132 #else
 133                 /*
 134                  * Unfortunately, Scalar's Functional Tests demonstrated
 135                  * that the untracked cache feature is unreliable on Windows
 136                  * (which is a bummer because that platform would benefit the
 137                  * most from it). For some reason, freshly created files seem
 138                  * not to update the directory's `lastModified` time
 139                  * immediately, but the untracked cache would need to rely on
 140                  * that.
 141                  *
 142                  * Therefore, with a sad heart, we disable this very useful
 143                  * feature on Windows.
 144                  */
 145                 { "core.untrackedCache", "false", 1 },
 146 #endif
 147                 { "core.logAllRefUpdates", "true", 1 },
 148                 { "credential.https://dev.azure.com.useHttpPath", "true", 1 },
 149                 { "credential.validate", "false", 1 }, /* GCM4W-only */
 150                 { "gc.auto", "0", 1 },
 151                 { "gui.GCWarning", "false", 1 },
 152                 { "index.skipHash", "false", 1 },
 153                 { "index.threads", "true", 1 },
 154                 { "index.version", "4", 1 },
 155                 { "merge.stat", "false", 1 },
 156                 { "merge.renames", "true", 1 },
 157                 { "pack.useBitmaps", "false", 1 },
 158                 { "pack.useSparse", "true", 1 },
 159                 { "receive.autoGC", "false", 1 },
 160                 { "feature.manyFiles", "false", 1 },
 161                 { "feature.experimental", "false", 1 },
 162                 { "fetch.unpackLimit", "1", 1 },
 163                 { "fetch.writeCommitGraph", "false", 1 },
 164 #ifdef WIN32
 165                 { "http.sslBackend", "schannel", 1 },
 166 #endif
 167                 /* Optional */
 168                 { "status.aheadBehind", "false" },
 169                 { "commitGraph.generationVersion", "1" },
 170                 { "core.autoCRLF", "false" },
 171                 { "core.safeCRLF", "false" },
 172                 { "fetch.showForcedUpdates", "false" },
 173                 { NULL, NULL },
 174         };
 175         int i;
 176         char *value;
 177
 178         for (i = 0; config[i].key; i++) {
 179                 if (set_scalar_config(config + i, reconfigure))
 180                         return error(_("could not configure %s=%s"),
 181                                      config[i].key, config[i].value);
 182         }
 183
 184         if (have_fsmonitor_support()) {
 185                 struct scalar_config fsmonitor = { "core.fsmonitor", "true" };
 186                 if (set_scalar_config(&fsmonitor, reconfigure))
 187                         return error(_("could not configure %s=%s"),
 188                                      fsmonitor.key, fsmonitor.value);
 189         }
 190
 191         /*
 192          * The `log.excludeDecoration` setting is special because it allows
 193          * for multiple values.
 194          */
 195         if (git_config_get_string("log.excludeDecoration", &value)) {
 196                 trace2_data_string("scalar", the_repository,
 197                                    "log.excludeDecoration", "created");
 198                 if (git_config_set_multivar_gently("log.excludeDecoration",
 199                                                    "refs/prefetch/*",
 200                                                    CONFIG_REGEX_NONE, 0))
 201                         return error(_("could not configure "
 202                                        "log.excludeDecoration"));
 203         } else {
 204                 trace2_data_string("scalar", the_repository,
 205                                    "log.excludeDecoration", "exists");
 206                 free(value);
 207         }
 208
 209         return 0;
 210 }
 211
 212 static int toggle_maintenance(int enable)
 213 {
 214         return run_git("maintenance",
 215                        enable ? "start" : "unregister",
 216                        enable ? NULL : "--force",
 217                        NULL);
 218 }
 219
 220 static int add_or_remove_enlistment(int add)
 221 {
 222         int res;
 223
 224         if (!the_repository->worktree)
 225                 die(_("Scalar enlistments require a worktree"));
 226
 227         res = run_git("config", "--global", "--get", "--fixed-value",
 228                       "scalar.repo", the_repository->worktree, NULL);
 229
 230         /*
 231          * If we want to add and the setting is already there, then do nothing.
 232          * If we want to remove and the setting is not there, then do nothing.
 233          */
 234         if ((add && !res) || (!add && res))
 235                 return 0;
 236
 237         return run_git("config", "--global", add ? "--add" : "--unset",
 238                        add ? "--no-fixed-value" : "--fixed-value",
 239                        "scalar.repo", the_repository->worktree, NULL);
 240 }
 241
 242 static int start_fsmonitor_daemon(void)
 243 {
 244         assert(have_fsmonitor_support());
 245
 246         if (fsmonitor_ipc__get_state() != IPC_STATE__LISTENING)
 247                 return run_git("fsmonitor--daemon", "start", NULL);
 248
 249         return 0;
 250 }
 251
 252 static int stop_fsmonitor_daemon(void)
 253 {
 254         assert(have_fsmonitor_support());
 255
 256         if (fsmonitor_ipc__get_state() == IPC_STATE__LISTENING)
 257                 return run_git("fsmonitor--daemon", "stop", NULL);
 258
 259         return 0;
 260 }
 261
 262 static int register_dir(void)
 263 {
 264         if (add_or_remove_enlistment(1))
 265                 return error(_("could not add enlistment"));
 266
 267         if (set_recommended_config(0))
 268                 return error(_("could not set recommended config"));
 269
 270         if (toggle_maintenance(1))
 271                 warning(_("could not turn on maintenance"));
 272
 273         if (have_fsmonitor_support() && start_fsmonitor_daemon()) {
 274                 return error(_("could not start the FSMonitor daemon"));
 275         }
 276
 277         return 0;
 278 }
 279
 280 static int unregister_dir(void)
 281 {
 282         int res = 0;
 283
 284         if (toggle_maintenance(0))
 285                 res = error(_("could not turn off maintenance"));
 286
 287         if (add_or_remove_enlistment(0))
 288                 res = error(_("could not remove enlistment"));
 289
 290         return res;
 291 }
 292
 293 /* printf-style interface, expects `<key>=<value>` argument */
 294 __attribute__((format (printf, 1, 2)))
 295 static int set_config(const char *fmt, ...)
 296 {
 297         struct strbuf buf = STRBUF_INIT;
 298         char *value;
 299         int res;
 300         va_list args;
 301
 302         va_start(args, fmt);
 303         strbuf_vaddf(&buf, fmt, args);
 304         va_end(args);
 305
 306         value = strchr(buf.buf, '=');
 307         if (value)
 308                 *(value++) = '\0';
 309         res = git_config_set_gently(buf.buf, value);
 310         strbuf_release(&buf);
 311
 312         return res;
 313 }
 314
 315 static char *remote_default_branch(const char *url)
 316 {
 317         struct child_process cp = CHILD_PROCESS_INIT;
 318         struct strbuf out = STRBUF_INIT;
 319
 320         cp.git_cmd = 1;
 321         strvec_pushl(&cp.args, "ls-remote", "--symref", url, "HEAD", NULL);
 322         if (!pipe_command(&cp, NULL, 0, &out, 0, NULL, 0)) {
 323                 const char *line = out.buf;
 324
 325                 while (*line) {
 326                         const char *eol = strchrnul(line, '\n'), *p;
 327                         size_t len = eol - line;
 328                         char *branch;
 329
 330                         if (!skip_prefix(line, "ref: ", &p) ||
 331                             !strip_suffix_mem(line, &len, "\tHEAD")) {
 332                                 line = eol + (*eol == '\n');
 333                                 continue;
 334                         }
 335
 336                         eol = line + len;
 337                         if (skip_prefix(p, "refs/heads/", &p)) {
 338                                 branch = xstrndup(p, eol - p);
 339                                 strbuf_release(&out);
 340                                 return branch;
 341                         }
 342
 343                         error(_("remote HEAD is not a branch: '%.*s'"),
 344                               (int)(eol - p), p);
 345                         strbuf_release(&out);
 346                         return NULL;
 347                 }
 348         }
 349         warning(_("failed to get default branch name from remote; "
 350                   "using local default"));
 351         strbuf_reset(&out);
 352
 353         child_process_init(&cp);
 354         cp.git_cmd = 1;
 355         strvec_pushl(&cp.args, "symbolic-ref", "--short", "HEAD", NULL);
 356         if (!pipe_command(&cp, NULL, 0, &out, 0, NULL, 0)) {
 357                 strbuf_trim(&out);
 358                 return strbuf_detach(&out, NULL);
 359         }
 360
 361         strbuf_release(&out);
 362         error(_("failed to get default branch name"));
 363         return NULL;
 364 }
 365
 366 static int delete_enlistment(struct strbuf *enlistment)
 367 {
 368         struct strbuf parent = STRBUF_INIT;
 369         size_t offset;
 370         char *path_sep;
 371
 372         if (unregister_dir())
 373                 return error(_("failed to unregister repository"));
 374
 375         /*
 376          * Change the current directory to one outside of the enlistment so
 377          * that we may delete everything underneath it.
 378          */
 379         offset = offset_1st_component(enlistment->buf);
 380         path_sep = find_last_dir_sep(enlistment->buf + offset);
 381         strbuf_add(&parent, enlistment->buf,
 382                    path_sep ? path_sep - enlistment->buf : offset);
 383         if (chdir(parent.buf) < 0) {
 384                 int res = error_errno(_("could not switch to '%s'"), parent.buf);
 385                 strbuf_release(&parent);
 386                 return res;
 387         }
 388         strbuf_release(&parent);
 389
 390         if (have_fsmonitor_support() && stop_fsmonitor_daemon())
 391                 return error(_("failed to stop the FSMonitor daemon"));
 392
 393         if (remove_dir_recursively(enlistment, 0))
 394                 return error(_("failed to delete enlistment directory"));
 395
 396         return 0;
 397 }
 398
 399 /*
 400  * Dummy implementation; Using `get_version_info()` would cause a link error
 401  * without this.
 402  */
 403 void load_builtin_commands(const char *prefix, struct cmdnames *cmds)
 404 {
 405         die("not implemented");
 406 }
 407
 408 static int cmd_clone(int argc, const char **argv)
 409 {
 410         const char *branch = NULL;
 411         int full_clone = 0, single_branch = 0, show_progress = isatty(2);
 412         int src = 1;
 413         struct option clone_options[] = {
 414                 OPT_STRING('b', "branch", &branch, N_("<branch>"),
 415                            N_("branch to checkout after clone")),
 416                 OPT_BOOL(0, "full-clone", &full_clone,
 417                          N_("when cloning, create full working directory")),
 418                 OPT_BOOL(0, "single-branch", &single_branch,
 419                          N_("only download metadata for the branch that will "
 420                             "be checked out")),
 421                 OPT_BOOL(0, "src", &src,
 422                          N_("create repository within 'src' directory")),
 423                 OPT_END(),
 424         };
 425         const char * const clone_usage[] = {
 426                 N_("scalar clone [--single-branch] [--branch <main-branch>] [--full-clone]\n"
 427                    "\t[--[no-]src] <url> [<enlistment>]"),
 428                 NULL
 429         };
 430         const char *url;
 431         char *enlistment = NULL, *dir = NULL;
 432         struct strbuf buf = STRBUF_INIT;
 433         int res;
 434
 435         argc = parse_options(argc, argv, NULL, clone_options, clone_usage, 0);
 436
 437         if (argc == 2) {
 438                 url = argv[0];
 439                 enlistment = xstrdup(argv[1]);
 440         } else if (argc == 1) {
 441                 url = argv[0];
 442
 443                 strbuf_addstr(&buf, url);
 444                 /* Strip trailing slashes, if any */
 445                 while (buf.len > 0 && is_dir_sep(buf.buf[buf.len - 1]))
 446                         strbuf_setlen(&buf, buf.len - 1);
 447                 /* Strip suffix `.git`, if any */
 448                 strbuf_strip_suffix(&buf, ".git");
 449
 450                 enlistment = find_last_dir_sep(buf.buf);
 451                 if (!enlistment) {
 452                         die(_("cannot deduce worktree name from '%s'"), url);
 453                 }
 454                 enlistment = xstrdup(enlistment + 1);
 455         } else {
 456                 usage_msg_opt(_("You must specify a repository to clone."),
 457                               clone_usage, clone_options);
 458         }
 459
 460         if (is_directory(enlistment))
 461                 die(_("directory '%s' exists already"), enlistment);
 462
 463         if (src)
 464                 dir = xstrfmt("%s/src", enlistment);
 465         else
 466                 dir = xstrdup(enlistment);
 467
 468         strbuf_reset(&buf);
 469         if (branch)
 470                 strbuf_addf(&buf, "init.defaultBranch=%s", branch);
 471         else {
 472                 char *b = repo_default_branch_name(the_repository, 1);
 473                 strbuf_addf(&buf, "init.defaultBranch=%s", b);
 474                 free(b);
 475         }
 476
 477         if ((res = run_git("-c", buf.buf, "init", "--", dir, NULL)))
 478                 goto cleanup;
 479
 480         if (chdir(dir) < 0) {
 481                 res = error_errno(_("could not switch to '%s'"), dir);
 482                 goto cleanup;
 483         }
 484
 485         setup_git_directory();
 486
 487         /* common-main already logs `argv` */
 488         trace2_def_repo(the_repository);
 489
 490         if (!branch && !(branch = remote_default_branch(url))) {
 491                 res = error(_("failed to get default branch for '%s'"), url);
 492                 goto cleanup;
 493         }
 494
 495         if (set_config("remote.origin.url=%s", url) ||
 496             set_config("remote.origin.fetch="
 497                        "+refs/heads/%s:refs/remotes/origin/%s",
 498                        single_branch ? branch : "*",
 499                        single_branch ? branch : "*") ||
 500             set_config("remote.origin.promisor=true") ||
 501             set_config("remote.origin.partialCloneFilter=blob:none")) {
 502                 res = error(_("could not configure remote in '%s'"), dir);
 503                 goto cleanup;
 504         }
 505
 506         if (!full_clone &&
 507             (res = run_git("sparse-checkout", "init", "--cone", NULL)))
 508                 goto cleanup;
 509
 510         if (set_recommended_config(0))
 511                 return error(_("could not configure '%s'"), dir);
 512
 513         if ((res = run_git("fetch", "--quiet",
 514                                 show_progress ? "--progress" : "--no-progress",
 515                                 "origin", NULL))) {
 516                 warning(_("partial clone failed; attempting full clone"));
 517
 518                 if (set_config("remote.origin.promisor") ||
 519                     set_config("remote.origin.partialCloneFilter")) {
 520                         res = error(_("could not configure for full clone"));
 521                         goto cleanup;
 522                 }
 523
 524                 if ((res = run_git("fetch", "--quiet",
 525                                         show_progress ? "--progress" : "--no-progress",
 526                                         "origin", NULL)))
 527                         goto cleanup;
 528         }
 529
 530         if ((res = set_config("branch.%s.remote=origin", branch)))
 531                 goto cleanup;
 532         if ((res = set_config("branch.%s.merge=refs/heads/%s",
 533                               branch, branch)))
 534                 goto cleanup;
 535
 536         strbuf_reset(&buf);
 537         strbuf_addf(&buf, "origin/%s", branch);
 538         res = run_git("checkout", "-f", "-t", buf.buf, NULL);
 539         if (res)
 540                 goto cleanup;
 541
 542         res = register_dir();
 543
 544 cleanup:
 545         free(enlistment);
 546         free(dir);
 547         strbuf_release(&buf);
 548         return res;
 549 }
 550
 551 static int cmd_diagnose(int argc, const char **argv)
 552 {
 553         struct option options[] = {
 554                 OPT_END(),
 555         };
 556         const char * const usage[] = {
 557                 N_("scalar diagnose [<enlistment>]"),
 558                 NULL
 559         };
 560         struct strbuf diagnostics_root = STRBUF_INIT;
 561         int res = 0;
 562
 563         argc = parse_options(argc, argv, NULL, options,
 564                              usage, 0);
 565
 566         setup_enlistment_directory(argc, argv, usage, options, &diagnostics_root);
 567         strbuf_addstr(&diagnostics_root, "/.scalarDiagnostics");
 568
 569         res = run_git("diagnose", "--mode=all", "-s", "%Y%m%d_%H%M%S",
 570                       "-o", diagnostics_root.buf, NULL);
 571
 572         strbuf_release(&diagnostics_root);
 573         return res;
 574 }
 575
 576 static int cmd_list(int argc, const char **argv UNUSED)
 577 {
 578         if (argc != 1)
 579                 die(_("`scalar list` does not take arguments"));
 580
 581         if (run_git("config", "--global", "--get-all", "scalar.repo", NULL) < 0)
 582                 return -1;
 583         return 0;
 584 }
 585
 586 static int cmd_register(int argc, const char **argv)
 587 {
 588         struct option options[] = {
 589                 OPT_END(),
 590         };
 591         const char * const usage[] = {
 592                 N_("scalar register [<enlistment>]"),
 593                 NULL
 594         };
 595
 596         argc = parse_options(argc, argv, NULL, options,
 597                              usage, 0);
 598
 599         setup_enlistment_directory(argc, argv, usage, options, NULL);
 600
 601         return register_dir();
 602 }
 603
 604 static int get_scalar_repos(const char *key, const char *value,
 605                             const struct config_context *ctx UNUSED,
 606                             void *data)
 607 {
 608         struct string_list *list = data;
 609
 610         if (!strcmp(key, "scalar.repo"))
 611                 string_list_append(list, value);
 612
 613         return 0;
 614 }
 615
 616 static int remove_deleted_enlistment(struct strbuf *path)
 617 {
 618         int res = 0;
 619         strbuf_realpath_forgiving(path, path->buf, 1);
 620
 621         if (run_git("config", "--global",
 622                     "--unset", "--fixed-value",
 623                     "scalar.repo", path->buf, NULL) < 0)
 624                 res = -1;
 625
 626         if (run_git("config", "--global",
 627                     "--unset", "--fixed-value",
 628                     "maintenance.repo", path->buf, NULL) < 0)
 629                 res = -1;
 630
 631         return res;
 632 }
 633
 634 static int cmd_reconfigure(int argc, const char **argv)
 635 {
 636         int all = 0;
 637         struct option options[] = {
 638                 OPT_BOOL('a', "all", &all,
 639                          N_("reconfigure all registered enlistments")),
 640                 OPT_END(),
 641         };
 642         const char * const usage[] = {
 643                 N_("scalar reconfigure [--all | <enlistment>]"),
 644                 NULL
 645         };
 646         struct string_list scalar_repos = STRING_LIST_INIT_DUP;
 647         int i, res = 0;
 648         struct strbuf commondir = STRBUF_INIT, gitdir = STRBUF_INIT;
 649
 650         argc = parse_options(argc, argv, NULL, options,
 651                              usage, 0);
 652
 653         if (!all) {
 654                 setup_enlistment_directory(argc, argv, usage, options, NULL);
 655
 656                 return set_recommended_config(1);
 657         }
 658
 659         if (argc > 0)
 660                 usage_msg_opt(_("--all or <enlistment>, but not both"),
 661                               usage, options);
 662
 663         git_config(get_scalar_repos, &scalar_repos);
 664
 665         for (i = 0; i < scalar_repos.nr; i++) {
 666                 int succeeded = 0;
 667                 struct repository *old_repo, r = { NULL };
 668                 const char *dir = scalar_repos.items[i].string;
 669
 670                 strbuf_reset(&commondir);
 671                 strbuf_reset(&gitdir);
 672
 673                 if (chdir(dir) < 0) {
 674                         struct strbuf buf = STRBUF_INIT;
 675
 676                         if (errno != ENOENT) {
 677                                 warning_errno(_("could not switch to '%s'"), dir);
 678                                 goto loop_end;
 679                         }
 680
 681                         strbuf_addstr(&buf, dir);
 682                         if (remove_deleted_enlistment(&buf))
 683                                 error(_("could not remove stale "
 684                                         "scalar.repo '%s'"), dir);
 685                         else {
 686                                 warning(_("removed stale scalar.repo '%s'"),
 687                                         dir);
 688                                 succeeded = 1;
 689                         }
 690                         strbuf_release(&buf);
 691                         goto loop_end;
 692                 }
 693
 694                 switch (discover_git_directory_reason(&commondir, &gitdir)) {
 695                 case GIT_DIR_INVALID_OWNERSHIP:
 696                         warning(_("repository at '%s' has different owner"), dir);
 697                         goto loop_end;
 698
 699                 case GIT_DIR_INVALID_GITFILE:
 700                 case GIT_DIR_INVALID_FORMAT:
 701                         warning(_("repository at '%s' has a format issue"), dir);
 702                         goto loop_end;
 703
 704                 case GIT_DIR_DISCOVERED:
 705                         succeeded = 1;
 706                         break;
 707
 708                 default:
 709                         warning(_("repository not found in '%s'"), dir);
 710                         break;
 711                 }
 712
 713                 git_config_clear();
 714
 715                 if (repo_init(&r, gitdir.buf, commondir.buf))
 716                         goto loop_end;
 717
 718                 old_repo = the_repository;
 719                 the_repository = &r;
 720
 721                 if (set_recommended_config(1) >= 0)
 722                         succeeded = 1;
 723
 724                 the_repository = old_repo;
 725
 726 loop_end:
 727                 if (!succeeded) {
 728                         res = -1;
 729                         warning(_("to unregister this repository from Scalar, run\n"
 730                                   "\tgit config --global --unset --fixed-value scalar.repo \"%s\""),
 731                                 dir);
 732                 }
 733         }
 734
 735         string_list_clear(&scalar_repos, 1);
 736         strbuf_release(&commondir);
 737         strbuf_release(&gitdir);
 738
 739         return res;
 740 }
 741
 742 static int cmd_run(int argc, const char **argv)
 743 {
 744         struct option options[] = {
 745                 OPT_END(),
 746         };
 747         struct {
 748                 const char *arg, *task;
 749         } tasks[] = {
 750                 { "config", NULL },
 751                 { "commit-graph", "commit-graph" },
 752                 { "fetch", "prefetch" },
 753                 { "loose-objects", "loose-objects" },
 754                 { "pack-files", "incremental-repack" },
 755                 { NULL, NULL }
 756         };
 757         struct strbuf buf = STRBUF_INIT;
 758         const char *usagestr[] = { NULL, NULL };
 759         int i;
 760
 761         strbuf_addstr(&buf, N_("scalar run <task> [<enlistment>]\nTasks:\n"));
 762         for (i = 0; tasks[i].arg; i++)
 763                 strbuf_addf(&buf, "\t%s\n", tasks[i].arg);
 764         usagestr[0] = buf.buf;
 765
 766         argc = parse_options(argc, argv, NULL, options,
 767                              usagestr, 0);
 768
 769         if (!argc)
 770                 usage_with_options(usagestr, options);
 771
 772         if (!strcmp("all", argv[0])) {
 773                 i = -1;
 774         } else {
 775                 for (i = 0; tasks[i].arg && strcmp(tasks[i].arg, argv[0]); i++)
 776                         ; /* keep looking for the task */
 777
 778                 if (i > 0 && !tasks[i].arg) {
 779                         error(_("no such task: '%s'"), argv[0]);
 780                         usage_with_options(usagestr, options);
 781                 }
 782         }
 783
 784         argc--;
 785         argv++;
 786         setup_enlistment_directory(argc, argv, usagestr, options, NULL);
 787         strbuf_release(&buf);
 788
 789         if (i == 0)
 790                 return register_dir();
 791
 792         if (i > 0)
 793                 return run_git("maintenance", "run",
 794                                "--task", tasks[i].task, NULL);
 795
 796         if (register_dir())
 797                 return -1;
 798         for (i = 1; tasks[i].arg; i++)
 799                 if (run_git("maintenance", "run",
 800                             "--task", tasks[i].task, NULL))
 801                         return -1;
 802         return 0;
 803 }
 804
 805 static int cmd_unregister(int argc, const char **argv)
 806 {
 807         struct option options[] = {
 808                 OPT_END(),
 809         };
 810         const char * const usage[] = {
 811                 N_("scalar unregister [<enlistment>]"),
 812                 NULL
 813         };
 814
 815         argc = parse_options(argc, argv, NULL, options,
 816                              usage, 0);
 817
 818         /*
 819          * Be forgiving when the enlistment or worktree does not even exist any
 820          * longer; This can be the case if a user deleted the worktree by
 821          * mistake and _still_ wants to unregister the thing.
 822          */
 823         if (argc == 1) {
 824                 struct strbuf src_path = STRBUF_INIT, workdir_path = STRBUF_INIT;
 825
 826                 strbuf_addf(&src_path, "%s/src/.git", argv[0]);
 827                 strbuf_addf(&workdir_path, "%s/.git", argv[0]);
 828                 if (!is_directory(src_path.buf) && !is_directory(workdir_path.buf)) {
 829                         /* remove possible matching registrations */
 830                         int res = -1;
 831
 832                         strbuf_strip_suffix(&src_path, "/.git");
 833                         res = remove_deleted_enlistment(&src_path) && res;
 834
 835                         strbuf_strip_suffix(&workdir_path, "/.git");
 836                         res = remove_deleted_enlistment(&workdir_path) && res;
 837
 838                         strbuf_release(&src_path);
 839                         strbuf_release(&workdir_path);
 840                         return res;
 841                 }
 842                 strbuf_release(&src_path);
 843                 strbuf_release(&workdir_path);
 844         }
 845
 846         setup_enlistment_directory(argc, argv, usage, options, NULL);
 847
 848         return unregister_dir();
 849 }
 850
 851 static int cmd_delete(int argc, const char **argv)
 852 {
 853         char *cwd = xgetcwd();
 854         struct option options[] = {
 855                 OPT_END(),
 856         };
 857         const char * const usage[] = {
 858                 N_("scalar delete <enlistment>"),
 859                 NULL
 860         };
 861         struct strbuf enlistment = STRBUF_INIT;
 862         int res = 0;
 863
 864         argc = parse_options(argc, argv, NULL, options,
 865                              usage, 0);
 866
 867         if (argc != 1)
 868                 usage_with_options(usage, options);
 869
 870         setup_enlistment_directory(argc, argv, usage, options, &enlistment);
 871
 872         if (dir_inside_of(cwd, enlistment.buf) >= 0)
 873                 res = error(_("refusing to delete current working directory"));
 874         else {
 875                 close_object_store(the_repository->objects);
 876                 res = delete_enlistment(&enlistment);
 877         }
 878         strbuf_release(&enlistment);
 879         free(cwd);
 880
 881         return res;
 882 }
 883
 884 static int cmd_help(int argc, const char **argv)
 885 {
 886         struct option options[] = {
 887                 OPT_END(),
 888         };
 889         const char * const usage[] = {
 890                 "scalar help",
 891                 NULL
 892         };
 893
 894         argc = parse_options(argc, argv, NULL, options,
 895                              usage, 0);
 896
 897         if (argc != 0)
 898                 usage_with_options(usage, options);
 899
 900         return run_git("help", "scalar", NULL);
 901 }
 902
 903 static int cmd_version(int argc, const char **argv)
 904 {
 905         int verbose = 0, build_options = 0;
 906         struct option options[] = {
 907                 OPT__VERBOSE(&verbose, N_("include Git version")),
 908                 OPT_BOOL(0, "build-options", &build_options,
 909                          N_("include Git's build options")),
 910                 OPT_END(),
 911         };
 912         const char * const usage[] = {
 913                 N_("scalar verbose [-v | --verbose] [--build-options]"),
 914                 NULL
 915         };
 916         struct strbuf buf = STRBUF_INIT;
 917
 918         argc = parse_options(argc, argv, NULL, options,
 919                              usage, 0);
 920
 921         if (argc != 0)
 922                 usage_with_options(usage, options);
 923
 924         get_version_info(&buf, build_options);
 925         fprintf(stderr, "%s\n", buf.buf);
 926         strbuf_release(&buf);
 927
 928         return 0;
 929 }
 930
 931 static struct {
 932         const char *name;
 933         int (*fn)(int, const char **);
 934 } builtins[] = {
 935         { "clone", cmd_clone },
 936         { "list", cmd_list },
 937         { "register", cmd_register },
 938         { "unregister", cmd_unregister },
 939         { "run", cmd_run },
 940         { "reconfigure", cmd_reconfigure },
 941         { "delete", cmd_delete },
 942         { "help", cmd_help },
 943         { "version", cmd_version },
 944         { "diagnose", cmd_diagnose },
 945         { NULL, NULL},
 946 };
 947
 948 int cmd_main(int argc, const char **argv)
 949 {
 950         struct strbuf scalar_usage = STRBUF_INIT;
 951         int i;
 952
 953         while (argc > 1 && *argv[1] == '-') {
 954                 if (!strcmp(argv[1], "-C")) {
 955                         if (argc < 3)
 956                                 die(_("-C requires a <directory>"));
 957                         if (chdir(argv[2]) < 0)
 958                                 die_errno(_("could not change to '%s'"),
 959                                           argv[2]);
 960                         argc -= 2;
 961                         argv += 2;
 962                 } else if (!strcmp(argv[1], "-c")) {
 963                         if (argc < 3)
 964                                 die(_("-c requires a <key>=<value> argument"));
 965                         git_config_push_parameter(argv[2]);
 966                         argc -= 2;
 967                         argv += 2;
 968                 } else
 969                         break;
 970         }
 971
 972         if (argc > 1) {
 973                 argv++;
 974                 argc--;
 975
 976                 for (i = 0; builtins[i].name; i++)
 977                         if (!strcmp(builtins[i].name, argv[0]))
 978                                 return !!builtins[i].fn(argc, argv);
 979         }
 980
 981         strbuf_addstr(&scalar_usage,
 982                       N_("scalar [-C <directory>] [-c <key>=<value>] "
 983                          "<command> [<options>]\n\nCommands:\n"));
 984         for (i = 0; builtins[i].name; i++)
 985                 strbuf_addf(&scalar_usage, "\t%s\n", builtins[i].name);
 986
 987         usage(scalar_usage.buf);
 988 }