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