1 /* -*- c-file-style: "linux" -*-
3 * Copyright (C) 2001, 2002 by Martin Pool <mbp@samba.org>
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License version
7 * 2 as published by the Free Software Foundation.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 * tls -- Trivial recursive ls, for comparing two directories after
25 * The problem with using the system's own ls is that some features
26 * have little quirks that make directories look different when for
27 * our purposes they're the same -- for example, the BSD braindamage
28 * about setting the mode on symlinks based on your current umask.
30 * All the filenames must be given on the command line -- tls does not
31 * even read directories, let alone recurse. The typical usage is
32 * "find|sort|xargs tls".
34 * The format is not exactly the same as any particular Unix ls(1).
36 * A key requirement for this program is that the output be "very
37 * reproducible." So we mask away information that can accidentally
47 /* These are to make syscall.o shut up. */
53 static void failed (char const *what,
56 fprintf (stderr, PROGRAM ": %s %s: %s\n",
57 what, where, strerror (errno));
63 static void list_file (const char *fname)
66 char permbuf[PERMSTRING_SIZE];
71 if (do_lstat(fname, &buf) == -1)
72 failed ("stat", fname);
74 /* The size of anything but a regular file is probably not
75 * worth thinking about. */
76 if (!S_ISREG(buf.st_mode))
79 /* On some BSD platforms the mode bits of a symlink are
80 * undefined. Also it tends not to be possible to reset a
81 * symlink's mtime, so we have to ignore it too. */
82 if (S_ISLNK(buf.st_mode)) {
85 buf.st_mtime = (time_t)0;
86 buf.st_uid = buf.st_gid = 0;
87 strcpy(linkbuf, " -> ");
88 /* const-cast required for silly UNICOS headers */
89 len = readlink((char *) fname, linkbuf+4, sizeof(linkbuf) - 4);
91 failed("readlink", fname);
93 /* it's not nul-terminated */
99 permstring(permbuf, buf.st_mode);
102 mt = gmtime(&buf.st_mtime);
104 sprintf(datebuf, "%04d-%02d-%02d %02d:%02d:%02d",
112 strcpy(datebuf, " ");
115 /* TODO: Perhaps escape special characters in fname? */
118 /* NB: need to pass size as a double because it might be be
119 * too large for a long. */
120 printf("%s %12.0f %6d.%-6d %6d %s %s%s\n",
121 permbuf, (double) buf.st_size,
122 buf.st_uid, buf.st_gid,
124 datebuf, fname, linkbuf);
128 int main (int argc, char *argv[])
131 fprintf (stderr, "usage: " PROGRAM " DIR ...\n"
132 "Trivial file listing program for portably checking rsync\n");
136 for (argv++; *argv; argv++) {