| /dports/emulators/simh-hp3000/simh-hp3000-3.11.0.10/SCP/HP3000/ |
| H A D | hp3000_ds.c | 596 static SIGNALS_DATA ds_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ds_interface() argument
604 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ds_interface()
633 … & inbound_value); /* is present in the mask value */ in ds_interface()
642 fmt_bitset (inbound_value, control_format)); in ds_interface()
644 if (inbound_value & CN_MR) /* if the master reset bit is set */ in ds_interface()
647 if (inbound_value & CN_RIN) /* if the reset interrupt bit is set */ in ds_interface()
650 … test_mode = D_FF (inbound_value & CN_TEST); /* set the test mode flip-flop from the test bit */ in ds_interface()
684 inbound_value); in ds_interface()
686 buffer_word = inbound_value; /* set the data buffer register value */ in ds_interface()
747 inbound_value, dl_opcode_name (MAC, CN_OPCODE (inbound_value))); in ds_interface()
[all …]
|
| H A D | hp3000_ms.c | 693 static SIGNALS_DATA ms_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ms_interface() argument
702 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ms_interface()
755 … & inbound_value); /* is present in the mask value */ in ms_interface()
764 fmt_bitset (inbound_value, control_format)); in ms_interface()
766 if (inbound_value & CN_MR) /* if the master reset bit is set */ in ms_interface()
769 if (inbound_value & CN_RIN) { /* if the reset interrupt bit is set */ in ms_interface()
887 … opcode = to_opcode [CN_CMD (inbound_value)]; /* get the command code from the control word */ in ms_interface()
890 … opcode = opcode + CN_UNIT (inbound_value); /* then convert to a unit-specific opcode */ in ms_interface()
893 inbound_value, tl_opcode_name (opcode)); in ms_interface()
895 if ((inbound_value & CN_RSVD_MASK) != 0) /* if the reserved bits aren't zero */ in ms_interface()
[all …]
|
| H A D | hp3000_clk.c | 557 static SIGNALS_DATA clk_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in clk_interface() argument
565 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in clk_interface()
573 control_word = inbound_value; /* save the control word */ in clk_interface()
624 tprintf (clk_dev, DEB_CSRW, (inbound_value & CN_RESET_LOAD_SEL in clk_interface()
627 fmt_bitset (inbound_value, control_format), in clk_interface()
628 rate_name [CN_RATE (inbound_value)], in clk_interface()
629 irq_reset_name [CN_RESET (inbound_value)]); in clk_interface()
677 … limit_register = inbound_value; /* set the limit register to the supplied value */ in clk_interface()
|
| H A D | hp3000_scmb.c | 702 static SIGNALS_DATA scmb_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in scmb_interface() argument
714 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in scmb_interface()
728 inbound_value); in scmb_interface()
730 scmb [card].counter = inbound_value; /* set the counter/buffer */ in scmb_interface()
744 fmt_bitset (inbound_value, control_format), in scmb_interface()
745 load_names [CN_LOAD (inbound_value)], in scmb_interface()
746 count_names [CN_CNTR (inbound_value)]); in scmb_interface()
748 scmb [card].control_word = inbound_value; /* save the new control word value */ in scmb_interface()
931 if (inbound_value & CN_NOACK) /* if the CHANACK timeout will be enabled */ in scmb_interface()
968 inbound_value, scmb [card].counter); in scmb_interface()
[all …]
|
| H A D | hp3000_atc.c | 1201 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in atcd_interface()
1209 tprintf (atcd_dev, DEB_CSRW, (inbound_value & DCN_ENABLE in atcd_interface()
1212 fmt_bitset (inbound_value, tdi_control_format), in atcd_interface()
1213 DCN_CHAN (inbound_value)); in atcd_interface()
1258 if (inbound_value & DPI_IS_PARAM) in atcd_interface()
1260 fmt_bitset (inbound_value, tdi_parameter_format), in atcd_interface()
1261 bits_per_char [DPI_CHAR_SIZE (inbound_value)], in atcd_interface()
1262 BAUD_RATE (inbound_value)); in atcd_interface()
1267 DDS_DATA (inbound_value)); in atcd_interface()
1398 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in atcc_interface()
[all …]
|
| H A D | hp3000_mpx.c | 1648 static SIGNALS_DATA mpx_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in mpx_interface() argument
1658 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in mpx_interface()
1671 … order_ram [address] = WR_ORDER (inbound_value); /* set the order RAM from the order field */ in mpx_interface()
1673 sio_order = IOCW_ORDER (inbound_value); /* get the translated order */ in mpx_interface()
1676 …cntr_ram [address] = WR_COUNT (inbound_value); /* then set the counter RAM from the counter fie… in mpx_interface()
1680 … addr_ram [address] = inbound_value; /* so set the address RAM from the value */ in mpx_interface()
1691 … state_ram [address] |= WR_STATE (inbound_value); /* then merge the new state values */ in mpx_interface()
1694 … | WR_BANK (inbound_value); /* while preserving the flag bits */ in mpx_interface()
1808 control_word = inbound_value; /* save the new control word */ in mpx_interface()
1814 fmt_bitset (inbound_value, control_format), in mpx_interface()
|
| H A D | hp3000_lp.c | 1386 static SIGNALS_DATA ui_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ui_interface() argument
1395 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ui_interface()
1435 … & inbound_value); /* is present in the mask value */ in ui_interface()
1449 (lp_dev.flags & DEV_DIAG && inbound_value & CN_DHA_FN_ENABLE in ui_interface()
1452 fmt_bitset (inbound_value, in ui_interface()
1456 reset_irq_name [CN_RESET (inbound_value)], in ui_interface()
1457 dha_fn_name [CN_DHA_FN (inbound_value)]); in ui_interface()
1459 … if (inbound_value & CN_MR) /* if the programmed master reset bit is set */ in ui_interface()
1462 … else if (inbound_value & CN_RIN) { /* otherwise if the reset interrupt bit is set */ in ui_interface()
1467 control_word = inbound_value; /* and set the control word */ in ui_interface()
[all …]
|
| /dports/emulators/simh-hpdoc/simh-hpdoc-3.11.0/SCP/HP3000/ |
| H A D | hp3000_ds.c | 595 static SIGNALS_DATA ds_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ds_interface() argument
603 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ds_interface()
632 … & inbound_value); /* is present in the mask value */ in ds_interface()
641 fmt_bitset (inbound_value, control_format)); in ds_interface()
643 if (inbound_value & CN_MR) /* if the master reset bit is set */ in ds_interface()
646 if (inbound_value & CN_RIN) /* if the reset interrupt bit is set */ in ds_interface()
649 … test_mode = D_FF (inbound_value & CN_TEST); /* set the test mode flip-flop from the test bit */ in ds_interface()
683 inbound_value); in ds_interface()
685 buffer_word = inbound_value; /* set the data buffer register value */ in ds_interface()
746 inbound_value, dl_opcode_name (MAC, CN_OPCODE (inbound_value))); in ds_interface()
[all …]
|
| H A D | hp3000_ms.c | 692 static SIGNALS_DATA ms_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ms_interface() argument
701 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ms_interface()
754 … & inbound_value); /* is present in the mask value */ in ms_interface()
763 fmt_bitset (inbound_value, control_format)); in ms_interface()
765 if (inbound_value & CN_MR) /* if the master reset bit is set */ in ms_interface()
768 if (inbound_value & CN_RIN) { /* if the reset interrupt bit is set */ in ms_interface()
886 … opcode = to_opcode [CN_CMD (inbound_value)]; /* get the command code from the control word */ in ms_interface()
889 … opcode = opcode + CN_UNIT (inbound_value); /* then convert to a unit-specific opcode */ in ms_interface()
892 inbound_value, tl_opcode_name (opcode)); in ms_interface()
894 if ((inbound_value & CN_RSVD_MASK) != 0) /* if the reserved bits aren't zero */ in ms_interface()
[all …]
|
| H A D | hp3000_clk.c | 557 static SIGNALS_DATA clk_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in clk_interface() argument
565 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in clk_interface()
573 control_word = inbound_value; /* save the control word */ in clk_interface()
624 tprintf (clk_dev, DEB_CSRW, (inbound_value & CN_RESET_LOAD_SEL in clk_interface()
627 fmt_bitset (inbound_value, control_format), in clk_interface()
628 rate_name [CN_RATE (inbound_value)], in clk_interface()
629 irq_reset_name [CN_RESET (inbound_value)]); in clk_interface()
677 … limit_register = inbound_value; /* set the limit register to the supplied value */ in clk_interface()
|
| H A D | hp3000_scmb.c | 701 static SIGNALS_DATA scmb_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in scmb_interface() argument
713 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in scmb_interface()
727 inbound_value); in scmb_interface()
729 scmb [card].counter = inbound_value; /* set the counter/buffer */ in scmb_interface()
743 fmt_bitset (inbound_value, control_format), in scmb_interface()
744 load_names [CN_LOAD (inbound_value)], in scmb_interface()
745 count_names [CN_CNTR (inbound_value)]); in scmb_interface()
747 scmb [card].control_word = inbound_value; /* save the new control word value */ in scmb_interface()
930 if (inbound_value & CN_NOACK) /* if the CHANACK timeout will be enabled */ in scmb_interface()
967 inbound_value, scmb [card].counter); in scmb_interface()
[all …]
|
| H A D | hp3000_atc.c | 1193 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in atcd_interface()
1201 tprintf (atcd_dev, DEB_CSRW, (inbound_value & DCN_ENABLE in atcd_interface()
1204 fmt_bitset (inbound_value, tdi_control_format), in atcd_interface()
1205 DCN_CHAN (inbound_value)); in atcd_interface()
1250 if (inbound_value & DPI_IS_PARAM) in atcd_interface()
1252 fmt_bitset (inbound_value, tdi_parameter_format), in atcd_interface()
1253 bits_per_char [DPI_CHAR_SIZE (inbound_value)], in atcd_interface()
1254 BAUD_RATE (inbound_value)); in atcd_interface()
1259 DDS_DATA (inbound_value)); in atcd_interface()
1390 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in atcc_interface()
[all …]
|
| H A D | hp3000_mpx.c | 1639 static SIGNALS_DATA mpx_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in mpx_interface() argument
1649 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in mpx_interface()
1662 … order_ram [address] = WR_ORDER (inbound_value); /* set the order RAM from the order field */ in mpx_interface()
1664 sio_order = IOCW_ORDER (inbound_value); /* get the translated order */ in mpx_interface()
1667 …cntr_ram [address] = WR_COUNT (inbound_value); /* then set the counter RAM from the counter fie… in mpx_interface()
1671 … addr_ram [address] = inbound_value; /* so set the address RAM from the value */ in mpx_interface()
1682 … state_ram [address] |= WR_STATE (inbound_value); /* then merge the new state values */ in mpx_interface()
1685 … | WR_BANK (inbound_value); /* while preserving the flag bits */ in mpx_interface()
1799 control_word = inbound_value; /* save the new control word */ in mpx_interface()
1805 fmt_bitset (inbound_value, control_format), in mpx_interface()
|
| H A D | hp3000_lp.c | 1384 static SIGNALS_DATA ui_interface (DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in ui_interface() argument
1393 inbound_value, fmt_bitset (inbound_signals, inbound_format)); in ui_interface()
1433 … & inbound_value); /* is present in the mask value */ in ui_interface()
1447 (lp_dev.flags & DEV_DIAG && inbound_value & CN_DHA_FN_ENABLE in ui_interface()
1450 fmt_bitset (inbound_value, in ui_interface()
1454 reset_irq_name [CN_RESET (inbound_value)], in ui_interface()
1455 dha_fn_name [CN_DHA_FN (inbound_value)]); in ui_interface()
1457 … if (inbound_value & CN_MR) /* if the programmed master reset bit is set */ in ui_interface()
1460 … else if (inbound_value & CN_RIN) { /* otherwise if the reset interrupt bit is set */ in ui_interface()
1465 control_word = inbound_value; /* and set the control word */ in ui_interface()
[all …]
|
| /dports/emulators/simh-hpdoc/simh-hpdoc-3.11.0/SCP/HP2100/ |
| H A D | hp2100_dma.c | 457 …SIGNALS_VALUE dma_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in dma_interface() argument
519 … dma [ch].cw1 = inbound_value & CN_12607_MASK | 010; /* then convert to SC 0-6 to 10-16 */ in dma_interface()
521 … dma [ch].cw1 = inbound_value; /* then store the control word verbatim */ in dma_interface()
523 … dma [ch].cw1 = inbound_value & ~CN_PACK; /* remove the byte-packing flag */ in dma_interface()
526 fmt_bitset (inbound_value, dma_cw1_format), inbound_value & CN_SC); in dma_interface()
644 …SIGNALS_VALUE dmc_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in dmc_interface() argument
681 dma [ch].cw3 = inbound_value; /* then save the (negative) count */ in dmc_interface()
689 … dma [ch].cw2 = inbound_value /* then store only 14 bits of the address */ in dmc_interface()
692 … dma [ch].cw2 = inbound_value; /* store the full address */ in dmc_interface()
|
| H A D | hp2100_di.c | 451 SIGNALS_VALUE di_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in di_interface() argument
557 hold_or_clear, output_state [di_card->control], inbound_value); in di_interface()
569 if (inbound_value & DATA_LBO) /* is the last byte out? */ in di_interface()
594 if (!(inbound_value & CNTL_PACK)) /* unpacked mode always sets */ in di_interface()
598 if ((inbound_value & (CNTL_PPE | CNTL_CIC)) /* if parallel poll is enabled */ in di_interface()
607 else if ((inbound_value /* if packed mode */ in di_interface()
627 if (inbound_value & CNTL_LSTN) /* is card now listening? */ in di_interface()
635 if (inbound_value & CNTL_REN) /* REN control */ in di_interface()
640 if (inbound_value & CNTL_IFC) { /* is IFC set? */ in di_interface()
653 if ((inbound_value /* if service request */ in di_interface()
[all …]
|
| H A D | hp2100_mux.c | 1017 muxl_obuf = inbound_value; /* store data */ in muxl_interface()
1201 muxu_obuf = inbound_value; /* store data */ in muxu_interface()
1298 ln = muxc_chan = OTC_CHAN (inbound_value); /* set channel */ in muxc_interface()
1301 muxc_chan, fmt_bitset (inbound_value, cntl_control_format)); in muxc_interface()
1303 muxc_scan = (inbound_value & OTC_SCAN) != 0; /* set scan flag */ in muxc_interface()
1305 if (inbound_value & OTC_UPD) { /* update? */ in muxc_interface()
1307 (muxc_ota[ln] & ~OTC_RW) | (inbound_value & OTC_RW); in muxc_interface()
1309 if (inbound_value & OTC_EC2) /* if EC2, upd C2 */ in muxc_interface()
1311 (muxc_ota[ln] & ~OTC_C2) | (inbound_value & OTC_C2); in muxc_interface()
1313 if (inbound_value & OTC_EC1) /* if EC1, upd C1 */ in muxc_interface()
[all …]
|
| H A D | hp2100_tty.c | 422 …SIGNALS_VALUE tty_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in tty_interface() argument
477 if (inbound_value & CN_CONTROL) { /* if this is a control word */ in tty_interface()
478 tty.mode = inbound_value; /* then set the mode register */ in tty_interface()
481 fmt_bitset (inbound_value, tty_control_format)); in tty_interface()
486 fmt_char (inbound_value)); in tty_interface()
488 … tty.io_data = LOWER_BYTE (inbound_value); /* set the data register from the lower byte */ in tty_interface()
|
| H A D | hp2100_mt.c | 385 …SIGNALS_VALUE mtd_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in mtd_interface() argument
431 mtc_unit [0].buf = inbound_value & D8_MASK; /* store data */ in mtd_interface()
498 …SIGNALS_VALUE mtc_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in mtc_interface() argument
558 … data = inbound_value & D8_MASK; /* only the lower 8 bits are connected */ in mtc_interface()
|
| /dports/emulators/simh-hp2100/simh-hp2100-3.11.0.31/SCP/HP2100/ |
| H A D | hp2100_dma.c | 463 …SIGNALS_VALUE dma_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in dma_interface() argument
525 … dma [ch].cw1 = inbound_value & CN_12607_MASK | 010; /* then convert to SC 0-6 to 10-16 */ in dma_interface()
527 … dma [ch].cw1 = inbound_value; /* then store the control word verbatim */ in dma_interface()
529 … dma [ch].cw1 = inbound_value & ~CN_PACK; /* remove the byte-packing flag */ in dma_interface()
532 fmt_bitset (inbound_value, dma_cw1_format), inbound_value & CN_SC); in dma_interface()
650 …SIGNALS_VALUE dmc_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in dmc_interface() argument
687 dma [ch].cw3 = inbound_value; /* then save the (negative) count */ in dmc_interface()
695 … dma [ch].cw2 = inbound_value /* then store only 14 bits of the address */ in dmc_interface()
698 … dma [ch].cw2 = inbound_value; /* store the full address */ in dmc_interface()
|
| H A D | hp2100_di.c | 454 SIGNALS_VALUE di_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in di_interface() argument
560 hold_or_clear, output_state [di_card->control], inbound_value); in di_interface()
572 if (inbound_value & DATA_LBO) /* is the last byte out? */ in di_interface()
597 if (not (inbound_value & CNTL_PACK)) /* unpacked mode always sets */ in di_interface()
601 if ((inbound_value & (CNTL_PPE | CNTL_CIC)) /* if parallel poll is enabled */ in di_interface()
610 else if ((inbound_value /* if packed mode */ in di_interface()
630 if (inbound_value & CNTL_LSTN) /* is card now listening? */ in di_interface()
638 if (inbound_value & CNTL_REN) /* REN control */ in di_interface()
643 if (inbound_value & CNTL_IFC) { /* is IFC set? */ in di_interface()
656 if ((inbound_value /* if service request */ in di_interface()
[all …]
|
| H A D | hp2100_mux.c | 1023 muxl_obuf = inbound_value; /* store data */ in muxl_interface()
1207 muxu_obuf = inbound_value; /* store data */ in muxu_interface()
1304 ln = muxc_chan = OTC_CHAN (inbound_value); /* set channel */ in muxc_interface()
1307 muxc_chan, fmt_bitset (inbound_value, cntl_control_format)); in muxc_interface()
1309 muxc_scan = (inbound_value & OTC_SCAN) != 0; /* set scan flag */ in muxc_interface()
1311 if (inbound_value & OTC_UPD) { /* update? */ in muxc_interface()
1313 (muxc_ota[ln] & ~OTC_RW) | (inbound_value & OTC_RW); in muxc_interface()
1315 if (inbound_value & OTC_EC2) /* if EC2, upd C2 */ in muxc_interface()
1317 (muxc_ota[ln] & ~OTC_C2) | (inbound_value & OTC_C2); in muxc_interface()
1319 if (inbound_value & OTC_EC1) /* if EC1, upd C1 */ in muxc_interface()
[all …]
|
| H A D | hp2100_tty.c | 425 …SIGNALS_VALUE tty_interface (const DIB *dibptr, INBOUND_SET inbound_signals, HP_WORD inbound_value) in tty_interface() argument
480 if (inbound_value & CN_CONTROL) { /* if this is a control word */ in tty_interface()
481 tty.mode = inbound_value; /* then set the mode register */ in tty_interface()
484 fmt_bitset (inbound_value, tty_control_format)); in tty_interface()
489 fmt_char (inbound_value)); in tty_interface()
491 … tty.io_data = LOWER_BYTE (inbound_value); /* set the data register from the lower byte */ in tty_interface()
|
| /dports/emulators/mess/mame-mame0226/src/devices/bus/hexbus/ |
| H A D | hexbus.cpp | 321 uint8_t inbound_value = 0xff; in hexbus_get_levels() local
326 inbound_value = m_hexbus_inbound->read(INBOUND); in hexbus_get_levels()
331 return (inbound_value & outbound_value); in hexbus_get_levels()
|
| /dports/emulators/mame/mame-mame0226/src/devices/bus/hexbus/ |
| H A D | hexbus.cpp | 321 uint8_t inbound_value = 0xff; in hexbus_get_levels() local
326 inbound_value = m_hexbus_inbound->read(INBOUND); in hexbus_get_levels()
331 return (inbound_value & outbound_value); in hexbus_get_levels()
|