sbase/ls.c

250 lines
4.7 KiB
C
Raw Normal View History

2011-05-26 03:01:20 +00:00
/* See LICENSE file for copyright and license details. */
#include <dirent.h>
#include <errno.h>
#include <grp.h>
#include <pwd.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <unistd.h>
#include <sys/stat.h>
#include "util.h"
typedef struct {
char *name;
mode_t mode;
nlink_t nlink;
uid_t uid;
gid_t gid;
off_t size;
time_t mtime;
} Entry;
2013-07-18 19:14:53 +00:00
static int entcmp(const void *, const void *);
static void ls(Entry *);
2011-05-26 03:01:20 +00:00
static void lsdir(const char *);
2013-07-18 19:14:53 +00:00
static void mkent(Entry *, char *, bool);
2011-05-26 03:01:20 +00:00
static void output(Entry *);
static bool aflag = false;
2011-05-26 03:12:49 +00:00
static bool dflag = false;
2011-05-26 03:01:20 +00:00
static bool lflag = false;
static bool tflag = false;
2013-07-18 19:14:53 +00:00
static bool Uflag = false;
2011-05-26 04:03:37 +00:00
static bool first = true;
2011-05-26 03:01:20 +00:00
static bool many;
2013-06-14 18:20:47 +00:00
static void
usage(void)
{
2013-07-18 19:14:53 +00:00
eprintf("usage: %s [-adltU] [FILE...]\n", argv0);
2013-06-14 18:20:47 +00:00
}
2011-05-26 03:01:20 +00:00
int
main(int argc, char *argv[])
{
2013-07-18 19:14:53 +00:00
int i;
2011-06-16 00:13:46 +00:00
Entry *ents;
2011-05-26 03:01:20 +00:00
2013-06-14 18:20:47 +00:00
ARGBEGIN {
case 'a':
aflag = true;
break;
case 'd':
dflag = true;
break;
case 'l':
lflag = true;
break;
case 't':
tflag = true;
break;
2013-07-18 19:14:53 +00:00
case 'U':
Uflag = true;
break;
2013-06-14 18:20:47 +00:00
default:
usage();
} ARGEND;
many = (argc > 1);
2013-07-18 19:14:53 +00:00
if(argc == 0)
*--argv = ".", argc++;
2013-06-14 18:20:47 +00:00
2013-07-18 19:14:53 +00:00
if(!(ents = malloc(argc * sizeof *ents)))
eprintf("malloc:");
for(i = 0; i < argc; i++)
mkent(&ents[i], argv[i], true);
qsort(ents, argc, sizeof *ents, entcmp);
for(i = 0; i < argc; i++)
ls(&ents[i]);
2013-06-14 18:20:47 +00:00
return 0;
2011-05-26 03:01:20 +00:00
}
int
2013-07-18 19:14:53 +00:00
entcmp(const void *va, const void *vb)
2011-05-26 03:01:20 +00:00
{
2013-07-18 19:14:53 +00:00
const Entry *a = va, *b = vb;
2011-05-26 03:01:20 +00:00
if(tflag)
return b->mtime - a->mtime;
else
return strcmp(a->name, b->name);
}
void
2013-07-18 19:14:53 +00:00
ls(Entry *ent)
2011-05-26 03:01:20 +00:00
{
2013-07-18 19:14:53 +00:00
if(S_ISDIR(ent->mode) && !dflag) {
lsdir(ent->name);
} else {
output(ent);
}
2011-05-26 03:01:20 +00:00
}
void
lsdir(const char *path)
{
2011-05-26 03:17:06 +00:00
char *cwd, *p;
2011-05-26 03:01:20 +00:00
long i, n = 0;
struct dirent *d;
DIR *dp;
2013-07-18 19:14:53 +00:00
Entry ent, *ents = NULL;
2011-05-26 03:01:20 +00:00
2011-05-26 03:17:06 +00:00
cwd = agetcwd();
2011-05-26 03:01:20 +00:00
if(!(dp = opendir(path)))
eprintf("opendir %s:", path);
2011-06-04 11:20:41 +00:00
if(chdir(path) == -1)
2011-05-26 03:01:20 +00:00
eprintf("chdir %s:", path);
2011-05-26 04:03:37 +00:00
if(many) {
if(!first)
putchar('\n');
2011-05-26 03:01:20 +00:00
printf("%s:\n", path);
2011-05-26 04:03:37 +00:00
first = false;
}
2013-07-18 19:14:53 +00:00
while((d = readdir(dp))) {
if(d->d_name[0] == '.' && !aflag)
continue;
if(Uflag){
mkent(&ent, d->d_name, lflag);
output(&ent);
} else {
if(!(ents = realloc(ents, ++n * sizeof *ents)))
eprintf("realloc:");
if(!(p = malloc(strlen(d->d_name)+1)))
eprintf("malloc:");
strcpy(p, d->d_name);
mkent(&ents[n-1], p, tflag || lflag);
}
}
closedir(dp);
if(!Uflag){
qsort(ents, n, sizeof *ents, entcmp);
for(i = 0; i < n; i++) {
output(&ents[i]);
free(ents[i].name);
}
2011-05-26 03:01:20 +00:00
}
2011-06-04 11:20:41 +00:00
if(chdir(cwd) == -1)
2011-05-26 03:17:06 +00:00
eprintf("chdir %s:", cwd);
2011-05-26 03:01:20 +00:00
free(ents);
2011-05-26 03:17:06 +00:00
free(cwd);
2011-05-26 03:01:20 +00:00
}
void
2013-07-18 19:14:53 +00:00
mkent(Entry *ent, char *path, bool dostat)
2011-05-26 03:01:20 +00:00
{
struct stat st;
2013-07-18 19:14:53 +00:00
ent->name = path;
if(!dostat)
return;
2011-06-04 11:20:41 +00:00
if(lstat(path, &st) == -1)
2011-05-26 03:01:20 +00:00
eprintf("lstat %s:", path);
ent->mode = st.st_mode;
ent->nlink = st.st_nlink;
ent->uid = st.st_uid;
ent->gid = st.st_gid;
ent->size = st.st_size;
ent->mtime = st.st_mtime;
}
void
output(Entry *ent)
{
2011-05-27 22:56:43 +00:00
char buf[BUFSIZ], *fmt;
char mode[] = "----------";
2011-06-04 11:40:05 +00:00
ssize_t len;
2011-05-26 03:01:20 +00:00
struct group *gr;
struct passwd *pw;
if(!lflag) {
puts(ent->name);
return;
}
if(S_ISREG(ent->mode))
mode[0] = '-';
else if(S_ISBLK(ent->mode))
mode[0] = 'b';
else if(S_ISCHR(ent->mode))
mode[0] = 'c';
else if(S_ISDIR(ent->mode))
mode[0] = 'd';
else if(S_ISFIFO(ent->mode))
mode[0] = 'p';
else if(S_ISLNK(ent->mode))
mode[0] = 'l';
else if(S_ISSOCK(ent->mode))
mode[0] = 's';
else
mode[0] = '?';
2011-05-27 22:56:43 +00:00
if(ent->mode & S_IRUSR) mode[1] = 'r';
if(ent->mode & S_IWUSR) mode[2] = 'w';
if(ent->mode & S_IXUSR) mode[3] = 'x';
if(ent->mode & S_IRGRP) mode[4] = 'r';
if(ent->mode & S_IWGRP) mode[5] = 'w';
if(ent->mode & S_IXGRP) mode[6] = 'x';
if(ent->mode & S_IROTH) mode[7] = 'r';
if(ent->mode & S_IWOTH) mode[8] = 'w';
if(ent->mode & S_IXOTH) mode[9] = 'x';
2011-05-28 14:37:42 +00:00
if(ent->mode & S_ISUID) mode[3] = (mode[3] == 'x') ? 's' : 'S';
if(ent->mode & S_ISGID) mode[6] = (mode[6] == 'x') ? 's' : 'S';
2011-05-26 03:01:20 +00:00
errno = 0;
pw = getpwuid(ent->uid);
if(errno)
eprintf("getpwuid %d:", ent->uid);
else if(!pw)
eprintf("getpwuid %d: no such user\n", ent->uid);
errno = 0;
gr = getgrgid(ent->gid);
if(errno)
eprintf("getgrgid %d:", ent->gid);
else if(!gr)
eprintf("getgrgid %d: no such group\n", ent->gid);
if(time(NULL) > ent->mtime + (180*24*60*60)) /* 6 months ago? */
2011-06-04 11:40:05 +00:00
fmt = "%b %d %Y";
2011-05-26 03:01:20 +00:00
else
fmt = "%b %d %H:%M";
strftime(buf, sizeof buf, fmt, localtime(&ent->mtime));
2011-06-16 00:13:46 +00:00
printf("%s %2ld %-4s %-5s %6lu %s %s", mode, (long)ent->nlink, pw->pw_name,
2011-05-26 03:12:49 +00:00
gr->gr_name, (unsigned long)ent->size, buf, ent->name);
2011-06-04 11:40:05 +00:00
if(S_ISLNK(ent->mode)) {
if((len = readlink(ent->name, buf, sizeof buf)) == -1)
eprintf("readlink %s:", ent->name);
buf[len] = '\0';
printf(" -> %s", buf);
}
putchar('\n');
2011-05-26 03:01:20 +00:00
}
2013-06-14 18:20:47 +00:00