sbase/ls.c

232 lines
4.5 KiB
C
Raw Normal View History

2011-05-25 23:01:20 -04: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;
static int entcmp(Entry *, Entry *);
2011-05-25 23:12:49 -04:00
static void ls(char *);
2011-05-25 23:01:20 -04:00
static void lsdir(const char *);
static void mkent(Entry *, char *);
static void output(Entry *);
static bool aflag = false;
2011-05-25 23:12:49 -04:00
static bool dflag = false;
2011-05-25 23:01:20 -04:00
static bool lflag = false;
static bool tflag = false;
2011-05-26 00:03:37 -04:00
static bool first = true;
2011-05-25 23:01:20 -04:00
static bool many;
int
main(int argc, char *argv[])
{
char c;
2011-06-15 20:13:46 -04:00
int i, n;
Entry *ents;
2011-05-25 23:01:20 -04:00
while((c = getopt(argc, argv, "adlt")) != -1)
switch(c) {
case 'a':
aflag = true;
break;
case 'd':
dflag = true;
break;
case 'l':
lflag = true;
break;
case 't':
tflag = true;
break;
default:
exit(EXIT_FAILURE);
}
many = (argc > optind+1);
2011-06-15 20:13:46 -04:00
if((n = argc - optind) > 0) {
2012-01-18 19:04:04 -05:00
if(!(ents = malloc(n * sizeof *ents)))
2011-06-15 20:13:46 -04:00
eprintf("malloc:");
for(i = 0; i < n; i++)
mkent(&ents[i], argv[optind+i]);
qsort(ents, n, sizeof *ents, (int (*)(const void *, const void *))entcmp);
for(i = 0; i < n; i++)
ls(ents[i].name);
}
else
2011-05-25 23:12:49 -04:00
ls(".");
2011-05-25 23:01:20 -04:00
return EXIT_SUCCESS;
}
int
entcmp(Entry *a, Entry *b)
{
if(tflag)
return b->mtime - a->mtime;
else
return strcmp(a->name, b->name);
}
void
2011-05-25 23:12:49 -04:00
ls(char *path)
2011-05-25 23:01:20 -04:00
{
Entry ent;
mkent(&ent, path);
2011-05-25 23:12:49 -04:00
if(S_ISDIR(ent.mode) && !dflag)
2011-05-25 23:01:20 -04:00
lsdir(path);
else
output(&ent);
}
void
lsdir(const char *path)
{
2011-05-25 23:17:06 -04:00
char *cwd, *p;
2011-05-25 23:01:20 -04:00
long i, n = 0;
struct dirent *d;
DIR *dp;
Entry *ents = NULL;
2011-05-25 23:17:06 -04:00
cwd = agetcwd();
2011-05-25 23:01:20 -04:00
if(!(dp = opendir(path)))
eprintf("opendir %s:", path);
2011-06-04 07:20:41 -04:00
if(chdir(path) == -1)
2011-05-25 23:01:20 -04:00
eprintf("chdir %s:", path);
while((d = readdir(dp))) {
if(d->d_name[0] == '.' && !aflag)
continue;
if(!(ents = realloc(ents, ++n * sizeof *ents)))
eprintf("realloc:");
2011-05-26 01:39:12 -04:00
if(!(p = malloc(strlen(d->d_name)+1)))
eprintf("malloc:");
strcpy(p, d->d_name);
2011-05-25 23:01:20 -04:00
mkent(&ents[n-1], p);
}
closedir(dp);
qsort(ents, n, sizeof *ents, (int (*)(const void *, const void *))entcmp);
2011-05-26 00:03:37 -04:00
if(many) {
if(!first)
putchar('\n');
2011-05-25 23:01:20 -04:00
printf("%s:\n", path);
2011-05-26 00:03:37 -04:00
first = false;
}
2011-05-25 23:01:20 -04:00
for(i = 0; i < n; i++) {
output(&ents[i]);
free(ents[i].name);
}
2011-06-04 07:20:41 -04:00
if(chdir(cwd) == -1)
2011-05-25 23:17:06 -04:00
eprintf("chdir %s:", cwd);
2011-05-25 23:01:20 -04:00
free(ents);
2011-05-25 23:17:06 -04:00
free(cwd);
2011-05-25 23:01:20 -04:00
}
void
mkent(Entry *ent, char *path)
{
struct stat st;
2011-06-04 07:20:41 -04:00
if(lstat(path, &st) == -1)
2011-05-25 23:01:20 -04:00
eprintf("lstat %s:", path);
ent->name = 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 18:56:43 -04:00
char buf[BUFSIZ], *fmt;
char mode[] = "----------";
2011-06-04 07:40:05 -04:00
ssize_t len;
2011-05-25 23:01:20 -04: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 18:56:43 -04: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 10:37:42 -04: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-25 23:01:20 -04: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 07:40:05 -04:00
fmt = "%b %d %Y";
2011-05-25 23:01:20 -04:00
else
fmt = "%b %d %H:%M";
strftime(buf, sizeof buf, fmt, localtime(&ent->mtime));
2011-06-15 20:13:46 -04:00
printf("%s %2ld %-4s %-5s %6lu %s %s", mode, (long)ent->nlink, pw->pw_name,
2011-05-25 23:12:49 -04:00
gr->gr_name, (unsigned long)ent->size, buf, ent->name);
2011-06-04 07:40:05 -04: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-25 23:01:20 -04:00
}