scsi.c revision 1.2.2.2 1 1.2.2.2 yamt /* $NetBSD: scsi.c,v 1.2.2.2 2013/01/23 00:05:54 yamt Exp $ */
2 1.2.2.2 yamt
3 1.2.2.2 yamt /*
4 1.2.2.2 yamt * Copyright (c) 1992 OMRON Corporation.
5 1.2.2.2 yamt *
6 1.2.2.2 yamt * This code is derived from software contributed to Berkeley by
7 1.2.2.2 yamt * OMRON Corporation.
8 1.2.2.2 yamt *
9 1.2.2.2 yamt * Redistribution and use in source and binary forms, with or without
10 1.2.2.2 yamt * modification, are permitted provided that the following conditions
11 1.2.2.2 yamt * are met:
12 1.2.2.2 yamt * 1. Redistributions of source code must retain the above copyright
13 1.2.2.2 yamt * notice, this list of conditions and the following disclaimer.
14 1.2.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
15 1.2.2.2 yamt * notice, this list of conditions and the following disclaimer in the
16 1.2.2.2 yamt * documentation and/or other materials provided with the distribution.
17 1.2.2.2 yamt * 3. All advertising materials mentioning features or use of this software
18 1.2.2.2 yamt * must display the following acknowledgement:
19 1.2.2.2 yamt * This product includes software developed by the University of
20 1.2.2.2 yamt * California, Berkeley and its contributors.
21 1.2.2.2 yamt * 4. Neither the name of the University nor the names of its contributors
22 1.2.2.2 yamt * may be used to endorse or promote products derived from this software
23 1.2.2.2 yamt * without specific prior written permission.
24 1.2.2.2 yamt *
25 1.2.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 1.2.2.2 yamt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 1.2.2.2 yamt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 1.2.2.2 yamt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 1.2.2.2 yamt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 1.2.2.2 yamt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 1.2.2.2 yamt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 1.2.2.2 yamt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 1.2.2.2 yamt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 1.2.2.2 yamt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 1.2.2.2 yamt * SUCH DAMAGE.
36 1.2.2.2 yamt *
37 1.2.2.2 yamt * @(#)scsi.c 8.1 (Berkeley) 6/10/93
38 1.2.2.2 yamt */
39 1.2.2.2 yamt /*
40 1.2.2.2 yamt * Copyright (c) 1992, 1993
41 1.2.2.2 yamt * The Regents of the University of California. All rights reserved.
42 1.2.2.2 yamt *
43 1.2.2.2 yamt * This code is derived from software contributed to Berkeley by
44 1.2.2.2 yamt * OMRON Corporation.
45 1.2.2.2 yamt *
46 1.2.2.2 yamt * Redistribution and use in source and binary forms, with or without
47 1.2.2.2 yamt * modification, are permitted provided that the following conditions
48 1.2.2.2 yamt * are met:
49 1.2.2.2 yamt * 1. Redistributions of source code must retain the above copyright
50 1.2.2.2 yamt * notice, this list of conditions and the following disclaimer.
51 1.2.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
52 1.2.2.2 yamt * notice, this list of conditions and the following disclaimer in the
53 1.2.2.2 yamt * documentation and/or other materials provided with the distribution.
54 1.2.2.2 yamt * 3. Neither the name of the University nor the names of its contributors
55 1.2.2.2 yamt * may be used to endorse or promote products derived from this software
56 1.2.2.2 yamt * without specific prior written permission.
57 1.2.2.2 yamt *
58 1.2.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59 1.2.2.2 yamt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60 1.2.2.2 yamt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61 1.2.2.2 yamt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62 1.2.2.2 yamt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63 1.2.2.2 yamt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64 1.2.2.2 yamt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65 1.2.2.2 yamt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66 1.2.2.2 yamt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67 1.2.2.2 yamt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68 1.2.2.2 yamt * SUCH DAMAGE.
69 1.2.2.2 yamt *
70 1.2.2.2 yamt * @(#)scsi.c 8.1 (Berkeley) 6/10/93
71 1.2.2.2 yamt */
72 1.2.2.2 yamt
73 1.2.2.2 yamt /*
74 1.2.2.2 yamt * scsi.c -- front end of SCSI test commands
75 1.2.2.2 yamt * by A.Fujita, FEB-09-1992
76 1.2.2.2 yamt */
77 1.2.2.2 yamt
78 1.2.2.2 yamt #include <sys/param.h>
79 1.2.2.2 yamt #include <lib/libkern/libkern.h>
80 1.2.2.2 yamt #include <luna68k/stand/boot/samachdep.h>
81 1.2.2.2 yamt #include <luna68k/stand/boot/scsireg.h>
82 1.2.2.2 yamt #include <luna68k/stand/boot/status.h>
83 1.2.2.2 yamt
84 1.2.2.2 yamt
85 1.2.2.2 yamt int scsi_device = 6;
86 1.2.2.2 yamt
87 1.2.2.2 yamt #define SENSBUFF 8 /* 6/10/93P%$%98.1i%$%P$G%;%s%9%G!<%? */
88 1.2.2.2 yamt /* $ND9$5$r#8/usr/src/sys/luna68k/stand/SCCS/s.scsi.c$%H0JFb$K8GDj$7$F */
89 1.2.2.2 yamt u_char sensbuff[SENSBUFF]; /* #80J>e$OL50UL#$G$"$k!# */
90 1.2.2.2 yamt
91 1.2.2.2 yamt static struct scsi_inquiry inquirybuf;
92 1.2.2.2 yamt static struct scsi_fmt_cdb inquiry = {
93 1.2.2.2 yamt 6,
94 1.2.2.2 yamt { CMD_INQUIRY, 0, 0, 0, sizeof(inquirybuf), 0 }
95 1.2.2.2 yamt };
96 1.2.2.2 yamt
97 1.2.2.2 yamt static u_long capacitybuf[2];
98 1.2.2.2 yamt struct scsi_fmt_cdb capacity = {
99 1.2.2.2 yamt 10,
100 1.2.2.2 yamt { CMD_READ_CAPACITY, 0, 0, 0, 0, 0, 0, 0, 0, 0 }
101 1.2.2.2 yamt };
102 1.2.2.2 yamt
103 1.2.2.2 yamt
104 1.2.2.2 yamt int
105 1.2.2.2 yamt scsi(int argc, char *argv[])
106 1.2.2.2 yamt {
107 1.2.2.2 yamt char *p;
108 1.2.2.2 yamt int i, status;
109 1.2.2.2 yamt
110 1.2.2.2 yamt if (argc < 2) {
111 1.2.2.2 yamt printf("This command is required subcommand !!\n");
112 1.2.2.2 yamt return(ST_ERROR);
113 1.2.2.2 yamt }
114 1.2.2.2 yamt
115 1.2.2.2 yamt if (!strcmp(argv[1], "device")) {
116 1.2.2.2 yamt if (argc > 2) {
117 1.2.2.2 yamt i = 0;
118 1.2.2.2 yamt for (p = argv[2]; *p != '\0' ; p++) {
119 1.2.2.2 yamt i = i * 10 + *p - '0';
120 1.2.2.2 yamt }
121 1.2.2.2 yamt if ( i < 8 && i >= 0) {
122 1.2.2.2 yamt scsi_device = i;
123 1.2.2.2 yamt }
124 1.2.2.2 yamt }
125 1.2.2.2 yamt printf("Current Device ID: %d\n", scsi_device);
126 1.2.2.2 yamt } else if (!strcmp(argv[1], "test_unit_rdy")) {
127 1.2.2.2 yamt /* CTLR SLAVE LUN */
128 1.2.2.2 yamt scsi_test_unit_rdy( 0, scsi_device, 0);
129 1.2.2.2 yamt } else if (!strcmp(argv[1], "request_sense")) {
130 1.2.2.2 yamt /* CTLR SLAVE LUN */
131 1.2.2.2 yamt scsi_request_sense( 0, scsi_device, 0, sensbuff, SENSBUFF);
132 1.2.2.2 yamt } else if (!strcmp(argv[1], "inquiry")) {
133 1.2.2.2 yamt if (scsi_immed_command( 0, scsi_device, 0, &inquiry,
134 1.2.2.2 yamt (u_char *) &inquirybuf, sizeof(inquirybuf)) == 0) {
135 1.2.2.2 yamt printf("Type:\t0x%x\n", inquirybuf.type);
136 1.2.2.2 yamt printf("Qualifier:\t0x%x\n", inquirybuf.qual);
137 1.2.2.2 yamt printf("Version:\t0x%x\n", inquirybuf.version);
138 1.2.2.2 yamt printf("RDF:\t0x%x\n", inquirybuf.rsvd);
139 1.2.2.2 yamt
140 1.2.2.2 yamt printf("Vender ID:\t");
141 1.2.2.2 yamt for (i = 0; i < 8; i++)
142 1.2.2.2 yamt printf("%c", inquirybuf.vendor_id[i]);
143 1.2.2.2 yamt printf("\n");
144 1.2.2.2 yamt
145 1.2.2.2 yamt printf("Product ID:\t");
146 1.2.2.2 yamt for (i = 0; i < 16; i++)
147 1.2.2.2 yamt printf("%c", inquirybuf.product_id[i]);
148 1.2.2.2 yamt printf("\n");
149 1.2.2.2 yamt
150 1.2.2.2 yamt printf("Revision:\t");
151 1.2.2.2 yamt for (i = 0; i < 4; i++)
152 1.2.2.2 yamt printf("%c", inquirybuf.rev[i]);
153 1.2.2.2 yamt printf("\n");
154 1.2.2.2 yamt }
155 1.2.2.2 yamt } else if (!strcmp(argv[1], "read_capacity")) {
156 1.2.2.2 yamt if (scsi_immed_command( 0, scsi_device, 0, &capacity,
157 1.2.2.2 yamt (u_char *) &capacitybuf, sizeof(capacitybuf)) == 0) {
158 1.2.2.2 yamt printf("Logical Block Address:\t%ld (0x%lx)\n",
159 1.2.2.2 yamt capacitybuf[0], capacitybuf[0]);
160 1.2.2.2 yamt printf("Block Length:\t\t%ld (0x%lx)\n",
161 1.2.2.2 yamt capacitybuf[1], capacitybuf[1]);
162 1.2.2.2 yamt }
163 1.2.2.2 yamt } else if (!strcmp(argv[1], "trace")) {
164 1.2.2.2 yamt for (i = 0; i < 7; i++) {
165 1.2.2.2 yamt printf("SCSI ID %d .... ", i);
166 1.2.2.2 yamt status = scsi_test_unit_rdy( 0, i, 0);
167 1.2.2.2 yamt if (status >= 0)
168 1.2.2.2 yamt printf("found.\n");
169 1.2.2.2 yamt else
170 1.2.2.2 yamt printf("no.\n");
171 1.2.2.2 yamt }
172 1.2.2.2 yamt } else if (!strcmp(argv[1], "format_unit")) {
173 1.2.2.2 yamt i = 0;
174 1.2.2.2 yamt while (i == 0) {
175 1.2.2.2 yamt printf("Do you really want to format SCSI %d device ? [y/n]: ",
176 1.2.2.2 yamt scsi_device);
177 1.2.2.2 yamt i = getchar();
178 1.2.2.2 yamt printf("\n");
179 1.2.2.2 yamt if ((i != 'y') && (i != 'Y') && (i != 'n') && (i != 'N'))
180 1.2.2.2 yamt i = 0;
181 1.2.2.2 yamt }
182 1.2.2.2 yamt
183 1.2.2.2 yamt if ((i == 'y') || (i == 'Y'))
184 1.2.2.2 yamt status = scsi_format_unit( 0, scsi_device, 0);
185 1.2.2.2 yamt }
186 1.2.2.2 yamt
187 1.2.2.2 yamt return(ST_NORMAL);
188 1.2.2.2 yamt }
189 1.2.2.2 yamt
190 1.2.2.2 yamt static struct scsi_fmt_cdb scsi_cdb = {
191 1.2.2.2 yamt 10,
192 1.2.2.2 yamt { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }
193 1.2.2.2 yamt };
194 1.2.2.2 yamt
195 1.2.2.2 yamt int
196 1.2.2.2 yamt scsi_read_raw(u_int target, u_int blk, u_int nblk, u_char *buff, u_int len)
197 1.2.2.2 yamt {
198 1.2.2.2 yamt struct scsi_fmt_cdb *cdb = &scsi_cdb;
199 1.2.2.2 yamt
200 1.2.2.2 yamt cdb->cdb[0] = CMD_READ_EXT;
201 1.2.2.2 yamt
202 1.2.2.2 yamt cdb->cdb[2] = (blk & 0xff000000) >> 24;
203 1.2.2.2 yamt cdb->cdb[3] = (blk & 0x00ff0000) >> 16;
204 1.2.2.2 yamt cdb->cdb[4] = (blk & 0x0000ff00) >> 8;
205 1.2.2.2 yamt cdb->cdb[5] = (blk & 0x000000ff);
206 1.2.2.2 yamt
207 1.2.2.2 yamt cdb->cdb[7] = (nblk & 0xff00) >> 8;
208 1.2.2.2 yamt cdb->cdb[8] = (nblk & 0x00ff);
209 1.2.2.2 yamt
210 1.2.2.2 yamt if (scsi_immed_command(0, target, 0, cdb, buff, len) == 0)
211 1.2.2.2 yamt return(1);
212 1.2.2.2 yamt else
213 1.2.2.2 yamt return(0);
214 1.2.2.2 yamt }
215 1.2.2.2 yamt
216 1.2.2.2 yamt int
217 1.2.2.2 yamt scsi_read(u_int blk, u_char *buff, u_int len)
218 1.2.2.2 yamt {
219 1.2.2.2 yamt u_int nblk = len >> DEV_BSHIFT;
220 1.2.2.2 yamt
221 1.2.2.2 yamt return(scsi_read_raw(scsi_device, blk, nblk, buff, len));
222 1.2.2.2 yamt }
223 1.2.2.2 yamt
224 1.2.2.2 yamt int
225 1.2.2.2 yamt scsi_write(u_int blk, u_char *buff, u_int len)
226 1.2.2.2 yamt {
227 1.2.2.2 yamt struct scsi_fmt_cdb *cdb = &scsi_cdb;
228 1.2.2.2 yamt
229 1.2.2.2 yamt cdb->cdb[0] = CMD_WRITE_EXT;
230 1.2.2.2 yamt
231 1.2.2.2 yamt cdb->cdb[2] = (blk & 0xff000000) >> 24;
232 1.2.2.2 yamt cdb->cdb[3] = (blk & 0x00ff0000) >> 16;
233 1.2.2.2 yamt cdb->cdb[4] = (blk & 0x0000ff00) >> 8;
234 1.2.2.2 yamt cdb->cdb[5] = (blk & 0x000000ff);
235 1.2.2.2 yamt
236 1.2.2.2 yamt cdb->cdb[7] = ((len >> DEV_BSHIFT) & 0xff00) >> 8;
237 1.2.2.2 yamt cdb->cdb[8] = ((len >> DEV_BSHIFT) & 0x00ff);
238 1.2.2.2 yamt
239 1.2.2.2 yamt if (scsi_immed_command(0, scsi_device, 0, cdb, buff, len) == 0)
240 1.2.2.2 yamt return(1);
241 1.2.2.2 yamt else
242 1.2.2.2 yamt return(0);
243 1.2.2.2 yamt }
244