]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/dird/ua_restore.c
kes Simplify locking in the reservations system.
[bacula/bacula] / bacula / src / dird / ua_restore.c
index f45832be4fdbcb4fe6a1767ceed8b789fb047d88..b3ec5f420668fbfc6952c708f14b7aab94407911 100644 (file)
 /*
- *
- *   Bacula Director -- User Agent Database restore Command
- *     Creates a bootstrap file for restoring files
- *
- *     Kern Sibbald, July MMII
- *
- *   Version $Id$
- */
+   Bacula® - The Network Backup Solution
 
-/*
-   Copyright (C) 2002 Kern Sibbald and John Walker
+   Copyright (C) 2002-2007 Free Software Foundation Europe e.V.
 
-   This program is free software; you can redistribute it and/or
-   modify it under the terms of the GNU General Public License as
-   published by the Free Software Foundation; either version 2 of
-   the License, or (at your option) any later version.
+   The main author of Bacula is Kern Sibbald, with contributions from
+   many others, a complete list can be found in the file AUTHORS.
+   This program is Free Software; you can redistribute it and/or
+   modify it under the terms of version two of the GNU General Public
+   License as published by the Free Software Foundation plus additions
+   that are listed in the file LICENSE.
 
-   This program is distributed in the hope that it will be useful,
-   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   This program is distributed in the hope that it will be useful, but
+   WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    General Public License for more details.
 
-   You should have received a copy of the GNU General Public
-   License along with this program; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
-   MA 02111-1307, USA.
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
+   Bacula® is a registered trademark of John Walker.
+   The licensor of Bacula is the Free Software Foundation Europe
+   (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
+   Switzerland, email:ftf@fsfeurope.org.
+*/
+/*
+ *
+ *   Bacula Director -- User Agent Database restore Command
+ *      Creates a bootstrap file for restoring files and
+ *      starts the restore job.
+ *
+ *      Tree handling routines split into ua_tree.c July MMIII.
+ *      BSR (bootstrap record) handling routines split into
+ *        bsr.c July MMIII
+ *
+ *     Kern Sibbald, July MMII
+ *
+ *   Version $Id$
  */
 
+
 #include "bacula.h"
 #include "dird.h"
-#include "ua.h"
-#include <fnmatch.h>
-
 
 
 /* Imported functions */
-extern char *uar_list_jobs;
-extern char *uar_file;
-extern char *uar_sel_files;
-
-/* Context for insert_tree_handler() */
-typedef struct s_tree_ctx {
-   TREE_ROOT *root;                  /* root */
-   TREE_NODE *node;                  /* current node */
-   TREE_NODE *avail_node;            /* unused node last insert */
-   int cnt;                          /* count for user feedback */
-   UAContext *ua;
-} TREE_CTX;
-
-
-/* FileIndex entry in bootstrap record */
-typedef struct s_rbsr_findex {
-   struct s_rbsr_findex *next;
-   int32_t findex;
-   int32_t findex2;
-} RBSR_FINDEX;
-
-/* Restore bootstrap record -- not the real one, but useful here */
-typedef struct s_rbsr {
-   struct s_rbsr *next;              /* next JobId */
-   uint32_t JobId;                   /* JobId this bsr */
-   uint32_t VolSessionId;                  
-   uint32_t VolSessionTime;
-   char *VolumeName;                 /* Volume name */
-   RBSR_FINDEX *fi;                  /* File indexes this JobId */
-} RBSR;
+extern void print_bsr(UAContext *ua, RBSR *bsr);
 
-/* Forward referenced functions */
-static RBSR *new_bsr();
-static void free_bsr(RBSR *bsr);
-static void print_bsr(UAContext *ua, RBSR *bsr);
-static int  complete_bsr(UAContext *ua, RBSR *bsr);
-static int insert_tree_handler(void *ctx, int num_fields, char **row);
-static void add_findex(RBSR *bsr, uint32_t JobId, int32_t findex);
-static void user_select_files(TREE_CTX *tree);
 
 
+/* Forward referenced functions */
+static int last_full_handler(void *ctx, int num_fields, char **row);
+static int jobid_handler(void *ctx, int num_fields, char **row);
+static int user_select_jobids_or_files(UAContext *ua, RESTORE_CTX *rx);
+static int fileset_handler(void *ctx, int num_fields, char **row);
+static void free_name_list(NAME_LIST *name_list);
+static bool select_backups_before_date(UAContext *ua, RESTORE_CTX *rx, char *date);
+static bool build_directory_tree(UAContext *ua, RESTORE_CTX *rx);
+static void free_rx(RESTORE_CTX *rx);
+static void split_path_and_filename(RESTORE_CTX *rx, char *fname);
+static int jobid_fileindex_handler(void *ctx, int num_fields, char **row);
+static bool insert_file_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *file,
+                                         char *date);
+static bool insert_dir_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *dir,
+                                        char *date);
+static void insert_one_file_or_dir(UAContext *ua, RESTORE_CTX *rx, char *date, bool dir);
+static int get_client_name(UAContext *ua, RESTORE_CTX *rx);
+static int get_date(UAContext *ua, char *date, int date_len);
+static int restore_count_handler(void *ctx, int num_fields, char **row);
+static bool insert_table_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *table);
 
 /*
  *   Restore files
  *
  */
-int restorecmd(UAContext *ua, char *cmd)
+int restore_cmd(UAContext *ua, const char *cmd)
 {
-   POOLMEM *query;
-   int JobId, done = 0;
-   TREE_CTX tree;
-   RBSR *bsr;
-   char *nofname = "";
-   JOB_DBR jr;
-   char *list[] = { 
-      "List last Jobs run",
-      "Enter list of JobIds",
-      "Enter SQL list command", 
-      "Select a File",
-      "Cancel",
-      NULL };
-
-   if (!open_db(ua)) {
-      return 0;
+   RESTORE_CTX rx;                    /* restore context */
+   JOB *job;
+   int i;
+   JCR *jcr = ua->jcr;
+   char *escaped_bsr_name = NULL;
+   char *escaped_where_name = NULL;
+
+   memset(&rx, 0, sizeof(rx));
+   rx.path = get_pool_memory(PM_FNAME);
+   rx.fname = get_pool_memory(PM_FNAME);
+   rx.JobIds = get_pool_memory(PM_FNAME);
+   rx.query = get_pool_memory(PM_FNAME);
+   rx.bsr = new_bsr();
+
+   i = find_arg_with_value(ua, "where");
+   if (i >= 0) {
+      rx.where = ua->argv[i];
+      if (!acl_access_ok(ua, Where_ACL, rx.where)) {
+         ua->error_msg(_("\"where\" specification not authorized.\n"));
+         goto bail_out;
+      }
    }
 
-   memset(&tree, 0, sizeof(TREE_CTX));
-
-   for ( ; !done; ) {
-      start_prompt(ua, _("To narrow down the restore, you have the following choices:\n"));
-      for (int i=0; list[i]; i++) {
-        add_prompt(ua, list[i]);
-      }
-      done = 1;
-      switch (do_prompt(ua, "Select item: ", NULL)) {
-      case -1:
-        return 0;
-      case 0:
-        db_list_sql_query(ua->db, uar_list_jobs, prtit, ua, 1);
-         if (!get_cmd(ua, _("Enter JobId to select files for restore: "))) {
-           return 0;
-        }
-        if (!is_a_number(ua->cmd)) {
-           bsendmsg(ua, _("Bad JobId entered.\n"));
-          return 0;
-        }
-        JobId = atoi(ua->cmd);
-        break;
-
-      case 1:
-         if (!get_cmd(ua, _("Enter JobIds: "))) {
-           return 0;
-        }
-        JobId = atoi(ua->cmd);
-        break;
-      case 2:
-         if (!get_cmd(ua, _("Enter SQL list command: "))) {
-           return 0;
-        }
-        db_list_sql_query(ua->db, ua->cmd, prtit, ua, 1);
-        done = 0;
-        break;
-      case 3:
-         if (!get_cmd(ua, _("Enter Filename: "))) {
-           return 0;
-        }
-        query = get_pool_memory(PM_MESSAGE);
-        Mmsg(&query, uar_file, ua->cmd);
-        db_list_sql_query(ua->db, query, prtit, ua, 1);
-        free_pool_memory(query);
-         if (!get_cmd(ua, _("Enter JobId to select files for restore: "))) {
-           return 0;
-        }
-        if (!is_a_number(ua->cmd)) {
-           bsendmsg(ua, _("Bad JobId entered.\n"));
-          return 0;
-        }
-        JobId = atoi(ua->cmd);
-        break;
-      case 4:
-        return 0;
-      }
-   }
-
-   memset(&jr, 0, sizeof(JOB_DBR));
-   jr.JobId = JobId;
-   if (!db_get_job_record(ua->db, &jr)) {
-      bsendmsg(ua, _("Unable to get Job record. ERR=%s\n"), db_strerror(ua->db));
-      return 0;
+   if (!open_client_db(ua)) {
+      goto bail_out;
    }
 
-   /* 
-    * Build the directory tree 
-    */
-   bsendmsg(ua, _("Building directory tree of backed up files ...\n"));
-   memset(&tree, 0, sizeof(tree));
-   tree.root = new_tree(jr.JobFiles);
-   tree.root->fname = nofname;
-   tree.ua = ua;
-   query = get_pool_memory(PM_MESSAGE);
-   Mmsg(&query, uar_sel_files, JobId);
-   if (!db_sql_query(ua->db, query, insert_tree_handler, (void *)&tree)) {
-      bsendmsg(ua, "%s", db_strerror(ua->db));
+   /* Ensure there is at least one Restore Job */
+   LockRes();
+   foreach_res(job, R_JOB) {
+      if (job->JobType == JT_RESTORE) {
+         if (!rx.restore_job) {
+            rx.restore_job = job;
+         }
+         rx.restore_jobs++;
+      }
+   }
+   UnlockRes();
+   if (!rx.restore_jobs) {
+      ua->error_msg(_(
+         "No Restore Job Resource found in bacula-dir.conf.\n"
+         "You must create at least one before running this command.\n"));
+      goto bail_out;
    }
-   free_pool_memory(query);
-
-   /* Let the user select which files to restore */
-   user_select_files(&tree);
 
    /*
-    * Walk down through the tree finding all files marked to be 
-    *  extracted making a bootstrap file.
+    * Request user to select JobIds or files by various different methods
+    *  last 20 jobs, where File saved, most recent backup, ...
+    *  In the end, a list of files are pumped into
+    *  add_findex()
     */
-   bsr = new_bsr();
-   for (TREE_NODE *node=first_tree_node(tree.root); node; node=next_tree_node(node)) {
-      Dmsg2(400, "FI=%d node=0x%x\n", node->FileIndex, node);
-      if (node->extract) {
-         Dmsg2(400, "type=%d FI=%d\n", node->type, node->FileIndex);
-        add_findex(bsr, node->JobId, node->FileIndex);
+   switch (user_select_jobids_or_files(ua, &rx)) {
+   case 0:                            /* error */
+      goto bail_out;
+   case 1:                            /* selected by jobid */
+      if (!build_directory_tree(ua, &rx)) {
+         ua->send_msg(_("Restore not done.\n"));
+         goto bail_out;
       }
+      break;
+   case 2:                            /* selected by filename, no tree needed */
+      break;
    }
 
-   free_tree(tree.root);             /* free the directory tree */
+   if (rx.bsr->JobId) {
+      uint32_t selected_files;
+      char ed1[50];
+      if (!complete_bsr(ua, rx.bsr)) {   /* find Vol, SessId, SessTime from JobIds */
+         ua->error_msg(_("Unable to construct a valid BSR. Cannot continue.\n"));
+         goto bail_out;
+      }
+      if (!(selected_files = write_bsr_file(ua, rx))) {
+         ua->warning_msg(_("No files selected to be restored.\n"));
+         goto bail_out;
+      }
+      /* If no count of files, use bsr generated value (often wrong) */
+      if (rx.selected_files == 0) {
+         rx.selected_files = selected_files;
+      }
+      if (rx.selected_files==1) {
+         ua->info_msg(_("\n1 file selected to be restored.\n\n"));
+      }
+      else {
+         ua->info_msg(_("\n%s files selected to be restored.\n\n"), 
+            edit_uint64_with_commas(rx.selected_files, ed1));
+      }
+   } else {
+      ua->warning_msg(_("No files selected to be restored.\n"));
+      goto bail_out;
+   }
 
-   if (bsr->JobId) {
-      complete_bsr(ua, bsr);
-      print_bsr(ua, bsr);
+   if (rx.restore_jobs == 1) {
+      job = rx.restore_job;
    } else {
-      bsendmsg(ua, _("No files selected to restore.\n"));
+      job = select_restore_job_resource(ua);
+   }
+   if (!job) {
+      goto bail_out;
    }
-   free_bsr(bsr);
 
-   bsendmsg(ua, _("Restore command done.\n"));
-   return 1;
-}
+   get_client_name(ua, &rx);
+   if (!rx.ClientName) {
+      ua->error_msg(_("No Client resource found!\n"));
+      goto bail_out;
+   }
 
+   escaped_bsr_name = escape_filename(jcr->RestoreBootstrap);
+   escaped_where_name = escape_filename(rx.where);
 
+   /* Build run command */
+   if (rx.where) {
+      if (!acl_access_ok(ua, Where_ACL, rx.where)) {
+         ua->error_msg(_("\"where\" specification not authorized.\n"));
+         goto bail_out;
+      }
 
-/* Forward referenced commands */
+      Mmsg(ua->cmd,
+          "run job=\"%s\" client=\"%s\" storage=\"%s\" bootstrap=\"%s\""
+          " where=\"%s\" files=%d catalog=\"%s\"",
+          job->name(), rx.ClientName, rx.store?rx.store->name():"",
+          escaped_bsr_name ? escaped_bsr_name : jcr->RestoreBootstrap,
+          escaped_where_name ? escaped_where_name : rx.where,
+          rx.selected_files, ua->catalog->name());
+   } else {
+      Mmsg(ua->cmd,
+          "run job=\"%s\" client=\"%s\" storage=\"%s\" bootstrap=\"%s\""
+          " files=%d catalog=\"%s\"",
+          job->name(), rx.ClientName, rx.store?rx.store->name():"",
+          escaped_bsr_name ? escaped_bsr_name : jcr->RestoreBootstrap,
+          rx.selected_files, ua->catalog->name());
+   }
 
-static int addcmd(UAContext *ua, TREE_CTX *tree);
-static int lscmd(UAContext *ua, TREE_CTX *tree);
-static int helpcmd(UAContext *ua, TREE_CTX *tree);
-static int cdcmd(UAContext *ua, TREE_CTX *tree);
-static int pwdcmd(UAContext *ua, TREE_CTX *tree);
-static int rmcmd(UAContext *ua, TREE_CTX *tree);
-static int quitcmd(UAContext *ua, TREE_CTX *tree);
+   if (escaped_bsr_name != NULL) {
+      bfree(escaped_bsr_name);
+   }
 
+   if (escaped_where_name != NULL) {
+      bfree(escaped_where_name);
+   }
 
-struct cmdstruct { char *key; int (*func)(UAContext *ua, TREE_CTX *tree); char *help; }; 
-static struct cmdstruct commands[] = {
- { N_("add"),        addcmd,       _("add file")},
- { N_("ls"),         lscmd,        _("list current directory")},    
- { N_("dir"),        lscmd,        _("list current directory")},    
- { N_("help"),       helpcmd,      _("print help")},
- { N_("cd"),         cdcmd,        _("change directory")},
- { N_("pwd"),        pwdcmd,       _("print directory")},
- { N_("rm"),         rmcmd,        _("remove a file")},
- { N_("remove"),     rmcmd,        _("remove a file")},
- { N_("done"),       quitcmd,      _("quit")},
- { N_("exit"),       quitcmd,      _("exit = quit")},
- { N_("?"),          helpcmd,      _("print help")},    
-            };
-#define comsize (sizeof(commands)/sizeof(struct cmdstruct))
+   if (find_arg(ua, NT_("yes")) > 0) {
+      pm_strcat(ua->cmd, " yes");    /* pass it on to the run command */
+   }
+   Dmsg1(200, "Submitting: %s\n", ua->cmd);
+   parse_ua_args(ua);
+   run_cmd(ua, ua->cmd);
+   free_rx(&rx);
+   return 1;
 
+bail_out:
+   if (escaped_bsr_name != NULL) {
+      bfree(escaped_bsr_name);
+   }
 
-/*
- * Enter a prompt mode where the user can select/deselect
- *  files to be restored. This is sort of like a mini-shell
- *  that allows "cd", "pwd", "add", "rm", ...
- */
-static void user_select_files(TREE_CTX *tree)
-{
-   char cwd[2000];
-   /*
-    * Enter interactive command handler allowing selection
-    *  of individual files.
-    */
-   tree->node = (TREE_NODE *)tree->root;
-   tree_getpath(tree->node, cwd, sizeof(cwd));
-   bsendmsg(tree->ua, _("cwd is: %s\n"), cwd);
-   for ( ;; ) {       
-      int found, len, stat, i;
-      if (!get_cmd(tree->ua, "$ ")) {
-        break;
-      }
-      parse_command_args(tree->ua);
-      if (tree->ua->argc == 0) {
-        return;
-      }
-
-      len = strlen(tree->ua->argk[0]);
-      found = 0;
-      for (i=0; i<(int)comsize; i++)      /* search for command */
-        if (strncasecmp(tree->ua->argk[0],  _(commands[i].key), len) == 0) {
-           stat = (*commands[i].func)(tree->ua, tree);   /* go execute command */
-           found = 1;
-           break;
-        }
-      if (!found) {
-         bsendmsg(tree->ua, _("Illegal command\n"));
-      }
-      if (!stat) {
-        break;
-      }
+   if (escaped_where_name != NULL) {
+      bfree(escaped_where_name);
    }
-}
 
+   free_rx(&rx);
+   return 0;
 
-static RBSR_FINDEX *new_findex() 
-{
-   RBSR_FINDEX *fi = (RBSR_FINDEX *)malloc(sizeof(RBSR_FINDEX));
-   memset(fi, 0, sizeof(RBSR_FINDEX));
-   return fi;
 }
 
-static void free_findex(RBSR_FINDEX *fi)
+static void free_rx(RESTORE_CTX *rx)
 {
-   if (fi) {
-      free_findex(fi->next);
-      free(fi);
+   free_bsr(rx->bsr);
+   rx->bsr = NULL;
+   if (rx->JobIds) {
+      free_pool_memory(rx->JobIds);
+      rx->JobIds = NULL;
+   }
+   if (rx->fname) {
+      free_pool_memory(rx->fname);
+      rx->fname = NULL;
    }
+   if (rx->path) {
+      free_pool_memory(rx->path);
+      rx->path = NULL;
+   }
+   if (rx->query) {
+      free_pool_memory(rx->query);
+      rx->query = NULL;
+   }
+   free_name_list(&rx->name_list);
 }
 
-static void print_findex(UAContext *ua, RBSR_FINDEX *fi)
+static bool has_value(UAContext *ua, int i)
 {
-   if (fi) {
-      if (fi->findex == fi->findex2) {
-         bsendmsg(ua, "FileIndex=%d\n", fi->findex);
-      } else {
-         bsendmsg(ua, "FileIndex=%d-%d\n", fi->findex, fi->findex2);
-      }
-      print_findex(ua, fi->next);
+   if (!ua->argv[i]) {
+      ua->error_msg(_("Missing value for keyword: %s\n"), ua->argk[i]);
+      return false;
    }
+   return true;
 }
 
-static RBSR *new_bsr()
+static int get_client_name(UAContext *ua, RESTORE_CTX *rx)
 {
-   RBSR *bsr = (RBSR *)malloc(sizeof(RBSR));
-   memset(bsr, 0, sizeof(RBSR));
-   return bsr;
+   /* If no client name specified yet, get it now */
+   if (!rx->ClientName[0]) {
+      CLIENT_DBR cr;
+      /* try command line argument */
+      int i = find_arg_with_value(ua, NT_("client"));
+      if (i >= 0) {
+         if (!has_value(ua, i)) {
+            return 0;
+         }
+         bstrncpy(rx->ClientName, ua->argv[i], sizeof(rx->ClientName));
+         return 1;
+      }
+      memset(&cr, 0, sizeof(cr));
+      if (!get_client_dbr(ua, &cr)) {
+         return 0;
+      }
+      bstrncpy(rx->ClientName, cr.Name, sizeof(rx->ClientName));
+   }
+   return 1;
 }
 
-static void free_bsr(RBSR *bsr)
+
+/*
+ * The first step in the restore process is for the user to
+ *  select a list of JobIds from which he will subsequently
+ *  select which files are to be restored.
+ *
+ *  Returns:  2  if filename list made
+ *            1  if jobid list made
+ *            0  on error
+ */
+static int user_select_jobids_or_files(UAContext *ua, RESTORE_CTX *rx)
 {
-   if (bsr) {
-      free_findex(bsr->fi);
-      free_bsr(bsr->next);
-      if (bsr->VolumeName) {
-        free(bsr->VolumeName);
+   char *p;
+   char date[MAX_TIME_LENGTH];
+   bool have_date = false;
+   /* Include current second if using current time */
+   utime_t now = time(NULL) + 1;
+   JobId_t JobId;
+   JOB_DBR jr = { (JobId_t)-1 };
+   bool done = false;
+   int i, j;
+   const char *list[] = {
+      _("List last 20 Jobs run"),
+      _("List Jobs where a given File is saved"),
+      _("Enter list of comma separated JobIds to select"),
+      _("Enter SQL list command"),
+      _("Select the most recent backup for a client"),
+      _("Select backup for a client before a specified time"),
+      _("Enter a list of files to restore"),
+      _("Enter a list of files to restore before a specified time"),
+      _("Find the JobIds of the most recent backup for a client"),
+      _("Find the JobIds for a backup for a client before a specified time"),
+      _("Enter a list of directories to restore for found JobIds"),
+      _("Cancel"),
+      NULL };
+
+   const char *kw[] = {
+       /* These keywords are handled in a for loop */
+      "jobid",     /* 0 */
+      "current",   /* 1 */
+      "before",    /* 2 */
+      "file",      /* 3 */
+      "directory", /* 4 */
+      "select",    /* 5 */
+      "pool",      /* 6 */
+      "all",       /* 7 */
+
+      /* The keyword below are handled by individual arg lookups */
+      "client",    /* 8 */
+      "storage",   /* 9 */
+      "fileset",   /* 10 */
+      "where",     /* 11 */
+      "yes",       /* 12 */
+      "bootstrap", /* 13 */
+      "done",      /* 14 */
+      NULL
+   };
+
+   *rx->JobIds = 0;
+
+   for (i=1; i<ua->argc; i++) {       /* loop through arguments */
+      bool found_kw = false;
+      for (j=0; kw[j]; j++) {         /* loop through keywords */
+         if (strcasecmp(kw[j], ua->argk[i]) == 0) {
+            found_kw = true;
+            break;
+         }
+      }
+      if (!found_kw) {
+         ua->error_msg(_("Unknown keyword: %s\n"), ua->argk[i]);
+         return 0;
+      }
+      /* Found keyword in kw[] list, process it */
+      switch (j) {
+      case 0:                            /* jobid */
+         if (!has_value(ua, i)) {
+            return 0;
+         }
+         if (*rx->JobIds != 0) {
+            pm_strcat(rx->JobIds, ",");
+         }
+         pm_strcat(rx->JobIds, ua->argv[i]);
+         done = true;
+         break;
+      case 1:                            /* current */
+         /*
+          * Note, we add one second here just to include any job
+          *  that may have finished within the current second,
+          *  which happens a lot in scripting small jobs.
+          */
+         bstrutime(date, sizeof(date), now);
+         have_date = true;
+         break;
+      case 2:                            /* before */
+         if (!has_value(ua, i)) {
+            return 0;
+         }
+         if (str_to_utime(ua->argv[i]) == 0) {
+            ua->error_msg(_("Improper date format: %s\n"), ua->argv[i]);
+            return 0;
+         }
+         bstrncpy(date, ua->argv[i], sizeof(date));
+         have_date = true;
+         break;
+      case 3:                            /* file */
+      case 4:                            /* dir */
+         if (!has_value(ua, i)) {
+            return 0;
+         }
+         if (!have_date) {
+            bstrutime(date, sizeof(date), now);
+         }
+         if (!get_client_name(ua, rx)) {
+            return 0;
+         }
+         pm_strcpy(ua->cmd, ua->argv[i]);
+         insert_one_file_or_dir(ua, rx, date, j==4);
+         return 2;
+      case 5:                            /* select */
+         if (!have_date) {
+            bstrutime(date, sizeof(date), now);
+         }
+         if (!select_backups_before_date(ua, rx, date)) {
+            return 0;
+         }
+         done = true;
+         break;
+      case 6:                            /* pool specified */
+         if (!has_value(ua, i)) {
+            return 0;
+         }
+         rx->pool = (POOL *)GetResWithName(R_POOL, ua->argv[i]);
+         if (!rx->pool) {
+            ua->error_msg(_("Error: Pool resource \"%s\" does not exist.\n"), ua->argv[i]);
+            return 0;
+         }
+         if (!acl_access_ok(ua, Pool_ACL, ua->argv[i])) {
+            rx->pool = NULL;
+            ua->error_msg(_("Error: Pool resource \"%s\" access not allowed.\n"), ua->argv[i]);
+            return 0;
+         }
+         break;
+      case 7:                         /* all specified */
+         rx->all = true;
+         break;
+      /*
+       * All keywords 7 or greater are ignored or handled by a select prompt
+       */
+      default:
+         break;
+      }
+   }
+
+   if (!done) {
+      ua->send_msg(_("\nFirst you select one or more JobIds that contain files\n"
+                  "to be restored. You will be presented several methods\n"
+                  "of specifying the JobIds. Then you will be allowed to\n"
+                  "select which files from those JobIds are to be restored.\n\n"));
+   }
+
+   /* If choice not already made above, prompt */
+   for ( ; !done; ) {
+      char *fname;
+      int len;
+      bool gui_save;
+
+      start_prompt(ua, _("To select the JobIds, you have the following choices:\n"));
+      for (int i=0; list[i]; i++) {
+         add_prompt(ua, list[i]);
+      }
+      done = true;
+      switch (do_prompt(ua, "", _("Select item: "), NULL, 0)) {
+      case -1:                        /* error or cancel */
+         return 0;
+      case 0:                         /* list last 20 Jobs run */
+         if (!acl_access_ok(ua, Command_ACL, NT_("sqlquery"), 8)) {
+            ua->error_msg(_("SQL query not authorized.\n"));
+            return 0;
+         }
+         gui_save = ua->jcr->gui;
+         ua->jcr->gui = true;
+         db_list_sql_query(ua->jcr, ua->db, uar_list_jobs, prtit, ua, 1, HORZ_LIST);
+         ua->jcr->gui = gui_save;
+         done = false;
+         break;
+      case 1:                         /* list where a file is saved */
+         if (!get_client_name(ua, rx)) {
+            return 0;
+         }
+         if (!get_cmd(ua, _("Enter Filename (no path):"))) {
+            return 0;
+         }
+         len = strlen(ua->cmd);
+         fname = (char *)malloc(len * 2 + 1);
+         db_escape_string(fname, ua->cmd, len);
+         Mmsg(rx->query, uar_file, rx->ClientName, fname);
+         free(fname);
+         gui_save = ua->jcr->gui;
+         ua->jcr->gui = true;
+         db_list_sql_query(ua->jcr, ua->db, rx->query, prtit, ua, 1, HORZ_LIST);
+         ua->jcr->gui = gui_save;
+         done = false;
+         break;
+      case 2:                         /* enter a list of JobIds */
+         if (!get_cmd(ua, _("Enter JobId(s), comma separated, to restore: "))) {
+            return 0;
+         }
+         pm_strcpy(rx->JobIds, ua->cmd);
+         break;
+      case 3:                         /* Enter an SQL list command */
+         if (!acl_access_ok(ua, Command_ACL, NT_("sqlquery"), 8)) {
+            ua->error_msg(_("SQL query not authorized.\n"));
+            return 0;
+         }
+         if (!get_cmd(ua, _("Enter SQL list command: "))) {
+            return 0;
+         }
+         gui_save = ua->jcr->gui;
+         ua->jcr->gui = true;
+         db_list_sql_query(ua->jcr, ua->db, ua->cmd, prtit, ua, 1, HORZ_LIST);
+         ua->jcr->gui = gui_save;
+         done = false;
+         break;
+      case 4:                         /* Select the most recent backups */
+         bstrutime(date, sizeof(date), now);
+         if (!select_backups_before_date(ua, rx, date)) {
+            return 0;
+         }
+         break;
+      case 5:                         /* select backup at specified time */
+         if (!get_date(ua, date, sizeof(date))) {
+            return 0;
+         }
+         if (!select_backups_before_date(ua, rx, date)) {
+            return 0;
+         }
+         break;
+      case 6:                         /* Enter files */
+         bstrutime(date, sizeof(date), now);
+         if (!get_client_name(ua, rx)) {
+            return 0;
+         }
+         ua->send_msg(_("Enter file names with paths, or < to enter a filename\n"
+                        "containing a list of file names with paths, and terminate\n"
+                        "them with a blank line.\n"));
+         for ( ;; ) {
+            if (!get_cmd(ua, _("Enter full filename: "))) {
+               return 0;
+            }
+            len = strlen(ua->cmd);
+            if (len == 0) {
+               break;
+            }
+            insert_one_file_or_dir(ua, rx, date, false);
+         }
+         return 2;
+       case 7:                        /* enter files backed up before specified time */
+         if (!get_date(ua, date, sizeof(date))) {
+            return 0;
+         }
+         if (!get_client_name(ua, rx)) {
+            return 0;
+         }
+         ua->send_msg(_("Enter file names with paths, or < to enter a filename\n"
+                        "containing a list of file names with paths, and terminate\n"
+                        "them with a blank line.\n"));
+         for ( ;; ) {
+            if (!get_cmd(ua, _("Enter full filename: "))) {
+               return 0;
+            }
+            len = strlen(ua->cmd);
+            if (len == 0) {
+               break;
+            }
+            insert_one_file_or_dir(ua, rx, date, false);
+         }
+         return 2;
+
+      case 8:                         /* Find JobIds for current backup */
+         bstrutime(date, sizeof(date), now);
+         if (!select_backups_before_date(ua, rx, date)) {
+            return 0;
+         }
+         done = false;
+         break;
+
+      case 9:                         /* Find JobIds for give date */
+         if (!get_date(ua, date, sizeof(date))) {
+            return 0;
+         }
+         if (!select_backups_before_date(ua, rx, date)) {
+            return 0;
+         }
+         done = false;
+         break;
+
+      case 10:                        /* Enter directories */
+         if (*rx->JobIds != 0) {
+            ua->send_msg(_("You have already selected the following JobIds: %s\n"),
+               rx->JobIds);
+         } else if (get_cmd(ua, _("Enter JobId(s), comma separated, to restore: "))) {
+            if (*rx->JobIds != 0 && *ua->cmd) {
+               pm_strcat(rx->JobIds, ",");
+            }
+            pm_strcat(rx->JobIds, ua->cmd);
+         }
+         if (*rx->JobIds == 0 || *rx->JobIds == '.') {
+            return 0;                 /* nothing entered, return */
+         }
+         bstrutime(date, sizeof(date), now);
+         if (!get_client_name(ua, rx)) {
+            return 0;
+         }
+         ua->send_msg(_("Enter full directory names or start the name\n"
+                        "with a < to indicate it is a filename containing a list\n"
+                        "of directories and terminate them with a blank line.\n"));
+         for ( ;; ) {
+            if (!get_cmd(ua, _("Enter directory name: "))) {
+               return 0;
+            }
+            len = strlen(ua->cmd);
+            if (len == 0) {
+               break;
+            }
+            /* Add trailing slash to end of directory names */
+            if (ua->cmd[0] != '<' && !IsPathSeparator(ua->cmd[len-1])) {
+               strcat(ua->cmd, "/");
+            }
+            insert_one_file_or_dir(ua, rx, date, true);
+         }
+         return 2;
+
+      case 11:                        /* Cancel or quit */
+         return 0;
+      }
+   }
+
+   POOLMEM *JobIds = get_pool_memory(PM_FNAME);
+   *JobIds = 0;
+   rx->TotalFiles = 0;
+   /*        
+    * Find total number of files to be restored, and filter the JobId
+    *  list to contain only ones permitted by the ACL conditions.
+    */
+   for (p=rx->JobIds; ; ) {
+      char ed1[50];
+      int stat = get_next_jobid_from_list(&p, &JobId);
+      if (stat < 0) {
+         ua->error_msg(_("Invalid JobId in list.\n"));
+         free_pool_memory(JobIds);
+         return 0;
+      }
+      if (stat == 0) {
+         break;
+      }
+      if (jr.JobId == JobId) {
+         continue;                    /* duplicate of last JobId */
       }
-      free(bsr);
+      memset(&jr, 0, sizeof(JOB_DBR));
+      jr.JobId = JobId;
+      if (!db_get_job_record(ua->jcr, ua->db, &jr)) {
+         ua->error_msg(_("Unable to get Job record for JobId=%s: ERR=%s\n"),
+            edit_int64(JobId, ed1), db_strerror(ua->db));
+         free_pool_memory(JobIds);
+         return 0;
+      }
+      if (!acl_access_ok(ua, Job_ACL, jr.Name)) {
+         ua->error_msg(_("Access to JobId=%s (Job \"%s\") not authorized. Not selected.\n"),
+            edit_int64(JobId, ed1), jr.Name);
+         continue;
+      }
+      if (*JobIds != 0) {
+         pm_strcat(JobIds, ",");
+      }
+      pm_strcat(JobIds, edit_int64(JobId, ed1));
+      rx->TotalFiles += jr.JobFiles;
+   }
+   free_pool_memory(rx->JobIds);
+   rx->JobIds = JobIds;               /* Set ACL filtered list */
+   if (*rx->JobIds == 0) {
+      ua->warning_msg(_("No Jobs selected.\n"));
+      return 0;
+   }
+   if (strchr(rx->JobIds,',')) {
+      ua->info_msg(_("You have selected the following JobIds: %s\n"), rx->JobIds);
+   } else {
+      ua->info_msg(_("You have selected the following JobId: %s\n"), rx->JobIds);
    }
+   return 1;
 }
 
 /*
- * Complete the BSR by filling in the VolumeName and
- *  VolSessionId and VolSessionTime
+ * Get date from user
  */
-static int complete_bsr(UAContext *ua, RBSR *bsr)
+static int get_date(UAContext *ua, char *date, int date_len)
 {
-   JOB_DBR jr;
-   char VolumeNames[1000];           /* ****FIXME**** */
-
-   if (bsr) {
-      memset(&jr, 0, sizeof(jr));
-      jr.JobId = bsr->JobId;
-      if (!db_get_job_record(ua->db, &jr)) {
-         bsendmsg(ua, _("Unable to get Job record. ERR=%s\n"), db_strerror(ua->db));
-        return 0;
+   ua->send_msg(_("The restored files will the most current backup\n"
+                  "BEFORE the date you specify below.\n\n"));
+   for ( ;; ) {
+      if (!get_cmd(ua, _("Enter date as YYYY-MM-DD HH:MM:SS :"))) {
+         return 0;
       }
-      bsr->VolSessionId = jr.VolSessionId;
-      bsr->VolSessionTime = jr.VolSessionTime;
-      if (!db_get_job_volume_names(ua->db, bsr->JobId, VolumeNames)) {
-         bsendmsg(ua, _("Unable to get Job Volumes. ERR=%s\n"), db_strerror(ua->db));
-        return 0;
+      if (str_to_utime(ua->cmd) != 0) {
+         break;
       }
-      bsr->VolumeName = bstrdup(VolumeNames);
-      return complete_bsr(ua, bsr->next);
+      ua->error_msg(_("Improper date format.\n"));
    }
+   bstrncpy(date, ua->cmd, date_len);
    return 1;
 }
 
-
-static void print_bsr(UAContext *ua, RBSR *bsr)
+/*
+ * Insert a single file, or read a list of files from a file
+ */
+static void insert_one_file_or_dir(UAContext *ua, RESTORE_CTX *rx, char *date, bool dir)
 {
-   if (bsr) {
-      if (bsr->VolumeName) {
-         bsendmsg(ua, "VolumeName=%s\n", bsr->VolumeName);
+   FILE *ffd;
+   char file[5000];
+   char *p = ua->cmd;
+   int line = 0;
+
+   switch (*p) {
+   case '<':
+      p++;
+      if ((ffd = fopen(p, "rb")) == NULL) {
+         berrno be;
+         ua->error_msg(_("Cannot open file %s: ERR=%s\n"),
+            p, be.strerror());
+         break;
       }
-//    bsendmsg(ua, "JobId=%u\n", bsr->JobId);
-      bsendmsg(ua, "VolSessionId=%u\n", bsr->VolSessionId);
-      bsendmsg(ua, "VolSessionTime=%u\n", bsr->VolSessionTime);
-      print_findex(ua, bsr->fi);
-      print_bsr(ua, bsr->next);
+      while (fgets(file, sizeof(file), ffd)) {
+         line++;
+         if (dir) {
+            if (!insert_dir_into_findex_list(ua, rx, file, date)) {
+               ua->error_msg(_("Error occurred on line %d of file \"%s\"\n"), line, p);
+            }
+         } else {
+            if (!insert_file_into_findex_list(ua, rx, file, date)) {
+               ua->error_msg(_("Error occurred on line %d of file \"%s\"\n"), line, p);
+            }
+         }
+      }
+      fclose(ffd);
+      break;
+   case '?':
+      p++;
+      insert_table_into_findex_list(ua, rx, p);
+      break;
+   default:
+      if (dir) {
+         insert_dir_into_findex_list(ua, rx, ua->cmd, date);
+      } else {
+         insert_file_into_findex_list(ua, rx, ua->cmd, date);
+      }
+      break;
    }
 }
 
-
 /*
- * Add a FileIndex to the list of BootStrap records.
- *  Here we are only dealing with JobId's and the FileIndexes
- *  associated with those JobIds.
+ * For a given file (path+filename), split into path and file, then
+ *   lookup the most recent backup in the catalog to get the JobId
+ *   and FileIndex, then insert them into the findex list.
  */
-static void add_findex(RBSR *bsr, uint32_t JobId, int32_t findex)
+static bool insert_file_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *file,
+                                        char *date)
 {
-   RBSR *nbsr;
-   RBSR_FINDEX *fi, *lfi;
+   strip_trailing_newline(file);
+   split_path_and_filename(rx, file);
+   if (*rx->JobIds == 0) {
+      Mmsg(rx->query, uar_jobid_fileindex, date, rx->path, rx->fname, 
+           rx->ClientName);
+   } else {
+      Mmsg(rx->query, uar_jobids_fileindex, rx->JobIds, date,
+           rx->path, rx->fname, rx->ClientName);
+   }
+   rx->found = false;
+   /* Find and insert jobid and File Index */
+   if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
+      ua->error_msg(_("Query failed: %s. ERR=%s\n"),
+         rx->query, db_strerror(ua->db));
+   }
+   if (!rx->found) {
+      ua->error_msg(_("No database record found for: %s\n"), file);
+//    ua->error_msg("Query=%s\n", rx->query);
+      return true;
+   }
+   return true;
+}
 
-   if (findex == 0) {
-      return;                        /* probably a dummy directory */
+/*
+ * For a given path lookup the most recent backup in the catalog
+ * to get the JobId and FileIndexes of all files in that directory.
+ */
+static bool insert_dir_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *dir,
+                                        char *date)
+{
+   strip_trailing_junk(dir);
+   if (*rx->JobIds == 0) {
+      ua->error_msg(_("No JobId specified cannot continue.\n"));
+      return false;
+   } else {
+      Mmsg(rx->query, uar_jobid_fileindex_from_dir, rx->JobIds, 
+           dir, rx->ClientName);
+   }
+   rx->found = false;
+   /* Find and insert jobid and File Index */
+   if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
+      ua->error_msg(_("Query failed: %s. ERR=%s\n"),
+         rx->query, db_strerror(ua->db));
    }
+   if (!rx->found) {
+      ua->error_msg(_("No database record found for: %s\n"), dir);
+      return true;
+   }
+   return true;
+}
 
-   if (!bsr->fi) {                   /* if no FI add one */
-      /* This is the first FileIndex item in the chain */
-      bsr->fi = new_findex();
-      bsr->JobId = JobId;
-      bsr->fi->findex = findex;
-      bsr->fi->findex2 = findex;
-      return;
+/*
+ * Get the JobId and FileIndexes of all files in the specified table
+ */
+static bool insert_table_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *table)
+{
+   strip_trailing_junk(table);
+   Mmsg(rx->query, uar_jobid_fileindex_from_table, table);
+
+   rx->found = false;
+   /* Find and insert jobid and File Index */
+   if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
+      ua->error_msg(_("Query failed: %s. ERR=%s\n"),
+         rx->query, db_strerror(ua->db));
    }
-   /* Walk down list of bsrs until we find the JobId */
-   if (bsr->JobId != JobId) {
-      for (nbsr=bsr->next; nbsr; nbsr=nbsr->next) {
-        if (nbsr->JobId == JobId) {
-           bsr = nbsr;
-           break;
-        }
-      }
+   if (!rx->found) {
+      ua->error_msg(_("No table found: %s\n"), table);
+      return true;
+   }
+   return true;
+}
+
+static void split_path_and_filename(RESTORE_CTX *rx, char *name)
+{
+   char *p, *f;
 
-      if (!nbsr) {                   /* Must add new JobId */
-        /* Add new JobId at end of chain */
-        for (nbsr=bsr; nbsr->next; nbsr=nbsr->next) 
-           {  }
-        nbsr->next = new_bsr();
-        nbsr->next->JobId = JobId;
-        nbsr->next->fi = new_findex();
-        nbsr->next->fi->findex = findex;
-        nbsr->next->fi->findex2 = findex;
-        return;
+   /* Find path without the filename.
+    * I.e. everything after the last / is a "filename".
+    * OK, maybe it is a directory name, but we treat it like
+    * a filename. If we don't find a / then the whole name
+    * must be a path name (e.g. c:).
+    */
+   for (p=f=name; *p; p++) {
+      if (IsPathSeparator(*p)) {
+         f = p;                       /* set pos of last slash */
       }
    }
+   if (IsPathSeparator(*f)) {         /* did we find a slash? */
+      f++;                            /* yes, point to filename */
+   } else {                           /* no, whole thing must be path name */
+      f = p;
+   }
 
-   /* 
-    * At this point, bsr points to bsr containing JobId,
-    *  and we are sure that there is at least one fi record.
+   /* If filename doesn't exist (i.e. root directory), we
+    * simply create a blank name consisting of a single
+    * space. This makes handling zero length filenames
+    * easier.
     */
-   lfi = fi = bsr->fi;
-   /* Check if this findex is smaller than first item */
-   if (findex < fi->findex) {
-      if ((findex+1) == fi->findex) {
-        fi->findex = findex;         /* extend down */
-        return;
-      }
-      fi = new_findex();             /* yes, insert before first item */
-      fi->findex = findex;
-      fi->findex2 = findex;
-      fi->next = lfi;
-      bsr->fi = fi;
-      return;
+   rx->fnl = p - f;
+   if (rx->fnl > 0) {
+      rx->fname = check_pool_memory_size(rx->fname, rx->fnl+1);
+      memcpy(rx->fname, f, rx->fnl);    /* copy filename */
+      rx->fname[rx->fnl] = 0;
+   } else {
+      rx->fname[0] = 0;
+      rx->fnl = 0;
+   }
+
+   rx->pnl = f - name;
+   if (rx->pnl > 0) {
+      rx->path = check_pool_memory_size(rx->path, rx->pnl+1);
+      memcpy(rx->path, name, rx->pnl);
+      rx->path[rx->pnl] = 0;
+   } else {
+      rx->path[0] = 0;
+      rx->pnl = 0;
    }
-   /* Walk down fi chain and find where to insert insert new FileIndex */
-   for ( ; fi; fi=fi->next) {
-      if (findex == (fi->findex2 + 1)) {  /* extend up */
-        RBSR_FINDEX *nfi;     
-        fi->findex2 = findex;
-        if (fi->next && ((findex+1) == fi->next->findex)) { 
-            Dmsg1(400, "Coallase %d\n", findex);
-           nfi = fi->next;
-           fi->findex2 = nfi->findex2;
-           fi->next = nfi->next;
-           free(nfi);
-        }
-        return;
-      }
-      if (findex < fi->findex) {      /* add before */
-        if ((findex+1) == fi->findex) {
-           fi->findex = findex;
-           return;
-        }
-        break;
-      }
-      lfi = fi;
-   }
-   /* Add to last place found */
-   fi = new_findex();
-   fi->findex = findex;
-   fi->findex2 = findex;
-   fi->next = lfi->next;
-   lfi->next = fi;
-   return;
+
+   Dmsg2(100, "split path=%s file=%s\n", rx->path, rx->fname);
 }
 
-static int insert_tree_handler(void *ctx, int num_fields, char **row)
+static bool build_directory_tree(UAContext *ua, RESTORE_CTX *rx)
 {
-   TREE_CTX *tree = (TREE_CTX *)ctx;
-   char fname[2000];
-   TREE_NODE *node, *new_node;
-   int type;
-
-   strip_trailing_junk(row[1]);
-   if (*row[1] == 0) {
-      type = TN_DIR;
-   } else {
-      type = TN_FILE;
+   TREE_CTX tree;
+   JobId_t JobId, last_JobId;
+   char *p;
+   bool OK = true;
+   char ed1[50];
+
+   memset(&tree, 0, sizeof(TREE_CTX));
+   /*
+    * Build the directory tree containing JobIds user selected
+    */
+   tree.root = new_tree(rx->TotalFiles);
+   tree.ua = ua;
+   tree.all = rx->all;
+   last_JobId = 0;
+   /*
+    * For display purposes, the same JobId, with different volumes may
+    * appear more than once, however, we only insert it once.
+    */
+   int items = 0;
+   p = rx->JobIds;
+   tree.FileEstimate = 0;
+   if (get_next_jobid_from_list(&p, &JobId) > 0) {
+      /* Use first JobId as estimate of the number of files to restore */
+      Mmsg(rx->query, uar_count_files, edit_int64(JobId, ed1));
+      if (!db_sql_query(ua->db, rx->query, restore_count_handler, (void *)rx)) {
+         ua->error_msg("%s\n", db_strerror(ua->db));
+      }
+      if (rx->found) {
+         /* Add about 25% more than this job for over estimate */
+         tree.FileEstimate = rx->JobId + (rx->JobId >> 2);
+         tree.DeltaCount = rx->JobId/50; /* print 50 ticks */
+      }
    }
-   sprintf(fname, "%s%s", row[0], row[1]);
-   if (tree->avail_node) {
-      node = tree->avail_node;
-   } else {
-      node = new_tree_node(tree->root, type);
-      tree->avail_node = node;
-   }
-   Dmsg2(400, "FI=%d fname=%s\n", node->FileIndex, fname);
-   new_node = insert_tree_node(fname, node, tree->root, NULL);
-   /* Note, if node already exists, save new one for next time */
-   if (new_node != node) {
-      tree->avail_node = node;
-   } else {
-      tree->avail_node = NULL;
+   for (p=rx->JobIds; get_next_jobid_from_list(&p, &JobId) > 0; ) {
+      char ed1[50];
+
+      if (JobId == last_JobId) {
+         continue;                    /* eliminate duplicate JobIds */
+      }
+      last_JobId = JobId;
+      ua->info_msg(_("\nBuilding directory tree for JobId %s ...  "), 
+         edit_int64(JobId, ed1));
+      items++;
+      /*
+       * Find files for this JobId and insert them in the tree
+       */
+      Mmsg(rx->query, uar_sel_files, edit_int64(JobId, ed1));
+      if (!db_sql_query(ua->db, rx->query, insert_tree_handler, (void *)&tree)) {
+         ua->error_msg("%s", db_strerror(ua->db));
+      }
    }
-   new_node->FileIndex = atoi(row[2]);
-   new_node->JobId = atoi(row[3]);
-   new_node->type = type;
-   if (((tree->cnt) % 10000) == 0) {
-      bsendmsg(tree->ua, "%d ", tree->cnt);
+   if (tree.FileCount == 0) {
+      ua->send_msg(_("\nThere were no files inserted into the tree, so file selection\n"
+         "is not possible.Most likely your retention policy pruned the files\n"));
+      if (!get_yesno(ua, _("\nDo you want to restore all the files? (yes|no): "))) {
+         OK = false;
+      } else {
+         last_JobId = 0;
+         for (p=rx->JobIds; get_next_jobid_from_list(&p, &JobId) > 0; ) {
+             if (JobId == last_JobId) {
+                continue;                    /* eliminate duplicate JobIds */
+             }
+             add_findex_all(rx->bsr, JobId);
+          }
+          OK = true;
+      }
+   } else {
+      char ec1[50];
+      if (items==1) {
+         if (tree.all) {
+            ua->info_msg(_("\n1 Job, %s files inserted into the tree and marked for extraction.\n"),
+              edit_uint64_with_commas(tree.FileCount, ec1));
+         }
+         else {
+            ua->info_msg(_("\n1 Job, %s files inserted into the tree.\n"),
+              edit_uint64_with_commas(tree.FileCount, ec1));
+         }
+      }
+      else {
+         if (tree.all) {
+            ua->info_msg(_("\n%d Jobs, %s files inserted into the tree and marked for extraction.\n"),
+              items, edit_uint64_with_commas(tree.FileCount, ec1));
+         }
+         else {
+            ua->info_msg(_("\n%d Jobs, %s files inserted into the tree.\n"),
+              items, edit_uint64_with_commas(tree.FileCount, ec1));
+         }
+      }
+
+      if (find_arg(ua, NT_("done")) < 0) {
+         /* Let the user interact in selecting which files to restore */
+         OK = user_select_files_from_tree(&tree);
+      }
+
+      /*
+       * Walk down through the tree finding all files marked to be
+       *  extracted making a bootstrap file.
+       */
+      if (OK) {
+         for (TREE_NODE *node=first_tree_node(tree.root); node; node=next_tree_node(node)) {
+            Dmsg2(400, "FI=%d node=0x%x\n", node->FileIndex, node);
+            if (node->extract || node->extract_dir) {
+               Dmsg2(400, "type=%d FI=%d\n", node->type, node->FileIndex);
+               add_findex(rx->bsr, node->JobId, node->FileIndex);
+               if (node->extract && node->type != TN_NEWDIR) {
+                  rx->selected_files++;  /* count only saved files */
+               }
+            }
+         }
+      }
    }
-   tree->cnt++;
-   return 0;
+
+   free_tree(tree.root);              /* free the directory tree */
+   return OK;
 }
 
 
 /*
- * Set extract to value passed. We recursively walk
- *  down the tree setting all children.
+ * This routine is used to get the current backup or a backup
+ *   before the specified date.
  */
-static void set_extract(TREE_NODE *node, int value)
+static bool select_backups_before_date(UAContext *ua, RESTORE_CTX *rx, char *date)
 {
-   TREE_NODE *n;
+   bool ok = false;
+   FILESET_DBR fsr;
+   CLIENT_DBR cr;
+   char fileset_name[MAX_NAME_LENGTH];
+   char ed1[50], ed2[50];
+   char pool_select[MAX_NAME_LENGTH];
+   int i;
+
+
+   /* Create temp tables */
+   db_sql_query(ua->db, uar_del_temp, NULL, NULL);
+   db_sql_query(ua->db, uar_del_temp1, NULL, NULL);
+   if (!db_sql_query(ua->db, uar_create_temp, NULL, NULL)) {
+      ua->error_msg("%s\n", db_strerror(ua->db));
+   }
+   if (!db_sql_query(ua->db, uar_create_temp1, NULL, NULL)) {
+      ua->error_msg("%s\n", db_strerror(ua->db));
+   }
+   /*
+    * Select Client from the Catalog
+    */
+   memset(&cr, 0, sizeof(cr));
+   if (!get_client_dbr(ua, &cr)) {
+      goto bail_out;
+   }
+   bstrncpy(rx->ClientName, cr.Name, sizeof(rx->ClientName));
 
-   node->extract = value;
-   if (node->type != TN_FILE) {
-      for (n=node->child; n; n=n->sibling) {
-        set_extract(n, value);
+   /*
+    * Get FileSet
+    */
+   memset(&fsr, 0, sizeof(fsr));
+   i = find_arg_with_value(ua, "FileSet");
+   if (i >= 0) {
+      bstrncpy(fsr.FileSet, ua->argv[i], sizeof(fsr.FileSet));
+      if (!db_get_fileset_record(ua->jcr, ua->db, &fsr)) {
+         ua->error_msg(_("Error getting FileSet \"%s\": ERR=%s\n"), fsr.FileSet,
+            db_strerror(ua->db));
+         i = -1;
       }
    }
-}
+   if (i < 0) {                       /* fileset not found */
+      edit_int64(cr.ClientId, ed1);
+      Mmsg(rx->query, uar_sel_fileset, ed1, ed1);
+      start_prompt(ua, _("The defined FileSet resources are:\n"));
+      if (!db_sql_query(ua->db, rx->query, fileset_handler, (void *)ua)) {
+         ua->error_msg("%s\n", db_strerror(ua->db));
+      }
+      if (do_prompt(ua, _("FileSet"), _("Select FileSet resource"),
+                 fileset_name, sizeof(fileset_name)) < 0) {
+         ua->error_msg(_("No FileSet found for client \"%s\".\n"), cr.Name);
+         goto bail_out;
+      }
 
-static int addcmd(UAContext *ua, TREE_CTX *tree)
-{
-   TREE_NODE *node;
+      bstrncpy(fsr.FileSet, fileset_name, sizeof(fsr.FileSet));
+      if (!db_get_fileset_record(ua->jcr, ua->db, &fsr)) {
+         ua->warning_msg(_("Error getting FileSet record: %s\n"), db_strerror(ua->db));
+         ua->send_msg(_("This probably means you modified the FileSet.\n"
+                     "Continuing anyway.\n"));
+      }
+   }
+
+   /* If Pool specified, add PoolId specification */
+   pool_select[0] = 0;
+   if (rx->pool) {
+      POOL_DBR pr;
+      memset(&pr, 0, sizeof(pr));
+      bstrncpy(pr.Name, rx->pool->name(), sizeof(pr.Name));
+      if (db_get_pool_record(ua->jcr, ua->db, &pr)) {
+         bsnprintf(pool_select, sizeof(pool_select), "AND Media.PoolId=%s ", 
+            edit_int64(pr.PoolId, ed1));
+      } else {
+         ua->warning_msg(_("Pool \"%s\" not found, using any pool.\n"), pr.Name);
+      }
+   }
+
+   /* Find JobId of last Full backup for this client, fileset */
+   edit_int64(cr.ClientId, ed1);
+   Mmsg(rx->query, uar_last_full, ed1, ed1, date, fsr.FileSet,
+         pool_select);
+   if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
+      ua->error_msg("%s\n", db_strerror(ua->db));
+      goto bail_out;
+   }
+
+   /* Find all Volumes used by that JobId */
+   if (!db_sql_query(ua->db, uar_full, NULL, NULL)) {
+      ua->error_msg("%s\n", db_strerror(ua->db));
+      goto bail_out;
+   }
+   /* Note, this is needed because I don't seem to get the callback
+    * from the call just above.
+    */
+   rx->JobTDate = 0;
+   if (!db_sql_query(ua->db, uar_sel_all_temp1, last_full_handler, (void *)rx)) {
+      ua->warning_msg("%s\n", db_strerror(ua->db));
+   }
+   if (rx->JobTDate == 0) {
+      ua->error_msg(_("No Full backup before %s found.\n"), date);
+      goto bail_out;
+   }
 
-   if (ua->argc < 2)
-      return 1;
-   if (!tree->node->child) {    
-      return 1;
+   /* Now find most recent Differental Job after Full save, if any */
+   Mmsg(rx->query, uar_dif, edit_uint64(rx->JobTDate, ed1), date,
+        edit_int64(cr.ClientId, ed2), fsr.FileSet, pool_select);
+   if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
+      ua->warning_msg("%s\n", db_strerror(ua->db));
    }
-   for (node = tree->node->child; node; node=node->sibling) {
-      if (fnmatch(ua->argk[1], node->fname, 0) == 0) {
-        set_extract(node, 1);
+   /* Now update JobTDate to lock onto Differental, if any */
+   rx->JobTDate = 0;
+   if (!db_sql_query(ua->db, uar_sel_all_temp, last_full_handler, (void *)rx)) {
+      ua->warning_msg("%s\n", db_strerror(ua->db));
+   }
+   if (rx->JobTDate == 0) {
+      ua->error_msg(_("No Full backup before %s found.\n"), date);
+      goto bail_out;
+   }
+
+   /* Now find all Incremental Jobs after Full/dif save */
+   Mmsg(rx->query, uar_inc, edit_uint64(rx->JobTDate, ed1), date,
+        edit_int64(cr.ClientId, ed2), fsr.FileSet, pool_select);
+   if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
+      ua->warning_msg("%s\n", db_strerror(ua->db));
+   }
+
+   /* Get the JobIds from that list */
+   rx->JobIds[0] = 0;
+   rx->last_jobid[0] = 0;
+   if (!db_sql_query(ua->db, uar_sel_jobid_temp, jobid_handler, (void *)rx)) {
+      ua->warning_msg("%s\n", db_strerror(ua->db));
+   }
+
+   if (rx->JobIds[0] != 0) {
+      /* Display a list of Jobs selected for this restore */
+      db_list_sql_query(ua->jcr, ua->db, uar_list_temp, prtit, ua, 1, HORZ_LIST);
+      ok = true;
+   } else {
+      ua->warning_msg(_("No jobs found.\n"));
+   }
+
+bail_out:
+   db_sql_query(ua->db, uar_del_temp, NULL, NULL);
+   db_sql_query(ua->db, uar_del_temp1, NULL, NULL);
+   return ok;
+}
+
+
+/* 
+ * Return next JobId from comma separated list   
+ *
+ * Returns:
+ *   1 if next JobId returned
+ *   0 if no more JobIds are in list
+ *  -1 there is an error
+ */
+int get_next_jobid_from_list(char **p, JobId_t *JobId)
+{
+   char jobid[30];
+   char *q = *p;
+
+   jobid[0] = 0;
+   for (int i=0; i<(int)sizeof(jobid); i++) {
+      if (*q == 0) {
+         break;
+      } else if (*q == ',') {
+         q++;
+         break;
       }
+      jobid[i] = *q++;
+      jobid[i+1] = 0;
    }
+   if (jobid[0] == 0) {
+      return 0;
+   } else if (!is_a_number(jobid)) {
+      return -1;                      /* error */
+   }
+   *p = q;
+   *JobId = str_to_int64(jobid);
    return 1;
 }
 
-static int lscmd(UAContext *ua, TREE_CTX *tree)
+static int restore_count_handler(void *ctx, int num_fields, char **row)
+{
+   RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
+   rx->JobId = str_to_int64(row[0]);
+   rx->found = true;
+   return 0;
+}
+
+/*
+ * Callback handler to get JobId and FileIndex for files
+ *   can insert more than one depending on the caller.
+ */
+static int jobid_fileindex_handler(void *ctx, int num_fields, char **row)
+{
+   RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
+   rx->JobId = str_to_int64(row[0]);
+   add_findex(rx->bsr, rx->JobId, str_to_int64(row[1]));
+   rx->found = true;
+   rx->selected_files++;
+   return 0;
+}
+
+/*
+ * Callback handler make list of JobIds
+ */
+static int jobid_handler(void *ctx, int num_fields, char **row)
 {
-   TREE_NODE *node;
+   RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
 
-   if (!tree->node->child) {    
-      return 1;
+   if (strcmp(rx->last_jobid, row[0]) == 0) {
+      return 0;                       /* duplicate id */
    }
-   for (node = tree->node->child; node; node=node->sibling) {
-      if (ua->argc == 1 || fnmatch(ua->argk[1], node->fname, 0) == 0) {
-         bsendmsg(ua, "%s%s%s\n", node->extract?"*":"", node->fname,
-            (node->type==TN_DIR||node->type==TN_NEWDIR)?"/":"");
-      }
+   bstrncpy(rx->last_jobid, row[0], sizeof(rx->last_jobid));
+   if (rx->JobIds[0] != 0) {
+      pm_strcat(rx->JobIds, ",");
    }
-   return 1;
+   pm_strcat(rx->JobIds, row[0]);
+   return 0;
 }
 
-static int helpcmd(UAContext *ua, TREE_CTX *tree) 
+
+/*
+ * Callback handler to pickup last Full backup JobTDate
+ */
+static int last_full_handler(void *ctx, int num_fields, char **row)
 {
-   unsigned int i;
+   RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
 
-/* usage(); */
-   bsendmsg(ua, _("  Command    Description\n  =======    ===========\n"));
-   for (i=0; i<comsize; i++) {
-      bsendmsg(ua, _("  %-10s %s\n"), _(commands[i].key), _(commands[i].help));
-   }
-   bsendmsg(ua, "\n");
-   return 1;
+   rx->JobTDate = str_to_int64(row[1]);
+   return 0;
 }
 
-static int cdcmd(UAContext *ua, TREE_CTX *tree) 
+/*
+ * Callback handler build FileSet name prompt list
+ */
+static int fileset_handler(void *ctx, int num_fields, char **row)
 {
-   char cwd[2000];
-   if (ua->argc != 2) {
-      return 1;
+   /* row[0] = FileSet (name) */
+   if (row[0]) {
+      add_prompt((UAContext *)ctx, row[0]);
    }
-   tree->node = tree_cwd(ua->argk[1], tree->root, tree->node);
-   tree_getpath(tree->node, cwd, sizeof(cwd));
-   bsendmsg(ua, _("cwd is: %s\n"), cwd);
-   return 1;
+   return 0;
 }
 
-static int pwdcmd(UAContext *ua, TREE_CTX *tree) 
+/*
+ * Free names in the list
+ */
+static void free_name_list(NAME_LIST *name_list)
 {
-   char cwd[2000];
-   tree_getpath(tree->node, cwd, sizeof(cwd));
-   bsendmsg(ua, _("cwd is: %s\n"), cwd);
-   return 1;
+   for (int i=0; i < name_list->num_ids; i++) {
+      free(name_list->name[i]);
+   }
+   if (name_list->name) {
+      free(name_list->name);
+      name_list->name = NULL;
+   }
+   name_list->max_ids = 0;
+   name_list->num_ids = 0;
 }
 
-
-static int rmcmd(UAContext *ua, TREE_CTX *tree)
+void find_storage_resource(UAContext *ua, RESTORE_CTX &rx, char *Storage, char *MediaType) 
 {
-   TREE_NODE *node;
+   STORE *store;
 
-   if (ua->argc < 2)
-      return 1;
-   if (!tree->node->child) {    
-      return 1;
+   if (rx.store) {
+      Dmsg1(200, "Already have store=%s\n", rx.store->name());
+      return;
    }
-   for (node = tree->node->child; node; node=node->sibling) {
-      if (fnmatch(ua->argk[1], node->fname, 0) == 0) {
-        set_extract(node, 0);
+   /*
+    * Try looking up Storage by name
+    */
+   LockRes();
+   foreach_res(store, R_STORAGE) {
+      if (strcmp(Storage, store->name()) == 0) {
+         if (acl_access_ok(ua, Storage_ACL, store->name())) {
+            rx.store = store;
+         }
+         break;
       }
    }
-   return 1;
-}
+   UnlockRes();
+
+   if (rx.store) {
+      /* Check if an explicit storage resource is given */
+      store = NULL;
+      int i = find_arg_with_value(ua, "storage");
+      if (i > 0) {
+         store = (STORE *)GetResWithName(R_STORAGE, ua->argv[i]);
+         if (store && !acl_access_ok(ua, Storage_ACL, store->name())) {
+            store = NULL;
+         }
+      }
+      if (store && (store != rx.store)) {
+         ua->info_msg(_("Warning default storage overridden by \"%s\" on command line.\n"),
+            store->name());
+         rx.store = store;
+         Dmsg1(200, "Set store=%s\n", rx.store->name());
+      }
+      return;
+   }
+
+   /* If no storage resource, try to find one from MediaType */
+   if (!rx.store) {
+      LockRes();
+      foreach_res(store, R_STORAGE) {
+         if (strcmp(MediaType, store->media_type) == 0) {
+            if (acl_access_ok(ua, Storage_ACL, store->name())) {
+               rx.store = store;
+               Dmsg1(200, "Set store=%s\n", rx.store->name());
+               ua->warning_msg(_("Storage \"%s\" not found, using Storage \"%s\" from MediaType \"%s\".\n"),
+                  Storage, store->name(), MediaType);
+            }
+            UnlockRes();
+            return;
+         }
+      }
+      UnlockRes();
+      ua->warning_msg(_("\nUnable to find Storage resource for\n"
+         "MediaType \"%s\", needed by the Jobs you selected.\n"), MediaType);
+   }
+
+   /* Take command line arg, or ask user if none */
+   rx.store = get_storage_resource(ua, false /* don't use default */);
+   Dmsg1(200, "Set store=%s\n", rx.store->name());
 
-static int quitcmd(UAContext *ua, TREE_CTX *tree) 
-{
-   return 0;
 }