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

   1 /*
   2  * Test program for find files
   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
  29 #if defined(HAVE_CYGWIN) || defined(HAVE_WIN32)
  30 int win32_client = 1;
  31 #else
  32 int win32_client = 0;
  33 #endif
  34
  35
  36 /* Global variables */
  37 static int num_files = 0;
  38 static int max_file_len = 0;
  39 static int max_path_len = 0;
  40 static int trunc_fname = 0;
  41 static int trunc_path = 0;
  42 static int attrs = 0;
  43
  44 static JCR *jcr;
  45
  46 static int print_file(FF_PKT *ff, void *pkt, bool);
  47 static void count_files(FF_PKT *ff);
  48
  49 static void usage()
  50 {
  51    fprintf(stderr, _(
  52 "\n"
  53 "Usage: testfind [-d debug_level] [-] [pattern1 ...]\n"
  54 "       -a          print extended attributes (Win32 debug)\n"
  55 "       -dnn        set debug level to nn\n"
  56 "       -e          specify file of exclude patterns\n"
  57 "       -i          specify file of include patterns\n"
  58 "       -           read pattern(s) from stdin\n"
  59 "       -?          print this message.\n"
  60 "\n"
  61 "Patterns are used for file inclusion -- normally directories.\n"
  62 "Debug level >= 1 prints each file found.\n"
  63 "Debug level >= 10 prints path/file for catalog.\n"
  64 "Errors are always printed.\n"
  65 "Files/paths truncated is the number of files/paths with len > 255.\n"
  66 "Truncation is only in the catalog.\n"
  67 "\n"));
  68
  69    exit(1);
  70 }
  71
  72
  73 int
  74 main (int argc, char *const *argv)
  75 {
  76    FF_PKT *ff;
  77    char name[1000];
  78    int i, ch, hard_links;
  79    char *inc = NULL;
  80    char *exc = NULL;
  81    FILE *fd;
  82
  83    while ((ch = getopt(argc, argv, "ad:e:i:?")) != -1) {
  84       switch (ch) {
  85          case 'a':                    /* print extended attributes *debug* */
  86             attrs = 1;
  87             break;
  88
  89          case 'd':                    /* set debug level */
  90             debug_level = atoi(optarg);
  91             if (debug_level <= 0) {
  92                debug_level = 1;
  93             }
  94             break;
  95
  96          case 'e':                    /* exclude patterns */
  97             exc = optarg;
  98             break;
  99
 100          case 'i':                    /* include patterns */
 101             inc = optarg;
 102             break;
 103
 104          case '?':
 105          default:
 106             usage();
 107
 108       }
 109    }
 110    argc -= optind;
 111    argv += optind;
 112
 113    jcr = new_jcr(sizeof(JCR), NULL);
 114
 115    ff = init_find_files();
 116    if (argc == 0 && !inc) {
 117       add_fname_to_include_list(ff, 0, "/"); /* default to / */
 118    } else {
 119       for (i=0; i < argc; i++) {
 120          if (strcmp(argv[i], "-") == 0) {
 121              while (fgets(name, sizeof(name)-1, stdin)) {
 122                 strip_trailing_junk(name);
 123                 add_fname_to_include_list(ff, 0, name);
 124               }
 125               continue;
 126          }
 127          add_fname_to_include_list(ff, 0, argv[i]);
 128       }
 129    }
 130    if (inc) {
 131       fd = fopen(inc, "r");
 132       if (!fd) {
 133          printf("Could not open include file: %s\n", inc);
 134          exit(1);
 135       }
 136       while (fgets(name, sizeof(name)-1, fd)) {
 137          strip_trailing_junk(name);
 138          add_fname_to_include_list(ff, 0, name);
 139       }
 140       fclose(fd);
 141    }
 142
 143    if (exc) {
 144       fd = fopen(exc, "r");
 145       if (!fd) {
 146          printf("Could not open exclude file: %s\n", exc);
 147          exit(1);
 148       }
 149       while (fgets(name, sizeof(name)-1, fd)) {
 150          strip_trailing_junk(name);
 151          add_fname_to_exclude_list(ff, name);
 152       }
 153       fclose(fd);
 154    }
 155    match_files(jcr, ff, print_file, NULL);
 156    term_include_exclude_files(ff);
 157    hard_links = term_find_files(ff);
 158
 159    printf(_(""
 160 "Total files    : %d\n"
 161 "Max file length: %d\n"
 162 "Max path length: %d\n"
 163 "Files truncated: %d\n"
 164 "Paths truncated: %d\n"
 165 "Hard links     : %d\n"),
 166      num_files, max_file_len, max_path_len,
 167      trunc_fname, trunc_path, hard_links);
 168
 169   free_jcr(jcr);
 170   close_memory_pool();
 171   sm_dump(false);
 172   exit(0);
 173 }
 174
 175 static int print_file(FF_PKT *ff, void *pkt, bool top_level)
 176 {
 177
 178    switch (ff->type) {
 179    case FT_LNKSAVED:
 180       if (debug_level == 1) {
 181          printf("%s\n", ff->fname);
 182       } else if (debug_level > 1) {
 183          printf("Lnka: %s -> %s\n", ff->fname, ff->link);
 184       }
 185       break;
 186    case FT_REGE:
 187       if (debug_level == 1) {
 188          printf("%s\n", ff->fname);
 189       } else if (debug_level > 1) {
 190          printf("Empty: %s\n", ff->fname);
 191       }
 192       count_files(ff);
 193       break;
 194    case FT_REG:
 195       if (debug_level == 1) {
 196          printf("%s\n", ff->fname);
 197       } else if (debug_level > 1) {
 198          printf("Reg: %s\n", ff->fname);
 199       }
 200       count_files(ff);
 201       break;
 202    case FT_LNK:
 203       if (debug_level == 1) {
 204          printf("%s\n", ff->fname);
 205       } else if (debug_level > 1) {
 206          printf("Lnk: %s -> %s\n", ff->fname, ff->link);
 207       }
 208       count_files(ff);
 209       break;
 210    case FT_DIRBEGIN:
 211       return 1;
 212    case FT_NORECURSE:
 213    case FT_NOFSCHG:
 214    case FT_INVALIDFS:
 215    case FT_DIREND:
 216       if (debug_level) {
 217          char errmsg[100] = "";
 218          if (ff->type == FT_NORECURSE) {
 219             bstrncpy(errmsg, "\t[will not descend: recursion turned off]", sizeof(errmsg));
 220          } else if (ff->type == FT_NOFSCHG) {
 221             bstrncpy(errmsg, "\t[will not descend: file system change not allowed]", sizeof(errmsg));
 222          } else if (ff->type == FT_INVALIDFS) {
 223             bstrncpy(errmsg, "\t[will not descend: disallowed file system]", sizeof(errmsg));
 224          }
 225          printf("%s%s%s\n", (debug_level > 1 ? "Dir: " : ""), ff->fname, errmsg);
 226       }
 227       ff->type = FT_DIREND;
 228       count_files(ff);
 229       break;
 230    case FT_SPEC:
 231       if (debug_level == 1) {
 232          printf("%s\n", ff->fname);
 233       } else if (debug_level > 1) {
 234          printf("Spec: %s\n", ff->fname);
 235       }
 236       count_files(ff);
 237       break;
 238    case FT_NOACCESS:
 239       printf(_("Err: Could not access %s: %s\n"), ff->fname, strerror(errno));
 240       break;
 241    case FT_NOFOLLOW:
 242       printf(_("Err: Could not follow ff->link %s: %s\n"), ff->fname, strerror(errno));
 243       break;
 244    case FT_NOSTAT:
 245       printf(_("Err: Could not stat %s: %s\n"), ff->fname, strerror(errno));
 246       break;
 247    case FT_NOCHG:
 248       printf(_("Skip: File not saved. No change. %s\n"), ff->fname);
 249       break;
 250    case FT_ISARCH:
 251       printf(_("Err: Attempt to backup archive. Not saved. %s\n"), ff->fname);
 252       break;
 253    case FT_NOOPEN:
 254       printf(_("Err: Could not open directory %s: %s\n"), ff->fname, strerror(errno));
 255       break;
 256    default:
 257       printf(_("Err: Unknown file ff->type %d: %s\n"), ff->type, ff->fname);
 258       break;
 259    }
 260    if (attrs) {
 261       char attr[200];
 262       encode_attribsEx(NULL, attr, ff);
 263       if (*attr != 0) {
 264          printf("AttrEx=%s\n", attr);
 265       }
 266 //    set_attribsEx(NULL, ff->fname, NULL, NULL, ff->type, attr);
 267    }
 268    return 1;
 269 }
 270
 271 static void count_files(FF_PKT *ar)
 272 {
 273    int fnl, pnl;
 274    char *l, *p;
 275    char file[MAXSTRING];
 276    char spath[MAXSTRING];
 277
 278    num_files++;
 279
 280    /* Find path without the filename.
 281     * I.e. everything after the last / is a "filename".
 282     * OK, maybe it is a directory name, but we treat it like
 283     * a filename. If we don't find a / then the whole name
 284     * must be a path name (e.g. c:).
 285     */
 286    for (p=l=ar->fname; *p; p++) {
 287       if (*p == '/') {
 288          l = p;                       /* set pos of last slash */
 289       }
 290    }
 291    if (*l == '/') {                   /* did we find a slash? */
 292       l++;                            /* yes, point to filename */
 293    } else {                           /* no, whole thing must be path name */
 294       l = p;
 295    }
 296
 297    /* If filename doesn't exist (i.e. root directory), we
 298     * simply create a blank name consisting of a single
 299     * space. This makes handling zero length filenames
 300     * easier.
 301     */
 302    fnl = p - l;
 303    if (fnl > max_file_len) {
 304       max_file_len = fnl;
 305    }
 306    if (fnl > 255) {
 307       printf(_("===== Filename truncated to 255 chars: %s\n"), l);
 308       fnl = 255;
 309       trunc_fname++;
 310    }
 311    if (fnl > 0) {
 312       strncpy(file, l, fnl);          /* copy filename */
 313       file[fnl] = 0;
 314    } else {
 315       file[0] = ' ';                  /* blank filename */
 316       file[1] = 0;
 317    }
 318
 319    pnl = l - ar->fname;
 320    if (pnl > max_path_len) {
 321       max_path_len = pnl;
 322    }
 323    if (pnl > 255) {
 324       printf(_("========== Path name truncated to 255 chars: %s\n"), ar->fname);
 325       pnl = 255;
 326       trunc_path++;
 327    }
 328    strncpy(spath, ar->fname, pnl);
 329    spath[pnl] = 0;
 330    if (pnl == 0) {
 331       spath[0] = ' ';
 332       spath[1] = 0;
 333       printf(_("========== Path length is zero. File=%s\n"), ar->fname);
 334    }
 335    if (debug_level >= 10) {
 336       printf("Path: %s\n", spath);
 337       printf("File: %s\n", file);
 338    }
 339
 340 }