git.sur5r.net Git - bacula/bacula/blob - bacula/src/tools/testls.c

   1 /*
   2  * Test program for listing files during regression testing
   3  */
   4
   5 /*
   6    Copyright (C) 2000-2003 Kern Sibbald and John Walker
   7
   8    This program is free software; you can redistribute it and/or
   9    modify it under the terms of the GNU General Public License as
  10    published by the Free Software Foundation; either version 2 of
  11    the License, or (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16    General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public
  19    License along with this program; if not, write to the Free
  20    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  21    MA 02111-1307, USA.
  22
  23  */
  24
  25 #include "bacula.h"
  26 #include "findlib/find.h"
  27
  28 #if defined(HAVE_CYGWIN) || defined(HAVE_WIN32)
  29 int win32_client = 1;
  30 #else
  31 int win32_client = 0;
  32 #endif
  33
  34
  35 /* Global variables */
  36 int attrs = 0;
  37
  38 static JCR *jcr;
  39
  40
  41 static int print_file(FF_PKT *ff, void *pkt);
  42 static void print_ls_output(char *fname, char *link, int type, struct stat *statp);
  43
  44 static void usage()
  45 {
  46    fprintf(stderr, _(
  47 "\n"
  48 "Usage: testls [-d debug_level] [-] [pattern1 ...]\n"
  49 "       -a          print extended attributes (Win32 debug)\n"
  50 "       -dnn        set debug level to nn\n"
  51 "       -e          specify file of exclude patterns\n"
  52 "       -i          specify file of include patterns\n"
  53 "       -           read pattern(s) from stdin\n"
  54 "       -?          print this message.\n"
  55 "\n"
  56 "Patterns are file inclusion -- normally directories.\n"
  57 "Debug level >= 1 prints each file found.\n"
  58 "Debug level >= 10 prints path/file for catalog.\n"
  59 "Errors always printed.\n"
  60 "Files/paths truncated is number with len > 255.\n"
  61 "Truncation is only in catalog.\n"
  62 "\n"));
  63
  64    exit(1);
  65 }
  66
  67
  68 int
  69 main (int argc, char *const *argv)
  70 {
  71    FF_PKT *ff;
  72    char name[1000];
  73    int i, ch, hard_links;
  74    char *inc = NULL;
  75    char *exc = NULL;
  76    FILE *fd;
  77
  78    while ((ch = getopt(argc, argv, "ad:e:i:?")) != -1) {
  79       switch (ch) {
  80       case 'a':                       /* print extended attributes *debug* */
  81          attrs = 1;
  82          break;
  83
  84       case 'd':                       /* set debug level */
  85          debug_level = atoi(optarg);
  86          if (debug_level <= 0) {
  87             debug_level = 1;
  88          }
  89          break;
  90
  91       case 'e':                       /* exclude patterns */
  92          exc = optarg;
  93          break;
  94
  95       case 'i':                       /* include patterns */
  96          inc = optarg;
  97          break;
  98
  99       case '?':
 100       default:
 101          usage();
 102
 103       }
 104    }
 105    argc -= optind;
 106    argv += optind;
 107
 108    jcr = new_jcr(sizeof(JCR), NULL);
 109
 110    ff = init_find_files();
 111    if (argc == 0 && !inc) {
 112       add_fname_to_include_list(ff, 0, "/"); /* default to / */
 113    } else {
 114       for (i=0; i < argc; i++) {
 115          if (strcmp(argv[i], "-") == 0) {
 116              while (fgets(name, sizeof(name)-1, stdin)) {
 117                 strip_trailing_junk(name);
 118                 add_fname_to_include_list(ff, 0, name);
 119               }
 120               continue;
 121          }
 122          add_fname_to_include_list(ff, 0, argv[i]);
 123       }
 124    }
 125    if (inc) {
 126       fd = fopen(inc, "r");
 127       if (!fd) {
 128          printf("Could not open include file: %s\n", inc);
 129          exit(1);
 130       }
 131       while (fgets(name, sizeof(name)-1, fd)) {
 132          strip_trailing_junk(name);
 133          add_fname_to_include_list(ff, 0, name);
 134       }
 135       fclose(fd);
 136    }
 137
 138    if (exc) {
 139       fd = fopen(exc, "r");
 140       if (!fd) {
 141          printf("Could not open exclude file: %s\n", exc);
 142          exit(1);
 143       }
 144       while (fgets(name, sizeof(name)-1, fd)) {
 145          strip_trailing_junk(name);
 146          add_fname_to_exclude_list(ff, name);
 147       }
 148       fclose(fd);
 149    }
 150    find_files(jcr, ff, print_file, NULL);
 151    hard_links = term_find_files(ff);
 152
 153    free_jcr(jcr);
 154    close_memory_pool();
 155    sm_dump(false);
 156    exit(0);
 157 }
 158
 159 static int print_file(FF_PKT *ff, void *pkt)
 160 {
 161
 162    switch (ff->type) {
 163    case FT_LNKSAVED:
 164    case FT_REGE:
 165    case FT_REG:
 166    case FT_LNK:
 167    case FT_DIREND:
 168    case FT_SPEC:
 169       print_ls_output(ff->fname, ff->link, ff->type, &ff->statp);
 170       break;
 171    case FT_DIRBEGIN:
 172       break;
 173    case FT_NOACCESS:
 174       printf(_("Err: Could not access %s: %s\n"), ff->fname, strerror(errno));
 175       break;
 176    case FT_NOFOLLOW:
 177       printf(_("Err: Could not follow ff->link %s: %s\n"), ff->fname, strerror(errno));
 178       break;
 179    case FT_NOSTAT:
 180       printf(_("Err: Could not stat %s: %s\n"), ff->fname, strerror(errno));
 181       break;
 182    case FT_NOCHG:
 183       printf(_("Skip: File not saved. No change. %s\n"), ff->fname);
 184       break;
 185    case FT_ISARCH:
 186       printf(_("Err: Attempt to backup archive. Not saved. %s\n"), ff->fname);
 187       break;
 188    case FT_NORECURSE:
 189       printf(_("Recursion turned off. Directory not entered. %s\n"), ff->fname);
 190       break;
 191    case FT_NOFSCHG:
 192       printf(_("Skip: File system change prohibited. Directory not entered. %s\n"), ff->fname);
 193       break;
 194    case FT_NOOPEN:
 195       printf(_("Err: Could not open directory %s: %s\n"), ff->fname, strerror(errno));
 196       break;
 197    default:
 198       printf(_("Err: Unknown file ff->type %d: %s\n"), ff->type, ff->fname);
 199       break;
 200    }
 201    return 1;
 202 }
 203
 204 static void print_ls_output(char *fname, char *link, int type, struct stat *statp)
 205 {
 206    char buf[1000];
 207    char ec1[30];
 208    char *p, *f;
 209    int n;
 210
 211    if (type == FT_LNK) {
 212       statp->st_mtime = 0;
 213       statp->st_mode |= 0777;
 214    }
 215    p = encode_mode(statp->st_mode, buf);
 216    n = sprintf(p, " %2d ", (uint32_t)statp->st_nlink);
 217    p += n;
 218    n = sprintf(p, "%-4d %-4d", (int)statp->st_uid, (int)statp->st_gid);
 219    p += n;
 220    n = sprintf(p, "%7.7s ", edit_uint64(statp->st_size, ec1));
 221    p += n;
 222    if (S_ISCHR(statp->st_mode) || S_ISBLK(statp->st_mode)) {
 223       n = sprintf(p, "%4x ", (int)statp->st_rdev);
 224    } else {
 225       n = sprintf(p, "     ");
 226    }
 227    p += n;
 228    p = encode_time(statp->st_mtime, p);
 229    *p++ = ' ';
 230    /* Copy file name */
 231    for (f=fname; *f && (p-buf) < (int)sizeof(buf); )
 232       *p++ = *f++;
 233    if (type == FT_LNK) {
 234       *p++ = '-';
 235       *p++ = '>';
 236       *p++ = ' ';
 237       /* Copy link name */
 238       for (f=link; *f && (p-buf) < (int)sizeof(buf); )
 239          *p++ = *f++;
 240    }
 241    *p++ = '\n';
 242    *p = 0;
 243    fputs(buf, stdout);
 244 }