pciide.c revision 1.11 1 /* $NetBSD: pciide.c,v 1.11 2011/11/13 00:06:54 phx Exp $ */
2
3 /*-
4 * Copyright (c) 2008 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Tohru Nishimura.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <sys/param.h>
33
34 #include <lib/libsa/stand.h>
35
36 #include "globals.h"
37
38 static void cmdidefix(struct dkdev_ata *);
39 static void apoidefix(struct dkdev_ata *);
40 static void iteidefix(struct dkdev_ata *);
41
42 static uint32_t pciiobase = PCI_XIOBASE;
43
44 struct myops {
45 void (*chipfix)(struct dkdev_ata *);
46 int (*presense)(struct dkdev_ata *, int);
47 };
48 static struct myops defaultops = { NULL, NULL };
49 static struct myops cmdideops = { cmdidefix, NULL };
50 static struct myops apoideops = { apoidefix, NULL };
51 static struct myops iteideops = { iteidefix, NULL };
52 static struct myops *myops;
53
54 int
55 pciide_match(unsigned tag, void *data)
56 {
57 unsigned v;
58
59 v = pcicfgread(tag, PCI_ID_REG);
60 switch (v) {
61 case PCI_DEVICE(0x1095, 0x0680): /* SiI 0680 IDE */
62 myops = &cmdideops;
63 return 1;
64 case PCI_DEVICE(0x1106, 0x0571): /* VIA 82C586A/B/686A/B IDE */
65 case PCI_DEVICE(0x1106, 0x1571): /* VIA 82C586 IDE */
66 case PCI_DEVICE(0x1106, 0x3164): /* VIA VT6410 RAID IDE */
67 myops = &apoideops;
68 return 1;
69 case PCI_DEVICE(0x1283, 0x8211): /* ITE 8211 IDE */
70 myops = &iteideops;
71 return 1;
72 case PCI_DEVICE(0x10ad, 0x0105): /* Symphony Labs 82C105 IDE */
73 case PCI_DEVICE(0x10b8, 0x5229): /* ALi IDE */
74 case PCI_DEVICE(0x1191, 0x0008): /* ACARD ATP865 */
75 case PCI_DEVICE(0x1191, 0x0009): /* ACARD ATP865A */
76 myops = &defaultops;
77 return 1;
78 }
79 return 0;
80 }
81
82 void *
83 pciide_init(unsigned tag, void *data)
84 {
85 int native, n;
86 unsigned val;
87 struct dkdev_ata *l;
88
89 l = alloc(sizeof(struct dkdev_ata));
90 memset(l, 0, sizeof(struct dkdev_ata));
91 l->iobuf = allocaligned(512, 16);
92 l->tag = tag;
93
94 /* chipset specific fixes */
95 if (myops->chipfix)
96 (*myops->chipfix)(l);
97
98 val = pcicfgread(tag, PCI_CLASS_REG);
99 native = PCI_CLASS(val) != PCI_CLASS_IDE ||
100 (PCI_INTERFACE(val) & 05) != 0;
101
102 if (native) {
103 /* native, use BAR 01234 */
104 l->bar[0] = pciiobase + (pcicfgread(tag, 0x10) &~ 01);
105 l->bar[1] = pciiobase + (pcicfgread(tag, 0x14) &~ 01);
106 l->bar[2] = pciiobase + (pcicfgread(tag, 0x18) &~ 01);
107 l->bar[3] = pciiobase + (pcicfgread(tag, 0x1c) &~ 01);
108 l->bar[4] = pciiobase + (pcicfgread(tag, 0x20) &~ 01);
109 l->chan[0].cmd = l->bar[0];
110 l->chan[0].ctl = l->chan[0].alt = l->bar[1] | 02;
111 l->chan[0].dma = l->bar[4] + 0x0;
112 l->chan[1].cmd = l->bar[2];
113 l->chan[1].ctl = l->chan[1].alt = l->bar[3] | 02;
114 l->chan[1].dma = l->bar[4] + 0x8;
115 }
116 else {
117 /* legacy */
118 l->bar[0]= pciiobase + 0x1f0;
119 l->bar[1]= pciiobase + 0x3f4;
120 l->bar[2]= pciiobase + 0x170;
121 l->bar[3]= pciiobase + 0x374;
122 l->chan[0].cmd = l->bar[0];
123 l->chan[0].ctl = l->chan[0].alt = l->bar[1] | 02;
124 l->chan[0].dma = 0;
125 l->chan[1].cmd = l->bar[2];
126 l->chan[1].ctl = l->chan[1].alt = l->bar[3] | 02;
127 l->chan[1].dma = 0;
128 }
129
130 for (n = 0; n < 2; n++) {
131 if (myops->presense && (*myops->presense)(l, n) == 0)
132 l->presense[n] = 0; /* found not exist */
133 else
134 /* check to see whether soft reset works */
135 l->presense[n] = perform_atareset(l, n);
136
137 if (l->presense[n])
138 printf("channel %d present\n", n);
139 }
140
141 return l;
142 }
143
144 static void
145 cmdidefix(struct dkdev_ata *l)
146 {
147 unsigned v;
148
149 v = pcicfgread(l->tag, 0x80);
150 pcicfgwrite(l->tag, 0x80, (v & ~0xff) | 0x01);
151 v = pcicfgread(l->tag, 0x84);
152 pcicfgwrite(l->tag, 0x84, (v & ~0xff) | 0x01);
153 v = pcicfgread(l->tag, 0xa4);
154 pcicfgwrite(l->tag, 0xa4, (v & ~0xffff) | 0x328a);
155 v = pcicfgread(l->tag, 0xb4);
156 pcicfgwrite(l->tag, 0xb4, (v & ~0xffff) | 0x328a);
157 }
158
159 static void
160 apoidefix(struct dkdev_ata *l)
161 {
162 unsigned v;
163
164 /* enable primary and secondary channel */
165 v = pcicfgread(l->tag, 0x40) & ~0x03;
166 pcicfgwrite(l->tag, 0x40, v | 0x03);
167 }
168
169 static void
170 iteidefix(struct dkdev_ata *l)
171 {
172 unsigned v;
173
174 /* set PCI mode and 66Mhz reference clock, disable IT8212 RAID */
175 v = pcicfgread(l->tag, 0x50);
176 pcicfgwrite(l->tag, 0x50, v & ~0x83);
177
178 /* i/o configuration, enable channels, cables, IORDY */
179 v = pcicfgread(l->tag, 0x40);
180 pcicfgwrite(l->tag, 0x40, (v & ~0xffffff) | 0x36a0f3);
181 }
182