int ndmca_tt_wrapper (struct ndm_session *sess, int (*func)(struct ndm_session *sess)) { int rc; rc = (*func)(sess); if (rc != 0) { ndmalogf (sess, "Test", 1, "Failure"); } ndmca_test_done_phase (sess); /* clean up mess */ ndmca_test_log_note (sess, 2, "Cleaning up..."); ndmca_tape_open (sess); /* Open the tape, OK if already opened */ ndmca_tape_mtio (sess, NDMP9_MTIO_REW, 1, 0); rc = ndmca_tape_close (sess); /* close, collective error */ if (rc != 0) { ndmca_test_log_note (sess, 0, "Cleaning up failed, quiting"); } else { ndmca_test_log_note (sess, 2, "Cleaning up done"); } return rc; }
int ndmca_check_tape_mtio (struct ndm_session *sess, ndmp9_error expect_err, ndmp9_tape_mtio_op op, u_long count, u_long resid) { struct ndmconn * conn = sess->plumb.tape; u_long got_resid; int rc; /* close previous test if there is one */ ndmca_test_close (sess); got_resid = ~resid; rc = ndmca_tape_mtio (sess, op, count, &got_resid); rc = ndmca_test_check_expect (conn, rc, expect_err); if (rc) return rc; if (resid != got_resid) { char tmp[128]; sprintf (tmp, "Residual incorrect, got %lu expected %lu", got_resid, resid); ndmca_test_fail (sess, tmp); return -1; } return rc; }
int ndmca_test_tape_mtio (struct ndm_session *sess, ndmp9_error expect_err, ndmp9_tape_mtio_op op, u_long count, u_long *resid) { struct ndmconn * conn = sess->plumb.tape; int rc; /* close previous test if there is one */ ndmca_test_close (sess); rc = ndmca_tape_mtio (sess, op, count, resid); rc = ndmca_test_check_expect (conn, rc, expect_err); return rc; }
int ndmca_media_mtio_tape (struct ndm_session *sess, ndmp9_tape_mtio_op op, uint32_t count, uint32_t *resid) { int rc; if (op == NDMP9_MTIO_REW) { ndmalogf (sess, 0, 1, "Commanding tape drive to rewind"); } else if (op == NDMP9_MTIO_OFF) { ndmalogf (sess, 0, 1, "Commanding tape drive to eject (go offline)"); } else { ndmalogf (sess, 0, 2, "Commanding tape drive to %s %d times", ndmp9_tape_mtio_op_to_str (op), count); } rc = ndmca_tape_mtio (sess, op, count, resid); return rc; }
/* * Assumes tt_write() passed */ int ndmca_tt_mtio (struct ndm_session *sess) { int rc; unsigned n_rec; unsigned recsize; unsigned fileno, recno; u_long count, resid; char * what; char note[128]; char pbuf[64*1024]; char buf[64*1024]; ndmca_test_phase (sess, "T-MTIO", "Tape MTIO"); rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_READ_MODE); if (rc) return rc; rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; for (fileno = 0; tt_series[fileno].n_rec > 0; fileno++) { n_rec = tt_series[fileno].n_rec; recsize = tt_series[fileno].recsize; sprintf (note, "Seek around tape file %d", fileno+1); ndmca_test_open (sess, note, 0); sprintf (note, "file #%d, %d records, %d bytes/rec", fileno+1, n_rec, recsize); ndmca_test_log_note (sess, 2, note); what = "rew"; count = 1; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_REW, count, &resid); if (rc) goto fail; what = "rew resid"; if (resid != 0) goto fail; CHECK_FILENO_RECNO ("rew", 0, 0); what = "fsf(n)"; count = fileno; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSF, count, &resid); if (rc) goto fail; what = "fsf(n) resid"; if (resid != 0) goto fail; CHECK_FILENO_RECNO ("fsf", fileno, 0); what = "fsr(1m)"; count = 1000000; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSR, count, &resid); if (rc) goto fail; what = "fsr(1m) resid"; if (n_rec + resid != count) goto fail; if (sess->plumb.tape->protocol_version < 4) { CHECK_FILENO_RECNO ("fsr(1m)", fileno + 1, 0); what = "bsf 1 after fsr(1m)"; count = 1; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_BSF, count, 0); if (rc) goto fail; CHECK_FILENO_RECNO (what, fileno, -1); recno = n_rec; } else { /* EOT side of EOF marker */ recno = n_rec; CHECK_FILENO_RECNO ("fsr(1m)", fileno, recno); } what = "bsr(1m)"; count = 1000000; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_BSR, count, &resid); if (rc) goto fail; what = "bsr(1m) resid"; if (n_rec + resid != count) goto fail; if ((fileno > 0) && (sess->plumb.tape->protocol_version < 4)) { /* at BOT side of EOF marker (not BOT) */ CHECK_FILENO_RECNO ("bsr(1m)", fileno - 1, -1); what = "fsf 1 after bsr(1m)"; count = 1; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSF, count, 0); if (rc) goto fail; } recno = 0; CHECK_FILENO_RECNO ("bsr(1m)", fileno, recno); what = "fsr(0)"; count = 0; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSR, count, &resid); if (rc) goto fail; what = "fsr(0) resid"; if (resid != 0) goto fail; recno = 0; CHECK_FILENO_RECNO ("fsr(0)", fileno, recno); what = "fsr(x)"; count = n_rec / 2; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSR, count, &resid); if (rc) goto fail; what = "fsr(x) resid"; if (resid != 0) goto fail; recno = n_rec / 2; CHECK_FILENO_RECNO ("fsr(x)", fileno, recno); what = "fsr(x) read"; rc = ndmca_tape_read (sess, buf, recsize); if (rc) goto fail; what = "fsr(x) compare"; ndmca_test_fill_data (pbuf, recsize, recno, fileno); if (bcmp (buf, pbuf, recsize) != 0) goto fail; recno++; /* caused by tape_read */ if (recno > 1) { what = "bsr(2)"; count = 2; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_BSR, count, &resid); if (rc) goto fail; what = "bsr(2) resid"; if (resid != 0) goto fail; recno -= count; CHECK_FILENO_RECNO ("bsr(2)", fileno, recno); what = "bsr(2) read"; rc = ndmca_tape_read (sess, buf, recsize); if (rc) goto fail; what = "bsr(2) compare"; ndmca_test_fill_data (pbuf, recsize, recno, fileno); if (bcmp (buf, pbuf, recsize) != 0) goto fail; } sprintf (buf, "Passed %s", note); ndmca_test_log_step (sess, 2, buf); } rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; return 0; fail: sprintf (buf, "Failed %s: %s", what, note); ndmca_test_fail (sess, buf); return -1; }
/* * Assumes tt_write() passed */ int ndmca_tt_read (struct ndm_session *sess) { int rc; unsigned n_rec; unsigned recsize; unsigned fileno, recno; char * what; char note[128]; char pbuf[64*1024]; char buf[64*1024]; ndmca_test_phase (sess, "T-READ", "Tape Read Series"); rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_READ_MODE); if (rc) return rc; for (fileno = 0; tt_series[fileno].n_rec > 0; fileno++) { n_rec = tt_series[fileno].n_rec; recsize = tt_series[fileno].recsize; sprintf (note, "Read tape file %d", fileno+1); ndmca_test_open (sess, note, 0); sprintf (note, "file #%d, %d records, %d bytes/rec", fileno+1, n_rec, recsize); ndmca_test_log_note (sess, 2, note); for (recno = 0; recno < n_rec; recno++) { ndmca_test_fill_data (pbuf, recsize, recno, fileno); what = "read"; rc = ndmca_tape_read (sess, buf, recsize); if (rc) goto fail; CHECK_FILENO_RECNO ("read", fileno, recno+1); what = "compare"; #if 0 if (bcmp (buf, pbuf, recsize) != 0) goto fail; #else if (bcmp (buf, pbuf, recsize) != 0) { unsigned char *expect_p = (unsigned char *)pbuf; unsigned char *got_p = (unsigned char *)buf; unsigned int i, f; for(f = i = 0; f < 64 && i < recsize; i++, expect_p++, got_p++) { if (*expect_p != *got_p) { char tmp[80]; sprintf (tmp, "%d: 0x%x => 0x%x", i, *expect_p, *got_p); ndmalogf (sess, "DATA", 6, tmp); f++; } } goto fail; } #endif } what = "eof read"; rc = ndmca_test_tape_read (sess, NDMP9_EOF_ERR, buf, recsize); if (rc) goto fail; if (sess->plumb.tape->protocol_version > 3) { CHECK_FILENO_RECNO ("eof", fileno, -1); what = "skip filemark"; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSF, 1, 0); if (rc) goto fail; CHECK_FILENO_RECNO ("skip", fileno+1, 0); } else { CHECK_FILENO_RECNO ("eof", fileno+1, 0); } sprintf (buf, "Passed tape read %s", note); ndmca_test_log_step (sess, 2, buf); } rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; return 0; fail: sprintf (buf, "Failed %s recno=%d; %s", what, recno, note); ndmca_test_fail (sess, buf); return -1; }
/* * Precedes tt_read() so that we can make a "known" tape. */ int ndmca_tt_write (struct ndm_session *sess) { int rc; unsigned n_rec; unsigned recsize; unsigned fileno, recno; char * what; char note[128]; char buf[64*1024]; ndmca_test_phase (sess, "T-WRITE", "Tape Write Series"); rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_RDWR_MODE); if (rc) return rc; for (fileno = 0; tt_series[fileno].n_rec > 0; fileno++) { n_rec = tt_series[fileno].n_rec; recsize = tt_series[fileno].recsize; sprintf (note, "Write tape file %d", fileno+1); ndmca_test_open (sess, note, 0); sprintf (note, "file #%d, %d records, %d bytes/rec", fileno+1, n_rec, recsize); ndmca_test_log_note (sess, 2, note); for (recno = 0; recno < n_rec; recno++) { ndmca_test_fill_data (buf, recsize, recno, fileno); what = "write"; rc = ndmca_tape_write (sess, buf, recsize); if (rc) goto fail; CHECK_FILENO_RECNO ("write", fileno, recno+1); } what = "write filemark"; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_EOF, 1, 0); if (rc) goto fail; CHECK_FILENO_RECNO ("wfm", fileno+1, 0); /* no test calls so the file operation is the test */ sprintf (buf, "Passed tape write %s", note); ndmca_test_log_step (sess, 2, buf); } rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; return 0; fail: sprintf (buf, "Failed %s recno=%d; %s", what, recno, note); ndmca_test_fail (sess, buf); return -1; }
/* * Assumes tt_basic_read() and tt_basic_write() have been done verifying * READ and WRITE operations work... */ int ndmca_tt_basic_write_and_read (struct ndm_session *sess) { int rc, i, f, pass; char buf[64*1024]; char *p; ndmca_test_phase (sess, "T-BWR", "Tape Write and Read Basics"); /* * check EOF and EOM by rewinding and putting on 1 EOF mark */ rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_RDWR_MODE); if (rc) return rc; rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_BSR, 100, 100); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_BSF, 100, 100); if (rc) return rc; rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_EOF, 1, 0); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_BSF, 100, 99); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_FSF, 100, 99); if (rc) return rc; /* we are at EOM */ if (sess->plumb.tape->protocol_version < 4) { rc = ndmca_test_tape_read (sess, NDMP9_EOF_ERR, buf, sizeof(buf)); if (rc) return rc; /* check it again */ rc = ndmca_test_tape_read (sess, NDMP9_EOF_ERR, buf, 1024); if (rc) return rc; } else { rc = ndmca_test_tape_read (sess, NDMP9_EOM_ERR, buf, sizeof(buf)); if (rc) return rc; /* check it again */ rc = ndmca_test_tape_read (sess, NDMP9_EOM_ERR, buf, 1024); if (rc) return rc; } /* rewind and place 1 record in tape -- no EOF marker by seeking */ rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; rc = ndmca_test_tape_write (sess, NDMP9_NO_ERR, buf, 512); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_BSR, 100, 99); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_FSR, 100, 99); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_FSR, 100, 100); if (rc) return rc; rc = ndmca_check_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_FSF, 100, 100); if (rc) return rc; rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; /* * perform tape label type processing with positioning ops */ for(pass = 0; pass < 2; pass++) { /* * open the tape and write 1 record and close it */ rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_RDWR_MODE); if (rc) return rc; rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; for(p = buf, i = 0; i < 1024; i++, p++) *p = ((i - 4) & 0xff); rc = ndmca_test_tape_write (sess, NDMP9_NO_ERR, buf, 1024); if (rc) return rc; rc = ndmca_tape_mtio (sess, NDMP9_MTIO_EOF, 1, 0); if (rc) return rc; rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; /* * open the tape and read it */ rc = ndmca_test_tape_open(sess,NDMP9_NO_ERR,0,NDMP9_TAPE_RDWR_MODE); if (rc) return rc; rc = ndmca_test_tape_mtio (sess, NDMP9_NO_ERR, NDMP9_MTIO_REW, 1, 0); if (rc) return rc; if (pass == 1) rc = ndmca_test_tape_read_2cnt (sess, NDMP9_NO_ERR, buf, sizeof(buf), 1024); else rc = ndmca_test_tape_read (sess, NDMP9_NO_ERR, buf, 1024); if (rc) return rc; for(p = buf, f = i = 0; f < 64 && i < 1024; i++, p++) if (*p != ((i - 4) & 0xff)) { char tmp[80]; sprintf (tmp, "%d: 0x%x => 0x%x", i, ((i - 4) & 0xff), *p); ndmalogf (sess, "DATA", 6, tmp); f++; } if (f > 0) { ndmca_test_fail (sess, "Failed compare"); return -1; } rc = ndmca_test_tape_read (sess, NDMP9_EOF_ERR, buf, 1024); if (rc) return rc; /* check EOM */ if (sess->plumb.tape->protocol_version < 4) { rc = ndmca_test_tape_read (sess, NDMP9_EOF_ERR, buf, 1024); if (rc) return rc; } else { /* skip over filemark */ rc = ndmca_tape_mtio (sess, NDMP9_MTIO_FSF, 1, 0); /* read EOM */ rc = ndmca_test_tape_read (sess, NDMP9_EOM_ERR, buf, 1024); if (rc) return rc; } rc = ndmca_test_tape_close (sess, NDMP9_NO_ERR); if (rc) return rc; } return 0; /* pass */ }