]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/dird/backup.c
First cut restart Jobs
[bacula/bacula] / bacula / src / dird / backup.c
1 /*
2    Bacula® - The Network Backup Solution
3
4    Copyright (C) 2000-2011 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 three of the GNU Affero 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 Affero 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 -- backup.c -- responsible for doing backup jobs
31  *
32  *     Kern Sibbald, March MM
33  *
34  *  Basic tasks done here:
35  *     Open DB and create records for this job.
36  *     Open Message Channel with Storage daemon to tell him a job will be starting.
37  *     Open connection with File daemon and pass him commands
38  *       to do the backup.
39  *     When the File daemon finishes the job, update the DB.
40  *
41  */
42
43 #include "bacula.h"
44 #include "dird.h"
45 #include "ua.h"
46
47 /* Commands sent to File daemon */
48 static char backupcmd[] = "backup FileIndex=%ld\n";
49 static char storaddr[]  = "storage address=%s port=%d ssl=%d\n";
50
51 /* Responses received from File daemon */
52 static char OKbackup[]   = "2000 OK backup\n";
53 static char OKstore[]    = "2000 OK storage\n";
54 static char EndJob[]     = "2800 End Job TermCode=%d JobFiles=%u "
55                            "ReadBytes=%llu JobBytes=%llu Errors=%u "  
56                            "VSS=%d Encrypt=%d\n";
57 /* Pre 1.39.29 (04Dec06) EndJob */
58 static char OldEndJob[]  = "2800 End Job TermCode=%d JobFiles=%u "
59                            "ReadBytes=%llu JobBytes=%llu Errors=%u\n";
60 /* 
61  * Called here before the job is run to do the job
62  *   specific setup.
63  */
64 bool do_backup_init(JCR *jcr)
65 {
66
67    if (jcr->is_JobLevel(L_VIRTUAL_FULL)) {
68       return do_vbackup_init(jcr);
69    }
70    free_rstorage(jcr);                   /* we don't read so release */
71
72    if (!get_or_create_fileset_record(jcr)) {
73       return false;
74    }
75
76    /* 
77     * Get definitive Job level and since time
78     */
79    get_level_since_time(jcr, jcr->since, sizeof(jcr->since));
80
81    apply_pool_overrides(jcr);
82
83    if (!allow_duplicate_job(jcr)) {
84       return false;
85    }
86
87    jcr->jr.PoolId = get_or_create_pool_record(jcr, jcr->pool->name());
88    if (jcr->jr.PoolId == 0) {
89       return false;
90    }
91
92    /* If pool storage specified, use it instead of job storage */
93    copy_wstorage(jcr, jcr->pool->storage, _("Pool resource"));
94
95    if (!jcr->wstorage) {
96       Jmsg(jcr, M_FATAL, 0, _("No Storage specification found in Job or Pool.\n"));
97       return false;
98    }
99
100    create_clones(jcr);                /* run any clone jobs */
101
102    return true;
103 }
104
105 /* Take all base jobs from job resource and find the
106  * last L_BASE jobid.
107  */
108 static bool get_base_jobids(JCR *jcr, db_list_ctx *jobids)
109 {
110    JOB_DBR jr;
111    JOB *job;
112    JobId_t id;
113    char str_jobid[50];
114
115    if (!jcr->job->base) {
116       return false;             /* no base job, stop accurate */
117    }
118
119    memset(&jr, 0, sizeof(JOB_DBR));
120    jr.StartTime = jcr->jr.StartTime;
121
122    foreach_alist(job, jcr->job->base) {
123       bstrncpy(jr.Name, job->name(), sizeof(jr.Name));
124       db_get_base_jobid(jcr, jcr->db, &jr, &id);
125
126       if (id) {
127          if (jobids->count) {
128             pm_strcat(jobids->list, ",");
129          }
130          pm_strcat(jobids->list, edit_uint64(id, str_jobid));
131          jobids->count++;
132       }
133    }
134
135    return jobids->count > 0;
136 }
137
138 /*
139  * Foreach files in currrent list, send "/path/fname\0LStat\0MD5\0Delta" to FD
140  *      row[0]=Path, row[1]=Filename, row[2]=FileIndex
141  *      row[3]=JobId row[4]=LStat row[5]=MarkId row[6]=MD5
142  */
143 static int accurate_list_handler(void *ctx, int num_fields, char **row)
144 {
145    JCR *jcr = (JCR *)ctx;
146
147    if (job_canceled(jcr)) {
148       return 1;
149    }
150    
151    if (row[2][0] == '0') {           /* discard when file_index == 0 */
152       return 0;
153    }
154
155    /* sending with checksum */
156    if (jcr->use_accurate_chksum 
157        && num_fields == 7 
158        && row[6][0] /* skip checksum = '0' */
159        && row[6][1])
160    { 
161       jcr->file_bsock->fsend("%s%s%c%s%c%s%c%s", 
162                              row[0], row[1], 0, row[4], 0, row[6], 0, row[5]); 
163    } else {
164       jcr->file_bsock->fsend("%s%s%c%s%c%c%s", 
165                              row[0], row[1], 0, row[4], 0, 0, row[5]); 
166    }
167    return 0;
168 }
169
170 /* In this procedure, we check if the current fileset is using checksum
171  * FileSet-> Include-> Options-> Accurate/Verify/BaseJob=checksum
172  * This procedure uses jcr->HasBase, so it must be call after the initialization
173  */
174 static bool is_checksum_needed_by_fileset(JCR *jcr)
175 {
176    FILESET *f;
177    INCEXE *inc;
178    FOPTS *fopts;
179    bool in_block=false;
180    bool have_basejob_option=false;
181    if (!jcr->job || !jcr->job->fileset) {
182       return false;
183    }
184
185    f = jcr->job->fileset;
186    
187    for (int i=0; i < f->num_includes; i++) { /* Parse all Include {} */
188       inc = f->include_items[i];
189       
190       for (int j=0; j < inc->num_opts; j++) { /* Parse all Options {} */
191          fopts = inc->opts_list[j];
192          
193          for (char *k=fopts->opts; *k ; k++) { /* Try to find one request */
194             switch (*k) {
195             case 'V':           /* verify */
196                in_block = (jcr->getJobType() == JT_VERIFY); /* not used now */
197                break;
198             case 'J':           /* Basejob keyword */
199                have_basejob_option = in_block = jcr->HasBase;
200                break;
201             case 'C':           /* Accurate keyword */
202                in_block = !jcr->is_JobLevel(L_FULL);
203                break;
204             case ':':           /* End of keyword */
205                in_block = false;
206                break;
207             case '5':           /* MD5  */
208             case '1':           /* SHA1 */
209                if (in_block) {
210                   Dmsg0(50, "Checksum will be sent to FD\n");
211                   return true;
212                }
213                break;
214             default:
215                break;
216             }
217          }
218       }
219    }
220
221    /* By default for BaseJobs, we send the checksum */
222    if (!have_basejob_option && jcr->HasBase) {
223       return true;
224    }
225    
226    Dmsg0(50, "Checksum will be sent to FD\n");
227    return false;
228 }
229
230 /*
231  * Send current file list to FD
232  *    DIR -> FD : accurate files=xxxx
233  *    DIR -> FD : /path/to/file\0Lstat\0MD5\0Delta
234  *    DIR -> FD : /path/to/dir/\0Lstat\0MD5\0Delta
235  *    ...
236  *    DIR -> FD : EOD
237  */
238 bool send_accurate_current_files(JCR *jcr)
239 {
240    POOL_MEM buf;
241    db_list_ctx jobids;
242    db_list_ctx nb;
243    char ed1[50];
244
245    /* For incomplete Jobs, we add our own id */
246    if (jcr->incomplete) {
247       edit_int64(jcr->JobId, ed1);   
248       jobids.add(ed1);
249    } else {
250       if (!jcr->accurate || job_canceled(jcr)) {
251          return true;
252       }
253       /* In base level, no previous job is used */
254       if (jcr->is_JobLevel(L_BASE)) {
255          return true;
256       }
257    
258       if (jcr->is_JobLevel(L_FULL)) {
259          /* On Full mode, if no previous base job, no accurate things */
260          if (!get_base_jobids(jcr, &jobids)) {
261             return true;
262          }
263          jcr->HasBase = true;
264          Jmsg(jcr, M_INFO, 0, _("Using BaseJobId(s): %s\n"), jobids.list);
265
266       } else {
267          /* For Incr/Diff level, we search for older jobs */
268          db_accurate_get_jobids(jcr, jcr->db, &jcr->jr, &jobids);
269
270          /* We are in Incr/Diff, but no Full to build the accurate list... */
271          if (jobids.count == 0) {
272             Jmsg(jcr, M_FATAL, 0, _("Cannot find previous jobids.\n"));
273             return false;  /* fail */
274          }
275       }
276    }
277
278    /* Don't send and store the checksum if fileset doesn't require it */
279    jcr->use_accurate_chksum = is_checksum_needed_by_fileset(jcr);
280
281    if (jcr->JobId) {            /* display the message only for real jobs */
282       Jmsg(jcr, M_INFO, 0, _("Sending Accurate information.\n"));
283    }
284
285    /* to be able to allocate the right size for htable */
286    Mmsg(buf, "SELECT sum(JobFiles) FROM Job WHERE JobId IN (%s)", jobids.list);
287    db_sql_query(jcr->db, buf.c_str(), db_list_handler, &nb);
288    Dmsg2(200, "jobids=%s nb=%s\n", jobids.list, nb.list);
289    jcr->file_bsock->fsend("accurate files=%s\n", nb.list); 
290
291    if (!db_open_batch_connexion(jcr, jcr->db)) {
292       Jmsg0(jcr, M_FATAL, 0, "Can't get batch sql connexion");
293       return false;  /* Fail */
294    }
295    
296    if (jcr->HasBase) {
297       jcr->nb_base_files = str_to_int64(nb.list);
298       db_create_base_file_list(jcr, jcr->db, jobids.list);
299       db_get_base_file_list(jcr, jcr->db, jcr->use_accurate_chksum,
300                             accurate_list_handler, (void *)jcr);
301
302    } else {
303       db_get_file_list(jcr, jcr->db_batch,
304                        jobids.list, jcr->use_accurate_chksum, false /* no delta */,
305                        accurate_list_handler, (void *)jcr);
306    } 
307
308    /* TODO: close the batch connection ? (can be used very soon) */
309
310    jcr->file_bsock->signal(BNET_EOD);
311    return true;
312 }
313
314 /*
315  * Do a backup of the specified FileSet
316  *
317  *  Returns:  false on failure
318  *            true  on success
319  */
320 bool do_backup(JCR *jcr)
321 {
322    int stat;
323    int tls_need = BNET_TLS_NONE;
324    BSOCK   *fd;
325    STORE *store;
326    char ed1[100];
327    db_int64_ctx job;
328    POOL_MEM buf;
329
330    if (jcr->is_JobLevel(L_VIRTUAL_FULL)) {
331       return do_vbackup(jcr);
332    }
333
334    /* Print Job Start message */
335    Jmsg(jcr, M_INFO, 0, _("Start Backup JobId %s, Job=%s\n"),
336         edit_uint64(jcr->JobId, ed1), jcr->Job);
337
338    jcr->setJobStatus(JS_Running);
339    Dmsg2(100, "JobId=%d JobLevel=%c\n", jcr->jr.JobId, jcr->jr.JobLevel);
340    if (!db_update_job_start_record(jcr, jcr->db, &jcr->jr)) {
341       Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
342       return false;
343    }
344
345    /* For incomplete Jobs, we add our own id */
346    if (jcr->incomplete) {
347       edit_int64(jcr->JobId, ed1);   
348       Mmsg(buf, "SELECT count(*) FROM File WHERE JobId=%s", ed1);
349       if (!db_sql_query(jcr->db, buf.c_str(), db_int64_handler, &job)) {
350          Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
351          return false;
352       }
353       jcr->JobFiles = job.value;
354       Mmsg(buf, "SELECT VolSessionId FROM Job WHERE JobId=%s", ed1);
355       if (!db_sql_query(jcr->db, buf.c_str(), db_int64_handler, &job)) {
356          Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
357          return false;
358       }
359       jcr->VolSessionId = job.value;
360       Mmsg(buf, "SELECT VolSessionTime FROM Job WHERE JobId=%s", ed1);
361       if (!db_sql_query(jcr->db, buf.c_str(), db_int64_handler, &job)) {
362          Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
363          return false;
364       }
365       jcr->VolSessionTime = job.value;
366       Dmsg4(100, "JobId=%s JobFiles=%ld VolSessionId=%ld VolSessionTime=%ld\n", ed1, 
367             jcr->JobFiles, jcr->VolSessionId, jcr->VolSessionTime);
368    }
369
370    /*
371     * Open a message channel connection with the Storage
372     * daemon. This is to let him know that our client
373     * will be contacting him for a backup  session.
374     *
375     */
376    Dmsg0(110, "Open connection with storage daemon\n");
377    jcr->setJobStatus(JS_WaitSD);
378    /*
379     * Start conversation with Storage daemon
380     */
381    if (!connect_to_storage_daemon(jcr, 10, SDConnectTimeout, 1)) {
382       return false;
383    }
384    /*
385     * Now start a job with the Storage daemon
386     */
387    if (!start_storage_daemon_job(jcr, NULL, jcr->wstorage)) {
388       return false;
389    }
390
391    /*
392     * Start the job prior to starting the message thread below
393     * to avoid two threads from using the BSOCK structure at
394     * the same time.
395     */
396    if (!jcr->store_bsock->fsend("run")) {
397       return false;
398    }
399
400    /*
401     * Now start a Storage daemon message thread.  Note,
402     *   this thread is used to provide the catalog services
403     *   for the backup job, including inserting the attributes
404     *   into the catalog.  See catalog_update() in catreq.c
405     */
406    if (!start_storage_daemon_message_thread(jcr)) {
407       return false;
408    }
409    Dmsg0(150, "Storage daemon connection OK\n");
410
411    jcr->setJobStatus(JS_WaitFD);
412    if (!connect_to_file_daemon(jcr, 10, FDConnectTimeout, 1)) {
413       goto bail_out;
414    }
415
416    jcr->setJobStatus(JS_Running);
417    fd = jcr->file_bsock;
418
419    if (!send_include_list(jcr)) {
420       goto bail_out;
421    }
422
423    if (!send_exclude_list(jcr)) {
424       goto bail_out;
425    }
426
427    if (!send_level_command(jcr)) {
428       goto bail_out;
429    }
430
431    /*
432     * send Storage daemon address to the File daemon
433     */
434    store = jcr->wstore;
435    if (store->SDDport == 0) {
436       store->SDDport = store->SDport;
437    }
438
439    /* TLS Requirement */
440    if (store->tls_enable) {
441       if (store->tls_require) {
442          tls_need = BNET_TLS_REQUIRED;
443       } else {
444          tls_need = BNET_TLS_OK;
445       }
446    }
447
448    fd->fsend(storaddr, store->address, store->SDDport, tls_need);
449    if (!response(jcr, fd, OKstore, "Storage", DISPLAY_ERROR)) {
450       goto bail_out;
451    }
452
453    if (!send_runscripts_commands(jcr)) {
454       goto bail_out;
455    }
456
457    /*    
458     * We re-update the job start record so that the start
459     *  time is set after the run before job.  This avoids 
460     *  that any files created by the run before job will
461     *  be saved twice.  They will be backed up in the current
462     *  job, but not in the next one unless they are changed.
463     *  Without this, they will be backed up in this job and
464     *  in the next job run because in that case, their date 
465     *   is after the start of this run.
466     */
467    jcr->start_time = time(NULL);
468    jcr->jr.StartTime = jcr->start_time;
469    if (!db_update_job_start_record(jcr, jcr->db, &jcr->jr)) {
470       Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
471    }
472
473    /*
474     * If backup is in accurate mode, we send the list of
475     * all files to FD.
476     */
477    if (!send_accurate_current_files(jcr)) {
478       goto bail_out;     /* error */
479    }
480
481    /* Send backup command */
482    fd->fsend(backupcmd, jcr->JobFiles);
483    Dmsg1(100, ">filed: %s", fd->msg);
484    if (!response(jcr, fd, OKbackup, "backup", DISPLAY_ERROR)) {
485       goto bail_out;
486    }
487
488    /* Pickup Job termination data */
489    stat = wait_for_job_termination(jcr);
490    db_write_batch_file_records(jcr);    /* used by bulk batch file insert */
491
492    if (jcr->HasBase && !db_commit_base_file_attributes_record(jcr, jcr->db))  {
493       Jmsg(jcr, M_FATAL, 0, "%s", db_strerror(jcr->db));
494    }
495
496    if (stat == JS_Terminated) {
497       backup_cleanup(jcr, stat);
498       return true;
499    }     
500    return false;
501
502 /* Come here only after starting SD thread */
503 bail_out:
504    jcr->setJobStatus(JS_ErrorTerminated);
505    Dmsg1(400, "wait for sd. use=%d\n", jcr->use_count());
506    /* Cancel SD */
507    wait_for_job_termination(jcr, FDConnectTimeout);
508    Dmsg1(400, "after wait for sd. use=%d\n", jcr->use_count());
509    return false;
510 }
511
512
513 /*
514  * Here we wait for the File daemon to signal termination,
515  *   then we wait for the Storage daemon.  When both
516  *   are done, we return the job status.
517  * Also used by restore.c
518  */
519 int wait_for_job_termination(JCR *jcr, int timeout)
520 {
521    int32_t n = 0;
522    BSOCK *fd = jcr->file_bsock;
523    bool fd_ok = false;
524    uint32_t JobFiles, JobErrors;
525    uint32_t JobWarnings = 0;
526    uint64_t ReadBytes = 0;
527    uint64_t JobBytes = 0;
528    int VSS = 0;
529    int Encrypt = 0;
530    btimer_t *tid=NULL;
531
532    jcr->setJobStatus(JS_Running);
533
534    if (fd) {
535       if (timeout) {
536          tid = start_bsock_timer(fd, timeout); /* TODO: New timeout directive??? */
537       }
538       /* Wait for Client to terminate */
539       while ((n = bget_dirmsg(fd)) >= 0) {
540          if (!fd_ok && 
541              (sscanf(fd->msg, EndJob, &jcr->FDJobStatus, &JobFiles,
542                      &ReadBytes, &JobBytes, &JobErrors, &VSS, &Encrypt) == 7 ||
543               sscanf(fd->msg, OldEndJob, &jcr->FDJobStatus, &JobFiles,
544                      &ReadBytes, &JobBytes, &JobErrors) == 5)) {
545             fd_ok = true;
546             jcr->setJobStatus(jcr->FDJobStatus);
547             Dmsg1(100, "FDStatus=%c\n", (char)jcr->JobStatus);
548          } else {
549             Jmsg(jcr, M_WARNING, 0, _("Unexpected Client Job message: %s\n"),
550                  fd->msg);
551          }
552          if (job_canceled(jcr)) {
553             break;
554          }
555       }
556       if (tid) {
557          stop_bsock_timer(tid);
558       }
559
560       if (is_bnet_error(fd)) {
561          Jmsg(jcr, M_FATAL, 0, _("Network error with FD during %s: ERR=%s\n"),
562               job_type_to_str(jcr->getJobType()), fd->bstrerror());
563       }
564       fd->signal(BNET_TERMINATE);   /* tell Client we are terminating */
565    }
566
567    /*
568     * Force cancel in SD if failing, but not for Incomplete jobs
569     *  so that we let the SD despool.
570     */
571    if (jcr->is_canceled() || !fd_ok) {
572       cancel_storage_daemon_job(jcr);
573    }
574
575    /* Note, the SD stores in jcr->JobFiles/ReadBytes/JobBytes/JobErrors */
576    wait_for_storage_daemon_termination(jcr);
577
578    /* Return values from FD */
579    if (fd_ok) {
580       jcr->JobFiles = JobFiles;
581       jcr->JobErrors += JobErrors;       /* Keep total errors */
582       jcr->ReadBytes = ReadBytes;
583       jcr->JobBytes = JobBytes;
584       jcr->JobWarnings = JobWarnings;
585       jcr->VSS = VSS;
586       jcr->Encrypt = Encrypt;
587    } else {
588       Jmsg(jcr, M_FATAL, 0, _("No Job status returned from FD.\n"));
589    }
590
591 // Dmsg4(100, "fd_ok=%d FDJS=%d JS=%d SDJS=%d\n", fd_ok, jcr->FDJobStatus,
592 //   jcr->JobStatus, jcr->SDJobStatus);
593
594    /* Return the first error status we find Dir, FD, or SD */
595    if (!fd_ok || is_bnet_error(fd)) { /* if fd not set, that use !fd_ok */
596       jcr->FDJobStatus = JS_ErrorTerminated;
597    }
598    if (jcr->JobStatus != JS_Terminated) {
599       return jcr->JobStatus;
600    }
601    if (jcr->FDJobStatus != JS_Terminated) {
602       return jcr->FDJobStatus;
603    }
604    return jcr->SDJobStatus;
605 }
606
607 /*
608  * Release resources allocated during backup.
609  */
610 void backup_cleanup(JCR *jcr, int TermCode)
611 {
612    char sdt[50], edt[50], schedt[50];
613    char ec1[30], ec2[30], ec3[30], ec4[30], ec5[30], compress[50];
614    char ec6[30], ec7[30], ec8[30], elapsed[50];
615    char term_code[100], fd_term_msg[100], sd_term_msg[100];
616    const char *term_msg;
617    int msg_type = M_INFO;
618    MEDIA_DBR mr;
619    CLIENT_DBR cr;
620    double kbps, compression;
621    utime_t RunTime;
622    POOL_MEM base_info;
623
624    if (jcr->is_JobLevel(L_VIRTUAL_FULL)) {
625       vbackup_cleanup(jcr, TermCode);
626       return;
627    }
628
629    Dmsg2(100, "Enter backup_cleanup %d %c\n", TermCode, TermCode);
630    memset(&mr, 0, sizeof(mr));
631    memset(&cr, 0, sizeof(cr));
632
633 #ifdef xxxx
634    if (jcr->getJobStatus() == JS_Terminated && 
635         (jcr->JobErrors || jcr->SDErrors || jcr->JobWarnings)) {
636       TermCode = JS_Warnings;
637    }
638 #endif
639          
640    update_job_end(jcr, TermCode);
641
642    if (!db_get_job_record(jcr, jcr->db, &jcr->jr)) {
643       Jmsg(jcr, M_WARNING, 0, _("Error getting Job record for Job report: ERR=%s"),
644          db_strerror(jcr->db));
645       jcr->setJobStatus(JS_ErrorTerminated);
646    }
647
648    bstrncpy(cr.Name, jcr->client->name(), sizeof(cr.Name));
649    if (!db_get_client_record(jcr, jcr->db, &cr)) {
650       Jmsg(jcr, M_WARNING, 0, _("Error getting Client record for Job report: ERR=%s"),
651          db_strerror(jcr->db));
652    }
653
654    bstrncpy(mr.VolumeName, jcr->VolumeName, sizeof(mr.VolumeName));
655    if (!db_get_media_record(jcr, jcr->db, &mr)) {
656       Jmsg(jcr, M_WARNING, 0, _("Error getting Media record for Volume \"%s\": ERR=%s"),
657          mr.VolumeName, db_strerror(jcr->db));
658       jcr->setJobStatus(JS_ErrorTerminated);
659    }
660
661    update_bootstrap_file(jcr);
662
663    switch (jcr->JobStatus) {
664       case JS_Terminated:
665          if (jcr->JobErrors || jcr->SDErrors) {
666             term_msg = _("Backup OK -- with warnings");
667          } else {
668             term_msg = _("Backup OK");
669          }
670          break;
671       case JS_Incomplete:
672          term_msg = _("Backup failed -- incomplete");
673          break;
674       case JS_Warnings:
675          term_msg = _("Backup OK -- with warnings");
676          break;
677       case JS_FatalError:
678       case JS_ErrorTerminated:
679          term_msg = _("*** Backup Error ***");
680          msg_type = M_ERROR;          /* Generate error message */
681          if (jcr->store_bsock) {
682             jcr->store_bsock->signal(BNET_TERMINATE);
683             if (jcr->SD_msg_chan) {
684                pthread_cancel(jcr->SD_msg_chan);
685             }
686          }
687          break;
688       case JS_Canceled:
689          term_msg = _("Backup Canceled");
690          if (jcr->store_bsock) {
691             jcr->store_bsock->signal(BNET_TERMINATE);
692             if (jcr->SD_msg_chan) {
693                pthread_cancel(jcr->SD_msg_chan);
694             }
695          }
696          break;
697       default:
698          term_msg = term_code;
699          sprintf(term_code, _("Inappropriate term code: %c\n"), jcr->JobStatus);
700          break;
701    }
702    bstrftimes(schedt, sizeof(schedt), jcr->jr.SchedTime);
703    bstrftimes(sdt, sizeof(sdt), jcr->jr.StartTime);
704    bstrftimes(edt, sizeof(edt), jcr->jr.EndTime);
705    RunTime = jcr->jr.EndTime - jcr->jr.StartTime;
706    if (RunTime <= 0) {
707       kbps = 0;
708    } else {
709       kbps = ((double)jcr->jr.JobBytes) / (1000.0 * (double)RunTime);
710    }
711    if (!db_get_job_volume_names(jcr, jcr->db, jcr->jr.JobId, &jcr->VolumeName)) {
712       /*
713        * Note, if the job has erred, most likely it did not write any
714        *  tape, so suppress this "error" message since in that case
715        *  it is normal.  Or look at it the other way, only for a
716        *  normal exit should we complain about this error.
717        */
718       if (jcr->JobStatus == JS_Terminated && jcr->jr.JobBytes) {
719          Jmsg(jcr, M_ERROR, 0, "%s", db_strerror(jcr->db));
720       }
721       jcr->VolumeName[0] = 0;         /* none */
722    }
723
724    if (jcr->ReadBytes == 0) {
725       bstrncpy(compress, "None", sizeof(compress));
726    } else {
727       compression = (double)100 - 100.0 * ((double)jcr->JobBytes / (double)jcr->ReadBytes);
728       if (compression < 0.5) {
729          bstrncpy(compress, "None", sizeof(compress));
730       } else {
731          bsnprintf(compress, sizeof(compress), "%.1f %%", compression);
732       }
733    }
734    jobstatus_to_ascii(jcr->FDJobStatus, fd_term_msg, sizeof(fd_term_msg));
735    jobstatus_to_ascii(jcr->SDJobStatus, sd_term_msg, sizeof(sd_term_msg));
736
737    if (jcr->HasBase) {
738       Mmsg(base_info, "  Base files/Used files:  %lld/%lld (%.2f%%)\n",
739            jcr->nb_base_files, 
740            jcr->nb_base_files_used, 
741            jcr->nb_base_files_used*100.0/jcr->nb_base_files);
742    }
743 // bmicrosleep(15, 0);                /* for debugging SIGHUP */
744
745    Jmsg(jcr, msg_type, 0, _("%s %s %s (%s):\n"
746 "  Build OS:               %s %s %s\n"
747 "  JobId:                  %d\n"
748 "  Job:                    %s\n"
749 "  Backup Level:           %s%s\n"
750 "  Client:                 \"%s\" %s\n"
751 "  FileSet:                \"%s\" %s\n"
752 "  Pool:                   \"%s\" (From %s)\n"
753 "  Catalog:                \"%s\" (From %s)\n"
754 "  Storage:                \"%s\" (From %s)\n"
755 "  Scheduled time:         %s\n"
756 "  Start time:             %s\n"
757 "  End time:               %s\n"
758 "  Elapsed time:           %s\n"
759 "  Priority:               %d\n"
760 "  FD Files Written:       %s\n"
761 "  SD Files Written:       %s\n"
762 "  FD Bytes Written:       %s (%sB)\n"
763 "  SD Bytes Written:       %s (%sB)\n"
764 "  Rate:                   %.1f KB/s\n"
765 "  Software Compression:   %s\n"
766 "%s"                                         /* Basefile info */
767 "  VSS:                    %s\n"
768 "  Encryption:             %s\n"
769 "  Accurate:               %s\n"
770 "  Volume name(s):         %s\n"
771 "  Volume Session Id:      %d\n"
772 "  Volume Session Time:    %d\n"
773 "  Last Volume Bytes:      %s (%sB)\n"
774 "  Non-fatal FD errors:    %d\n"
775 "  SD Errors:              %d\n"
776 "  FD termination status:  %s\n"
777 "  SD termination status:  %s\n"
778 "  Termination:            %s\n\n"),
779         BACULA, my_name, VERSION, LSMDATE,
780         HOST_OS, DISTNAME, DISTVER,
781         jcr->jr.JobId,
782         jcr->jr.Job,
783         level_to_str(jcr->getJobLevel()), jcr->since,
784         jcr->client->name(), cr.Uname,
785         jcr->fileset->name(), jcr->FSCreateTime,
786         jcr->pool->name(), jcr->pool_source,
787         jcr->catalog->name(), jcr->catalog_source,
788         jcr->wstore->name(), jcr->wstore_source,
789         schedt,
790         sdt,
791         edt,
792         edit_utime(RunTime, elapsed, sizeof(elapsed)),
793         jcr->JobPriority,
794         edit_uint64_with_commas(jcr->jr.JobFiles, ec1),
795         edit_uint64_with_commas(jcr->SDJobFiles, ec2),
796         edit_uint64_with_commas(jcr->jr.JobBytes, ec3),
797         edit_uint64_with_suffix(jcr->jr.JobBytes, ec4),
798         edit_uint64_with_commas(jcr->SDJobBytes, ec5),
799         edit_uint64_with_suffix(jcr->SDJobBytes, ec6),
800         kbps,
801         compress,
802         base_info.c_str(),
803         jcr->VSS?_("yes"):_("no"),
804         jcr->Encrypt?_("yes"):_("no"),
805         jcr->accurate?_("yes"):_("no"),
806         jcr->VolumeName,
807         jcr->VolSessionId,
808         jcr->VolSessionTime,
809         edit_uint64_with_commas(mr.VolBytes, ec7),
810         edit_uint64_with_suffix(mr.VolBytes, ec8),
811         jcr->JobErrors,
812         jcr->SDErrors,
813         fd_term_msg,
814         sd_term_msg,
815         term_msg);
816
817    Dmsg0(100, "Leave backup_cleanup()\n");
818 }
819
820 void update_bootstrap_file(JCR *jcr)
821 {
822    /* Now update the bootstrap file if any */
823    if (jcr->JobStatus == JS_Terminated && jcr->jr.JobBytes &&
824        jcr->job->WriteBootstrap) {
825       FILE *fd;
826       BPIPE *bpipe = NULL;
827       int got_pipe = 0;
828       POOLMEM *fname = get_pool_memory(PM_FNAME);
829       fname = edit_job_codes(jcr, fname, jcr->job->WriteBootstrap, "");
830
831       VOL_PARAMS *VolParams = NULL;
832       int VolCount;
833       char edt[50], ed1[50], ed2[50];
834
835       if (*fname == '|') {
836          got_pipe = 1;
837          bpipe = open_bpipe(fname+1, 0, "w"); /* skip first char "|" */
838          fd = bpipe ? bpipe->wfd : NULL;
839       } else {
840          /* ***FIXME*** handle BASE */
841          fd = fopen(fname, jcr->is_JobLevel(L_FULL)?"w+b":"a+b");
842       }
843       if (fd) {
844          VolCount = db_get_job_volume_parameters(jcr, jcr->db, jcr->JobId,
845                     &VolParams);
846          if (VolCount == 0) {
847             Jmsg(jcr, M_ERROR, 0, _("Could not get Job Volume Parameters to "
848                  "update Bootstrap file. ERR=%s\n"), db_strerror(jcr->db));
849              if (jcr->SDJobFiles != 0) {
850                 jcr->setJobStatus(JS_ErrorTerminated);
851              }
852
853          }
854          /* Start output with when and who wrote it */
855          bstrftimes(edt, sizeof(edt), time(NULL));
856          fprintf(fd, "# %s - %s - %s%s\n", edt, jcr->jr.Job,
857                  level_to_str(jcr->getJobLevel()), jcr->since);
858          for (int i=0; i < VolCount; i++) {
859             /* Write the record */
860             fprintf(fd, "Volume=\"%s\"\n", VolParams[i].VolumeName);
861             fprintf(fd, "MediaType=\"%s\"\n", VolParams[i].MediaType);
862             if (VolParams[i].Slot > 0) {
863                fprintf(fd, "Slot=%d\n", VolParams[i].Slot);
864             }
865             fprintf(fd, "VolSessionId=%u\n", jcr->VolSessionId);
866             fprintf(fd, "VolSessionTime=%u\n", jcr->VolSessionTime);
867             fprintf(fd, "VolAddr=%s-%s\n", 
868                     edit_uint64(VolParams[i].StartAddr, ed1),
869                     edit_uint64(VolParams[i].EndAddr, ed2));
870             fprintf(fd, "FileIndex=%d-%d\n", VolParams[i].FirstIndex,
871                          VolParams[i].LastIndex);
872          }
873          if (VolParams) {
874             free(VolParams);
875          }
876          if (got_pipe) {
877             close_bpipe(bpipe);
878          } else {
879             fclose(fd);
880          }
881       } else {
882          berrno be;
883          Jmsg(jcr, M_ERROR, 0, _("Could not open WriteBootstrap file:\n"
884               "%s: ERR=%s\n"), fname, be.bstrerror());
885          jcr->setJobStatus(JS_ErrorTerminated);
886       }
887       free_pool_memory(fname);
888    }
889 }