xref: /netbsd/sys/arch/sandpoint/stand/altboot/pciide.c (revision 6550d01e)
1 /* $NetBSD: pciide.c,v 1.1 2011/01/23 01:05:30 nisimura 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 uint32_t pciiobase = PCI_XIOBASE;
39 
40 struct myops {
41 	int (*chipfix)(struct dkdev_ata *);
42 	int (*presense)(struct dkdev_ata *, int);
43 };
44 static int cmdidefix(struct dkdev_ata *);
45 static struct myops cmdideops = { cmdidefix, NULL };
46 static struct myops *myops = &cmdideops;
47 
48 int pciide_match(unsigned, void *);
49 void *pciide_init(unsigned, void *);
50 
51 int
52 pciide_match(unsigned tag, void *data)
53 {
54 	unsigned v;
55 
56 	v = pcicfgread(tag, PCI_ID_REG);
57 	switch (v) {
58 	case PCI_DEVICE(0x1095, 0x0680): /* SiI 0680 IDE */
59 	case PCI_DEVICE(0x1283, 0x8211): /* ITE 8211 IDE */
60 	case PCI_DEVICE(0x1106, 0x1571): /* VIA 82C586 IDE */
61 	case PCI_DEVICE(0x10ad, 0x0105): /* Symphony Labs 82C105 IDE */
62 	case PCI_DEVICE(0x10b8, 0x5229): /* ALi IDE */
63 		return 1;
64 	}
65 	return 0;
66 }
67 
68 void *
69 pciide_init(unsigned tag, void *data)
70 {
71 	int native, n;
72 	unsigned val;
73 	struct dkdev_ata *l;
74 
75 	l = alloc(sizeof(struct dkdev_ata));
76 	memset(l, 0, sizeof(struct dkdev_ata));
77 	l->iobuf = allocaligned(512, 16);
78 	l->tag = tag;
79 
80 	val = pcicfgread(tag, PCI_CLASS_REG);
81 	native = val & 03;
82 	if (native) {
83 		/* native, use BAR 01234 */
84 		l->bar[0] = pciiobase + (pcicfgread(tag, 0x10) &~ 01);
85 		l->bar[1] = pciiobase + (pcicfgread(tag, 0x14) &~ 01);
86 		l->bar[2] = pciiobase + (pcicfgread(tag, 0x18) &~ 01);
87 		l->bar[3] = pciiobase + (pcicfgread(tag, 0x1c) &~ 01);
88 		l->bar[4] = pciiobase + (pcicfgread(tag, 0x20) &~ 01);
89 		l->chan[0].cmd = l->bar[0];
90 		l->chan[0].ctl = l->chan[0].alt = l->bar[1] | 02;
91 		l->chan[0].dma = l->bar[4] + 0x0;
92 		l->chan[1].cmd = l->bar[2];
93 		l->chan[1].ctl = l->chan[1].alt = l->bar[3] | 02;
94 		l->chan[1].dma = l->bar[4] + 0x8;
95 	}
96 	else {
97 		/* legacy */
98 		l->bar[0]= pciiobase + 0x1f0;
99 		l->bar[1]= pciiobase + 0x3f4;
100 		l->bar[2]= pciiobase + 0x170;
101 		l->bar[3]= pciiobase + 0x374;
102 		l->chan[0].cmd = l->bar[0];
103 		l->chan[0].ctl = l->chan[0].alt = l->bar[1] | 02;
104 		l->chan[0].dma = 0;
105 		l->chan[1].cmd = l->bar[2];
106 		l->chan[1].ctl = l->chan[1].alt = l->bar[3] | 02;
107 		l->chan[1].dma = 0;
108 	}
109 
110 	for (n = 0; n < 2; n++) {
111 		if (myops->presense && (*myops->presense)(l, n) == 0)
112 			l->presense[n] = 0; /* found not exist */
113 		else {
114 			/* check to see whether soft reset works */
115 			l->presense[n] = perform_atareset(l, n);
116 		}
117 		if (l->presense[n])
118 			printf("channel %d present\n", n);
119 	}
120 
121 	/* make sure to have PIO0 */
122 	if (myops->chipfix)
123 		(*myops->chipfix)(l);
124 
125 	return l;
126 }
127 
128 static int
129 cmdidefix(struct dkdev_ata *l)
130 {
131 	int v;
132 
133 	v = pcicfgread(l->tag, 0x80);
134 	pcicfgwrite(l->tag, 0x80, (v & ~0xff) | 0x01);
135 	v = pcicfgread(l->tag, 0x84);
136 	pcicfgwrite(l->tag, 0x84, (v & ~0xff) | 0x01);
137 	v = pcicfgread(l->tag, 0xa4);
138 	pcicfgwrite(l->tag, 0xa4, (v & ~0xffff) | 0x328a);
139 	v = pcicfgread(l->tag, 0xb4);
140 	pcicfgwrite(l->tag, 0xb4, (v & ~0xffff) | 0x328a);
141 
142 	return 1;
143 }
144