tape_statep 992 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states[devUnitIdx]; tape_statep 996 src/dps8/dps8_mt.c tape_statep->is9 ? "9" : "binary"); tape_statep 998 src/dps8/dps8_mt.c tape_statep->tbc = 0; tape_statep 1004 src/dps8/dps8_mt.c t_stat rc = sim_tape_rdrecf (unitp, & tape_statep -> buf [0], & tape_statep -> tbc, tape_statep 1007 src/dps8/dps8_mt.c __func__, rc, tape_statep -> tbc); tape_statep 1010 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1014 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1017 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1019 src/dps8/dps8_mt.c tape_statep -> tbc = 0; tape_statep 1032 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1035 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1038 src/dps8/dps8_mt.c tape_statep -> tbc = 0; tape_statep 1057 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1059 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1062 src/dps8/dps8_mt.c (long) MT_UNIT_NUM (unitp), tape_statep -> rec_num); tape_statep 1081 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1082 src/dps8/dps8_mt.c rc2 = extractASCII36FromBuffer (tape_statep -> buf, tape_statep 1083 src/dps8/dps8_mt.c tape_statep -> tbc, & tape_statep -> words_processed, buffer + i); tape_statep 1085 src/dps8/dps8_mt.c rc2 = extractWord36FromBuffer (tape_statep -> buf, tape_statep 1086 src/dps8/dps8_mt.c tape_statep -> tbc, & tape_statep -> words_processed, buffer + i); tape_statep 1093 src/dps8/dps8_mt.c tape_statep 1108 src/dps8/dps8_mt.c & tape_statep -> words_processed, true); tape_statep 1117 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1118 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; tape_statep 1120 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; tape_statep 1126 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states[devUnitIdx]; tape_statep 1132 src/dps8/dps8_mt.c tape_statep -> cntlrAddress = getbits36_16 (control, 0); tape_statep 1133 src/dps8/dps8_mt.c tape_statep -> cntlrTally = getbits36_16 (control, 16); tape_statep 1224 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1231 src/dps8/dps8_mt.c tape_statep -> cntlrAddress = getbits36_16 (control, 0); tape_statep 1232 src/dps8/dps8_mt.c tape_statep -> cntlrTally = getbits36_16 (control, 16); tape_statep 1245 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1247 src/dps8/dps8_mt.c tape_statep -> is9 = p -> IDCW_DEV_CMD == 013; tape_statep 1249 src/dps8/dps8_mt.c tape_statep -> is9 ? "9" : "binary"); tape_statep 1267 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1271 src/dps8/dps8_mt.c & tape_statep -> words_processed, false); tape_statep 1273 src/dps8/dps8_mt.c tape_statep 1289 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1290 src/dps8/dps8_mt.c tape_statep -> tbc = tape_statep -> words_processed * 4; tape_statep 1292 src/dps8/dps8_mt.c tape_statep -> tbc = (tape_statep -> words_processed * 9 + 1) / 2; tape_statep 1296 src/dps8/dps8_mt.c tape_statep -> words_processed = 0; tape_statep 1301 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1303 src/dps8/dps8_mt.c rc2 = insertASCII36toBuffer (tape_statep -> buf, tape_statep 1304 src/dps8/dps8_mt.c tape_statep -> tbc, tape_statep 1305 src/dps8/dps8_mt.c & tape_statep -> words_processed, tape_statep 1310 src/dps8/dps8_mt.c rc2 = insertWord36toBuffer (tape_statep -> buf, tape_statep 1311 src/dps8/dps8_mt.c tape_statep -> tbc, tape_statep 1312 src/dps8/dps8_mt.c & tape_statep -> words_processed, tape_statep 1329 src/dps8/dps8_mt.c if (tape_statep -> is9) tape_statep 1330 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; tape_statep 1332 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; tape_statep 1339 src/dps8/dps8_mt.c int ret = sim_tape_wrrecf (unitp, tape_statep -> buf, tape_statep -> tbc); tape_statep 1341 src/dps8/dps8_mt.c __func__, ret, tape_statep -> tbc); tape_statep 1355 src/dps8/dps8_mt.c if (tape_statep -> tbc != 0) tape_statep 1358 src/dps8/dps8_mt.c __func__, tape_statep -> tbc); tape_statep 1370 src/dps8/dps8_mt.c tape_statep -> rec_num ++; tape_statep 1373 src/dps8/dps8_mt.c (long) MT_UNIT_NUM (unitp), tape_statep -> rec_num); tape_statep 1387 src/dps8/dps8_mt.c __func__, (int) tape_statep -> tbc, p -> stati); tape_statep 1508 src/dps8/dps8_mt.c struct tape_state * tape_statep = & tape_states [devUnitIdx]; tape_statep 1531 src/dps8/dps8_mt.c tape_statep->io_mode = tape_no_mode; tape_statep 1610 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_ctlr; tape_statep 1619 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_9; tape_statep 1620 src/dps8/dps8_mt.c tape_statep->is9 = true; tape_statep 1635 src/dps8/dps8_mt.c tape_statep->io_mode = tape_rd_bin; tape_statep 1636 src/dps8/dps8_mt.c tape_statep->is9 = false; tape_statep 1669 src/dps8/dps8_mt.c tape_statep->io_mode = tape_initiate_rd_mem; tape_statep 1686 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_9; tape_statep 1701 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_bin; tape_statep 1714 src/dps8/dps8_mt.c tape_statep->io_mode = tape_wr_ctrl_regs; tape_statep 1760 src/dps8/dps8_mt.c tape_statep->io_mode = tape_MTP_wr; tape_statep 1858 src/dps8/dps8_mt.c ret = sim_tape_sprecf (unitp, & tape_statep->tbc); tape_statep 1871 src/dps8/dps8_mt.c tape_statep->rec_num += (int) skipped; tape_statep 1873 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 1923 src/dps8/dps8_mt.c tape_statep->rec_num += (int) recsskipped; tape_statep 1925 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 1979 src/dps8/dps8_mt.c t_stat ret = sim_tape_sprecr (unitp, & tape_statep->tbc); tape_statep 1988 src/dps8/dps8_mt.c tape_statep->rec_num -= (int) skipped; tape_statep 1990 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 2037 src/dps8/dps8_mt.c tape_statep 2041 src/dps8/dps8_mt.c tape_statep 2042 src/dps8/dps8_mt.c tape_statep 2056 src/dps8/dps8_mt.c tape_statep->rec_num -= (int) recsskipped; tape_statep 2058 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 2161 src/dps8/dps8_mt.c tape_statep->rec_num ++; tape_statep 2163 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 2183 src/dps8/dps8_mt.c tape_statep->io_mode = tape_survey; tape_statep 2240 src/dps8/dps8_mt.c tape_statep->rec_num = 0; tape_statep 2297 src/dps8/dps8_mt.c switch (tape_statep->io_mode) { tape_statep 2382 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 2383 src/dps8/dps8_mt.c sim_warn ("%s: Unrecognized io_mode %d\n", __func__, tape_statep->io_mode);