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  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19  */
  20
  21 /*
  22  * To achieve a small memory footprint, this version of 'ls' doesn't do any
  23  * file sorting, and only has the most essential command line switches
  24  * (i.e. the ones I couldn't live without :-) All features which involve
  25  * linking in substantial chunks of libc can be disabled.
  26  *
  27  * Although I don't really want to add new features to this program to
  28  * keep it small, I *am* interested to receive bug fixes and ways to make
  29  * it more portable.
  30  *
  31  * KNOWN BUGS:
  32  * 1. ls -l of a directory doesn't give "total <blocks>" header
  33  * 2. ls of a symlink to a directory doesn't list directory contents
  34  * 3. hidden files can make column width too large
  35  *
  36  * NON-OPTIMAL BEHAVIOUR:
  37  * 1. autowidth reads directories twice
  38  * 2. if you do a short directory listing without filetype characters
  39  *    appended, there's no need to stat each one
  40  * PORTABILITY:
  41  * 1. requires lstat (BSD) - how do you do it without?
  42  */
  43
  44 #define TERMINAL_WIDTH  80              /* use 79 if your terminal has linefold bug */
  45 #define COLUMN_WIDTH    14              /* default if AUTOWIDTH not defined */
  46 #define COLUMN_GAP      2                       /* includes the file type char, if present */
  47
  48 /************************************************************************/
  49
  50 #include "busybox.h"
  51 #include <sys/types.h>
  52 #include <sys/stat.h>
  53 #include <stdio.h>
  54 #include <unistd.h>
  55 #include <dirent.h>
  56 #include <errno.h>
  57 #include <stdio.h>
  58 #ifdef BB_FEATURE_LS_TIMESTAMPS
  59 #include <time.h>
  60 #endif
  61 #include <string.h>
  62
  63 #ifndef NAJOR
  64 #define MAJOR(dev) (((dev)>>8)&0xff)
  65 #define MINOR(dev) ((dev)&0xff)
  66 #endif
  67
  68 /* what is the overall style of the listing */
  69 #define STYLE_AUTO              0
  70 #define STYLE_LONG              1               /* one record per line, extended info */
  71 #define STYLE_SINGLE    2               /* one record per line */
  72 #define STYLE_COLUMNS   3               /* fill columns */
  73
  74 /* 51306 lrwxrwxrwx  1 root     root         2 May 11 01:43 /bin/view -> vi* */
  75 /* what file information will be listed */
  76 #define LIST_INO                (1<<0)
  77 #define LIST_BLOCKS             (1<<1)
  78 #define LIST_MODEBITS   (1<<2)
  79 #define LIST_NLINKS             (1<<3)
  80 #define LIST_ID_NAME    (1<<4)
  81 #define LIST_ID_NUMERIC (1<<5)
  82 #define LIST_SIZE               (1<<6)
  83 #define LIST_DEV                (1<<7)
  84 #define LIST_DATE_TIME  (1<<8)
  85 #define LIST_FULLTIME   (1<<9)
  86 #define LIST_FILENAME   (1<<10)
  87 #define LIST_SYMLINK    (1<<11)
  88 #define LIST_FILETYPE   (1<<12)
  89 #define LIST_EXEC               (1<<13)
  90
  91 /* what files will be displayed */
  92 #define DISP_NORMAL             (0)             /* show normal filenames */
  93 #define DISP_DIRNAME    (1<<0)  /* 2 or more items? label directories */
  94 #define DISP_HIDDEN             (1<<1)  /* show filenames starting with .  */
  95 #define DISP_DOT                (1<<2)  /* show . and .. */
  96 #define DISP_NOLIST             (1<<3)  /* show directory as itself, not contents */
  97 #define DISP_RECURSIVE  (1<<4)  /* show directory and everything below it */
  98 #define DISP_ROWS               (1<<5)  /* print across rows */
  99
 100 #ifdef BB_FEATURE_LS_SORTFILES
 101 /* how will the files be sorted */
 102 #define SORT_FORWARD    0               /* sort in reverse order */
 103 #define SORT_REVERSE    1               /* sort in reverse order */
 104 #define SORT_NAME               2               /* sort by file name */
 105 #define SORT_SIZE               3               /* sort by file size */
 106 #define SORT_ATIME              4               /* sort by last access time */
 107 #define SORT_CTIME              5               /* sort by last change time */
 108 #define SORT_MTIME              6               /* sort by last modification time */
 109 #define SORT_VERSION    7               /* sort by version */
 110 #define SORT_EXT                8               /* sort by file name extension */
 111 #define SORT_DIR                9               /* sort by file or directory */
 112 #endif
 113
 114 #ifdef BB_FEATURE_LS_TIMESTAMPS
 115 /* which of the three times will be used */
 116 #define TIME_MOD    0
 117 #define TIME_CHANGE 1
 118 #define TIME_ACCESS 2
 119 #endif
 120
 121 #define LIST_SHORT              (LIST_FILENAME)
 122 #define LIST_ISHORT             (LIST_INO | LIST_FILENAME)
 123 #define LIST_LONG               (LIST_MODEBITS | LIST_NLINKS | LIST_ID_NAME | \
 124                                                 LIST_SIZE | LIST_DATE_TIME | LIST_FILENAME | \
 125                                                 LIST_SYMLINK)
 126 #define LIST_ILONG              (LIST_INO | LIST_LONG)
 127
 128 #define SPLIT_DIR               0
 129 #define SPLIT_FILE              1
 130
 131 #define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
 132 #define TYPECHAR(mode)  ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)])
 133 #ifdef BB_FEATURE_LS_FILETYPES
 134 #define APPCHAR(mode)   ("\0|\0\0/\0\0\0\0\0@\0=\0\0\0" [TYPEINDEX(mode)])
 135 #endif
 136
 137 /*
 138  * a directory entry and its stat info are stored here
 139  */
 140 struct dnode {                          /* the basic node */
 141     char *name;                         /* the dir entry name */
 142     char *fullname;                     /* the dir entry name */
 143     struct stat dstat;          /* the file stat info */
 144     struct dnode *next;         /* point at the next node */
 145 };
 146 typedef struct dnode dnode_t;
 147
 148 struct dnode **list_dir(char *);
 149 struct dnode **dnalloc(int);
 150 int list_single(struct dnode *);
 151
 152 static unsigned int disp_opts=  DISP_NORMAL;
 153 static unsigned int style_fmt=  STYLE_AUTO ;
 154 static unsigned int list_fmt=   LIST_SHORT ;
 155 #ifdef BB_FEATURE_LS_SORTFILES
 156 static unsigned int sort_opts=  SORT_FORWARD;
 157 static unsigned int sort_order= SORT_FORWARD;
 158 #endif
 159 #ifdef BB_FEATURE_LS_TIMESTAMPS
 160 static unsigned int time_fmt=   TIME_MOD;
 161 #endif
 162 #ifdef BB_FEATURE_LS_FOLLOWLINKS
 163 static unsigned int follow_links=FALSE;
 164 #endif
 165
 166 static unsigned short column = 0;
 167 #ifdef BB_FEATURE_AUTOWIDTH
 168 static unsigned short terminal_width = TERMINAL_WIDTH;
 169 static unsigned short column_width = COLUMN_WIDTH;
 170 static unsigned short tabstops = 8;
 171 #else
 172 #define terminal_width  TERMINAL_WIDTH
 173 #define column_width    COLUMN_WIDTH
 174 #endif
 175
 176 static int status = EXIT_SUCCESS;
 177
 178 static void newline(void)
 179 {
 180     if (column > 0) {
 181         fprintf(stdout, "\n");
 182         column = 0;
 183     }
 184 }
 185
 186 /*----------------------------------------------------------------------*/
 187 #ifdef BB_FEATURE_LS_FILETYPES
 188 static char append_char(mode_t mode)
 189 {
 190         if ( !(list_fmt & LIST_FILETYPE))
 191                 return '\0';
 192         if ((list_fmt & LIST_EXEC) && S_ISREG(mode)
 193             && (mode & (S_IXUSR | S_IXGRP | S_IXOTH))) return '*';
 194                 return APPCHAR(mode);
 195 }
 196 #endif
 197
 198 /*----------------------------------------------------------------------*/
 199 static void nexttabstop( void )
 200 {
 201         static short nexttab= 0;
 202         int n=0;
 203
 204         if (column > 0) {
 205                 n= nexttab - column;
 206                 if (n < 1) n= 1;
 207                 while (n--) {
 208                         fprintf(stdout, " ");
 209                         column++;
 210                 }
 211         }
 212         nexttab= column + column_width + COLUMN_GAP ;
 213 }
 214
 215 /*----------------------------------------------------------------------*/
 216 int countdirs(struct dnode **dn, int nfiles)
 217 {
 218         int i, dirs;
 219
 220         /* count how many dirs and regular files there are */
 221         if (dn==NULL || nfiles < 1) return(0);
 222         dirs= 0;
 223         for (i=0; i<nfiles; i++) {
 224                 if (S_ISDIR(dn[i]->dstat.st_mode)) dirs++;
 225         }
 226         return(dirs);
 227 }
 228
 229 int countfiles(struct dnode **dnp)
 230 {
 231         int nfiles;
 232         struct dnode *cur;
 233
 234         if (dnp == NULL) return(0);
 235         nfiles= 0;
 236         for (cur= dnp[0];  cur->next != NULL ; cur= cur->next) nfiles++;
 237         nfiles++;
 238         return(nfiles);
 239 }
 240
 241 /* get memory to hold an array of pointers */
 242 struct dnode **dnalloc(int num)
 243 {
 244         struct dnode **p;
 245
 246         if (num < 1) return(NULL);
 247
 248         p= (struct dnode **)xcalloc((size_t)num, (size_t)(sizeof(struct dnode *)));
 249         return(p);
 250 }
 251
 252 void dfree(struct dnode **dnp)
 253 {
 254         struct dnode *cur, *next;
 255
 256         if(dnp == NULL) return;
 257
 258         cur=dnp[0];
 259         while (cur != NULL) {
 260                 if (cur->fullname != NULL) free(cur->fullname); /* free the filename */
 261                 next= cur->next;
 262                 free(cur);                              /* free the dnode */
 263                 cur= next;
 264         }
 265         free(dnp);      /* free the array holding the dnode pointers */
 266 }
 267
 268 struct dnode **splitdnarray(struct dnode **dn, int nfiles, int which)
 269 {
 270         int dncnt, i, d;
 271         struct dnode **dnp;
 272
 273         if (dn==NULL || nfiles < 1) return(NULL);
 274
 275         /* count how many dirs and regular files there are */
 276         dncnt= countdirs(dn, nfiles); /* assume we are looking for dirs */
 277         if (which != SPLIT_DIR)
 278                 dncnt= nfiles - dncnt;  /* looking for files */
 279
 280         /* allocate a file array and a dir array */
 281         dnp= dnalloc(dncnt);
 282
 283         /* copy the entrys into the file or dir array */
 284         for (d= i=0; i<nfiles; i++) {
 285                 if (which == SPLIT_DIR) {
 286                         if (S_ISDIR(dn[i]->dstat.st_mode)) {
 287                                 dnp[d++]= dn[i];
 288                         }  /* else skip the file */
 289                 } else {
 290                         if (!(S_ISDIR(dn[i]->dstat.st_mode))) {
 291                                 dnp[d++]= dn[i];
 292                         }  /* else skip the dir */
 293                 }
 294         }
 295         return(dnp);
 296 }
 297
 298 /*----------------------------------------------------------------------*/
 299 #ifdef BB_FEATURE_LS_SORTFILES
 300 int sortcmp(struct dnode *d1, struct dnode *d2)
 301 {
 302         int cmp, dif;
 303
 304         cmp= 0;
 305         if (sort_opts == SORT_SIZE) {
 306                 dif= (int)(d1->dstat.st_size - d2->dstat.st_size);
 307         } else if (sort_opts == SORT_ATIME) {
 308                 dif= (int)(d1->dstat.st_atime - d2->dstat.st_atime);
 309         } else if (sort_opts == SORT_CTIME) {
 310                 dif= (int)(d1->dstat.st_ctime - d2->dstat.st_ctime);
 311         } else if (sort_opts == SORT_MTIME) {
 312                 dif= (int)(d1->dstat.st_mtime - d2->dstat.st_mtime);
 313         } else if (sort_opts == SORT_DIR) {
 314                 dif= S_ISDIR(d1->dstat.st_mode) - S_ISDIR(d2->dstat.st_mode);
 315         /* } else if (sort_opts == SORT_VERSION) { */
 316         /* } else if (sort_opts == SORT_EXT) { */
 317         } else {    /* assume SORT_NAME */
 318                 dif= 0;
 319         }
 320
 321         if (dif > 0) cmp= -1;
 322         if (dif < 0) cmp=  1;
 323         if (dif == 0) {
 324                 /* sort by name- may be a tie_breaker for time or size cmp */
 325                 dif= strcmp(d1->name, d2->name);
 326                 if (dif > 0) cmp=  1;
 327                 if (dif < 0) cmp= -1;
 328         }
 329
 330         if (sort_order == SORT_REVERSE) {
 331                 cmp=  -1 * cmp;
 332         }
 333         return(cmp);
 334 }
 335
 336 /*----------------------------------------------------------------------*/
 337 void shellsort(struct dnode **dn, int size)
 338 {
 339         struct dnode *temp;
 340         int gap, i, j;
 341
 342         /* shell short the array */
 343         if(dn==NULL || size < 2) return;
 344
 345         for (gap= size/2; gap>0; gap /=2) {
 346                 for (i=gap; i<size; i++) {
 347                         for (j= i-gap; j>=0; j-=gap) {
 348                                 if (sortcmp(dn[j], dn[j+gap]) <= 0)
 349                                         break;
 350                                 /* they are out of order, swap them */
 351                                 temp= dn[j];
 352                                 dn[j]= dn[j+gap];
 353                                 dn[j+gap]= temp;
 354                         }
 355                 }
 356         }
 357 }
 358 #endif
 359
 360 /*----------------------------------------------------------------------*/
 361 void showfiles(struct dnode **dn, int nfiles)
 362 {
 363         int i, ncols, nrows, row, nc;
 364 #ifdef BB_FEATURE_AUTOWIDTH
 365         int len;
 366 #endif
 367
 368         if(dn==NULL || nfiles < 1) return;
 369
 370 #ifdef BB_FEATURE_AUTOWIDTH
 371         /* find the longest file name-  use that as the column width */
 372         column_width= 0;
 373         for (i=0; i<nfiles; i++) {
 374                 len= strlen(dn[i]->name) +
 375                         ((list_fmt & LIST_INO) ? 8 : 0) +
 376                         ((list_fmt & LIST_BLOCKS) ? 5 : 0)
 377                         ;
 378                 if (column_width < len) column_width= len;
 379         }
 380 #endif
 381         ncols= (int)(terminal_width / (column_width + COLUMN_GAP));
 382         switch (style_fmt) {
 383                 case STYLE_LONG:        /* one record per line, extended info */
 384                 case STYLE_SINGLE:      /* one record per line */
 385                         ncols= 1;
 386                         break;
 387         }
 388
 389         nrows= nfiles / ncols;
 390         if ((nrows * ncols) < nfiles) nrows++; /* round up fractionals */
 391
 392         if (nrows > nfiles) nrows= nfiles;
 393         for (row=0; row<nrows; row++) {
 394                 for (nc=0; nc<ncols; nc++) {
 395                         /* reach into the array based on the column and row */
 396                         i= (nc * nrows) + row;          /* assume display by column */
 397                         if (disp_opts & DISP_ROWS)
 398                                 i= (row * ncols) + nc;  /* display across row */
 399                         if (i < nfiles) {
 400                                 nexttabstop();
 401                                 list_single(dn[i]);
 402                         }
 403                 }
 404                 newline();
 405         }
 406 }
 407
 408 /*----------------------------------------------------------------------*/
 409 void showdirs(struct dnode **dn, int ndirs)
 410 {
 411         int i, nfiles;
 412         struct dnode **subdnp;
 413 #ifdef BB_FEATURE_LS_SORTFILES
 414         int dndirs;
 415         struct dnode **dnd;
 416 #endif
 417
 418         if (dn==NULL || ndirs < 1) return;
 419
 420         for (i=0; i<ndirs; i++) {
 421                 if (disp_opts & (DISP_DIRNAME | DISP_RECURSIVE)) {
 422                         fprintf(stdout, "\n%s:\n", dn[i]->fullname);
 423                 }
 424                 subdnp= list_dir(dn[i]->fullname);
 425                 nfiles= countfiles(subdnp);
 426                 if (nfiles > 0) {
 427                         /* list all files at this level */
 428 #ifdef BB_FEATURE_LS_SORTFILES
 429                         shellsort(subdnp, nfiles);
 430 #endif
 431                         showfiles(subdnp, nfiles);
 432 #ifdef BB_FEATURE_LS_RECURSIVE
 433                         if (disp_opts & DISP_RECURSIVE) {
 434                                 /* recursive- list the sub-dirs */
 435                                 dnd= splitdnarray(subdnp, nfiles, SPLIT_DIR);
 436                                 dndirs= countdirs(subdnp, nfiles);
 437                                 if (dndirs > 0) {
 438                                         shellsort(dnd, dndirs);
 439                                         showdirs(dnd, dndirs);
 440                                         free(dnd);  /* free the array of dnode pointers to the dirs */
 441                                 }
 442                         }
 443                         dfree(subdnp);  /* free the dnodes and the fullname mem */
 444 #endif
 445                 }
 446         }
 447 }
 448
 449 /*----------------------------------------------------------------------*/
 450 struct dnode **list_dir(char *path)
 451 {
 452         struct dnode *dn, *cur, **dnp;
 453         struct dirent *entry;
 454         DIR *dir;
 455         int i, nfiles;
 456
 457         if (path==NULL) return(NULL);
 458
 459         dn= NULL;
 460         nfiles= 0;
 461         dir = opendir(path);
 462         if (dir == NULL) {
 463                 errorMsg("%s: %s\n", path, strerror(errno));
 464                 status = EXIT_FAILURE;
 465                 return(NULL);   /* could not open the dir */
 466         }
 467         while ((entry = readdir(dir)) != NULL) {
 468                 /* are we going to list the file- it may be . or .. or a hidden file */
 469                 if ((strcmp(entry->d_name, ".")==0) && !(disp_opts & DISP_DOT)) continue;
 470                 if ((strcmp(entry->d_name, "..")==0) && !(disp_opts & DISP_DOT)) continue;
 471                 if ((entry->d_name[0] ==  '.') && !(disp_opts & DISP_HIDDEN)) continue;
 472                 cur= (struct dnode *)xmalloc(sizeof(struct dnode));
 473                 cur->fullname = xmalloc(strlen(path)+1+strlen(entry->d_name)+1);
 474                 strcpy(cur->fullname, path);
 475                 if (cur->fullname[strlen(cur->fullname)-1] != '/')
 476                         strcat(cur->fullname, "/");
 477                 cur->name= cur->fullname + strlen(cur->fullname);
 478                 strcat(cur->fullname, entry->d_name);
 479 #ifdef BB_FEATURE_LS_FOLLOWLINKS
 480                 if (follow_links == TRUE) {
 481                         if (stat(cur->fullname, &cur->dstat)) {
 482                                 errorMsg("%s: %s\n", cur->fullname, strerror(errno));
 483                                 status = EXIT_FAILURE;
 484                                 free(cur->fullname);
 485                                 free(cur);
 486                                 continue;
 487                         }
 488                 } else
 489 #endif
 490                 if (lstat(cur->fullname, &cur->dstat)) {   /* get file stat info into node */
 491                         errorMsg("%s: %s\n", cur->fullname, strerror(errno));
 492                         status = EXIT_FAILURE;
 493                         free(cur->fullname);
 494                         free(cur);
 495                         continue;
 496                 }
 497                 cur->next= dn;
 498                 dn= cur;
 499                 nfiles++;
 500         }
 501         closedir(dir);
 502
 503         /* now that we know how many files there are
 504         ** allocate memory for an array to hold dnode pointers
 505         */
 506         if (nfiles < 1) return(NULL);
 507         dnp= dnalloc(nfiles);
 508         for (i=0, cur=dn; i<nfiles; i++) {
 509                 dnp[i]= cur;   /* save pointer to node in array */
 510                 cur= cur->next;
 511         }
 512
 513         return(dnp);
 514 }
 515
 516 /*----------------------------------------------------------------------*/
 517 int list_single(struct dnode *dn)
 518 {
 519         int i, len;
 520         char scratch[BUFSIZ + 1];
 521 #ifdef BB_FEATURE_LS_TIMESTAMPS
 522         char *filetime;
 523         time_t ttime, age;
 524 #endif
 525 #ifdef BB_FEATURE_LS_FILETYPES
 526         struct stat info;
 527         char append;
 528 #endif
 529
 530         if (dn==NULL || dn->fullname==NULL) return(0);
 531
 532 #ifdef BB_FEATURE_LS_TIMESTAMPS
 533         ttime= dn->dstat.st_mtime;      /* the default time */
 534         if (time_fmt & TIME_ACCESS) ttime= dn->dstat.st_atime;
 535         if (time_fmt & TIME_CHANGE) ttime= dn->dstat.st_ctime;
 536         filetime= ctime(&ttime);
 537 #endif
 538 #ifdef BB_FEATURE_LS_FILETYPES
 539         append = append_char(dn->dstat.st_mode);
 540 #endif
 541
 542         for (i=0; i<=31; i++) {
 543                 switch (list_fmt & (1<<i)) {
 544                         case LIST_INO:
 545                                 fprintf(stdout, "%7ld ", dn->dstat.st_ino);
 546                                 column += 8;
 547                                 break;
 548                         case LIST_BLOCKS:
 549 #if _FILE_OFFSET_BITS == 64
 550                                 fprintf(stdout, "%4lld ", dn->dstat.st_blocks>>1);
 551 #else
 552                                 fprintf(stdout, "%4ld ", dn->dstat.st_blocks>>1);
 553 #endif
 554                                 column += 5;
 555                                 break;
 556                         case LIST_MODEBITS:
 557                                 fprintf(stdout, "%10s", (char *)modeString(dn->dstat.st_mode));
 558                                 column += 10;
 559                                 break;
 560                         case LIST_NLINKS:
 561                                 fprintf(stdout, "%4d ", dn->dstat.st_nlink);
 562                                 column += 10;
 563                                 break;
 564                         case LIST_ID_NAME:
 565 #ifdef BB_FEATURE_LS_USERNAME
 566                                 {
 567                                         memset(&info, 0, sizeof(struct stat));
 568                                         memset(scratch, 0, sizeof(scratch));
 569                                         if (!stat(dn->fullname, &info)) {
 570                                                 my_getpwuid(scratch, info.st_uid);
 571                                         }
 572                                         if (*scratch) {
 573                                                 fprintf(stdout, "%-8.8s ", scratch);
 574                                         } else {
 575                                                 fprintf(stdout, "%-8d ", dn->dstat.st_uid);
 576                                         }
 577                                         memset(scratch, 0, sizeof(scratch));
 578                                         if (info.st_ctime != 0) {
 579                                                 my_getgrgid(scratch, info.st_gid);
 580                                         }
 581                                         if (*scratch) {
 582                                                 fprintf(stdout, "%-8.8s", scratch);
 583                                         } else {
 584                                                 fprintf(stdout, "%-8d", dn->dstat.st_gid);
 585                                         }
 586                                 column += 17;
 587                                 }
 588                                 break;
 589 #endif
 590                         case LIST_ID_NUMERIC:
 591                                 fprintf(stdout, "%-8d %-8d", dn->dstat.st_uid, dn->dstat.st_gid);
 592                                 column += 17;
 593                                 break;
 594                         case LIST_SIZE:
 595                         case LIST_DEV:
 596                                 if (S_ISBLK(dn->dstat.st_mode) || S_ISCHR(dn->dstat.st_mode)) {
 597                                         fprintf(stdout, "%4d, %3d ", (int)MAJOR(dn->dstat.st_rdev), (int)MINOR(dn->dstat.st_rdev));
 598                                 } else {
 599 #if _FILE_OFFSET_BITS == 64
 600                                         fprintf(stdout, "%9lld ", dn->dstat.st_size);
 601 #else
 602                                         fprintf(stdout, "%9ld ", dn->dstat.st_size);
 603 #endif
 604                                 }
 605                                 column += 10;
 606                                 break;
 607 #ifdef BB_FEATURE_LS_TIMESTAMPS
 608                         case LIST_FULLTIME:
 609                         case LIST_DATE_TIME:
 610                                 if (list_fmt & LIST_FULLTIME) {
 611                                         fprintf(stdout, "%24.24s ", filetime);
 612                                         column += 25;
 613                                         break;
 614                                 }
 615                                 age = time(NULL) - ttime;
 616                                 fprintf(stdout, "%6.6s ", filetime+4);
 617                                 if (age < 3600L * 24 * 365 / 2 && age > -15 * 60) {
 618                                         /* hh:mm if less than 6 months old */
 619                                         fprintf(stdout, "%5.5s ", filetime+11);
 620                                 } else {
 621                                         fprintf(stdout, " %4.4s ", filetime+20);
 622                                 }
 623                                 column += 13;
 624                                 break;
 625 #endif
 626                         case LIST_FILENAME:
 627                                 fprintf(stdout, "%s", dn->name);
 628                                 column += strlen(dn->name);
 629                                 break;
 630                         case LIST_SYMLINK:
 631                                 if (S_ISLNK(dn->dstat.st_mode)) {
 632                                         len= readlink(dn->fullname, scratch, (sizeof scratch)-1);
 633                                         if (len > 0) {
 634                                                 scratch[len]= '\0';
 635                                                 fprintf(stdout, " -> %s", scratch);
 636 #ifdef BB_FEATURE_LS_FILETYPES
 637                                                 if (!stat(dn->fullname, &info)) {
 638                                                         append = append_char(info.st_mode);
 639                                                 }
 640 #endif
 641                                                 column += len+4;
 642                                         }
 643                                 }
 644                                 break;
 645 #ifdef BB_FEATURE_LS_FILETYPES
 646                         case LIST_FILETYPE:
 647                                 if (append != '\0') {
 648                                         fprintf(stdout, "%1c", append);
 649                                         column++;
 650                                 }
 651                                 break;
 652 #endif
 653                 }
 654         }
 655
 656         return(0);
 657 }
 658
 659 /*----------------------------------------------------------------------*/
 660 extern int ls_main(int argc, char **argv)
 661 {
 662         struct dnode **dnf, **dnd;
 663         int dnfiles, dndirs;
 664         struct dnode *dn, *cur, **dnp;
 665         int i, nfiles;
 666         int opt;
 667         int oi, ac;
 668         char **av;
 669
 670         disp_opts= DISP_NORMAL;
 671         style_fmt= STYLE_AUTO;
 672         list_fmt=  LIST_SHORT;
 673 #ifdef BB_FEATURE_LS_SORTFILES
 674         sort_opts= SORT_NAME;
 675 #endif
 676 #ifdef BB_FEATURE_LS_TIMESTAMPS
 677         time_fmt= TIME_MOD;
 678 #endif
 679         nfiles=0;
 680
 681         applet_name= argv[0];
 682         /* process options */
 683         while ((opt = getopt(argc, argv, "1AaCdgilnsx"
 684 #ifdef BB_FEATURE_AUTOWIDTH
 685 "T:w:"
 686 #endif
 687 #ifdef BB_FEATURE_LS_FILETYPES
 688 "Fp"
 689 #endif
 690 #ifdef BB_FEATURE_LS_RECURSIVE
 691 "R"
 692 #endif
 693 #ifdef BB_FEATURE_LS_SORTFILES
 694 "rSvX"
 695 #endif
 696 #ifdef BB_FEATURE_LS_TIMESTAMPS
 697 "cetu"
 698 #endif
 699 #ifdef BB_FEATURE_LS_FOLLOWLINKS
 700 "L"
 701 #endif
 702         )) > 0) {
 703                 switch (opt) {
 704                         case '1': style_fmt = STYLE_SINGLE; break;
 705                         case 'A': disp_opts |= DISP_HIDDEN; break;
 706                         case 'a': disp_opts |= DISP_HIDDEN | DISP_DOT; break;
 707                         case 'C': style_fmt = STYLE_COLUMNS; break;
 708                         case 'd': disp_opts |= DISP_NOLIST; break;
 709                         case 'e': list_fmt |= LIST_FULLTIME; break;
 710                         case 'g': /* ignore -- for ftp servers */ break;
 711                         case 'i': list_fmt |= LIST_INO; break;
 712                         case 'l': style_fmt = STYLE_LONG; list_fmt |= LIST_LONG; break;
 713                         case 'n': list_fmt |= LIST_ID_NUMERIC; break;
 714                         case 's': list_fmt |= LIST_BLOCKS; break;
 715                         case 'x': disp_opts = DISP_ROWS; break;
 716 #ifdef BB_FEATURE_LS_FILETYPES
 717                         case 'F': list_fmt |= LIST_FILETYPE | LIST_EXEC; break;
 718                         case 'p': list_fmt |= LIST_FILETYPE; break;
 719 #endif
 720 #ifdef BB_FEATURE_LS_RECURSIVE
 721                         case 'R': disp_opts |= DISP_RECURSIVE; break;
 722 #endif
 723 #ifdef BB_FEATURE_LS_SORTFILES
 724                         case 'r': sort_order |= SORT_REVERSE; break;
 725                         case 'S': sort_opts= SORT_SIZE; break;
 726                         case 'v': sort_opts= SORT_VERSION; break;
 727                         case 'X': sort_opts= SORT_EXT; break;
 728 #endif
 729 #ifdef BB_FEATURE_LS_TIMESTAMPS
 730                         case 'c': time_fmt = TIME_CHANGE; sort_opts= SORT_CTIME; break;
 731                         case 't': sort_opts= SORT_MTIME; break;
 732                         case 'u': time_fmt = TIME_ACCESS; sort_opts= SORT_ATIME; break;
 733 #endif
 734 #ifdef BB_FEATURE_LS_FOLLOWLINKS
 735                         case 'L': follow_links= TRUE; break;
 736 #endif
 737 #ifdef BB_FEATURE_AUTOWIDTH
 738                         case 'T': tabstops= atoi(optarg); break;
 739                         case 'w': terminal_width= atoi(optarg); break;
 740 #endif
 741                         default:
 742                                 goto print_usage_message;
 743                 }
 744         }
 745
 746         /* sort out which command line options take precedence */
 747 #ifdef BB_FEATURE_LS_RECURSIVE
 748         if (disp_opts & DISP_NOLIST)
 749                 disp_opts &= ~DISP_RECURSIVE;   /* no recurse if listing only dir */
 750 #endif
 751 #ifdef BB_FEATURE_LS_TIMESTAMPS
 752         if (time_fmt & TIME_CHANGE) sort_opts= SORT_CTIME;
 753         if (time_fmt & TIME_ACCESS) sort_opts= SORT_ATIME;
 754 #endif
 755         if (style_fmt != STYLE_LONG)
 756                         list_fmt &= ~LIST_ID_NUMERIC;  /* numeric uid only for long list */
 757 #ifdef BB_FEATURE_LS_USERNAME
 758         if (style_fmt == STYLE_LONG && (list_fmt & LIST_ID_NUMERIC))
 759                         list_fmt &= ~LIST_ID_NAME;  /* don't list names if numeric uid */
 760 #endif
 761
 762         /* choose a display format */
 763         if (style_fmt == STYLE_AUTO)
 764                 style_fmt = isatty(fileno(stdout)) ? STYLE_COLUMNS : STYLE_SINGLE;
 765
 766         /*
 767          * when there are no cmd line args we have to supply a default "." arg.
 768          * we will create a second argv array, "av" that will hold either
 769          * our created "." arg, or the real cmd line args.  The av array
 770          * just holds the pointers- we don't move the date the pointers
 771          * point to.
 772          */
 773         ac= argc - optind;   /* how many cmd line args are left */
 774         if (ac < 1) {
 775                 av= (char **)xcalloc((size_t)1, (size_t)(sizeof(char *)));
 776                 av[0]= xstrdup(".");
 777                 ac=1;
 778         } else {
 779                 av= (char **)xcalloc((size_t)ac, (size_t)(sizeof(char *)));
 780                 for (oi=0 ; oi < ac; oi++) {
 781                         av[oi]= argv[optind++];  /* copy pointer to real cmd line arg */
 782                 }
 783         }
 784
 785         /* now, everything is in the av array */
 786         if (ac > 1)
 787                 disp_opts |= DISP_DIRNAME;   /* 2 or more items? label directories */
 788
 789         /* stuff the command line file names into an dnode array */
 790         dn=NULL;
 791         for (oi=0 ; oi < ac; oi++) {
 792                 cur= (struct dnode *)xmalloc(sizeof(struct dnode));
 793                 cur->fullname= xstrdup(av[oi]);
 794                 cur->name= cur->fullname;
 795 #ifdef BB_FEATURE_LS_FOLLOWLINKS
 796                 if (follow_links == TRUE) {
 797                         if (stat(av[oi], &cur->dstat)) {
 798                                 errorMsg("%s: %s\n", av[oi], strerror(errno));
 799                                 status = EXIT_FAILURE;
 800                                 free(cur->fullname);
 801                                 free(cur);
 802                                 continue;
 803                         }
 804                 } else
 805 #endif
 806                 if (lstat(av[oi], &cur->dstat)) {  /* get file info into node */
 807                         errorMsg("%s: %s\n", av[oi], strerror(errno));
 808                         status = EXIT_FAILURE;
 809                         free(cur->fullname);
 810                         free(cur);
 811                         continue;
 812                 }
 813                 cur->next= dn;
 814                 dn= cur;
 815                 nfiles++;
 816         }
 817
 818         /* now that we know how many files there are
 819         ** allocate memory for an array to hold dnode pointers
 820         */
 821         dnp= dnalloc(nfiles);
 822         for (i=0, cur=dn; i<nfiles; i++) {
 823                 dnp[i]= cur;   /* save pointer to node in array */
 824                 cur= cur->next;
 825         }
 826
 827
 828         if (disp_opts & DISP_NOLIST) {
 829 #ifdef BB_FEATURE_LS_SORTFILES
 830                 shellsort(dnp, nfiles);
 831 #endif
 832                 if (nfiles > 0) showfiles(dnp, nfiles);
 833         } else {
 834                 dnd= splitdnarray(dnp, nfiles, SPLIT_DIR);
 835                 dnf= splitdnarray(dnp, nfiles, SPLIT_FILE);
 836                 dndirs= countdirs(dnp, nfiles);
 837                 dnfiles= nfiles - dndirs;
 838                 if (dnfiles > 0) {
 839 #ifdef BB_FEATURE_LS_SORTFILES
 840                         shellsort(dnf, dnfiles);
 841 #endif
 842                         showfiles(dnf, dnfiles);
 843                 }
 844                 if (dndirs > 0) {
 845 #ifdef BB_FEATURE_LS_SORTFILES
 846                         shellsort(dnd, dndirs);
 847 #endif
 848                         showdirs(dnd, dndirs);
 849                 }
 850         }
 851
 852         return(status);
 853
 854   print_usage_message:
 855         usage(ls_usage);
 856         return(FALSE);
 857 }