tape_statep 988 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states[devUnitIdx]; tape_statep 992 src/dps8/dps8_mt.c tape_statep->is9 ? "9" : "binary"); tape_statep 994 src/dps8/dps8_mt.c tape_statep->tbc = 0; tape_statep 1000 src/dps8/dps8_mt.c t_stat rc = sim_tape_rdrecf (unitp, & tape_statep -> buf [0], & tape_statep -> tbc, tape_statep 1003 src/dps8/dps8_mt.c __func__, rc, tape_statep -> tbc); tape_statep 1006 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1010 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1013 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1015 src/dps8/dps8_mt.c tape_statep -> tbc = 0; tape_statep 1028 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1031 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1034 src/dps8/dps8_mt.c tape_statep -> tbc = 0; tape_statep 1053 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1055 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1058 src/dps8/dps8_mt.c (long) MT_UNIT_NUM (unitp), tape_statep -> rec_num); tape_statep 1077 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1078 src/dps8/dps8_mt.c rc2 = extractASCII36FromBuffer (tape_statep -> buf, tape_statep 1079 src/dps8/dps8_mt.c tape_statep -> tbc, & tape_statep -> words_processed, buffer + i); tape_statep 1081 src/dps8/dps8_mt.c rc2 = extractWord36FromBuffer (tape_statep -> buf, tape_statep 1082 src/dps8/dps8_mt.c tape_statep -> tbc, & tape_statep -> words_processed, buffer + i); tape_statep 1089 src/dps8/dps8_mt.c tape_statep 1104 src/dps8/dps8_mt.c & tape_statep -> words_processed, true); tape_statep 1113 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1114 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; tape_statep 1116 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; tape_statep 1122 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states[devUnitIdx]; tape_statep 1128 src/dps8/dps8_mt.c tape_statep -> cntlrAddress = getbits36_16 (control, 0); tape_statep 1129 src/dps8/dps8_mt.c tape_statep -> cntlrTally = getbits36_16 (control, 16); tape_statep 1220 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1227 src/dps8/dps8_mt.c tape_statep -> cntlrAddress = getbits36_16 (control, 0); tape_statep 1228 src/dps8/dps8_mt.c tape_statep -> cntlrTally = getbits36_16 (control, 16); tape_statep 1239 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1241 src/dps8/dps8_mt.c tape_statep -> is9 = p -> IDCW_DEV_CMD == 013; tape_statep 1243 src/dps8/dps8_mt.c tape_statep -> is9 ? "9" : "binary"); tape_statep 1261 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1265 src/dps8/dps8_mt.c & tape_statep -> words_processed, false); tape_statep 1267 src/dps8/dps8_mt.c tape_statep 1283 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1284 src/dps8/dps8_mt.c tape_statep -> tbc = tape_statep -> words_processed * 4; tape_statep 1286 src/dps8/dps8_mt.c tape_statep -> tbc = (tape_statep -> words_processed * 9 + 1) / 2; tape_statep 1290 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1295 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1297 src/dps8/dps8_mt.c rc2 = insertASCII36toBuffer (tape_statep -> buf, tape_statep 1298 src/dps8/dps8_mt.c tape_statep -> tbc, tape_statep 1299 src/dps8/dps8_mt.c & tape_statep -> words_processed, tape_statep 1304 src/dps8/dps8_mt.c rc2 = insertWord36toBuffer (tape_statep -> buf, tape_statep 1305 src/dps8/dps8_mt.c tape_statep -> tbc, tape_statep 1306 src/dps8/dps8_mt.c & tape_statep -> words_processed, tape_statep 1323 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1324 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; tape_statep 1326 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; tape_statep 1333 src/dps8/dps8_mt.c int ret = sim_tape_wrrecf (unitp, tape_statep -> buf, tape_statep -> tbc); tape_statep 1335 src/dps8/dps8_mt.c __func__, ret, tape_statep -> tbc); tape_statep 1349 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1352 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1364 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1367 src/dps8/dps8_mt.c (long) MT_UNIT_NUM (unitp), tape_statep -> rec_num); tape_statep 1381 src/dps8/dps8_mt.c __func__, (int) tape_statep -> tbc, p -> stati); tape_statep 1498 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1521 src/dps8/dps8_mt.c tape_statep->io_mode = tape_no_mode; tape_statep 1601 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_ctlr; tape_statep 1610 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_9; tape_statep 1611 src/dps8/dps8_mt.c tape_statep->is9 = true; tape_statep 1626 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_bin; tape_statep 1627 src/dps8/dps8_mt.c tape_statep->is9 = false; tape_statep 1660 src/dps8/dps8_mt.c tape_statep->io_mode = tape_initiate_rd_mem; tape_statep 1677 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_9; tape_statep 1692 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_bin; tape_statep 1705 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_ctrl_regs; tape_statep 1751 src/dps8/dps8_mt.c tape_statep->io_mode = tape_MTP_wr; tape_statep 1849 src/dps8/dps8_mt.c ret = sim_tape_sprecf (unitp, & tape_statep->tbc); tape_statep 1862 src/dps8/dps8_mt.c tape_statep->rec_num += (int) skipped; tape_statep 1864 src/dps8/dps8_mt.c sim_printf ("Tape %ld forward skips to record %d\n", (long) MT_UNIT_NUM (unitp), tape_statep->rec_num); tape_statep 1910 src/dps8/dps8_mt.c tape_statep->rec_num += (int) recsskipped; tape_statep 1912 src/dps8/dps8_mt.c sim_printf ("Tape %ld forward skips to record %d\n", (long) MT_UNIT_NUM (unitp), tape_statep->rec_num); tape_statep 1966 src/dps8/dps8_mt.c t_stat ret = sim_tape_sprecr (unitp, & tape_statep->tbc); tape_statep 1975 src/dps8/dps8_mt.c tape_statep->rec_num -= (int) skipped; tape_statep 1977 src/dps8/dps8_mt.c sim_printf ("Tape %ld skip back to record %d\n", (long) MT_UNIT_NUM (unitp), tape_statep->rec_num); tape_statep 2024 src/dps8/dps8_mt.c tape_statep 2028 src/dps8/dps8_mt.c tape_statep 2029 src/dps8/dps8_mt.c tape_statep 2043 src/dps8/dps8_mt.c tape_statep->rec_num -= (int) recsskipped; tape_statep 2045 src/dps8/dps8_mt.c sim_printf ("Tape %ld backward skips to record %d\n", (long) MT_UNIT_NUM (unitp), tape_statep->rec_num); tape_statep 2148 src/dps8/dps8_mt.c tape_statep->rec_num ++; tape_statep 2150 src/dps8/dps8_mt.c sim_printf ("Tape %ld writes tape mark %ld\n", (long) MT_UNIT_NUM (unitp), (long) tape_statep->rec_num); tape_statep 2170 src/dps8/dps8_mt.c tape_statep->io_mode = tape_survey; tape_statep 2227 src/dps8/dps8_mt.c tape_statep->rec_num = 0; tape_statep 2284 src/dps8/dps8_mt.c switch (tape_statep->io_mode) { tape_statep 2369 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) { sim_printf ("// Tape IOT unknown %d\r\n", tape_statep->io_mode); } tape_statep 2370 src/dps8/dps8_mt.c sim_warn ("%s: Unrecognized io_mode %d\n", __func__, tape_statep->io_mode);