/* External subroutines */
extern void free_config_resources();
-extern char *edit_device_codes(JCR *jcr, char *omsg, const char *imsg, const char *cmd);
/* Exported variables */
int quit = 0;
static void statcmd();
static void unfillcmd();
static int flush_block(DEV_BLOCK *block, int dump);
-static bool quickie_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
+static bool quickie_cb(DCR *dcr, DEV_RECORD *rec);
static bool compare_blocks(DEV_BLOCK *last_block, DEV_BLOCK *block);
-static bool my_mount_next_read_volume(JCR *jcr, DEVICE *dev, DEV_BLOCK *block);
+static bool my_mount_next_read_volume(DCR *dcr);
static void scan_blocks();
static void set_volume_name(const char *VolName, int volnum);
static void rawfill_cmd();
*/
int main(int margc, char *margv[])
{
- int ch;
+ int ch, i;
+ uint32_t x32, y32;
+ uint64_t x64, y64;
+ char buf[1000];
/* Sanity checks */
if (TAPE_BSIZE % DEV_BSIZE != 0 || TAPE_BSIZE / DEV_BSIZE == 0) {
if (TAPE_BSIZE != (1 << (ffs(TAPE_BSIZE)-1))) {
Emsg1(M_ABORT, 0, "Tape block size (%d) is not a power of 2\n", TAPE_BSIZE);
}
+ if (sizeof(off_t) < 8) {
+ Pmsg1(-1, "\n\n!!!! Warning large disk addressing disabled. off_t=%d should be 8 or more !!!!!\n\n\n",
+ sizeof(off_t));
+ }
+ x32 = 123456789;
+ bsnprintf(buf, sizeof(buf), "%u", x32);
+ i = bsscanf(buf, "%u", &y32);
+ if (i != 1 || x32 != y32) {
+ Pmsg3(-1, "32 bit printf/scanf problem. i=%d x32=%u y32=%u\n", i, x32, y32);
+ exit(1);
+ }
+ x64 = 123456789;
+ x64 = x64 << 32;
+ x64 += 123456789;
+ bsnprintf(buf, sizeof(buf), "%" llu, x64);
+ i = bsscanf(buf, "%llu", &y64);
+ if (i != 1 || x64 != y64) {
+ Pmsg3(-1, "64 bit printf/scanf problem. i=%d x64=%" llu " y64=%" llu "\n", i, x64, y64);
+ exit(1);
+ }
printf("Tape block granularity is %d bytes.\n", TAPE_BSIZE);
exit(1);
}
- jcr = setup_jcr("btape", margv[0], bsr, NULL);
- dev = setup_to_access_device(jcr, 0); /* acquire for write */
+ jcr = setup_jcr("btape", margv[0], bsr, NULL, 0); /* write */
+ if (!jcr) {
+ exit(1);
+ }
+ dev = jcr->dcr->dev;
if (!dev) {
exit(1);
}
cmd = NULL;
}
- if (dev) {
- term_dev(dev);
+ if (bsr) {
+ free_bsr(bsr);
}
- if (debug_level > 10)
- print_memory_pool_stats();
-
free_jcr(jcr);
jcr = NULL;
- if (bsr) {
- free_bsr(bsr);
+ if (dev) {
+ term_dev(dev);
}
+ if (debug_level > 10)
+ print_memory_pool_stats();
+
if (this_block) {
free_block(this_block);
}
block = new_block(dev);
lock_device(dev);
if (!(dev->state & ST_OPENED)) {
- Dmsg1(200, "Opening device %s\n", jcr->VolumeName);
- if (open_dev(dev, jcr->VolumeName, OPEN_READ_WRITE) < 0) {
+ Dmsg1(200, "Opening device %s\n", dcr->VolumeName);
+ if (open_dev(dev, dcr->VolumeName, OPEN_READ_WRITE) < 0) {
Emsg1(M_FATAL, 0, _("dev open failed: %s\n"), dev->errmsg);
unlock_device(dev);
free_block(block);
{
int save_debug_level = debug_level;
int stat;
- DEV_BLOCK *block;
- block = new_block(dev);
- stat = read_dev_volume_label(dcr, block);
+ stat = read_dev_volume_label(dcr);
switch (stat) {
case VOL_NO_LABEL:
Pmsg0(0, "Volume has no label.\n");
debug_level = 20;
dump_volume_label(dev);
debug_level = save_debug_level;
- free_block(block);
}
*/
static int re_read_block_test()
{
- DEV_BLOCK *block;
+ DEV_BLOCK *block = dcr->block;
DEV_RECORD *rec;
int stat = 0;
int len;
"tape to verify that the block was written correctly.\n\n"
"This is not an *essential* feature ...\n\n"));
rewindcmd();
- block = new_block(dev);
rec = new_record();
rec->data = check_pool_memory_size(rec->data, block->buf_len);
len = rec->data_len = block->buf_len-100;
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
} else {
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
} else {
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
} else {
goto bail_out;
}
Pmsg0(0, "Backspace record OK.\n");
- if (!read_block_from_dev(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_dev(dcr, NO_BLOCK_NUMBER_CHECK)) {
Pmsg1(0, _("Read block failed! ERR=%s\n"), strerror(dev->dev_errno));
goto bail_out;
}
stat = 1;
bail_out:
- free_block(block);
free_record(rec);
if (stat == 0) {
Pmsg0(0, _("This is not terribly serious since Bacula only uses\n"
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
}
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
}
}
for (i=1; i<=2000; i++) {
read_again:
- if (!read_block_from_dev(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_dev(dcr, NO_BLOCK_NUMBER_CHECK)) {
if (dev_state(dev, ST_EOF)) {
Pmsg0(-1, _("Got EOF on tape.\n"));
goto read_again;
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
}
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
}
goto bail_out;
}
read_again:
- if (!read_block_from_dev(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_dev(dcr, NO_BLOCK_NUMBER_CHECK)) {
if (dev_state(dev, ST_EOF)) {
Pmsg0(-1, _("Got EOF on tape.\n"));
goto read_again;
if (dev_cap(dev, CAP_TWOEOF)) {
weofcmd();
}
+ force_close_dev(dev); /* release device */
+ if (!open_the_device()) {
+ return -1;
+ }
rewindcmd();
Pmsg0(0, _("Now moving to end of medium.\n"));
eodcmd();
try_again:
slot = 1;
- jcr->VolCatInfo.Slot = slot;
+ dcr->VolCatInfo.Slot = slot;
/* Find out what is loaded, zero means device is unloaded */
Pmsg0(-1, _("3301 Issuing autochanger \"loaded\" command.\n"));
changer = edit_device_codes(jcr, changer, jcr->device->changer_command,
"loaded");
status = run_program(changer, timeout, results);
- Dmsg3(100, "run_prog: %s stat=%d result=%s\n", changer, status, results);
+ Dmsg3(100, "run_prog: %s stat=%d result=\"%s\"\n", changer, status, results);
if (status == 0) {
loaded = atoi(results);
} else {
+ berrno be;
+ be.set_errno(status);
Pmsg1(-1, _("3991 Bad autochanger command: %s\n"), changer);
- Pmsg2(-1, _("3991 status=%d result=%s\n"), status, results);
+ Pmsg2(-1, _("3991 result=\"%s\": ERR=%s\n"), results, be.strerror());
goto bail_out;
}
if (loaded) {
}
Dmsg1(100, "Results from loaded query=%s\n", results);
if (loaded) {
- jcr->VolCatInfo.Slot = loaded;
+ dcr->VolCatInfo.Slot = loaded;
offline_or_rewind_dev(dev);
/* We are going to load a new tape, so close the device */
force_close_dev(dev);
status = run_program(changer, timeout, results);
Pmsg2(-1, "unload status=%s %d\n", status==0?"OK":"Bad", status);
if (status != 0) {
+ berrno be;
+ be.set_errno(status);
Pmsg1(-1, _("3992 Bad autochanger command: %s\n"), changer);
- Pmsg2(-1, _("3992 status=%d result=%s\n"), status, results);
+ Pmsg2(-1, _("3992 result=\"%s\": ERR=%s\n"), results, be.strerror());
}
}
*/
slot = 1;
- jcr->VolCatInfo.Slot = slot;
+ dcr->VolCatInfo.Slot = slot;
Pmsg2(-1, _("3303 Issuing autochanger \"load slot %d %d\" command.\n"),
slot, dev->drive_index);
changer = edit_device_codes(jcr, changer, jcr->device->changer_command, "load");
Pmsg2(-1, _("3303 Autochanger \"load slot %d %d\" status is OK.\n"),
slot, dev->drive_index);
} else {
+ berrno be;
+ be.set_errno(status);
Pmsg1(-1, _("3993 Bad autochanger command: %s\n"), changer);
- Pmsg2(-1, _("3993 status=%d result=%s\n"), status, results);
+ Pmsg2(-1, _("3993 result=\"%s\": ERR=%s\n"), results, be.strerror());
goto bail_out;
}
*/
static void wrcmd()
{
- DEV_BLOCK *block;
- DEV_RECORD *rec;
+ DEV_BLOCK *block = dcr->block;
+ DEV_RECORD *rec = dcr->rec;
int i;
sm_check(__FILE__, __LINE__, false);
- block = new_block(dev);
- rec = new_record();
dump_block(block, "test");
i = block->buf_len - 100;
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
} else {
bail_out:
sm_check(__FILE__, __LINE__, false);
- free_record(rec);
- free_block(block);
sm_check(__FILE__, __LINE__, false);
}
for (;;) {
if ((stat = read(dev->fd, buf, sizeof(buf))) < 0) {
clrerror_dev(dev, -1);
- Mmsg2(&dev->errmsg, "read error on %s. ERR=%s.\n",
+ Mmsg2(dev->errmsg, "read error on %s. ERR=%s.\n",
dev->dev_name, strerror(dev->dev_errno));
Pmsg2(0, "Bad status from read %d. ERR=%s\n", stat, strerror_dev(dev));
if (blocks > 0)
update_pos_dev(dev);
tot_files = dev->file;
for (;;) {
- if (!read_block_from_device(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_device(dcr, NO_BLOCK_NUMBER_CHECK)) {
Dmsg1(100, "!read_block(): ERR=%s\n", strerror_dev(dev));
if (dev->state & ST_EOT) {
if (blocks > 0) {
static void fillcmd()
{
DEV_RECORD rec;
- DEV_BLOCK *block;
+ DEV_BLOCK *block = dcr->block;
char ec1[50];
int fd;
uint32_t i;
/*
* Write Begin Session Record
*/
- if (!write_session_label(dcr, block, SOS_LABEL)) {
+ if (!write_session_label(dcr, SOS_LABEL)) {
set_jcr_job_status(jcr, JS_ErrorTerminated);
Jmsg1(jcr, M_FATAL, 0, _("Write session label failed. ERR=%s\n"),
strerror_dev(dev));
} else if (!ok) {
set_jcr_job_status(jcr, JS_ErrorTerminated);
}
- if (!write_session_label(dcr, block, EOS_LABEL)) {
+ if (!write_session_label(dcr, EOS_LABEL)) {
Pmsg1(000, _("Error writting end session label. ERR=%s\n"), strerror_dev(dev));
ok = false;
}
/* Write out final block of this session */
- if (!write_block_to_device(dcr, block)) {
+ if (!write_block_to_device(dcr)) {
Pmsg0(-1, _("Set ok=false after write_block_to_device.\n"));
ok = false;
}
static void do_unfill()
{
- DEV_BLOCK *block;
+ DEV_BLOCK *block = dcr->block;
bool autochanger;
dumped = 0;
VolBytes = 0;
LastBlock = 0;
- block = new_block(dev);
Dmsg0(20, "Enter do_unfill\n");
dev->capabilities |= CAP_ANONVOLS; /* allow reading any volume */
Pmsg1(-1, "Reposition error. ERR=%s\n", strerror_dev(dev));
}
Pmsg1(-1, _("Reading block %u.\n"), last_block_num);
- if (!read_block_from_device(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_device(dcr, NO_BLOCK_NUMBER_CHECK)) {
Pmsg1(-1, _("Error reading block: ERR=%s\n"), strerror_dev(dev));
goto bail_out;
}
goto bail_out;
}
Pmsg1(-1, _("Reading block %d.\n"), dev->block_num);
- if (!read_block_from_device(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_device(dcr, NO_BLOCK_NUMBER_CHECK)) {
Pmsg1(-1, _("Error reading block: ERR=%s\n"), strerror_dev(dev));
goto bail_out;
}
goto bail_out;
}
Pmsg1(-1, _("Reading block %d.\n"), dev->block_num);
- if (!read_block_from_device(dcr, block, NO_BLOCK_NUMBER_CHECK)) {
+ if (!read_block_from_device(dcr, NO_BLOCK_NUMBER_CHECK)) {
Pmsg1(-1, _("Error reading block: ERR=%s\n"), strerror_dev(dev));
goto bail_out;
}
}
bail_out:
- free_block(block);
free_block(last_block1);
free_block(last_block2);
free_block(first_block);
}
/* Read 1000 records then stop */
-static bool quickie_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
+static bool quickie_cb(DCR *dcr, DEV_RECORD *rec)
{
quickie_count++;
return quickie_count <= 1000;
/* Copy block */
this_file = dev->file;
this_block_num = dev->block_num;
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg3(000, "Last block at: %u:%u this_dev_block_num=%d\n",
last_file, last_block_num, this_block_num);
if (vol_num == 1) {
stop = -1; /* stop, but do simplified test */
} else {
/* Full test in progress */
- if (!fixup_device_block_write_error(jcr->dcr, block)) {
+ if (!fixup_device_block_write_error(jcr->dcr)) {
Pmsg1(000, _("Cannot fixup device error. %s\n"), strerror_dev(dev));
ok = false;
unlock_device(dev);
*/
static void qfillcmd()
{
- DEV_BLOCK *block;
- DEV_RECORD *rec;
+ DEV_BLOCK *block = dcr->block;
+ DEV_RECORD *rec = dcr->rec;
int i, count;
Pmsg0(0, "Test writing blocks of 64512 bytes to tape.\n");
}
sm_check(__FILE__, __LINE__, false);
- block = new_block(dev);
- rec = new_record();
i = block->buf_len - 100;
ASSERT (i > 0);
Pmsg0(0, _("Error writing record to block.\n"));
goto bail_out;
}
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
Pmsg0(0, _("Error writing block to device.\n"));
goto bail_out;
}
bail_out:
sm_check(__FILE__, __LINE__, false);
- free_record(rec);
- free_block(block);
- sm_check(__FILE__, __LINE__, false);
-
}
/*
*/
static void rawfill_cmd()
{
- DEV_BLOCK *block;
+ DEV_BLOCK *block = dcr->block;
int stat;
int fd;
uint32_t block_num = 0;
int my_errno;
uint32_t i;
- block = new_block(dev);
fd = open("/dev/urandom", O_RDONLY);
if (fd) {
read(fd, block->buf, block->buf_len);
printf("Write failed at block %u. stat=%d ERR=%s\n", block_num, stat,
strerror(my_errno));
weofcmd();
- free_block(block);
}
*/
static void bfill_cmd()
{
- DEV_BLOCK *block;
+ DEV_BLOCK *block = dcr->block;
uint32_t block_num = 0;
uint32_t *p;
int my_errno;
int fd;
uint32_t i;
- block = new_block(dev);
fd = open("/dev/urandom", O_RDONLY);
if (fd) {
read(fd, block->buf, block->buf_len);
*p = block_num;
block->binbuf = block->buf_len;
block->bufp = block->buf + block->binbuf;
- if (!write_block_to_dev(dcr, block)) {
+ if (!write_block_to_dev(dcr)) {
break;
}
if ((block_num++ % 100) == 0) {
printf("\n");
printf("Write failed at block %u.\n", block_num);
weofcmd();
- free_block(block);
}
static void usage()
{
fprintf(stderr, _(
+"Copyright (C) 2000-2004 Kern Sibbald and John Walker.\n"
"\nVersion: " VERSION " (" BDATE ")\n\n"
"Usage: btape <options> <device_name>\n"
" -b <file> specify bootstrap file\n"
bool dir_get_volume_info(DCR *dcr, enum get_vol_info_rw writing)
{
- JCR *jcr = dcr->jcr;
Dmsg0(20, "Enter dir_get_volume_info\n");
- bstrncpy(jcr->VolCatInfo.VolCatName, jcr->VolumeName, sizeof(jcr->VolCatInfo.VolCatName));
+ bstrncpy(dcr->VolCatInfo.VolCatName, dcr->VolumeName, sizeof(dcr->VolCatInfo.VolCatName));
return 1;
}
bool dir_find_next_appendable_volume(DCR *dcr)
{
- JCR *jcr = dcr->jcr;
Dmsg1(20, "Enter dir_find_next_appendable_volume. stop=%d\n", stop);
- return jcr->VolumeName[0] != 0;
+ return dcr->VolumeName[0] != 0;
}
bool dir_ask_sysop_to_mount_volume(DCR *dcr)
{
DEVICE *dev = dcr->dev;
- JCR *jcr = dcr->jcr;
Dmsg0(20, "Enter dir_ask_sysop_to_mount_volume\n");
- if (jcr->VolumeName[0] == 0) {
+ if (dcr->VolumeName[0] == 0) {
return dir_ask_sysop_to_create_appendable_volume(dcr);
}
/* Close device so user can use autochanger if desired */
}
force_close_dev(dev);
Pmsg1(-1, "%s", dev->errmsg); /* print reason */
- if (jcr->VolumeName[0] == 0 || strcmp(jcr->VolumeName, "TestVolume2") == 0) {
+ if (dcr->VolumeName[0] == 0 || strcmp(dcr->VolumeName, "TestVolume2") == 0) {
fprintf(stderr, "Mount second Volume on device %s and press return when ready: ",
dev_name(dev));
} else {
fprintf(stderr, "Mount Volume \"%s\" on device %s and press return when ready: ",
- jcr->VolumeName, dev_name(dev));
+ dcr->VolumeName, dev_name(dev));
}
getchar();
return true;
{
bool autochanger;
DEVICE *dev = dcr->dev;
- JCR *jcr = dcr->jcr;
Dmsg0(20, "Enter dir_ask_sysop_to_create_appendable_volume\n");
if (stop == 0) {
set_volume_name("TestVolume1", 1);
dev_name(dev));
getchar();
}
- open_device(jcr, dev);
+ open_device(dcr);
labelcmd();
VolumeName = NULL;
BlockNumber = 0;
return true;
}
-static bool my_mount_next_read_volume(JCR *jcr, DEVICE *dev, DEV_BLOCK *block)
+static bool my_mount_next_read_volume(DCR *dcr)
{
char ec1[50];
+ JCR *jcr = dcr->jcr;
+ DEV_BLOCK *block = dcr->block;
Dmsg0(20, "Enter my_mount_next_read_volume\n");
- Pmsg1(000, "End of Volume \"%s\"\n", jcr->VolumeName);
+ Pmsg1(000, "End of Volume \"%s\"\n", dcr->VolumeName);
if (LastBlock != block->BlockNumber) {
VolBytes += block->block_len;
Pmsg3(-1, "Read block=%u, VolBytes=%s rate=%.1f KB/s\n", block->BlockNumber,
edit_uint64_with_commas(VolBytes, ec1), (float)kbs);
- if (strcmp(jcr->VolumeName, "TestVolume2") == 0) {
+ if (strcmp(dcr->VolumeName, "TestVolume2") == 0) {
end_of_tape = 1;
return false;
}
close_dev(dev);
dev->state &= ~ST_READ;
if (!acquire_device_for_read(jcr)) {
- Pmsg2(0, "Cannot open Dev=%s, Vol=%s\n", dev_name(dev), jcr->VolumeName);
+ Pmsg2(0, "Cannot open Dev=%s, Vol=%s\n", dev_name(dev), dcr->VolumeName);
return false;
}
return true; /* next volume mounted */
DCR *dcr = jcr->dcr;
VolumeName = VolName;
vol_num = volnum;
- pm_strcpy(&jcr->VolumeName, VolName);
bstrncpy(dev->VolCatInfo.VolCatName, VolName, sizeof(dev->VolCatInfo.VolCatName));
- bstrncpy(jcr->VolCatInfo.VolCatName, VolName, sizeof(jcr->VolCatInfo.VolCatName));
bstrncpy(dcr->VolCatInfo.VolCatName, VolName, sizeof(dcr->VolCatInfo.VolCatName));
bstrncpy(dcr->VolumeName, VolName, sizeof(dcr->VolumeName));
- jcr->VolCatInfo.Slot = volnum;
dcr->VolCatInfo.Slot = volnum;
}