![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to as.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Net/2] / Net2 / arch / i386 / stand|
Return to as.c CVS log | Up to [Net/2] / Net2 / arch / i386 / stand |
1.1 ! root 1: /* ! 2: * sys/i386/stand/as.c ! 3: * ! 4: * Standalone driver for Adaptech 1542 SCSI ! 5: * ! 6: * Pace Willisson [email protected] April 8, 1992 ! 7: */ ! 8: ! 9: #include "param.h" ! 10: #include "disklabel.h" ! 11: #include "i386/isa/asreg.h" ! 12: #include "saio.h" ! 13: ! 14: #ifdef ASDEBUG ! 15: #define ASPRINT(x) { printf x; DELAY (10000); } ! 16: #else ! 17: #define ASPRINT(x) ! 18: #endif ! 19: ! 20: #define NRETRIES 3 ! 21: ! 22: int as_port = 0x330; ! 23: ! 24: struct mailbox_entry mailbox[2]; ! 25: ! 26: int ! 27: asopen(io) ! 28: struct iob *io; ! 29: { ! 30: struct disklabel *dd; ! 31: char cdb[6]; ! 32: char data[12]; ! 33: int val; ! 34: int oval; ! 35: int i; ! 36: struct iob aio; ! 37: ! 38: if (io->i_unit < 0 || io->i_unit > 8 ! 39: || io->i_part < 0 || io->i_part > 8 ! 40: || io->i_ctlr < 0 || io->i_ctlr > 0) ! 41: return (-1); ! 42: ! 43: /* dma setup: see page 5-31 in the Adaptech manual */ ! 44: outb (0xd6, 0xc1); ! 45: outb (0xd4, 0x01); ! 46: ! 47: ASPRINT (("resetting adaptech card... ")); ! 48: ! 49: outb (as_port + AS_CONTROL, AS_CONTROL_SRST); ! 50: ! 51: /* delay a little */ ! 52: for (i = 0; i < 100; i++) ! 53: inb (0x84); ! 54: ! 55: while (inb (as_port + AS_STATUS) != (AS_STATUS_INIT | AS_STATUS_IDLE)) ! 56: ; ! 57: ! 58: ASPRINT (("reset ok ")); ! 59: ! 60: as_put_byte (AS_CMD_MAILBOX_INIT); ! 61: as_put_byte (1); /* one mailbox out, one in */ ! 62: as_put_byte ((int)mailbox >> 16); ! 63: as_put_byte ((int)mailbox >> 8); ! 64: as_put_byte ((int)mailbox); ! 65: ! 66: while (inb (as_port + AS_STATUS) & AS_STATUS_INIT) ! 67: ; ! 68: ! 69: ASPRINT (("mailbox init ok ")); ! 70: ! 71: /* do mode select to set the logical block size */ ! 72: bzero (cdb, 6); ! 73: cdb[0] = 0x15; /* MODE SELECT */ ! 74: cdb[4] = 12; /* parameter list length */ ! 75: ! 76: bzero (data, 12); ! 77: data[3] = 8; /* block descriptor length */ ! 78: data[9] = DEV_BSIZE >> 16; ! 79: data[10] = DEV_BSIZE >> 8; ! 80: data[11] = DEV_BSIZE; ! 81: ! 82: if (ascmd (io->i_unit, 0, cdb, 6, data, 12, 1) < 0) { ! 83: printf ("as%d: error setting logical block size\n", ! 84: io->i_unit); ! 85: return (-1); ! 86: } ! 87: ! 88: aio = *io; ! 89: aio.i_bn = LABELSECTOR; ! 90: aio.i_cc = DEV_BSIZE; ! 91: /*io->i_ma = buf;*/ ! 92: aio.i_boff = 0; ! 93: ! 94: #ifdef was ! 95: if (asstrategy (&aio, F_READ) == DEV_BSIZE) { ! 96: dd = (struct disklabel *)aio.i_ma; ! 97: io->i_boff = dd->d_partitions[io->i_part].p_offset; ! 98: ASPRINT (("partition offset %d ", io->i_boff)); ! 99: } ! 100: #else ! 101: { ! 102: extern struct disklabel disklabel; ! 103: io->i_boff = disklabel.d_partitions[io->i_part].p_offset; ! 104: ASPRINT (("partition offset %d ", io->i_boff)); ! 105: } ! 106: #endif ! 107: ! 108: ASPRINT (("asopen ok ")); ! 109: return(0); ! 110: } ! 111: ! 112: /* func is F_WRITE or F_READ ! 113: * io->i_unit, io->i_part, io->i_bn is starting block ! 114: * io->i_cc is byte count ! 115: * io->i_ma is memory address ! 116: * io->i_boff is block offset for this partition (set up in asopen) ! 117: */ ! 118: int ! 119: asstrategy(io, func) ! 120: struct iob *io; ! 121: { ! 122: char cdb[6]; ! 123: int blkno; ! 124: int retry; ! 125: ! 126: ASPRINT (("asstrategy(target=%d, block=%d+%d, count=%d) ", ! 127: io->i_unit, io->i_bn, io->i_boff, io->i_cc)); ! 128: ! 129: if (func == F_WRITE) { ! 130: printf ("as%d: write not supported\n", io->i_unit); ! 131: return (0); ! 132: } ! 133: ! 134: if (io->i_cc == 0) ! 135: return (0); ! 136: ! 137: if (io->i_cc % DEV_BSIZE != 0) { ! 138: printf ("as%d: transfer size not multiple of %d\n", ! 139: io->i_unit, DEV_BSIZE); ! 140: return (0); ! 141: } ! 142: ! 143: /* retry in case we get a unit-attention error, which just ! 144: * means the drive has been reset since the last command ! 145: */ ! 146: for (retry = 0; retry < NRETRIES; retry++) { ! 147: blkno = io->i_bn + io->i_boff; ! 148: ! 149: cdb[0] = 8; /* scsi read opcode */ ! 150: cdb[1] = (blkno >> 16) & 0x1f; ! 151: cdb[2] = blkno >> 8; ! 152: cdb[3] = blkno; ! 153: cdb[4] = io->i_cc / DEV_BSIZE; ! 154: cdb[5] = 0; /* control byte (used in linking) */ ! 155: ! 156: if (ascmd (io->i_unit, 1, cdb, 6, io->i_ma, io->i_cc, ! 157: retry == NRETRIES - 1) >= 0) { ! 158: ASPRINT (("asstrategy ok ")); ! 159: return (io->i_cc); ! 160: } ! 161: } ! 162: ! 163: ASPRINT (("asstrategy failed ")); ! 164: return (0); ! 165: } ! 166: ! 167: int ! 168: ascmd (target, readflag, cdb, cdblen, data, datalen, printerr) ! 169: int target; ! 170: int readflag; ! 171: char *cdb; ! 172: int cdblen; ! 173: char *data; ! 174: int datalen; ! 175: int printerr; ! 176: { ! 177: struct ccb ccb; ! 178: int physaddr; ! 179: unsigned char *sp; ! 180: int i; ! 181: ! 182: if (mailbox[0].cmd != 0) ! 183: /* this can't happen, unless the card flakes */ ! 184: _stop ("asstart: mailbox not available\n"); ! 185: ! 186: bzero (&ccb, sizeof ccb); ! 187: ! 188: ccb.ccb_opcode = 3; ! 189: ccb.ccb_addr_and_control = target << 5; ! 190: if (datalen != 0) ! 191: ccb.ccb_addr_and_control |= readflag ? 8 : 0x10; ! 192: else ! 193: ccb.ccb_addr_and_control |= 0x18; ! 194: ! 195: ccb.ccb_data_len_msb = datalen >> 16; ! 196: ccb.ccb_data_len_mid = datalen >> 8; ! 197: ccb.ccb_data_len_lsb = datalen; ! 198: ! 199: ccb.ccb_requst_sense_allocation_len = MAXSENSE; ! 200: ! 201: physaddr = (int)data; ! 202: ccb.ccb_data_ptr_msb = physaddr >> 16; ! 203: ccb.ccb_data_ptr_mid = physaddr >> 8; ! 204: ccb.ccb_data_ptr_lsb = physaddr; ! 205: ! 206: ccb.ccb_scsi_command_len = cdblen; ! 207: bcopy (cdb, ccb.ccb_cdb, cdblen); ! 208: ! 209: #ifdef ASDEBUG ! 210: printf ("ccb: "); ! 211: for (i = 0; i < 48; i++) ! 212: printf ("%x ", ((unsigned char *)&ccb)[i]); ! 213: printf ("\n"); ! 214: /*getchar ();*/ ! 215: #endif ! 216: ! 217: physaddr = (int)&ccb; ! 218: mailbox[0].msb = physaddr >> 16; ! 219: mailbox[0].mid = physaddr >> 8; ! 220: mailbox[0].lsb = physaddr; ! 221: mailbox[0].cmd = 1; ! 222: ! 223: /* tell controller to look in its mailbox */ ! 224: outb (as_port + AS_CONTROL, AS_CONTROL_IRST); ! 225: as_put_byte (AS_CMD_START_SCSI_COMMAND); ! 226: ! 227: /* wait for status */ ! 228: ASPRINT (("waiting for status...")); ! 229: while (mailbox[1].cmd == 0) ! 230: ; ! 231: mailbox[1].cmd = 0; ! 232: ! 233: ! 234: if (ccb.ccb_host_status != 0 || ccb.ccb_target_status != 0) { ! 235: #ifdef ASDEBUG ! 236: printerr = 1; ! 237: #endif ! 238: if (printerr) { ! 239: printf ("as%d error: hst=%x tst=%x sense=", ! 240: target, ! 241: ccb.ccb_host_status, ! 242: ccb.ccb_target_status); ! 243: sp = ccb_sense (&ccb); ! 244: for (i = 0; i < 8; i++) ! 245: printf ("%x ", sp[i]); ! 246: printf ("\n"); ! 247: #ifdef ASDEBUG ! 248: /*getchar ();*/ ! 249: #endif ! 250: } ! 251: return (-1); ! 252: } ! 253: ! 254: ASPRINT (("ascmd ok ")); ! 255: ! 256: return (0); ! 257: } ! 258: ! 259: int ! 260: as_put_byte (val) ! 261: int val; ! 262: { ! 263: while (inb (as_port + AS_STATUS) & AS_STATUS_CDF) ! 264: ; ! 265: outb (as_port + AS_DATA_OUT, val); ! 266: } ! 267:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.