/*
* Delete a tape.
*/
void
tarsnap_mode_d(struct bsdtar *bsdtar)
{
TAPE_D * d;
size_t i;
/* Prepare for deletes. */
if ((d = deletetape_init(bsdtar->machinenum)) == NULL)
goto err1;
/* Delete archives. */
for (i = 0; i < bsdtar->ntapes; i++) {
if (bsdtar->verbose && (bsdtar->ntapes > 1))
fprintf(stderr, "Deleting archive \"%s\"\n",
bsdtar->tapenames[i]);
if (deletetape(d, bsdtar->machinenum, bsdtar->cachedir,
bsdtar->tapenames[i], bsdtar->option_print_stats,
bsdtar->ntapes > 1 ? 1 : 0))
goto err1;
}
/* We've finished deleting archives. */
deletetape_free(d);
/* Success! */
return;
err1:
/* Failure! */
bsdtar_warnc(bsdtar, 0, "Error deleting archive");
exit(1);
}
/*
* Delete a tape.
*/
void
tarsnap_mode_d(struct bsdtar *bsdtar)
{
TAPE_D * d;
size_t i;
/* Prepare for deletes. */
if ((d = deletetape_init(bsdtar->machinenum)) == NULL)
goto err1;
/* Delete archives. */
for (i = 0; i < bsdtar->ntapes; i++) {
if (bsdtar->verbose && (bsdtar->ntapes > 1))
fprintf(stderr, "Deleting archive \"%s\"\n",
bsdtar->tapenames[i]);
switch (deletetape(d, bsdtar->machinenum, bsdtar->cachedir,
bsdtar->tapenames[i], bsdtar->option_print_stats,
bsdtar->ntapes > 1 ? 1 : 0, bsdtar->option_csv_filename)) {
case 0:
break;
case 1:
if (bsdtar->option_keep_going)
break;
/* FALLTHROUGH */
default:
goto err2;
}
}
/* We've finished deleting archives. */
deletetape_free(d);
/* Success! */
return;
err2:
deletetape_free(d);
err1:
/* Failure! */
bsdtar_warnc(bsdtar, 0, "Error deleting archive");
bsdtar->return_value = 1;
return;
}