/*
* Garbage collect and trim memory if possible
* This should be called after all big memory usages
* if possible.
*/
void garbage_collect_memory()
{
close_memory_pool(); /* release free chain */
#ifdef HAVE_MALLOC_TRIM
P(mutex);
malloc_trim(8192);
V(mutex);
#endif
}
/* Cleanup and then exit */
void terminate_dird(int sig)
{
static bool already_here = false;
if (already_here) { /* avoid recursive temination problems */
bmicrosleep(2, 0); /* yield */
exit(1);
}
already_here = true;
debug_level = 0; /* turn off debug */
stop_watchdog();
db_sql_pool_destroy();
db_flush_backends();
unload_dir_plugins();
write_state_file(me->working_directory, "bareos-dir", get_first_port_host_order(me->DIRaddrs));
delete_pid_file(me->pid_directory, "bareos-dir", get_first_port_host_order(me->DIRaddrs));
term_scheduler();
term_job_server();
if (runjob) {
free(runjob);
}
if (configfile != NULL) {
free(configfile);
}
if (debug_level > 5) {
print_memory_pool_stats();
}
if (my_config) {
my_config->free_resources();
free(my_config);
my_config = NULL;
}
stop_UA_server();
term_msg(); /* terminate message handler */
cleanup_crypto();
close_memory_pool(); /* release free memory in pool */
lmgr_cleanup_main();
sm_dump(false);
exit(sig);
}
int main(int argc, char *const *argv)
{
FF_PKT *ff;
char name[1000];
bool quiet = false;
int i, ch;
char *inc = NULL;
char *exc = NULL;
FILE *fd;
setlocale(LC_ALL, "");
bindtextdomain("bacula", LOCALEDIR);
textdomain("bacula");
lmgr_init_thread();
while ((ch = getopt(argc, argv, "ad:e:i:q?")) != -1) {
switch (ch) {
case 'a': /* print extended attributes *debug* */
attrs = 1;
break;
case 'd': /* set debug level */
if (*optarg == 't') {
dbg_timestamp = true;
} else {
debug_level = atoi(optarg);
if (debug_level <= 0) {
debug_level = 1;
}
}
break;
case 'e': /* exclude patterns */
exc = optarg;
break;
case 'i': /* include patterns */
inc = optarg;
break;
case 'q':
quiet = true;
break;
case '?':
default:
usage();
}
}
argc -= optind;
argv += optind;
jcr = new_jcr(sizeof(JCR), NULL);
ff = init_find_files();
if (argc == 0 && !inc) {
add_fname_to_include_list(ff, 0, "/"); /* default to / */
} else {
for (i=0; i < argc; i++) {
if (strcmp(argv[i], "-") == 0) {
while (fgets(name, sizeof(name)-1, stdin)) {
strip_trailing_junk(name);
add_fname_to_include_list(ff, 0, name);
}
continue;
}
add_fname_to_include_list(ff, 0, argv[i]);
}
}
if (inc) {
fd = fopen(inc, "rb");
if (!fd) {
printf(_("Could not open include file: %s\n"), inc);
exit(1);
}
while (fgets(name, sizeof(name)-1, fd)) {
strip_trailing_junk(name);
add_fname_to_include_list(ff, 0, name);
}
fclose(fd);
}
if (exc) {
fd = fopen(exc, "rb");
if (!fd) {
printf(_("Could not open exclude file: %s\n"), exc);
exit(1);
}
while (fgets(name, sizeof(name)-1, fd)) {
strip_trailing_junk(name);
add_fname_to_exclude_list(ff, name);
}
fclose(fd);
}
if (quiet) {
match_files(jcr, ff, count_files);
} else {
match_files(jcr, ff, print_file);
}
printf(_("Files seen = %d\n"), num_files);
term_include_exclude_files(ff);
term_find_files(ff);
free_jcr(jcr);
term_last_jobs_list(); /* free jcr chain */
close_memory_pool();
lmgr_cleanup_main();
sm_dump(false);
exit(0);
}
