ata.c revision 1.17 1 1.17 bouyer /* $NetBSD: ata.c,v 1.17 2002/04/09 21:17:53 bouyer Exp $ */
2 1.2 bouyer /*
3 1.16 bouyer * Copyright (c) 1998, 2001 Manuel Bouyer. All rights reserved.
4 1.2 bouyer *
5 1.2 bouyer * Redistribution and use in source and binary forms, with or without
6 1.2 bouyer * modification, are permitted provided that the following conditions
7 1.2 bouyer * are met:
8 1.2 bouyer * 1. Redistributions of source code must retain the above copyright
9 1.2 bouyer * notice, this list of conditions and the following disclaimer.
10 1.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright
11 1.2 bouyer * notice, this list of conditions and the following disclaimer in the
12 1.2 bouyer * documentation and/or other materials provided with the distribution.
13 1.2 bouyer * 3. All advertising materials mentioning features or use of this software
14 1.2 bouyer * must display the following acknowledgement:
15 1.2 bouyer * This product includes software developed by Manuel Bouyer.
16 1.2 bouyer * 4. The name of the author may not be used to endorse or promote products
17 1.2 bouyer * derived from this software without specific prior written permission.
18 1.2 bouyer *
19 1.2 bouyer * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 1.2 bouyer * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 1.2 bouyer * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 1.13 bouyer * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 1.2 bouyer * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 1.2 bouyer * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 1.2 bouyer * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 1.2 bouyer * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 1.2 bouyer * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 1.2 bouyer * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 1.2 bouyer */
30 1.14 lukem
31 1.14 lukem #include <sys/cdefs.h>
32 1.17 bouyer __KERNEL_RCSID(0, "$NetBSD: ata.c,v 1.17 2002/04/09 21:17:53 bouyer Exp $");
33 1.2 bouyer
34 1.6 hubertf #ifndef WDCDEBUG
35 1.2 bouyer #define WDCDEBUG
36 1.6 hubertf #endif /* WDCDEBUG */
37 1.2 bouyer
38 1.2 bouyer #include <sys/param.h>
39 1.2 bouyer #include <sys/systm.h>
40 1.2 bouyer #include <sys/kernel.h>
41 1.2 bouyer #include <sys/file.h>
42 1.2 bouyer #include <sys/stat.h>
43 1.2 bouyer #include <sys/malloc.h>
44 1.2 bouyer #include <sys/device.h>
45 1.2 bouyer #include <sys/syslog.h>
46 1.2 bouyer
47 1.15 bouyer #include <machine/intr.h>
48 1.15 bouyer #include <machine/bus.h>
49 1.15 bouyer
50 1.2 bouyer #include <dev/ata/atareg.h>
51 1.2 bouyer #include <dev/ata/atavar.h>
52 1.15 bouyer #include <dev/ic/wdcreg.h>
53 1.15 bouyer #include <dev/ic/wdcvar.h>
54 1.2 bouyer
55 1.2 bouyer #define DEBUG_FUNCS 0x08
56 1.2 bouyer #define DEBUG_PROBE 0x10
57 1.2 bouyer #ifdef WDCDEBUG
58 1.2 bouyer extern int wdcdebug_mask; /* init'ed in wdc.c */
59 1.2 bouyer #define WDCDEBUG_PRINT(args, level) \
60 1.2 bouyer if (wdcdebug_mask & (level)) \
61 1.2 bouyer printf args
62 1.2 bouyer #else
63 1.2 bouyer #define WDCDEBUG_PRINT(args, level)
64 1.2 bouyer #endif
65 1.2 bouyer
66 1.2 bouyer /* Get the disk's parameters */
67 1.2 bouyer int
68 1.2 bouyer ata_get_params(drvp, flags, prms)
69 1.2 bouyer struct ata_drive_datas *drvp;
70 1.2 bouyer u_int8_t flags;
71 1.2 bouyer struct ataparams *prms;
72 1.2 bouyer {
73 1.2 bouyer char tb[DEV_BSIZE];
74 1.2 bouyer struct wdc_command wdc_c;
75 1.2 bouyer
76 1.2 bouyer #if BYTE_ORDER == LITTLE_ENDIAN
77 1.2 bouyer int i;
78 1.2 bouyer u_int16_t *p;
79 1.2 bouyer #endif
80 1.2 bouyer
81 1.2 bouyer WDCDEBUG_PRINT(("wdc_ata_get_parms\n"), DEBUG_FUNCS);
82 1.2 bouyer
83 1.2 bouyer memset(tb, 0, DEV_BSIZE);
84 1.2 bouyer memset(prms, 0, sizeof(struct ataparams));
85 1.2 bouyer memset(&wdc_c, 0, sizeof(struct wdc_command));
86 1.2 bouyer
87 1.2 bouyer if (drvp->drive_flags & DRIVE_ATA) {
88 1.2 bouyer wdc_c.r_command = WDCC_IDENTIFY;
89 1.5 bouyer wdc_c.r_st_bmask = WDCS_DRDY;
90 1.5 bouyer wdc_c.r_st_pmask = WDCS_DRQ;
91 1.9 bouyer wdc_c.timeout = 1000; /* 1s */
92 1.7 bouyer } else if (drvp->drive_flags & DRIVE_ATAPI) {
93 1.2 bouyer wdc_c.r_command = ATAPI_IDENTIFY_DEVICE;
94 1.2 bouyer wdc_c.r_st_bmask = 0;
95 1.3 bouyer wdc_c.r_st_pmask = WDCS_DRQ;
96 1.9 bouyer wdc_c.timeout = 10000; /* 10s */
97 1.7 bouyer } else {
98 1.10 bouyer WDCDEBUG_PRINT(("wdc_ata_get_parms: no disks\n"),
99 1.10 bouyer DEBUG_FUNCS|DEBUG_PROBE);
100 1.7 bouyer return CMD_ERR;
101 1.2 bouyer }
102 1.2 bouyer wdc_c.flags = AT_READ | flags;
103 1.2 bouyer wdc_c.data = tb;
104 1.2 bouyer wdc_c.bcount = DEV_BSIZE;
105 1.10 bouyer if (wdc_exec_command(drvp, &wdc_c) != WDC_COMPLETE) {
106 1.10 bouyer WDCDEBUG_PRINT(("wdc_ata_get_parms: wdc_exec_command failed\n"),
107 1.10 bouyer DEBUG_FUNCS|DEBUG_PROBE);
108 1.2 bouyer return CMD_AGAIN;
109 1.10 bouyer }
110 1.2 bouyer if (wdc_c.flags & (AT_ERROR | AT_TIMEOU | AT_DF)) {
111 1.10 bouyer WDCDEBUG_PRINT(("wdc_ata_get_parms: wdc_c.flags=0x%x\n",
112 1.10 bouyer wdc_c.flags), DEBUG_FUNCS|DEBUG_PROBE);
113 1.2 bouyer return CMD_ERR;
114 1.2 bouyer } else {
115 1.17 bouyer /* if we didn't read any data something is wrong */
116 1.17 bouyer if ((wdc_c.flags & AT_XFDONE) == 0)
117 1.17 bouyer return CMD_ERR;
118 1.2 bouyer /* Read in parameter block. */
119 1.2 bouyer memcpy(prms, tb, sizeof(struct ataparams));
120 1.2 bouyer #if BYTE_ORDER == LITTLE_ENDIAN
121 1.2 bouyer /*
122 1.2 bouyer * Shuffle string byte order.
123 1.2 bouyer * ATAPI Mitsumi and NEC drives don't need this.
124 1.2 bouyer */
125 1.2 bouyer if ((prms->atap_config & WDC_CFG_ATAPI_MASK) ==
126 1.2 bouyer WDC_CFG_ATAPI &&
127 1.2 bouyer ((prms->atap_model[0] == 'N' &&
128 1.2 bouyer prms->atap_model[1] == 'E') ||
129 1.2 bouyer (prms->atap_model[0] == 'F' &&
130 1.2 bouyer prms->atap_model[1] == 'X')))
131 1.2 bouyer return 0;
132 1.2 bouyer for (i = 0; i < sizeof(prms->atap_model); i += 2) {
133 1.2 bouyer p = (u_short *)(prms->atap_model + i);
134 1.2 bouyer *p = ntohs(*p);
135 1.2 bouyer }
136 1.2 bouyer for (i = 0; i < sizeof(prms->atap_serial); i += 2) {
137 1.2 bouyer p = (u_short *)(prms->atap_serial + i);
138 1.2 bouyer *p = ntohs(*p);
139 1.2 bouyer }
140 1.2 bouyer for (i = 0; i < sizeof(prms->atap_revision); i += 2) {
141 1.2 bouyer p = (u_short *)(prms->atap_revision + i);
142 1.2 bouyer *p = ntohs(*p);
143 1.2 bouyer }
144 1.2 bouyer #endif
145 1.2 bouyer return CMD_OK;
146 1.2 bouyer }
147 1.2 bouyer }
148 1.2 bouyer
149 1.2 bouyer int
150 1.2 bouyer ata_set_mode(drvp, mode, flags)
151 1.2 bouyer struct ata_drive_datas *drvp;
152 1.2 bouyer u_int8_t mode;
153 1.2 bouyer u_int8_t flags;
154 1.2 bouyer {
155 1.2 bouyer struct wdc_command wdc_c;
156 1.2 bouyer
157 1.2 bouyer WDCDEBUG_PRINT(("wdc_ata_set_mode=0x%x\n", mode), DEBUG_FUNCS);
158 1.2 bouyer memset(&wdc_c, 0, sizeof(struct wdc_command));
159 1.2 bouyer
160 1.2 bouyer wdc_c.r_command = SET_FEATURES;
161 1.2 bouyer wdc_c.r_st_bmask = 0;
162 1.2 bouyer wdc_c.r_st_pmask = 0;
163 1.2 bouyer wdc_c.r_precomp = WDSF_SET_MODE;
164 1.2 bouyer wdc_c.r_count = mode;
165 1.2 bouyer wdc_c.flags = AT_READ | flags;
166 1.2 bouyer wdc_c.timeout = 1000; /* 1s */
167 1.2 bouyer if (wdc_exec_command(drvp, &wdc_c) != WDC_COMPLETE)
168 1.2 bouyer return CMD_AGAIN;
169 1.2 bouyer if (wdc_c.flags & (AT_ERROR | AT_TIMEOU | AT_DF)) {
170 1.2 bouyer return CMD_ERR;
171 1.2 bouyer }
172 1.2 bouyer return CMD_OK;
173 1.11 bouyer }
174 1.11 bouyer
175 1.11 bouyer void
176 1.11 bouyer ata_dmaerr(drvp)
177 1.11 bouyer struct ata_drive_datas *drvp;
178 1.11 bouyer {
179 1.11 bouyer /*
180 1.11 bouyer * Downgrade decision: if we get NERRS_MAX in NXFER.
181 1.11 bouyer * We start with n_dmaerrs set to NERRS_MAX-1 so that the
182 1.11 bouyer * first error within the first NXFER ops will immediatly trigger
183 1.11 bouyer * a downgrade.
184 1.11 bouyer * If we got an error and n_xfers is bigger than NXFER reset counters.
185 1.11 bouyer */
186 1.11 bouyer drvp->n_dmaerrs++;
187 1.11 bouyer if (drvp->n_dmaerrs >= NERRS_MAX && drvp->n_xfers <= NXFER) {
188 1.11 bouyer wdc_downgrade_mode(drvp);
189 1.11 bouyer drvp->n_dmaerrs = NERRS_MAX-1;
190 1.11 bouyer drvp->n_xfers = 0;
191 1.11 bouyer return;
192 1.11 bouyer }
193 1.11 bouyer if (drvp->n_xfers > NXFER) {
194 1.11 bouyer drvp->n_dmaerrs = 1; /* just got an error */
195 1.11 bouyer drvp->n_xfers = 1; /* restart counting from this error */
196 1.4 bouyer }
197 1.2 bouyer }
198