3 * label.c Bacula routines to handle labels
11 Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
13 This program is free software; you can redistribute it and/or
14 modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation; either version 2 of
16 the License, or (at your option) any later version.
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 General Public License for more details.
23 You should have received a copy of the GNU General Public
24 License along with this program; if not, write to the Free
25 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
30 #include "bacula.h" /* pull in global headers */
31 #include "stored.h" /* pull in Storage Deamon headers */
33 /* Forward referenced functions */
34 static int create_volume_label(DEVICE *dev, char *VolName);
35 static void create_volume_label_record(JCR *jcr, DEVICE *dev, DEV_RECORD *rec);
37 extern char my_name[];
38 extern int debug_level;
41 * Read the volume label
43 * If jcr->VolumeName == NULL, we accept any Bacula Volume
44 * If jcr->VolumeName[0] == 0, we accept any Bacula Volume
45 * otherwise jcr->VolumeName must match the Volume.
47 * If VolName given, ensure that it matches
49 * Returns VOL_ code as defined in record.h
59 int read_dev_volume_label(JCR *jcr, DEVICE *dev, DEV_BLOCK *block)
61 char *VolName = jcr->VolumeName;
65 Dmsg2(30, "Enter read_volume_label device=%s vol=%s\n",
66 dev_name(dev), VolName);
68 if (dev->state & ST_LABEL) { /* did we already read label? */
69 /* Compare Volume Names */
70 if (VolName && *VolName && strcmp(dev->VolHdr.VolName, VolName) != 0) {
71 Mmsg(&jcr->errmsg, _("Volume name mismatch on device %s: Wanted %s got %s\n"),
72 dev_name(dev), VolName, dev->VolHdr.VolName);
74 * Cancel Job if too many label errors
77 if (jcr->label_errors > 100) {
78 jcr->JobStatus = JS_Cancelled;
79 Jmsg(jcr, M_FATAL, 0, "%s", jcr->errmsg);
81 return jcr->label_status = VOL_NAME_ERROR;
83 Dmsg0(30, "Leave read_volume_label() VOL_OK\n");
84 return jcr->label_status = VOL_OK; /* label already read */
87 dev->state &= ~(ST_LABEL|ST_APPEND|ST_READ); /* set no label, no append */
89 if (!rewind_dev(dev)) {
90 Mmsg(&jcr->errmsg, _("Couldn't rewind device %s ERR=%s\n"), dev_name(dev),
92 return jcr->label_status = VOL_IO_ERROR;
94 strcpy(dev->VolHdr.Id, "**error**");
96 /* Read the device label block */
97 record = new_record();
98 Dmsg0(90, "Big if statement in read_volume_label\n");
99 if (!read_block_from_dev(dev, block)) {
100 Mmsg(&jcr->errmsg, _("Volume on %s is not a Bacula labeled Volume, \
101 because:\n %s"), dev_name(dev), strerror_dev(dev));
102 } else if (!read_record_from_block(block, record)) {
103 Mmsg(&jcr->errmsg, _("Could not read Volume label from block.\n"));
104 } else if (!unser_volume_label(dev, record)) {
105 Mmsg(&jcr->errmsg, _("Could not unserialize Volume label: %s\n"),
107 } else if (strcmp(dev->VolHdr.Id, BaculaId) != 0 &&
108 strcmp(dev->VolHdr.Id, OldBaculaId) != 0) {
109 Mmsg(&jcr->errmsg, _("Volume Header Id bad: %s\n"), dev->VolHdr.Id);
117 return jcr->label_status = VOL_NO_LABEL;
124 if (dev->VolHdr.VerNum != BaculaTapeVersion &&
125 dev->VolHdr.VerNum != OldCompatibleBaculaTapeVersion1 &&
126 dev->VolHdr.VerNum != OldCompatibleBaculaTapeVersion2) {
127 Mmsg(&jcr->errmsg, _("Volume on %s has wrong Bacula version. Wanted %d got %d\n"),
128 dev_name(dev), BaculaTapeVersion, dev->VolHdr.VerNum);
129 return jcr->label_status = VOL_VERSION_ERROR;
132 /* Compare Volume Names */
133 Dmsg2(30, "Compare Vol names: VolName=%s hdr=%s\n", VolName?VolName:"*", dev->VolHdr.VolName);
134 if (VolName && *VolName && strcmp(dev->VolHdr.VolName, VolName) != 0) {
135 Mmsg(&jcr->errmsg, _("Volume name mismatch. Wanted %s got %s\n"),
136 VolName, dev->VolHdr.VolName);
138 * Cancel Job if too many label errors
139 * => we are in a loop
141 if (jcr->label_errors > 100) {
142 jcr->JobStatus = JS_Cancelled;
143 Jmsg(jcr, M_FATAL, 0, "%s", jcr->errmsg);
145 return jcr->label_status = VOL_NAME_ERROR;
147 Dmsg1(30, "Copy vol_name=%s\n", dev->VolHdr.VolName);
149 /* We are looking for either an unused Bacula tape (PRE_LABEL) or
150 * a Bacula volume label (VOL_LABEL)
152 if (dev->VolHdr.LabelType != PRE_LABEL && dev->VolHdr.LabelType != VOL_LABEL) {
153 Mmsg(&jcr->errmsg, _("Volume on %s has bad Bacula label type: %x\n"),
154 dev_name(dev), dev->VolHdr.LabelType);
155 return jcr->label_status = VOL_LABEL_ERROR;
158 dev->state |= ST_LABEL; /* set has Bacula label */
159 if (debug_level >= 10) {
160 dump_volume_label(dev);
162 Dmsg0(30, "Leave read_volume_label() VOL_OK\n");
163 return jcr->label_status = VOL_OK;
166 /* unser_volume_label
168 * Unserialize the Volume label into the device Volume_Label
171 * Assumes that the record is already read.
173 * Returns: 0 on error
177 int unser_volume_label(DEVICE *dev, DEV_RECORD *rec)
181 if (rec->FileIndex != VOL_LABEL && rec->FileIndex != PRE_LABEL) {
182 Mmsg3(&dev->errmsg, _("Expecting Volume Label, got FI=%s Stream=%s len=%d\n"),
183 FI_to_ascii(rec->FileIndex),
184 stream_to_ascii(rec->Stream, rec->FileIndex),
189 dev->VolHdr.LabelType = rec->FileIndex;
190 dev->VolHdr.LabelSize = rec->data_len;
193 /* Unserialize the record into the Volume Header */
194 ser_begin(rec->data, SER_LENGTH_Volume_Label);
195 #define Fld(x) (dev->VolHdr.x)
196 unser_string(Fld(Id));
198 unser_uint32(Fld(VerNum));
200 if (Fld(VerNum) >= 11) {
201 unser_btime(Fld(label_btime));
202 unser_btime(Fld(write_btime));
203 } else { /* old way */
204 unser_float64(Fld(label_date));
205 unser_float64(Fld(label_time));
207 unser_float64(Fld(write_date)); /* Unused with VerNum >= 11 */
208 unser_float64(Fld(write_time)); /* Unused with VerNum >= 11 */
210 unser_string(Fld(VolName));
211 unser_string(Fld(PrevVolName));
212 unser_string(Fld(PoolName));
213 unser_string(Fld(PoolType));
214 unser_string(Fld(MediaType));
216 unser_string(Fld(HostName));
217 unser_string(Fld(LabelProg));
218 unser_string(Fld(ProgVersion));
219 unser_string(Fld(ProgDate));
221 ser_end(rec->data, SER_LENGTH_Volume_Label);
223 Dmsg0(90, "ser_read_vol\n");
224 if (debug_level >= 90) {
225 dump_volume_label(dev);
231 * Put a volume label into the block
233 * Returns: 0 on failure
236 int write_volume_label_to_block(JCR *jcr, DEVICE *dev, DEV_BLOCK *block)
240 Dmsg0(20, "write Label in write_volume_label_to_block()\n");
241 memset(&rec, 0, sizeof(rec));
242 rec.data = get_memory(SER_LENGTH_Volume_Label);
244 create_volume_label_record(jcr, dev, &rec);
246 empty_block(block); /* Volume label always at beginning */
247 if (!write_record_to_block(block, &rec)) {
248 free_pool_memory(rec.data);
249 Jmsg1(jcr, M_FATAL, 0, _("Cannot write Volume label to block for device %s\n"),
253 Dmsg1(90, "Wrote label of %d bytes to block\n", rec.data_len);
255 free_pool_memory(rec.data);
260 * create_volume_label_record
261 * Serialize label (from dev->VolHdr structure) into device record.
262 * Assumes that the dev->VolHdr structure is properly
265 static void create_volume_label_record(JCR *jcr, DEVICE *dev, DEV_RECORD *rec)
270 /* Serialize the label into the device record. */
272 ser_begin(rec->data, SER_LENGTH_Volume_Label);
273 #define Fld(x) (dev->VolHdr.x)
276 ser_uint32(Fld(VerNum));
278 if (Fld(VerNum >= 11)) {
279 ser_btime(Fld(label_btime));
280 Fld(write_btime) = get_current_btime();
281 ser_btime(Fld(write_btime));
285 /* OLD WAY DEPRECATED */
286 ser_float64(Fld(label_date));
287 ser_float64(Fld(label_time));
288 get_current_time(&dt);
289 Fld(write_date) = dt.julian_day_number;
290 Fld(write_time) = dt.julian_day_fraction;
292 ser_float64(Fld(write_date)); /* 0 if VerNum >= 11 */
293 ser_float64(Fld(write_time)); /* 0 if VerNum >= 11 */
295 ser_string(Fld(VolName));
296 ser_string(Fld(PrevVolName));
297 ser_string(Fld(PoolName));
298 ser_string(Fld(PoolType));
299 ser_string(Fld(MediaType));
301 ser_string(Fld(HostName));
302 ser_string(Fld(LabelProg));
303 ser_string(Fld(ProgVersion));
304 ser_string(Fld(ProgDate));
306 ser_end(rec->data, SER_LENGTH_Volume_Label);
307 rec->data_len = ser_length(rec->data);
308 rec->FileIndex = Fld(LabelType);
309 rec->VolSessionId = jcr->VolSessionId;
310 rec->VolSessionTime = jcr->VolSessionTime;
311 rec->Stream = jcr->NumVolumes;
312 Dmsg2(100, "Created Vol label rec: FI=%s len=%d\n", FI_to_ascii(rec->FileIndex),
319 * Create a volume label in memory
320 * Returns: 0 on error
323 static int create_volume_label(DEVICE *dev, char *VolName)
326 DEVRES *device = (DEVRES *)dev->device;
328 Dmsg0(90, "Start create_volume_label()\n");
332 memset(&dev->VolHdr, 0, sizeof(dev->VolHdr));
334 /* ***FIXME*** we really need to get the volume name,
335 * pool name, and pool type from the database.
336 * We also need to pickup the MediaType.
338 strcpy(dev->VolHdr.Id, BaculaId);
339 dev->VolHdr.VerNum = BaculaTapeVersion;
340 dev->VolHdr.LabelType = PRE_LABEL; /* Mark tape as unused */
341 strcpy(dev->VolHdr.VolName, VolName);
342 strcpy(dev->VolHdr.PoolName, "Default");
343 strcpy(dev->VolHdr.MediaType, device->media_type);
344 strcpy(dev->VolHdr.PoolType, "Backup");
346 /* Put label time/date in header */
347 if (BaculaTapeVersion >= 11) {
348 dev->VolHdr.label_btime = get_current_btime();
349 dev->VolHdr.label_date = 0;
350 dev->VolHdr.label_time = 0;
352 /* OLD WAY DEPRECATED */
353 get_current_time(&dt);
354 dev->VolHdr.label_date = dt.julian_day_number;
355 dev->VolHdr.label_time = dt.julian_day_fraction;
358 if (gethostname(dev->VolHdr.HostName, sizeof(dev->VolHdr.HostName)) != 0) {
359 dev->VolHdr.HostName[0] = 0;
361 bstrncpy(dev->VolHdr.LabelProg, my_name, sizeof(dev->VolHdr.LabelProg));
362 sprintf(dev->VolHdr.ProgVersion, "Ver. %s %s", VERSION, DATE);
363 sprintf(dev->VolHdr.ProgDate, "Build %s %s", __DATE__, __TIME__);
364 dev->state |= ST_LABEL; /* set has Bacula label */
365 if (debug_level >= 90) {
366 dump_volume_label(dev);
372 * Write a Volume Label
373 * !!! Note, this is ONLY used for writing
374 * a fresh volume label. Any data
375 * after the label will be destroyed,
376 * in fact, we write the label 5 times !!!!
378 * This routine expects that open_device() was previously called.
380 * This routine should be used only when labeling a blank tape.
382 int write_volume_label_to_dev(JCR *jcr, DEVRES *device, char *VolName, char *PoolName)
384 DEVICE *dev = device->dev;
390 Dmsg0(99, "write_volume_label()\n");
391 if (!create_volume_label(dev, VolName)) {
394 strcpy(dev->VolHdr.MediaType, device->media_type);
395 bstrncpy(dev->VolHdr.VolName, VolName, sizeof(dev->VolHdr.VolName));
396 bstrncpy(dev->VolHdr.PoolName, PoolName, sizeof(dev->VolHdr.PoolName));
398 if (!rewind_dev(dev)) {
399 Dmsg2(30, "Bad status on %s from rewind. ERR=%s\n", dev_name(dev), strerror_dev(dev));
403 block = new_block(dev);
404 memset(&rec, 0, sizeof(rec));
405 rec.data = get_memory(SER_LENGTH_Volume_Label);
406 create_volume_label_record(jcr, dev, &rec);
409 if (!write_record_to_block(block, &rec)) {
410 Dmsg2(30, "Bad Label write on %s. ERR=%s\n", dev_name(dev), strerror_dev(dev));
412 free_pool_memory(rec.data);
415 Dmsg2(30, "Wrote label of %d bytes to %s\n", rec.data_len, dev_name(dev));
417 free_pool_memory(rec.data);
419 Dmsg0(99, "Call write_block_to_device()\n");
420 if (!write_block_to_dev(jcr, dev, block)) {
421 Dmsg2(30, "Bad Label write on %s. ERR=%s\n", dev_name(dev), strerror_dev(dev));
424 Dmsg0(99, " Wrote block to device\n");
428 dev->state |= ST_LABEL;
430 if (debug_level >= 20) {
431 dump_volume_label(dev);
439 * Create session label
440 * The pool memory must be released by the calling program
442 void create_session_label(JCR *jcr, DEV_RECORD *rec, int label)
447 rec->sync = 1; /* wait for completion */
448 rec->VolSessionId = jcr->VolSessionId;
449 rec->VolSessionTime = jcr->VolSessionTime;
450 rec->Stream = jcr->JobId;
452 ser_begin(rec->data, SER_LENGTH_Session_Label);
453 ser_string(BaculaId);
454 ser_uint32(BaculaTapeVersion);
456 ser_uint32(jcr->JobId);
458 if (BaculaTapeVersion >= 11) {
459 ser_btime(get_current_btime());
462 /* OLD WAY DEPRECATED */
463 get_current_time(&dt);
464 ser_float64(dt.julian_day_number);
465 ser_float64(dt.julian_day_fraction);
468 ser_string(jcr->pool_name);
469 ser_string(jcr->pool_type);
470 ser_string(jcr->job_name); /* base Job name */
471 ser_string(jcr->client_name);
473 /* Added in VerNum 10 */
474 ser_string(jcr->Job); /* Unique name of this Job */
475 ser_string(jcr->fileset_name);
476 ser_uint32(jcr->JobType);
477 ser_uint32(jcr->JobLevel);
478 if (BaculaTapeVersion >= 11) {
479 ser_string(jcr->fileset_md5);
482 if (label == EOS_LABEL) {
483 ser_uint32(jcr->JobFiles);
484 ser_uint64(jcr->JobBytes);
485 ser_uint32(jcr->StartBlock);
486 ser_uint32(jcr->EndBlock);
487 ser_uint32(jcr->StartFile);
488 ser_uint32(jcr->EndFile);
489 ser_uint32(jcr->JobErrors);
491 /* Added in VerNum 11 */
492 ser_uint32(jcr->JobStatus);
494 ser_end(rec->data, SER_LENGTH_Session_Label);
495 rec->data_len = ser_length(rec->data);
498 /* Write session label
499 * Returns: 0 on failure
502 int write_session_label(JCR *jcr, DEV_BLOCK *block, int label)
504 DEVICE *dev = jcr->device->dev;
508 Dmsg1(90, "session_label record=%x\n", rec);
511 if (dev->state & ST_TAPE) {
512 jcr->StartBlock = dev->block_num;
513 jcr->StartFile = dev->file;
515 jcr->StartBlock = (uint32_t)dev->file_addr;
516 jcr->StartFile = (uint32_t)(dev->file_addr >> 32);
520 if (dev->state & ST_TAPE) {
521 jcr->EndBlock = dev->EndBlock;
522 jcr->EndFile = dev->EndFile;
524 jcr->EndBlock = (uint32_t)dev->file_addr;
525 jcr->EndFile = (uint32_t)(dev->file_addr >> 32);
529 Jmsg1(jcr, M_ABORT, 0, _("Bad session label = %d\n"), label);
532 create_session_label(jcr, rec, label);
533 rec->FileIndex = label;
536 * We guarantee that the session record can totally fit
537 * into a block. If not, write the block, and put it in
538 * the next block. Having the sesssion record totally in
539 * one block makes reading them much easier (no need to
540 * read the next block).
542 if (!can_write_record_to_block(block, rec)) {
543 Dmsg0(100, "Cannot write session label to block.\n");
544 if (!write_block_to_device(jcr, dev, block)) {
545 Dmsg0(90, "Got session label write_block_to_dev error.\n");
546 Jmsg(jcr, M_FATAL, 0, _("Error writing Session label to %s: %s\n"),
547 dev_vol_name(dev), strerror(errno));
552 if (!write_record_to_block(block, rec)) {
553 Jmsg(jcr, M_FATAL, 0, _("Error writing Session label to %s: %s\n"),
554 dev_vol_name(dev), strerror(errno));
559 Dmsg6(20, "Write sesson_label record JobId=%d FI=%s SessId=%d Strm=%s len=%d\n\
560 remainder=%d\n", jcr->JobId,
561 FI_to_ascii(rec->FileIndex), rec->VolSessionId,
562 stream_to_ascii(rec->Stream, rec->FileIndex), rec->data_len,
566 Dmsg2(20, "Leave write_session_label Block=%d File=%d\n",
567 dev->block_num, dev->file);
571 void dump_volume_label(DEVICE *dev)
573 int dbl = debug_level;
575 char *LabelType, buf[30];
581 switch (dev->VolHdr.LabelType) {
583 LabelType = "PRE_LABEL";
586 LabelType = "VOL_LABEL";
589 LabelType = "EOM_LABEL";
592 LabelType = "SOS_LABEL";
595 LabelType = "EOS_LABEL";
601 sprintf(buf, "Unknown %d", dev->VolHdr.LabelType);
606 Pmsg11(-1, "\nVolume Label:\n\
619 dev->VolHdr.Id, dev->VolHdr.VerNum,
620 dev->VolHdr.VolName, dev->VolHdr.PrevVolName,
621 File, LabelType, dev->VolHdr.LabelSize,
622 dev->VolHdr.PoolName, dev->VolHdr.MediaType,
623 dev->VolHdr.PoolType, dev->VolHdr.HostName);
625 if (dev->VolHdr.VerNum >= 11) {
627 bstrftime(dt, sizeof(dt), btime_to_unix(dev->VolHdr.label_btime));
628 Pmsg1(-1, "Date label written: %s\n", dt);
630 dt.julian_day_number = dev->VolHdr.label_date;
631 dt.julian_day_fraction = dev->VolHdr.label_time;
634 Date label written: %04d-%02d-%02d at %02d:%02d\n",
635 tm.tm_year+1900, tm.tm_mon+1, tm.tm_mday, tm.tm_hour, tm.tm_min);
642 int unser_session_label(SESSION_LABEL *label, DEV_RECORD *rec)
646 unser_begin(rec->data, SER_LENGTH_Session_Label);
647 unser_string(label->Id);
648 unser_uint32(label->VerNum);
649 unser_uint32(label->JobId);
650 if (label->VerNum >= 11) {
651 unser_btime(label->write_btime);
653 unser_float64(label->write_date);
655 unser_float64(label->write_time);
656 unser_string(label->PoolName);
657 unser_string(label->PoolType);
658 unser_string(label->JobName);
659 unser_string(label->ClientName);
660 if (label->VerNum >= 10) {
661 unser_string(label->Job); /* Unique name of this Job */
662 unser_string(label->FileSetName);
663 unser_uint32(label->JobType);
664 unser_uint32(label->JobLevel);
666 if (label->VerNum >= 11) {
667 unser_string(label->FileSetMD5);
669 label->FileSetMD5[0] = 0;
671 if (rec->FileIndex == EOS_LABEL) {
672 unser_uint32(label->JobFiles);
673 unser_uint64(label->JobBytes);
674 unser_uint32(label->StartBlock);
675 unser_uint32(label->EndBlock);
676 unser_uint32(label->StartFile);
677 unser_uint32(label->EndFile);
678 unser_uint32(label->JobErrors);
679 if (label->VerNum >= 11) {
680 unser_uint32(label->JobStatus);
682 label->JobStatus = JS_Terminated; /* kludge */
689 static void dump_session_label(DEV_RECORD *rec, char *type)
695 char ec1[30], ec2[30], ec3[30], ec4[30], ec5[30], ec6[30], ec7[30];
697 unser_session_label(&label, rec);
700 Pmsg7(-1, "\n%s Record:\n\
707 ", type, label.JobId, label.VerNum,
708 label.PoolName, label.PoolType,
709 label.JobName, label.ClientName);
711 if (label.VerNum >= 10) {
713 Job (unique name) : %s\n\
717 ", label.Job, label.FileSetName, label.JobType, label.JobLevel);
720 if (rec->FileIndex == EOS_LABEL) {
731 edit_uint64_with_commas(label.JobFiles, ec1),
732 edit_uint64_with_commas(label.JobBytes, ec2),
733 edit_uint64_with_commas(label.StartBlock, ec3),
734 edit_uint64_with_commas(label.EndBlock, ec4),
735 edit_uint64_with_commas(label.StartFile, ec5),
736 edit_uint64_with_commas(label.EndFile, ec6),
737 edit_uint64_with_commas(label.JobErrors, ec7),
740 if (label.VerNum >= 11) {
742 bstrftime(dt, sizeof(dt), btime_to_unix(label.write_btime));
743 Pmsg1(-1, _("Date written : %s\n"), dt);
745 dt.julian_day_number = label.write_date;
746 dt.julian_day_fraction = label.write_time;
749 Date written : %04d-%02d-%02d at %02d:%02d\n"),
750 tm.tm_year+1900, tm.tm_mon+1, tm.tm_mday, tm.tm_hour, tm.tm_min);
756 void dump_label_record(DEVICE *dev, DEV_RECORD *rec, int verbose)
763 switch (rec->FileIndex) {
765 type = _("Fresh Volume");
771 type = _("Begin Session");
774 type = _("End Session");
777 type = _("End of Media");
780 type = ("End of Tape");
787 switch (rec->FileIndex) {
790 unser_volume_label(dev, rec);
791 dump_volume_label(dev);
794 dump_session_label(rec, type);
797 dump_session_label(rec, type);
800 Pmsg5(-1, "%s Record: SessId=%d SessTime=%d JobId=%d DataLen=%d\n",
801 type, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
804 Pmsg0(-1, _("End of physical tape.\n"));
807 Pmsg5(-1, "%s Record: SessId=%d SessTime=%d JobId=%d DataLen=%d\n",
808 type, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
812 switch (rec->FileIndex) {
816 unser_session_label(&label, rec);
817 Pmsg6(-1, "%s Record: SessId=%d SessTime=%d JobId=%d Level=%c \
819 type, rec->VolSessionId, rec->VolSessionTime, rec->Stream,
820 label.JobLevel, label.JobType);
826 Pmsg5(-1, "%s Record: SessId=%d SessTime=%d JobId=%d DataLen=%d\n",
827 type, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);