1/*-
2 * Copyright (c) 2009 Alexander Motin <mav@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer,
10 *    without modification, immediately at the beginning of the file.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
28__FBSDID("$FreeBSD$");
29
30#include <sys/param.h>
31
32#ifdef _KERNEL
33#include <opt_scsi.h>
34
35#include <sys/systm.h>
36#include <sys/libkern.h>
37#include <sys/kernel.h>
38#include <sys/sysctl.h>
39#else
40#include <errno.h>
41#include <stdio.h>
42#include <stdlib.h>
43#include <string.h>
44#ifndef min
45#define min(a,b) (((a)<(b))?(a):(b))
46#endif
47#endif
48
49#include <cam/cam.h>
50#include <cam/cam_ccb.h>
51#include <cam/cam_queue.h>
52#include <cam/cam_xpt.h>
53#include <sys/ata.h>
54#include <cam/ata/ata_all.h>
55#include <sys/sbuf.h>
56#include <sys/endian.h>
57
58int
59ata_version(int ver)
60{
61	int bit;
62
63	if (ver == 0xffff)
64		return 0;
65	for (bit = 15; bit >= 0; bit--)
66		if (ver & (1<<bit))
67			return bit;
68	return 0;
69}
70
71char *
72ata_op_string(struct ata_cmd *cmd)
73{
74
75	if (cmd->control & 0x04)
76		return ("SOFT_RESET");
77	switch (cmd->command) {
78	case 0x00: return ("NOP");
79	case 0x03: return ("CFA_REQUEST_EXTENDED_ERROR");
80	case 0x06:
81		switch (cmd->features) {
82	        case 0x01: return ("DSM TRIM");
83	        }
84	        return "DSM";
85	case 0x08: return ("DEVICE_RESET");
86	case 0x20: return ("READ");
87	case 0x24: return ("READ48");
88	case 0x25: return ("READ_DMA48");
89	case 0x26: return ("READ_DMA_QUEUED48");
90	case 0x27: return ("READ_NATIVE_MAX_ADDRESS48");
91	case 0x29: return ("READ_MUL48");
92	case 0x2a: return ("READ_STREAM_DMA48");
93	case 0x2b: return ("READ_STREAM48");
94	case 0x2f: return ("READ_LOG_EXT");
95	case 0x30: return ("WRITE");
96	case 0x34: return ("WRITE48");
97	case 0x35: return ("WRITE_DMA48");
98	case 0x36: return ("WRITE_DMA_QUEUED48");
99	case 0x37: return ("SET_MAX_ADDRESS48");
100	case 0x39: return ("WRITE_MUL48");
101	case 0x3a: return ("WRITE_STREAM_DMA48");
102	case 0x3b: return ("WRITE_STREAM48");
103	case 0x3d: return ("WRITE_DMA_FUA48");
104	case 0x3e: return ("WRITE_DMA_QUEUED_FUA48");
105	case 0x3f: return ("WRITE_LOG_EXT");
106	case 0x40: return ("READ_VERIFY");
107	case 0x42: return ("READ_VERIFY48");
108	case 0x51: return ("CONFIGURE_STREAM");
109	case 0x60: return ("READ_FPDMA_QUEUED");
110	case 0x61: return ("WRITE_FPDMA_QUEUED");
111	case 0x67:
112		if (cmd->features == 0xec)
113			return ("SEP_ATTN IDENTIFY");
114		switch (cmd->lba_low) {
115		case 0x00: return ("SEP_ATTN READ BUFFER");
116		case 0x02: return ("SEP_ATTN RECEIVE DIAGNOSTIC RESULTS");
117		case 0x80: return ("SEP_ATTN WRITE BUFFER");
118		case 0x82: return ("SEP_ATTN SEND DIAGNOSTIC");
119		}
120		return ("SEP_ATTN");
121	case 0x70: return ("SEEK");
122	case 0x87: return ("CFA_TRANSLATE_SECTOR");
123	case 0x90: return ("EXECUTE_DEVICE_DIAGNOSTIC");
124	case 0x92: return ("DOWNLOAD_MICROCODE");
125	case 0xa0: return ("PACKET");
126	case 0xa1: return ("ATAPI_IDENTIFY");
127	case 0xa2: return ("SERVICE");
128	case 0xb0: return ("SMART");
129	case 0xb1: return ("DEVICE CONFIGURATION");
130	case 0xc0: return ("CFA_ERASE");
131	case 0xc4: return ("READ_MUL");
132	case 0xc5: return ("WRITE_MUL");
133	case 0xc6: return ("SET_MULTI");
134	case 0xc7: return ("READ_DMA_QUEUED");
135	case 0xc8: return ("READ_DMA");
136	case 0xca: return ("WRITE_DMA");
137	case 0xcc: return ("WRITE_DMA_QUEUED");
138	case 0xcd: return ("CFA_WRITE_MULTIPLE_WITHOUT_ERASE");
139	case 0xce: return ("WRITE_MUL_FUA48");
140	case 0xd1: return ("CHECK_MEDIA_CARD_TYPE");
141	case 0xda: return ("GET_MEDIA_STATUS");
142	case 0xde: return ("MEDIA_LOCK");
143	case 0xdf: return ("MEDIA_UNLOCK");
144	case 0xe0: return ("STANDBY_IMMEDIATE");
145	case 0xe1: return ("IDLE_IMMEDIATE");
146	case 0xe2: return ("STANDBY");
147	case 0xe3: return ("IDLE");
148	case 0xe4: return ("READ_BUFFER/PM");
149	case 0xe5: return ("CHECK_POWER_MODE");
150	case 0xe6: return ("SLEEP");
151	case 0xe7: return ("FLUSHCACHE");
152	case 0xe8: return ("WRITE_PM");
153	case 0xea: return ("FLUSHCACHE48");
154	case 0xec: return ("ATA_IDENTIFY");
155	case 0xed: return ("MEDIA_EJECT");
156	case 0xef:
157		switch (cmd->features) {
158	        case 0x03: return ("SETFEATURES SET TRANSFER MODE");
159	        case 0x02: return ("SETFEATURES ENABLE WCACHE");
160	        case 0x82: return ("SETFEATURES DISABLE WCACHE");
161	        case 0x06: return ("SETFEATURES ENABLE PUIS");
162	        case 0x86: return ("SETFEATURES DISABLE PUIS");
163	        case 0x07: return ("SETFEATURES SPIN-UP");
164	        case 0x10: return ("SETFEATURES ENABLE SATA FEATURE");
165	        case 0x90: return ("SETFEATURES DISABLE SATA FEATURE");
166	        case 0xaa: return ("SETFEATURES ENABLE RCACHE");
167	        case 0x55: return ("SETFEATURES DISABLE RCACHE");
168	        }
169	        return "SETFEATURES";
170	case 0xf1: return ("SECURITY_SET_PASSWORD");
171	case 0xf2: return ("SECURITY_UNLOCK");
172	case 0xf3: return ("SECURITY_ERASE_PREPARE");
173	case 0xf4: return ("SECURITY_ERASE_UNIT");
174	case 0xf5: return ("SECURITY_FREEZE_LOCK");
175	case 0xf6: return ("SECURITY_DISABLE_PASSWORD");
176	case 0xf8: return ("READ_NATIVE_MAX_ADDRESS");
177	case 0xf9: return ("SET_MAX_ADDRESS");
178	}
179	return "UNKNOWN";
180}
181
182char *
183ata_cmd_string(struct ata_cmd *cmd, char *cmd_string, size_t len)
184{
185
186	snprintf(cmd_string, len, "%02x %02x %02x %02x "
187	    "%02x %02x %02x %02x %02x %02x %02x %02x",
188	    cmd->command, cmd->features,
189	    cmd->lba_low, cmd->lba_mid, cmd->lba_high, cmd->device,
190	    cmd->lba_low_exp, cmd->lba_mid_exp, cmd->lba_high_exp,
191	    cmd->features_exp, cmd->sector_count, cmd->sector_count_exp);
192
193	return(cmd_string);
194}
195
196char *
197ata_res_string(struct ata_res *res, char *res_string, size_t len)
198{
199
200	snprintf(res_string, len, "%02x %02x %02x %02x "
201	    "%02x %02x %02x %02x %02x %02x %02x",
202	    res->status, res->error,
203	    res->lba_low, res->lba_mid, res->lba_high, res->device,
204	    res->lba_low_exp, res->lba_mid_exp, res->lba_high_exp,
205	    res->sector_count, res->sector_count_exp);
206
207	return(res_string);
208}
209
210/*
211 * ata_command_sbuf() returns 0 for success and -1 for failure.
212 */
213int
214ata_command_sbuf(struct ccb_ataio *ataio, struct sbuf *sb)
215{
216	char cmd_str[(12 * 3) + 1];
217
218	sbuf_printf(sb, "%s. ACB: %s",
219	    ata_op_string(&ataio->cmd),
220	    ata_cmd_string(&ataio->cmd, cmd_str, sizeof(cmd_str)));
221
222	return(0);
223}
224
225/*
226 * ata_status_abuf() returns 0 for success and -1 for failure.
227 */
228int
229ata_status_sbuf(struct ccb_ataio *ataio, struct sbuf *sb)
230{
231
232	sbuf_printf(sb, "ATA status: %02x (%s%s%s%s%s%s%s%s)",
233	    ataio->res.status,
234	    (ataio->res.status & 0x80) ? "BSY " : "",
235	    (ataio->res.status & 0x40) ? "DRDY " : "",
236	    (ataio->res.status & 0x20) ? "DF " : "",
237	    (ataio->res.status & 0x10) ? "SERV " : "",
238	    (ataio->res.status & 0x08) ? "DRQ " : "",
239	    (ataio->res.status & 0x04) ? "CORR " : "",
240	    (ataio->res.status & 0x02) ? "IDX " : "",
241	    (ataio->res.status & 0x01) ? "ERR" : "");
242	if (ataio->res.status & 1) {
243	    sbuf_printf(sb, ", error: %02x (%s%s%s%s%s%s%s%s)",
244		ataio->res.error,
245		(ataio->res.error & 0x80) ? "ICRC " : "",
246		(ataio->res.error & 0x40) ? "UNC " : "",
247		(ataio->res.error & 0x20) ? "MC " : "",
248		(ataio->res.error & 0x10) ? "IDNF " : "",
249		(ataio->res.error & 0x08) ? "MCR " : "",
250		(ataio->res.error & 0x04) ? "ABRT " : "",
251		(ataio->res.error & 0x02) ? "NM " : "",
252		(ataio->res.error & 0x01) ? "ILI" : "");
253	}
254
255	return(0);
256}
257
258/*
259 * ata_res_sbuf() returns 0 for success and -1 for failure.
260 */
261int
262ata_res_sbuf(struct ccb_ataio *ataio, struct sbuf *sb)
263{
264	char res_str[(11 * 3) + 1];
265
266	sbuf_printf(sb, "RES: %s",
267	    ata_res_string(&ataio->res, res_str, sizeof(res_str)));
268
269	return(0);
270}
271
272void
273ata_print_ident(struct ata_params *ident_data)
274{
275	char product[48], revision[16];
276
277	cam_strvis(product, ident_data->model, sizeof(ident_data->model),
278		   sizeof(product));
279	cam_strvis(revision, ident_data->revision, sizeof(ident_data->revision),
280		   sizeof(revision));
281	printf("<%s %s> %s-%d",
282	    product, revision,
283	    (ident_data->config == ATA_PROTO_CFA) ? "CFA" :
284	    (ident_data->config & ATA_PROTO_ATAPI) ? "ATAPI" : "ATA",
285	    ata_version(ident_data->version_major));
286	if (ident_data->satacapabilities && ident_data->satacapabilities != 0xffff) {
287		if (ident_data->satacapabilities & ATA_SATA_GEN3)
288			printf(" SATA 3.x");
289		else if (ident_data->satacapabilities & ATA_SATA_GEN2)
290			printf(" SATA 2.x");
291		else if (ident_data->satacapabilities & ATA_SATA_GEN1)
292			printf(" SATA 1.x");
293		else
294			printf(" SATA");
295	}
296	printf(" device\n");
297}
298
299void
300ata_print_ident_short(struct ata_params *ident_data)
301{
302	char product[48], revision[16];
303
304	cam_strvis(product, ident_data->model, sizeof(ident_data->model),
305		   sizeof(product));
306	cam_strvis(revision, ident_data->revision, sizeof(ident_data->revision),
307		   sizeof(revision));
308	printf("<%s %s>", product, revision);
309}
310
311void
312semb_print_ident(struct sep_identify_data *ident_data)
313{
314	char vendor[9], product[17], revision[5], fw[5], in[7], ins[5];
315
316	cam_strvis(vendor, ident_data->vendor_id, 8, sizeof(vendor));
317	cam_strvis(product, ident_data->product_id, 16, sizeof(product));
318	cam_strvis(revision, ident_data->product_rev, 4, sizeof(revision));
319	cam_strvis(fw, ident_data->firmware_rev, 4, sizeof(fw));
320	cam_strvis(in, ident_data->interface_id, 6, sizeof(in));
321	cam_strvis(ins, ident_data->interface_rev, 4, sizeof(ins));
322	printf("<%s %s %s %s> SEMB %s %s device\n",
323	    vendor, product, revision, fw, in, ins);
324}
325
326void
327semb_print_ident_short(struct sep_identify_data *ident_data)
328{
329	char vendor[9], product[17], revision[5], fw[5];
330
331	cam_strvis(vendor, ident_data->vendor_id, 8, sizeof(vendor));
332	cam_strvis(product, ident_data->product_id, 16, sizeof(product));
333	cam_strvis(revision, ident_data->product_rev, 4, sizeof(revision));
334	cam_strvis(fw, ident_data->firmware_rev, 4, sizeof(fw));
335	printf("<%s %s %s %s>", vendor, product, revision, fw);
336}
337
338uint32_t
339ata_logical_sector_size(struct ata_params *ident_data)
340{
341	if ((ident_data->pss & ATA_PSS_VALID_MASK) == ATA_PSS_VALID_VALUE &&
342	    (ident_data->pss & ATA_PSS_LSSABOVE512)) {
343		return (((u_int32_t)ident_data->lss_1 |
344		    ((u_int32_t)ident_data->lss_2 << 16)) * 2);
345	}
346	return (512);
347}
348
349uint64_t
350ata_physical_sector_size(struct ata_params *ident_data)
351{
352	if ((ident_data->pss & ATA_PSS_VALID_MASK) == ATA_PSS_VALID_VALUE) {
353		if (ident_data->pss & ATA_PSS_MULTLS) {
354			return ((uint64_t)ata_logical_sector_size(ident_data) *
355			    (1 << (ident_data->pss & ATA_PSS_LSPPS)));
356		} else {
357			return (uint64_t)ata_logical_sector_size(ident_data);
358		}
359	}
360	return (512);
361}
362
363uint64_t
364ata_logical_sector_offset(struct ata_params *ident_data)
365{
366	if ((ident_data->lsalign & 0xc000) == 0x4000) {
367		return ((uint64_t)ata_logical_sector_size(ident_data) *
368		    (ident_data->lsalign & 0x3fff));
369	}
370	return (0);
371}
372
373void
374ata_28bit_cmd(struct ccb_ataio *ataio, uint8_t cmd, uint8_t features,
375    uint32_t lba, uint8_t sector_count)
376{
377	bzero(&ataio->cmd, sizeof(ataio->cmd));
378	ataio->cmd.flags = 0;
379	if (cmd == ATA_READ_DMA ||
380	    cmd == ATA_READ_DMA_QUEUED ||
381	    cmd == ATA_WRITE_DMA ||
382	    cmd == ATA_WRITE_DMA_QUEUED)
383		ataio->cmd.flags |= CAM_ATAIO_DMA;
384	ataio->cmd.command = cmd;
385	ataio->cmd.features = features;
386	ataio->cmd.lba_low = lba;
387	ataio->cmd.lba_mid = lba >> 8;
388	ataio->cmd.lba_high = lba >> 16;
389	ataio->cmd.device = ATA_DEV_LBA | ((lba >> 24) & 0x0f);
390	ataio->cmd.sector_count = sector_count;
391}
392
393void
394ata_48bit_cmd(struct ccb_ataio *ataio, uint8_t cmd, uint16_t features,
395    uint64_t lba, uint16_t sector_count)
396{
397
398	ataio->cmd.flags = CAM_ATAIO_48BIT;
399	if (cmd == ATA_READ_DMA48 ||
400	    cmd == ATA_READ_DMA_QUEUED48 ||
401	    cmd == ATA_READ_STREAM_DMA48 ||
402	    cmd == ATA_WRITE_DMA48 ||
403	    cmd == ATA_WRITE_DMA_FUA48 ||
404	    cmd == ATA_WRITE_DMA_QUEUED48 ||
405	    cmd == ATA_WRITE_DMA_QUEUED_FUA48 ||
406	    cmd == ATA_WRITE_STREAM_DMA48 ||
407	    cmd == ATA_DATA_SET_MANAGEMENT)
408		ataio->cmd.flags |= CAM_ATAIO_DMA;
409	ataio->cmd.command = cmd;
410	ataio->cmd.features = features;
411	ataio->cmd.lba_low = lba;
412	ataio->cmd.lba_mid = lba >> 8;
413	ataio->cmd.lba_high = lba >> 16;
414	ataio->cmd.device = ATA_DEV_LBA;
415	ataio->cmd.lba_low_exp = lba >> 24;
416	ataio->cmd.lba_mid_exp = lba >> 32;
417	ataio->cmd.lba_high_exp = lba >> 40;
418	ataio->cmd.features_exp = features >> 8;
419	ataio->cmd.sector_count = sector_count;
420	ataio->cmd.sector_count_exp = sector_count >> 8;
421	ataio->cmd.control = 0;
422}
423
424void
425ata_ncq_cmd(struct ccb_ataio *ataio, uint8_t cmd,
426    uint64_t lba, uint16_t sector_count)
427{
428
429	ataio->cmd.flags = CAM_ATAIO_48BIT | CAM_ATAIO_FPDMA;
430	ataio->cmd.command = cmd;
431	ataio->cmd.features = sector_count;
432	ataio->cmd.lba_low = lba;
433	ataio->cmd.lba_mid = lba >> 8;
434	ataio->cmd.lba_high = lba >> 16;
435	ataio->cmd.device = ATA_DEV_LBA;
436	ataio->cmd.lba_low_exp = lba >> 24;
437	ataio->cmd.lba_mid_exp = lba >> 32;
438	ataio->cmd.lba_high_exp = lba >> 40;
439	ataio->cmd.features_exp = sector_count >> 8;
440	ataio->cmd.sector_count = 0;
441	ataio->cmd.sector_count_exp = 0;
442	ataio->cmd.control = 0;
443}
444
445void
446ata_reset_cmd(struct ccb_ataio *ataio)
447{
448	bzero(&ataio->cmd, sizeof(ataio->cmd));
449	ataio->cmd.flags = CAM_ATAIO_CONTROL | CAM_ATAIO_NEEDRESULT;
450	ataio->cmd.control = 0x04;
451}
452
453void
454ata_pm_read_cmd(struct ccb_ataio *ataio, int reg, int port)
455{
456	bzero(&ataio->cmd, sizeof(ataio->cmd));
457	ataio->cmd.flags = CAM_ATAIO_NEEDRESULT;
458	ataio->cmd.command = ATA_READ_PM;
459	ataio->cmd.features = reg;
460	ataio->cmd.device = port & 0x0f;
461}
462
463void
464ata_pm_write_cmd(struct ccb_ataio *ataio, int reg, int port, uint32_t val)
465{
466	bzero(&ataio->cmd, sizeof(ataio->cmd));
467	ataio->cmd.flags = 0;
468	ataio->cmd.command = ATA_WRITE_PM;
469	ataio->cmd.features = reg;
470	ataio->cmd.sector_count = val;
471	ataio->cmd.lba_low = val >> 8;
472	ataio->cmd.lba_mid = val >> 16;
473	ataio->cmd.lba_high = val >> 24;
474	ataio->cmd.device = port & 0x0f;
475}
476
477void
478ata_bswap(int8_t *buf, int len)
479{
480	u_int16_t *ptr = (u_int16_t*)(buf + len);
481
482	while (--ptr >= (u_int16_t*)buf)
483		*ptr = be16toh(*ptr);
484}
485
486void
487ata_btrim(int8_t *buf, int len)
488{
489	int8_t *ptr;
490
491	for (ptr = buf; ptr < buf+len; ++ptr)
492		if (!*ptr || *ptr == '_')
493			*ptr = ' ';
494	for (ptr = buf + len - 1; ptr >= buf && *ptr == ' '; --ptr)
495		*ptr = 0;
496}
497
498void
499ata_bpack(int8_t *src, int8_t *dst, int len)
500{
501	int i, j, blank;
502
503	for (i = j = blank = 0 ; i < len; i++) {
504		if (blank && src[i] == ' ') continue;
505		if (blank && src[i] != ' ') {
506			dst[j++] = src[i];
507			blank = 0;
508			continue;
509		}
510		if (src[i] == ' ') {
511			blank = 1;
512			if (i == 0)
513			continue;
514		}
515		dst[j++] = src[i];
516	}
517	while (j < len)
518		dst[j++] = 0x00;
519}
520
521int
522ata_max_pmode(struct ata_params *ap)
523{
524    if (ap->atavalid & ATA_FLAG_64_70) {
525	if (ap->apiomodes & 0x02)
526	    return ATA_PIO4;
527	if (ap->apiomodes & 0x01)
528	    return ATA_PIO3;
529    }
530    if (ap->mwdmamodes & 0x04)
531	return ATA_PIO4;
532    if (ap->mwdmamodes & 0x02)
533	return ATA_PIO3;
534    if (ap->mwdmamodes & 0x01)
535	return ATA_PIO2;
536    if ((ap->retired_piomode & ATA_RETIRED_PIO_MASK) == 0x200)
537	return ATA_PIO2;
538    if ((ap->retired_piomode & ATA_RETIRED_PIO_MASK) == 0x100)
539	return ATA_PIO1;
540    if ((ap->retired_piomode & ATA_RETIRED_PIO_MASK) == 0x000)
541	return ATA_PIO0;
542    return ATA_PIO0;
543}
544
545int
546ata_max_wmode(struct ata_params *ap)
547{
548    if (ap->mwdmamodes & 0x04)
549	return ATA_WDMA2;
550    if (ap->mwdmamodes & 0x02)
551	return ATA_WDMA1;
552    if (ap->mwdmamodes & 0x01)
553	return ATA_WDMA0;
554    return -1;
555}
556
557int
558ata_max_umode(struct ata_params *ap)
559{
560    if (ap->atavalid & ATA_FLAG_88) {
561	if (ap->udmamodes & 0x40)
562	    return ATA_UDMA6;
563	if (ap->udmamodes & 0x20)
564	    return ATA_UDMA5;
565	if (ap->udmamodes & 0x10)
566	    return ATA_UDMA4;
567	if (ap->udmamodes & 0x08)
568	    return ATA_UDMA3;
569	if (ap->udmamodes & 0x04)
570	    return ATA_UDMA2;
571	if (ap->udmamodes & 0x02)
572	    return ATA_UDMA1;
573	if (ap->udmamodes & 0x01)
574	    return ATA_UDMA0;
575    }
576    return -1;
577}
578
579int
580ata_max_mode(struct ata_params *ap, int maxmode)
581{
582
583	if (maxmode == 0)
584		maxmode = ATA_DMA_MAX;
585	if (maxmode >= ATA_UDMA0 && ata_max_umode(ap) > 0)
586		return (min(maxmode, ata_max_umode(ap)));
587	if (maxmode >= ATA_WDMA0 && ata_max_wmode(ap) > 0)
588		return (min(maxmode, ata_max_wmode(ap)));
589	return (min(maxmode, ata_max_pmode(ap)));
590}
591
592char *
593ata_mode2string(int mode)
594{
595    switch (mode) {
596    case -1: return "UNSUPPORTED";
597    case 0: return "NONE";
598    case ATA_PIO0: return "PIO0";
599    case ATA_PIO1: return "PIO1";
600    case ATA_PIO2: return "PIO2";
601    case ATA_PIO3: return "PIO3";
602    case ATA_PIO4: return "PIO4";
603    case ATA_WDMA0: return "WDMA0";
604    case ATA_WDMA1: return "WDMA1";
605    case ATA_WDMA2: return "WDMA2";
606    case ATA_UDMA0: return "UDMA0";
607    case ATA_UDMA1: return "UDMA1";
608    case ATA_UDMA2: return "UDMA2";
609    case ATA_UDMA3: return "UDMA3";
610    case ATA_UDMA4: return "UDMA4";
611    case ATA_UDMA5: return "UDMA5";
612    case ATA_UDMA6: return "UDMA6";
613    default:
614	if (mode & ATA_DMA_MASK)
615	    return "BIOSDMA";
616	else
617	    return "BIOSPIO";
618    }
619}
620
621int
622ata_string2mode(char *str)
623{
624	if (!strcasecmp(str, "PIO0")) return (ATA_PIO0);
625	if (!strcasecmp(str, "PIO1")) return (ATA_PIO1);
626	if (!strcasecmp(str, "PIO2")) return (ATA_PIO2);
627	if (!strcasecmp(str, "PIO3")) return (ATA_PIO3);
628	if (!strcasecmp(str, "PIO4")) return (ATA_PIO4);
629	if (!strcasecmp(str, "WDMA0")) return (ATA_WDMA0);
630	if (!strcasecmp(str, "WDMA1")) return (ATA_WDMA1);
631	if (!strcasecmp(str, "WDMA2")) return (ATA_WDMA2);
632	if (!strcasecmp(str, "UDMA0")) return (ATA_UDMA0);
633	if (!strcasecmp(str, "UDMA16")) return (ATA_UDMA0);
634	if (!strcasecmp(str, "UDMA1")) return (ATA_UDMA1);
635	if (!strcasecmp(str, "UDMA25")) return (ATA_UDMA1);
636	if (!strcasecmp(str, "UDMA2")) return (ATA_UDMA2);
637	if (!strcasecmp(str, "UDMA33")) return (ATA_UDMA2);
638	if (!strcasecmp(str, "UDMA3")) return (ATA_UDMA3);
639	if (!strcasecmp(str, "UDMA44")) return (ATA_UDMA3);
640	if (!strcasecmp(str, "UDMA4")) return (ATA_UDMA4);
641	if (!strcasecmp(str, "UDMA66")) return (ATA_UDMA4);
642	if (!strcasecmp(str, "UDMA5")) return (ATA_UDMA5);
643	if (!strcasecmp(str, "UDMA100")) return (ATA_UDMA5);
644	if (!strcasecmp(str, "UDMA6")) return (ATA_UDMA6);
645	if (!strcasecmp(str, "UDMA133")) return (ATA_UDMA6);
646	return (-1);
647}
648
649
650u_int
651ata_mode2speed(int mode)
652{
653	switch (mode) {
654	case ATA_PIO0:
655	default:
656		return (3300);
657	case ATA_PIO1:
658		return (5200);
659	case ATA_PIO2:
660		return (8300);
661	case ATA_PIO3:
662		return (11100);
663	case ATA_PIO4:
664		return (16700);
665	case ATA_WDMA0:
666		return (4200);
667	case ATA_WDMA1:
668		return (13300);
669	case ATA_WDMA2:
670		return (16700);
671	case ATA_UDMA0:
672		return (16700);
673	case ATA_UDMA1:
674		return (25000);
675	case ATA_UDMA2:
676		return (33300);
677	case ATA_UDMA3:
678		return (44400);
679	case ATA_UDMA4:
680		return (66700);
681	case ATA_UDMA5:
682		return (100000);
683	case ATA_UDMA6:
684		return (133000);
685	}
686}
687
688u_int
689ata_revision2speed(int revision)
690{
691	switch (revision) {
692	case 1:
693	default:
694		return (150000);
695	case 2:
696		return (300000);
697	case 3:
698		return (600000);
699	}
700}
701
702int
703ata_speed2revision(u_int speed)
704{
705	switch (speed) {
706	case 0:
707		return (0);
708	case 150000:
709		return (1);
710	case 300000:
711		return (2);
712	case 600000:
713		return (3);
714	default:
715		return (-1);
716	}
717}
718
719int
720ata_identify_match(caddr_t identbuffer, caddr_t table_entry)
721{
722	struct scsi_inquiry_pattern *entry;
723	struct ata_params *ident;
724
725	entry = (struct scsi_inquiry_pattern *)table_entry;
726	ident = (struct ata_params *)identbuffer;
727
728	if ((cam_strmatch(ident->model, entry->product,
729			  sizeof(ident->model)) == 0)
730	 && (cam_strmatch(ident->revision, entry->revision,
731			  sizeof(ident->revision)) == 0)) {
732		return (0);
733	}
734        return (-1);
735}
736
737int
738ata_static_identify_match(caddr_t identbuffer, caddr_t table_entry)
739{
740	struct scsi_static_inquiry_pattern *entry;
741	struct ata_params *ident;
742
743	entry = (struct scsi_static_inquiry_pattern *)table_entry;
744	ident = (struct ata_params *)identbuffer;
745
746	if ((cam_strmatch(ident->model, entry->product,
747			  sizeof(ident->model)) == 0)
748	 && (cam_strmatch(ident->revision, entry->revision,
749			  sizeof(ident->revision)) == 0)) {
750		return (0);
751	}
752        return (-1);
753}
754
755void
756semb_receive_diagnostic_results(struct ccb_ataio *ataio,
757    u_int32_t retries, void (*cbfcnp)(struct cam_periph *, union ccb*),
758    uint8_t tag_action, int pcv, uint8_t page_code,
759    uint8_t *data_ptr, uint16_t length, uint32_t timeout)
760{
761
762	length = min(length, 1020);
763	length = (length + 3) & ~3;
764	cam_fill_ataio(ataio,
765		      retries,
766		      cbfcnp,
767		      /*flags*/CAM_DIR_IN,
768		      tag_action,
769		      data_ptr,
770		      length,
771		      timeout);
772	ata_28bit_cmd(ataio, ATA_SEP_ATTN,
773	    pcv ? page_code : 0, 0x02, length / 4);
774}
775
776void
777semb_send_diagnostic(struct ccb_ataio *ataio,
778    u_int32_t retries, void (*cbfcnp)(struct cam_periph *, union ccb *),
779    uint8_t tag_action, uint8_t *data_ptr, uint16_t length, uint32_t timeout)
780{
781
782	length = min(length, 1020);
783	length = (length + 3) & ~3;
784	cam_fill_ataio(ataio,
785		      retries,
786		      cbfcnp,
787		      /*flags*/length ? CAM_DIR_OUT : CAM_DIR_NONE,
788		      tag_action,
789		      data_ptr,
790		      length,
791		      timeout);
792	ata_28bit_cmd(ataio, ATA_SEP_ATTN,
793	    length > 0 ? data_ptr[0] : 0, 0x82, length / 4);
794}
795
796void
797semb_read_buffer(struct ccb_ataio *ataio,
798    u_int32_t retries, void (*cbfcnp)(struct cam_periph *, union ccb*),
799    uint8_t tag_action, uint8_t page_code,
800    uint8_t *data_ptr, uint16_t length, uint32_t timeout)
801{
802
803	length = min(length, 1020);
804	length = (length + 3) & ~3;
805	cam_fill_ataio(ataio,
806		      retries,
807		      cbfcnp,
808		      /*flags*/CAM_DIR_IN,
809		      tag_action,
810		      data_ptr,
811		      length,
812		      timeout);
813	ata_28bit_cmd(ataio, ATA_SEP_ATTN,
814	    page_code, 0x00, length / 4);
815}
816
817void
818semb_write_buffer(struct ccb_ataio *ataio,
819    u_int32_t retries, void (*cbfcnp)(struct cam_periph *, union ccb *),
820    uint8_t tag_action, uint8_t *data_ptr, uint16_t length, uint32_t timeout)
821{
822
823	length = min(length, 1020);
824	length = (length + 3) & ~3;
825	cam_fill_ataio(ataio,
826		      retries,
827		      cbfcnp,
828		      /*flags*/length ? CAM_DIR_OUT : CAM_DIR_NONE,
829		      tag_action,
830		      data_ptr,
831		      length,
832		      timeout);
833	ata_28bit_cmd(ataio, ATA_SEP_ATTN,
834	    length > 0 ? data_ptr[0] : 0, 0x80, length / 4);
835}
836
837