xref: /netbsd-src/sys/arch/prep/stand/boot/sd.c (revision 31cd48900c3cb925d2b72c49d8877402a47572ac)
1*31cd4890Srin /*	$NetBSD: sd.c,v 1.6 2024/07/02 05:34:08 rin Exp $	*/
2158f609aSkiyohara /*
3158f609aSkiyohara  * Copyright (c) 2010 KIYOHARA Takashi
4158f609aSkiyohara  * All rights reserved.
5158f609aSkiyohara  *
6158f609aSkiyohara  * Redistribution and use in source and binary forms, with or without
7158f609aSkiyohara  * modification, are permitted provided that the following conditions
8158f609aSkiyohara  * are met:
9158f609aSkiyohara  * 1. Redistributions of source code must retain the above copyright
10158f609aSkiyohara  *    notice, this list of conditions and the following disclaimer.
11158f609aSkiyohara  * 2. Redistributions in binary form must reproduce the above copyright
12158f609aSkiyohara  *    notice, this list of conditions and the following disclaimer in the
13158f609aSkiyohara  *    documentation and/or other materials provided with the distribution.
14158f609aSkiyohara  *
15158f609aSkiyohara  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16158f609aSkiyohara  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
17158f609aSkiyohara  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
18158f609aSkiyohara  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
19158f609aSkiyohara  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
20158f609aSkiyohara  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
21158f609aSkiyohara  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22158f609aSkiyohara  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
23158f609aSkiyohara  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
24158f609aSkiyohara  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25158f609aSkiyohara  * POSSIBILITY OF SUCH DAMAGE.
26158f609aSkiyohara  */
27158f609aSkiyohara 
28158f609aSkiyohara #include <sys/param.h>
29158f609aSkiyohara #include <sys/types.h>
30158f609aSkiyohara #include <sys/stdint.h>
31158f609aSkiyohara 
32158f609aSkiyohara #include <lib/libsa/stand.h>
33158f609aSkiyohara #include <lib/libkern/libkern.h>
34158f609aSkiyohara 
35158f609aSkiyohara #include "boot.h"
36158f609aSkiyohara #include "sdvar.h"
37158f609aSkiyohara 
38158f609aSkiyohara #ifdef DEBUG
39158f609aSkiyohara #define DPRINTF(x)	printf x
40158f609aSkiyohara #else
41158f609aSkiyohara #define DPRINTF(x)
42158f609aSkiyohara #endif
43158f609aSkiyohara 
44158f609aSkiyohara #define SD_DEFAULT_BLKSIZE	512
45158f609aSkiyohara 
46158f609aSkiyohara 
47158f609aSkiyohara struct sd_mode_sense_data {
48158f609aSkiyohara 	struct scsi_mode_parameter_header_6 header;
49158f609aSkiyohara 	struct scsi_general_block_descriptor blk_desc;
50158f609aSkiyohara 	union scsi_disk_pages pages;
51158f609aSkiyohara };
52158f609aSkiyohara 
53158f609aSkiyohara static int sd_validate_blksize(int);
54158f609aSkiyohara static uint64_t sd_read_capacity(struct sd_softc *, int *);
55158f609aSkiyohara static int sd_get_simplifiedparms(struct sd_softc *);
56158f609aSkiyohara static int sd_get_capacity(struct sd_softc *);
57158f609aSkiyohara static int sd_get_parms_page4(struct sd_softc *, struct disk_parms *);
58158f609aSkiyohara static int sd_get_parms_page5(struct sd_softc *, struct disk_parms *);
59158f609aSkiyohara static int sd_get_parms(struct sd_softc *);
60158f609aSkiyohara static void sdgetdefaultlabel(struct sd_softc *, struct disklabel *);
61158f609aSkiyohara static int sdgetdisklabel(struct sd_softc *);
62158f609aSkiyohara 
63158f609aSkiyohara int sdopen(struct open_file *, ...);
64158f609aSkiyohara int sdclose(struct open_file *);
65158f609aSkiyohara int sdstrategy(void *, int, daddr_t, size_t, void *, size_t *);
66158f609aSkiyohara 
67158f609aSkiyohara 
68158f609aSkiyohara static int
sd_validate_blksize(int len)69158f609aSkiyohara sd_validate_blksize(int len)
70158f609aSkiyohara {
71158f609aSkiyohara 
72158f609aSkiyohara 	switch (len) {
73158f609aSkiyohara 	case 256:
74158f609aSkiyohara 	case 512:
75158f609aSkiyohara 	case 1024:
76158f609aSkiyohara 	case 2048:
77158f609aSkiyohara 	case 4096:
78158f609aSkiyohara 		return 1;
79158f609aSkiyohara 	}
80158f609aSkiyohara 	return 0;
81158f609aSkiyohara }
82158f609aSkiyohara 
83158f609aSkiyohara /*
84158f609aSkiyohara  * sd_read_capacity:
85158f609aSkiyohara  *
86158f609aSkiyohara  *	Find out from the device what its capacity is.
87158f609aSkiyohara  */
88158f609aSkiyohara static uint64_t
sd_read_capacity(struct sd_softc * sd,int * blksize)89158f609aSkiyohara sd_read_capacity(struct sd_softc *sd, int *blksize)
90158f609aSkiyohara {
91158f609aSkiyohara 	union {
92158f609aSkiyohara 		struct scsipi_read_capacity_10 cmd;
93158f609aSkiyohara 		struct scsipi_read_capacity_16 cmd16;
94158f609aSkiyohara 	} cmd;
95158f609aSkiyohara 	union {
96158f609aSkiyohara 		struct scsipi_read_capacity_10_data data;
97158f609aSkiyohara 		struct scsipi_read_capacity_16_data data16;
98158f609aSkiyohara 	} data;
99158f609aSkiyohara 	uint64_t rv;
100158f609aSkiyohara 
101158f609aSkiyohara 	memset(&cmd, 0, sizeof(cmd));
102158f609aSkiyohara 	cmd.cmd.opcode = READ_CAPACITY_10;
103158f609aSkiyohara 
104158f609aSkiyohara 	/*
105158f609aSkiyohara 	 * If the command works, interpret the result as a 4 byte
106158f609aSkiyohara 	 * number of blocks
107158f609aSkiyohara 	 */
108158f609aSkiyohara 	rv = 0;
109158f609aSkiyohara 	memset(&data, 0, sizeof(data.data));
110158f609aSkiyohara 	if (scsi_command(sd, (void *)&cmd.cmd, sizeof(cmd.cmd),
111158f609aSkiyohara 	    (void *)&data, sizeof(data.data)) != 0)
112158f609aSkiyohara 		goto out;
113158f609aSkiyohara 
114158f609aSkiyohara 	if (_4btol(data.data.addr) != 0xffffffff) {
115158f609aSkiyohara 		*blksize = _4btol(data.data.length);
116158f609aSkiyohara 		rv = _4btol(data.data.addr) + 1;
117158f609aSkiyohara 		goto out;
118158f609aSkiyohara 	}
119158f609aSkiyohara 
120158f609aSkiyohara 	/*
121158f609aSkiyohara 	 * Device is larger than can be reflected by READ CAPACITY (10).
122158f609aSkiyohara 	 * Try READ CAPACITY (16).
123158f609aSkiyohara 	 */
124158f609aSkiyohara 
125158f609aSkiyohara 	memset(&cmd, 0, sizeof(cmd));
126158f609aSkiyohara 	cmd.cmd16.opcode = READ_CAPACITY_16;
127158f609aSkiyohara 	cmd.cmd16.byte2 = SRC16_SERVICE_ACTION;
128158f609aSkiyohara 	_lto4b(sizeof(data.data16), cmd.cmd16.len);
129158f609aSkiyohara 
130158f609aSkiyohara 	memset(&data, 0, sizeof(data.data16));
131158f609aSkiyohara 	if (scsi_command(sd, (void *)&cmd.cmd16, sizeof(cmd.cmd16),
132158f609aSkiyohara 	    (void *)&data, sizeof(data.data16)) != 0)
133158f609aSkiyohara 		goto out;
134158f609aSkiyohara 
135158f609aSkiyohara 	*blksize = _4btol(data.data16.length);
136158f609aSkiyohara 	rv = _8btol(data.data16.addr) + 1;
137158f609aSkiyohara 
138158f609aSkiyohara  out:
139158f609aSkiyohara 	return rv;
140158f609aSkiyohara }
141158f609aSkiyohara 
142158f609aSkiyohara static int
sd_get_simplifiedparms(struct sd_softc * sd)143158f609aSkiyohara sd_get_simplifiedparms(struct sd_softc *sd)
144158f609aSkiyohara {
145158f609aSkiyohara 	struct {
146158f609aSkiyohara 		struct scsi_mode_parameter_header_6 header;
147158f609aSkiyohara 		/* no block descriptor */
148158f609aSkiyohara 		uint8_t pg_code; /* page code (should be 6) */
149158f609aSkiyohara 		uint8_t pg_length; /* page length (should be 11) */
150158f609aSkiyohara 		uint8_t wcd; /* bit0: cache disable */
151158f609aSkiyohara 		uint8_t lbs[2]; /* logical block size */
152158f609aSkiyohara 		uint8_t size[5]; /* number of log. blocks */
153158f609aSkiyohara 		uint8_t pp; /* power/performance */
154158f609aSkiyohara 		uint8_t flags;
155158f609aSkiyohara 		uint8_t resvd;
156158f609aSkiyohara 	} scsipi_sense;
157158f609aSkiyohara 	struct disk_parms *dp = &sd->sc_params;
158158f609aSkiyohara 	uint64_t blocks;
159158f609aSkiyohara 	int error, blksize;
160158f609aSkiyohara 
161158f609aSkiyohara 	/*
162158f609aSkiyohara 	 * sd_read_capacity (ie "read capacity") and mode sense page 6
163158f609aSkiyohara 	 * give the same information. Do both for now, and check
164158f609aSkiyohara 	 * for consistency.
165158f609aSkiyohara 	 * XXX probably differs for removable media
166158f609aSkiyohara 	 */
167158f609aSkiyohara 	dp->blksize = SD_DEFAULT_BLKSIZE;
168158f609aSkiyohara 	if ((blocks = sd_read_capacity(sd, &blksize)) == 0)
169158f609aSkiyohara 		return SDGP_RESULT_OFFLINE;		/* XXX? */
170158f609aSkiyohara 
171158f609aSkiyohara 	error = scsi_mode_sense(sd, SMS_DBD, 6,
172158f609aSkiyohara 	    &scsipi_sense.header, sizeof(scsipi_sense));
173158f609aSkiyohara 
174158f609aSkiyohara 	if (error != 0)
175158f609aSkiyohara 		return SDGP_RESULT_OFFLINE;		/* XXX? */
176158f609aSkiyohara 
177158f609aSkiyohara 	dp->blksize = blksize;
178158f609aSkiyohara 	if (!sd_validate_blksize(dp->blksize))
179158f609aSkiyohara 		dp->blksize = _2btol(scsipi_sense.lbs);
180158f609aSkiyohara 	if (!sd_validate_blksize(dp->blksize))
181158f609aSkiyohara 		dp->blksize = SD_DEFAULT_BLKSIZE;
182158f609aSkiyohara 
183158f609aSkiyohara 	/*
184158f609aSkiyohara 	 * Create a pseudo-geometry.
185158f609aSkiyohara 	 */
186158f609aSkiyohara 	dp->heads = 64;
187158f609aSkiyohara 	dp->sectors = 32;
188158f609aSkiyohara 	dp->cyls = blocks / (dp->heads * dp->sectors);
189158f609aSkiyohara 	dp->disksize = _5btol(scsipi_sense.size);
190158f609aSkiyohara 	if (dp->disksize <= UINT32_MAX && dp->disksize != blocks) {
191158f609aSkiyohara 		printf("RBC size: mode sense=%llu, get cap=%llu\n",
192158f609aSkiyohara 		       (unsigned long long)dp->disksize,
193158f609aSkiyohara 		       (unsigned long long)blocks);
194158f609aSkiyohara 		dp->disksize = blocks;
195158f609aSkiyohara 	}
196158f609aSkiyohara 	dp->disksize512 = (dp->disksize * dp->blksize) / DEV_BSIZE;
197158f609aSkiyohara 
198158f609aSkiyohara 	return SDGP_RESULT_OK;
199158f609aSkiyohara }
200158f609aSkiyohara 
201158f609aSkiyohara /*
202158f609aSkiyohara  * Get the scsi driver to send a full inquiry to the * device and use the
203158f609aSkiyohara  * results to fill out the disk parameter structure.
204158f609aSkiyohara  */
205158f609aSkiyohara static int
sd_get_capacity(struct sd_softc * sd)206158f609aSkiyohara sd_get_capacity(struct sd_softc *sd)
207158f609aSkiyohara {
208158f609aSkiyohara 	struct disk_parms *dp = &sd->sc_params;
209158f609aSkiyohara 	uint64_t blocks;
210158f609aSkiyohara 	int error, blksize;
211158f609aSkiyohara 
212158f609aSkiyohara 	dp->disksize = blocks = sd_read_capacity(sd, &blksize);
213158f609aSkiyohara 	if (blocks == 0) {
214158f609aSkiyohara 		struct scsipi_read_format_capacities cmd;
215158f609aSkiyohara 		struct {
216158f609aSkiyohara 			struct scsipi_capacity_list_header header;
217158f609aSkiyohara 			struct scsipi_capacity_descriptor desc;
218158f609aSkiyohara 		} __packed data;
219158f609aSkiyohara 
220158f609aSkiyohara 		memset(&cmd, 0, sizeof(cmd));
221158f609aSkiyohara 		memset(&data, 0, sizeof(data));
222158f609aSkiyohara 		cmd.opcode = READ_FORMAT_CAPACITIES;
223158f609aSkiyohara 		_lto2b(sizeof(data), cmd.length);
224158f609aSkiyohara 
225158f609aSkiyohara 		error = scsi_command(sd,
226158f609aSkiyohara 		    (void *)&cmd, sizeof(cmd), (void *)&data, sizeof(data));
227158f609aSkiyohara 		if (error == EFTYPE)
228158f609aSkiyohara 			/* Medium Format Corrupted, handle as not formatted */
229158f609aSkiyohara 			return SDGP_RESULT_UNFORMATTED;
230158f609aSkiyohara 		if (error || data.header.length == 0)
231158f609aSkiyohara 			return SDGP_RESULT_OFFLINE;
232158f609aSkiyohara 
233158f609aSkiyohara 		switch (data.desc.byte5 & SCSIPI_CAP_DESC_CODE_MASK) {
234158f609aSkiyohara 		case SCSIPI_CAP_DESC_CODE_RESERVED:
235158f609aSkiyohara 		case SCSIPI_CAP_DESC_CODE_FORMATTED:
236158f609aSkiyohara 			break;
237158f609aSkiyohara 
238158f609aSkiyohara 		case SCSIPI_CAP_DESC_CODE_UNFORMATTED:
239158f609aSkiyohara 			return SDGP_RESULT_UNFORMATTED;
240158f609aSkiyohara 
241158f609aSkiyohara 		case SCSIPI_CAP_DESC_CODE_NONE:
242158f609aSkiyohara 			return SDGP_RESULT_OFFLINE;
243158f609aSkiyohara 		}
244158f609aSkiyohara 
245158f609aSkiyohara 		dp->disksize = blocks = _4btol(data.desc.nblks);
246158f609aSkiyohara 		if (blocks == 0)
247158f609aSkiyohara 			return SDGP_RESULT_OFFLINE;		/* XXX? */
248158f609aSkiyohara 
249158f609aSkiyohara 		blksize = _3btol(data.desc.blklen);
250158f609aSkiyohara 
251158f609aSkiyohara 	} else if (!sd_validate_blksize(blksize)) {
252158f609aSkiyohara 		struct sd_mode_sense_data scsipi_sense;
253158f609aSkiyohara 		int bsize;
254158f609aSkiyohara 
255158f609aSkiyohara 		memset(&scsipi_sense, 0, sizeof(scsipi_sense));
256158f609aSkiyohara 		error = scsi_mode_sense(sd, 0, 0, &scsipi_sense.header,
257158f609aSkiyohara 		    sizeof(struct scsi_mode_parameter_header_6) +
258158f609aSkiyohara 						sizeof(scsipi_sense.blk_desc));
259158f609aSkiyohara 		if (!error) {
260158f609aSkiyohara 			bsize = scsipi_sense.header.blk_desc_len;
261158f609aSkiyohara 
262158f609aSkiyohara 			if (bsize >= 8)
263158f609aSkiyohara 				blksize = _3btol(scsipi_sense.blk_desc.blklen);
264158f609aSkiyohara 		}
265158f609aSkiyohara 	}
266158f609aSkiyohara 
267158f609aSkiyohara 	if (!sd_validate_blksize(blksize))
268158f609aSkiyohara 		blksize = SD_DEFAULT_BLKSIZE;
269158f609aSkiyohara 
270158f609aSkiyohara 	dp->blksize = blksize;
271158f609aSkiyohara 	dp->disksize512 = (blocks * dp->blksize) / DEV_BSIZE;
272158f609aSkiyohara 	return 0;
273158f609aSkiyohara }
274158f609aSkiyohara 
275158f609aSkiyohara static int
sd_get_parms_page4(struct sd_softc * sd,struct disk_parms * dp)276158f609aSkiyohara sd_get_parms_page4(struct sd_softc *sd, struct disk_parms *dp)
277158f609aSkiyohara {
278158f609aSkiyohara 	struct sd_mode_sense_data scsipi_sense;
279158f609aSkiyohara 	union scsi_disk_pages *pages;
280158f609aSkiyohara 	size_t poffset;
281158f609aSkiyohara 	int byte2, error;
282158f609aSkiyohara 
283158f609aSkiyohara 	byte2 = SMS_DBD;
284158f609aSkiyohara again:
285158f609aSkiyohara 	memset(&scsipi_sense, 0, sizeof(scsipi_sense));
286158f609aSkiyohara 	error = scsi_mode_sense(sd, byte2, 4, &scsipi_sense.header,
287158f609aSkiyohara 	    (byte2 ? 0 : sizeof(scsipi_sense.blk_desc)) +
288158f609aSkiyohara 				sizeof(scsipi_sense.pages.rigid_geometry));
289158f609aSkiyohara 	if (error) {
290158f609aSkiyohara 		if (byte2 == SMS_DBD) {
291158f609aSkiyohara 			/* No result; try once more with DBD off */
292158f609aSkiyohara 			byte2 = 0;
293158f609aSkiyohara 			goto again;
294158f609aSkiyohara 		}
295158f609aSkiyohara 		return error;
296158f609aSkiyohara 	}
297158f609aSkiyohara 
298158f609aSkiyohara 	poffset = sizeof(scsipi_sense.header);
299158f609aSkiyohara 	poffset += scsipi_sense.header.blk_desc_len;
300158f609aSkiyohara 
301158f609aSkiyohara 	if (poffset > sizeof(scsipi_sense) - sizeof(pages->rigid_geometry))
302158f609aSkiyohara 		return ERESTART;
303158f609aSkiyohara 
304158f609aSkiyohara 	pages = (void *)((u_long)&scsipi_sense + poffset);
305158f609aSkiyohara #if 0
306158f609aSkiyohara 	{
307158f609aSkiyohara 		size_t i;
308158f609aSkiyohara 		u_int8_t *p;
309158f609aSkiyohara 
310158f609aSkiyohara 		printf("page 4 sense:");
311158f609aSkiyohara 		for (i = sizeof(scsipi_sense), p = (void *)&scsipi_sense; i;
312158f609aSkiyohara 		    i--, p++)
313158f609aSkiyohara 			printf(" %02x", *p);
314158f609aSkiyohara 		printf("\n");
315158f609aSkiyohara 		printf("page 4 pg_code=%d sense=%p/%p\n",
316158f609aSkiyohara 		    pages->rigid_geometry.pg_code, &scsipi_sense, pages);
317158f609aSkiyohara 	}
318158f609aSkiyohara #endif
319158f609aSkiyohara 
320158f609aSkiyohara 	if ((pages->rigid_geometry.pg_code & PGCODE_MASK) != 4)
321158f609aSkiyohara 		return ERESTART;
322158f609aSkiyohara 
323158f609aSkiyohara 	/*
324158f609aSkiyohara 	 * KLUDGE!! (for zone recorded disks)
325158f609aSkiyohara 	 * give a number of sectors so that sec * trks * cyls
326158f609aSkiyohara 	 * is <= disk_size
327158f609aSkiyohara 	 * can lead to wasted space! THINK ABOUT THIS !
328158f609aSkiyohara 	 */
329158f609aSkiyohara 	dp->heads = pages->rigid_geometry.nheads;
330158f609aSkiyohara 	dp->cyls = _3btol(pages->rigid_geometry.ncyl);
331158f609aSkiyohara 	if (dp->heads == 0 || dp->cyls == 0)
332158f609aSkiyohara 		return ERESTART;
333158f609aSkiyohara 	dp->sectors = dp->disksize / (dp->heads * dp->cyls);	/* XXX */
334158f609aSkiyohara 
335158f609aSkiyohara 	dp->rot_rate = _2btol(pages->rigid_geometry.rpm);
336158f609aSkiyohara 	if (dp->rot_rate == 0)
337158f609aSkiyohara 		dp->rot_rate = 3600;
338158f609aSkiyohara 
339158f609aSkiyohara #if 0
340158f609aSkiyohara printf("page 4 ok\n");
341158f609aSkiyohara #endif
342158f609aSkiyohara 	return 0;
343158f609aSkiyohara }
344158f609aSkiyohara 
345158f609aSkiyohara static int
sd_get_parms_page5(struct sd_softc * sd,struct disk_parms * dp)346158f609aSkiyohara sd_get_parms_page5(struct sd_softc *sd, struct disk_parms *dp)
347158f609aSkiyohara {
348158f609aSkiyohara 	struct sd_mode_sense_data scsipi_sense;
349158f609aSkiyohara 	union scsi_disk_pages *pages;
350158f609aSkiyohara 	size_t poffset;
351158f609aSkiyohara 	int byte2, error;
352158f609aSkiyohara 
353158f609aSkiyohara 	byte2 = SMS_DBD;
354158f609aSkiyohara again:
355158f609aSkiyohara 	memset(&scsipi_sense, 0, sizeof(scsipi_sense));
356158f609aSkiyohara 	error = scsi_mode_sense(sd, 0, 5, &scsipi_sense.header,
357158f609aSkiyohara 	    (byte2 ? 0 : sizeof(scsipi_sense.blk_desc)) +
358158f609aSkiyohara 				sizeof(scsipi_sense.pages.flex_geometry));
359158f609aSkiyohara 	if (error) {
360158f609aSkiyohara 		if (byte2 == SMS_DBD) {
361158f609aSkiyohara 			/* No result; try once more with DBD off */
362158f609aSkiyohara 			byte2 = 0;
363158f609aSkiyohara 			goto again;
364158f609aSkiyohara 		}
365158f609aSkiyohara 		return error;
366158f609aSkiyohara 	}
367158f609aSkiyohara 
368158f609aSkiyohara 	poffset = sizeof(scsipi_sense.header);
369158f609aSkiyohara 	poffset += scsipi_sense.header.blk_desc_len;
370158f609aSkiyohara 
371158f609aSkiyohara 	if (poffset > sizeof(scsipi_sense) - sizeof(pages->flex_geometry))
372158f609aSkiyohara 		return ERESTART;
373158f609aSkiyohara 
374158f609aSkiyohara 	pages = (void *)((u_long)&scsipi_sense + poffset);
375158f609aSkiyohara #if 0
376158f609aSkiyohara 	{
377158f609aSkiyohara 		size_t i;
378158f609aSkiyohara 		u_int8_t *p;
379158f609aSkiyohara 
380158f609aSkiyohara 		printf("page 5 sense:");
381158f609aSkiyohara 		for (i = sizeof(scsipi_sense), p = (void *)&scsipi_sense; i;
382158f609aSkiyohara 		    i--, p++)
383158f609aSkiyohara 			printf(" %02x", *p);
384158f609aSkiyohara 		printf("\n");
385158f609aSkiyohara 		printf("page 5 pg_code=%d sense=%p/%p\n",
386158f609aSkiyohara 		    pages->flex_geometry.pg_code, &scsipi_sense, pages);
387158f609aSkiyohara 	}
388158f609aSkiyohara #endif
389158f609aSkiyohara 
390158f609aSkiyohara 	if ((pages->flex_geometry.pg_code & PGCODE_MASK) != 5)
391158f609aSkiyohara 		return ERESTART;
392158f609aSkiyohara 
393158f609aSkiyohara 	dp->heads = pages->flex_geometry.nheads;
394158f609aSkiyohara 	dp->cyls = _2btol(pages->flex_geometry.ncyl);
395158f609aSkiyohara 	dp->sectors = pages->flex_geometry.ph_sec_tr;
396158f609aSkiyohara 	if (dp->heads == 0 || dp->cyls == 0 || dp->sectors == 0)
397158f609aSkiyohara 		return ERESTART;
398158f609aSkiyohara 
399158f609aSkiyohara 	dp->rot_rate = _2btol(pages->rigid_geometry.rpm);
400158f609aSkiyohara 	if (dp->rot_rate == 0)
401158f609aSkiyohara 		dp->rot_rate = 3600;
402158f609aSkiyohara 
403158f609aSkiyohara #if 0
404158f609aSkiyohara printf("page 5 ok\n");
405158f609aSkiyohara #endif
406158f609aSkiyohara 	return 0;
407158f609aSkiyohara }
408158f609aSkiyohara 
409158f609aSkiyohara static int
sd_get_parms(struct sd_softc * sd)410158f609aSkiyohara sd_get_parms(struct sd_softc *sd)
411158f609aSkiyohara {
412158f609aSkiyohara 	struct disk_parms *dp = &sd->sc_params;
413158f609aSkiyohara 	int error;
414158f609aSkiyohara 
415158f609aSkiyohara 	/*
416158f609aSkiyohara 	 * If offline, the SDEV_MEDIA_LOADED flag will be
417158f609aSkiyohara 	 * cleared by the caller if necessary.
418158f609aSkiyohara 	 */
419158f609aSkiyohara 	if (sd->sc_type == T_SIMPLE_DIRECT) {
420158f609aSkiyohara 		error = sd_get_simplifiedparms(sd);
421158f609aSkiyohara 		if (error)
422158f609aSkiyohara 			return error;
423158f609aSkiyohara 		goto ok;
424158f609aSkiyohara 	}
425158f609aSkiyohara 
426158f609aSkiyohara 	error = sd_get_capacity(sd);
427158f609aSkiyohara 	if (error)
428158f609aSkiyohara 		return error;
429158f609aSkiyohara 
430158f609aSkiyohara 	if (sd->sc_type == T_OPTICAL)
431158f609aSkiyohara 		goto page0;
432158f609aSkiyohara 
433158f609aSkiyohara 	if (sd->sc_flags & FLAGS_REMOVABLE) {
434158f609aSkiyohara 		if (!sd_get_parms_page5(sd, dp) ||
435158f609aSkiyohara 		    !sd_get_parms_page4(sd, dp))
436158f609aSkiyohara 			goto ok;
437158f609aSkiyohara 	} else {
438158f609aSkiyohara 		if (!sd_get_parms_page4(sd, dp) ||
439158f609aSkiyohara 		    !sd_get_parms_page5(sd, dp))
440158f609aSkiyohara 			goto ok;
441158f609aSkiyohara 	}
442158f609aSkiyohara 
443158f609aSkiyohara page0:
444158f609aSkiyohara 	printf("fabricating a geometry\n");
445158f609aSkiyohara 	/* Try calling driver's method for figuring out geometry. */
446158f609aSkiyohara 	/*
447158f609aSkiyohara 	 * Use adaptec standard fictitious geometry
448158f609aSkiyohara 	 * this depends on which controller (e.g. 1542C is
449158f609aSkiyohara 	 * different. but we have to put SOMETHING here..)
450158f609aSkiyohara 	 */
451158f609aSkiyohara 	dp->heads = 64;
452158f609aSkiyohara 	dp->sectors = 32;
453158f609aSkiyohara 	dp->cyls = dp->disksize / (64 * 32);
454158f609aSkiyohara 	dp->rot_rate = 3600;
455158f609aSkiyohara 
456158f609aSkiyohara ok:
457158f609aSkiyohara 	DPRINTF(("disksize = %" PRId64 ", disksize512 = %" PRId64 ".\n",
458158f609aSkiyohara 	    dp->disksize, dp->disksize512));
459158f609aSkiyohara 
460158f609aSkiyohara 	return 0;
461158f609aSkiyohara }
462158f609aSkiyohara 
463158f609aSkiyohara static void
sdgetdefaultlabel(struct sd_softc * sd,struct disklabel * lp)464158f609aSkiyohara sdgetdefaultlabel(struct sd_softc *sd, struct disklabel *lp)
465158f609aSkiyohara {
466158f609aSkiyohara 
467158f609aSkiyohara 	memset(lp, 0, sizeof(struct disklabel));
468158f609aSkiyohara 
469158f609aSkiyohara 	lp->d_secsize = sd->sc_params.blksize;
470158f609aSkiyohara 	lp->d_ntracks = sd->sc_params.heads;
471158f609aSkiyohara 	lp->d_nsectors = sd->sc_params.sectors;
472158f609aSkiyohara 	lp->d_ncylinders = sd->sc_params.cyls;
473158f609aSkiyohara 	lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
474158f609aSkiyohara 
475c182898bSchristos 	lp->d_type = DKTYPE_SCSI;
476158f609aSkiyohara 
477158f609aSkiyohara 	strncpy(lp->d_packname, "fictitious", 16);
478158f609aSkiyohara 	lp->d_secperunit = sd->sc_params.disksize;
479158f609aSkiyohara 	lp->d_rpm = sd->sc_params.rot_rate;
480158f609aSkiyohara 	lp->d_interleave = 1;
481158f609aSkiyohara 	lp->d_flags = (sd->sc_flags & FLAGS_REMOVABLE) ? D_REMOVABLE : 0;
482158f609aSkiyohara 
483158f609aSkiyohara 	lp->d_partitions[RAW_PART].p_offset = 0;
484158f609aSkiyohara 	lp->d_partitions[RAW_PART].p_size = lp->d_secperunit;
485158f609aSkiyohara 	lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
486158f609aSkiyohara 	lp->d_npartitions = RAW_PART + 1;
487158f609aSkiyohara 
488158f609aSkiyohara 	lp->d_magic = DISKMAGIC;
489158f609aSkiyohara 	lp->d_magic2 = DISKMAGIC;
490158f609aSkiyohara 	lp->d_checksum = dkcksum(lp);
491158f609aSkiyohara }
492158f609aSkiyohara 
493158f609aSkiyohara /*
494158f609aSkiyohara  * Load the label information on the named device.
495158f609aSkiyohara  */
496158f609aSkiyohara static int
sdgetdisklabel(struct sd_softc * sd)497158f609aSkiyohara sdgetdisklabel(struct sd_softc *sd)
498158f609aSkiyohara {
499158f609aSkiyohara 	struct mbr_sector *mbr;
500158f609aSkiyohara 	struct mbr_partition *mp;
501158f609aSkiyohara 	struct disklabel *lp = &sd->sc_label;
502158f609aSkiyohara 	size_t rsize;
503158f609aSkiyohara 	int sector, i;
504158f609aSkiyohara 	char *msg;
505158f609aSkiyohara 	uint8_t buf[DEV_BSIZE];
506158f609aSkiyohara 
507158f609aSkiyohara 	sdgetdefaultlabel(sd, lp);
508158f609aSkiyohara 
509158f609aSkiyohara 	if (lp->d_secpercyl == 0) {
510158f609aSkiyohara 		lp->d_secpercyl = 100;
511158f609aSkiyohara 		/* as long as it's not 0 - readdisklabel divides by it (?) */
512158f609aSkiyohara 	}
513158f609aSkiyohara 
514158f609aSkiyohara 	/*
515158f609aSkiyohara 	 * Find NetBSD Partition in DOS partition table.
516158f609aSkiyohara 	 */
517158f609aSkiyohara 	sector = 0;
518158f609aSkiyohara 	if (sdstrategy(sd, F_READ, MBR_BBSECTOR, DEV_BSIZE, buf, &rsize))
519158f609aSkiyohara 		return EOFFSET;
520158f609aSkiyohara 
521158f609aSkiyohara 	mbr = (struct mbr_sector *)buf;
522158f609aSkiyohara 	if (mbr->mbr_magic == htole16(MBR_MAGIC)) {
523158f609aSkiyohara 		/*
524158f609aSkiyohara 		 * Lookup NetBSD slice. If there is none, go ahead
525158f609aSkiyohara 		 * and try to read the disklabel off sector #0.
526158f609aSkiyohara 		 */
527158f609aSkiyohara 		mp = mbr->mbr_parts;
528158f609aSkiyohara 		for (i = 0; i < MBR_PART_COUNT; i++) {
529158f609aSkiyohara 			if (mp[i].mbrp_type == MBR_PTYPE_NETBSD) {
530158f609aSkiyohara 				sector = le32toh(mp[i].mbrp_start);
531158f609aSkiyohara 				break;
532158f609aSkiyohara 			}
533158f609aSkiyohara 		}
534158f609aSkiyohara 	}
535158f609aSkiyohara 
536158f609aSkiyohara 	if (sdstrategy(sd, F_READ, sector + LABELSECTOR, DEV_BSIZE,
537158f609aSkiyohara 	    buf, &rsize))
538158f609aSkiyohara 		return EOFFSET;
539158f609aSkiyohara 
540158f609aSkiyohara 	msg = getdisklabel((const char *)buf + LABELOFFSET, &sd->sc_label);
541158f609aSkiyohara 	if (msg)
542158f609aSkiyohara 		printf("sd(%d,%d,%d,...): getdisklabel: %s\n",
543158f609aSkiyohara 		    sd->sc_bus, sd->sc_target, sd->sc_lun, msg);
544158f609aSkiyohara 
545158f609aSkiyohara 	/* check partition */
546158f609aSkiyohara 	if ((sd->sc_part >= lp->d_npartitions) ||
547158f609aSkiyohara 	    (lp->d_partitions[sd->sc_part].p_fstype == FS_UNUSED)) {
548158f609aSkiyohara 		DPRINTF(("illegal partition\n"));
549158f609aSkiyohara 		return EPART;
550158f609aSkiyohara 	}
551158f609aSkiyohara 
552158f609aSkiyohara 	DPRINTF(("label info: d_secsize %d, d_nsectors %d, d_ncylinders %d,"
553158f609aSkiyohara 	    " d_ntracks %d, d_secpercyl %d\n",
554158f609aSkiyohara 	    sd->sc_label.d_secsize,
555158f609aSkiyohara 	    sd->sc_label.d_nsectors,
556158f609aSkiyohara 	    sd->sc_label.d_ncylinders,
557158f609aSkiyohara 	    sd->sc_label.d_ntracks,
558158f609aSkiyohara 	    sd->sc_label.d_secpercyl));
559158f609aSkiyohara 
560158f609aSkiyohara 	return 0;
561158f609aSkiyohara }
562158f609aSkiyohara 
563158f609aSkiyohara /*
564158f609aSkiyohara  * Open device (read drive parameters and disklabel)
565158f609aSkiyohara  */
566158f609aSkiyohara int
sdopen(struct open_file * f,...)567158f609aSkiyohara sdopen(struct open_file *f, ...)
568158f609aSkiyohara {
569158f609aSkiyohara 	struct sd_softc *sd;
570158f609aSkiyohara 	struct scsi_test_unit_ready cmd;
5714227b1b7Srin 	struct scsipi_inquiry_data buf, *inqbuf = &buf;
572158f609aSkiyohara 	u_int bus, target, lun, part;
573158f609aSkiyohara 	int error;
574158f609aSkiyohara 	va_list ap;
575158f609aSkiyohara 
576158f609aSkiyohara 	va_start(ap, f);
577158f609aSkiyohara 	bus = 0;
578158f609aSkiyohara 	target = va_arg(ap, u_int);
579158f609aSkiyohara 	lun = va_arg(ap, u_int);
580158f609aSkiyohara 	part = va_arg(ap, u_int);
581158f609aSkiyohara 	va_end(ap);
582158f609aSkiyohara 
583158f609aSkiyohara 	DPRINTF(("sdopen: sd(%d,%d,%d)\n", target, lun, part));
584158f609aSkiyohara 
585158f609aSkiyohara 	sd = alloc(sizeof(struct sd_softc));
586158f609aSkiyohara 	if (sd == NULL)
587158f609aSkiyohara 		return ENOMEM;
588158f609aSkiyohara 
589158f609aSkiyohara 	memset(sd, 0, sizeof(struct sd_softc));
590158f609aSkiyohara 
591158f609aSkiyohara 	sd->sc_part = part;
592158f609aSkiyohara 	sd->sc_lun = lun;
593158f609aSkiyohara 	sd->sc_target = target;
594158f609aSkiyohara 	sd->sc_bus = bus;
595158f609aSkiyohara 
596*31cd4890Srin 	memset(&buf, 0, sizeof(buf));
597*31cd4890Srin 	error = scsi_inquire(sd, SCSIPI_INQUIRY_LENGTH_SCSI2, &buf);
5984227b1b7Srin 	if (error != 0)
599158f609aSkiyohara 		return error;
600*31cd4890Srin 	inqbuf = &buf;
601158f609aSkiyohara 
602158f609aSkiyohara 	sd->sc_type = inqbuf->device & SID_TYPE;
603158f609aSkiyohara 
604158f609aSkiyohara 	/*
605158f609aSkiyohara 	 * Determine the operating mode capabilities of the device.
606158f609aSkiyohara 	 */
607158f609aSkiyohara 	if ((inqbuf->version & SID_ANSII) >= 2) {
608158f609aSkiyohara //		if ((inqbuf->flags3 & SID_CmdQue) != 0)
609158f609aSkiyohara //			sd->sc_cap |= PERIPH_CAP_TQING;
610158f609aSkiyohara 		if ((inqbuf->flags3 & SID_Sync) != 0)
611158f609aSkiyohara 			sd->sc_cap |= PERIPH_CAP_SYNC;
612158f609aSkiyohara 
613158f609aSkiyohara 		/* SPC-2 */
614158f609aSkiyohara 		if ((inqbuf->version & SID_ANSII) >= 3) {
615158f609aSkiyohara 			/*
616158f609aSkiyohara 			 * Report ST clocking though CAP_WIDExx/CAP_SYNC.
617158f609aSkiyohara 			 * If the device only supports DT, clear these
618158f609aSkiyohara 			 * flags (DT implies SYNC and WIDE)
619158f609aSkiyohara 			 */
620158f609aSkiyohara 			switch (inqbuf->flags4 & SID_Clocking) {
621158f609aSkiyohara 			case SID_CLOCKING_DT_ONLY:
622158f609aSkiyohara 				sd->sc_cap &= ~PERIPH_CAP_SYNC;
623158f609aSkiyohara 				break;
624158f609aSkiyohara 			}
625158f609aSkiyohara 		}
626158f609aSkiyohara 	}
627158f609aSkiyohara 	sd->sc_flags =
628158f609aSkiyohara 	    (inqbuf->dev_qual2 & SID_REMOVABLE) ? FLAGS_REMOVABLE : 0;
629158f609aSkiyohara 
630158f609aSkiyohara 	memset(&cmd, 0, sizeof(cmd));
631158f609aSkiyohara 	cmd.opcode = SCSI_TEST_UNIT_READY;
632158f609aSkiyohara 	if ((error = scsi_command(sd, (void *)&cmd, sizeof(cmd), NULL, 0)) != 0)
633158f609aSkiyohara 		return error;
634158f609aSkiyohara 
635158f609aSkiyohara 	if (sd->sc_flags & FLAGS_REMOVABLE) {
636158f609aSkiyohara 		printf("XXXXX: removable device found. will not support\n");
637158f609aSkiyohara 	}
638158f609aSkiyohara 	if (!(sd->sc_flags & FLAGS_MEDIA_LOADED))
639158f609aSkiyohara 		sd->sc_flags |= FLAGS_MEDIA_LOADED;
640158f609aSkiyohara 
641158f609aSkiyohara 	if ((error = sd_get_parms(sd)) != 0)
642158f609aSkiyohara 		return error;
643158f609aSkiyohara 
644158f609aSkiyohara 	strncpy(sd->sc_label.d_typename, inqbuf->product, 16);
645158f609aSkiyohara 	if ((error = sdgetdisklabel(sd)) != 0)
646158f609aSkiyohara 		return error;
647158f609aSkiyohara 
648158f609aSkiyohara 	f->f_devdata = sd;
649158f609aSkiyohara 	return 0;
650158f609aSkiyohara }
651158f609aSkiyohara 
652158f609aSkiyohara /*
653158f609aSkiyohara  * Close device.
654158f609aSkiyohara  */
655158f609aSkiyohara int
sdclose(struct open_file * f)656158f609aSkiyohara sdclose(struct open_file *f)
657158f609aSkiyohara {
658158f609aSkiyohara 
659158f609aSkiyohara 	return 0;
660158f609aSkiyohara }
661158f609aSkiyohara 
662158f609aSkiyohara /*
663158f609aSkiyohara  * Read some data.
664158f609aSkiyohara  */
665158f609aSkiyohara int
sdstrategy(void * f,int rw,daddr_t dblk,size_t size,void * p,size_t * rsize)666158f609aSkiyohara sdstrategy(void *f, int rw, daddr_t dblk, size_t size, void *p, size_t *rsize)
667158f609aSkiyohara {
668158f609aSkiyohara 	struct sd_softc *sd;
669158f609aSkiyohara 	struct disklabel *lp;
670158f609aSkiyohara 	struct partition *pp;
671158f609aSkiyohara 	struct scsipi_generic *cmdp;
672158f609aSkiyohara 	struct scsipi_rw_16 cmd16;
673158f609aSkiyohara 	struct scsipi_rw_10 cmd_big;
674158f609aSkiyohara 	struct scsi_rw_6 cmd_small;
675158f609aSkiyohara 	daddr_t blkno;
676158f609aSkiyohara 	int cmdlen, nsect, i;
677158f609aSkiyohara 	uint8_t *buf;
678158f609aSkiyohara 
679158f609aSkiyohara 	if (size == 0)
680158f609aSkiyohara 		return 0;
681158f609aSkiyohara 
682158f609aSkiyohara 	if (rw != F_READ)
683158f609aSkiyohara 		return EOPNOTSUPP;
684158f609aSkiyohara 
685158f609aSkiyohara 	buf = p;
686158f609aSkiyohara 	sd = f;
687158f609aSkiyohara 	lp = &sd->sc_label;
688158f609aSkiyohara 	pp = &lp->d_partitions[sd->sc_part];
689158f609aSkiyohara 
690158f609aSkiyohara 	if (!(sd->sc_flags & FLAGS_MEDIA_LOADED))
691158f609aSkiyohara 		return EIO;
692158f609aSkiyohara 
693158f609aSkiyohara 	nsect = howmany(size, lp->d_secsize);
694158f609aSkiyohara 	blkno = dblk + pp->p_offset;
695158f609aSkiyohara 
696158f609aSkiyohara 	for (i = 0; i < nsect; i++, blkno++) {
697158f609aSkiyohara 		int error;
698158f609aSkiyohara 
699158f609aSkiyohara 		/*
700158f609aSkiyohara 		 * Fill out the scsi command.  Use the smallest CDB possible
701158f609aSkiyohara 		 * (6-byte, 10-byte, or 16-byte).
702158f609aSkiyohara 		 */
703158f609aSkiyohara 		if ((blkno & 0x1fffff) == blkno) {
704158f609aSkiyohara 			/* 6-byte CDB */
705158f609aSkiyohara 			memset(&cmd_small, 0, sizeof(cmd_small));
706158f609aSkiyohara 			cmd_small.opcode = SCSI_READ_6_COMMAND;
707158f609aSkiyohara 			_lto3b(blkno, cmd_small.addr);
708158f609aSkiyohara 			cmd_small.length = 1;
709158f609aSkiyohara 			cmdlen = sizeof(cmd_small);
710158f609aSkiyohara 			cmdp = (struct scsipi_generic *)&cmd_small;
711158f609aSkiyohara 		} else if ((blkno & 0xffffffff) == blkno) {
712158f609aSkiyohara 			/* 10-byte CDB */
713158f609aSkiyohara 			memset(&cmd_big, 0, sizeof(cmd_big));
7146a6a965dSphx 			cmd_big.opcode = READ_10;
715158f609aSkiyohara 			_lto4b(blkno, cmd_big.addr);
716158f609aSkiyohara 			_lto2b(1, cmd_big.length);
717158f609aSkiyohara 			cmdlen = sizeof(cmd_big);
718158f609aSkiyohara 			cmdp = (struct scsipi_generic *)&cmd_big;
719158f609aSkiyohara 		} else {
720158f609aSkiyohara 			/* 16-byte CDB */
721158f609aSkiyohara 			memset(&cmd16, 0, sizeof(cmd16));
7226a6a965dSphx 			cmd16.opcode = READ_16;
723158f609aSkiyohara 			_lto8b(blkno, cmd16.addr);
724158f609aSkiyohara 			_lto4b(1, cmd16.length);
725158f609aSkiyohara 			cmdlen = sizeof(cmd16);
726158f609aSkiyohara 			cmdp = (struct scsipi_generic *)&cmd16;
727158f609aSkiyohara 		}
728158f609aSkiyohara 
729158f609aSkiyohara 		error = scsi_command(sd, cmdp, cmdlen, buf, lp->d_secsize);
730158f609aSkiyohara 		if (error)
731158f609aSkiyohara 			return error;
732158f609aSkiyohara 
733158f609aSkiyohara 		buf += lp->d_secsize;
734158f609aSkiyohara 	}
735158f609aSkiyohara 
736158f609aSkiyohara 	*rsize = size;
737158f609aSkiyohara 	return 0;
738158f609aSkiyohara }
739