X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=coreutils%2Fls.c;h=64ec0fee69db3f23012a86009a01e25030c07fcb;hb=18d8a3b7e314036b915ba9e537832d4a52db75bc;hp=0558bb227651c0dec22e8e571cccd9fcc9975687;hpb=08b1034f4f0b910660a8b1a537f86462fa41ebad;p=oweals%2Fbusybox.git diff --git a/coreutils/ls.c b/coreutils/ls.c index 0558bb227..64ec0fee6 100644 --- a/coreutils/ls.c +++ b/coreutils/ls.c @@ -1,7 +1,8 @@ +/* vi: set sw=4 ts=4: */ /* * tiny-ls.c version 0.1.0: A minimalist 'ls' * Copyright (C) 1996 Brian Candler - * + * * 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 @@ -20,7 +21,7 @@ /* * 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 + * (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 @@ -28,10 +29,10 @@ * it more portable. * * KNOWN BUGS: - * 1. messy output if you mix files and directories on the command line - * 2. ls -l of a directory doesn't give "total " header - * 3. ls of a symlink to a directory doesn't list directory contents - * 4. hidden files can make column width too large + * 1. ls -l of a directory doesn't give "total " header + * 2. ls of a symlink to a directory doesn't list directory contents + * 3. 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 @@ -40,38 +41,30 @@ * 1. requires lstat (BSD) - how do you do it without? */ -#define FEATURE_USERNAME /* show username/groupnames (bypasses libc6 NSS) */ -#define FEATURE_TIMESTAMPS /* show file timestamps */ -#define FEATURE_AUTOWIDTH /* calculate terminal & column widths */ -#define FEATURE_FILETYPECHAR /* enable -p and -F */ - -#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 */ -#define HAS_REWINDDIR +enum { + TERMINAL_WIDTH = 80, /* use 79 if terminal has linefold bug */ + COLUMN_GAP = 2, /* includes the file type char */ +}; /************************************************************************/ -#include "internal.h" -#if !defined(__GLIBC__) && (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1) -# include -#else -# include -#endif +#include #include #include #include #include #include #include -#ifdef FEATURE_TIMESTAMPS -#include -#endif +#include +#include +#include +#include +#include +#include +#include "busybox.h" -#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f) -#define TYPECHAR(mode) ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)]) -#ifdef FEATURE_FILETYPECHAR -#define APPCHAR(mode) ("\0|\0\0/\0\0\0\0\0@\0=\0\0\0" [TYPEINDEX(mode)]) +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS +#include #endif #ifndef MAJOR @@ -79,427 +72,975 @@ #define MINOR(dev) ((dev)&0xff) #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) */ - -#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) */ - -static unsigned char display_fmt = FMT_AUTO; -static unsigned short opts = 0; -static unsigned short column = 0; - -#ifdef FEATURE_AUTOWIDTH -static unsigned short terminal_width = 0, column_width = 0; -#else -#define terminal_width TERMINAL_WIDTH -#define column_width COLUMN_WIDTH +/* what is the overall style of the listing */ +enum { + STYLE_AUTO = 0, + STYLE_LONG = 1, /* one record per line, extended info */ + STYLE_SINGLE = 2, /* one record per line */ + STYLE_COLUMNS = 3 /* fill columns */ +}; + +/* 51306 lrwxrwxrwx 1 root root 2 May 11 01:43 /bin/view -> vi* */ +/* what file information will be listed */ +#define LIST_INO (1<<0) +#define LIST_BLOCKS (1<<1) +#define LIST_MODEBITS (1<<2) +#define LIST_NLINKS (1<<3) +#define LIST_ID_NAME (1<<4) +#define LIST_ID_NUMERIC (1<<5) +#define LIST_SIZE (1<<6) +#define LIST_DEV (1<<7) +#define LIST_DATE_TIME (1<<8) +#define LIST_FULLTIME (1<<9) +#define LIST_FILENAME (1<<10) +#define LIST_SYMLINK (1<<11) +#define LIST_FILETYPE (1<<12) +#define LIST_EXEC (1<<13) + +/* what files will be displayed */ +#define DISP_NORMAL (0) /* show normal filenames */ +#define DISP_DIRNAME (1<<0) /* 2 or more items? label directories */ +#define DISP_HIDDEN (1<<1) /* show filenames starting with . */ +#define DISP_DOT (1<<2) /* show . and .. */ +#define DISP_NOLIST (1<<3) /* show directory as itself, not contents */ +#define DISP_RECURSIVE (1<<4) /* show directory and everything below it */ +#define DISP_ROWS (1<<5) /* print across rows */ + +#ifdef CONFIG_FEATURE_LS_SORTFILES +/* how will the files be sorted */ +static const int SORT_FORWARD = 0; /* sort in reverse order */ +static const int SORT_REVERSE = 1; /* sort in reverse order */ +static const int SORT_NAME = 2; /* sort by file name */ +static const int SORT_SIZE = 3; /* sort by file size */ +static const int SORT_ATIME = 4; /* sort by last access time */ +static const int SORT_CTIME = 5; /* sort by last change time */ +static const int SORT_MTIME = 6; /* sort by last modification time */ +static const int SORT_VERSION = 7; /* sort by version */ +static const int SORT_EXT = 8; /* sort by file name extension */ +static const int SORT_DIR = 9; /* sort by file or directory */ +#endif + +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS +/* which of the three times will be used */ +static const int TIME_MOD = 0; +static const int TIME_CHANGE = 1; +static const int TIME_ACCESS = 2; +#endif + +#define LIST_SHORT (LIST_FILENAME) +#define LIST_ISHORT (LIST_INO | LIST_FILENAME) +#define LIST_LONG (LIST_MODEBITS | LIST_NLINKS | LIST_ID_NAME | LIST_SIZE | \ + LIST_DATE_TIME | LIST_FILENAME | LIST_SYMLINK) +#define LIST_ILONG (LIST_INO | LIST_LONG) + +static const int SPLIT_DIR = 0; +static const int SPLIT_FILE = 1; +static const int SPLIT_SUBDIR = 2; + +#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f) +#define TYPECHAR(mode) ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)]) + +#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined(CONFIG_FEATURE_LS_COLOR) +# define APPCHAR(mode) ("\0|\0\0/\0\0\0\0\0@\0=\0\0\0" [TYPEINDEX(mode)]) +#endif + +/* colored LS support by JaWi, janwillem.janssen@lxtreme.nl */ +#ifdef CONFIG_FEATURE_LS_COLOR +static int show_color = 0; + +#define COLOR(mode) ("\000\043\043\043\042\000\043\043"\ + "\000\000\044\000\043\000\000\040" [TYPEINDEX(mode)]) +#define ATTR(mode) ("\00\00\01\00\01\00\01\00"\ + "\00\00\01\00\01\00\00\01" [TYPEINDEX(mode)]) +#endif + +/* + * a directory entry and its stat info are stored here + */ +struct dnode { /* the basic node */ + char *name; /* the dir entry name */ + char *fullname; /* the dir entry name */ + struct stat dstat; /* the file stat info */ + struct dnode *next; /* point at the next node */ +}; +typedef struct dnode dnode_t; + +static struct dnode **list_dir(const char *); +static struct dnode **dnalloc(int); +static int list_single(struct dnode *); + +static unsigned int disp_opts; +static unsigned int style_fmt; +static unsigned int list_fmt; + +#ifdef CONFIG_FEATURE_LS_SORTFILES +static unsigned int sort_opts; +static unsigned int sort_order; +#endif +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS +static unsigned int time_fmt; +#endif +#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS +static unsigned int follow_links = FALSE; #endif -#ifdef FEATURE_TIMESTAMPS -static unsigned char time_fmt = TIME_MOD; +#ifdef CONFIG_FEATURE_AUTOWIDTH +static unsigned short terminal_width = TERMINAL_WIDTH; +static unsigned short tabstops = COLUMN_GAP; +#else +#define tabstops COLUMN_GAP +#define terminal_width TERMINAL_WIDTH #endif -#define wr(data,len) fwrite(data, 1, len, stdout) +static int status = EXIT_SUCCESS; + +#ifdef CONFIG_FEATURE_HUMAN_READABLE +static unsigned long ls_disp_hr = 0; +#endif -static void writenum(long val, short minwidth) +static struct dnode *my_stat(char *fullname, char *name) { - char scratch[128]; - - char *p = scratch + sizeof(scratch); - short len = 0; - short neg = (val < 0); - - if (neg) val = -val; - do - *--p = (val % 10) + '0', len++, val /= 10; - while (val); - if (neg) - *--p = '-', len++; - while (len < minwidth) - *--p = ' ', len++; - wr(p, len); - column += len; + struct stat dstat; + struct dnode *cur; + +#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS + if (follow_links) { + if (stat(fullname, &dstat)) { + perror_msg("%s", fullname); + status = EXIT_FAILURE; + return 0; + } + } else +#endif + if (lstat(fullname, &dstat)) { + perror_msg("%s", fullname); + status = EXIT_FAILURE; + return 0; + } + + cur = (struct dnode *) xmalloc(sizeof(struct dnode)); + cur->fullname = fullname; + cur->name = name; + cur->dstat = dstat; + return cur; } -static void newline(void) +/*----------------------------------------------------------------------*/ +#ifdef CONFIG_FEATURE_LS_COLOR +static char fgcolor(mode_t mode) { - if (column > 0) { - wr("\n", 1); - column = 0; + /* Check wheter the file is existing (if so, color it red!) */ + if (errno == ENOENT) { + return '\037'; } + if (LIST_EXEC && S_ISREG(mode) + && (mode & (S_IXUSR | S_IXGRP | S_IXOTH))) + return COLOR(0xF000); /* File is executable ... */ + return COLOR(mode); } -static void tab(short col) +/*----------------------------------------------------------------------*/ +static char bgcolor(mode_t mode) { - static const char spaces[] = " "; - #define nspaces ((sizeof spaces)-1) /* null terminator! */ - - 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 + if (LIST_EXEC && S_ISREG(mode) + && (mode & (S_IXUSR | S_IXGRP | S_IXOTH))) + return ATTR(0xF000); /* File is executable ... */ + return ATTR(mode); } +#endif -#ifdef FEATURE_FILETYPECHAR +/*----------------------------------------------------------------------*/ +#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined(CONFIG_FEATURE_LS_COLOR) static char append_char(mode_t mode) { - if (!(opts & DISP_FTYPE)) + if (!(list_fmt & LIST_FILETYPE)) return '\0'; - if ((opts & DISP_EXEC) && S_ISREG(mode) && (mode & (S_IXUSR|S_IXGRP|S_IXOTH))) + if ((list_fmt & LIST_EXEC) && S_ISREG(mode) + && (mode & (S_IXUSR | S_IXGRP | S_IXOTH))) return '*'; return APPCHAR(mode); } #endif -/** - ** - ** Display a file or directory as a single item - ** (in either long or short format) - ** - **/ +/*----------------------------------------------------------------------*/ +static int is_subdir(struct dnode *dn) +{ + return (S_ISDIR(dn->dstat.st_mode) && strcmp(dn->name, ".") != 0 && + strcmp(dn->name, "..") != 0); +} -static void list_single(const char *name, struct stat *info, const char *fullname) +static int countdirs(struct dnode **dn, int nfiles) { - char scratch[PATH_MAX]; - short len = strlen(name); -#ifdef FEATURE_FILETYPECHAR - char append = append_char(info->st_mode); -#endif - - if (display_fmt == FMT_LONG) { - mode_t mode = info->st_mode; - newline(); - wr(modeString(mode), 10); - column=10; - writenum((long)info->st_nlink,(short)5); - fputs(" ", stdout); -#ifdef FEATURE_USERNAME - if (!(opts & DISP_NUMERIC)) { - scratch[8]='\0'; - my_getpwuid( scratch, info->st_uid); - if (*scratch) - fputs(scratch, stdout); - else - writenum((long)info->st_uid,(short)0); - } else -#endif - writenum((long)info->st_uid,(short)0); - tab(16); -#ifdef FEATURE_USERNAME - if (!(opts & DISP_NUMERIC)) { - scratch[8]='\0'; - my_getgrgid( scratch, info->st_gid); - if (*scratch) - fputs(scratch, stdout); - else - writenum((long)info->st_gid,(short)0); - } else -#endif - writenum((long)info->st_gid,(short)0); - tab(17); - if (S_ISBLK(mode) || S_ISCHR(mode)) { - writenum((long)MAJOR(info->st_rdev),(short)3); - fputs(", ", stdout); - writenum((long)MINOR(info->st_rdev),(short)3); - } - else - writenum((long)info->st_size,(short)8); - fputs(" ", stdout); -#ifdef FEATURE_TIMESTAMPS - { - time_t cal; - char *string; - - switch(time_fmt) { - case TIME_CHANGE: - cal=info->st_ctime; break; - case TIME_ACCESS: - cal=info->st_atime; break; - default: - cal=info->st_mtime; break; - } - string=ctime(&cal); - if (opts & DISP_FULLTIME) - wr(string,24); - else { - time_t age = time(NULL) - cal; - wr(string+4,7); /* mmm_dd_ */ - if(age < 3600L*24*365/2 && age > -15*60) - /* hh:mm if less than 6 months old */ - wr(string+11,5); - else - /* _yyyy otherwise */ - wr(string+19,5); - } - wr(" ", 1); + int i, dirs; + + if (dn == NULL || nfiles < 1) + return (0); + dirs = 0; + for (i = 0; i < nfiles; i++) { + if (S_ISDIR(dn[i]->dstat.st_mode)) + dirs++; + } + return (dirs); +} + +static int countsubdirs(struct dnode **dn, int nfiles) +{ + int i, subdirs; + + if (dn == NULL || nfiles < 1) + return 0; + subdirs = 0; + for (i = 0; i < nfiles; i++) + if (is_subdir(dn[i])) + subdirs++; + return subdirs; +} + +static int countfiles(struct dnode **dnp) +{ + int nfiles; + struct dnode *cur; + + if (dnp == NULL) + return (0); + nfiles = 0; + for (cur = dnp[0]; cur->next != NULL; cur = cur->next) + nfiles++; + nfiles++; + return (nfiles); +} + +/* get memory to hold an array of pointers */ +static struct dnode **dnalloc(int num) +{ + struct dnode **p; + + if (num < 1) + return (NULL); + + p = (struct dnode **) xcalloc((size_t) num, + (size_t) (sizeof(struct dnode *))); + return (p); +} + +#ifdef CONFIG_FEATURE_LS_RECURSIVE +static void dfree(struct dnode **dnp) +{ + struct dnode *cur, *next; + + if (dnp == NULL) + return; + + cur = dnp[0]; + while (cur != NULL) { + free(cur->fullname); /* free the filename */ + next = cur->next; + free(cur); /* free the dnode */ + cur = next; + } + free(dnp); /* free the array holding the dnode pointers */ +} +#endif + +static struct dnode **splitdnarray(struct dnode **dn, int nfiles, int which) +{ + int dncnt, i, d; + struct dnode **dnp; + + if (dn == NULL || nfiles < 1) + return (NULL); + + /* count how many dirs and regular files there are */ + if (which == SPLIT_SUBDIR) + dncnt = countsubdirs(dn, nfiles); + else { + dncnt = countdirs(dn, nfiles); /* assume we are looking for dirs */ + if (which == SPLIT_FILE) + dncnt = nfiles - dncnt; /* looking for files */ + } + + /* allocate a file array and a dir array */ + dnp = dnalloc(dncnt); + + /* copy the entrys into the file or dir array */ + for (d = i = 0; i < nfiles; i++) { + if (which == SPLIT_DIR) { + if (S_ISDIR(dn[i]->dstat.st_mode)) { + dnp[d++] = dn[i]; + } /* else skip the file */ + } else if (which == SPLIT_SUBDIR) { + if (is_subdir(dn[i])) { + dnp[d++] = dn[i]; + } /* else skip the file or dir */ + } else { + if (!(S_ISDIR(dn[i]->dstat.st_mode))) { + dnp[d++] = dn[i]; + } /* else skip the dir */ } + } + return (dnp); +} + +/*----------------------------------------------------------------------*/ +#ifdef CONFIG_FEATURE_LS_SORTFILES +static int sortcmp(struct dnode *d1, struct dnode *d2) +{ + int cmp, dif; + + cmp = 0; + if (sort_opts == SORT_SIZE) { + dif = (int) (d1->dstat.st_size - d2->dstat.st_size); + } else if (sort_opts == SORT_ATIME) { + dif = (int) (d1->dstat.st_atime - d2->dstat.st_atime); + } else if (sort_opts == SORT_CTIME) { + dif = (int) (d1->dstat.st_ctime - d2->dstat.st_ctime); + } else if (sort_opts == SORT_MTIME) { + dif = (int) (d1->dstat.st_mtime - d2->dstat.st_mtime); + } else if (sort_opts == SORT_DIR) { + dif = S_ISDIR(d1->dstat.st_mode) - S_ISDIR(d2->dstat.st_mode); + /* } else if (sort_opts == SORT_VERSION) { */ + /* } else if (sort_opts == SORT_EXT) { */ + } else { /* assume SORT_NAME */ + dif = 0; + } + + if (dif > 0) + cmp = -1; + if (dif < 0) + cmp = 1; + if (dif == 0) { + /* sort by name- may be a tie_breaker for time or size cmp */ +#ifdef CONFIG_LOCALE_SUPPORT + dif = strcoll(d1->name, d2->name); #else - fputs("--- -- ----- ", stdout); -#endif - wr(name, len); - if (S_ISLNK(mode)) { - wr(" -> ", 4); - len = readlink(fullname, scratch, sizeof scratch); - if (len > 0) fwrite(scratch, 1, len, stdout); -#ifdef FEATURE_FILETYPECHAR - /* show type of destination */ - if (opts & DISP_FTYPE) { - if (!stat(fullname, info)) { - append = append_char(info->st_mode); - if (append) - fputc(append, stdout); - } - } + dif = strcmp(d1->name, d2->name); #endif + if (dif > 0) + cmp = 1; + if (dif < 0) + cmp = -1; + } + + if (sort_order == SORT_REVERSE) { + cmp = -1 * cmp; + } + return (cmp); +} + +/*----------------------------------------------------------------------*/ +static void shellsort(struct dnode **dn, int size) +{ + struct dnode *temp; + int gap, i, j; + + /* shell short the array */ + if (dn == NULL || size < 2) + return; + + for (gap = size / 2; gap > 0; gap /= 2) { + for (i = gap; i < size; i++) { + for (j = i - gap; j >= 0; j -= gap) { + if (sortcmp(dn[j], dn[j + gap]) <= 0) + break; + /* they are out of order, swap them */ + temp = dn[j]; + dn[j] = dn[j + gap]; + dn[j + gap] = temp; + } } -#ifdef FEATURE_FILETYPECHAR - else if (append) - wr(&append, 1); + } +} #endif + +/*----------------------------------------------------------------------*/ +static void showfiles(struct dnode **dn, int nfiles) +{ + int i, ncols, nrows, row, nc; + int column = 0; + int nexttab = 0; + int column_width = 0; /* for STYLE_LONG and STYLE_SINGLE not used */ + + if (dn == NULL || nfiles < 1) + return; + + switch (style_fmt) { + case STYLE_LONG: /* one record per line, extended info */ + case STYLE_SINGLE: /* one record per line */ + ncols = 1; + break; + default: + /* find the longest file name- use that as the column width */ + for (i = 0; i < nfiles; i++) { + int len = strlen(dn[i]->name) + + ((list_fmt & LIST_INO) ? 8 : 0) + + ((list_fmt & LIST_BLOCKS) ? 5 : 0); + if (column_width < len) + column_width = len; + } + column_width += tabstops; + ncols = (int) (terminal_width / column_width); + } + + if (ncols > 1) { + nrows = nfiles / ncols; + if ((nrows * ncols) < nfiles) + nrows++; /* round up fractionals */ } else { - static short nexttab = 0; - - /* sort out column alignment */ - if (column == 0) - ; /* nothing to do */ - else if (display_fmt == FMT_SINGLE) - newline(); - else { - if (nexttab + column_width > terminal_width -#ifndef FEATURE_AUTOWIDTH - || nexttab + len >= terminal_width -#endif - ) - newline(); - else - tab(nexttab); + nrows = nfiles; + ncols = 1; + } + + for (row = 0; row < nrows; row++) { + for (nc = 0; nc < ncols; nc++) { + /* reach into the array based on the column and row */ + i = (nc * nrows) + row; /* assume display by column */ + if (disp_opts & DISP_ROWS) + i = (row * ncols) + nc; /* display across row */ + if (i < nfiles) { + if (column > 0) { + nexttab -= column; + while (nexttab--) { + putchar(' '); + column++; + } + } + nexttab = column + column_width; + column += list_single(dn[i]); } - /* work out where next column starts */ -#ifdef FEATURE_AUTOWIDTH - /* 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; -#ifdef FEATURE_FILETYPECHAR - if (append) - wr(&append, 1), column++; -#endif + } + putchar('\n'); + column = 0; } } -/** - ** - ** List the given file or directory, expanding a directory - ** to show its contents if required - ** - **/ +/*----------------------------------------------------------------------*/ +static void showdirs(struct dnode **dn, int ndirs) +{ + int i, nfiles; + struct dnode **subdnp; + +#ifdef CONFIG_FEATURE_LS_RECURSIVE + int dndirs; + struct dnode **dnd; +#endif + + if (dn == NULL || ndirs < 1) + return; + + for (i = 0; i < ndirs; i++) { + if (disp_opts & (DISP_DIRNAME | DISP_RECURSIVE)) { + printf("\n%s:\n", dn[i]->fullname); + } + subdnp = list_dir(dn[i]->fullname); + nfiles = countfiles(subdnp); + if (nfiles > 0) { + /* list all files at this level */ +#ifdef CONFIG_FEATURE_LS_SORTFILES + shellsort(subdnp, nfiles); +#endif + showfiles(subdnp, nfiles); +#ifdef CONFIG_FEATURE_LS_RECURSIVE + if (disp_opts & DISP_RECURSIVE) { + /* recursive- list the sub-dirs */ + dnd = splitdnarray(subdnp, nfiles, SPLIT_SUBDIR); + dndirs = countsubdirs(subdnp, nfiles); + if (dndirs > 0) { +#ifdef CONFIG_FEATURE_LS_SORTFILES + shellsort(dnd, dndirs); +#endif + showdirs(dnd, dndirs); + free(dnd); /* free the array of dnode pointers to the dirs */ + } + } + dfree(subdnp); /* free the dnodes and the fullname mem */ +#endif + } + } +} -static int list_item(const char *name) +/*----------------------------------------------------------------------*/ +static struct dnode **list_dir(const char *path) { - struct stat info; - DIR *dir; + struct dnode *dn, *cur, **dnp; struct dirent *entry; - char fullname[MAXNAMLEN+1], *fnend; - - if (lstat(name, &info)) - goto listerr; - - if (!S_ISDIR(info.st_mode) || - (opts & DIR_NOLIST)) { - list_single(name, &info, name); - return 0; - } + DIR *dir; + int i, nfiles; - /* Otherwise, it's a directory we want to list the contents of */ + if (path == NULL) + return (NULL); - if (opts & DISP_DIRNAME) { /* identify the directory */ - if (column) - wr("\n\n", 2), column = 0; - wr(name, strlen(name)); - wr(":\n", 2); + dn = NULL; + nfiles = 0; + dir = opendir(path); + if (dir == NULL) { + perror_msg("%s", path); + status = EXIT_FAILURE; + return (NULL); /* could not open the dir */ } - - dir = opendir(name); - if (!dir) goto listerr; -#ifdef FEATURE_AUTOWIDTH - column_width = 0; while ((entry = readdir(dir)) != NULL) { - short w = strlen(entry->d_name); - if (column_width < w) - column_width = w; + 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] == 0 || ( + entry->d_name[1] == '.' + && entry->d_name[2] == 0)) + && !(disp_opts & DISP_DOT)) + continue; + if (!(disp_opts & DISP_HIDDEN)) + continue; + } + fullname = concat_path_file(path, entry->d_name); + cur = my_stat(fullname, strrchr(fullname, '/') + 1); + if (!cur) + continue; + cur->next = dn; + dn = cur; + nfiles++; } -#ifdef HAS_REWINDDIR - rewinddir(dir); -#else closedir(dir); - dir = opendir(name); - if (!dir) goto listerr; + + /* now that we know how many files there are + ** allocate memory for an array to hold dnode pointers + */ + if (dn == NULL) + return (NULL); + dnp = dnalloc(nfiles); + for (i = 0, cur = dn; i < nfiles; i++) { + dnp[i] = cur; /* save pointer to node in array */ + cur = cur->next; + } + + return (dnp); +} + +/*----------------------------------------------------------------------*/ +static int list_single(struct dnode *dn) +{ + int i, column = 0; + +#ifdef CONFIG_FEATURE_LS_USERNAME + char scratch[16]; +#endif +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + char *filetime; + time_t ttime, age; #endif +#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined (CONFIG_FEATURE_LS_COLOR) + struct stat info; + char append; #endif - /* List the contents */ - - strcpy(fullname,name); /* *** ignore '.' by itself */ - fnend=fullname+strlen(fullname); - if (fnend[-1] != '/') - *fnend++ = '/'; - - while ((entry = readdir(dir)) != NULL) { - const char *en=entry->d_name; - if (en[0] == '.') { - if (!en[1] || (en[1] == '.' && !en[2])) { /* . or .. */ - if (!(opts & DISP_DOT)) - continue; + if (dn->fullname == NULL) + return (0); + +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + ttime = dn->dstat.st_mtime; /* the default time */ + if (time_fmt & TIME_ACCESS) + ttime = dn->dstat.st_atime; + if (time_fmt & TIME_CHANGE) + ttime = dn->dstat.st_ctime; + filetime = ctime(&ttime); +#endif +#ifdef CONFIG_FEATURE_LS_FILETYPES + append = append_char(dn->dstat.st_mode); +#endif + + for (i = 0; i <= 31; i++) { + switch (list_fmt & (1 << i)) { + case LIST_INO: + column += printf("%7ld ", (long int) dn->dstat.st_ino); + break; + case LIST_BLOCKS: +#if _FILE_OFFSET_BITS == 64 + column += printf("%4lld ", dn->dstat.st_blocks >> 1); +#else + column += printf("%4ld ", dn->dstat.st_blocks >> 1); +#endif + break; + case LIST_MODEBITS: + column += printf("%-10s ", (char *) mode_string(dn->dstat.st_mode)); + break; + case LIST_NLINKS: + column += printf("%4ld ", (long) dn->dstat.st_nlink); + break; + case LIST_ID_NAME: +#ifdef CONFIG_FEATURE_LS_USERNAME + my_getpwuid(scratch, dn->dstat.st_uid); + printf("%-8.8s ", scratch); + my_getgrgid(scratch, dn->dstat.st_gid); + printf("%-8.8s", scratch); + column += 17; + break; +#endif + case LIST_ID_NUMERIC: + column += printf("%-8d %-8d", dn->dstat.st_uid, dn->dstat.st_gid); + break; + case LIST_SIZE: + case LIST_DEV: + if (S_ISBLK(dn->dstat.st_mode) || S_ISCHR(dn->dstat.st_mode)) { + column += printf("%4d, %3d ", (int) MAJOR(dn->dstat.st_rdev), + (int) MINOR(dn->dstat.st_rdev)); + } else { +#ifdef CONFIG_FEATURE_HUMAN_READABLE + if (ls_disp_hr == TRUE) { + column += printf("%9s ", + make_human_readable_str(dn->dstat.st_size, 1, 0)); + } else +#endif + { +#if _FILE_OFFSET_BITS == 64 + column += printf("%9lld ", (long long) dn->dstat.st_size); +#else + column += printf("%9ld ", dn->dstat.st_size); +#endif + } + } + break; +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + case LIST_FULLTIME: + case LIST_DATE_TIME: + if (list_fmt & LIST_FULLTIME) { + printf("%24.24s ", filetime); + column += 25; + break; + } + age = time(NULL) - ttime; + printf("%6.6s ", filetime + 4); + if (age < 3600L * 24 * 365 / 2 && age > -15 * 60) { + /* hh:mm if less than 6 months old */ + printf("%5.5s ", filetime + 11); + } else { + printf(" %4.4s ", filetime + 20); + } + column += 13; + break; +#endif + case LIST_FILENAME: +#ifdef CONFIG_FEATURE_LS_COLOR + errno = 0; + if (show_color && !lstat(dn->fullname, &info)) { + printf("\033[%d;%dm", bgcolor(info.st_mode), + fgcolor(info.st_mode)); + } +#endif + column += printf("%s", dn->name); +#ifdef CONFIG_FEATURE_LS_COLOR + if (show_color) { + printf("\033[0m"); + } +#endif + break; + case LIST_SYMLINK: + if (S_ISLNK(dn->dstat.st_mode)) { + char *lpath = xreadlink(dn->fullname); + + if (lpath) { + printf(" -> "); +#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined (CONFIG_FEATURE_LS_COLOR) + if (!stat(dn->fullname, &info)) { + append = append_char(info.st_mode); + } +#endif +#ifdef CONFIG_FEATURE_LS_COLOR + if (show_color) { + errno = 0; + printf("\033[%d;%dm", bgcolor(info.st_mode), + fgcolor(info.st_mode)); + } +#endif + column += printf("%s", lpath) + 4; +#ifdef CONFIG_FEATURE_LS_COLOR + if (show_color) { + printf("\033[0m"); + } +#endif + free(lpath); + } + } + break; +#ifdef CONFIG_FEATURE_LS_FILETYPES + case LIST_FILETYPE: + if (append != '\0') { + printf("%1c", append); + column++; } - else if (!(opts & DISP_HIDDEN)) - continue; + break; +#endif } - /* FIXME: avoid stat if not required */ - strcpy(fnend, entry->d_name); - if (lstat(fullname, &info)) - goto direrr; /* (shouldn't fail) */ - list_single(entry->d_name, &info, fullname); } - closedir(dir); - return 0; -direrr: - closedir(dir); -listerr: - newline(); - perror(name); - return 1; + return column; } -static const char ls_usage[] = "ls [-1a" -#ifdef FEATURE_TIMESTAMPS - "c" -#endif - "d" -#ifdef FEATURE_TIMESTAMPS - "e" +/*----------------------------------------------------------------------*/ +extern int ls_main(int argc, char **argv) +{ + struct dnode **dnf, **dnd; + int dnfiles, dndirs; + struct dnode *dn, *cur, **dnp; + int i, nfiles; + int opt; + int oi, ac; + char **av; + +#ifdef CONFIG_FEATURE_AUTOWIDTH + struct winsize win = { 0, 0, 0, 0 }; #endif - "ln" -#ifdef FEATURE_FILETYPECHAR - "p" + + disp_opts = DISP_NORMAL; + style_fmt = STYLE_AUTO; + list_fmt = LIST_SHORT; +#ifdef CONFIG_FEATURE_LS_SORTFILES + sort_opts = SORT_NAME; + sort_order = SORT_FORWARD; #endif -#ifdef FEATURE_TIMESTAMPS - "u" +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + time_fmt = TIME_MOD; #endif - "xAC" -#ifdef FEATURE_FILETYPECHAR - "F" +#ifdef CONFIG_FEATURE_AUTOWIDTH + ioctl(fileno(stdout), TIOCGWINSZ, &win); + if (win.ws_col > 0) + terminal_width = win.ws_col - 1; #endif -#ifdef FEATURE_RECURSIVE - "R" + nfiles = 0; + +#ifdef CONFIG_FEATURE_LS_COLOR + if (isatty(fileno(stdout))) + show_color = 1; #endif - "] [filenames...]\n"; -extern int -ls_main(int argc, char * * argv) -{ - int argi=1, i; - /* process options */ - while (argi < argc && argv[argi][0] == '-') { - const char *p = &argv[argi][1]; - - if (!*p) goto print_usage_message; /* "-" by itself not allowed */ - if (*p == '-') { - if (!p[1]) { /* "--" forces end of options */ - argi++; - break; - } - /* it's a long option name - we don't support them */ + while ((opt = getopt(argc, argv, "1AaCdgilnsx" +#ifdef CONFIG_FEATURE_AUTOWIDTH + "T:w:" +#endif +#ifdef CONFIG_FEATURE_LS_FILETYPES + "Fp" +#endif +#ifdef CONFIG_FEATURE_LS_RECURSIVE + "R" +#endif +#ifdef CONFIG_FEATURE_LS_SORTFILES + "rSvX" +#endif +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + "cetu" +#endif +#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS + "L" +#endif +#ifdef CONFIG_FEATURE_HUMAN_READABLE + "h" +#endif + "k")) > 0) { + switch (opt) { + case '1': + style_fmt = STYLE_SINGLE; + list_fmt = LIST_SHORT; + break; + case 'A': + disp_opts |= DISP_HIDDEN; + break; + case 'a': + disp_opts |= DISP_HIDDEN | DISP_DOT; + break; + case 'C': + style_fmt = STYLE_COLUMNS; + list_fmt = LIST_SHORT; + break; + case 'd': + disp_opts |= DISP_NOLIST; + break; + case 'g': /* ignore -- for ftp servers */ + break; + case 'i': + list_fmt |= LIST_INO; + break; + case 'l': + style_fmt = STYLE_LONG; + list_fmt |= LIST_LONG; +#ifdef CONFIG_FEATURE_HUMAN_READABLE + ls_disp_hr = FALSE; +#endif + break; + case 'n': + list_fmt |= LIST_ID_NUMERIC; + break; + case 's': + list_fmt |= LIST_BLOCKS; + break; + case 'x': + disp_opts = DISP_ROWS; + break; +#ifdef CONFIG_FEATURE_LS_FILETYPES + case 'F': + list_fmt |= LIST_FILETYPE | LIST_EXEC; + break; + case 'p': + list_fmt |= LIST_FILETYPE; + break; +#endif +#ifdef CONFIG_FEATURE_LS_RECURSIVE + case 'R': + disp_opts |= DISP_RECURSIVE; + break; +#endif +#ifdef CONFIG_FEATURE_LS_SORTFILES + case 'r': + sort_order |= SORT_REVERSE; + break; + case 'S': + sort_opts = SORT_SIZE; + break; + case 'v': + sort_opts = SORT_VERSION; + break; + case 'X': + sort_opts = SORT_EXT; + break; +#endif +#ifdef CONFIG_FEATURE_LS_TIMESTAMPS + case 'e': + list_fmt |= LIST_FULLTIME; + break; + case 'c': + time_fmt = TIME_CHANGE; +#ifdef CONFIG_FEATURE_LS_SORTFILES + sort_opts = SORT_CTIME; +#endif + break; + case 'u': + time_fmt = TIME_ACCESS; +#ifdef CONFIG_FEATURE_LS_SORTFILES + sort_opts = SORT_ATIME; +#endif + break; + case 't': +#ifdef CONFIG_FEATURE_LS_SORTFILES + sort_opts = SORT_MTIME; +#endif + break; +#endif +#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS + case 'L': + follow_links = TRUE; + break; +#endif +#ifdef CONFIG_FEATURE_AUTOWIDTH + case 'T': + tabstops = atoi(optarg); + break; + case 'w': + terminal_width = atoi(optarg); + break; +#endif +#ifdef CONFIG_FEATURE_HUMAN_READABLE + case 'h': + ls_disp_hr = TRUE; + break; +#endif + case 'k': + break; + default: goto print_usage_message; } - - 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; -#ifdef FEATURE_FILETYPECHAR - case 'p': opts |= DISP_FTYPE; break; - case 'F': opts |= DISP_FTYPE|DISP_EXEC; break; -#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; -#ifdef FEATURE_RECURSIVE - case 'R': opts |= DIR_RECURSE; break; -#endif -#ifdef FEATURE_TIMESTAMPS - case 'u': time_fmt = TIME_ACCESS; break; - case 'c': time_fmt = TIME_CHANGE; break; - case 'e': opts |= DISP_FULLTIME; break; -#endif - default: goto print_usage_message; - } - - argi++; } + /* sort out which command line options take precedence */ +#ifdef CONFIG_FEATURE_LS_RECURSIVE + if (disp_opts & DISP_NOLIST) + disp_opts &= ~DISP_RECURSIVE; /* no recurse if listing only dir */ +#endif +#if defined (CONFIG_FEATURE_LS_TIMESTAMPS) && defined (CONFIG_FEATURE_LS_SORTFILES) + if (time_fmt & TIME_CHANGE) + sort_opts = SORT_CTIME; + if (time_fmt & TIME_ACCESS) + sort_opts = SORT_ATIME; +#endif + if (style_fmt != STYLE_LONG) /* only for long list */ + list_fmt &= ~(LIST_ID_NUMERIC|LIST_FULLTIME|LIST_ID_NAME|LIST_ID_NUMERIC); +#ifdef CONFIG_FEATURE_LS_USERNAME + if (style_fmt == STYLE_LONG && (list_fmt & LIST_ID_NUMERIC)) + list_fmt &= ~LIST_ID_NAME; /* don't list names if numeric uid */ +#endif + /* choose a display format */ - if (display_fmt == FMT_AUTO) - display_fmt = isatty(fileno(stdout)) ? FMT_COLUMNS : FMT_SINGLE; - if (argi < argc - 1) - opts |= DISP_DIRNAME; /* 2 or more items? label directories */ -#ifdef FEATURE_AUTOWIDTH - /* could add a -w option and/or TIOCGWINSZ call */ - if (terminal_width < 1) terminal_width = TERMINAL_WIDTH; - - for (i = argi; i < argc; i++) { - int len = strlen(argv[i]); - if (column_width < len) - column_width = len; + if (style_fmt == STYLE_AUTO) + style_fmt = isatty(fileno(stdout)) ? STYLE_COLUMNS : STYLE_SINGLE; + + /* + * when there are no cmd line args we have to supply a default "." arg. + * we will create a second argv array, "av" that will hold either + * our created "." arg, or the real cmd line args. The av array + * just holds the pointers- we don't move the date the pointers + * point to. + */ + ac = argc - optind; /* how many cmd line args are left */ + if (ac < 1) { + av = (char **) xcalloc((size_t) 1, (size_t) (sizeof(char *))); + av[0] = xstrdup("."); + ac = 1; + } else { + av = (char **) xcalloc((size_t) ac, (size_t) (sizeof(char *))); + for (oi = 0; oi < ac; oi++) { + av[oi] = argv[optind++]; /* copy pointer to real cmd line arg */ + } } -#endif - /* process files specified, or current directory if none */ - i=0; - if (argi == argc) - i = list_item("."); - while (argi < argc) - i |= list_item(argv[argi++]); - newline(); - exit( i); + /* now, everything is in the av array */ + if (ac > 1) + disp_opts |= DISP_DIRNAME; /* 2 or more items? label directories */ -print_usage_message: - usage (ls_usage); - exit( FALSE); -} + /* stuff the command line file names into an dnode array */ + dn = NULL; + for (oi = 0; oi < ac; oi++) { + char *fullname = xstrdup(av[oi]); + cur = my_stat(fullname, fullname); + if (!cur) + continue; + cur->next = dn; + dn = cur; + nfiles++; + } + + /* now that we know how many files there are + ** allocate memory for an array to hold dnode pointers + */ + dnp = dnalloc(nfiles); + for (i = 0, cur = dn; i < nfiles; i++) { + dnp[i] = cur; /* save pointer to node in array */ + cur = cur->next; + } + + + if (disp_opts & DISP_NOLIST) { +#ifdef CONFIG_FEATURE_LS_SORTFILES + shellsort(dnp, nfiles); +#endif + if (nfiles > 0) + showfiles(dnp, nfiles); + } else { + dnd = splitdnarray(dnp, nfiles, SPLIT_DIR); + dnf = splitdnarray(dnp, nfiles, SPLIT_FILE); + dndirs = countdirs(dnp, nfiles); + dnfiles = nfiles - dndirs; + if (dnfiles > 0) { +#ifdef CONFIG_FEATURE_LS_SORTFILES + shellsort(dnf, dnfiles); +#endif + showfiles(dnf, dnfiles); + } + if (dndirs > 0) { +#ifdef CONFIG_FEATURE_LS_SORTFILES + shellsort(dnd, dndirs); +#endif + showdirs(dnd, dndirs); + } + } + return (status); + + print_usage_message: + show_usage(); +}