c91f4db94e45cba521d565e66cb6567e36070c86
[rsync/rsync.git] / tls.c
1 /* -*- c-file-style: "linux" -*-
2  *
3  * Copyright (C) 2001, 2002 by Martin Pool <mbp@samba.org>
4  * 
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.
8  * 
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.
13  * 
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.
17  */
18
19 /**
20  * @file tls.c
21  *
22  * Trivial @c ls for comparing two directories after running an rsync.
23  *
24  * The problem with using the system's own ls is that some features
25  * have little quirks that make directories look different when for
26  * our purposes they're the same -- for example, the BSD braindamage
27  * about setting the mode on symlinks based on your current umask.
28  *
29  * All the filenames must be given on the command line -- tls does not
30  * even read directories, let alone recurse.  The typical usage is
31  * "find|sort|xargs tls".
32  *
33  * The format is not exactly the same as any particular Unix ls(1).
34  *
35  * A key requirement for this program is that the output be "very
36  * reproducible."  So we mask away information that can accidentally
37  * change.
38  **/
39
40
41 #include "rsync.h"
42
43 #define PROGRAM "tls"
44
45 /* These are to make syscall.o shut up. */
46 int dry_run = 0;
47 int read_only = 1;
48 int list_only = 0;
49 int preserve_perms = 0;
50
51
52 static void failed (char const *what,
53                     char const *where)
54 {
55         fprintf (stderr, PROGRAM ": %s %s: %s\n",
56                  what, where, strerror (errno));
57         exit (1);
58 }
59
60
61
62 static void list_file (const char *fname)
63 {
64         STRUCT_STAT buf;
65         char permbuf[PERMSTRING_SIZE];
66         struct tm *mt;
67         char datebuf[50];
68         char linkbuf[4096];
69
70         if (do_lstat(fname, &buf) == -1)
71                 failed ("stat", fname);
72
73         /* The size of anything but a regular file is probably not
74          * worth thinking about. */
75         if (!S_ISREG(buf.st_mode))
76                 buf.st_size = 0;
77
78         /* On some BSD platforms the mode bits of a symlink are
79          * undefined.  Also it tends not to be possible to reset a
80          * symlink's mtime, so we have to ignore it too. */
81         if (S_ISLNK(buf.st_mode)) {
82                 int len;
83                 buf.st_mode &= ~0777;
84                 buf.st_mtime = (time_t)0;
85                 buf.st_uid = buf.st_gid = 0;
86                 strcpy(linkbuf, " -> ");
87                 /* const-cast required for silly UNICOS headers */
88                 len = readlink((char *) fname, linkbuf+4, sizeof(linkbuf) - 4);
89                 if (len == -1) 
90                         failed("readlink", fname);
91                 else
92                         /* it's not nul-terminated */
93                         linkbuf[4+len] = 0;
94         } else {
95                 linkbuf[0] = 0;
96         }
97
98         permstring(permbuf, buf.st_mode);
99
100         if (buf.st_mtime) {
101                 mt = gmtime(&buf.st_mtime);
102                 
103                 sprintf(datebuf, "%04d-%02d-%02d %02d:%02d:%02d",
104                         mt->tm_year + 1900,
105                         mt->tm_mon + 1,
106                         mt->tm_mday,
107                         mt->tm_hour,
108                         mt->tm_min,
109                         mt->tm_sec);
110         } else {
111                 strcpy(datebuf, "                   ");
112         }
113         
114         /* TODO: Perhaps escape special characters in fname? */
115         
116         
117         /* NB: need to pass size as a double because it might be be
118          * too large for a long. */
119         printf("%s %12.0f %6ld.%-6ld %6d %s %s%s\n",
120                permbuf, (double) buf.st_size,
121                (long) buf.st_uid, (long) buf.st_gid,
122                buf.st_nlink,
123                datebuf, fname, linkbuf);
124 }
125
126
127 int main (int argc, char *argv[])
128 {
129         if (argc < 2) {
130                 fprintf (stderr, "usage: " PROGRAM " DIR ...\n"
131                          "Trivial file listing program for portably checking rsync\n");
132                 return 1;
133         }
134
135         for (argv++; *argv; argv++) {
136                 list_file (*argv);
137         }
138
139         return 0;
140 }