041e6eb1c5
These aliases are supported and documented in the man page. For now, they will not be mentioned in the error when an invalid argument is encountered, instead keeping that list to the shorter 'preferred' names of each argument. Reported by: rgrimes
1013 lines
25 KiB
C
1013 lines
25 KiB
C
/*-
|
|
* SPDX-License-Identifier: BSD-3-Clause
|
|
*
|
|
* Copyright (c) 1989, 1993, 1994
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to Berkeley by
|
|
* Michael Fischbein.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. Neither the name of the University nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#ifndef lint
|
|
static const char copyright[] =
|
|
"@(#) Copyright (c) 1989, 1993, 1994\n\
|
|
The Regents of the University of California. All rights reserved.\n";
|
|
#endif /* not lint */
|
|
|
|
#if 0
|
|
#ifndef lint
|
|
static char sccsid[] = "@(#)ls.c 8.5 (Berkeley) 4/2/94";
|
|
#endif /* not lint */
|
|
#endif
|
|
#include <sys/cdefs.h>
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/stat.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/mac.h>
|
|
|
|
#include <dirent.h>
|
|
#include <err.h>
|
|
#include <errno.h>
|
|
#include <fts.h>
|
|
#include <getopt.h>
|
|
#include <grp.h>
|
|
#include <inttypes.h>
|
|
#include <limits.h>
|
|
#include <locale.h>
|
|
#include <pwd.h>
|
|
#include <stdbool.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#ifdef COLORLS
|
|
#include <termcap.h>
|
|
#include <signal.h>
|
|
#endif
|
|
|
|
#include "ls.h"
|
|
#include "extern.h"
|
|
|
|
/*
|
|
* Upward approximation of the maximum number of characters needed to
|
|
* represent a value of integral type t as a string, excluding the
|
|
* NUL terminator, with provision for a sign.
|
|
*/
|
|
#define STRBUF_SIZEOF(t) (1 + CHAR_BIT * sizeof(t) / 3 + 1)
|
|
|
|
/*
|
|
* MAKENINES(n) turns n into (10**n)-1. This is useful for converting a width
|
|
* into a number that wide in decimal.
|
|
* XXX: Overflows are not considered.
|
|
*/
|
|
#define MAKENINES(n) \
|
|
do { \
|
|
intmax_t i; \
|
|
\
|
|
/* Use a loop as all values of n are small. */ \
|
|
for (i = 1; n > 0; i *= 10) \
|
|
n--; \
|
|
n = i - 1; \
|
|
} while(0)
|
|
|
|
static void display(const FTSENT *, FTSENT *, int);
|
|
static int mastercmp(const FTSENT * const *, const FTSENT * const *);
|
|
static void traverse(int, char **, int);
|
|
|
|
#define COLOR_OPT (CHAR_MAX + 1)
|
|
|
|
static const struct option long_opts[] =
|
|
{
|
|
#ifdef COLORLS
|
|
{"color", optional_argument, NULL, COLOR_OPT},
|
|
#endif
|
|
{NULL, no_argument, NULL, 0}
|
|
};
|
|
|
|
static void (*printfcn)(const DISPLAY *);
|
|
static int (*sortfcn)(const FTSENT *, const FTSENT *);
|
|
|
|
long blocksize; /* block size units */
|
|
int termwidth = 80; /* default terminal width */
|
|
|
|
/* flags */
|
|
int f_accesstime; /* use time of last access */
|
|
int f_birthtime; /* use time of birth */
|
|
int f_flags; /* show flags associated with a file */
|
|
int f_humanval; /* show human-readable file sizes */
|
|
int f_inode; /* print inode */
|
|
static int f_kblocks; /* print size in kilobytes */
|
|
int f_label; /* show MAC label */
|
|
static int f_listdir; /* list actual directory, not contents */
|
|
static int f_listdot; /* list files beginning with . */
|
|
int f_longform; /* long listing format */
|
|
static int f_noautodot; /* do not automatically enable -A for root */
|
|
static int f_nofollow; /* don't follow symbolic link arguments */
|
|
int f_nonprint; /* show unprintables as ? */
|
|
static int f_nosort; /* don't sort output */
|
|
int f_notabs; /* don't use tab-separated multi-col output */
|
|
static int f_numericonly; /* don't convert uid/gid to name */
|
|
int f_octal; /* show unprintables as \xxx */
|
|
int f_octal_escape; /* like f_octal but use C escapes if possible */
|
|
static int f_recursive; /* ls subdirectories also */
|
|
static int f_reversesort; /* reverse whatever sort is used */
|
|
int f_samesort; /* sort time and name in same direction */
|
|
int f_sectime; /* print full time information */
|
|
static int f_singlecol; /* use single column output */
|
|
int f_size; /* list size in short listing */
|
|
static int f_sizesort;
|
|
int f_slash; /* similar to f_type, but only for dirs */
|
|
int f_sortacross; /* sort across rows, not down columns */
|
|
int f_statustime; /* use time of last mode change */
|
|
static int f_stream; /* stream the output, separate with commas */
|
|
int f_thousands; /* show file sizes with thousands separators */
|
|
char *f_timeformat; /* user-specified time format */
|
|
static int f_timesort; /* sort by time vice name */
|
|
int f_type; /* add type character for non-regular files */
|
|
static int f_whiteout; /* show whiteout entries */
|
|
#ifdef COLORLS
|
|
int colorflag = COLORFLAG_AUTO; /* passed in colorflag */
|
|
int f_color; /* add type in color for non-regular files */
|
|
bool explicitansi; /* Explicit ANSI sequences, no termcap(5) */
|
|
char *ansi_bgcol; /* ANSI sequence to set background colour */
|
|
char *ansi_fgcol; /* ANSI sequence to set foreground colour */
|
|
char *ansi_coloff; /* ANSI sequence to reset colours */
|
|
char *attrs_off; /* ANSI sequence to turn off attributes */
|
|
char *enter_bold; /* ANSI sequence to set color to bold mode */
|
|
#endif
|
|
|
|
static int rval;
|
|
|
|
static bool
|
|
do_color_from_env(void)
|
|
{
|
|
const char *p;
|
|
bool doit;
|
|
|
|
doit = false;
|
|
p = getenv("CLICOLOR");
|
|
if (p == NULL) {
|
|
/*
|
|
* COLORTERM is the more standard name for this variable. We'll
|
|
* honor it as long as it's both set and not empty.
|
|
*/
|
|
p = getenv("COLORTERM");
|
|
if (p != NULL && *p != '\0')
|
|
doit = true;
|
|
} else
|
|
doit = true;
|
|
|
|
return (doit &&
|
|
(isatty(STDOUT_FILENO) || getenv("CLICOLOR_FORCE")));
|
|
}
|
|
|
|
static bool
|
|
do_color(void)
|
|
{
|
|
|
|
#ifdef COLORLS
|
|
if (colorflag == COLORFLAG_NEVER)
|
|
return (false);
|
|
else if (colorflag == COLORFLAG_ALWAYS)
|
|
return (true);
|
|
#endif
|
|
return (do_color_from_env());
|
|
}
|
|
|
|
static bool
|
|
do_color_always(const char *term)
|
|
{
|
|
|
|
return (strcmp(term, "always") == 0 || strcmp(term, "yes") == 0 ||
|
|
strcmp(term, "force") == 0);
|
|
}
|
|
|
|
static bool
|
|
do_color_never(const char *term)
|
|
{
|
|
|
|
return (strcmp(term, "never") == 0 || strcmp(term, "no") == 0 ||
|
|
strcmp(term, "none") == 0);
|
|
}
|
|
|
|
static bool
|
|
do_color_auto(const char *term)
|
|
{
|
|
|
|
return (strcmp(term, "auto") == 0 || strcmp(term, "tty") == 0 ||
|
|
strcmp(term, "if-tty") == 0);
|
|
}
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
static char dot[] = ".", *dotav[] = {dot, NULL};
|
|
struct winsize win;
|
|
int ch, fts_options, notused;
|
|
char *p;
|
|
const char *errstr = NULL;
|
|
#ifdef COLORLS
|
|
char termcapbuf[1024]; /* termcap definition buffer */
|
|
char tcapbuf[512]; /* capability buffer */
|
|
char *bp = tcapbuf, *term;
|
|
#endif
|
|
|
|
(void)setlocale(LC_ALL, "");
|
|
|
|
/* Terminal defaults to -Cq, non-terminal defaults to -1. */
|
|
if (isatty(STDOUT_FILENO)) {
|
|
termwidth = 80;
|
|
if ((p = getenv("COLUMNS")) != NULL && *p != '\0')
|
|
termwidth = strtonum(p, 0, INT_MAX, &errstr);
|
|
else if (ioctl(STDOUT_FILENO, TIOCGWINSZ, &win) != -1 &&
|
|
win.ws_col > 0)
|
|
termwidth = win.ws_col;
|
|
f_nonprint = 1;
|
|
} else {
|
|
f_singlecol = 1;
|
|
/* retrieve environment variable, in case of explicit -C */
|
|
p = getenv("COLUMNS");
|
|
if (p)
|
|
termwidth = strtonum(p, 0, INT_MAX, &errstr);
|
|
}
|
|
|
|
if (errstr)
|
|
termwidth = 80;
|
|
|
|
fts_options = FTS_PHYSICAL;
|
|
if (getenv("LS_SAMESORT"))
|
|
f_samesort = 1;
|
|
while ((ch = getopt_long(argc, argv,
|
|
"+1ABCD:FGHILPRSTUWXZabcdfghiklmnopqrstuwxy,", long_opts,
|
|
NULL)) != -1) {
|
|
switch (ch) {
|
|
/*
|
|
* The -1, -C, -x and -l options all override each other so
|
|
* shell aliasing works right.
|
|
*/
|
|
case '1':
|
|
f_singlecol = 1;
|
|
f_longform = 0;
|
|
f_stream = 0;
|
|
break;
|
|
case 'C':
|
|
f_sortacross = f_longform = f_singlecol = 0;
|
|
break;
|
|
case 'l':
|
|
f_longform = 1;
|
|
f_singlecol = 0;
|
|
f_stream = 0;
|
|
break;
|
|
case 'x':
|
|
f_sortacross = 1;
|
|
f_longform = 0;
|
|
f_singlecol = 0;
|
|
break;
|
|
/* The -c, -u, and -U options override each other. */
|
|
case 'c':
|
|
f_statustime = 1;
|
|
f_accesstime = 0;
|
|
f_birthtime = 0;
|
|
break;
|
|
case 'u':
|
|
f_accesstime = 1;
|
|
f_statustime = 0;
|
|
f_birthtime = 0;
|
|
break;
|
|
case 'U':
|
|
f_birthtime = 1;
|
|
f_accesstime = 0;
|
|
f_statustime = 0;
|
|
break;
|
|
case 'f':
|
|
f_nosort = 1;
|
|
/* FALLTHROUGH */
|
|
case 'a':
|
|
fts_options |= FTS_SEEDOT;
|
|
/* FALLTHROUGH */
|
|
case 'A':
|
|
f_listdot = 1;
|
|
break;
|
|
/* The -t and -S options override each other. */
|
|
case 'S':
|
|
f_sizesort = 1;
|
|
f_timesort = 0;
|
|
break;
|
|
case 't':
|
|
f_timesort = 1;
|
|
f_sizesort = 0;
|
|
break;
|
|
/* Other flags. Please keep alphabetic. */
|
|
case ',':
|
|
f_thousands = 1;
|
|
break;
|
|
case 'B':
|
|
f_nonprint = 0;
|
|
f_octal = 1;
|
|
f_octal_escape = 0;
|
|
break;
|
|
case 'D':
|
|
f_timeformat = optarg;
|
|
break;
|
|
case 'F':
|
|
f_type = 1;
|
|
f_slash = 0;
|
|
break;
|
|
case 'G':
|
|
setenv("CLICOLOR", "", 1);
|
|
break;
|
|
case 'H':
|
|
fts_options |= FTS_COMFOLLOW;
|
|
f_nofollow = 0;
|
|
break;
|
|
case 'I':
|
|
f_noautodot = 1;
|
|
break;
|
|
case 'L':
|
|
fts_options &= ~FTS_PHYSICAL;
|
|
fts_options |= FTS_LOGICAL;
|
|
f_nofollow = 0;
|
|
break;
|
|
case 'P':
|
|
fts_options &= ~FTS_COMFOLLOW;
|
|
fts_options &= ~FTS_LOGICAL;
|
|
fts_options |= FTS_PHYSICAL;
|
|
f_nofollow = 1;
|
|
break;
|
|
case 'R':
|
|
f_recursive = 1;
|
|
break;
|
|
case 'T':
|
|
f_sectime = 1;
|
|
break;
|
|
case 'W':
|
|
f_whiteout = 1;
|
|
break;
|
|
case 'Z':
|
|
f_label = 1;
|
|
break;
|
|
case 'b':
|
|
f_nonprint = 0;
|
|
f_octal = 0;
|
|
f_octal_escape = 1;
|
|
break;
|
|
/* The -d option turns off the -R option. */
|
|
case 'd':
|
|
f_listdir = 1;
|
|
f_recursive = 0;
|
|
break;
|
|
case 'g': /* Compatibility with 4.3BSD. */
|
|
break;
|
|
case 'h':
|
|
f_humanval = 1;
|
|
break;
|
|
case 'i':
|
|
f_inode = 1;
|
|
break;
|
|
case 'k':
|
|
f_humanval = 0;
|
|
f_kblocks = 1;
|
|
break;
|
|
case 'm':
|
|
f_stream = 1;
|
|
f_singlecol = 0;
|
|
f_longform = 0;
|
|
break;
|
|
case 'n':
|
|
f_numericonly = 1;
|
|
break;
|
|
case 'o':
|
|
f_flags = 1;
|
|
break;
|
|
case 'p':
|
|
f_slash = 1;
|
|
f_type = 1;
|
|
break;
|
|
case 'q':
|
|
f_nonprint = 1;
|
|
f_octal = 0;
|
|
f_octal_escape = 0;
|
|
break;
|
|
case 'r':
|
|
f_reversesort = 1;
|
|
break;
|
|
case 's':
|
|
f_size = 1;
|
|
break;
|
|
case 'w':
|
|
f_nonprint = 0;
|
|
f_octal = 0;
|
|
f_octal_escape = 0;
|
|
break;
|
|
case 'y':
|
|
f_samesort = 1;
|
|
break;
|
|
#ifdef COLORLS
|
|
case COLOR_OPT:
|
|
if (optarg == NULL || do_color_always(optarg))
|
|
colorflag = COLORFLAG_ALWAYS;
|
|
else if (do_color_auto(optarg))
|
|
colorflag = COLORFLAG_AUTO;
|
|
else if (do_color_never(optarg))
|
|
colorflag = COLORFLAG_NEVER;
|
|
else
|
|
errx(2, "unsupported --color value '%s' (must be always, auto, or never)",
|
|
optarg);
|
|
break;
|
|
#endif
|
|
default:
|
|
case '?':
|
|
usage();
|
|
}
|
|
}
|
|
argc -= optind;
|
|
argv += optind;
|
|
|
|
/* Root is -A automatically unless -I. */
|
|
if (!f_listdot && getuid() == (uid_t)0 && !f_noautodot)
|
|
f_listdot = 1;
|
|
|
|
/*
|
|
* Enabling of colours is conditional on the environment in conjunction
|
|
* with the --color and -G arguments, if supplied.
|
|
*/
|
|
if (do_color()) {
|
|
#ifdef COLORLS
|
|
if ((term = getenv("TERM")) != NULL &&
|
|
tgetent(termcapbuf, term) == 1) {
|
|
ansi_fgcol = tgetstr("AF", &bp);
|
|
ansi_bgcol = tgetstr("AB", &bp);
|
|
attrs_off = tgetstr("me", &bp);
|
|
enter_bold = tgetstr("md", &bp);
|
|
|
|
/* To switch colours off use 'op' if
|
|
* available, otherwise use 'oc', or
|
|
* don't do colours at all. */
|
|
ansi_coloff = tgetstr("op", &bp);
|
|
if (!ansi_coloff)
|
|
ansi_coloff = tgetstr("oc", &bp);
|
|
if (ansi_fgcol && ansi_bgcol && ansi_coloff)
|
|
f_color = 1;
|
|
} else if (colorflag == COLORFLAG_ALWAYS) {
|
|
/*
|
|
* If we're *always* doing color but we don't have
|
|
* a functional TERM supplied, we'll fallback to
|
|
* outputting raw ANSI sequences.
|
|
*/
|
|
f_color = 1;
|
|
explicitansi = true;
|
|
}
|
|
#else
|
|
warnx("color support not compiled in");
|
|
#endif /*COLORLS*/
|
|
}
|
|
|
|
#ifdef COLORLS
|
|
if (f_color) {
|
|
/*
|
|
* We can't put tabs and color sequences together:
|
|
* column number will be incremented incorrectly
|
|
* for "stty oxtabs" mode.
|
|
*/
|
|
f_notabs = 1;
|
|
(void)signal(SIGINT, colorquit);
|
|
(void)signal(SIGQUIT, colorquit);
|
|
parsecolors(getenv("LSCOLORS"));
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
* If not -F, -i, -l, -s, -S or -t options, don't require stat
|
|
* information, unless in color mode in which case we do
|
|
* need this to determine which colors to display.
|
|
*/
|
|
if (!f_inode && !f_longform && !f_size && !f_timesort &&
|
|
!f_sizesort && !f_type
|
|
#ifdef COLORLS
|
|
&& !f_color
|
|
#endif
|
|
)
|
|
fts_options |= FTS_NOSTAT;
|
|
|
|
/*
|
|
* If not -F, -P, -d or -l options, follow any symbolic links listed on
|
|
* the command line, unless in color mode in which case we need to
|
|
* distinguish file type for a symbolic link itself and its target.
|
|
*/
|
|
if (!f_nofollow && !f_longform && !f_listdir && (!f_type || f_slash)
|
|
#ifdef COLORLS
|
|
&& !f_color
|
|
#endif
|
|
)
|
|
fts_options |= FTS_COMFOLLOW;
|
|
|
|
/*
|
|
* If -W, show whiteout entries
|
|
*/
|
|
#ifdef FTS_WHITEOUT
|
|
if (f_whiteout)
|
|
fts_options |= FTS_WHITEOUT;
|
|
#endif
|
|
|
|
/* If -i, -l or -s, figure out block size. */
|
|
if (f_inode || f_longform || f_size) {
|
|
if (f_kblocks)
|
|
blocksize = 2;
|
|
else {
|
|
(void)getbsize(¬used, &blocksize);
|
|
blocksize /= 512;
|
|
}
|
|
}
|
|
/* Select a sort function. */
|
|
if (f_reversesort) {
|
|
if (!f_timesort && !f_sizesort)
|
|
sortfcn = revnamecmp;
|
|
else if (f_sizesort)
|
|
sortfcn = revsizecmp;
|
|
else if (f_accesstime)
|
|
sortfcn = revacccmp;
|
|
else if (f_birthtime)
|
|
sortfcn = revbirthcmp;
|
|
else if (f_statustime)
|
|
sortfcn = revstatcmp;
|
|
else /* Use modification time. */
|
|
sortfcn = revmodcmp;
|
|
} else {
|
|
if (!f_timesort && !f_sizesort)
|
|
sortfcn = namecmp;
|
|
else if (f_sizesort)
|
|
sortfcn = sizecmp;
|
|
else if (f_accesstime)
|
|
sortfcn = acccmp;
|
|
else if (f_birthtime)
|
|
sortfcn = birthcmp;
|
|
else if (f_statustime)
|
|
sortfcn = statcmp;
|
|
else /* Use modification time. */
|
|
sortfcn = modcmp;
|
|
}
|
|
|
|
/* Select a print function. */
|
|
if (f_singlecol)
|
|
printfcn = printscol;
|
|
else if (f_longform)
|
|
printfcn = printlong;
|
|
else if (f_stream)
|
|
printfcn = printstream;
|
|
else
|
|
printfcn = printcol;
|
|
|
|
if (argc)
|
|
traverse(argc, argv, fts_options);
|
|
else
|
|
traverse(1, dotav, fts_options);
|
|
exit(rval);
|
|
}
|
|
|
|
static int output; /* If anything output. */
|
|
|
|
/*
|
|
* Traverse() walks the logical directory structure specified by the argv list
|
|
* in the order specified by the mastercmp() comparison function. During the
|
|
* traversal it passes linked lists of structures to display() which represent
|
|
* a superset (may be exact set) of the files to be displayed.
|
|
*/
|
|
static void
|
|
traverse(int argc, char *argv[], int options)
|
|
{
|
|
FTS *ftsp;
|
|
FTSENT *p, *chp;
|
|
int ch_options;
|
|
|
|
if ((ftsp =
|
|
fts_open(argv, options, f_nosort ? NULL : mastercmp)) == NULL)
|
|
err(1, "fts_open");
|
|
|
|
/*
|
|
* We ignore errors from fts_children here since they will be
|
|
* replicated and signalled on the next call to fts_read() below.
|
|
*/
|
|
chp = fts_children(ftsp, 0);
|
|
if (chp != NULL)
|
|
display(NULL, chp, options);
|
|
if (f_listdir)
|
|
return;
|
|
|
|
/*
|
|
* If not recursing down this tree and don't need stat info, just get
|
|
* the names.
|
|
*/
|
|
ch_options = !f_recursive && !f_label &&
|
|
options & FTS_NOSTAT ? FTS_NAMEONLY : 0;
|
|
|
|
while ((p = fts_read(ftsp)) != NULL)
|
|
switch (p->fts_info) {
|
|
case FTS_DC:
|
|
warnx("%s: directory causes a cycle", p->fts_name);
|
|
break;
|
|
case FTS_DNR:
|
|
case FTS_ERR:
|
|
warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
|
|
rval = 1;
|
|
break;
|
|
case FTS_D:
|
|
if (p->fts_level != FTS_ROOTLEVEL &&
|
|
p->fts_name[0] == '.' && !f_listdot)
|
|
break;
|
|
|
|
/*
|
|
* If already output something, put out a newline as
|
|
* a separator. If multiple arguments, precede each
|
|
* directory with its name.
|
|
*/
|
|
if (output) {
|
|
putchar('\n');
|
|
(void)printname(p->fts_path);
|
|
puts(":");
|
|
} else if (argc > 1) {
|
|
(void)printname(p->fts_path);
|
|
puts(":");
|
|
output = 1;
|
|
}
|
|
chp = fts_children(ftsp, ch_options);
|
|
display(p, chp, options);
|
|
|
|
if (!f_recursive && chp != NULL)
|
|
(void)fts_set(ftsp, p, FTS_SKIP);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
if (errno)
|
|
err(1, "fts_read");
|
|
}
|
|
|
|
/*
|
|
* Display() takes a linked list of FTSENT structures and passes the list
|
|
* along with any other necessary information to the print function. P
|
|
* points to the parent directory of the display list.
|
|
*/
|
|
static void
|
|
display(const FTSENT *p, FTSENT *list, int options)
|
|
{
|
|
struct stat *sp;
|
|
DISPLAY d;
|
|
FTSENT *cur;
|
|
NAMES *np;
|
|
off_t maxsize;
|
|
long maxblock;
|
|
uintmax_t maxinode;
|
|
u_long btotal, labelstrlen, maxlen, maxnlink;
|
|
u_long maxlabelstr;
|
|
u_int sizelen;
|
|
int maxflags;
|
|
gid_t maxgroup;
|
|
uid_t maxuser;
|
|
size_t flen, ulen, glen;
|
|
char *initmax;
|
|
int entries, needstats;
|
|
const char *user, *group;
|
|
char *flags, *labelstr = NULL;
|
|
char ngroup[STRBUF_SIZEOF(uid_t) + 1];
|
|
char nuser[STRBUF_SIZEOF(gid_t) + 1];
|
|
|
|
needstats = f_inode || f_longform || f_size;
|
|
flen = 0;
|
|
btotal = 0;
|
|
initmax = getenv("LS_COLWIDTHS");
|
|
/* Fields match -lios order. New ones should be added at the end. */
|
|
maxlabelstr = maxblock = maxlen = maxnlink = 0;
|
|
maxuser = maxgroup = maxflags = maxsize = 0;
|
|
maxinode = 0;
|
|
if (initmax != NULL && *initmax != '\0') {
|
|
char *initmax2, *jinitmax;
|
|
int ninitmax;
|
|
|
|
/* Fill-in "::" as "0:0:0" for the sake of scanf. */
|
|
jinitmax = malloc(strlen(initmax) * 2 + 2);
|
|
if (jinitmax == NULL)
|
|
err(1, "malloc");
|
|
initmax2 = jinitmax;
|
|
if (*initmax == ':')
|
|
strcpy(initmax2, "0:"), initmax2 += 2;
|
|
else
|
|
*initmax2++ = *initmax, *initmax2 = '\0';
|
|
for (initmax++; *initmax != '\0'; initmax++) {
|
|
if (initmax[-1] == ':' && initmax[0] == ':') {
|
|
*initmax2++ = '0';
|
|
*initmax2++ = initmax[0];
|
|
initmax2[1] = '\0';
|
|
} else {
|
|
*initmax2++ = initmax[0];
|
|
initmax2[1] = '\0';
|
|
}
|
|
}
|
|
if (initmax2[-1] == ':')
|
|
strcpy(initmax2, "0");
|
|
|
|
ninitmax = sscanf(jinitmax,
|
|
" %ju : %ld : %lu : %u : %u : %i : %jd : %lu : %lu ",
|
|
&maxinode, &maxblock, &maxnlink, &maxuser,
|
|
&maxgroup, &maxflags, &maxsize, &maxlen, &maxlabelstr);
|
|
f_notabs = 1;
|
|
switch (ninitmax) {
|
|
case 0:
|
|
maxinode = 0;
|
|
/* FALLTHROUGH */
|
|
case 1:
|
|
maxblock = 0;
|
|
/* FALLTHROUGH */
|
|
case 2:
|
|
maxnlink = 0;
|
|
/* FALLTHROUGH */
|
|
case 3:
|
|
maxuser = 0;
|
|
/* FALLTHROUGH */
|
|
case 4:
|
|
maxgroup = 0;
|
|
/* FALLTHROUGH */
|
|
case 5:
|
|
maxflags = 0;
|
|
/* FALLTHROUGH */
|
|
case 6:
|
|
maxsize = 0;
|
|
/* FALLTHROUGH */
|
|
case 7:
|
|
maxlen = 0;
|
|
/* FALLTHROUGH */
|
|
case 8:
|
|
maxlabelstr = 0;
|
|
/* FALLTHROUGH */
|
|
#ifdef COLORLS
|
|
if (!f_color)
|
|
#endif
|
|
f_notabs = 0;
|
|
/* FALLTHROUGH */
|
|
default:
|
|
break;
|
|
}
|
|
MAKENINES(maxinode);
|
|
MAKENINES(maxblock);
|
|
MAKENINES(maxnlink);
|
|
MAKENINES(maxsize);
|
|
free(jinitmax);
|
|
}
|
|
d.s_size = 0;
|
|
sizelen = 0;
|
|
flags = NULL;
|
|
for (cur = list, entries = 0; cur; cur = cur->fts_link) {
|
|
if (cur->fts_info == FTS_ERR || cur->fts_info == FTS_NS) {
|
|
warnx("%s: %s",
|
|
cur->fts_name, strerror(cur->fts_errno));
|
|
cur->fts_number = NO_PRINT;
|
|
rval = 1;
|
|
continue;
|
|
}
|
|
/*
|
|
* P is NULL if list is the argv list, to which different rules
|
|
* apply.
|
|
*/
|
|
if (p == NULL) {
|
|
/* Directories will be displayed later. */
|
|
if (cur->fts_info == FTS_D && !f_listdir) {
|
|
cur->fts_number = NO_PRINT;
|
|
continue;
|
|
}
|
|
} else {
|
|
/* Only display dot file if -a/-A set. */
|
|
if (cur->fts_name[0] == '.' && !f_listdot) {
|
|
cur->fts_number = NO_PRINT;
|
|
continue;
|
|
}
|
|
}
|
|
if (cur->fts_namelen > maxlen)
|
|
maxlen = cur->fts_namelen;
|
|
if (f_octal || f_octal_escape) {
|
|
u_long t = len_octal(cur->fts_name, cur->fts_namelen);
|
|
|
|
if (t > maxlen)
|
|
maxlen = t;
|
|
}
|
|
if (needstats) {
|
|
sp = cur->fts_statp;
|
|
if (sp->st_blocks > maxblock)
|
|
maxblock = sp->st_blocks;
|
|
if (sp->st_ino > maxinode)
|
|
maxinode = sp->st_ino;
|
|
if (sp->st_nlink > maxnlink)
|
|
maxnlink = sp->st_nlink;
|
|
if (sp->st_size > maxsize)
|
|
maxsize = sp->st_size;
|
|
|
|
btotal += sp->st_blocks;
|
|
if (f_longform) {
|
|
if (f_numericonly) {
|
|
(void)snprintf(nuser, sizeof(nuser),
|
|
"%u", sp->st_uid);
|
|
(void)snprintf(ngroup, sizeof(ngroup),
|
|
"%u", sp->st_gid);
|
|
user = nuser;
|
|
group = ngroup;
|
|
} else {
|
|
user = user_from_uid(sp->st_uid, 0);
|
|
group = group_from_gid(sp->st_gid, 0);
|
|
}
|
|
if ((ulen = strlen(user)) > maxuser)
|
|
maxuser = ulen;
|
|
if ((glen = strlen(group)) > maxgroup)
|
|
maxgroup = glen;
|
|
if (f_flags) {
|
|
flags = fflagstostr(sp->st_flags);
|
|
if (flags != NULL && *flags == '\0') {
|
|
free(flags);
|
|
flags = strdup("-");
|
|
}
|
|
if (flags == NULL)
|
|
err(1, "fflagstostr");
|
|
flen = strlen(flags);
|
|
if (flen > (size_t)maxflags)
|
|
maxflags = flen;
|
|
} else
|
|
flen = 0;
|
|
labelstr = NULL;
|
|
if (f_label) {
|
|
char name[PATH_MAX + 1];
|
|
mac_t label;
|
|
int error;
|
|
|
|
error = mac_prepare_file_label(&label);
|
|
if (error == -1) {
|
|
warn("MAC label for %s/%s",
|
|
cur->fts_parent->fts_path,
|
|
cur->fts_name);
|
|
goto label_out;
|
|
}
|
|
|
|
if (cur->fts_level == FTS_ROOTLEVEL)
|
|
snprintf(name, sizeof(name),
|
|
"%s", cur->fts_name);
|
|
else
|
|
snprintf(name, sizeof(name),
|
|
"%s/%s", cur->fts_parent->
|
|
fts_accpath, cur->fts_name);
|
|
|
|
if (options & FTS_LOGICAL)
|
|
error = mac_get_file(name,
|
|
label);
|
|
else
|
|
error = mac_get_link(name,
|
|
label);
|
|
if (error == -1) {
|
|
warn("MAC label for %s/%s",
|
|
cur->fts_parent->fts_path,
|
|
cur->fts_name);
|
|
mac_free(label);
|
|
goto label_out;
|
|
}
|
|
|
|
error = mac_to_text(label,
|
|
&labelstr);
|
|
if (error == -1) {
|
|
warn("MAC label for %s/%s",
|
|
cur->fts_parent->fts_path,
|
|
cur->fts_name);
|
|
mac_free(label);
|
|
goto label_out;
|
|
}
|
|
mac_free(label);
|
|
label_out:
|
|
if (labelstr == NULL)
|
|
labelstr = strdup("-");
|
|
labelstrlen = strlen(labelstr);
|
|
if (labelstrlen > maxlabelstr)
|
|
maxlabelstr = labelstrlen;
|
|
} else
|
|
labelstrlen = 0;
|
|
|
|
if ((np = malloc(sizeof(NAMES) + labelstrlen +
|
|
ulen + glen + flen + 4)) == NULL)
|
|
err(1, "malloc");
|
|
|
|
np->user = &np->data[0];
|
|
(void)strcpy(np->user, user);
|
|
np->group = &np->data[ulen + 1];
|
|
(void)strcpy(np->group, group);
|
|
|
|
if (S_ISCHR(sp->st_mode) ||
|
|
S_ISBLK(sp->st_mode)) {
|
|
sizelen = snprintf(NULL, 0,
|
|
"%#jx", (uintmax_t)sp->st_rdev);
|
|
if (d.s_size < sizelen)
|
|
d.s_size = sizelen;
|
|
}
|
|
|
|
if (f_flags) {
|
|
np->flags = &np->data[ulen + glen + 2];
|
|
(void)strcpy(np->flags, flags);
|
|
free(flags);
|
|
}
|
|
if (f_label) {
|
|
np->label = &np->data[ulen + glen + 2
|
|
+ (f_flags ? flen + 1 : 0)];
|
|
(void)strcpy(np->label, labelstr);
|
|
free(labelstr);
|
|
}
|
|
cur->fts_pointer = np;
|
|
}
|
|
}
|
|
++entries;
|
|
}
|
|
|
|
/*
|
|
* If there are no entries to display, we normally stop right
|
|
* here. However, we must continue if we have to display the
|
|
* total block count. In this case, we display the total only
|
|
* on the second (p != NULL) pass.
|
|
*/
|
|
if (!entries && (!(f_longform || f_size) || p == NULL))
|
|
return;
|
|
|
|
d.list = list;
|
|
d.entries = entries;
|
|
d.maxlen = maxlen;
|
|
if (needstats) {
|
|
d.btotal = btotal;
|
|
d.s_block = snprintf(NULL, 0, "%lu", howmany(maxblock, blocksize));
|
|
d.s_flags = maxflags;
|
|
d.s_label = maxlabelstr;
|
|
d.s_group = maxgroup;
|
|
d.s_inode = snprintf(NULL, 0, "%ju", maxinode);
|
|
d.s_nlink = snprintf(NULL, 0, "%lu", maxnlink);
|
|
sizelen = f_humanval ? HUMANVALSTR_LEN :
|
|
snprintf(NULL, 0, "%ju", maxsize);
|
|
if (d.s_size < sizelen)
|
|
d.s_size = sizelen;
|
|
d.s_user = maxuser;
|
|
}
|
|
if (f_thousands) /* make space for commas */
|
|
d.s_size += (d.s_size - 1) / 3;
|
|
printfcn(&d);
|
|
output = 1;
|
|
|
|
if (f_longform)
|
|
for (cur = list; cur; cur = cur->fts_link)
|
|
free(cur->fts_pointer);
|
|
}
|
|
|
|
/*
|
|
* Ordering for mastercmp:
|
|
* If ordering the argv (fts_level = FTS_ROOTLEVEL) return non-directories
|
|
* as larger than directories. Within either group, use the sort function.
|
|
* All other levels use the sort function. Error entries remain unsorted.
|
|
*/
|
|
static int
|
|
mastercmp(const FTSENT * const *a, const FTSENT * const *b)
|
|
{
|
|
int a_info, b_info;
|
|
|
|
a_info = (*a)->fts_info;
|
|
if (a_info == FTS_ERR)
|
|
return (0);
|
|
b_info = (*b)->fts_info;
|
|
if (b_info == FTS_ERR)
|
|
return (0);
|
|
|
|
if (a_info == FTS_NS || b_info == FTS_NS)
|
|
return (namecmp(*a, *b));
|
|
|
|
if (a_info != b_info &&
|
|
(*a)->fts_level == FTS_ROOTLEVEL && !f_listdir) {
|
|
if (a_info == FTS_D)
|
|
return (1);
|
|
if (b_info == FTS_D)
|
|
return (-1);
|
|
}
|
|
return (sortfcn(*a, *b));
|
|
}
|