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  * \section tls
  21  *
  22  * tls -- Trivial recursive ls, for comparing two directories after
  23  * running an rsync.
  24  *
  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.
  29  *
  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".
  33  *
  34  * The format is not exactly the same as any particular Unix ls(1).
  35  *
  36  * A key requirement for this program is that the output be "very
  37  * reproducible."  So we mask away information that can accidentally
  38  * change.
  39  **/
  40
  41
  42
  43 #include "rsync.h"
  44
  45 #define PROGRAM "tls"
  46
  47 /* These are to make syscall.o shut up. */
  48 int dry_run = 0;
  49 int read_only = 1;
  50 int list_only = 0;
  51
  52
  53 static void failed (char const *what,
  54                     char const *where)
  55 {
  56         fprintf (stderr, PROGRAM ": %s %s: %s\n",
  57                  what, where, strerror (errno));
  58         exit (1);
  59 }
  60
  61
  62
  63 static void list_file (const char *fname)
  64 {
  65         STRUCT_STAT buf;
  66         char permbuf[PERMSTRING_SIZE];
  67         struct tm *mt;
  68         char datebuf[50];
  69         char linkbuf[4096];
  70
  71         if (do_lstat(fname, &buf) == -1)
  72                 failed ("stat", fname);
  73
  74         /* The size of anything but a regular file is probably not
  75          * worth thinking about. */
  76         if (!S_ISREG(buf.st_mode))
  77                 buf.st_size = 0;
  78
  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)) {
  83                 int len;
  84                 buf.st_mode &= ~0777;
  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);
  90                 if (len == -1)
  91                         failed("readlink", fname);
  92                 else
  93                         /* it's not nul-terminated */
  94                         linkbuf[4+len] = 0;
  95         } else {
  96                 linkbuf[0] = 0;
  97         }
  98
  99         permstring(permbuf, buf.st_mode);
 100
 101         if (buf.st_mtime) {
 102                 mt = gmtime(&buf.st_mtime);
 103
 104                 sprintf(datebuf, "%04d-%02d-%02d %02d:%02d:%02d",
 105                         mt->tm_year + 1900,
 106                         mt->tm_mon + 1,
 107                         mt->tm_mday,
 108                         mt->tm_hour,
 109                         mt->tm_min,
 110                         mt->tm_sec);
 111         } else {
 112                 strcpy(datebuf, "                   ");
 113         }
 114
 115         /* TODO: Perhaps escape special characters in fname? */
 116
 117
 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,
 123                buf.st_nlink,
 124                datebuf, fname, linkbuf);
 125 }
 126
 127
 128 int main (int argc, char *argv[])
 129 {
 130         if (argc < 2) {
 131                 fprintf (stderr, "usage: " PROGRAM " DIR ...\n"
 132                          "Trivial file listing program for portably checking rsync\n");
 133                 return 1;
 134         }
 135
 136         for (argv++; *argv; argv++) {
 137                 list_file (*argv);
 138         }
 139
 140         return 0;
 141 }