]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/dird/ua_restore.c
f533882ac72042ae63e3e46f504a2fb5a0e42602
[bacula/bacula] / bacula / src / dird / ua_restore.c
1 /*
2    Bacula® - The Network Backup Solution
3
4    Copyright (C) 2002-2008 Free Software Foundation Europe e.V.
5
6    The main author of Bacula is Kern Sibbald, with contributions from
7    many others, a complete list can be found in the file AUTHORS.
8    This program is Free Software; you can redistribute it and/or
9    modify it under the terms of version two of the GNU General Public
10    License as published by the Free Software Foundation and included
11    in the file LICENSE.
12
13    This program is distributed in the hope that it will be useful, but
14    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 License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21    02110-1301, USA.
22
23    Bacula® is a registered trademark of Kern Sibbald.
24    The licensor of Bacula is the Free Software Foundation Europe
25    (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
26    Switzerland, email:ftf@fsfeurope.org.
27 */
28 /*
29  *
30  *   Bacula Director -- User Agent Database restore Command
31  *      Creates a bootstrap file for restoring files and
32  *      starts the restore job.
33  *
34  *      Tree handling routines split into ua_tree.c July MMIII.
35  *      BSR (bootstrap record) handling routines split into
36  *        bsr.c July MMIII
37  *
38  *     Kern Sibbald, July MMII
39  *
40  *   Version $Id$
41  */
42
43
44 #include "bacula.h"
45 #include "dird.h"
46
47 /* Imported functions */
48 extern void print_bsr(UAContext *ua, RBSR *bsr);
49
50
51
52 /* Forward referenced functions */
53 static int last_full_handler(void *ctx, int num_fields, char **row);
54 static int jobid_handler(void *ctx, int num_fields, char **row);
55 static int user_select_jobids_or_files(UAContext *ua, RESTORE_CTX *rx);
56 static int fileset_handler(void *ctx, int num_fields, char **row);
57 static void free_name_list(NAME_LIST *name_list);
58 static bool select_backups_before_date(UAContext *ua, RESTORE_CTX *rx, char *date);
59 static bool build_directory_tree(UAContext *ua, RESTORE_CTX *rx);
60 static void free_rx(RESTORE_CTX *rx);
61 static void split_path_and_filename(UAContext *ua, RESTORE_CTX *rx, char *fname);
62 static int jobid_fileindex_handler(void *ctx, int num_fields, char **row);
63 static bool insert_file_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *file,
64                                          char *date);
65 static bool insert_dir_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *dir,
66                                         char *date);
67 static void insert_one_file_or_dir(UAContext *ua, RESTORE_CTX *rx, char *date, bool dir);
68 static int get_client_name(UAContext *ua, RESTORE_CTX *rx);
69 static int get_restore_client_name(UAContext *ua, RESTORE_CTX &rx);
70 static int get_date(UAContext *ua, char *date, int date_len);
71 static int restore_count_handler(void *ctx, int num_fields, char **row);
72 static bool insert_table_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *table);
73
74 /*
75  *   Restore files
76  *
77  */
78 int restore_cmd(UAContext *ua, const char *cmd)
79 {
80    RESTORE_CTX rx;                    /* restore context */
81    JOB *job;
82    int i;
83    JCR *jcr = ua->jcr;
84    char *escaped_bsr_name = NULL;
85    char *escaped_where_name = NULL;
86    char *strip_prefix, *add_prefix, *add_suffix, *regexp;
87    strip_prefix = add_prefix = add_suffix = regexp = NULL;
88
89    memset(&rx, 0, sizeof(rx));
90    rx.path = get_pool_memory(PM_FNAME);
91    rx.fname = get_pool_memory(PM_FNAME);
92    rx.JobIds = get_pool_memory(PM_FNAME);
93    rx.query = get_pool_memory(PM_FNAME);
94    rx.bsr = new_bsr();
95
96    i = find_arg_with_value(ua, "where");
97    if (i >= 0) {
98       rx.where = ua->argv[i];
99    }
100
101    i = find_arg_with_value(ua, "strip_prefix");
102    if (i >= 0) {
103       strip_prefix = ua->argv[i];
104    }
105
106    i = find_arg_with_value(ua, "add_prefix");
107    if (i >= 0) {
108       add_prefix = ua->argv[i];
109    }
110
111    i = find_arg_with_value(ua, "add_suffix");
112    if (i >= 0) {
113       add_suffix = ua->argv[i];
114    }
115
116    i = find_arg_with_value(ua, "regexwhere");
117    if (i >= 0) {
118       rx.RegexWhere = ua->argv[i];
119    }
120
121    if (strip_prefix || add_suffix || add_prefix) {
122       int len = bregexp_get_build_where_size(strip_prefix, add_prefix, add_suffix);
123       regexp = (char *)bmalloc(len * sizeof(char));
124
125       bregexp_build_where(regexp, len, strip_prefix, add_prefix, add_suffix);
126       rx.RegexWhere = regexp;
127    }
128
129    /* TODO: add acl for regexwhere ? */
130
131    if (rx.RegexWhere) {
132       if (!acl_access_ok(ua, Where_ACL, rx.RegexWhere)) {
133          ua->error_msg(_("\"RegexWhere\" specification not authorized.\n"));
134          goto bail_out;
135       }
136    }
137
138    if (rx.where) {
139       if (!acl_access_ok(ua, Where_ACL, rx.where)) {
140          ua->error_msg(_("\"where\" specification not authorized.\n"));
141          goto bail_out;
142       }
143    }
144
145    if (!open_client_db(ua)) {
146       goto bail_out;
147    }
148
149    /* Ensure there is at least one Restore Job */
150    LockRes();
151    foreach_res(job, R_JOB) {
152       if (job->JobType == JT_RESTORE) {
153          if (!rx.restore_job) {
154             rx.restore_job = job;
155          }
156          rx.restore_jobs++;
157       }
158    }
159    UnlockRes();
160    if (!rx.restore_jobs) {
161       ua->error_msg(_(
162          "No Restore Job Resource found in bacula-dir.conf.\n"
163          "You must create at least one before running this command.\n"));
164       goto bail_out;
165    }
166
167    /*
168     * Request user to select JobIds or files by various different methods
169     *  last 20 jobs, where File saved, most recent backup, ...
170     *  In the end, a list of files are pumped into
171     *  add_findex()
172     */
173    switch (user_select_jobids_or_files(ua, &rx)) {
174    case 0:                            /* error */
175       goto bail_out;
176    case 1:                            /* selected by jobid */
177       if (!build_directory_tree(ua, &rx)) {
178          ua->send_msg(_("Restore not done.\n"));
179          goto bail_out;
180       }
181       break;
182    case 2:                            /* selected by filename, no tree needed */
183       break;
184    }
185
186    if (rx.bsr->JobId) {
187       uint32_t selected_files;
188       char ed1[50];
189       if (!complete_bsr(ua, rx.bsr)) {   /* find Vol, SessId, SessTime from JobIds */
190          ua->error_msg(_("Unable to construct a valid BSR. Cannot continue.\n"));
191          goto bail_out;
192       }
193       if (!(selected_files = write_bsr_file(ua, rx))) {
194          ua->warning_msg(_("No files selected to be restored.\n"));
195          goto bail_out;
196       }
197       display_bsr_info(ua, rx);          /* display vols needed, etc */
198
199       /* If no count of files, use bsr generated value (often wrong) */
200       if (rx.selected_files == 0) {
201          rx.selected_files = selected_files;
202       }
203       if (rx.selected_files==1) {
204          ua->info_msg(_("\n1 file selected to be restored.\n\n"));
205       }
206       else {
207          ua->info_msg(_("\n%s files selected to be restored.\n\n"), 
208             edit_uint64_with_commas(rx.selected_files, ed1));
209       }
210    } else {
211       ua->warning_msg(_("No files selected to be restored.\n"));
212       goto bail_out;
213    }
214
215    if (rx.restore_jobs == 1) {
216       job = rx.restore_job;
217    } else {
218       job = select_restore_job_resource(ua);
219    }
220    if (!job) {
221       goto bail_out;
222    }
223
224    get_client_name(ua, &rx);
225    if (!rx.ClientName) {
226       ua->error_msg(_("No Client resource found!\n"));
227       goto bail_out;
228    }
229    get_restore_client_name(ua, rx);
230
231    escaped_bsr_name = escape_filename(jcr->RestoreBootstrap);
232
233    /* Build run command */
234    if (rx.RegexWhere) {
235       escaped_where_name = escape_filename(rx.RegexWhere);
236       Mmsg(ua->cmd,
237           "run job=\"%s\" client=\"%s\" restoreclient=\"%s\" storage=\"%s\""
238           " bootstrap=\"%s\" regexwhere=\"%s\" files=%u catalog=\"%s\"",
239           job->name(), rx.ClientName, rx.RestoreClientName, 
240           rx.store?rx.store->name():"",
241           escaped_bsr_name ? escaped_bsr_name : jcr->RestoreBootstrap,
242           escaped_where_name ? escaped_where_name : rx.RegexWhere,
243           rx.selected_files, ua->catalog->name());
244
245    } else if (rx.where) {
246       escaped_where_name = escape_filename(rx.where);
247       Mmsg(ua->cmd,
248           "run job=\"%s\" client=\"%s\" restoreclient=\"%s\" storage=\"%s\""
249           " bootstrap=\"%s\" where=\"%s\" files=%u catalog=\"%s\"",
250           job->name(), rx.ClientName, rx.RestoreClientName,
251           rx.store?rx.store->name():"",
252           escaped_bsr_name ? escaped_bsr_name : jcr->RestoreBootstrap,
253           escaped_where_name ? escaped_where_name : rx.where,
254           rx.selected_files, ua->catalog->name());
255
256    } else {
257       Mmsg(ua->cmd,
258           "run job=\"%s\" client=\"%s\" restoreclient=\"%s\" storage=\"%s\""
259           " bootstrap=\"%s\" files=%u catalog=\"%s\"",
260           job->name(), rx.ClientName, rx.RestoreClientName,
261           rx.store?rx.store->name():"",
262           escaped_bsr_name ? escaped_bsr_name : jcr->RestoreBootstrap,
263           rx.selected_files, ua->catalog->name());
264    }
265
266    if (escaped_bsr_name != NULL) {
267       bfree(escaped_bsr_name);
268    }
269
270    if (escaped_where_name != NULL) {
271       bfree(escaped_where_name);
272    }
273    
274    if (regexp) {
275       bfree(regexp);
276    }
277
278    if (find_arg(ua, NT_("yes")) > 0) {
279       pm_strcat(ua->cmd, " yes");    /* pass it on to the run command */
280    }
281    Dmsg1(200, "Submitting: %s\n", ua->cmd);
282    parse_ua_args(ua);
283    run_cmd(ua, ua->cmd);
284    free_rx(&rx);
285    return 1;
286
287 bail_out:
288    if (escaped_bsr_name != NULL) {
289       bfree(escaped_bsr_name);
290    }
291
292    if (escaped_where_name != NULL) {
293       bfree(escaped_where_name);
294    }
295
296    if (regexp) {
297       bfree(regexp);
298    }
299
300    free_rx(&rx);
301    return 0;
302
303 }
304
305 static void free_rx(RESTORE_CTX *rx)
306 {
307    free_bsr(rx->bsr);
308    rx->bsr = NULL;
309    if (rx->JobIds) {
310       free_pool_memory(rx->JobIds);
311       rx->JobIds = NULL;
312    }
313    if (rx->fname) {
314       free_pool_memory(rx->fname);
315       rx->fname = NULL;
316    }
317    if (rx->path) {
318       free_pool_memory(rx->path);
319       rx->path = NULL;
320    }
321    if (rx->query) {
322       free_pool_memory(rx->query);
323       rx->query = NULL;
324    }
325    free_name_list(&rx->name_list);
326 }
327
328 static bool has_value(UAContext *ua, int i)
329 {
330    if (!ua->argv[i]) {
331       ua->error_msg(_("Missing value for keyword: %s\n"), ua->argk[i]);
332       return false;
333    }
334    return true;
335 }
336
337 /*
338  * This gets the client name from which the backup was made
339  */
340 static int get_client_name(UAContext *ua, RESTORE_CTX *rx)
341 {
342    /* If no client name specified yet, get it now */
343    if (!rx->ClientName[0]) {
344       CLIENT_DBR cr;
345       /* try command line argument */
346       int i = find_arg_with_value(ua, NT_("client"));
347       if (i < 0) {
348          i = find_arg_with_value(ua, NT_("backupclient"));
349       }
350       if (i >= 0) {
351          if (!has_value(ua, i)) {
352             return 0;
353          }
354          bstrncpy(rx->ClientName, ua->argv[i], sizeof(rx->ClientName));
355          return 1;
356       }
357       memset(&cr, 0, sizeof(cr));
358       if (!get_client_dbr(ua, &cr)) {
359          return 0;
360       }
361       bstrncpy(rx->ClientName, cr.Name, sizeof(rx->ClientName));
362    }
363    return 1;
364 }
365
366 /*
367  * This is where we pick up a client name to restore to.
368  */
369 static int get_restore_client_name(UAContext *ua, RESTORE_CTX &rx)
370 {
371    /* Start with same name as backup client */
372    bstrncpy(rx.RestoreClientName, rx.ClientName, sizeof(rx.RestoreClientName));    
373
374    /* try command line argument */
375    int i = find_arg_with_value(ua, NT_("restoreclient"));
376    if (i >= 0) {
377       if (!has_value(ua, i)) {
378          return 0;
379       }
380       bstrncpy(rx.RestoreClientName, ua->argv[i], sizeof(rx.RestoreClientName));
381       return 1;
382    }
383    return 1;
384 }
385
386
387
388 /*
389  * The first step in the restore process is for the user to
390  *  select a list of JobIds from which he will subsequently
391  *  select which files are to be restored.
392  *
393  *  Returns:  2  if filename list made
394  *            1  if jobid list made
395  *            0  on error
396  */
397 static int user_select_jobids_or_files(UAContext *ua, RESTORE_CTX *rx)
398 {
399    char *p;
400    char date[MAX_TIME_LENGTH];
401    bool have_date = false;
402    /* Include current second if using current time */
403    utime_t now = time(NULL) + 1;
404    JobId_t JobId;
405    JOB_DBR jr = { (JobId_t)-1 };
406    bool done = false;
407    int i, j;
408    const char *list[] = {
409       _("List last 20 Jobs run"),
410       _("List Jobs where a given File is saved"),
411       _("Enter list of comma separated JobIds to select"),
412       _("Enter SQL list command"),
413       _("Select the most recent backup for a client"),
414       _("Select backup for a client before a specified time"),
415       _("Enter a list of files to restore"),
416       _("Enter a list of files to restore before a specified time"),
417       _("Find the JobIds of the most recent backup for a client"),
418       _("Find the JobIds for a backup for a client before a specified time"),
419       _("Enter a list of directories to restore for found JobIds"),
420       _("Cancel"),
421       NULL };
422
423    const char *kw[] = {
424        /* These keywords are handled in a for loop */
425       "jobid",       /* 0 */
426       "current",     /* 1 */
427       "before",      /* 2 */
428       "file",        /* 3 */
429       "directory",   /* 4 */
430       "select",      /* 5 */
431       "pool",        /* 6 */
432       "all",         /* 7 */
433
434       /* The keyword below are handled by individual arg lookups */
435       "client",       /* 8 */
436       "storage",      /* 9 */
437       "fileset",      /* 10 */
438       "where",        /* 11 */
439       "yes",          /* 12 */
440       "bootstrap",    /* 13 */
441       "done",         /* 14 */
442       "strip_prefix", /* 15 */
443       "add_prefix",   /* 16 */
444       "add_suffix",   /* 17 */
445       "regexwhere",   /* 18 */
446       "restoreclient", /* 19 */
447       "copies",        /* 20 */
448       NULL
449    };
450
451    *rx->JobIds = 0;
452
453    for (i=1; i<ua->argc; i++) {       /* loop through arguments */
454       bool found_kw = false;
455       for (j=0; kw[j]; j++) {         /* loop through keywords */
456          if (strcasecmp(kw[j], ua->argk[i]) == 0) {
457             found_kw = true;
458             break;
459          }
460       }
461       if (!found_kw) {
462          ua->error_msg(_("Unknown keyword: %s\n"), ua->argk[i]);
463          return 0;
464       }
465       /* Found keyword in kw[] list, process it */
466       switch (j) {
467       case 0:                            /* jobid */
468          if (!has_value(ua, i)) {
469             return 0;
470          }
471          if (*rx->JobIds != 0) {
472             pm_strcat(rx->JobIds, ",");
473          }
474          pm_strcat(rx->JobIds, ua->argv[i]);
475          done = true;
476          break;
477       case 1:                            /* current */
478          /*
479           * Note, we add one second here just to include any job
480           *  that may have finished within the current second,
481           *  which happens a lot in scripting small jobs.
482           */
483          bstrutime(date, sizeof(date), now);
484          have_date = true;
485          break;
486       case 2:                            /* before */
487          if (have_date || !has_value(ua, i)) {
488             return 0;
489          }
490          if (str_to_utime(ua->argv[i]) == 0) {
491             ua->error_msg(_("Improper date format: %s\n"), ua->argv[i]);
492             return 0;
493          }
494          bstrncpy(date, ua->argv[i], sizeof(date));
495          have_date = true;
496          break;
497       case 3:                            /* file */
498       case 4:                            /* dir */
499          if (!has_value(ua, i)) {
500             return 0;
501          }
502          if (!have_date) {
503             bstrutime(date, sizeof(date), now);
504          }
505          if (!get_client_name(ua, rx)) {
506             return 0;
507          }
508          pm_strcpy(ua->cmd, ua->argv[i]);
509          insert_one_file_or_dir(ua, rx, date, j==4);
510          return 2;
511       case 5:                            /* select */
512          if (!have_date) {
513             bstrutime(date, sizeof(date), now);
514          }
515          if (!select_backups_before_date(ua, rx, date)) {
516             return 0;
517          }
518          done = true;
519          break;
520       case 6:                            /* pool specified */
521          if (!has_value(ua, i)) {
522             return 0;
523          }
524          rx->pool = (POOL *)GetResWithName(R_POOL, ua->argv[i]);
525          if (!rx->pool) {
526             ua->error_msg(_("Error: Pool resource \"%s\" does not exist.\n"), ua->argv[i]);
527             return 0;
528          }
529          if (!acl_access_ok(ua, Pool_ACL, ua->argv[i])) {
530             rx->pool = NULL;
531             ua->error_msg(_("Error: Pool resource \"%s\" access not allowed.\n"), ua->argv[i]);
532             return 0;
533          }
534          break;
535       case 7:                         /* all specified */
536          rx->all = true;
537          break;
538       /*
539        * All keywords 7 or greater are ignored or handled by a select prompt
540        */
541       default:
542          break;
543       }
544    }
545
546    if (!done) {
547       ua->send_msg(_("\nFirst you select one or more JobIds that contain files\n"
548                   "to be restored. You will be presented several methods\n"
549                   "of specifying the JobIds. Then you will be allowed to\n"
550                   "select which files from those JobIds are to be restored.\n\n"));
551    }
552
553    /* If choice not already made above, prompt */
554    for ( ; !done; ) {
555       char *fname;
556       int len;
557       bool gui_save;
558
559       start_prompt(ua, _("To select the JobIds, you have the following choices:\n"));
560       for (int i=0; list[i]; i++) {
561          add_prompt(ua, list[i]);
562       }
563       done = true;
564       switch (do_prompt(ua, "", _("Select item: "), NULL, 0)) {
565       case -1:                        /* error or cancel */
566          return 0;
567       case 0:                         /* list last 20 Jobs run */
568          if (!acl_access_ok(ua, Command_ACL, NT_("sqlquery"), 8)) {
569             ua->error_msg(_("SQL query not authorized.\n"));
570             return 0;
571          }
572          gui_save = ua->jcr->gui;
573          ua->jcr->gui = true;
574          db_list_sql_query(ua->jcr, ua->db, uar_list_jobs, prtit, ua, 1, HORZ_LIST);
575          ua->jcr->gui = gui_save;
576          done = false;
577          break;
578       case 1:                         /* list where a file is saved */
579          if (!get_client_name(ua, rx)) {
580             return 0;
581          }
582          if (!get_cmd(ua, _("Enter Filename (no path):"))) {
583             return 0;
584          }
585          len = strlen(ua->cmd);
586          fname = (char *)malloc(len * 2 + 1);
587          db_escape_string(ua->jcr, ua->db, fname, ua->cmd, len);
588          Mmsg(rx->query, uar_file[db_type], rx->ClientName, fname);
589          free(fname);
590          gui_save = ua->jcr->gui;
591          ua->jcr->gui = true;
592          db_list_sql_query(ua->jcr, ua->db, rx->query, prtit, ua, 1, HORZ_LIST);
593          ua->jcr->gui = gui_save;
594          done = false;
595          break;
596       case 2:                         /* enter a list of JobIds */
597          if (!get_cmd(ua, _("Enter JobId(s), comma separated, to restore: "))) {
598             return 0;
599          }
600          pm_strcpy(rx->JobIds, ua->cmd);
601          break;
602       case 3:                         /* Enter an SQL list command */
603          if (!acl_access_ok(ua, Command_ACL, NT_("sqlquery"), 8)) {
604             ua->error_msg(_("SQL query not authorized.\n"));
605             return 0;
606          }
607          if (!get_cmd(ua, _("Enter SQL list command: "))) {
608             return 0;
609          }
610          gui_save = ua->jcr->gui;
611          ua->jcr->gui = true;
612          db_list_sql_query(ua->jcr, ua->db, ua->cmd, prtit, ua, 1, HORZ_LIST);
613          ua->jcr->gui = gui_save;
614          done = false;
615          break;
616       case 4:                         /* Select the most recent backups */
617          if (!have_date) {
618             bstrutime(date, sizeof(date), now);
619          }
620          if (!select_backups_before_date(ua, rx, date)) {
621             return 0;
622          }
623          break;
624       case 5:                         /* select backup at specified time */
625          if (!have_date) {
626             if (!get_date(ua, date, sizeof(date))) {
627                return 0;
628             }
629          }
630          if (!select_backups_before_date(ua, rx, date)) {
631             return 0;
632          }
633          break;
634       case 6:                         /* Enter files */
635          if (!have_date) {
636             bstrutime(date, sizeof(date), now);
637          }
638          if (!get_client_name(ua, rx)) {
639             return 0;
640          }
641          ua->send_msg(_("Enter file names with paths, or < to enter a filename\n"
642                         "containing a list of file names with paths, and terminate\n"
643                         "them with a blank line.\n"));
644          for ( ;; ) {
645             if (!get_cmd(ua, _("Enter full filename: "))) {
646                return 0;
647             }
648             len = strlen(ua->cmd);
649             if (len == 0) {
650                break;
651             }
652             insert_one_file_or_dir(ua, rx, date, false);
653          }
654          return 2;
655        case 7:                        /* enter files backed up before specified time */
656          if (!have_date) {
657             if (!get_date(ua, date, sizeof(date))) {
658                return 0;
659             }
660          }
661          if (!get_client_name(ua, rx)) {
662             return 0;
663          }
664          ua->send_msg(_("Enter file names with paths, or < to enter a filename\n"
665                         "containing a list of file names with paths, and terminate\n"
666                         "them with a blank line.\n"));
667          for ( ;; ) {
668             if (!get_cmd(ua, _("Enter full filename: "))) {
669                return 0;
670             }
671             len = strlen(ua->cmd);
672             if (len == 0) {
673                break;
674             }
675             insert_one_file_or_dir(ua, rx, date, false);
676          }
677          return 2;
678
679       case 8:                         /* Find JobIds for current backup */
680          if (!have_date) {
681             bstrutime(date, sizeof(date), now);
682          }
683          if (!select_backups_before_date(ua, rx, date)) {
684             return 0;
685          }
686          done = false;
687          break;
688
689       case 9:                         /* Find JobIds for give date */
690          if (!have_date) {
691             if (!get_date(ua, date, sizeof(date))) {
692                return 0;
693             }
694          }
695          if (!select_backups_before_date(ua, rx, date)) {
696             return 0;
697          }
698          done = false;
699          break;
700
701       case 10:                        /* Enter directories */
702          if (*rx->JobIds != 0) {
703             ua->send_msg(_("You have already selected the following JobIds: %s\n"),
704                rx->JobIds);
705          } else if (get_cmd(ua, _("Enter JobId(s), comma separated, to restore: "))) {
706             if (*rx->JobIds != 0 && *ua->cmd) {
707                pm_strcat(rx->JobIds, ",");
708             }
709             pm_strcat(rx->JobIds, ua->cmd);
710          }
711          if (*rx->JobIds == 0 || *rx->JobIds == '.') {
712             return 0;                 /* nothing entered, return */
713          }
714          if (!have_date) {
715             bstrutime(date, sizeof(date), now);
716          }
717          if (!get_client_name(ua, rx)) {
718             return 0;
719          }
720          ua->send_msg(_("Enter full directory names or start the name\n"
721                         "with a < to indicate it is a filename containing a list\n"
722                         "of directories and terminate them with a blank line.\n"));
723          for ( ;; ) {
724             if (!get_cmd(ua, _("Enter directory name: "))) {
725                return 0;
726             }
727             len = strlen(ua->cmd);
728             if (len == 0) {
729                break;
730             }
731             /* Add trailing slash to end of directory names */
732             if (ua->cmd[0] != '<' && !IsPathSeparator(ua->cmd[len-1])) {
733                strcat(ua->cmd, "/");
734             }
735             insert_one_file_or_dir(ua, rx, date, true);
736          }
737          return 2;
738
739       case 11:                        /* Cancel or quit */
740          return 0;
741       }
742    }
743
744    POOLMEM *JobIds = get_pool_memory(PM_FNAME);
745    *JobIds = 0;
746    rx->TotalFiles = 0;
747    /*        
748     * Find total number of files to be restored, and filter the JobId
749     *  list to contain only ones permitted by the ACL conditions.
750     */
751    for (p=rx->JobIds; ; ) {
752       char ed1[50];
753       int stat = get_next_jobid_from_list(&p, &JobId);
754       if (stat < 0) {
755          ua->error_msg(_("Invalid JobId in list.\n"));
756          free_pool_memory(JobIds);
757          return 0;
758       }
759       if (stat == 0) {
760          break;
761       }
762       if (jr.JobId == JobId) {
763          continue;                    /* duplicate of last JobId */
764       }
765       memset(&jr, 0, sizeof(JOB_DBR));
766       jr.JobId = JobId;
767       if (!db_get_job_record(ua->jcr, ua->db, &jr)) {
768          ua->error_msg(_("Unable to get Job record for JobId=%s: ERR=%s\n"),
769             edit_int64(JobId, ed1), db_strerror(ua->db));
770          free_pool_memory(JobIds);
771          return 0;
772       }
773       if (!acl_access_ok(ua, Job_ACL, jr.Name)) {
774          ua->error_msg(_("Access to JobId=%s (Job \"%s\") not authorized. Not selected.\n"),
775             edit_int64(JobId, ed1), jr.Name);
776          continue;
777       }
778       if (*JobIds != 0) {
779          pm_strcat(JobIds, ",");
780       }
781       pm_strcat(JobIds, edit_int64(JobId, ed1));
782       rx->TotalFiles += jr.JobFiles;
783    }
784    free_pool_memory(rx->JobIds);
785    rx->JobIds = JobIds;               /* Set ACL filtered list */
786    if (*rx->JobIds == 0) {
787       ua->warning_msg(_("No Jobs selected.\n"));
788       return 0;
789    }
790    if (strchr(rx->JobIds,',')) {
791       ua->info_msg(_("You have selected the following JobIds: %s\n"), rx->JobIds);
792    } else {
793       ua->info_msg(_("You have selected the following JobId: %s\n"), rx->JobIds);
794    }
795    return 1;
796 }
797
798 /*
799  * Get date from user
800  */
801 static int get_date(UAContext *ua, char *date, int date_len)
802 {
803    ua->send_msg(_("The restored files will the most current backup\n"
804                   "BEFORE the date you specify below.\n\n"));
805    for ( ;; ) {
806       if (!get_cmd(ua, _("Enter date as YYYY-MM-DD HH:MM:SS :"))) {
807          return 0;
808       }
809       if (str_to_utime(ua->cmd) != 0) {
810          break;
811       }
812       ua->error_msg(_("Improper date format.\n"));
813    }
814    bstrncpy(date, ua->cmd, date_len);
815    return 1;
816 }
817
818 /*
819  * Insert a single file, or read a list of files from a file
820  */
821 static void insert_one_file_or_dir(UAContext *ua, RESTORE_CTX *rx, char *date, bool dir)
822 {
823    FILE *ffd;
824    char file[5000];
825    char *p = ua->cmd;
826    int line = 0;
827
828    switch (*p) {
829    case '<':
830       p++;
831       if ((ffd = fopen(p, "rb")) == NULL) {
832          berrno be;
833          ua->error_msg(_("Cannot open file %s: ERR=%s\n"),
834             p, be.bstrerror());
835          break;
836       }
837       while (fgets(file, sizeof(file), ffd)) {
838          line++;
839          if (dir) {
840             if (!insert_dir_into_findex_list(ua, rx, file, date)) {
841                ua->error_msg(_("Error occurred on line %d of file \"%s\"\n"), line, p);
842             }
843          } else {
844             if (!insert_file_into_findex_list(ua, rx, file, date)) {
845                ua->error_msg(_("Error occurred on line %d of file \"%s\"\n"), line, p);
846             }
847          }
848       }
849       fclose(ffd);
850       break;
851    case '?':
852       p++;
853       insert_table_into_findex_list(ua, rx, p);
854       break;
855    default:
856       if (dir) {
857          insert_dir_into_findex_list(ua, rx, ua->cmd, date);
858       } else {
859          insert_file_into_findex_list(ua, rx, ua->cmd, date);
860       }
861       break;
862    }
863 }
864
865 /*
866  * For a given file (path+filename), split into path and file, then
867  *   lookup the most recent backup in the catalog to get the JobId
868  *   and FileIndex, then insert them into the findex list.
869  */
870 static bool insert_file_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *file,
871                                         char *date)
872 {
873    strip_trailing_newline(file);
874    split_path_and_filename(ua, rx, file);
875    if (*rx->JobIds == 0) {
876       Mmsg(rx->query, uar_jobid_fileindex, date, rx->path, rx->fname, 
877            rx->ClientName);
878    } else {
879       Mmsg(rx->query, uar_jobids_fileindex, rx->JobIds, date,
880            rx->path, rx->fname, rx->ClientName);
881    }
882    rx->found = false;
883    /* Find and insert jobid and File Index */
884    if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
885       ua->error_msg(_("Query failed: %s. ERR=%s\n"),
886          rx->query, db_strerror(ua->db));
887    }
888    if (!rx->found) {
889       ua->error_msg(_("No database record found for: %s\n"), file);
890 //    ua->error_msg("Query=%s\n", rx->query);
891       return true;
892    }
893    return true;
894 }
895
896 /*
897  * For a given path lookup the most recent backup in the catalog
898  * to get the JobId and FileIndexes of all files in that directory.
899  */
900 static bool insert_dir_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *dir,
901                                         char *date)
902 {  
903    strip_trailing_junk(dir);
904    if (*rx->JobIds == 0) {
905       ua->error_msg(_("No JobId specified cannot continue.\n"));
906       return false;
907    } else {
908       Mmsg(rx->query, uar_jobid_fileindex_from_dir[db_type], rx->JobIds, dir, rx->ClientName);
909    }
910    rx->found = false;
911    /* Find and insert jobid and File Index */
912    if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
913       ua->error_msg(_("Query failed: %s. ERR=%s\n"),
914          rx->query, db_strerror(ua->db));
915    }
916    if (!rx->found) {
917       ua->error_msg(_("No database record found for: %s\n"), dir);
918       return true;
919    }
920    return true;
921 }
922
923 /*
924  * Get the JobId and FileIndexes of all files in the specified table
925  */
926 static bool insert_table_into_findex_list(UAContext *ua, RESTORE_CTX *rx, char *table)
927 {
928    strip_trailing_junk(table);
929    Mmsg(rx->query, uar_jobid_fileindex_from_table, table);
930
931    rx->found = false;
932    /* Find and insert jobid and File Index */
933    if (!db_sql_query(ua->db, rx->query, jobid_fileindex_handler, (void *)rx)) {
934       ua->error_msg(_("Query failed: %s. ERR=%s\n"),
935          rx->query, db_strerror(ua->db));
936    }
937    if (!rx->found) {
938       ua->error_msg(_("No table found: %s\n"), table);
939       return true;
940    }
941    return true;
942 }
943
944 static void split_path_and_filename(UAContext *ua, RESTORE_CTX *rx, char *name)
945 {
946    char *p, *f;
947
948    /* Find path without the filename.
949     * I.e. everything after the last / is a "filename".
950     * OK, maybe it is a directory name, but we treat it like
951     * a filename. If we don't find a / then the whole name
952     * must be a path name (e.g. c:).
953     */
954    for (p=f=name; *p; p++) {
955       if (IsPathSeparator(*p)) {
956          f = p;                       /* set pos of last slash */
957       }
958    }
959    if (IsPathSeparator(*f)) {         /* did we find a slash? */
960       f++;                            /* yes, point to filename */
961    } else {                           /* no, whole thing must be path name */
962       f = p;
963    }
964
965    /* If filename doesn't exist (i.e. root directory), we
966     * simply create a blank name consisting of a single
967     * space. This makes handling zero length filenames
968     * easier.
969     */
970    rx->fnl = p - f;
971    if (rx->fnl > 0) {
972       rx->fname = check_pool_memory_size(rx->fname, 2*(rx->fnl)+1);
973       db_escape_string(ua->jcr, ua->db, rx->fname, f, rx->fnl);
974    } else {
975       rx->fname[0] = 0;
976       rx->fnl = 0;
977    }
978
979    rx->pnl = f - name;
980    if (rx->pnl > 0) {
981       rx->path = check_pool_memory_size(rx->path, 2*(rx->pnl)+1);
982       db_escape_string(ua->jcr, ua->db, rx->path, name, rx->pnl);
983    } else {
984       rx->path[0] = 0;
985       rx->pnl = 0;
986    }
987
988    Dmsg2(100, "split path=%s file=%s\n", rx->path, rx->fname);
989 }
990
991 static bool ask_for_fileregex(UAContext *ua, RESTORE_CTX *rx)
992 {
993    ua->send_msg(_("\nThere were no files inserted into the tree, so file selection\n"
994                   "is not possible.Most likely your retention policy pruned the files\n"));
995    if (get_yesno(ua, _("\nDo you want to restore all the files? (yes|no): "))) {
996       if (ua->pint32_val == 1)
997          return true;
998       while (get_cmd(ua, _("\nRegexp matching files to restore? (empty to abort): "))) {
999          if (ua->cmd[0] == '\0') {
1000             break;
1001          } else {
1002             regex_t *fileregex_re = NULL;
1003             int rc;
1004             char errmsg[500] = "";
1005
1006             fileregex_re = (regex_t *)bmalloc(sizeof(regex_t));
1007             rc = regcomp(fileregex_re, ua->cmd, REG_EXTENDED|REG_NOSUB);
1008             if (rc != 0)
1009                regerror(rc, fileregex_re, errmsg, sizeof(errmsg));
1010             regfree(fileregex_re);
1011             free(fileregex_re);
1012             if (*errmsg) {
1013                ua->send_msg(_("Regex compile error: %s\n"), errmsg);
1014             } else {
1015                rx->bsr->fileregex = bstrdup(ua->cmd);
1016                return true;
1017             }
1018          }
1019       }
1020    }
1021    return false;
1022 }
1023
1024 static bool build_directory_tree(UAContext *ua, RESTORE_CTX *rx)
1025 {
1026    TREE_CTX tree;
1027    JobId_t JobId, last_JobId;
1028    char *p;
1029    bool OK = true;
1030    char ed1[50];
1031
1032    memset(&tree, 0, sizeof(TREE_CTX));
1033    /*
1034     * Build the directory tree containing JobIds user selected
1035     */
1036    tree.root = new_tree(rx->TotalFiles);
1037    tree.ua = ua;
1038    tree.all = rx->all;
1039    last_JobId = 0;
1040    /*
1041     * For display purposes, the same JobId, with different volumes may
1042     * appear more than once, however, we only insert it once.
1043     */
1044    p = rx->JobIds;
1045    tree.FileEstimate = 0;
1046    if (get_next_jobid_from_list(&p, &JobId) > 0) {
1047       /* Use first JobId as estimate of the number of files to restore */
1048       Mmsg(rx->query, uar_count_files, edit_int64(JobId, ed1));
1049       if (!db_sql_query(ua->db, rx->query, restore_count_handler, (void *)rx)) {
1050          ua->error_msg("%s\n", db_strerror(ua->db));
1051       }
1052       if (rx->found) {
1053          /* Add about 25% more than this job for over estimate */
1054          tree.FileEstimate = rx->JobId + (rx->JobId >> 2);
1055          tree.DeltaCount = rx->JobId/50; /* print 50 ticks */
1056       }
1057    }
1058
1059    ua->info_msg(_("\nBuilding directory tree for JobId(s) %s ...  "),
1060                 rx->JobIds);
1061
1062 #define new_get_file_list
1063 #ifdef new_get_file_list
1064    if (!db_get_file_list(ua->jcr, ua->db, rx->JobIds, insert_tree_handler, (void *)&tree)) {
1065       ua->error_msg("%s", db_strerror(ua->db));
1066    }
1067 #else
1068    for (p=rx->JobIds; get_next_jobid_from_list(&p, &JobId) > 0; ) {
1069       char ed1[50];
1070
1071       if (JobId == last_JobId) {
1072          continue;                    /* eliminate duplicate JobIds */
1073       }
1074       last_JobId = JobId;
1075       /*
1076        * Find files for this JobId and insert them in the tree
1077        */
1078       Mmsg(rx->query, uar_sel_files, edit_int64(JobId, ed1));
1079       if (!db_sql_query(ua->db, rx->query, insert_tree_handler, (void *)&tree)) {
1080          ua->error_msg("%s", db_strerror(ua->db));
1081       }
1082    }
1083 #endif
1084    if (tree.FileCount == 0) {
1085       OK = ask_for_fileregex(ua, rx);
1086       if (OK) {
1087          last_JobId = 0;
1088          for (p=rx->JobIds; get_next_jobid_from_list(&p, &JobId) > 0; ) {
1089              if (JobId == last_JobId) {
1090                 continue;                    /* eliminate duplicate JobIds */
1091              }
1092              add_findex_all(rx->bsr, JobId);
1093          }
1094       }
1095    } else {
1096       char ec1[50];
1097       if (tree.all) {
1098          ua->info_msg(_("\n%s files inserted into the tree and marked for extraction.\n"),
1099                       edit_uint64_with_commas(tree.FileCount, ec1));
1100       } else {
1101          ua->info_msg(_("\n%s files inserted into the tree.\n"),
1102                       edit_uint64_with_commas(tree.FileCount, ec1));
1103       }
1104
1105       if (find_arg(ua, NT_("done")) < 0) {
1106          /* Let the user interact in selecting which files to restore */
1107          OK = user_select_files_from_tree(&tree);
1108       }
1109
1110       /*
1111        * Walk down through the tree finding all files marked to be
1112        *  extracted making a bootstrap file.
1113        */
1114       if (OK) {
1115          for (TREE_NODE *node=first_tree_node(tree.root); node; node=next_tree_node(node)) {
1116             Dmsg2(400, "FI=%d node=0x%x\n", node->FileIndex, node);
1117             if (node->extract || node->extract_dir) {
1118                Dmsg2(400, "type=%d FI=%d\n", node->type, node->FileIndex);
1119                add_findex(rx->bsr, node->JobId, node->FileIndex);
1120                if (node->extract && node->type != TN_NEWDIR) {
1121                   rx->selected_files++;  /* count only saved files */
1122                }
1123             }
1124          }
1125       }
1126    }
1127
1128    free_tree(tree.root);              /* free the directory tree */
1129    return OK;
1130 }
1131
1132
1133 /*
1134  * This routine is used to get the current backup or a backup
1135  *   before the specified date.
1136  */
1137 static bool select_backups_before_date(UAContext *ua, RESTORE_CTX *rx, char *date)
1138 {
1139    bool ok = false;
1140    FILESET_DBR fsr;
1141    CLIENT_DBR cr;
1142    POOL_MEM other_filter(PM_MESSAGE);
1143    POOL_MEM temp_filter(PM_MESSAGE);
1144    char fileset_name[MAX_NAME_LENGTH];
1145    char ed1[50], ed2[50];
1146    int i;
1147
1148    /* Create temp tables */
1149    db_sql_query(ua->db, uar_del_temp, NULL, NULL);
1150    db_sql_query(ua->db, uar_del_temp1, NULL, NULL);
1151    if (!db_sql_query(ua->db, uar_create_temp[db_type], NULL, NULL)) {
1152       ua->error_msg("%s\n", db_strerror(ua->db));
1153    }
1154    if (!db_sql_query(ua->db, uar_create_temp1[db_type], NULL, NULL)) {
1155       ua->error_msg("%s\n", db_strerror(ua->db));
1156    }
1157    /*
1158     * Select Client from the Catalog
1159     */
1160    memset(&cr, 0, sizeof(cr));
1161    if (!get_client_dbr(ua, &cr)) {
1162       goto bail_out;
1163    }
1164    bstrncpy(rx->ClientName, cr.Name, sizeof(rx->ClientName));
1165
1166    /*
1167     * Get FileSet
1168     */
1169    memset(&fsr, 0, sizeof(fsr));
1170    i = find_arg_with_value(ua, "FileSet");
1171    if (i >= 0) {
1172       bstrncpy(fsr.FileSet, ua->argv[i], sizeof(fsr.FileSet));
1173       if (!db_get_fileset_record(ua->jcr, ua->db, &fsr)) {
1174          ua->error_msg(_("Error getting FileSet \"%s\": ERR=%s\n"), fsr.FileSet,
1175             db_strerror(ua->db));
1176          i = -1;
1177       }
1178    }
1179    if (i < 0) {                       /* fileset not found */
1180       edit_int64(cr.ClientId, ed1);
1181       Mmsg(rx->query, uar_sel_fileset, ed1, ed1);
1182       start_prompt(ua, _("The defined FileSet resources are:\n"));
1183       if (!db_sql_query(ua->db, rx->query, fileset_handler, (void *)ua)) {
1184          ua->error_msg("%s\n", db_strerror(ua->db));
1185       }
1186       if (do_prompt(ua, _("FileSet"), _("Select FileSet resource"),
1187                  fileset_name, sizeof(fileset_name)) < 0) {
1188          ua->error_msg(_("No FileSet found for client \"%s\".\n"), cr.Name);
1189          goto bail_out;
1190       }
1191
1192       bstrncpy(fsr.FileSet, fileset_name, sizeof(fsr.FileSet));
1193       if (!db_get_fileset_record(ua->jcr, ua->db, &fsr)) {
1194          ua->warning_msg(_("Error getting FileSet record: %s\n"), db_strerror(ua->db));
1195          ua->send_msg(_("This probably means you modified the FileSet.\n"
1196                      "Continuing anyway.\n"));
1197       }
1198    }
1199
1200    /* If Pool specified, add PoolId specification */
1201    if (rx->pool) {
1202       POOL_DBR pr;
1203       memset(&pr, 0, sizeof(pr));
1204       bstrncpy(pr.Name, rx->pool->name(), sizeof(pr.Name));
1205       if (db_get_pool_record(ua->jcr, ua->db, &pr)) {
1206          Mmsg(other_filter, " AND Media.PoolId=%s ", 
1207               edit_int64(pr.PoolId, ed1));
1208       } else {
1209          ua->warning_msg(_("Pool \"%s\" not found, using any pool.\n"), pr.Name);
1210       }
1211    }
1212    /* include copies or not in job selection */
1213    if (find_arg(ua, NT_("copies")) > 0) {
1214       Mmsg(temp_filter, "%s AND Job.Type IN ('%c', '%c') ", 
1215            other_filter.c_str(), (char)JT_BACKUP, (char)JT_JOB_COPY);
1216    } else {
1217       Mmsg(temp_filter, "%s AND Job.Type = '%c' ", other_filter.c_str(),
1218            (char)JT_BACKUP);
1219    }
1220    pm_strcpy(other_filter, temp_filter.c_str());
1221
1222    /* Find JobId of last Full backup for this client, fileset */
1223    edit_int64(cr.ClientId, ed1);
1224    Mmsg(rx->query, uar_last_full, ed1, ed1, date, fsr.FileSet,
1225         other_filter.c_str());
1226    if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
1227       ua->error_msg("%s\n", db_strerror(ua->db));
1228       goto bail_out;
1229    }
1230
1231    /* Find all Volumes used by that JobId */
1232    if (!db_sql_query(ua->db, uar_full, NULL, NULL)) {
1233       ua->error_msg("%s\n", db_strerror(ua->db));
1234       goto bail_out;
1235    }
1236
1237    /* Note, this is needed because I don't seem to get the callback
1238     * from the call just above.
1239     */
1240    rx->JobTDate = 0;
1241    if (!db_sql_query(ua->db, uar_sel_all_temp1, last_full_handler, (void *)rx)) {
1242       ua->warning_msg("%s\n", db_strerror(ua->db));
1243    }
1244    if (rx->JobTDate == 0) {
1245       ua->error_msg(_("No Full backup before %s found.\n"), date);
1246       goto bail_out;
1247    }
1248
1249    /* Now find most recent Differental Job after Full save, if any */
1250    Mmsg(rx->query, uar_dif, edit_uint64(rx->JobTDate, ed1), date,
1251         edit_int64(cr.ClientId, ed2), fsr.FileSet, other_filter.c_str());
1252    if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
1253       ua->warning_msg("%s\n", db_strerror(ua->db));
1254    }
1255    /* Now update JobTDate to lock onto Differental, if any */
1256    rx->JobTDate = 0;
1257    if (!db_sql_query(ua->db, uar_sel_all_temp, last_full_handler, (void *)rx)) {
1258       ua->warning_msg("%s\n", db_strerror(ua->db));
1259    }
1260    if (rx->JobTDate == 0) {
1261       ua->error_msg(_("No Full backup before %s found.\n"), date);
1262       goto bail_out;
1263    }
1264
1265    /* Now find all Incremental Jobs after Full/dif save */
1266    Mmsg(rx->query, uar_inc, edit_uint64(rx->JobTDate, ed1), date,
1267         edit_int64(cr.ClientId, ed2), fsr.FileSet, other_filter.c_str());
1268    if (!db_sql_query(ua->db, rx->query, NULL, NULL)) {
1269       ua->warning_msg("%s\n", db_strerror(ua->db));
1270    }
1271
1272    /* Get the JobIds from that list */
1273    rx->JobIds[0] = 0;
1274    rx->last_jobid[0] = 0;
1275    if (!db_sql_query(ua->db, uar_sel_jobid_temp, jobid_handler, (void *)rx)) {
1276       ua->warning_msg("%s\n", db_strerror(ua->db));
1277    }
1278
1279    if (rx->JobIds[0] != 0) {
1280       /* Display a list of all copies */
1281       db_list_copies_records(ua->jcr, ua->db, 0, rx->JobIds, prtit, ua, HORZ_LIST);
1282       /* Display a list of Jobs selected for this restore */
1283       db_list_sql_query(ua->jcr, ua->db, uar_list_temp, prtit, ua, 1, HORZ_LIST);
1284       ok = true;
1285    } else {
1286       ua->warning_msg(_("No jobs found.\n"));
1287    }
1288
1289 bail_out:
1290    db_sql_query(ua->db, uar_del_temp, NULL, NULL);
1291    db_sql_query(ua->db, uar_del_temp1, NULL, NULL);
1292    return ok;
1293 }
1294
1295
1296 /* 
1297  * Return next JobId from comma separated list   
1298  *
1299  * Returns:
1300  *   1 if next JobId returned
1301  *   0 if no more JobIds are in list
1302  *  -1 there is an error
1303  */
1304 int get_next_jobid_from_list(char **p, JobId_t *JobId)
1305 {
1306    const int maxlen = 30;
1307    char jobid[maxlen+1];
1308    char *q = *p;
1309
1310    jobid[0] = 0;
1311    for (int i=0; i<maxlen; i++) {
1312       if (*q == 0) {
1313          break;
1314       } else if (*q == ',') {
1315          q++;
1316          break;
1317       }
1318       jobid[i] = *q++;
1319       jobid[i+1] = 0;
1320    }
1321    if (jobid[0] == 0) {
1322       return 0;
1323    } else if (!is_a_number(jobid)) {
1324       return -1;                      /* error */
1325    }
1326    *p = q;
1327    *JobId = str_to_int64(jobid);
1328    return 1;
1329 }
1330
1331 static int restore_count_handler(void *ctx, int num_fields, char **row)
1332 {
1333    RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
1334    rx->JobId = str_to_int64(row[0]);
1335    rx->found = true;
1336    return 0;
1337 }
1338
1339 /*
1340  * Callback handler to get JobId and FileIndex for files
1341  *   can insert more than one depending on the caller.
1342  */
1343 static int jobid_fileindex_handler(void *ctx, int num_fields, char **row)
1344 {
1345    RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
1346
1347    Dmsg2(200, "JobId=%s FileIndex=%s\n", row[0], row[1]);
1348    rx->JobId = str_to_int64(row[0]);
1349    add_findex(rx->bsr, rx->JobId, str_to_int64(row[1]));
1350    rx->found = true;
1351    rx->selected_files++;
1352    return 0;
1353 }
1354
1355 /*
1356  * Callback handler make list of JobIds
1357  */
1358 static int jobid_handler(void *ctx, int num_fields, char **row)
1359 {
1360    RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
1361
1362    if (strcmp(rx->last_jobid, row[0]) == 0) {
1363       return 0;                       /* duplicate id */
1364    }
1365    bstrncpy(rx->last_jobid, row[0], sizeof(rx->last_jobid));
1366    if (rx->JobIds[0] != 0) {
1367       pm_strcat(rx->JobIds, ",");
1368    }
1369    pm_strcat(rx->JobIds, row[0]);
1370    return 0;
1371 }
1372
1373
1374 /*
1375  * Callback handler to pickup last Full backup JobTDate
1376  */
1377 static int last_full_handler(void *ctx, int num_fields, char **row)
1378 {
1379    RESTORE_CTX *rx = (RESTORE_CTX *)ctx;
1380
1381    rx->JobTDate = str_to_int64(row[1]);
1382    return 0;
1383 }
1384
1385 /*
1386  * Callback handler build FileSet name prompt list
1387  */
1388 static int fileset_handler(void *ctx, int num_fields, char **row)
1389 {
1390    /* row[0] = FileSet (name) */
1391    if (row[0]) {
1392       add_prompt((UAContext *)ctx, row[0]);
1393    }
1394    return 0;
1395 }
1396
1397 /*
1398  * Free names in the list
1399  */
1400 static void free_name_list(NAME_LIST *name_list)
1401 {
1402    for (int i=0; i < name_list->num_ids; i++) {
1403       free(name_list->name[i]);
1404    }
1405    if (name_list->name) {
1406       free(name_list->name);
1407       name_list->name = NULL;
1408    }
1409    name_list->max_ids = 0;
1410    name_list->num_ids = 0;
1411 }
1412
1413 void find_storage_resource(UAContext *ua, RESTORE_CTX &rx, char *Storage, char *MediaType) 
1414 {
1415    STORE *store;
1416
1417    if (rx.store) {
1418       Dmsg1(200, "Already have store=%s\n", rx.store->name());
1419       return;
1420    }
1421    /*
1422     * Try looking up Storage by name
1423     */
1424    LockRes();
1425    foreach_res(store, R_STORAGE) {
1426       if (strcmp(Storage, store->name()) == 0) {
1427          if (acl_access_ok(ua, Storage_ACL, store->name())) {
1428             rx.store = store;
1429          }
1430          break;
1431       }
1432    }
1433    UnlockRes();
1434
1435    if (rx.store) {
1436       /* Check if an explicit storage resource is given */
1437       store = NULL;
1438       int i = find_arg_with_value(ua, "storage");
1439       if (i > 0) {
1440          store = (STORE *)GetResWithName(R_STORAGE, ua->argv[i]);
1441          if (store && !acl_access_ok(ua, Storage_ACL, store->name())) {
1442             store = NULL;
1443          }
1444       }
1445       if (store && (store != rx.store)) {
1446          ua->info_msg(_("Warning default storage overridden by \"%s\" on command line.\n"),
1447             store->name());
1448          rx.store = store;
1449          Dmsg1(200, "Set store=%s\n", rx.store->name());
1450       }
1451       return;
1452    }
1453
1454    /* If no storage resource, try to find one from MediaType */
1455    if (!rx.store) {
1456       LockRes();
1457       foreach_res(store, R_STORAGE) {
1458          if (strcmp(MediaType, store->media_type) == 0) {
1459             if (acl_access_ok(ua, Storage_ACL, store->name())) {
1460                rx.store = store;
1461                Dmsg1(200, "Set store=%s\n", rx.store->name());
1462                ua->warning_msg(_("Storage \"%s\" not found, using Storage \"%s\" from MediaType \"%s\".\n"),
1463                   Storage, store->name(), MediaType);
1464             }
1465             UnlockRes();
1466             return;
1467          }
1468       }
1469       UnlockRes();
1470       ua->warning_msg(_("\nUnable to find Storage resource for\n"
1471          "MediaType \"%s\", needed by the Jobs you selected.\n"), MediaType);
1472    }
1473
1474    /* Take command line arg, or ask user if none */
1475    rx.store = get_storage_resource(ua, false /* don't use default */);
1476    if (rx.store) {
1477       Dmsg1(200, "Set store=%s\n", rx.store->name());
1478    }
1479
1480 }