2 * Trivial ls for comparing two directories after running an rsync.
4 * Copyright (C) 2001, 2002 Martin Pool <mbp@samba.org>
5 * Copyright (C) 2003-2007 Wayne Davison
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License version 2 as
9 * published by the Free Software Foundation.
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.
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, write to the Free Software Foundation, Inc.,
18 * 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
21 /* The problem with using the system's own ls is that some features
22 * have little quirks that make directories look different when for
23 * our purposes they're the same -- for example, the BSD braindamage
24 * about setting the mode on symlinks based on your current umask.
26 * All the filenames must be given on the command line -- tls does not
27 * even read directories, let alone recurse. The typical usage is
28 * "find|sort|xargs tls".
30 * The format is not exactly the same as any particular Unix ls(1).
32 * A key requirement for this program is that the output be "very
33 * reproducible." So we mask away information that can accidentally
38 #include "lib/sysxattrs.h"
42 /* These are to make syscall.o shut up. */
47 int preserve_perms = 0;
51 #ifdef HAVE_LINUX_XATTRS
52 #define XSTAT_ATTR "user.rsync.%stat"
54 #define XSTAT_ATTR "rsync.%stat"
57 static int stat_xattr(const char *fname, STRUCT_STAT *fst)
59 int mode, rdev_major, rdev_minor, uid, gid, len;
62 if (am_root >= 0 || IS_DEVICE(fst->st_mode) || IS_SPECIAL(fst->st_mode))
65 len = sys_lgetxattr(fname, XSTAT_ATTR, buf, sizeof buf - 1);
66 if (len >= (int)sizeof buf) {
71 if (errno == ENOTSUP || errno == ENOATTR)
73 if (errno == EPERM && S_ISLNK(fst->st_mode)) {
78 fprintf(stderr, "failed to read xattr %s for %s: %s\n",
79 XSTAT_ATTR, fname, strerror(errno));
84 if (sscanf(buf, "%o %d,%d %d:%d",
85 &mode, &rdev_major, &rdev_minor, &uid, &gid) != 5) {
86 fprintf(stderr, "Corrupt %s xattr attached to %s: \"%s\"\n",
87 XSTAT_ATTR, fname, buf);
91 fst->st_mode = from_wire_mode(mode);
92 fst->st_rdev = MAKEDEV(rdev_major, rdev_minor);
101 static void failed(char const *what, char const *where)
103 fprintf(stderr, PROGRAM ": %s %s: %s\n",
104 what, where, strerror(errno));
108 static void list_file(const char *fname)
111 char permbuf[PERMSTRING_SIZE];
116 if (do_lstat(fname, &buf) < 0)
117 failed("stat", fname);
118 #ifdef SUPPORT_XATTRS
120 stat_xattr(fname, &buf);
123 /* The size of anything but a regular file is probably not
124 * worth thinking about. */
125 if (!S_ISREG(buf.st_mode))
128 /* On some BSD platforms the mode bits of a symlink are
129 * undefined. Also it tends not to be possible to reset a
130 * symlink's mtime, so we have to ignore it too. */
131 if (S_ISLNK(buf.st_mode)) {
133 buf.st_mode &= ~0777;
134 buf.st_mtime = (time_t)0;
135 buf.st_uid = buf.st_gid = 0;
136 strlcpy(linkbuf, " -> ", sizeof linkbuf);
137 /* const-cast required for silly UNICOS headers */
138 len = readlink((char *) fname, linkbuf+4, sizeof(linkbuf) - 4);
140 failed("readlink", fname);
142 /* it's not nul-terminated */
148 permstring(permbuf, buf.st_mode);
151 mt = gmtime(&buf.st_mtime);
153 snprintf(datebuf, sizeof datebuf,
154 "%04d-%02d-%02d %02d:%02d:%02d",
155 (int)mt->tm_year + 1900,
162 strlcpy(datebuf, " ", sizeof datebuf);
164 /* TODO: Perhaps escape special characters in fname? */
166 printf("%s ", permbuf);
167 if (S_ISCHR(buf.st_mode) || S_ISBLK(buf.st_mode)) {
169 (long)major(buf.st_rdev),
170 (long)minor(buf.st_rdev));
171 } else /* NB: use double for size since it might not fit in a long. */
172 printf("%12.0f", (double)buf.st_size);
173 printf(" %6ld.%-6ld %6ld %s %s%s\n",
174 (long)buf.st_uid, (long)buf.st_gid, (long)buf.st_nlink,
175 datebuf, fname, linkbuf);
178 static struct poptOption long_options[] = {
179 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
180 #ifdef SUPPORT_XATTRS
181 {"fake-super", 'f', POPT_ARG_VAL, &am_root, -1, 0, 0 },
183 {"help", 'h', POPT_ARG_NONE, 0, 'h', 0, 0 },
187 static void tls_usage(int ret)
189 FILE *F = ret ? stderr : stdout;
190 fprintf(F,"usage: " PROGRAM " [OPTIONS] FILE ...\n");
191 fprintf(F,"Trivial file listing program for portably checking rsync\n");
192 fprintf(F,"\nOptions:\n");
193 #ifdef SUPPORT_XATTRS
194 fprintf(F," -f, --fake-super display attributes including fake-super xattrs\n");
196 fprintf(F," -h, --help show this help\n");
201 main(int argc, char *argv[])
204 const char **extra_args;
207 pc = poptGetContext(PROGRAM, argc, (const char **)argv,
209 while ((opt = poptGetNextOpt(pc)) != -1) {
216 poptBadOption(pc, POPT_BADOPTION_NOALIAS),
222 extra_args = poptGetArgs(pc);
223 if (!extra_args || *extra_args == NULL)
226 for (; *extra_args; extra_args++)
227 list_file(*extra_args);