projects / unix-history / blobdiff
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
file reorg, pathnames.h, paths.h
[unix-history] / usr / src / bin / ls / ls.c
diff --git a/usr/src/bin/ls/ls.c b/usr/src/bin/ls/ls.c
index e205ee0..73d82fc 100644 (file)
--- a/usr/src/bin/ls/ls.c
+++ b/usr/src/bin/ls/ls.c
@@ -1,6 +1,18 @@
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
 #ifndef lint
 #ifndef lint
-static char *sccsid = "@(#)ls.c        4.22 (Berkeley) %G%";
-#endif
+char copyright[] =
+"@(#) Copyright (c) 1980 Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif not lint
+
+#ifndef lint
+static char sccsid[] = "@(#)ls.c       5.11 (Berkeley) %G%";
+#endif not lint
 
 /*
  * ls
 
 /*
  * ls
@@ -21,9 +33,9 @@ struct afile {
        ino_t   fnum;           /* inode number of file */
        short   fflags;         /* mode&~S_IFMT, perhaps ISARG */
        short   fnl;            /* number of links */
        ino_t   fnum;           /* inode number of file */
        short   fflags;         /* mode&~S_IFMT, perhaps ISARG */
        short   fnl;            /* number of links */
-       short   fuid;           /* owner id */
-       short   fgid;           /* group id */
-       long    fsize;          /* file size */
+       uid_t   fuid;           /* owner id */
+       gid_t   fgid;           /* group id */
+       off_t   fsize;          /* file size */
        long    fblks;          /* number of blocks used */
        time_t  fmtime;         /* time (modify or access or create) */
        char    *fname;         /* file name */
        long    fblks;          /* number of blocks used */
        time_t  fmtime;         /* time (modify or access or create) */
        char    *fname;         /* file name */
@@ -38,7 +50,7 @@ struct subdirs {
 } *subdirs;
 
 int    aflg, dflg, gflg, lflg, sflg, tflg, uflg, iflg, fflg, cflg, rflg = 1;
 } *subdirs;
 
 int    aflg, dflg, gflg, lflg, sflg, tflg, uflg, iflg, fflg, cflg, rflg = 1;
-int    qflg, Aflg, Cflg, Fflg, Lflg, Rflg;
+int    qflg, Aflg, Cflg, Fflg, Lflg, Rflg, Sflg;
 
 int    usetabs;
 
 
 int    usetabs;
 
@@ -57,20 +69,20 @@ char        *getname(), *getgroup();
 
 char   *ctime();
 char   *malloc(), *calloc(), *realloc();
 
 char   *ctime();
 char   *malloc(), *calloc(), *realloc();
-char   *sprintf(), *strcpy(), *strcat();
+char   *strcpy(), *strcat();
 
 main(argc, argv)
        int argc;
        char *argv[];
 {
 
 main(argc, argv)
        int argc;
        char *argv[];
 {
-       int i;
+       extern int optind;
        struct afile *fp0, *fplast;
        register struct afile *fp;
        struct sgttyb sgbuf;
        struct afile *fp0, *fplast;
        register struct afile *fp;
        struct sgttyb sgbuf;
+       int ch, i;
+       time_t time();
 
 
-       argc--, argv++;
-       if (getuid() == 0)
-               Aflg++;
+       Aflg = !getuid();
        (void) time(&now); sixmonthsago = now - 6L*30L*24L*60L*60L; now += 60;
        twidth = 80;
        if (isatty(1)) {
        (void) time(&now); sixmonthsago = now - 6L*30L*24L*60L*60L; now += 60;
        twidth = 80;
        if (isatty(1)) {
@@ -78,68 +90,74 @@ main(argc, argv)
                (void) gtty(1, &sgbuf);
                if (ioctl(1, TIOCGWINSZ, &win) != -1)
                        twidth = (win.ws_col == 0 ? 80 : win.ws_col);
                (void) gtty(1, &sgbuf);
                if (ioctl(1, TIOCGWINSZ, &win) != -1)
                        twidth = (win.ws_col == 0 ? 80 : win.ws_col);
-               if ((sgbuf.sg_flags & XTABS) == 0)
+               if ((sgbuf.sg_flags & XTABS) != XTABS)
                        usetabs = 1;
        } else
                usetabs = 1;
                        usetabs = 1;
        } else
                usetabs = 1;
-       while (argc > 0 && **argv == '-') {
-               (*argv)++;
-               while (**argv) switch (*(*argv)++) {
-
-               case 'C':
-                       Cflg = 1; break;
-               case 'q':
-                       qflg = 1; break;
+       while ((ch = getopt(argc, argv, "1ACLFRacdfgilqrstu")) != EOF)
+               switch((char)ch) {
                case '1':
                        Cflg = 0; break;
                case '1':
                        Cflg = 0; break;
-               case 'a':
-                       aflg++; break;
                case 'A':
                        Aflg++; break;
                case 'A':
                        Aflg++; break;
+               case 'C':
+                       Cflg = 1; break;
+               case 'L':
+                       Lflg++; break;
+               case 'F':
+                       Fflg++; break;
+               case 'R':
+                       Rflg++; break;
+               case 'a':
+                       aflg++; break;
                case 'c':
                        cflg++; break;
                case 'c':
                        cflg++; break;
-               case 's':
-                       sflg++; break;
+               case 'S':
+                       Sflg++; /* fall into... */
                case 'd':
                        dflg++; break;
                case 'd':
                        dflg++; break;
+               case 'f':
+                       fflg++; break;
                case 'g':
                        gflg++; break;
                case 'g':
                        gflg++; break;
+               case 'i':
+                       iflg++; break;
                case 'l':
                        lflg++; break;
                case 'l':
                        lflg++; break;
+               case 'q':
+                       qflg = 1; break;
                case 'r':
                        rflg = -1; break;
                case 'r':
                        rflg = -1; break;
+               case 's':
+                       sflg++; break;
                case 't':
                        tflg++; break;
                case 'u':
                        uflg++; break;
                case 't':
                        tflg++; break;
                case 'u':
                        uflg++; break;
-               case 'i':
-                       iflg++; break;
-               case 'f':
-                       fflg++; break;
-               case 'L':
-                       Lflg++; break;
-               case 'F':
-                       Fflg++; break;
-               case 'R':
-                       Rflg++; break;
-               }
-               argc--, argv++;
+               case '?':
+               default:
+                       fputs("usage: ls [ -1ACLFRacdfgilqrstu ] [ file ]\n", stderr);
+                       exit(1);
        }
        if (fflg) { 
        }
        if (fflg) { 
-               aflg++; lflg = 0; sflg = 0; tflg = 0;
+               aflg++; Sflg = 0; tflg = 0; /* -f: only turn off sort flags */
        }
        if (lflg)
                Cflg = 0;
        }
        if (lflg)
                Cflg = 0;
+       argc -= optind;
+       argv += optind;
        if (argc == 0) {
                argc++;
                argv = &dotp;
        }
        if (argc == 0) {
                argc++;
                argv = &dotp;
        }
-       fp = (struct afile *)calloc(argc, sizeof (struct afile));
+       fp = (struct afile *)calloc((u_int)argc, sizeof (struct afile));
        if (fp == 0) {
        if (fp == 0) {
-               fprintf(stderr, "ls: out of memory\n");
+               fputs("ls: out of memory\n", stderr);
                exit(1);
        }
        fp0 = fp;
                exit(1);
        }
        fp0 = fp;
+       setpassent(1);
+       setgroupent(1);
        for (i = 0; i < argc; i++) {
                if (gstat(fp, *argv, 1, (int *)0)) {
                        fp->fname = *argv;
        for (i = 0; i < argc; i++) {
                if (gstat(fp, *argv, 1, (int *)0)) {
                        fp->fname = *argv;
@@ -163,21 +181,21 @@ main(argc, argv)
        }
        if (fp < fplast) {
                if (fp > fp0)
        }
        if (fp < fplast) {
                if (fp > fp0)
-                       printf("\n");
+                       putchar('\n');
                for (;;) {
                        formatd(fp->fname, argc > 1);
                        while (subdirs) {
                                struct subdirs *t;
 
                                t = subdirs; subdirs = t->sd_next;
                for (;;) {
                        formatd(fp->fname, argc > 1);
                        while (subdirs) {
                                struct subdirs *t;
 
                                t = subdirs; subdirs = t->sd_next;
-                               printf("\n");
+                               putchar('\n');
                                formatd(t->sd_name, 1);
                                cfree(t->sd_name);
                                cfree((char *)t);
                        }
                        if (++fp == fplast)
                                break;
                                formatd(t->sd_name, 1);
                                cfree(t->sd_name);
                                cfree((char *)t);
                        }
                        if (++fp == fplast)
                                break;
-                       printf("\n");
+                       putchar('\n');
                }
        }
        exit(0);
                }
        }
        exit(0);
@@ -200,10 +218,10 @@ formatd(name, title)
        if (title)
                printf("%s:\n", name);
        if (lflg || sflg)
        if (title)
                printf("%s:\n", name);
        if (lflg || sflg)
-               printf("total %ld\n", nkb);
+               printf("total %d\n", nkb);
        formatf(dfp0, dfplast);
        if (Rflg)
        formatf(dfp0, dfplast);
        if (Rflg)
-               for (fp = dfplast; fp >= dfp0; fp--) {
+               for (fp = dfplast - 1; fp >= dfp0; fp--) {
                        if (fp->ftype != 'd' ||
                            !strcmp(fp->fname, ".") ||
                            !strcmp(fp->fname, ".."))
                        if (fp->ftype != 'd' ||
                            !strcmp(fp->fname, ".") ||
                            !strcmp(fp->fname, ".."))
@@ -255,7 +273,7 @@ getdir(dir, pfp0, pfplast)
                        *pfp0 = (struct afile *)realloc((char *)*pfp0,
                            2 * nent * sizeof (struct afile));
                        if (*pfp0 == 0) {
                        *pfp0 = (struct afile *)realloc((char *)*pfp0,
                            2 * nent * sizeof (struct afile));
                        if (*pfp0 == 0) {
-                               fprintf(stderr, "ls: out of memory\n");
+                               fputs("ls: out of memory\n", stderr);
                                exit(1);
                        }
                        fp = *pfp0 + nent;
                                exit(1);
                        }
                        fp = *pfp0 + nent;
@@ -346,8 +364,9 @@ formatf(fp0, fplast)
        struct afile *fp0, *fplast;
 {
        register struct afile *fp;
        struct afile *fp0, *fplast;
 {
        register struct afile *fp;
-       int width = 0, w, nentry = fplast - fp0;
-       int i, j, columns, lines;
+       register int i, j, w;
+       int width = 0, nentry = fplast - fp0;
+       int columns, lines;
        char *cp;
 
        if (fp0 == fplast)
        char *cp;
 
        if (fp0 == fplast)
@@ -374,9 +393,9 @@ formatf(fp0, fplast)
                for (j = 0; j < columns; j++) {
                        fp = fp0 + j * lines + i;
                        cp = fmtentry(fp);
                for (j = 0; j < columns; j++) {
                        fp = fp0 + j * lines + i;
                        cp = fmtentry(fp);
-                       printf("%s", cp);
+                       fputs(cp, stdout);
                        if (fp + lines >= fplast) {
                        if (fp + lines >= fplast) {
-                               printf("\n");
+                               putchar('\n');
                                break;
                        }
                        w = strlen(cp);
                                break;
                        }
                        w = strlen(cp);
@@ -412,6 +431,13 @@ fcmp(f1, f2)
                        return (rflg);
                return (-rflg);
        }
                        return (rflg);
                return (-rflg);
        }
+       if (Sflg) {
+               if (f2->fsize == f1->fsize)
+                       return (0);
+               if (f2->fsize > f1->fsize)
+                       return (rflg);
+               return (-rflg);
+       }
        return (rflg * strcmp(f1->fname, f2->fname));
 }
 
        return (rflg * strcmp(f1->fname, f2->fname));
 }
 
@@ -420,19 +446,18 @@ cat(dir, file)
        char *dir, *file;
 {
        static char dfile[BUFSIZ];
        char *dir, *file;
 {
        static char dfile[BUFSIZ];
+       register int dlen;
 
 
-       if (strlen(dir)+1+strlen(file)+1 > BUFSIZ) {
-               fprintf(stderr, "ls: filename too long\n");
+       if ((dlen = strlen(dir))+1+strlen(file)+1 > BUFSIZ) {
+               fputs("ls: filename too long\n", stderr);
                exit(1);
        }
                exit(1);
        }
-       if (!strcmp(dir, "") || !strcmp(dir, ".")) {
-               (void) strcpy(dfile, file);
-               return (dfile);
-       }
+       if (!dir[0] || dir[0] == '.' && !dir[1])
+               return(strcpy(dfile, file));
        (void) strcpy(dfile, dir);
        (void) strcpy(dfile, dir);
-       if (dir[strlen(dir) - 1] != '/' && *file != '/')
-               (void) strcat(dfile, "/");
-       (void) strcat(dfile, file);
+       if (dir[dlen - 1] != '/' && *file != '/')
+               dfile[dlen++] = '/';
+       (void) strcpy(dfile + dlen, file);
        return (dfile);
 }
 
        return (dfile);
 }
 
@@ -443,11 +468,10 @@ savestr(str)
        char *cp = malloc(strlen(str) + 1);
 
        if (cp == NULL) {
        char *cp = malloc(strlen(str) + 1);
 
        if (cp == NULL) {
-               fprintf(stderr, "ls: out of memory\n");
+               fputs("ls: out of memory\n", stderr);
                exit(1);
        }
                exit(1);
        }
-       (void) strcpy(cp, str);
-       return (cp);
+       return(strcpy(cp, str));
 }
 
 char   *fmtinum(), *fmtsize(), *fmtlstuff(), *fmtmode();
 }
 
 char   *fmtinum(), *fmtsize(), *fmtlstuff(), *fmtmode();
@@ -497,7 +521,7 @@ fmtinum(p)
 {
        static char inumbuf[8];
 
 {
        static char inumbuf[8];
 
-       (void) sprintf(inumbuf, "%5d ", p->fnum);
+       (void) sprintf(inumbuf, "%6ld ", p->fnum);
        return (inumbuf);
 }
 
        return (inumbuf);
 }
 
@@ -525,7 +549,7 @@ fmtlstuff(p)
          if (cp)
                (void) sprintf(uname, "%-9.9s", cp);
          else
          if (cp)
                (void) sprintf(uname, "%-9.9s", cp);
          else
-               (void) sprintf(uname, "%-9d", p->fuid);
+               (void) sprintf(uname, "%-9u", p->fuid);
        }
 /* get gname */
        if (gflg) {
        }
 /* get gname */
        if (gflg) {
@@ -533,14 +557,14 @@ fmtlstuff(p)
          if (cp)
                (void) sprintf(gname, "%-9.9s", cp);
          else
          if (cp)
                (void) sprintf(gname, "%-9.9s", cp);
          else
-               (void) sprintf(gname, "%-9d", p->fgid);
+               (void) sprintf(gname, "%-9u", p->fgid);
        }
 /* get fsize */
        if (p->ftype == 'b' || p->ftype == 'c')
                (void) sprintf(fsize, "%3d,%4d",
                    major(p->fsize), minor(p->fsize));
        else if (p->ftype == 's')
        }
 /* get fsize */
        if (p->ftype == 'b' || p->ftype == 'c')
                (void) sprintf(fsize, "%3d,%4d",
                    major(p->fsize), minor(p->fsize));
        else if (p->ftype == 's')
-               (void) sprintf(fsize, "%8ld", 0);
+               (void) sprintf(fsize, "%8ld", 0L);
        else
                (void) sprintf(fsize, "%8ld", p->fsize);
 /* get ftime */
        else
                (void) sprintf(fsize, "%8ld", p->fsize);
 /* get ftime */
@@ -560,20 +584,20 @@ fmtlstuff(p)
 
 int    m1[] = { 1, S_IREAD>>0, 'r', '-' };
 int    m2[] = { 1, S_IWRITE>>0, 'w', '-' };
 
 int    m1[] = { 1, S_IREAD>>0, 'r', '-' };
 int    m2[] = { 1, S_IWRITE>>0, 'w', '-' };
-int    m3[] = { 2, S_ISUID, 's', S_IEXEC>>0, 'x', '-' };
+int    m3[] = { 3, S_ISUID|(S_IEXEC>>0), 's', S_ISUID, 'S', S_IEXEC>>0, 'x', '-' };
 int    m4[] = { 1, S_IREAD>>3, 'r', '-' };
 int    m5[] = { 1, S_IWRITE>>3, 'w', '-' };
 int    m4[] = { 1, S_IREAD>>3, 'r', '-' };
 int    m5[] = { 1, S_IWRITE>>3, 'w', '-' };
-int    m6[] = { 2, S_ISGID, 's', S_IEXEC>>3, 'x', '-' };
+int    m6[] = { 3, S_ISGID|(S_IEXEC>>3), 's', S_ISGID, 'S', S_IEXEC>>3, 'x', '-' };
 int    m7[] = { 1, S_IREAD>>6, 'r', '-' };
 int    m8[] = { 1, S_IWRITE>>6, 'w', '-' };
 int    m7[] = { 1, S_IREAD>>6, 'r', '-' };
 int    m8[] = { 1, S_IWRITE>>6, 'w', '-' };
-int    m9[] = { 2, S_ISVTX, 't', S_IEXEC>>6, 'x', '-' };
+int    m9[] = { 3, S_ISVTX|(S_IEXEC>>6), 't', S_ISVTX, 'T', S_IEXEC>>6, 'x', '-' };
 
 int    *m[] = { m1, m2, m3, m4, m5, m6, m7, m8, m9};
 
 char *
 fmtmode(lp, flags)
        char *lp;
 
 int    *m[] = { m1, m2, m3, m4, m5, m6, m7, m8, m9};
 
 char *
 fmtmode(lp, flags)
        char *lp;
-       int flags;
+       register int flags;
 {
        int **mp;
 
 {
        int **mp;
 
@@ -581,9 +605,9 @@ fmtmode(lp, flags)
                register int *pairp = *mp++;
                register int n = *pairp++;
 
                register int *pairp = *mp++;
                register int n = *pairp++;
 
-               while (--n >= 0 && (flags&*pairp++) == 0)
-                       pairp++;
-               *lp++ = *pairp;
+               while (--n >= 0 && (flags&*pairp) != *pairp)
+                       pairp += 2;
+               *lp++ = pairp[n>=0];
        }
        return (lp);
 }
        }
        return (lp);
 }
@@ -598,84 +622,47 @@ struct    utmp utmp;
 #define        NMAX    (sizeof (utmp.ut_name))
 #define SCPYN(a, b)    strncpy(a, b, NMAX)
 
 #define        NMAX    (sizeof (utmp.ut_name))
 #define SCPYN(a, b)    strncpy(a, b, NMAX)
 
-#define NUID   64      /* power of 2 */
-#define UIDMASK        0x3f
-#define NGID   300
-
-struct ncache {
-       int     uid;
-       char    name[NMAX+1];
-} nc[NUID];
-char   outrangename[NMAX+1];
-int    outrangeuid = -1;
-char   groups[NGID][NMAX+1];
-char   outrangegroup[NMAX+1];
-int    outrangegid = -1;
+#define NCACHE 64              /* power of 2 */
+#define CAMASK NCACHE - 1
 
 char *
 getname(uid)
 
 char *
 getname(uid)
+       uid_t uid;
 {
 {
+       static struct ncache {
+               uid_t   uid;
+               char    name[NMAX+1];
+       } c_uid[NCACHE];
        register struct passwd *pw;
        register struct passwd *pw;
-       struct passwd *getpwent();
-       extern int _pw_stayopen;
-       register int cp;
-
-       _pw_stayopen = 1;
-       cp = uid & UIDMASK;
-       if (uid >= 0 && nc[cp].uid == uid && nc[cp].name[0])
-               return (nc[cp].name);
-       pw = getpwuid(uid);
-       if (!pw)
-               return (0);
-       nc[cp].uid = uid;
-       SCPYN(nc[cp].name, pw->pw_name);
-       return (nc[cp].name);
+       register struct ncache *cp;
+
+       cp = c_uid + (uid & CAMASK);
+       if (cp->uid == uid && *cp->name)
+               return(cp->name);
+       if (!(pw = getpwuid(uid)))
+               return((char *)0);
+       cp->uid = uid;
+       SCPYN(cp->name, pw->pw_name);
+       return(cp->name);
 }
 
 char *
 getgroup(gid)
 }
 
 char *
 getgroup(gid)
+       gid_t gid;
 {
 {
+       static struct ncache {
+               gid_t   gid;
+               char    name[NMAX+1];
+       } c_gid[NCACHE];
        register struct group *gr;
        register struct group *gr;
-       static init;
-       struct group *getgrent();
-
-       if (gid >= 0 && gid < NGID && groups[gid][0])
-               return (&groups[gid][0]);
-       if (gid >= 0 && gid == outrangegid)
-               return (outrangegroup);
-rescan:
-       if (init == 2) {
-               if (gid < NGID)
-                       return (0);
-               setgrent();
-               while (gr = getgrent()) {
-                       if (gr->gr_gid != gid)
-                               continue;
-                       outrangegid = gr->gr_gid;
-                       SCPYN(outrangegroup, gr->gr_name);
-                       endgrent();
-                       return (outrangegroup);
-               }
-               endgrent();
-               return (0);
-       }
-       if (init == 0)
-               setgrent(), init = 1;
-       while (gr = getgrent()) {
-               if (gr->gr_gid < 0 || gr->gr_gid >= NGID) {
-                       if (gr->gr_gid == gid) {
-                               outrangegid = gr->gr_gid;
-                               SCPYN(outrangegroup, gr->gr_name);
-                               return (outrangegroup);
-                       }
-                       continue;
-               }
-               if (groups[gr->gr_gid][0])
-                       continue;
-               SCPYN(groups[gr->gr_gid], gr->gr_name);
-               if (gr->gr_gid == gid)
-                       return (&groups[gid][0]);
-       }
-       init = 2;
-       goto rescan;
+       register struct ncache *cp;
+
+       cp = c_gid + (gid & CAMASK);
+       if (cp->gid == gid && *cp->name)
+               return(cp->name);
+       if (!(gr = getgrgid(gid)))
+               return((char *)0);
+       cp->gid = gid;
+       SCPYN(cp->name, gr->gr_name);
+       return(cp->name);
 }
 }
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.