hush/ls.c

565 lines
13 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
1999-10-05 16:24:54 +00:00
/*
* tiny-ls.c version 0.1.0: A minimalist 'ls'
* Copyright (C) 1996 Brian Candler <B.Candler@pobox.com>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
/*
* 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:
2000-02-11 21:55:04 +00:00
* 1. ls -l of a directory doesn't give "total <blocks>" header
* 2. ls of a symlink to a directory doesn't list directory contents
* 3. hidden files can make column width too large
*
1999-10-05 16:24:54 +00:00
* 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?
*/
#define TERMINAL_WIDTH 80 /* use 79 if your terminal has linefold bug */
#define COLUMN_WIDTH 14 /* default if AUTOWIDTH not defined */
#define COLUMN_GAP 2 /* includes the file type char, if present */
1999-10-14 22:16:57 +00:00
#define HAS_REWINDDIR
1999-10-05 16:24:54 +00:00
/************************************************************************/
#include "internal.h"
#if !defined(__GLIBC__) && (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1)
# include <linux/types.h>
1999-10-05 16:24:54 +00:00
#else
# include <sys/types.h>
1999-10-05 16:24:54 +00:00
#endif
#include <sys/stat.h>
#include <stdio.h>
#include <unistd.h>
#include <dirent.h>
#include <errno.h>
#include <stdio.h>
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
#include <time.h>
#endif
#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
#define TYPECHAR(mode) ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)])
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
#define APPCHAR(mode) ("\0|\0\0/\0\0\0\0\0@\0=\0\0\0" [TYPEINDEX(mode)])
#endif
#define FMT_AUTO 0
#define FMT_LONG 1 /* one record per line, extended info */
#define FMT_SINGLE 2 /* one record per line */
#define FMT_ROWS 3 /* print across rows */
#define FMT_COLUMNS 3 /* fill columns (same, since we don't sort) */
1999-10-05 16:24:54 +00:00
#define TIME_MOD 0
#define TIME_CHANGE 1
#define TIME_ACCESS 2
#define DISP_FTYPE 1 /* show character for file type */
#define DISP_EXEC 2 /* show '*' if regular executable file */
#define DISP_HIDDEN 4 /* show files starting . (except . and ..) */
#define DISP_DOT 8 /* show . and .. */
#define DISP_NUMERIC 16 /* numeric uid and gid */
#define DISP_FULLTIME 32 /* show extended time display */
#define DIR_NOLIST 64 /* show directory as itself, not contents */
#define DISP_DIRNAME 128 /* show directory name (for internal use) */
#define DIR_RECURSE 256 /* -R (not yet implemented) */
1999-10-05 16:24:54 +00:00
#ifndef MAJOR
#define MAJOR(dev) (((dev)>>8)&0xff)
#define MINOR(dev) ((dev)&0xff)
#endif
static unsigned char display_fmt = FMT_AUTO;
static unsigned short opts = 0;
static unsigned short column = 0;
1999-10-05 16:24:54 +00:00
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_AUTOWIDTH
2000-02-11 21:55:04 +00:00
static unsigned short terminal_width = 0;
static unsigned short column_width = 0;
static unsigned short toplevel_column_width = 0;
1999-10-05 16:24:54 +00:00
#else
#define terminal_width TERMINAL_WIDTH
#define column_width COLUMN_WIDTH
#endif
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
static unsigned char time_fmt = TIME_MOD;
#endif
#define wr(data,len) fwrite(data, 1, len, stdout)
static void writenum(long val, short minwidth)
{
char scratch[128];
1999-10-05 16:24:54 +00:00
char *p = scratch + sizeof(scratch);
short len = 0;
short neg = (val < 0);
if (neg)
val = -val;
1999-10-05 16:24:54 +00:00
do
*--p = (val % 10) + '0', len++, val /= 10;
while (val);
if (neg)
*--p = '-', len++;
while (len < minwidth)
*--p = ' ', len++;
wr(p, len);
column += len;
}
static void newline(void)
{
if (column > 0) {
wr("\n", 1);
column = 0;
}
}
static void tab(short col)
{
static const char spaces[] = " ";
#define nspaces ((sizeof spaces)-1) /* null terminator! */
1999-10-05 16:24:54 +00:00
short n = col - column;
if (n > 0) {
column = col;
while (n > nspaces) {
wr(spaces, nspaces);
n -= nspaces;
}
/* must be 1...(sizeof spaces) left */
wr(spaces, n);
}
#undef nspaces
1999-10-05 16:24:54 +00:00
}
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
static char append_char(mode_t mode)
1999-10-05 16:24:54 +00:00
{
if (!(opts & DISP_FTYPE))
return '\0';
if ((opts & DISP_EXEC) && S_ISREG(mode)
&& (mode & (S_IXUSR | S_IXGRP | S_IXOTH))) return '*';
1999-10-05 16:24:54 +00:00
return APPCHAR(mode);
}
#endif
/**
**
** Display a file or directory as a single item
** (in either long or short format)
**
**/
static void list_single(const char *name, struct stat *info,
const char *fullname)
1999-10-05 16:24:54 +00:00
{
char scratch[PATH_MAX + 1];
1999-10-05 16:24:54 +00:00
short len = strlen(name);
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
char append = append_char(info->st_mode);
#endif
1999-10-05 16:24:54 +00:00
if (display_fmt == FMT_LONG) {
mode_t mode = info->st_mode;
1999-10-05 16:24:54 +00:00
newline();
1999-11-09 01:47:36 +00:00
wr(modeString(mode), 10);
column = 10;
writenum((long) info->st_nlink, (short) 5);
1999-10-05 16:24:54 +00:00
fputs(" ", stdout);
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_USERNAME
1999-10-05 16:24:54 +00:00
if (!(opts & DISP_NUMERIC)) {
memset(scratch, 0, sizeof(scratch));
my_getpwuid(scratch, info->st_uid);
if (*scratch) {
fputs(scratch, stdout);
if (strlen(scratch) <= 8)
wr(" ", 9 - strlen(scratch));
} else {
writenum((long) info->st_uid, (short) 8);
1999-11-23 21:38:12 +00:00
fputs(" ", stdout);
}
1999-10-05 16:24:54 +00:00
} else
#endif
1999-11-23 21:38:12 +00:00
{
writenum((long) info->st_uid, (short) 8);
fputs(" ", stdout);
1999-11-23 21:38:12 +00:00
}
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_USERNAME
1999-10-05 16:24:54 +00:00
if (!(opts & DISP_NUMERIC)) {
memset(scratch, 0, sizeof(scratch));
my_getgrgid(scratch, info->st_gid);
if (*scratch) {
fputs(scratch, stdout);
if (strlen(scratch) <= 8)
wr(" ", 8 - strlen(scratch));
} else
writenum((long) info->st_gid, (short) 8);
1999-10-05 16:24:54 +00:00
} else
#endif
writenum((long) info->st_gid, (short) 8);
//tab(26);
1999-10-05 16:24:54 +00:00
if (S_ISBLK(mode) || S_ISCHR(mode)) {
writenum((long) MAJOR(info->st_rdev), (short) 3);
1999-10-05 16:24:54 +00:00
fputs(", ", stdout);
writenum((long) MINOR(info->st_rdev), (short) 3);
} else
writenum((long) info->st_size, (short) 8);
1999-10-05 16:24:54 +00:00
fputs(" ", stdout);
//tab(32);
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
{
time_t cal;
char *string;
switch (time_fmt) {
1999-10-05 16:24:54 +00:00
case TIME_CHANGE:
cal = info->st_ctime;
break;
1999-10-05 16:24:54 +00:00
case TIME_ACCESS:
cal = info->st_atime;
break;
1999-10-05 16:24:54 +00:00
default:
cal = info->st_mtime;
break;
1999-10-05 16:24:54 +00:00
}
string = ctime(&cal);
1999-10-05 16:24:54 +00:00
if (opts & DISP_FULLTIME)
wr(string, 24);
1999-10-05 16:24:54 +00:00
else {
time_t age = time(NULL) - cal;
wr(string + 4, 7); /* mmm_dd_ */
if (age < 3600L * 24 * 365 / 2 && age > -15 * 60)
1999-10-05 16:24:54 +00:00
/* hh:mm if less than 6 months old */
wr(string + 11, 5);
1999-10-05 16:24:54 +00:00
else
/* _yyyy otherwise */
wr(string + 19, 5);
1999-10-05 16:24:54 +00:00
}
wr(" ", 1);
}
#else
fputs("--- -- ----- ", stdout);
#endif
wr(name, len);
if (S_ISLNK(mode)) {
wr(" -> ", 4);
1999-11-07 07:38:08 +00:00
len = readlink(fullname, scratch, sizeof scratch);
if (len > 0)
fwrite(scratch, 1, len, stdout);
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
/* show type of destination */
if (opts & DISP_FTYPE) {
1999-11-07 07:38:08 +00:00
if (!stat(fullname, info)) {
1999-10-05 16:24:54 +00:00
append = append_char(info->st_mode);
if (append)
fputc(append, stdout);
}
}
#endif
}
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
else if (append)
wr(&append, 1);
#endif
} else {
static short nexttab = 0;
1999-10-05 16:24:54 +00:00
/* sort out column alignment */
if (column == 0); /* nothing to do */
1999-10-05 16:24:54 +00:00
else if (display_fmt == FMT_SINGLE)
newline();
else {
if (nexttab + column_width > terminal_width
1999-11-19 05:42:32 +00:00
#ifndef BB_FEATURE_AUTOWIDTH
|| nexttab + len >= terminal_width
1999-10-05 16:24:54 +00:00
#endif
)
1999-10-05 16:24:54 +00:00
newline();
else
tab(nexttab);
}
/* work out where next column starts */
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_AUTOWIDTH
1999-10-05 16:24:54 +00:00
/* we know the calculated width is big enough */
nexttab = column + column_width + COLUMN_GAP;
#else
/* might cover more than one fixed-width column */
nexttab = column;
do
nexttab += column_width + COLUMN_GAP;
while (nexttab < (column + len + COLUMN_GAP));
#endif
/* now write the data */
wr(name, len);
column = column + len;
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
if (append)
wr(&append, 1), column++;
#endif
}
}
/**
**
** List the given file or directory, expanding a directory
** to show its contents if required
**
**/
static int list_item(const char *name)
{
struct stat info;
DIR *dir;
struct dirent *entry;
char fullname[MAXNAMLEN + 1], *fnend;
1999-10-05 16:24:54 +00:00
if (lstat(name, &info))
goto listerr;
if (!S_ISDIR(info.st_mode) || (opts & DIR_NOLIST)) {
2000-02-11 21:55:04 +00:00
#ifdef BB_FEATURE_AUTOWIDTH
column_width = toplevel_column_width;
#endif
1999-11-07 07:38:08 +00:00
list_single(name, &info, name);
1999-10-05 16:24:54 +00:00
return 0;
}
/* Otherwise, it's a directory we want to list the contents of */
if (opts & DISP_DIRNAME) { /* identify the directory */
1999-10-05 16:24:54 +00:00
if (column)
wr("\n\n", 2), column = 0;
wr(name, strlen(name));
wr(":\n", 2);
}
1999-10-05 16:24:54 +00:00
dir = opendir(name);
if (!dir)
goto listerr;
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_AUTOWIDTH
1999-10-05 16:24:54 +00:00
column_width = 0;
while ((entry = readdir(dir)) != NULL) {
short w = strlen(entry->d_name);
1999-10-05 16:24:54 +00:00
if (column_width < w)
column_width = w;
}
#ifdef HAS_REWINDDIR
rewinddir(dir);
#else
closedir(dir);
dir = opendir(name);
if (!dir)
goto listerr;
1999-10-05 16:24:54 +00:00
#endif
#endif
/* List the contents */
strcpy(fullname, name); /* *** ignore '.' by itself */
fnend = fullname + strlen(fullname);
1999-10-05 16:24:54 +00:00
if (fnend[-1] != '/')
*fnend++ = '/';
1999-10-05 16:24:54 +00:00
while ((entry = readdir(dir)) != NULL) {
const char *en = entry->d_name;
1999-10-05 16:24:54 +00:00
if (en[0] == '.') {
if (!en[1] || (en[1] == '.' && !en[2])) { /* . or .. */
1999-10-05 16:24:54 +00:00
if (!(opts & DISP_DOT))
continue;
} else if (!(opts & DISP_HIDDEN))
1999-10-05 16:24:54 +00:00
continue;
}
/* FIXME: avoid stat if not required */
strcpy(fnend, entry->d_name);
if (lstat(fullname, &info))
goto direrr; /* (shouldn't fail) */
1999-11-07 07:38:08 +00:00
list_single(entry->d_name, &info, fullname);
1999-10-05 16:24:54 +00:00
}
closedir(dir);
2000-02-11 21:55:04 +00:00
if (opts & DISP_DIRNAME) { /* separate the directory */
if (column) {
wr("\n", 1);
}
wr("\n", 1);
column = 0;
}
1999-10-05 16:24:54 +00:00
return 0;
direrr:
closedir(dir);
listerr:
1999-10-05 16:24:54 +00:00
newline();
1999-10-06 09:04:55 +00:00
perror(name);
1999-10-05 16:24:54 +00:00
return 1;
}
1999-10-19 22:26:25 +00:00
static const char ls_usage[] = "ls [-1a"
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
"c"
#endif
"d"
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
"e"
#endif
"ln"
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
"p"
#endif
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
1999-10-05 16:24:54 +00:00
"u"
#endif
"xAC"
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
1999-10-05 16:24:54 +00:00
"F"
#endif
#ifdef FEATURE_RECURSIVE
"R"
#endif
"] [filenames...]\n";
extern int ls_main(int argc, char **argv)
1999-10-05 16:24:54 +00:00
{
int argi = 1, i;
1999-10-05 16:24:54 +00:00
/* process options */
while (argi < argc && argv[argi][0] == '-') {
const char *p = &argv[argi][1];
if (!*p)
goto print_usage_message; /* "-" by itself not allowed */
1999-10-05 16:24:54 +00:00
if (*p == '-') {
if (!p[1]) { /* "--" forces end of options */
1999-10-05 16:24:54 +00:00
argi++;
break;
}
/* it's a long option name - we don't support them */
goto print_usage_message;
}
1999-10-05 16:24:54 +00:00
while (*p)
switch (*p++) {
case 'l':
display_fmt = FMT_LONG;
break;
case '1':
display_fmt = FMT_SINGLE;
break;
case 'x':
display_fmt = FMT_ROWS;
break;
case 'C':
display_fmt = FMT_COLUMNS;
break;
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_FILETYPES
case 'p':
opts |= DISP_FTYPE;
break;
case 'F':
opts |= DISP_FTYPE | DISP_EXEC;
break;
1999-10-05 16:24:54 +00:00
#endif
case 'A':
opts |= DISP_HIDDEN;
break;
case 'a':
opts |= DISP_HIDDEN | DISP_DOT;
break;
case 'n':
opts |= DISP_NUMERIC;
break;
case 'd':
opts |= DIR_NOLIST;
break;
1999-10-05 16:24:54 +00:00
#ifdef FEATURE_RECURSIVE
case 'R':
opts |= DIR_RECURSE;
break;
1999-10-05 16:24:54 +00:00
#endif
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_LS_TIMESTAMPS
case 'u':
time_fmt = TIME_ACCESS;
break;
case 'c':
time_fmt = TIME_CHANGE;
break;
case 'e':
opts |= DISP_FULLTIME;
break;
1999-10-05 16:24:54 +00:00
#endif
default:
goto print_usage_message;
1999-10-05 16:24:54 +00:00
}
1999-10-05 16:24:54 +00:00
argi++;
}
/* choose a display format */
if (display_fmt == FMT_AUTO)
1999-11-19 02:38:58 +00:00
display_fmt = isatty(fileno(stdout)) ? FMT_COLUMNS : FMT_SINGLE;
1999-10-05 16:24:54 +00:00
if (argi < argc - 1)
opts |= DISP_DIRNAME; /* 2 or more items? label directories */
1999-11-19 05:42:32 +00:00
#ifdef BB_FEATURE_AUTOWIDTH
1999-10-05 16:24:54 +00:00
/* could add a -w option and/or TIOCGWINSZ call */
if (terminal_width < 1)
terminal_width = TERMINAL_WIDTH;
1999-10-05 16:24:54 +00:00
for (i = argi; i < argc; i++) {
int len = strlen(argv[i]);
2000-02-11 21:55:04 +00:00
if (toplevel_column_width < len)
toplevel_column_width = len;
1999-10-05 16:24:54 +00:00
}
#endif
/* process files specified, or current directory if none */
i = 0;
1999-10-05 16:24:54 +00:00
if (argi == argc)
i = list_item(".");
while (argi < argc)
i |= list_item(argv[argi++]);
newline();
exit(i);
1999-10-05 16:24:54 +00:00
print_usage_message:
usage(ls_usage);
exit(FALSE);
1999-10-05 16:24:54 +00:00
}