/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/* vim: set ts=2 et sw=2 tw=80: */
/*
Copyright 2013-2021 The Libfossil Authors, see LICENSES/BSD-2-Clause.txt
SPDX-License-Identifier: BSD-2-Clause-FreeBSD
SPDX-FileCopyrightText: 2021 The Libfossil Authors
SPDX-ArtifactOfProjectName: Libfossil
SPDX-FileType: Code
Heavily indebted to the Fossil SCM project (https://fossil-scm.org).
*****************************************************************************
This file implements a basic 'ls' for in-repo content.
*/
#include "libfossil.h"
static struct LsApp {
const char * glob;
fsl_list globs;
bool invertGlob;
} LsApp = {
NULL,
fsl_list_empty_m,
0/*invertGlob*/
};
static char ls_matches(char const * name){
if(!LsApp.globs.used) return 1;
else{
char const rc = fsl_glob_list_matches(&LsApp.globs, name) ? 1 : 0;
return LsApp.invertGlob ? !rc : rc;
}
}
/**
A fsl_card_F_visitor_f() implementation which outputs
state from fc to the fossil output channel.
*/
static int ls_F_card_v(fsl_card_F const * fc, void * state){
char show;
if(!fc->uuid) return 0 /* was removed in this manifest */;
show = ls_matches(fc->name);
if(show){
char perm;
if(FSL_FILE_PERM_EXE & fc->perm) perm = 'x';
else if(FSL_FILE_PERM_LINK & fc->perm) perm = 'L';
else perm = '-';
if(fcli_is_verbose()){
f_out("%-8"FSL_ID_T_PFMT,
fsl_uuid_to_rid(fcli_cx(), fc->uuid));
}
f_out("%.*s %c %s\n", 12, fc->uuid, perm, fc->name);
}
return 0;
}
int main(int argc, char const * const * argv ){
int rc = 0;
const char * lsVersion = NULL;
fsl_cx * f;
fsl_deck deck = fsl_deck_empty;
fsl_deck * d = &deck;
fcli_cliflag FCliFlags[] = {
FCLI_FLAG("v","version","version",&lsVersion,
"The version to list. Default is 'current' if there is a checkout, "
"else 'trunk'."),
FCLI_FLAG("g","glob","glob-list",&LsApp.glob,
"List only filenames matching the given "
"list of space-or-comma-separated glob pattern All patterns must "
"be provided as a single string argument, so be sure to quote them "
"if your shell might resolve them as wildcards."),
FCLI_FLAG_BOOL(0,"invert",&LsApp.invertGlob,
"Inverts the matching, such that only files not matching one of "
"the globs are listed."),
fcli_cliflag_empty_m
};
fcli_help_info FCliHelp = {
"Lists files in a fossil repository", NULL, NULL
};
rc = fcli_setup_v2(argc, argv, FCliFlags, &FCliHelp);
if(rc) goto end;
/* Set up/validate args... */
f = fcli_cx();
if(!fsl_cx_db_repo(f)){
rc = fcli_err_set(FSL_RC_NOT_A_REPO,
"Requires a repository db. See --help.");
goto end;
}
if(LsApp.glob){
fsl_glob_list_parse(&LsApp.globs, LsApp.glob);
}
LsApp.invertGlob = fcli_flag2("v","invert", NULL);
if(!lsVersion){
lsVersion = fsl_cx_db_ckout(f) ? "current" : "trunk";
}
if(fcli_has_unused_flags(0)) goto end;
/* Find/load the checkin... */
rc = fsl_deck_load_sym(f, d, lsVersion, FSL_SATYPE_CHECKIN);
if(rc) goto end;
/* Output the list...*/
f_out("File list from manifest version '%s' [%.*z] "
"(RID %"FSL_ID_T_PFMT")...\n",
lsVersion, 12, fsl_rid_to_uuid(f, d->rid),
d->rid);
if(d->B.uuid){
f_out("This is a delta manifest from baseline [%.*s].\n",
12, d->B.uuid);
}
if(fcli_is_verbose()) f_out("RID ");
f_out("%-12s P Name\n", "UUID");
rc = fsl_deck_F_foreach(d, ls_F_card_v, NULL);
end:
fsl_glob_list_clear(&LsApp.globs);
fsl_deck_finalize(d);
rc = fcli_end_of_main(rc);
return rc;
}