mirror of
https://github.com/sheumann/hush.git
synced 2024-08-14 11:28:58 +00:00
1261 lines
36 KiB
C
1261 lines
36 KiB
C
/* vi: set sw=4 ts=4: */
|
|
/*
|
|
* Copyright (C) 1996 Brian Candler <B.Candler@pobox.com>
|
|
*
|
|
* Licensed under GPLv2 or later, see file LICENSE in this source tree.
|
|
*/
|
|
|
|
/* [date unknown. Perhaps before year 2000]
|
|
* To achieve a small memory footprint, this version of 'ls' doesn't do any
|
|
* file sorting, and only has the most essential command line switches
|
|
* (i.e., the ones I couldn't live without :-) All features which involve
|
|
* linking in substantial chunks of libc can be disabled.
|
|
*
|
|
* Although I don't really want to add new features to this program to
|
|
* keep it small, I *am* interested to receive bug fixes and ways to make
|
|
* it more portable.
|
|
*
|
|
* KNOWN BUGS:
|
|
* 1. hidden files can make column width too large
|
|
*
|
|
* NON-OPTIMAL BEHAVIOUR:
|
|
* 1. autowidth reads directories twice
|
|
* 2. if you do a short directory listing without filetype characters
|
|
* appended, there's no need to stat each one
|
|
* PORTABILITY:
|
|
* 1. requires lstat (BSD) - how do you do it without?
|
|
*
|
|
* [2009-03]
|
|
* ls sorts listing now, and supports almost all options.
|
|
*/
|
|
|
|
//usage:#define ls_trivial_usage
|
|
//usage: "[-1AaCxd"
|
|
//usage: IF_FEATURE_LS_FOLLOWLINKS("LH")
|
|
//usage: IF_FEATURE_LS_RECURSIVE("R")
|
|
//usage: IF_FEATURE_LS_FILETYPES("Fp") "lins"
|
|
//usage: IF_FEATURE_LS_TIMESTAMPS("e")
|
|
//usage: IF_FEATURE_HUMAN_READABLE("h")
|
|
//usage: IF_FEATURE_LS_SORTFILES("rSXv")
|
|
//usage: IF_FEATURE_LS_TIMESTAMPS("ctu")
|
|
//usage: IF_SELINUX("kKZ") "]"
|
|
//usage: IF_FEATURE_AUTOWIDTH(" [-w WIDTH]") " [FILE]..."
|
|
//usage:#define ls_full_usage "\n\n"
|
|
//usage: "List directory contents\n"
|
|
//usage: "\n -1 One column output"
|
|
//usage: "\n -a Include entries which start with ."
|
|
//usage: "\n -A Like -a, but exclude . and .."
|
|
//usage: "\n -C List by columns"
|
|
//usage: "\n -x List by lines"
|
|
//usage: "\n -d List directory entries instead of contents"
|
|
//usage: IF_FEATURE_LS_FOLLOWLINKS(
|
|
//usage: "\n -L Follow symlinks"
|
|
//usage: "\n -H Follow symlinks on command line"
|
|
//usage: )
|
|
//usage: IF_FEATURE_LS_RECURSIVE(
|
|
//usage: "\n -R Recurse"
|
|
//usage: )
|
|
//usage: IF_FEATURE_LS_FILETYPES(
|
|
//usage: "\n -p Append / to dir entries"
|
|
//usage: "\n -F Append indicator (one of */=@|) to entries"
|
|
//usage: )
|
|
//usage: "\n -l Long listing format"
|
|
//usage: "\n -i List inode numbers"
|
|
//usage: "\n -n List numeric UIDs and GIDs instead of names"
|
|
//usage: "\n -s List allocated blocks"
|
|
//usage: IF_FEATURE_LS_TIMESTAMPS(
|
|
//usage: "\n -e List full date and time"
|
|
//usage: )
|
|
//usage: IF_FEATURE_HUMAN_READABLE(
|
|
//usage: "\n -h List sizes in human readable format (1K 243M 2G)"
|
|
//usage: )
|
|
//usage: IF_FEATURE_LS_SORTFILES(
|
|
//usage: "\n -r Sort in reverse order"
|
|
//usage: "\n -S Sort by size"
|
|
//usage: "\n -X Sort by extension"
|
|
//usage: "\n -v Sort by version"
|
|
//usage: )
|
|
//usage: IF_FEATURE_LS_TIMESTAMPS(
|
|
//usage: "\n -c With -l: sort by ctime"
|
|
//usage: "\n -t With -l: sort by mtime"
|
|
//usage: "\n -u With -l: sort by atime"
|
|
//usage: )
|
|
//usage: IF_SELINUX(
|
|
//usage: "\n -k List security context"
|
|
//usage: "\n -K List security context in long format"
|
|
//usage: "\n -Z List security context and permission"
|
|
//usage: )
|
|
//usage: IF_FEATURE_AUTOWIDTH(
|
|
//usage: "\n -w N Assume the terminal is N columns wide"
|
|
//usage: )
|
|
//usage: IF_FEATURE_LS_COLOR(
|
|
//usage: "\n --color[={always,never,auto}] Control coloring"
|
|
//usage: )
|
|
|
|
#include "libbb.h"
|
|
#include "common_bufsiz.h"
|
|
#include "unicode.h"
|
|
|
|
|
|
/* This is a NOEXEC applet. Be very careful! */
|
|
|
|
|
|
#if ENABLE_FTPD
|
|
/* ftpd uses ls, and without timestamps Mozilla won't understand
|
|
* ftpd's LIST output.
|
|
*/
|
|
# undef CONFIG_FEATURE_LS_TIMESTAMPS
|
|
# undef ENABLE_FEATURE_LS_TIMESTAMPS
|
|
# undef IF_FEATURE_LS_TIMESTAMPS
|
|
# undef IF_NOT_FEATURE_LS_TIMESTAMPS
|
|
# define CONFIG_FEATURE_LS_TIMESTAMPS 1
|
|
# define ENABLE_FEATURE_LS_TIMESTAMPS 1
|
|
# define IF_FEATURE_LS_TIMESTAMPS(...) __VA_ARGS__
|
|
# define IF_NOT_FEATURE_LS_TIMESTAMPS(...)
|
|
#endif
|
|
|
|
|
|
enum {
|
|
TERMINAL_WIDTH = 80, /* use 79 if terminal has linefold bug */
|
|
|
|
SPLIT_FILE = 0,
|
|
SPLIT_DIR = 1,
|
|
SPLIT_SUBDIR = 2,
|
|
|
|
/* Bits in G.all_fmt: */
|
|
|
|
/* 51306 lrwxrwxrwx 1 root root 2 May 11 01:43 /bin/view -> vi* */
|
|
/* what file information will be listed */
|
|
LIST_INO = 1 << 0,
|
|
LIST_BLOCKS = 1 << 1,
|
|
LIST_MODEBITS = 1 << 2,
|
|
LIST_NLINKS = 1 << 3,
|
|
LIST_ID_NAME = 1 << 4,
|
|
LIST_ID_NUMERIC = 1 << 5,
|
|
LIST_CONTEXT = 1 << 6,
|
|
LIST_SIZE = 1 << 7,
|
|
LIST_DATE_TIME = 1 << 8,
|
|
LIST_FULLTIME = 1 << 9,
|
|
LIST_SYMLINK = 1 << 10,
|
|
LIST_FILETYPE = 1 << 11, /* show / suffix for dirs */
|
|
LIST_CLASSIFY = 1 << 12, /* requires LIST_FILETYPE, also show *,|,@,= suffixes */
|
|
LIST_MASK = (LIST_CLASSIFY << 1) - 1,
|
|
|
|
/* what files will be displayed */
|
|
DISP_DIRNAME = 1 << 13, /* 2 or more items? label directories */
|
|
DISP_HIDDEN = 1 << 14, /* show filenames starting with . */
|
|
DISP_DOT = 1 << 15, /* show . and .. */
|
|
DISP_NOLIST = 1 << 16, /* show directory as itself, not contents */
|
|
DISP_RECURSIVE = 1 << 17, /* show directory and everything below it */
|
|
DISP_ROWS = 1 << 18, /* print across rows */
|
|
DISP_MASK = ((DISP_ROWS << 1) - 1) & ~(DISP_DIRNAME - 1),
|
|
|
|
/* what is the overall style of the listing */
|
|
STYLE_COLUMNAR = 1 << 19, /* many records per line */
|
|
STYLE_LONG = 2 << 19, /* one record per line, extended info */
|
|
STYLE_SINGLE = 3 << 19, /* one record per line */
|
|
STYLE_MASK = STYLE_SINGLE,
|
|
|
|
/* which of the three times will be used */
|
|
TIME_CHANGE = (1 << 21) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
TIME_ACCESS = (2 << 21) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
TIME_MASK = (3 << 21) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
|
|
/* how will the files be sorted (CONFIG_FEATURE_LS_SORTFILES) */
|
|
SORT_REVERSE = 1 << 23,
|
|
|
|
SORT_NAME = 0, /* sort by file name */
|
|
SORT_SIZE = 1 << 24, /* sort by file size */
|
|
SORT_ATIME = 2 << 24, /* sort by last access time */
|
|
SORT_CTIME = 3 << 24, /* sort by last change time */
|
|
SORT_MTIME = 4 << 24, /* sort by last modification time */
|
|
SORT_VERSION = 5 << 24, /* sort by version */
|
|
SORT_EXT = 6 << 24, /* sort by file name extension */
|
|
SORT_DIR = 7 << 24, /* sort by file or directory */
|
|
SORT_MASK = (7 << 24) * ENABLE_FEATURE_LS_SORTFILES,
|
|
|
|
LIST_LONG = LIST_MODEBITS | LIST_NLINKS | LIST_ID_NAME | LIST_SIZE | \
|
|
LIST_DATE_TIME | LIST_SYMLINK,
|
|
};
|
|
|
|
/* -Cadil1 Std options, busybox always supports */
|
|
/* -gnsxA Std options, busybox always supports */
|
|
/* -Q GNU option, busybox always supports */
|
|
/* -k SELinux option, busybox always supports (ignores if !SELinux) */
|
|
/* Std has -k which means "show sizes in kbytes" */
|
|
/* -LHRctur Std options, busybox optionally supports */
|
|
/* -Fp Std options, busybox optionally supports */
|
|
/* -SXvhTw GNU options, busybox optionally supports */
|
|
/* -T WIDTH Ignored (we don't use tabs on output) */
|
|
/* -KZ SELinux mandated options, busybox optionally supports */
|
|
/* (coreutils 8.4 has no -K, remove it?) */
|
|
/* -e I think we made this one up (looks similar to GNU --full-time) */
|
|
/* We already used up all 32 bits, if we need to add more, candidates for removal: */
|
|
/* -K, -T, -e (add --full-time instead) */
|
|
static const char ls_options[] ALIGN1 =
|
|
"Cadil1gnsxQAk" /* 13 opts, total 13 */
|
|
IF_FEATURE_LS_TIMESTAMPS("cetu") /* 4, 17 */
|
|
IF_FEATURE_LS_SORTFILES("SXrv") /* 4, 21 */
|
|
IF_FEATURE_LS_FILETYPES("Fp") /* 2, 23 */
|
|
IF_FEATURE_LS_RECURSIVE("R") /* 1, 24 */
|
|
IF_SELINUX("KZ") /* 2, 26 */
|
|
IF_FEATURE_LS_FOLLOWLINKS("LH") /* 2, 28 */
|
|
IF_FEATURE_HUMAN_READABLE("h") /* 1, 29 */
|
|
IF_FEATURE_AUTOWIDTH("T:w:") /* 2, 31 */
|
|
/* with --color, we use all 32 bits */;
|
|
enum {
|
|
//OPT_C = (1 << 0),
|
|
//OPT_a = (1 << 1),
|
|
//OPT_d = (1 << 2),
|
|
//OPT_i = (1 << 3),
|
|
//OPT_l = (1 << 4),
|
|
//OPT_1 = (1 << 5),
|
|
OPT_g = (1 << 6),
|
|
//OPT_n = (1 << 7),
|
|
//OPT_s = (1 << 8),
|
|
//OPT_x = (1 << 9),
|
|
OPT_Q = (1 << 10),
|
|
//OPT_A = (1 << 11),
|
|
//OPT_k = (1 << 12),
|
|
|
|
OPTBIT_c = 13,
|
|
OPTBIT_e,
|
|
OPTBIT_t,
|
|
OPTBIT_u,
|
|
OPTBIT_S = OPTBIT_c + 4 * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
OPTBIT_X, /* 18 */
|
|
OPTBIT_r,
|
|
OPTBIT_v,
|
|
OPTBIT_F = OPTBIT_S + 4 * ENABLE_FEATURE_LS_SORTFILES,
|
|
OPTBIT_p, /* 22 */
|
|
OPTBIT_R = OPTBIT_F + 2 * ENABLE_FEATURE_LS_FILETYPES,
|
|
OPTBIT_K = OPTBIT_R + 1 * ENABLE_FEATURE_LS_RECURSIVE,
|
|
OPTBIT_Z, /* 25 */
|
|
OPTBIT_L = OPTBIT_K + 2 * ENABLE_SELINUX,
|
|
OPTBIT_H, /* 27 */
|
|
OPTBIT_h = OPTBIT_L + 2 * ENABLE_FEATURE_LS_FOLLOWLINKS,
|
|
OPTBIT_T = OPTBIT_h + 1 * ENABLE_FEATURE_HUMAN_READABLE,
|
|
OPTBIT_w, /* 30 */
|
|
OPTBIT_color = OPTBIT_T + 2 * ENABLE_FEATURE_AUTOWIDTH,
|
|
|
|
OPT_c = (1 << OPTBIT_c) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
OPT_e = (1 << OPTBIT_e) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
OPT_t = (1 << OPTBIT_t) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
OPT_u = (1 << OPTBIT_u) * ENABLE_FEATURE_LS_TIMESTAMPS,
|
|
OPT_S = (1 << OPTBIT_S) * ENABLE_FEATURE_LS_SORTFILES,
|
|
OPT_X = (1 << OPTBIT_X) * ENABLE_FEATURE_LS_SORTFILES,
|
|
OPT_r = (1 << OPTBIT_r) * ENABLE_FEATURE_LS_SORTFILES,
|
|
OPT_v = (1 << OPTBIT_v) * ENABLE_FEATURE_LS_SORTFILES,
|
|
OPT_F = (1 << OPTBIT_F) * ENABLE_FEATURE_LS_FILETYPES,
|
|
OPT_p = (1 << OPTBIT_p) * ENABLE_FEATURE_LS_FILETYPES,
|
|
OPT_R = (1 << OPTBIT_R) * ENABLE_FEATURE_LS_RECURSIVE,
|
|
OPT_K = (1 << OPTBIT_K) * ENABLE_SELINUX,
|
|
OPT_Z = (1 << OPTBIT_Z) * ENABLE_SELINUX,
|
|
OPT_L = (1 << OPTBIT_L) * ENABLE_FEATURE_LS_FOLLOWLINKS,
|
|
OPT_H = (1 << OPTBIT_H) * ENABLE_FEATURE_LS_FOLLOWLINKS,
|
|
OPT_h = (1 << OPTBIT_h) * ENABLE_FEATURE_HUMAN_READABLE,
|
|
OPT_T = (1 << OPTBIT_T) * ENABLE_FEATURE_AUTOWIDTH,
|
|
OPT_w = (1 << OPTBIT_w) * ENABLE_FEATURE_AUTOWIDTH,
|
|
OPT_color = (1 << OPTBIT_color) * ENABLE_FEATURE_LS_COLOR,
|
|
};
|
|
|
|
/* TODO: simple toggles may be stored as OPT_xxx bits instead */
|
|
static const uint32_t opt_flags[] = {
|
|
STYLE_COLUMNAR, /* C */
|
|
DISP_HIDDEN | DISP_DOT, /* a */
|
|
DISP_NOLIST, /* d */
|
|
LIST_INO, /* i */
|
|
LIST_LONG | STYLE_LONG, /* l */
|
|
STYLE_SINGLE, /* 1 */
|
|
LIST_LONG | STYLE_LONG, /* g (don't show owner) - handled via OPT_g. assumes l */
|
|
LIST_ID_NUMERIC | LIST_LONG | STYLE_LONG, /* n (assumes l) */
|
|
LIST_BLOCKS, /* s */
|
|
DISP_ROWS | STYLE_COLUMNAR, /* x */
|
|
0, /* Q (quote filename) - handled via OPT_Q */
|
|
DISP_HIDDEN, /* A */
|
|
ENABLE_SELINUX * (LIST_CONTEXT|STYLE_SINGLE), /* k (ignored if !SELINUX) */
|
|
#if ENABLE_FEATURE_LS_TIMESTAMPS
|
|
TIME_CHANGE | (ENABLE_FEATURE_LS_SORTFILES * SORT_CTIME), /* c */
|
|
LIST_FULLTIME, /* e */
|
|
ENABLE_FEATURE_LS_SORTFILES * SORT_MTIME, /* t */
|
|
TIME_ACCESS | (ENABLE_FEATURE_LS_SORTFILES * SORT_ATIME), /* u */
|
|
#endif
|
|
#if ENABLE_FEATURE_LS_SORTFILES
|
|
SORT_SIZE, /* S */
|
|
SORT_EXT, /* X */
|
|
SORT_REVERSE, /* r */
|
|
SORT_VERSION, /* v */
|
|
#endif
|
|
#if ENABLE_FEATURE_LS_FILETYPES
|
|
LIST_FILETYPE | LIST_CLASSIFY, /* F */
|
|
LIST_FILETYPE, /* p */
|
|
#endif
|
|
#if ENABLE_FEATURE_LS_RECURSIVE
|
|
DISP_RECURSIVE, /* R */
|
|
#endif
|
|
#if ENABLE_SELINUX
|
|
LIST_MODEBITS|LIST_NLINKS|LIST_CONTEXT|LIST_SIZE|LIST_DATE_TIME|STYLE_SINGLE, /* K */
|
|
LIST_MODEBITS|LIST_ID_NAME|LIST_CONTEXT|STYLE_SINGLE, /* Z */
|
|
#endif
|
|
(1U << 31)
|
|
/* options after Z are not processed through opt_flags */
|
|
};
|
|
|
|
|
|
/*
|
|
* a directory entry and its stat info
|
|
*/
|
|
struct dnode {
|
|
const char *name; /* usually basename, but think "ls -l dir/file" */
|
|
const char *fullname; /* full name (usable for stat etc) */
|
|
struct dnode *dn_next; /* for linked list */
|
|
IF_SELINUX(security_context_t sid;)
|
|
smallint fname_allocated;
|
|
|
|
/* Used to avoid re-doing [l]stat at printout stage
|
|
* if we already collected needed data in scan stage:
|
|
*/
|
|
mode_t dn_mode_lstat; /* obtained with lstat, or 0 */
|
|
mode_t dn_mode_stat; /* obtained with stat, or 0 */
|
|
|
|
// struct stat dstat;
|
|
// struct stat is huge. We don't need it in full.
|
|
// At least we don't need st_dev and st_blksize,
|
|
// but there are invisible fields as well
|
|
// (such as nanosecond-resolution timespamps)
|
|
// and padding, which we also don't want to store.
|
|
// We also can pre-parse dev_t dn_rdev (in glibc, it's huge).
|
|
// On 32-bit uclibc: dnode size went from 112 to 84 bytes.
|
|
//
|
|
/* Same names as in struct stat, but with dn_ instead of st_ pfx: */
|
|
mode_t dn_mode; /* obtained with lstat OR stat, depending on -L etc */
|
|
off_t dn_size;
|
|
#if ENABLE_FEATURE_LS_TIMESTAMPS || ENABLE_FEATURE_LS_SORTFILES
|
|
time_t dn_atime;
|
|
time_t dn_mtime;
|
|
time_t dn_ctime;
|
|
#endif
|
|
ino_t dn_ino;
|
|
blkcnt_t dn_blocks;
|
|
nlink_t dn_nlink;
|
|
uid_t dn_uid;
|
|
gid_t dn_gid;
|
|
int dn_rdev_maj;
|
|
int dn_rdev_min;
|
|
// dev_t dn_dev;
|
|
// blksize_t dn_blksize;
|
|
};
|
|
|
|
struct globals {
|
|
#if ENABLE_FEATURE_LS_COLOR
|
|
smallint show_color;
|
|
# define G_show_color (G.show_color)
|
|
#else
|
|
# define G_show_color 0
|
|
#endif
|
|
smallint exit_code;
|
|
unsigned all_fmt;
|
|
#if ENABLE_FEATURE_AUTOWIDTH
|
|
unsigned terminal_width;
|
|
# define G_terminal_width (G.terminal_width)
|
|
#else
|
|
# define G_terminal_width TERMINAL_WIDTH
|
|
#endif
|
|
#if ENABLE_FEATURE_LS_TIMESTAMPS
|
|
/* Do time() just once. Saves one syscall per file for "ls -l" */
|
|
time_t current_time_t;
|
|
#endif
|
|
} FIX_ALIASING;
|
|
#define G (*(struct globals*)bb_common_bufsiz1)
|
|
#define INIT_G() do { \
|
|
setup_common_bufsiz(); \
|
|
/* we have to zero it out because of NOEXEC */ \
|
|
memset(&G, 0, sizeof(G)); \
|
|
IF_FEATURE_AUTOWIDTH(G_terminal_width = TERMINAL_WIDTH;) \
|
|
IF_FEATURE_LS_TIMESTAMPS(time(&G.current_time_t);) \
|
|
} while (0)
|
|
|
|
|
|
/*** Output code ***/
|
|
|
|
|
|
/* FYI type values: 1:fifo 2:char 4:dir 6:blk 8:file 10:link 12:socket
|
|
* (various wacky OSes: 13:Sun door 14:BSD whiteout 5:XENIX named file
|
|
* 3/7:multiplexed char/block device)
|
|
* and we use 0 for unknown and 15 for executables (see below) */
|
|
#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
|
|
/* un fi chr - dir - blk - file - link - sock - - exe */
|
|
#define APPCHAR(mode) ("\0""|""\0""\0""/""\0""\0""\0""\0""\0""@""\0""=""\0""\0""\0" [TYPEINDEX(mode)])
|
|
/* 036 black foreground 050 black background
|
|
037 red foreground 051 red background
|
|
040 green foreground 052 green background
|
|
041 brown foreground 053 brown background
|
|
042 blue foreground 054 blue background
|
|
043 magenta (purple) foreground 055 magenta background
|
|
044 cyan (light blue) foreground 056 cyan background
|
|
045 gray foreground 057 white background
|
|
*/
|
|
#define COLOR(mode) ( \
|
|
/*un fi chr - dir - blk - file - link - sock - - exe */ \
|
|
"\037\043\043\045\042\045\043\043\000\045\044\045\043\045\045\040" \
|
|
[TYPEINDEX(mode)])
|
|
/* Select normal (0) [actually "reset all"] or bold (1)
|
|
* (other attributes are 2:dim 4:underline 5:blink 7:reverse,
|
|
* let's use 7 for "impossible" types, just for fun)
|
|
* Note: coreutils 6.9 uses inverted red for setuid binaries.
|
|
*/
|
|
#define ATTR(mode) ( \
|
|
/*un fi chr - dir - blk - file- link- sock- - exe */ \
|
|
"\01\00\01\07\01\07\01\07\00\07\01\07\01\07\07\01" \
|
|
[TYPEINDEX(mode)])
|
|
|
|
#if ENABLE_FEATURE_LS_COLOR
|
|
/* mode of zero is interpreted as "unknown" (stat failed) */
|
|
static char fgcolor(mode_t mode)
|
|
{
|
|
if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
|
|
return COLOR(0xF000); /* File is executable ... */
|
|
return COLOR(mode);
|
|
}
|
|
static char bold(mode_t mode)
|
|
{
|
|
if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
|
|
return ATTR(0xF000); /* File is executable ... */
|
|
return ATTR(mode);
|
|
}
|
|
#endif
|
|
|
|
#if ENABLE_FEATURE_LS_FILETYPES
|
|
static char append_char(mode_t mode)
|
|
{
|
|
if (!(G.all_fmt & LIST_FILETYPE))
|
|
return '\0';
|
|
if (S_ISDIR(mode))
|
|
return '/';
|
|
if (!(G.all_fmt & LIST_CLASSIFY))
|
|
return '\0';
|
|
if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
|
|
return '*';
|
|
return APPCHAR(mode);
|
|
}
|
|
#endif
|
|
|
|
static unsigned calc_name_len(const char *name)
|
|
{
|
|
unsigned len;
|
|
uni_stat_t uni_stat;
|
|
|
|
// TODO: quote tab as \t, etc, if -Q
|
|
name = printable_string(&uni_stat, name);
|
|
|
|
if (!(option_mask32 & OPT_Q)) {
|
|
return uni_stat.unicode_width;
|
|
}
|
|
|
|
len = 2 + uni_stat.unicode_width;
|
|
while (*name) {
|
|
if (*name == '"' || *name == '\\') {
|
|
len++;
|
|
}
|
|
name++;
|
|
}
|
|
return len;
|
|
}
|
|
|
|
/* Return the number of used columns.
|
|
* Note that only STYLE_COLUMNAR uses return value.
|
|
* STYLE_SINGLE and STYLE_LONG don't care.
|
|
* coreutils 7.2 also supports:
|
|
* ls -b (--escape) = octal escapes (although it doesn't look like working)
|
|
* ls -N (--literal) = not escape at all
|
|
*/
|
|
static unsigned print_name(const char *name)
|
|
{
|
|
unsigned len;
|
|
uni_stat_t uni_stat;
|
|
|
|
// TODO: quote tab as \t, etc, if -Q
|
|
name = printable_string(&uni_stat, name);
|
|
|
|
if (!(option_mask32 & OPT_Q)) {
|
|
fputs(name, stdout);
|
|
return uni_stat.unicode_width;
|
|
}
|
|
|
|
len = 2 + uni_stat.unicode_width;
|
|
putchar('"');
|
|
while (*name) {
|
|
if (*name == '"' || *name == '\\') {
|
|
putchar('\\');
|
|
len++;
|
|
}
|
|
putchar(*name);
|
|
name++;
|
|
}
|
|
putchar('"');
|
|
return len;
|
|
}
|
|
|
|
/* Return the number of used columns.
|
|
* Note that only STYLE_COLUMNAR uses return value,
|
|
* STYLE_SINGLE and STYLE_LONG don't care.
|
|
*/
|
|
static NOINLINE unsigned display_single(const struct dnode *dn)
|
|
{
|
|
unsigned column = 0;
|
|
char *lpath;
|
|
#if ENABLE_FEATURE_LS_FILETYPES || ENABLE_FEATURE_LS_COLOR
|
|
struct stat statbuf;
|
|
char append;
|
|
#endif
|
|
|
|
#if ENABLE_FEATURE_LS_FILETYPES
|
|
append = append_char(dn->dn_mode);
|
|
#endif
|
|
|
|
/* Do readlink early, so that if it fails, error message
|
|
* does not appear *inside* the "ls -l" line */
|
|
lpath = NULL;
|
|
if (G.all_fmt & LIST_SYMLINK)
|
|
if (S_ISLNK(dn->dn_mode))
|
|
lpath = xmalloc_readlink_or_warn(dn->fullname);
|
|
|
|
if (G.all_fmt & LIST_INO)
|
|
column += printf("%7llu ", (long long) dn->dn_ino);
|
|
//TODO: -h should affect -s too:
|
|
if (G.all_fmt & LIST_BLOCKS)
|
|
column += printf("%6"OFF_FMT"u ", (off_t) (dn->dn_blocks >> 1));
|
|
if (G.all_fmt & LIST_MODEBITS)
|
|
column += printf("%-10s ", (char *) bb_mode_string(dn->dn_mode));
|
|
if (G.all_fmt & LIST_NLINKS)
|
|
column += printf("%4lu ", (long) dn->dn_nlink);
|
|
if (G.all_fmt & LIST_ID_NUMERIC) {
|
|
if (option_mask32 & OPT_g)
|
|
column += printf("%-8u ", (int) dn->dn_gid);
|
|
else
|
|
column += printf("%-8u %-8u ",
|
|
(int) dn->dn_uid,
|
|
(int) dn->dn_gid);
|
|
}
|
|
#if ENABLE_FEATURE_LS_USERNAME
|
|
else if (G.all_fmt & LIST_ID_NAME) {
|
|
if (option_mask32 & OPT_g) {
|
|
column += printf("%-8.8s ",
|
|
get_cached_groupname(dn->dn_gid));
|
|
} else {
|
|
column += printf("%-8.8s %-8.8s ",
|
|
get_cached_username(dn->dn_uid),
|
|
get_cached_groupname(dn->dn_gid));
|
|
}
|
|
}
|
|
#endif
|
|
if (G.all_fmt & LIST_SIZE) {
|
|
if (S_ISBLK(dn->dn_mode) || S_ISCHR(dn->dn_mode)) {
|
|
column += printf("%4u, %3u ",
|
|
dn->dn_rdev_maj,
|
|
dn->dn_rdev_min);
|
|
} else {
|
|
if (option_mask32 & OPT_h) {
|
|
column += printf("%"HUMAN_READABLE_MAX_WIDTH_STR"s ",
|
|
/* print size, show one fractional, use suffixes */
|
|
make_human_readable_str(dn->dn_size, 1, 0)
|
|
);
|
|
} else {
|
|
column += printf("%9"OFF_FMT"u ", dn->dn_size);
|
|
}
|
|
}
|
|
}
|
|
#if ENABLE_FEATURE_LS_TIMESTAMPS
|
|
if (G.all_fmt & (LIST_FULLTIME|LIST_DATE_TIME)) {
|
|
char *filetime;
|
|
const time_t *ttime = &dn->dn_mtime;
|
|
if (G.all_fmt & TIME_ACCESS)
|
|
ttime = &dn->dn_atime;
|
|
if (G.all_fmt & TIME_CHANGE)
|
|
ttime = &dn->dn_ctime;
|
|
filetime = ctime(ttime);
|
|
/* filetime's format: "Wed Jun 30 21:49:08 1993\n" */
|
|
if (G.all_fmt & LIST_FULLTIME) { /* -e */
|
|
/* Note: coreutils 8.4 ls --full-time prints:
|
|
* 2009-07-13 17:49:27.000000000 +0200
|
|
*/
|
|
column += printf("%.24s ", filetime);
|
|
} else { /* LIST_DATE_TIME */
|
|
/* G.current_time_t ~== time(NULL) */
|
|
time_t age = G.current_time_t - *ttime;
|
|
if (age < 3600L * 24 * 365 / 2 && age > -15 * 60) {
|
|
/* less than 6 months old */
|
|
/* "mmm dd hh:mm " */
|
|
printf("%.12s ", filetime + 4);
|
|
} else {
|
|
/* "mmm dd yyyy " */
|
|
/* "mmm dd yyyyy " after year 9999 :) */
|
|
strchr(filetime + 20, '\n')[0] = ' ';
|
|
printf("%.7s%6s", filetime + 4, filetime + 20);
|
|
}
|
|
column += 13;
|
|
}
|
|
}
|
|
#endif
|
|
#if ENABLE_SELINUX
|
|
if (G.all_fmt & LIST_CONTEXT) {
|
|
column += printf("%-32s ", dn->sid ? dn->sid : "unknown");
|
|
freecon(dn->sid);
|
|
}
|
|
#endif
|
|
|
|
#if ENABLE_FEATURE_LS_COLOR
|
|
if (G_show_color) {
|
|
mode_t mode = dn->dn_mode_lstat;
|
|
if (!mode)
|
|
if (lstat(dn->fullname, &statbuf) == 0)
|
|
mode = statbuf.st_mode;
|
|
printf("\033[%u;%um", bold(mode), fgcolor(mode));
|
|
}
|
|
#endif
|
|
column += print_name(dn->name);
|
|
if (G_show_color) {
|
|
printf("\033[0m");
|
|
}
|
|
|
|
if (lpath) {
|
|
printf(" -> ");
|
|
#if ENABLE_FEATURE_LS_FILETYPES || ENABLE_FEATURE_LS_COLOR
|
|
if ((G.all_fmt & LIST_FILETYPE) || G_show_color) {
|
|
mode_t mode = dn->dn_mode_stat;
|
|
if (!mode)
|
|
if (stat(dn->fullname, &statbuf) == 0)
|
|
mode = statbuf.st_mode;
|
|
# if ENABLE_FEATURE_LS_FILETYPES
|
|
append = append_char(mode);
|
|
# endif
|
|
# if ENABLE_FEATURE_LS_COLOR
|
|
if (G_show_color) {
|
|
printf("\033[%u;%um", bold(mode), fgcolor(mode));
|
|
}
|
|
# endif
|
|
}
|
|
#endif
|
|
column += print_name(lpath) + 4;
|
|
free(lpath);
|
|
if (G_show_color) {
|
|
printf("\033[0m");
|
|
}
|
|
}
|
|
#if ENABLE_FEATURE_LS_FILETYPES
|
|
if (G.all_fmt & LIST_FILETYPE) {
|
|
if (append) {
|
|
putchar(append);
|
|
column++;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
return column;
|
|
}
|
|
|
|
static void display_files(struct dnode **dn, unsigned nfiles)
|
|
{
|
|
unsigned i, ncols, nrows, row, nc;
|
|
unsigned column;
|
|
unsigned nexttab;
|
|
unsigned column_width = 0; /* used only by STYLE_COLUMNAR */
|
|
|
|
if (G.all_fmt & STYLE_LONG) { /* STYLE_LONG or STYLE_SINGLE */
|
|
ncols = 1;
|
|
} else {
|
|
/* find the longest file name, use that as the column width */
|
|
for (i = 0; dn[i]; i++) {
|
|
int len = calc_name_len(dn[i]->name);
|
|
if (column_width < len)
|
|
column_width = len;
|
|
}
|
|
column_width += 2 +
|
|
IF_SELINUX( ((G.all_fmt & LIST_CONTEXT) ? 33 : 0) + )
|
|
((G.all_fmt & LIST_INO) ? 8 : 0) +
|
|
((G.all_fmt & LIST_BLOCKS) ? 5 : 0);
|
|
ncols = (unsigned)G_terminal_width / column_width;
|
|
}
|
|
|
|
if (ncols > 1) {
|
|
nrows = nfiles / ncols;
|
|
if (nrows * ncols < nfiles)
|
|
nrows++; /* round up fractionals */
|
|
} else {
|
|
nrows = nfiles;
|
|
ncols = 1;
|
|
}
|
|
|
|
column = 0;
|
|
nexttab = 0;
|
|
for (row = 0; row < nrows; row++) {
|
|
for (nc = 0; nc < ncols; nc++) {
|
|
/* reach into the array based on the column and row */
|
|
if (G.all_fmt & DISP_ROWS)
|
|
i = (row * ncols) + nc; /* display across row */
|
|
else
|
|
i = (nc * nrows) + row; /* display by column */
|
|
if (i < nfiles) {
|
|
if (column > 0) {
|
|
nexttab -= column;
|
|
printf("%*s", nexttab, "");
|
|
column += nexttab;
|
|
}
|
|
nexttab = column + column_width;
|
|
column += display_single(dn[i]);
|
|
}
|
|
}
|
|
putchar('\n');
|
|
column = 0;
|
|
}
|
|
}
|
|
|
|
|
|
/*** Dir scanning code ***/
|
|
|
|
static struct dnode *my_stat(const char *fullname, const char *name, int force_follow)
|
|
{
|
|
struct stat statbuf;
|
|
struct dnode *cur;
|
|
|
|
cur = xzalloc(sizeof(*cur));
|
|
cur->fullname = fullname;
|
|
cur->name = name;
|
|
|
|
if ((option_mask32 & OPT_L) || force_follow) {
|
|
#if ENABLE_SELINUX
|
|
if (is_selinux_enabled()) {
|
|
getfilecon(fullname, &cur->sid);
|
|
}
|
|
#endif
|
|
if (stat(fullname, &statbuf)) {
|
|
bb_simple_perror_msg(fullname);
|
|
G.exit_code = EXIT_FAILURE;
|
|
free(cur);
|
|
return NULL;
|
|
}
|
|
cur->dn_mode_stat = statbuf.st_mode;
|
|
} else {
|
|
#if ENABLE_SELINUX
|
|
if (is_selinux_enabled()) {
|
|
lgetfilecon(fullname, &cur->sid);
|
|
}
|
|
#endif
|
|
if (lstat(fullname, &statbuf)) {
|
|
bb_simple_perror_msg(fullname);
|
|
G.exit_code = EXIT_FAILURE;
|
|
free(cur);
|
|
return NULL;
|
|
}
|
|
cur->dn_mode_lstat = statbuf.st_mode;
|
|
}
|
|
|
|
/* cur->dstat = statbuf: */
|
|
cur->dn_mode = statbuf.st_mode ;
|
|
cur->dn_size = statbuf.st_size ;
|
|
#if ENABLE_FEATURE_LS_TIMESTAMPS || ENABLE_FEATURE_LS_SORTFILES
|
|
cur->dn_atime = statbuf.st_atime ;
|
|
cur->dn_mtime = statbuf.st_mtime ;
|
|
cur->dn_ctime = statbuf.st_ctime ;
|
|
#endif
|
|
cur->dn_ino = statbuf.st_ino ;
|
|
cur->dn_blocks = statbuf.st_blocks;
|
|
cur->dn_nlink = statbuf.st_nlink ;
|
|
cur->dn_uid = statbuf.st_uid ;
|
|
cur->dn_gid = statbuf.st_gid ;
|
|
cur->dn_rdev_maj = major(statbuf.st_rdev);
|
|
cur->dn_rdev_min = minor(statbuf.st_rdev);
|
|
|
|
return cur;
|
|
}
|
|
|
|
static unsigned count_dirs(struct dnode **dn, int which)
|
|
{
|
|
unsigned dirs, all;
|
|
|
|
if (!dn)
|
|
return 0;
|
|
|
|
dirs = all = 0;
|
|
for (; *dn; dn++) {
|
|
const char *name;
|
|
|
|
all++;
|
|
if (!S_ISDIR((*dn)->dn_mode))
|
|
continue;
|
|
|
|
name = (*dn)->name;
|
|
if (which != SPLIT_SUBDIR /* if not requested to skip . / .. */
|
|
/* or if it's not . or .. */
|
|
|| name[0] != '.'
|
|
|| (name[1] && (name[1] != '.' || name[2]))
|
|
) {
|
|
dirs++;
|
|
}
|
|
}
|
|
return which != SPLIT_FILE ? dirs : all - dirs;
|
|
}
|
|
|
|
/* get memory to hold an array of pointers */
|
|
static struct dnode **dnalloc(unsigned num)
|
|
{
|
|
if (num < 1)
|
|
return NULL;
|
|
|
|
num++; /* so that we have terminating NULL */
|
|
return xzalloc(num * sizeof(struct dnode *));
|
|
}
|
|
|
|
#if ENABLE_FEATURE_LS_RECURSIVE
|
|
static void dfree(struct dnode **dnp)
|
|
{
|
|
unsigned i;
|
|
|
|
if (dnp == NULL)
|
|
return;
|
|
|
|
for (i = 0; dnp[i]; i++) {
|
|
struct dnode *cur = dnp[i];
|
|
if (cur->fname_allocated)
|
|
free((char*)cur->fullname);
|
|
free(cur);
|
|
}
|
|
free(dnp);
|
|
}
|
|
#else
|
|
#define dfree(...) ((void)0)
|
|
#endif
|
|
|
|
/* Returns NULL-terminated malloced vector of pointers (or NULL) */
|
|
static struct dnode **splitdnarray(struct dnode **dn, int which)
|
|
{
|
|
unsigned dncnt, d;
|
|
struct dnode **dnp;
|
|
|
|
if (dn == NULL)
|
|
return NULL;
|
|
|
|
/* count how many dirs or files there are */
|
|
dncnt = count_dirs(dn, which);
|
|
|
|
/* allocate a file array and a dir array */
|
|
dnp = dnalloc(dncnt);
|
|
|
|
/* copy the entrys into the file or dir array */
|
|
for (d = 0; *dn; dn++) {
|
|
if (S_ISDIR((*dn)->dn_mode)) {
|
|
const char *name;
|
|
|
|
if (which == SPLIT_FILE)
|
|
continue;
|
|
|
|
name = (*dn)->name;
|
|
if ((which & SPLIT_DIR) /* any dir... */
|
|
/* ... or not . or .. */
|
|
|| name[0] != '.'
|
|
|| (name[1] && (name[1] != '.' || name[2]))
|
|
) {
|
|
dnp[d++] = *dn;
|
|
}
|
|
} else
|
|
if (which == SPLIT_FILE) {
|
|
dnp[d++] = *dn;
|
|
}
|
|
}
|
|
return dnp;
|
|
}
|
|
|
|
#if ENABLE_FEATURE_LS_SORTFILES
|
|
static int sortcmp(const void *a, const void *b)
|
|
{
|
|
struct dnode *d1 = *(struct dnode **)a;
|
|
struct dnode *d2 = *(struct dnode **)b;
|
|
unsigned sort_opts = G.all_fmt & SORT_MASK;
|
|
off_t dif;
|
|
|
|
dif = 0; /* assume SORT_NAME */
|
|
// TODO: use pre-initialized function pointer
|
|
// instead of branch forest
|
|
if (sort_opts == SORT_SIZE) {
|
|
dif = (d2->dn_size - d1->dn_size);
|
|
} else
|
|
if (sort_opts == SORT_ATIME) {
|
|
dif = (d2->dn_atime - d1->dn_atime);
|
|
} else
|
|
if (sort_opts == SORT_CTIME) {
|
|
dif = (d2->dn_ctime - d1->dn_ctime);
|
|
} else
|
|
if (sort_opts == SORT_MTIME) {
|
|
dif = (d2->dn_mtime - d1->dn_mtime);
|
|
} else
|
|
if (sort_opts == SORT_DIR) {
|
|
dif = S_ISDIR(d2->dn_mode) - S_ISDIR(d1->dn_mode);
|
|
} else
|
|
#if defined(HAVE_STRVERSCMP) && HAVE_STRVERSCMP == 1
|
|
if (sort_opts == SORT_VERSION) {
|
|
dif = strverscmp(d1->name, d2->name);
|
|
} else
|
|
#endif
|
|
if (sort_opts == SORT_EXT) {
|
|
dif = strcmp(strchrnul(d1->name, '.'), strchrnul(d2->name, '.'));
|
|
}
|
|
if (dif == 0) {
|
|
/* sort by name, use as tie breaker for other sorts */
|
|
if (ENABLE_LOCALE_SUPPORT)
|
|
dif = strcoll(d1->name, d2->name);
|
|
else
|
|
dif = strcmp(d1->name, d2->name);
|
|
}
|
|
|
|
/* Make dif fit into an int */
|
|
if (sizeof(dif) > sizeof(int)) {
|
|
enum { BITS_TO_SHIFT = 8 * (sizeof(dif) - sizeof(int)) };
|
|
/* shift leaving only "int" worth of bits */
|
|
if (dif != 0) {
|
|
dif = 1 | (int)((uoff_t)dif >> BITS_TO_SHIFT);
|
|
}
|
|
}
|
|
|
|
return (G.all_fmt & SORT_REVERSE) ? -(int)dif : (int)dif;
|
|
}
|
|
|
|
static void dnsort(struct dnode **dn, int size)
|
|
{
|
|
qsort(dn, size, sizeof(*dn), sortcmp);
|
|
}
|
|
|
|
static void sort_and_display_files(struct dnode **dn, unsigned nfiles)
|
|
{
|
|
dnsort(dn, nfiles);
|
|
display_files(dn, nfiles);
|
|
}
|
|
#else
|
|
# define dnsort(dn, size) ((void)0)
|
|
# define sort_and_display_files(dn, nfiles) display_files(dn, nfiles)
|
|
#endif
|
|
|
|
/* Returns NULL-terminated malloced vector of pointers (or NULL) */
|
|
static struct dnode **scan_one_dir(const char *path, unsigned *nfiles_p)
|
|
{
|
|
struct dnode *dn, *cur, **dnp;
|
|
struct dirent *entry;
|
|
DIR *dir;
|
|
unsigned i, nfiles;
|
|
|
|
*nfiles_p = 0;
|
|
dir = warn_opendir(path);
|
|
if (dir == NULL) {
|
|
G.exit_code = EXIT_FAILURE;
|
|
return NULL; /* could not open the dir */
|
|
}
|
|
dn = NULL;
|
|
nfiles = 0;
|
|
while ((entry = readdir(dir)) != NULL) {
|
|
char *fullname;
|
|
|
|
/* are we going to list the file- it may be . or .. or a hidden file */
|
|
if (entry->d_name[0] == '.') {
|
|
if ((!entry->d_name[1] || (entry->d_name[1] == '.' && !entry->d_name[2]))
|
|
&& !(G.all_fmt & DISP_DOT)
|
|
) {
|
|
continue;
|
|
}
|
|
if (!(G.all_fmt & DISP_HIDDEN))
|
|
continue;
|
|
}
|
|
fullname = concat_path_file(path, entry->d_name);
|
|
cur = my_stat(fullname, bb_basename(fullname), 0);
|
|
if (!cur) {
|
|
free(fullname);
|
|
continue;
|
|
}
|
|
cur->fname_allocated = 1;
|
|
cur->dn_next = dn;
|
|
dn = cur;
|
|
nfiles++;
|
|
}
|
|
closedir(dir);
|
|
|
|
if (dn == NULL)
|
|
return NULL;
|
|
|
|
/* now that we know how many files there are
|
|
* allocate memory for an array to hold dnode pointers
|
|
*/
|
|
*nfiles_p = nfiles;
|
|
dnp = dnalloc(nfiles);
|
|
for (i = 0; /* i < nfiles - detected via !dn below */; i++) {
|
|
dnp[i] = dn; /* save pointer to node in array */
|
|
dn = dn->dn_next;
|
|
if (!dn)
|
|
break;
|
|
}
|
|
|
|
return dnp;
|
|
}
|
|
|
|
#if ENABLE_DESKTOP
|
|
/* http://www.opengroup.org/onlinepubs/9699919799/utilities/ls.html
|
|
* If any of the -l, -n, -s options is specified, each list
|
|
* of files within the directory shall be preceded by a
|
|
* status line indicating the number of file system blocks
|
|
* occupied by files in the directory in 512-byte units if
|
|
* the -k option is not specified, or 1024-byte units if the
|
|
* -k option is specified, rounded up to the next integral
|
|
* number of units.
|
|
*/
|
|
/* by Jorgen Overgaard (jorgen AT antistaten.se) */
|
|
static off_t calculate_blocks(struct dnode **dn)
|
|
{
|
|
uoff_t blocks = 1;
|
|
if (dn) {
|
|
while (*dn) {
|
|
/* st_blocks is in 512 byte blocks */
|
|
blocks += (*dn)->dn_blocks;
|
|
dn++;
|
|
}
|
|
}
|
|
|
|
/* Even though standard says use 512 byte blocks, coreutils use 1k */
|
|
/* Actually, we round up by calculating (blocks + 1) / 2,
|
|
* "+ 1" was done when we initialized blocks to 1 */
|
|
return blocks >> 1;
|
|
}
|
|
#endif
|
|
|
|
static void scan_and_display_dirs_recur(struct dnode **dn, int first)
|
|
{
|
|
unsigned nfiles;
|
|
struct dnode **subdnp;
|
|
|
|
for (; *dn; dn++) {
|
|
if (G.all_fmt & (DISP_DIRNAME | DISP_RECURSIVE)) {
|
|
if (!first)
|
|
bb_putchar('\n');
|
|
first = 0;
|
|
printf("%s:\n", (*dn)->fullname);
|
|
}
|
|
subdnp = scan_one_dir((*dn)->fullname, &nfiles);
|
|
#if ENABLE_DESKTOP
|
|
if ((G.all_fmt & STYLE_MASK) == STYLE_LONG || (G.all_fmt & LIST_BLOCKS))
|
|
printf("total %"OFF_FMT"u\n", calculate_blocks(subdnp));
|
|
#endif
|
|
if (nfiles > 0) {
|
|
/* list all files at this level */
|
|
sort_and_display_files(subdnp, nfiles);
|
|
|
|
if (ENABLE_FEATURE_LS_RECURSIVE
|
|
&& (G.all_fmt & DISP_RECURSIVE)
|
|
) {
|
|
struct dnode **dnd;
|
|
unsigned dndirs;
|
|
/* recursive - list the sub-dirs */
|
|
dnd = splitdnarray(subdnp, SPLIT_SUBDIR);
|
|
dndirs = count_dirs(subdnp, SPLIT_SUBDIR);
|
|
if (dndirs > 0) {
|
|
dnsort(dnd, dndirs);
|
|
scan_and_display_dirs_recur(dnd, 0);
|
|
/* free the array of dnode pointers to the dirs */
|
|
free(dnd);
|
|
}
|
|
}
|
|
/* free the dnodes and the fullname mem */
|
|
dfree(subdnp);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
int ls_main(int argc UNUSED_PARAM, char **argv)
|
|
{
|
|
struct dnode **dnd;
|
|
struct dnode **dnf;
|
|
struct dnode **dnp;
|
|
struct dnode *dn;
|
|
struct dnode *cur;
|
|
unsigned opt;
|
|
unsigned nfiles;
|
|
unsigned dnfiles;
|
|
unsigned dndirs;
|
|
unsigned i;
|
|
#if ENABLE_FEATURE_LS_COLOR
|
|
/* colored LS support by JaWi, janwillem.janssen@lxtreme.nl */
|
|
/* coreutils 6.10:
|
|
* # ls --color=BOGUS
|
|
* ls: invalid argument 'BOGUS' for '--color'
|
|
* Valid arguments are:
|
|
* 'always', 'yes', 'force'
|
|
* 'never', 'no', 'none'
|
|
* 'auto', 'tty', 'if-tty'
|
|
* (and substrings: "--color=alwa" work too)
|
|
*/
|
|
static const char ls_longopts[] ALIGN1 =
|
|
"color\0" Optional_argument "\xff"; /* no short equivalent */
|
|
static const char color_str[] ALIGN1 =
|
|
"always\0""yes\0""force\0"
|
|
"auto\0""tty\0""if-tty\0";
|
|
/* need to initialize since --color has _an optional_ argument */
|
|
const char *color_opt = color_str; /* "always" */
|
|
#endif
|
|
|
|
INIT_G();
|
|
|
|
init_unicode();
|
|
|
|
if (ENABLE_FEATURE_LS_SORTFILES)
|
|
G.all_fmt = SORT_NAME;
|
|
|
|
#if ENABLE_FEATURE_AUTOWIDTH
|
|
/* obtain the terminal width */
|
|
G_terminal_width = get_terminal_width(STDIN_FILENO);
|
|
/* go one less... */
|
|
G_terminal_width--;
|
|
#endif
|
|
|
|
/* process options */
|
|
IF_FEATURE_LS_COLOR(applet_long_options = ls_longopts;)
|
|
opt_complementary =
|
|
/* -e implies -l */
|
|
IF_FEATURE_LS_TIMESTAMPS("el")
|
|
/* http://pubs.opengroup.org/onlinepubs/9699919799/utilities/ls.html:
|
|
* in some pairs of opts, only last one takes effect:
|
|
*/
|
|
IF_FEATURE_LS_TIMESTAMPS(IF_FEATURE_LS_SORTFILES(":t-S:S-t")) /* time/size */
|
|
// ":m-l:l-m" - we don't have -m
|
|
IF_FEATURE_LS_FOLLOWLINKS(":H-L:L-H")
|
|
":C-xl:x-Cl:l-xC" /* bycols/bylines/long */
|
|
":C-1:1-C" /* bycols/oneline */
|
|
":x-1:1-x" /* bylines/oneline (not in SuS, but in GNU coreutils 8.4) */
|
|
IF_FEATURE_LS_TIMESTAMPS(":c-u:u-c") /* mtime/atime */
|
|
/* -w NUM: */
|
|
IF_FEATURE_AUTOWIDTH(":w+");
|
|
opt = getopt32(argv, ls_options
|
|
IF_FEATURE_AUTOWIDTH(, NULL, &G_terminal_width)
|
|
IF_FEATURE_LS_COLOR(, &color_opt)
|
|
);
|
|
for (i = 0; opt_flags[i] != (1U << 31); i++) {
|
|
if (opt & (1 << i)) {
|
|
uint32_t flags = opt_flags[i];
|
|
|
|
if (flags & STYLE_MASK)
|
|
G.all_fmt &= ~STYLE_MASK;
|
|
if (flags & SORT_MASK)
|
|
G.all_fmt &= ~SORT_MASK;
|
|
if (flags & TIME_MASK)
|
|
G.all_fmt &= ~TIME_MASK;
|
|
|
|
G.all_fmt |= flags;
|
|
}
|
|
}
|
|
|
|
#if ENABLE_FEATURE_LS_COLOR
|
|
/* set G_show_color = 1/0 */
|
|
if (ENABLE_FEATURE_LS_COLOR_IS_DEFAULT && isatty(STDOUT_FILENO)) {
|
|
char *p = getenv("LS_COLORS");
|
|
/* LS_COLORS is unset, or (not empty && not "none") ? */
|
|
if (!p || (p[0] && strcmp(p, "none") != 0))
|
|
G_show_color = 1;
|
|
}
|
|
if (opt & OPT_color) {
|
|
if (color_opt[0] == 'n')
|
|
G_show_color = 0;
|
|
else switch (index_in_substrings(color_str, color_opt)) {
|
|
case 3:
|
|
case 4:
|
|
case 5:
|
|
if (isatty(STDOUT_FILENO)) {
|
|
case 0:
|
|
case 1:
|
|
case 2:
|
|
G_show_color = 1;
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
|
|
/* sort out which command line options take precedence */
|
|
if (ENABLE_FEATURE_LS_RECURSIVE && (G.all_fmt & DISP_NOLIST))
|
|
G.all_fmt &= ~DISP_RECURSIVE; /* no recurse if listing only dir */
|
|
if (ENABLE_FEATURE_LS_TIMESTAMPS && ENABLE_FEATURE_LS_SORTFILES) {
|
|
if (G.all_fmt & TIME_CHANGE)
|
|
G.all_fmt = (G.all_fmt & ~SORT_MASK) | SORT_CTIME;
|
|
if (G.all_fmt & TIME_ACCESS)
|
|
G.all_fmt = (G.all_fmt & ~SORT_MASK) | SORT_ATIME;
|
|
}
|
|
if ((G.all_fmt & STYLE_MASK) != STYLE_LONG) /* not -l? */
|
|
G.all_fmt &= ~(LIST_ID_NUMERIC|LIST_ID_NAME|LIST_FULLTIME);
|
|
|
|
/* choose a display format if one was not already specified by an option */
|
|
if (!(G.all_fmt & STYLE_MASK))
|
|
G.all_fmt |= (isatty(STDOUT_FILENO) ? STYLE_COLUMNAR : STYLE_SINGLE);
|
|
|
|
argv += optind;
|
|
if (!argv[0])
|
|
*--argv = (char*)".";
|
|
|
|
if (argv[1])
|
|
G.all_fmt |= DISP_DIRNAME; /* 2 or more items? label directories */
|
|
|
|
/* stuff the command line file names into a dnode array */
|
|
dn = NULL;
|
|
nfiles = 0;
|
|
do {
|
|
cur = my_stat(*argv, *argv,
|
|
/* follow links on command line unless -l, -s or -F: */
|
|
!((G.all_fmt & STYLE_MASK) == STYLE_LONG
|
|
|| (G.all_fmt & LIST_BLOCKS)
|
|
|| (option_mask32 & OPT_F)
|
|
)
|
|
/* ... or if -H: */
|
|
|| (option_mask32 & OPT_H)
|
|
/* ... or if -L, but my_stat always follows links if -L */
|
|
);
|
|
argv++;
|
|
if (!cur)
|
|
continue;
|
|
/*cur->fname_allocated = 0; - already is */
|
|
cur->dn_next = dn;
|
|
dn = cur;
|
|
nfiles++;
|
|
} while (*argv);
|
|
|
|
/* nfiles _may_ be 0 here - try "ls doesnt_exist" */
|
|
if (nfiles == 0)
|
|
return G.exit_code;
|
|
|
|
/* now that we know how many files there are
|
|
* allocate memory for an array to hold dnode pointers
|
|
*/
|
|
dnp = dnalloc(nfiles);
|
|
for (i = 0; /* i < nfiles - detected via !dn below */; i++) {
|
|
dnp[i] = dn; /* save pointer to node in array */
|
|
dn = dn->dn_next;
|
|
if (!dn)
|
|
break;
|
|
}
|
|
|
|
if (G.all_fmt & DISP_NOLIST) {
|
|
sort_and_display_files(dnp, nfiles);
|
|
} else {
|
|
dnd = splitdnarray(dnp, SPLIT_DIR);
|
|
dnf = splitdnarray(dnp, SPLIT_FILE);
|
|
dndirs = count_dirs(dnp, SPLIT_DIR);
|
|
dnfiles = nfiles - dndirs;
|
|
if (dnfiles > 0) {
|
|
sort_and_display_files(dnf, dnfiles);
|
|
if (ENABLE_FEATURE_CLEAN_UP)
|
|
free(dnf);
|
|
}
|
|
if (dndirs > 0) {
|
|
dnsort(dnd, dndirs);
|
|
scan_and_display_dirs_recur(dnd, dnfiles == 0);
|
|
if (ENABLE_FEATURE_CLEAN_UP)
|
|
free(dnd);
|
|
}
|
|
}
|
|
|
|
if (ENABLE_FEATURE_CLEAN_UP)
|
|
dfree(dnp);
|
|
return G.exit_code;
|
|
}
|