|
|
1.1 root 1: /*
2: * Copyright (c) 1988 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted
6: * provided that the above copyright notice and this paragraph are
7: * duplicated in all such forms and that any documentation,
8: * advertising materials, and other materials related to such
9: * distribution and use acknowledge that the software was developed
10: * by the University of California, Berkeley. The name of the
11: * University may not be used to endorse or promote products derived
12: * from this software without specific prior written permission.
13: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15: * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16: *
17: * @(#)kdb.c 7.4 (Berkeley) 7/8/88
18: */
19:
20: /*
21: * KDB50/RAxx disk device driver
22: */
23: #include "../machine/pte.h"
24:
25: #include "param.h"
26: #include "inode.h"
27: #include "fs.h"
28: #include "disklabel.h"
29:
30: #include "saio.h"
31: #include "savax.h"
32:
33: /*
34: * N.B.: on KDB50, controller == adapter
35: * here we just use the controller number
36: */
37:
38: #define NKRA 8 /* max drive number */
39: #define SECTSIZ 512 /* sector size in bytes */
40:
41: /*
42: * Parameters for the communications area:
43: * command and response rings both one entry.
44: */
45: #define NRSP 1
46: #define NCMD 1
47:
48: #include "../vaxbi/bireg.h"
49: #include "../vaxbi/kdbreg.h"
50: #include "../vax/mscp.h"
51:
52: struct kdb {
53: struct kdbca kdb_ca;
54: struct mscp kdb_rsp;
55: struct mscp kdb_cmd;
56: } kdb;
57:
58: int kdbinit[MAXNKDB];
59: struct disklabel kralabel[MAXNKDB][NKRA];
60: u_long kramedia[MAXNKDB][NKRA];
61: char lbuf[SECTSIZ];
62:
63: kraopen(io)
64: register struct iob *io;
65: {
66: register struct kdb_regs *kr;
67: register struct disklabel *lp;
68: register int ctlr, unit;
69: struct iob tio;
70:
71: if ((u_int)(ctlr = io->i_ctlr) >= nkdb)
72: return (EADAPT);
73: if ((u_int)(unit = io->i_unit) >= NKRA)
74: return (EUNIT);
75: kr = (struct kdb_regs *)kdbaddr[ctlr];
76: if (kdbinit[ctlr] == 0) {
77: kr->kdb_bi.bi_csr |= BICSR_NRST;
78: DELAY(10000); /* ??? */
79: /* clear any bus errors */
80: kr->kdb_bi.bi_ber = ~(BIBER_MBZ|BIBER_NMR|BIBER_UPEN);
81: while ((kr->kdb_sa & KDB_STEP1) == 0)
82: /* void */;
83: kr->kdb_bi.bi_bcicsr |= BCI_STOPEN | BCI_IDENTEN;
84: kr->kdb_sw = KDB_ERR;
85: while ((kr->kdb_sa & KDB_STEP2) == 0)
86: /* void */;
87: kr->kdb_sw = (int)&kdb.kdb_ca.ca_rspdsc[0];
88: while ((kr->kdb_sa & KDB_STEP3) == 0)
89: /* void */;
90: kr->kdb_sw = (int)&kdb.kdb_ca.ca_rspdsc[0] >> 16;
91: while ((kr->kdb_sa & KDB_STEP4) == 0)
92: /* void */;
93: kr->kdb_sw = KDB_GO;
94: kdb.kdb_ca.ca_rspdsc[0] = (long)&kdb.kdb_rsp.mscp_cmdref;
95: kdb.kdb_ca.ca_cmddsc[0] = (long)&kdb.kdb_cmd.mscp_cmdref;
96: if (kdbcmd(M_OP_SETCTLRC, io)) {
97: printf("kra: open error, SETCTLRC\n");
98: return (ENXIO);
99: }
100: kdbinit[ctlr] = 1;
101: }
102: lp = &kralabel[ctlr][unit];
103: if (kramedia[ctlr][unit] == 0) {
104: kdb.kdb_cmd.mscp_unit = unit;
105: if (kdbcmd(M_OP_ONLINE, io)) {
106: printf("kra: open error, ONLINE\n");
107: return (ENXIO);
108: }
109: kramedia[ctlr][unit] = kdb.kdb_rsp.mscp_onle.onle_mediaid;
110: tio = *io;
111: tio.i_bn = LABELSECTOR;
112: tio.i_ma = lbuf;
113: tio.i_cc = SECTSIZ;
114: tio.i_flgs |= F_RDDATA;
115: if (krastrategy(&tio, READ) != SECTSIZ)
116: return (ERDLAB);
117: *lp = *(struct disklabel *)(lbuf + LABELOFFSET);
118: if (lp->d_magic != DISKMAGIC || lp->d_magic2 != DISKMAGIC) {
119: #ifdef COMPAT_42
120: printf("kra%d: unlabeled\n", unit);
121: kramaptype(io, lp);
122: #else
123: return (EUNLAB);
124: #endif
125: }
126: }
127: if ((u_int)io->i_part >= lp->d_npartitions ||
128: (io->i_boff = lp->d_partitions[io->i_part].p_offset) == -1)
129: return (EPART);
130: return (0);
131: }
132:
133: kdbcmd(op, io)
134: int op;
135: struct iob *io;
136: {
137: register struct kdb *k = &kdb;
138: register struct mscp *mp;
139: register int i;
140:
141: k->kdb_cmd.mscp_opcode = op;
142: k->kdb_rsp.mscp_msglen = MSCP_MSGLEN;
143: k->kdb_cmd.mscp_msglen = MSCP_MSGLEN;
144: k->kdb_ca.ca_rspdsc[0] |= MSCP_OWN | MSCP_INT;
145: k->kdb_ca.ca_cmddsc[0] |= MSCP_OWN | MSCP_INT;
146: i = ((struct kdb_regs *)kdbaddr[io->i_ctlr])->kdb_ip;
147: #ifdef lint
148: i = i;
149: #endif
150: mp = &k->kdb_rsp;
151: for (;;) {
152: if (k->kdb_ca.ca_cmdint)
153: k->kdb_ca.ca_cmdint = 0;
154: if (k->kdb_ca.ca_rspint == 0)
155: continue;
156: k->kdb_ca.ca_rspint = 0;
157: if (mp->mscp_opcode == (op | M_OP_END))
158: break;
159: printf("unexpected rsp type %x op %x ignored\n",
160: MSCP_MSGTYPE(mp->mscp_msgtc), mp->mscp_opcode);
161: k->kdb_ca.ca_rspdsc[0] |= MSCP_OWN | MSCP_INT;
162: }
163: if ((mp->mscp_status & M_ST_MASK) != M_ST_SUCCESS)
164: return (-1);
165: return (0);
166: }
167:
168: krastrategy(io, func)
169: register struct iob *io;
170: int func;
171: {
172: register struct mscp *mp;
173:
174: mp = &kdb.kdb_cmd;
175: mp->mscp_unit = io->i_unit;
176: mp->mscp_seq.seq_lbn = io->i_bn;
177: mp->mscp_seq.seq_bytecount = io->i_cc;
178: mp->mscp_seq.seq_buffer = (long)io->i_ma | KDB_PHYS;
179: if (kdbcmd(func == READ ? M_OP_READ : M_OP_WRITE, io)) {
180: printf("kra: I/O error\n");
181: return (-1);
182: }
183: return (io->i_cc);
184: }
185:
186: #ifdef COMPAT_42
187: u_long kra60_off[] = { 0, 15884, 0, 49324, 131404, 49324, 242606, 49324 };
188: #define kra70_off kra60_off
189: u_long kra80_off[] = { 0, 15884, 0, -1, 49324, 49324, 49910, 131404 };
190: u_long kra81_off[] = { 0, 15884, 0, 131404, 49324, 498790, 563050, 131404 };
191: u_long kra82_off[] = { 0, 15884, 0, 375345, 391590, 699390, 375345, 83790 };
192:
193: struct mediamap {
194: u_long id; /* media ID */
195: u_long *off; /* offsets */
196: } kra_map[] = {
197: { MSCP_MKDRIVE2('R', 'A', 60), kra60_off },
198: { MSCP_MKDRIVE2('R', 'A', 70), kra70_off },
199: { MSCP_MKDRIVE2('R', 'A', 80), kra80_off },
200: { MSCP_MKDRIVE2('R', 'A', 81), kra81_off },
201: { MSCP_MKDRIVE2('R', 'A', 82), kra82_off },
202: 0
203: };
204:
205: kramaptype(io, lp)
206: register struct iob *io;
207: register struct disklabel *lp;
208: {
209: register struct partition *pp;
210: register u_long i;
211: register struct mediamap *map;
212:
213: i = MSCP_MEDIA_DRIVE(kramedia[io->i_ctlr][io->i_unit]);
214: for (map = kra_map; map->id != 0; map++) {
215: if (map->id == i) {
216: lp->d_npartitions = 8;
217: for (pp = lp->d_partitions, i = 0; i < 8; pp++, i++)
218: pp->p_offset = map->off[i];
219: return;
220: }
221: }
222: printf("kra%d: media type 0x%x unsupported\n", io->i_unit, i);
223: lp->d_npartitions = 0;
224: }
225: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.