trunk/src/emu/machine/scsicb.c
| r18388 | r18389 | |
| 11 | 11 | #include "scsicb.h" |
| 12 | 12 | #include "scsibus.h" |
| 13 | 13 | |
| 14 | #define VERBOSE_LEVEL ( 0 ) |
| 15 | |
| 16 | INLINE void ATTR_PRINTF( 3, 4 ) verboselog( int n_level, running_machine &machine, const char *s_fmt, ... ) |
| 17 | { |
| 18 | if( VERBOSE_LEVEL >= n_level ) |
| 19 | { |
| 20 | va_list v; |
| 21 | char buf[ 32768 ]; |
| 22 | va_start( v, s_fmt ); |
| 23 | vsprintf( buf, s_fmt, v ); |
| 24 | va_end( v ); |
| 25 | logerror( "%s: %s", machine.describe_context( ), buf ); |
| 26 | } |
| 27 | } |
| 28 | |
| 14 | 29 | scsicb_device::scsicb_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) |
| 15 | 30 | : scsidev_device(mconfig, SCSICB, "SCSI callback", tag, owner, clock) |
| 16 | 31 | { |
| r18388 | r18389 | |
| 30 | 45 | { |
| 31 | 46 | scsidev_device::device_start(); |
| 32 | 47 | |
| 48 | linestate = SCSI_MASK_ALL; |
| 49 | |
| 33 | 50 | out_bsy_func.resolve(_out_bsy_func, *this); |
| 34 | 51 | out_sel_func.resolve(_out_sel_func, *this); |
| 35 | 52 | out_cd_func.resolve(_out_cd_func, *this); |
| r18388 | r18389 | |
| 45 | 62 | { |
| 46 | 63 | linestate = data; |
| 47 | 64 | |
| 48 | | if( ( mask & SCSI_MASK_BSY ) != 0 ) |
| 49 | | { |
| 50 | | out_bsy_func( (int) ( data & SCSI_MASK_BSY ) != 0 ); |
| 51 | | } |
| 52 | | |
| 53 | | if( ( mask & SCSI_MASK_SEL ) != 0 ) |
| 54 | | { |
| 55 | | out_sel_func( (int) ( data & SCSI_MASK_SEL ) != 0 ); |
| 56 | | } |
| 57 | | |
| 58 | | if( ( mask & SCSI_MASK_CD ) != 0 ) |
| 59 | | { |
| 60 | | out_cd_func( (int) ( data & SCSI_MASK_CD ) != 0 ); |
| 61 | | } |
| 62 | | |
| 63 | | if( ( mask & SCSI_MASK_IO ) != 0 ) |
| 64 | | { |
| 65 | | out_io_func( (int) ( data & SCSI_MASK_IO ) != 0 ); |
| 66 | | } |
| 67 | | |
| 68 | | if( ( mask & SCSI_MASK_MSG ) != 0 ) |
| 69 | | { |
| 70 | | out_msg_func( (int) ( data & SCSI_MASK_MSG ) != 0 ); |
| 71 | | } |
| 72 | | |
| 73 | | if( ( mask & SCSI_MASK_REQ ) != 0 ) |
| 74 | | { |
| 75 | | out_req_func( (int) ( data & SCSI_MASK_REQ ) != 0 ); |
| 76 | | } |
| 77 | | |
| 78 | | if( ( mask & SCSI_MASK_ACK ) != 0 ) |
| 79 | | { |
| 80 | | out_ack_func( (int) ( data & SCSI_MASK_ACK ) != 0 ); |
| 81 | | } |
| 82 | | |
| 83 | | if( ( mask & SCSI_MASK_ATN ) != 0 ) |
| 84 | | { |
| 85 | | out_ack_func( (int) ( data & SCSI_MASK_ATN ) != 0 ); |
| 86 | | } |
| 87 | | |
| 88 | | if( ( mask & SCSI_MASK_RST ) != 0 ) |
| 89 | | { |
| 90 | | out_rst_func( (int) ( data & SCSI_MASK_RST ) != 0 ); |
| 91 | | } |
| 65 | trigger_callback( mask, SCSI_MASK_BSY, out_bsy_func ); |
| 66 | trigger_callback( mask, SCSI_MASK_SEL, out_sel_func ); |
| 67 | trigger_callback( mask, SCSI_MASK_CD, out_cd_func ); |
| 68 | trigger_callback( mask, SCSI_MASK_IO, out_io_func ); |
| 69 | trigger_callback( mask, SCSI_MASK_MSG, out_msg_func ); |
| 70 | trigger_callback( mask, SCSI_MASK_REQ, out_req_func ); |
| 71 | trigger_callback( mask, SCSI_MASK_ACK, out_ack_func ); |
| 72 | trigger_callback( mask, SCSI_MASK_ATN, out_atn_func ); |
| 73 | trigger_callback( mask, SCSI_MASK_RST, out_rst_func ); |
| 92 | 74 | } |
| 93 | 75 | |
| 94 | 76 | UINT8 scsicb_device::scsi_data_r() |
| 95 | 77 | { |
| 96 | | return linestate & SCSI_MASK_DATA; |
| 78 | UINT8 data = linestate & SCSI_MASK_DATA; |
| 79 | verboselog( 1, machine(), "%s scsi_data_r() %02x\n", tag(), data ); |
| 80 | return data; |
| 97 | 81 | } |
| 98 | 82 | |
| 99 | 83 | void scsicb_device::scsi_data_w( UINT8 data ) |
| 100 | 84 | { |
| 85 | verboselog( 1, machine(), "%s scsi_data_w( %02x )\n", tag(), data ); |
| 101 | 86 | scsi_out( data, SCSI_MASK_DATA ); |
| 102 | 87 | } |
| 103 | 88 | |
| 104 | | UINT8 scsicb_device::get_scsi_line( UINT32 line ) |
| 105 | | { |
| 106 | | UINT8 result = (int)( ( linestate & line ) != 0 ); |
| 107 | | |
| 108 | | // LOG(3,"get_scsi_line(%s)=%d\n",linenames[lineno],result); |
| 109 | | |
| 110 | | return result; |
| 111 | | } |
| 112 | | |
| 113 | | void scsicb_device::set_scsi_line( UINT32 mask, UINT8 state ) |
| 114 | | { |
| 115 | | scsi_out( state * mask, mask ); |
| 116 | | } |
| 117 | | |
| 118 | 89 | READ8_MEMBER( scsicb_device::scsi_data_r ) |
| 119 | 90 | { |
| 120 | 91 | return scsi_data_r(); |
| r18388 | r18389 | |
| 145 | 116 | WRITE_LINE_MEMBER( scsicb_device::scsi_atn_w ) { set_scsi_line(SCSI_MASK_ATN, state); } |
| 146 | 117 | WRITE_LINE_MEMBER( scsicb_device::scsi_rst_w ) { set_scsi_line(SCSI_MASK_RST, state); } |
| 147 | 118 | |
| 119 | UINT8 scsicb_device::get_scsi_line( UINT32 mask ) |
| 120 | { |
| 121 | UINT8 state = (int)( ( linestate & mask ) != 0 ); |
| 122 | |
| 123 | verboselog( 1, machine(), "%s get_scsi_line %s %d\n", tag(), get_line_name( mask ), state ); |
| 124 | |
| 125 | return state; |
| 126 | } |
| 127 | |
| 128 | void scsicb_device::set_scsi_line( UINT32 mask, UINT8 state ) |
| 129 | { |
| 130 | verboselog( 1, machine(), "%s set_scsi_line %s %d\n", tag(), get_line_name( mask ), state ); |
| 131 | |
| 132 | scsi_out( state * mask, mask ); |
| 133 | } |
| 134 | |
| 135 | void scsicb_device::trigger_callback( UINT32 update_mask, UINT32 line_mask, devcb_resolved_write_line &write_line ) |
| 136 | { |
| 137 | if( ( update_mask & line_mask ) != 0 && !write_line.isnull() ) |
| 138 | { |
| 139 | int state = (int)( ( linestate & line_mask ) != 0 ); |
| 140 | |
| 141 | verboselog( 1, machine(), "%s trigger_callback %s %d\n", tag(), get_line_name( line_mask ), state ); |
| 142 | |
| 143 | write_line( state ); |
| 144 | } |
| 145 | } |
| 146 | |
| 147 | const char *scsicb_device::get_line_name( UINT32 mask ) |
| 148 | { |
| 149 | switch( mask ) |
| 150 | { |
| 151 | case SCSI_MASK_BSY: |
| 152 | return "bsy"; |
| 153 | |
| 154 | case SCSI_MASK_SEL: |
| 155 | return "sel"; |
| 156 | |
| 157 | case SCSI_MASK_CD: |
| 158 | return "cd"; |
| 159 | |
| 160 | case SCSI_MASK_IO: |
| 161 | return "io"; |
| 162 | |
| 163 | case SCSI_MASK_MSG: |
| 164 | return "msg"; |
| 165 | |
| 166 | case SCSI_MASK_REQ: |
| 167 | return "req"; |
| 168 | |
| 169 | case SCSI_MASK_ACK: |
| 170 | return "ack"; |
| 171 | |
| 172 | case SCSI_MASK_ATN: |
| 173 | return "atn"; |
| 174 | |
| 175 | case SCSI_MASK_RST: |
| 176 | return "rst"; |
| 177 | } |
| 178 | |
| 179 | return "?"; |
| 180 | } |
| 181 | |
| 148 | 182 | const device_type SCSICB = &device_creator<scsicb_device>; |