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