/* -*- c-file-style: "linux" -*-
*
- * Copyright (C) 2001 by Martin Pool <mbp@samba.org>
+ * Copyright (C) 2001, 2002 by Martin Pool <mbp@samba.org>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License version
*/
/**
- * \section tls
+ * @file tls.c
*
- * tls -- Trivial recursive ls, for comparing two directories after
- * running an rsync.
+ * Trivial @c ls for comparing two directories after running an rsync.
*
* The problem with using the system's own ls is that some features
* have little quirks that make directories look different when for
**/
-
#include "rsync.h"
#define PROGRAM "tls"
static void list_file (const char *fname)
{
- struct stat buf;
+ STRUCT_STAT buf;
char permbuf[PERMSTRING_SIZE];
struct tm *mt;
char datebuf[50];
+ char linkbuf[4096];
if (do_lstat(fname, &buf) == -1)
failed ("stat", fname);
* undefined. Also it tends not to be possible to reset a
* symlink's mtime, so we have to ignore it too. */
if (S_ISLNK(buf.st_mode)) {
+ int len;
buf.st_mode &= ~0777;
buf.st_mtime = (time_t)0;
buf.st_uid = buf.st_gid = 0;
+ strcpy(linkbuf, " -> ");
+ /* const-cast required for silly UNICOS headers */
+ len = readlink((char *) fname, linkbuf+4, sizeof(linkbuf) - 4);
+ if (len == -1)
+ failed("readlink", fname);
+ else
+ /* it's not nul-terminated */
+ linkbuf[4+len] = 0;
+ } else {
+ linkbuf[0] = 0;
}
permstring(permbuf, buf.st_mode);
/* NB: need to pass size as a double because it might be be
* too large for a long. */
- printf("%s %12.0f %6d.%-6d %s %s\n",
+ printf("%s %12.0f %6ld.%-6ld %6d %s %s%s\n",
permbuf, (double) buf.st_size,
- buf.st_uid, buf.st_gid,
- datebuf, fname);
+ (long) buf.st_uid, (long) buf.st_gid,
+ buf.st_nlink,
+ datebuf, fname, linkbuf);
}