source: branches/stable/mindi-busybox/coreutils/ls.c @ 821

Last change on this file since 821 was 821, checked in by Bruno Cornec, 14 years ago

Addition of busybox 1.2.1 as a mindi-busybox new package
This should avoid delivering binary files in mindi not built there (Fedora and Debian are quite serious about that)

File size: 27.7 KB
Line 
1/* vi: set sw=4 ts=4: */
2/*
3 * tiny-ls.c version 0.1.0: A minimalist 'ls'
4 * Copyright (C) 1996 Brian Candler <B.Candler@pobox.com>
5 *
6 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
7 */
8
9/*
10 * To achieve a small memory footprint, this version of 'ls' doesn't do any
11 * file sorting, and only has the most essential command line switches
12 * (i.e., the ones I couldn't live without :-) All features which involve
13 * linking in substantial chunks of libc can be disabled.
14 *
15 * Although I don't really want to add new features to this program to
16 * keep it small, I *am* interested to receive bug fixes and ways to make
17 * it more portable.
18 *
19 * KNOWN BUGS:
20 * 1. ls -l of a directory doesn't give "total <blocks>" header
21 * 2. ls of a symlink to a directory doesn't list directory contents
22 * 3. hidden files can make column width too large
23 *
24 * NON-OPTIMAL BEHAVIOUR:
25 * 1. autowidth reads directories twice
26 * 2. if you do a short directory listing without filetype characters
27 *    appended, there's no need to stat each one
28 * PORTABILITY:
29 * 1. requires lstat (BSD) - how do you do it without?
30 */
31
32enum {
33    TERMINAL_WIDTH = 80,    /* use 79 if terminal has linefold bug */
34    COLUMN_GAP = 2,     /* includes the file type char */
35};
36
37/************************************************************************/
38
39#include "busybox.h"
40#include <unistd.h>
41#include <errno.h>
42#include <string.h>
43#include <fcntl.h>
44#include <signal.h>
45#include <getopt.h> /* struct option */
46#include <sys/ioctl.h>
47#include <sys/sysmacros.h>     /* major() and minor() */
48#include <time.h>
49
50/* what is the overall style of the listing */
51#define STYLE_COLUMNS   (1U<<21)    /* fill columns */
52#define STYLE_LONG      (2U<<21)    /* one record per line, extended info */
53#define STYLE_SINGLE    (3U<<21)    /* one record per line */
54
55#define STYLE_MASK                 STYLE_SINGLE
56#define STYLE_ONE_RECORD_FLAG      STYLE_LONG
57
58/* 51306 lrwxrwxrwx  1 root     root         2 May 11 01:43 /bin/view -> vi* */
59/* what file information will be listed */
60#define LIST_INO    (1U<<0)
61#define LIST_BLOCKS (1U<<1)
62#define LIST_MODEBITS   (1U<<2)
63#define LIST_NLINKS (1U<<3)
64#define LIST_ID_NAME    (1U<<4)
65#define LIST_ID_NUMERIC (1U<<5)
66#define LIST_CONTEXT    (1U<<6)
67#define LIST_SIZE   (1U<<7)
68#define LIST_DEV    (1U<<8)
69#define LIST_DATE_TIME  (1U<<9)
70#define LIST_FULLTIME   (1U<<10)
71#define LIST_FILENAME   (1U<<11)
72#define LIST_SYMLINK    (1U<<12)
73#define LIST_FILETYPE   (1U<<13)
74#define LIST_EXEC   (1U<<14)
75
76#define LIST_MASK       ((LIST_EXEC << 1) - 1)
77
78/* what files will be displayed */
79#define DISP_DIRNAME    (1U<<15)    /* 2 or more items? label directories */
80#define DISP_HIDDEN (1U<<16)    /* show filenames starting with .  */
81#define DISP_DOT    (1U<<17)    /* show . and .. */
82#define DISP_NOLIST (1U<<18)    /* show directory as itself, not contents */
83#define DISP_RECURSIVE  (1U<<19)    /* show directory and everything below it */
84#define DISP_ROWS   (1U<<20)    /* print across rows */
85
86#define DISP_MASK       (((DISP_ROWS << 1) - 1) & ~(DISP_DIRNAME - 1))
87
88// CONFIG_FEATURE_LS_SORTFILES
89/* how will the files be sorted */
90#define SORT_ORDER_FORWARD   0      /* sort in reverse order */
91#define SORT_ORDER_REVERSE   (1U<<27)   /* sort in reverse order */
92
93#define SORT_NAME      0        /* sort by file name */
94#define SORT_SIZE      (1U<<28)     /* sort by file size */
95#define SORT_ATIME     (2U<<28)     /* sort by last access time */
96#define SORT_CTIME     (3U<<28)     /* sort by last change time */
97#define SORT_MTIME     (4U<<28)     /* sort by last modification time */
98#define SORT_VERSION   (5U<<28)     /* sort by version */
99#define SORT_EXT       (6U<<28)     /* sort by file name extension */
100#define SORT_DIR       (7U<<28)     /* sort by file or directory */
101
102#define SORT_MASK      (7U<<28)
103
104/* which of the three times will be used */
105#define TIME_CHANGE    ((1U<<23) * ENABLE_FEATURE_LS_TIMESTAMPS)
106#define TIME_ACCESS    ((1U<<24) * ENABLE_FEATURE_LS_TIMESTAMPS)
107#define TIME_MASK      ((3U<<23) * ENABLE_FEATURE_LS_TIMESTAMPS)
108
109#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS
110#define FOLLOW_LINKS   (1U<<25)
111#endif
112#ifdef CONFIG_FEATURE_HUMAN_READABLE
113#define LS_DISP_HR     (1U<<26)
114#endif
115
116#define LIST_SHORT  (LIST_FILENAME)
117#define LIST_ISHORT (LIST_INO | LIST_FILENAME)
118#define LIST_LONG   (LIST_MODEBITS | LIST_NLINKS | LIST_ID_NAME | LIST_SIZE | \
119                        LIST_DATE_TIME | LIST_FILENAME | LIST_SYMLINK)
120#define LIST_ILONG  (LIST_INO | LIST_LONG)
121
122#define SPLIT_DIR      1
123#define SPLIT_FILE     0
124#define SPLIT_SUBDIR   2
125
126#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
127#define TYPECHAR(mode)  ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)])
128
129#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined(CONFIG_FEATURE_LS_COLOR)
130# define APPCHAR(mode)   ("\0|\0\0/\0\0\0\0\0@\0=\0\0\0" [TYPEINDEX(mode)])
131#endif
132
133/* colored LS support by JaWi, janwillem.janssen@lxtreme.nl */
134#ifdef CONFIG_FEATURE_LS_COLOR
135
136static int show_color = 0;
137
138/* long option entry used only for --color, which has no short option
139 * equivalent.  */
140static const struct option ls_color_opt[] =
141{
142    {"color", optional_argument, NULL, 1},
143    {NULL, 0, NULL, 0}
144};
145
146#define COLOR(mode) ("\000\043\043\043\042\000\043\043"\
147             "\000\000\044\000\043\000\000\040" [TYPEINDEX(mode)])
148#define ATTR(mode)  ("\00\00\01\00\01\00\01\00"\
149             "\00\00\01\00\01\00\00\01" [TYPEINDEX(mode)])
150#endif
151
152/*
153 * a directory entry and its stat info are stored here
154 */
155struct dnode {          /* the basic node */
156    char *name;     /* the dir entry name */
157    char *fullname;     /* the dir entry name */
158    int   allocated;
159    struct stat dstat;  /* the file stat info */
160#ifdef CONFIG_SELINUX
161    security_context_t sid;
162#endif
163    struct dnode *next; /* point at the next node */
164};
165typedef struct dnode dnode_t;
166
167static struct dnode **list_dir(const char *);
168static struct dnode **dnalloc(int);
169static int list_single(struct dnode *);
170
171static unsigned int all_fmt;
172
173#ifdef CONFIG_FEATURE_AUTOWIDTH
174static int terminal_width = TERMINAL_WIDTH;
175static unsigned short tabstops = COLUMN_GAP;
176#else
177#define tabstops COLUMN_GAP
178#define terminal_width TERMINAL_WIDTH
179#endif
180
181static int status = EXIT_SUCCESS;
182
183static struct dnode *my_stat(char *fullname, char *name)
184{
185    struct stat dstat;
186    struct dnode *cur;
187#ifdef CONFIG_SELINUX
188    security_context_t sid=NULL;
189#endif
190
191#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS
192    if (all_fmt & FOLLOW_LINKS) {
193#ifdef CONFIG_SELINUX
194        if (is_selinux_enabled())  {
195             getfilecon(fullname,&sid);
196        }
197#endif
198        if (stat(fullname, &dstat)) {
199            bb_perror_msg("%s", fullname);
200            status = EXIT_FAILURE;
201            return 0;
202        }
203    } else
204#endif
205    {
206#ifdef CONFIG_SELINUX
207            if  (is_selinux_enabled())  {
208          lgetfilecon(fullname,&sid);
209        }
210#endif
211        if (lstat(fullname, &dstat)) {
212            bb_perror_msg("%s", fullname);
213            status = EXIT_FAILURE;
214            return 0;
215        }
216    }
217
218    cur = (struct dnode *) xmalloc(sizeof(struct dnode));
219    cur->fullname = fullname;
220    cur->name = name;
221    cur->dstat = dstat;
222#ifdef CONFIG_SELINUX
223    cur->sid = sid;
224#endif
225    return cur;
226}
227
228/*----------------------------------------------------------------------*/
229#ifdef CONFIG_FEATURE_LS_COLOR
230static char fgcolor(mode_t mode)
231{
232    /* Check wheter the file is existing (if so, color it red!) */
233    if (errno == ENOENT) {
234        return '\037';
235    }
236    if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
237        return COLOR(0xF000);   /* File is executable ... */
238    return COLOR(mode);
239}
240
241/*----------------------------------------------------------------------*/
242static char bgcolor(mode_t mode)
243{
244    if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
245        return ATTR(0xF000);    /* File is executable ... */
246    return ATTR(mode);
247}
248#endif
249
250/*----------------------------------------------------------------------*/
251#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined(CONFIG_FEATURE_LS_COLOR)
252static char append_char(mode_t mode)
253{
254    if (!(all_fmt & LIST_FILETYPE))
255        return '\0';
256    if (S_ISDIR(mode))
257        return '/';
258    if (!(all_fmt & LIST_EXEC))
259        return '\0';
260    if (S_ISREG(mode) && (mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
261        return '*';
262    return APPCHAR(mode);
263}
264#endif
265
266/*----------------------------------------------------------------------*/
267
268#define countdirs(A,B) count_dirs((A), (B), 1)
269#define countsubdirs(A,B) count_dirs((A), (B), 0)
270
271static int count_dirs(struct dnode **dn, int nfiles, int notsubdirs)
272{
273    int i, dirs;
274
275    if (dn == NULL || nfiles < 1)
276        return (0);
277    dirs = 0;
278    for (i = 0; i < nfiles; i++) {
279        if (S_ISDIR(dn[i]->dstat.st_mode)
280            && (notsubdirs ||
281            ((dn[i]->name[0] != '.') || (dn[i]->name[1]
282                        && ((dn[i]->name[1] != '.')
283                        || dn[i]->name[2])))))
284            dirs++;
285    }
286    return (dirs);
287}
288
289static int countfiles(struct dnode **dnp)
290{
291    int nfiles;
292    struct dnode *cur;
293
294    if (dnp == NULL)
295        return (0);
296    nfiles = 0;
297    for (cur = dnp[0]; cur->next != NULL; cur = cur->next)
298        nfiles++;
299    nfiles++;
300    return (nfiles);
301}
302
303/* get memory to hold an array of pointers */
304static struct dnode **dnalloc(int num)
305{
306    struct dnode **p;
307
308    if (num < 1)
309        return (NULL);
310
311    p = (struct dnode **) xcalloc((size_t) num, (size_t) (sizeof(struct dnode *)));
312    return (p);
313}
314
315#ifdef CONFIG_FEATURE_LS_RECURSIVE
316static void dfree(struct dnode **dnp, int nfiles)
317{
318    int i;
319
320    if (dnp == NULL)
321        return;
322
323    for (i = 0; i < nfiles; i++) {
324        struct dnode *cur = dnp[i];
325        if(cur->allocated)
326            free(cur->fullname);    /* free the filename */
327        free(cur);      /* free the dnode */
328    }
329    free(dnp);          /* free the array holding the dnode pointers */
330}
331#else
332#define dfree(...)
333#endif
334
335static struct dnode **splitdnarray(struct dnode **dn, int nfiles, int which)
336{
337    int dncnt, i, d;
338    struct dnode **dnp;
339
340    if (dn == NULL || nfiles < 1)
341        return (NULL);
342
343    /* count how many dirs and regular files there are */
344    if (which == SPLIT_SUBDIR)
345        dncnt = countsubdirs(dn, nfiles);
346    else {
347        dncnt = countdirs(dn, nfiles);  /* assume we are looking for dirs */
348        if (which == SPLIT_FILE)
349            dncnt = nfiles - dncnt; /* looking for files */
350    }
351
352    /* allocate a file array and a dir array */
353    dnp = dnalloc(dncnt);
354
355    /* copy the entrys into the file or dir array */
356    for (d = i = 0; i < nfiles; i++) {
357        if (S_ISDIR(dn[i]->dstat.st_mode)) {
358            if (which & (SPLIT_DIR|SPLIT_SUBDIR)) {
359                if ((which & SPLIT_DIR)
360                    || ((dn[i]->name[0] != '.')
361                        || (dn[i]->name[1]
362                            && ((dn[i]->name[1] != '.')
363                                || dn[i]->name[2])))) {
364                                    dnp[d++] = dn[i];
365                                }
366            }
367        } else if (!(which & (SPLIT_DIR|SPLIT_SUBDIR))) {
368            dnp[d++] = dn[i];
369        }
370    }
371    return (dnp);
372}
373
374/*----------------------------------------------------------------------*/
375#ifdef CONFIG_FEATURE_LS_SORTFILES
376static int sortcmp(const void *a, const void *b)
377{
378    struct dnode *d1 = *(struct dnode **)a;
379    struct dnode *d2 = *(struct dnode **)b;
380    unsigned int sort_opts = all_fmt & SORT_MASK;
381    int dif;
382
383    dif = 0;            /* assume SORT_NAME */
384    if (sort_opts == SORT_SIZE) {
385        dif = (int) (d2->dstat.st_size - d1->dstat.st_size);
386    } else if (sort_opts == SORT_ATIME) {
387        dif = (int) (d2->dstat.st_atime - d1->dstat.st_atime);
388    } else if (sort_opts == SORT_CTIME) {
389        dif = (int) (d2->dstat.st_ctime - d1->dstat.st_ctime);
390    } else if (sort_opts == SORT_MTIME) {
391        dif = (int) (d2->dstat.st_mtime - d1->dstat.st_mtime);
392    } else if (sort_opts == SORT_DIR) {
393        dif = S_ISDIR(d2->dstat.st_mode) - S_ISDIR(d1->dstat.st_mode);
394        /* } else if (sort_opts == SORT_VERSION) { */
395        /* } else if (sort_opts == SORT_EXT) { */
396    }
397
398    if (dif == 0) {
399        /* sort by name- may be a tie_breaker for time or size cmp */
400        if (ENABLE_LOCALE_SUPPORT) dif = strcoll(d1->name, d2->name);
401        else dif = strcmp(d1->name, d2->name);
402    }
403
404    if (all_fmt & SORT_ORDER_REVERSE) {
405        dif = -dif;
406    }
407    return (dif);
408}
409
410/*----------------------------------------------------------------------*/
411static void dnsort(struct dnode **dn, int size)
412{
413    qsort(dn, size, sizeof *dn, sortcmp);
414}
415#else
416#define sortcmp(a, b) 0
417#define dnsort(dn, size)
418#endif
419
420
421/*----------------------------------------------------------------------*/
422static void showfiles(struct dnode **dn, int nfiles)
423{
424    int i, ncols, nrows, row, nc;
425    int column = 0;
426    int nexttab = 0;
427    int column_width = 0; /* for STYLE_LONG and STYLE_SINGLE not used */
428
429    if (dn == NULL || nfiles < 1)
430        return;
431
432    if (all_fmt & STYLE_ONE_RECORD_FLAG) {
433        ncols = 1;
434    } else {
435        /* find the longest file name-  use that as the column width */
436        for (i = 0; i < nfiles; i++) {
437            int len = strlen(dn[i]->name) +
438#ifdef CONFIG_SELINUX
439            ((all_fmt & LIST_CONTEXT) ? 33 : 0) +
440#endif
441            ((all_fmt & LIST_INO) ? 8 : 0) +
442            ((all_fmt & LIST_BLOCKS) ? 5 : 0);
443            if (column_width < len)
444                column_width = len;
445        }
446        column_width += tabstops;
447        ncols = (int) (terminal_width / column_width);
448    }
449
450    if (ncols > 1) {
451        nrows = nfiles / ncols;
452        if ((nrows * ncols) < nfiles)
453            nrows++;                /* round up fractionals */
454    } else {
455        nrows = nfiles;
456        ncols = 1;
457    }
458
459    for (row = 0; row < nrows; row++) {
460        for (nc = 0; nc < ncols; nc++) {
461            /* reach into the array based on the column and row */
462            i = (nc * nrows) + row; /* assume display by column */
463            if (all_fmt & DISP_ROWS)
464                i = (row * ncols) + nc; /* display across row */
465            if (i < nfiles) {
466                if (column > 0) {
467                    nexttab -= column;
468                    while (nexttab--) {
469                        putchar(' ');
470                        column++;
471                    }
472            }
473                nexttab = column + column_width;
474                column += list_single(dn[i]);
475        }
476        }
477        putchar('\n');
478        column = 0;
479    }
480}
481
482/*----------------------------------------------------------------------*/
483static void showdirs(struct dnode **dn, int ndirs, int first)
484{
485    int i, nfiles;
486    struct dnode **subdnp;
487    int dndirs;
488    struct dnode **dnd;
489
490    if (dn == NULL || ndirs < 1)
491        return;
492
493    for (i = 0; i < ndirs; i++) {
494        if (all_fmt & (DISP_DIRNAME | DISP_RECURSIVE)) {
495            if (!first)
496                printf("\n");
497            first = 0;
498            printf("%s:\n", dn[i]->fullname);
499        }
500        subdnp = list_dir(dn[i]->fullname);
501        nfiles = countfiles(subdnp);
502        if (nfiles > 0) {
503            /* list all files at this level */
504            if (ENABLE_FEATURE_LS_SORTFILES) dnsort(subdnp, nfiles);
505            showfiles(subdnp, nfiles);
506            if (ENABLE_FEATURE_LS_RECURSIVE) {
507                if (all_fmt & DISP_RECURSIVE) {
508                    /* recursive- list the sub-dirs */
509                    dnd = splitdnarray(subdnp, nfiles, SPLIT_SUBDIR);
510                    dndirs = countsubdirs(subdnp, nfiles);
511                    if (dndirs > 0) {
512                        if (ENABLE_FEATURE_LS_SORTFILES) dnsort(dnd, dndirs);
513                        showdirs(dnd, dndirs, 0);
514                        /* free the array of dnode pointers to the dirs */
515                        free(dnd);
516                    }
517                }
518                /* free the dnodes and the fullname mem */
519                dfree(subdnp, nfiles);
520            }
521        }
522    }
523}
524
525/*----------------------------------------------------------------------*/
526static struct dnode **list_dir(const char *path)
527{
528    struct dnode *dn, *cur, **dnp;
529    struct dirent *entry;
530    DIR *dir;
531    int i, nfiles;
532
533    if (path == NULL)
534        return (NULL);
535
536    dn = NULL;
537    nfiles = 0;
538    dir = bb_opendir(path);
539    if (dir == NULL) {
540        status = EXIT_FAILURE;
541        return (NULL);  /* could not open the dir */
542    }
543    while ((entry = readdir(dir)) != NULL) {
544        char *fullname;
545
546        /* are we going to list the file- it may be . or .. or a hidden file */
547        if (entry->d_name[0] == '.') {
548            if ((entry->d_name[1] == 0 || (
549                entry->d_name[1] == '.'
550                && entry->d_name[2] == 0))
551                    && !(all_fmt & DISP_DOT))
552            continue;
553            if (!(all_fmt & DISP_HIDDEN))
554            continue;
555        }
556        fullname = concat_path_file(path, entry->d_name);
557        cur = my_stat(fullname, strrchr(fullname, '/') + 1);
558        if (!cur)
559            continue;
560        cur->allocated = 1;
561        cur->next = dn;
562        dn = cur;
563        nfiles++;
564    }
565    closedir(dir);
566
567    /* now that we know how many files there are
568       ** allocate memory for an array to hold dnode pointers
569     */
570    if (dn == NULL)
571        return (NULL);
572    dnp = dnalloc(nfiles);
573    for (i = 0, cur = dn; i < nfiles; i++) {
574        dnp[i] = cur;   /* save pointer to node in array */
575        cur = cur->next;
576    }
577
578    return (dnp);
579}
580
581/*----------------------------------------------------------------------*/
582static int list_single(struct dnode *dn)
583{
584    int i, column = 0;
585
586#ifdef CONFIG_FEATURE_LS_USERNAME
587    char scratch[16];
588#endif
589#ifdef CONFIG_FEATURE_LS_TIMESTAMPS
590    char *filetime;
591    time_t ttime, age;
592#endif
593#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined (CONFIG_FEATURE_LS_COLOR)
594    struct stat info;
595    char append;
596#endif
597
598    if (dn->fullname == NULL)
599        return (0);
600
601#ifdef CONFIG_FEATURE_LS_TIMESTAMPS
602    ttime = dn->dstat.st_mtime; /* the default time */
603    if (all_fmt & TIME_ACCESS)
604        ttime = dn->dstat.st_atime;
605    if (all_fmt & TIME_CHANGE)
606        ttime = dn->dstat.st_ctime;
607    filetime = ctime(&ttime);
608#endif
609#ifdef CONFIG_FEATURE_LS_FILETYPES
610    append = append_char(dn->dstat.st_mode);
611#endif
612
613    for (i = 0; i <= 31; i++) {
614        switch (all_fmt & (1 << i)) {
615        case LIST_INO:
616            column += printf("%7ld ", (long int) dn->dstat.st_ino);
617            break;
618        case LIST_BLOCKS:
619#if _FILE_OFFSET_BITS == 64
620            column += printf("%4lld ", (long long)dn->dstat.st_blocks >> 1);
621#else
622            column += printf("%4ld ", dn->dstat.st_blocks >> 1);
623#endif
624            break;
625        case LIST_MODEBITS:
626            column += printf("%-10s ", (char *) bb_mode_string(dn->dstat.st_mode));
627            break;
628        case LIST_NLINKS:
629            column += printf("%4ld ", (long) dn->dstat.st_nlink);
630            break;
631        case LIST_ID_NAME:
632#ifdef CONFIG_FEATURE_LS_USERNAME
633            bb_getpwuid(scratch, dn->dstat.st_uid, sizeof(scratch));
634            printf("%-8.8s ", scratch);
635            bb_getgrgid(scratch, dn->dstat.st_gid, sizeof(scratch));
636            printf("%-8.8s", scratch);
637            column += 17;
638            break;
639#endif
640        case LIST_ID_NUMERIC:
641            column += printf("%-8d %-8d", dn->dstat.st_uid, dn->dstat.st_gid);
642            break;
643        case LIST_SIZE:
644        case LIST_DEV:
645            if (S_ISBLK(dn->dstat.st_mode) || S_ISCHR(dn->dstat.st_mode)) {
646                column += printf("%4d, %3d ", (int) major(dn->dstat.st_rdev),
647                       (int) minor(dn->dstat.st_rdev));
648            } else {
649#ifdef CONFIG_FEATURE_HUMAN_READABLE
650                if (all_fmt & LS_DISP_HR) {
651                    column += printf("%9s ",
652                            make_human_readable_str(dn->dstat.st_size, 1, 0));
653                } else
654#endif
655                {
656#if _FILE_OFFSET_BITS == 64
657                    column += printf("%9lld ", (long long) dn->dstat.st_size);
658#else
659                    column += printf("%9ld ", dn->dstat.st_size);
660#endif
661                }
662            }
663            break;
664#ifdef CONFIG_FEATURE_LS_TIMESTAMPS
665        case LIST_FULLTIME:
666            printf("%24.24s ", filetime);
667            column += 25;
668            break;
669        case LIST_DATE_TIME:
670            if ((all_fmt & LIST_FULLTIME) == 0) {
671                age = time(NULL) - ttime;
672                printf("%6.6s ", filetime + 4);
673                if (age < 3600L * 24 * 365 / 2 && age > -15 * 60) {
674                    /* hh:mm if less than 6 months old */
675                    printf("%5.5s ", filetime + 11);
676                } else {
677                    printf(" %4.4s ", filetime + 20);
678                }
679                column += 13;
680            }
681            break;
682#endif
683#ifdef CONFIG_SELINUX
684        case LIST_CONTEXT:
685            {
686                char context[80];
687                int len = 0;
688
689                if (dn->sid) {
690                  /*  I assume sid initilized with NULL  */
691                  len = strlen(dn->sid)+1;
692                  safe_strncpy(context, dn->sid, len);
693                  freecon(dn->sid);
694                }else {
695                  safe_strncpy(context, "unknown", 8);
696                }
697                printf("%-32s ", context);
698                column += MAX(33, len);
699            }
700            break;
701#endif
702        case LIST_FILENAME:
703#ifdef CONFIG_FEATURE_LS_COLOR
704            errno = 0;
705            if (show_color && !lstat(dn->fullname, &info)) {
706                printf("\033[%d;%dm", bgcolor(info.st_mode),
707                       fgcolor(info.st_mode));
708            }
709#endif
710            column += printf("%s", dn->name);
711#ifdef CONFIG_FEATURE_LS_COLOR
712            if (show_color) {
713                printf("\033[0m");
714            }
715#endif
716            break;
717        case LIST_SYMLINK:
718            if (S_ISLNK(dn->dstat.st_mode)) {
719                char *lpath = xreadlink(dn->fullname);
720
721                if (lpath) {
722                    printf(" -> ");
723#if defined(CONFIG_FEATURE_LS_FILETYPES) || defined (CONFIG_FEATURE_LS_COLOR)
724                    if (!stat(dn->fullname, &info)) {
725                        append = append_char(info.st_mode);
726                    }
727#endif
728#ifdef CONFIG_FEATURE_LS_COLOR
729                    if (show_color) {
730                        errno = 0;
731                        printf("\033[%d;%dm", bgcolor(info.st_mode),
732                               fgcolor(info.st_mode));
733                    }
734#endif
735                    column += printf("%s", lpath) + 4;
736#ifdef CONFIG_FEATURE_LS_COLOR
737                    if (show_color) {
738                        printf("\033[0m");
739                    }
740#endif
741                    free(lpath);
742                }
743            }
744            break;
745#ifdef CONFIG_FEATURE_LS_FILETYPES
746        case LIST_FILETYPE:
747            if (append != '\0') {
748                printf("%1c", append);
749                column++;
750            }
751            break;
752#endif
753        }
754    }
755
756    return column;
757}
758
759/*----------------------------------------------------------------------*/
760
761/* "[-]Cadil1", POSIX mandated options, busybox always supports */
762/* "[-]gnsx", POSIX non-mandated options, busybox always supports */
763/* "[-]Ak" GNU options, busybox always supports */
764/* "[-]FLRctur", POSIX mandated options, busybox optionally supports */
765/* "[-]p", POSIX non-mandated options, busybox optionally supports */
766/* "[-]SXvThw", GNU options, busybox optionally supports */
767/* "[-]K", SELinux mandated options, busybox optionally supports */
768/* "[-]e", I think we made this one up */
769
770#ifdef CONFIG_FEATURE_LS_TIMESTAMPS
771# define LS_STR_TIMESTAMPS  "cetu"
772#else
773# define LS_STR_TIMESTAMPS  ""
774#endif
775
776#ifdef CONFIG_FEATURE_LS_FILETYPES
777# define LS_STR_FILETYPES   "Fp"
778#else
779# define LS_STR_FILETYPES   ""
780#endif
781
782#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS
783# define LS_STR_FOLLOW_LINKS    "L"
784#else
785# define LS_STR_FOLLOW_LINKS    ""
786#endif
787
788#ifdef CONFIG_FEATURE_LS_RECURSIVE
789# define LS_STR_RECURSIVE   "R"
790#else
791# define LS_STR_RECURSIVE   ""
792#endif
793
794#ifdef CONFIG_FEATURE_HUMAN_READABLE
795# define LS_STR_HUMAN_READABLE  "h"
796#else
797# define LS_STR_HUMAN_READABLE  ""
798#endif
799
800#ifdef CONFIG_SELINUX
801# define LS_STR_SELINUX "K"
802#else
803# define LS_STR_SELINUX ""
804#endif
805
806#ifdef CONFIG_FEATURE_AUTOWIDTH
807# define LS_STR_AUTOWIDTH   "T:w:"
808#else
809# define LS_STR_AUTOWIDTH   ""
810#endif
811
812static const char ls_options[]="Cadil1gnsxAk" \
813    LS_STR_TIMESTAMPS \
814    USE_FEATURE_LS_SORTFILES("SXrv") \
815    LS_STR_FILETYPES \
816    LS_STR_FOLLOW_LINKS \
817    LS_STR_RECURSIVE \
818    LS_STR_HUMAN_READABLE \
819    LS_STR_SELINUX \
820    LS_STR_AUTOWIDTH;
821
822#define LIST_MASK_TRIGGER   0
823#define STYLE_MASK_TRIGGER  STYLE_MASK
824#define SORT_MASK_TRIGGER   SORT_MASK
825#define DISP_MASK_TRIGGER   DISP_ROWS
826
827static const unsigned opt_flags[] = {
828    LIST_SHORT | STYLE_COLUMNS, /* C */
829    DISP_HIDDEN | DISP_DOT,     /* a */
830    DISP_NOLIST,                /* d */
831    LIST_INO,                   /* i */
832    LIST_LONG | STYLE_LONG,     /* l - remember LS_DISP_HR in mask! */
833    LIST_SHORT | STYLE_SINGLE,  /* 1 */
834    0,                          /* g - ingored */
835    LIST_ID_NUMERIC,            /* n */
836    LIST_BLOCKS,                /* s */
837    DISP_ROWS,                  /* x */
838    DISP_HIDDEN,                /* A */
839#ifdef CONFIG_SELINUX
840    LIST_CONTEXT,               /* k */
841#else
842    0,                          /* k - ingored */
843#endif
844#ifdef CONFIG_FEATURE_LS_TIMESTAMPS
845    TIME_CHANGE | (ENABLE_FEATURE_LS_SORTFILES * SORT_CTIME),   /* c */
846    LIST_FULLTIME,              /* e */
847    ENABLE_FEATURE_LS_SORTFILES * SORT_MTIME,   /* t */
848    TIME_ACCESS | (ENABLE_FEATURE_LS_SORTFILES * SORT_ATIME),   /* u */
849#endif
850#ifdef CONFIG_FEATURE_LS_SORTFILES
851    SORT_SIZE,                  /* S */
852    SORT_EXT,                   /* X */
853    SORT_ORDER_REVERSE,         /* r */
854    SORT_VERSION,               /* v */
855#endif
856#ifdef CONFIG_FEATURE_LS_FILETYPES
857    LIST_FILETYPE | LIST_EXEC,  /* F */
858    LIST_FILETYPE,              /* p */
859#endif
860#ifdef CONFIG_FEATURE_LS_FOLLOWLINKS
861    FOLLOW_LINKS,               /* L */
862#endif
863#ifdef CONFIG_FEATURE_LS_RECURSIVE
864    DISP_RECURSIVE,             /* R */
865#endif
866#ifdef CONFIG_FEATURE_HUMAN_READABLE
867    LS_DISP_HR,                 /* h */
868#endif
869#ifdef CONFIG_SELINUX
870    LIST_MODEBITS|LIST_NLINKS|LIST_CONTEXT|LIST_SIZE|LIST_DATE_TIME, /* K */
871#endif
872#ifdef CONFIG_FEATURE_AUTOWIDTH
873       0, 0,                    /* T, w - ignored */
874#endif
875    (1U<<31)
876};
877
878
879/*----------------------------------------------------------------------*/
880
881int ls_main(int argc, char **argv)
882{
883    struct dnode **dnd;
884    struct dnode **dnf;
885    struct dnode **dnp;
886    struct dnode *dn;
887    struct dnode *cur;
888    long opt;
889    int nfiles = 0;
890    int dnfiles;
891    int dndirs;
892    int oi;
893    int ac;
894    int i;
895    char **av;
896#ifdef CONFIG_FEATURE_AUTOWIDTH
897    char *tabstops_str = NULL;
898    char *terminal_width_str = NULL;
899#endif
900#ifdef CONFIG_FEATURE_LS_COLOR
901    char *color_opt;
902#endif
903
904    all_fmt = LIST_SHORT |
905        (ENABLE_FEATURE_LS_SORTFILES * (SORT_NAME | SORT_ORDER_FORWARD));
906
907#ifdef CONFIG_FEATURE_AUTOWIDTH
908    /* Obtain the terminal width.  */
909    get_terminal_width_height(STDOUT_FILENO, &terminal_width, NULL);
910    /* Go one less... */
911    terminal_width--;
912#endif
913
914#ifdef CONFIG_FEATURE_LS_COLOR
915    bb_applet_long_options = ls_color_opt;
916#endif
917
918    /* process options */
919#ifdef CONFIG_FEATURE_AUTOWIDTH
920    opt = bb_getopt_ulflags(argc, argv, ls_options, &tabstops_str, &terminal_width_str
921#ifdef CONFIG_FEATURE_LS_COLOR
922        , &color_opt
923#endif
924        );
925    if (tabstops_str) {
926        tabstops = atoi(tabstops_str);
927    }
928    if (terminal_width_str) {
929        terminal_width = atoi(terminal_width_str);
930    }
931#else
932    opt = bb_getopt_ulflags(argc, argv, ls_options
933#ifdef CONFIG_FEATURE_LS_COLOR
934        , &color_opt
935#endif
936        );
937#endif
938    for (i = 0; opt_flags[i] != (1U<<31); i++) {
939        if (opt & (1 << i)) {
940            unsigned int flags = opt_flags[i];
941
942            if (flags & LIST_MASK_TRIGGER) {
943                all_fmt &= ~LIST_MASK;
944            }
945            if (flags & STYLE_MASK_TRIGGER) {
946                all_fmt &= ~STYLE_MASK;
947            }
948            if (ENABLE_FEATURE_LS_SORTFILES && (flags & SORT_MASK_TRIGGER)) {
949                all_fmt &= ~SORT_MASK;
950            }
951            if (flags & DISP_MASK_TRIGGER) {
952                all_fmt &= ~DISP_MASK;
953            }
954            if (flags & TIME_MASK) {
955                all_fmt &= ~TIME_MASK;
956            }
957            if (flags & LIST_CONTEXT) {
958                all_fmt |= STYLE_SINGLE;
959            }
960#ifdef CONFIG_FEATURE_HUMAN_READABLE
961            if (opt == 'l') {
962                all_fmt &= ~LS_DISP_HR;
963            }
964#endif
965            all_fmt |= flags;
966        }
967    }
968
969#ifdef CONFIG_FEATURE_LS_COLOR
970    {
971        /* find color bit value - last position for short getopt */
972
973#if CONFIG_FEATURE_LS_COLOR_IS_DEFAULT
974        char *p;
975
976        if ((p = getenv ("LS_COLORS")) != NULL &&
977            (*p == '\0' || (strcmp(p, "none") == 0))) {
978            ;
979        } else if (isatty(STDOUT_FILENO)) {
980            show_color = 1;
981        }
982#endif
983
984        if((opt & (1 << i))) {  /* next flag after short options */
985            if (color_opt == NULL || strcmp("always", color_opt) == 0)
986                show_color = 1;
987            else if (color_opt != NULL && strcmp("never", color_opt) == 0)
988                show_color = 0;
989            else if (color_opt != NULL && strcmp("auto", color_opt) == 0 && isatty(STDOUT_FILENO))
990                show_color = 1;
991        }
992    }
993#endif
994
995    /* sort out which command line options take precedence */
996#ifdef CONFIG_FEATURE_LS_RECURSIVE
997    if (all_fmt & DISP_NOLIST)
998        all_fmt &= ~DISP_RECURSIVE; /* no recurse if listing only dir */
999#endif
1000    if (ENABLE_FEATURE_LS_TIMESTAMPS && ENABLE_FEATURE_LS_SORTFILES) {
1001        if (all_fmt & TIME_CHANGE)
1002            all_fmt = (all_fmt & ~SORT_MASK) | SORT_CTIME;
1003        if (all_fmt & TIME_ACCESS)
1004            all_fmt = (all_fmt & ~SORT_MASK) | SORT_ATIME;
1005    }
1006    if ((all_fmt & STYLE_MASK) != STYLE_LONG) /* only for long list */
1007        all_fmt &= ~(LIST_ID_NUMERIC|LIST_FULLTIME|LIST_ID_NAME|LIST_ID_NUMERIC);
1008#ifdef CONFIG_FEATURE_LS_USERNAME
1009    if ((all_fmt & STYLE_MASK) == STYLE_LONG && (all_fmt & LIST_ID_NUMERIC))
1010        all_fmt &= ~LIST_ID_NAME;   /* don't list names if numeric uid */
1011#endif
1012
1013    /* choose a display format */
1014    if (!(all_fmt & STYLE_MASK))
1015        all_fmt |= (isatty(STDOUT_FILENO) ? STYLE_COLUMNS : STYLE_SINGLE);
1016
1017    /*
1018     * when there are no cmd line args we have to supply a default "." arg.
1019     * we will create a second argv array, "av" that will hold either
1020     * our created "." arg, or the real cmd line args.  The av array
1021     * just holds the pointers- we don't move the date the pointers
1022     * point to.
1023     */
1024    ac = argc - optind; /* how many cmd line args are left */
1025    if (ac < 1) {
1026        static const char * const dotdir[] = { "." };
1027
1028        av = (char **) dotdir;
1029        ac = 1;
1030    } else {
1031        av = argv + optind;
1032    }
1033
1034    /* now, everything is in the av array */
1035    if (ac > 1)
1036        all_fmt |= DISP_DIRNAME;    /* 2 or more items? label directories */
1037
1038    /* stuff the command line file names into an dnode array */
1039    dn = NULL;
1040    for (oi = 0; oi < ac; oi++) {
1041        cur = my_stat(av[oi], av[oi]);
1042        if (!cur)
1043            continue;
1044        cur->allocated = 0;
1045        cur->next = dn;
1046        dn = cur;
1047        nfiles++;
1048    }
1049
1050    /* now that we know how many files there are
1051       ** allocate memory for an array to hold dnode pointers
1052     */
1053    dnp = dnalloc(nfiles);
1054    for (i = 0, cur = dn; i < nfiles; i++) {
1055        dnp[i] = cur;   /* save pointer to node in array */
1056        cur = cur->next;
1057    }
1058
1059    if (all_fmt & DISP_NOLIST) {
1060        if (ENABLE_FEATURE_LS_SORTFILES) dnsort(dnp, nfiles);
1061        if (nfiles > 0)
1062            showfiles(dnp, nfiles);
1063    } else {
1064        dnd = splitdnarray(dnp, nfiles, SPLIT_DIR);
1065        dnf = splitdnarray(dnp, nfiles, SPLIT_FILE);
1066        dndirs = countdirs(dnp, nfiles);
1067        dnfiles = nfiles - dndirs;
1068        if (dnfiles > 0) {
1069            if (ENABLE_FEATURE_LS_SORTFILES) dnsort(dnf, dnfiles);
1070            showfiles(dnf, dnfiles);
1071            if (ENABLE_FEATURE_CLEAN_UP)
1072                free(dnf);
1073        }
1074        if (dndirs > 0) {
1075            if (ENABLE_FEATURE_LS_SORTFILES) dnsort(dnd, dndirs);
1076            showdirs(dnd, dndirs, dnfiles == 0);
1077            if (ENABLE_FEATURE_CLEAN_UP)
1078                free(dnd);
1079        }
1080    }
1081    if (ENABLE_FEATURE_CLEAN_UP)
1082        dfree(dnp, nfiles);
1083    return (status);
1084}
Note: See TracBrowser for help on using the repository browser.