coreutils/ls.c

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