1/*
2 *  GPL LICENSE SUMMARY
3 *
4 *  Copyright(c) 2010 Intel Corporation. All rights reserved.
5 *
6 *  This program is free software; you can redistribute it and/or modify
7 *  it under the terms of version 2 of the GNU General Public License as
8 *  published by the Free Software Foundation.
9 *
10 *  This program is distributed in the hope that it will be useful, but
11 *  WITHOUT ANY WARRANTY; without even the implied warranty of
12 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 *  General Public License for more details.
14 *
15 *  You should have received a copy of the GNU General Public License
16 *  along with this program; if not, write to the Free Software
17 *  Foundation, Inc., 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
18 *  The full GNU General Public License is included in this distribution
19 *  in the file called LICENSE.GPL.
20 *
21 *  Contact Information:
22 *    Intel Corporation
23 *    2200 Mission College Blvd.
24 *    Santa Clara, CA  97052
25 *
26 * This provides access methods for PCI registers that mis-behave on
27 * the CE4100. Each register can be assigned a private init, read and
28 * write routine. The exception to this is the bridge device.  The
29 * bridge device is the only device on bus zero (0) that requires any
30 * fixup so it is a special case ATM
31 */
32
33#include <linux/kernel.h>
34#include <linux/pci.h>
35#include <linux/init.h>
36
37#include <asm/ce4100.h>
38#include <asm/pci_x86.h>
39
40struct sim_reg {
41	u32 value;
42	u32 mask;
43};
44
45struct sim_dev_reg {
46	int dev_func;
47	int reg;
48	void (*init)(struct sim_dev_reg *reg);
49	void (*read)(struct sim_dev_reg *reg, u32 *value);
50	void (*write)(struct sim_dev_reg *reg, u32 value);
51	struct sim_reg sim_reg;
52};
53
54struct sim_reg_op {
55	void (*init)(struct sim_dev_reg *reg);
56	void (*read)(struct sim_dev_reg *reg, u32 value);
57	void (*write)(struct sim_dev_reg *reg, u32 value);
58};
59
60#define MB (1024 * 1024)
61#define KB (1024)
62#define SIZE_TO_MASK(size) (~(size - 1))
63
64#define DEFINE_REG(device, func, offset, size, init_op, read_op, write_op)\
65{ PCI_DEVFN(device, func), offset, init_op, read_op, write_op,\
66	{0, SIZE_TO_MASK(size)} },
67
68static void reg_init(struct sim_dev_reg *reg)
69{
70	pci_direct_conf1.read(0, 1, reg->dev_func, reg->reg, 4,
71			      &reg->sim_reg.value);
72}
73
74static void reg_read(struct sim_dev_reg *reg, u32 *value)
75{
76	unsigned long flags;
77
78	raw_spin_lock_irqsave(&pci_config_lock, flags);
79	*value = reg->sim_reg.value;
80	raw_spin_unlock_irqrestore(&pci_config_lock, flags);
81}
82
83static void reg_write(struct sim_dev_reg *reg, u32 value)
84{
85	unsigned long flags;
86
87	raw_spin_lock_irqsave(&pci_config_lock, flags);
88	reg->sim_reg.value = (value & reg->sim_reg.mask) |
89		(reg->sim_reg.value & ~reg->sim_reg.mask);
90	raw_spin_unlock_irqrestore(&pci_config_lock, flags);
91}
92
93static void sata_reg_init(struct sim_dev_reg *reg)
94{
95	pci_direct_conf1.read(0, 1, PCI_DEVFN(14, 0), 0x10, 4,
96			      &reg->sim_reg.value);
97	reg->sim_reg.value += 0x400;
98}
99
100static void ehci_reg_read(struct sim_dev_reg *reg, u32 *value)
101{
102	reg_read(reg, value);
103	if (*value != reg->sim_reg.mask)
104		*value |= 0x100;
105}
106
107void sata_revid_init(struct sim_dev_reg *reg)
108{
109	reg->sim_reg.value = 0x01060100;
110	reg->sim_reg.mask = 0;
111}
112
113static void sata_revid_read(struct sim_dev_reg *reg, u32 *value)
114{
115	reg_read(reg, value);
116}
117
118static void reg_noirq_read(struct sim_dev_reg *reg, u32 *value)
119{
120	unsigned long flags;
121
122	raw_spin_lock_irqsave(&pci_config_lock, flags);
123	/* force interrupt pin value to 0 */
124	*value = reg->sim_reg.value & 0xfff00ff;
125	raw_spin_unlock_irqrestore(&pci_config_lock, flags);
126}
127
128static struct sim_dev_reg bus1_fixups[] = {
129	DEFINE_REG(2, 0, 0x10, (16*MB), reg_init, reg_read, reg_write)
130	DEFINE_REG(2, 0, 0x14, (256), reg_init, reg_read, reg_write)
131	DEFINE_REG(2, 1, 0x10, (64*KB), reg_init, reg_read, reg_write)
132	DEFINE_REG(3, 0, 0x10, (64*KB), reg_init, reg_read, reg_write)
133	DEFINE_REG(4, 0, 0x10, (128*KB), reg_init, reg_read, reg_write)
134	DEFINE_REG(4, 1, 0x10, (128*KB), reg_init, reg_read, reg_write)
135	DEFINE_REG(6, 0, 0x10, (512*KB), reg_init, reg_read, reg_write)
136	DEFINE_REG(6, 1, 0x10, (512*KB), reg_init, reg_read, reg_write)
137	DEFINE_REG(6, 2, 0x10, (64*KB), reg_init, reg_read, reg_write)
138	DEFINE_REG(8, 0, 0x10, (1*MB), reg_init, reg_read, reg_write)
139	DEFINE_REG(8, 1, 0x10, (64*KB), reg_init, reg_read, reg_write)
140	DEFINE_REG(8, 2, 0x10, (64*KB), reg_init, reg_read, reg_write)
141	DEFINE_REG(9, 0, 0x10 , (1*MB), reg_init, reg_read, reg_write)
142	DEFINE_REG(9, 0, 0x14, (64*KB), reg_init, reg_read, reg_write)
143	DEFINE_REG(10, 0, 0x10, (256), reg_init, reg_read, reg_write)
144	DEFINE_REG(10, 0, 0x14, (256*MB), reg_init, reg_read, reg_write)
145	DEFINE_REG(11, 0, 0x10, (256), reg_init, reg_read, reg_write)
146	DEFINE_REG(11, 0, 0x14, (256), reg_init, reg_read, reg_write)
147	DEFINE_REG(11, 1, 0x10, (256), reg_init, reg_read, reg_write)
148	DEFINE_REG(11, 2, 0x10, (256), reg_init, reg_read, reg_write)
149	DEFINE_REG(11, 2, 0x14, (256), reg_init, reg_read, reg_write)
150	DEFINE_REG(11, 2, 0x18, (256), reg_init, reg_read, reg_write)
151	DEFINE_REG(11, 3, 0x10, (256), reg_init, reg_read, reg_write)
152	DEFINE_REG(11, 3, 0x14, (256), reg_init, reg_read, reg_write)
153	DEFINE_REG(11, 4, 0x10, (256), reg_init, reg_read, reg_write)
154	DEFINE_REG(11, 5, 0x10, (64*KB), reg_init, reg_read, reg_write)
155	DEFINE_REG(11, 6, 0x10, (256), reg_init, reg_read, reg_write)
156	DEFINE_REG(11, 7, 0x10, (64*KB), reg_init, reg_read, reg_write)
157	DEFINE_REG(11, 7, 0x3c, 256, reg_init, reg_noirq_read, reg_write)
158	DEFINE_REG(12, 0, 0x10, (128*KB), reg_init, reg_read, reg_write)
159	DEFINE_REG(12, 0, 0x14, (256), reg_init, reg_read, reg_write)
160	DEFINE_REG(12, 1, 0x10, (1024), reg_init, reg_read, reg_write)
161	DEFINE_REG(13, 0, 0x10, (32*KB), reg_init, ehci_reg_read, reg_write)
162	DEFINE_REG(13, 1, 0x10, (32*KB), reg_init, ehci_reg_read, reg_write)
163	DEFINE_REG(14, 0, 0x8,  0, sata_revid_init, sata_revid_read, 0)
164	DEFINE_REG(14, 0, 0x10, 0, reg_init, reg_read, reg_write)
165	DEFINE_REG(14, 0, 0x14, 0, reg_init, reg_read, reg_write)
166	DEFINE_REG(14, 0, 0x18, 0, reg_init, reg_read, reg_write)
167	DEFINE_REG(14, 0, 0x1C, 0, reg_init, reg_read, reg_write)
168	DEFINE_REG(14, 0, 0x20, 0, reg_init, reg_read, reg_write)
169	DEFINE_REG(14, 0, 0x24, (0x200), sata_reg_init, reg_read, reg_write)
170	DEFINE_REG(15, 0, 0x10, (64*KB), reg_init, reg_read, reg_write)
171	DEFINE_REG(15, 0, 0x14, (64*KB), reg_init, reg_read, reg_write)
172	DEFINE_REG(16, 0, 0x10, (64*KB), reg_init, reg_read, reg_write)
173	DEFINE_REG(16, 0, 0x14, (64*MB), reg_init, reg_read, reg_write)
174	DEFINE_REG(16, 0, 0x18, (64*MB), reg_init, reg_read, reg_write)
175	DEFINE_REG(16, 0, 0x3c, 256, reg_init, reg_noirq_read, reg_write)
176	DEFINE_REG(17, 0, 0x10, (128*KB), reg_init, reg_read, reg_write)
177	DEFINE_REG(18, 0, 0x10, (1*KB), reg_init, reg_read, reg_write)
178	DEFINE_REG(18, 0, 0x3c, 256, reg_init, reg_noirq_read, reg_write)
179};
180
181static void __init init_sim_regs(void)
182{
183	int i;
184
185	for (i = 0; i < ARRAY_SIZE(bus1_fixups); i++) {
186		if (bus1_fixups[i].init)
187			bus1_fixups[i].init(&bus1_fixups[i]);
188	}
189}
190
191static inline void extract_bytes(u32 *value, int reg, int len)
192{
193	uint32_t mask;
194
195	*value >>= ((reg & 3) * 8);
196	mask = 0xFFFFFFFF >> ((4 - len) * 8);
197	*value &= mask;
198}
199
200int bridge_read(unsigned int devfn, int reg, int len, u32 *value)
201{
202	u32 av_bridge_base, av_bridge_limit;
203	int retval = 0;
204
205	switch (reg) {
206	/* Make BARs appear to not request any memory. */
207	case PCI_BASE_ADDRESS_0:
208	case PCI_BASE_ADDRESS_0 + 1:
209	case PCI_BASE_ADDRESS_0 + 2:
210	case PCI_BASE_ADDRESS_0 + 3:
211		*value = 0;
212		break;
213
214		/* Since subordinate bus number register is hardwired
215		 * to zero and read only, so do the simulation.
216		 */
217	case PCI_PRIMARY_BUS:
218		if (len == 4)
219			*value = 0x00010100;
220		break;
221
222	case PCI_SUBORDINATE_BUS:
223		*value = 1;
224		break;
225
226	case PCI_MEMORY_BASE:
227	case PCI_MEMORY_LIMIT:
228		/* Get the A/V bridge base address. */
229		pci_direct_conf1.read(0, 0, devfn,
230				PCI_BASE_ADDRESS_0, 4, &av_bridge_base);
231
232		av_bridge_limit = av_bridge_base + (512*MB - 1);
233		av_bridge_limit >>= 16;
234		av_bridge_limit &= 0xFFF0;
235
236		av_bridge_base >>= 16;
237		av_bridge_base &= 0xFFF0;
238
239		if (reg == PCI_MEMORY_LIMIT)
240			*value = av_bridge_limit;
241		else if (len == 2)
242			*value = av_bridge_base;
243		else
244			*value = (av_bridge_limit << 16) | av_bridge_base;
245		break;
246		/* Make prefetchable memory limit smaller than prefetchable
247		 * memory base, so not claim prefetchable memory space.
248		 */
249	case PCI_PREF_MEMORY_BASE:
250		*value = 0xFFF0;
251		break;
252	case PCI_PREF_MEMORY_LIMIT:
253		*value = 0x0;
254		break;
255		/* Make IO limit smaller than IO base, so not claim IO space. */
256	case PCI_IO_BASE:
257		*value = 0xF0;
258		break;
259	case PCI_IO_LIMIT:
260		*value = 0;
261		break;
262	default:
263		retval = 1;
264	}
265	return retval;
266}
267
268static int ce4100_conf_read(unsigned int seg, unsigned int bus,
269			    unsigned int devfn, int reg, int len, u32 *value)
270{
271	int i;
272
273	WARN_ON(seg);
274	if (bus == 1) {
275		for (i = 0; i < ARRAY_SIZE(bus1_fixups); i++) {
276			if (bus1_fixups[i].dev_func == devfn &&
277			    bus1_fixups[i].reg == (reg & ~3) &&
278			    bus1_fixups[i].read) {
279				bus1_fixups[i].read(&(bus1_fixups[i]),
280						    value);
281				extract_bytes(value, reg, len);
282				return 0;
283			}
284		}
285	}
286
287	if (bus == 0 && (PCI_DEVFN(1, 0) == devfn) &&
288	    !bridge_read(devfn, reg, len, value))
289		return 0;
290
291	return pci_direct_conf1.read(seg, bus, devfn, reg, len, value);
292}
293
294static int ce4100_conf_write(unsigned int seg, unsigned int bus,
295			     unsigned int devfn, int reg, int len, u32 value)
296{
297	int i;
298
299	WARN_ON(seg);
300	if (bus == 1) {
301		for (i = 0; i < ARRAY_SIZE(bus1_fixups); i++) {
302			if (bus1_fixups[i].dev_func == devfn &&
303			    bus1_fixups[i].reg == (reg & ~3) &&
304			    bus1_fixups[i].write) {
305				bus1_fixups[i].write(&(bus1_fixups[i]),
306						     value);
307				return 0;
308			}
309		}
310	}
311
312	/* Discard writes to A/V bridge BAR. */
313	if (bus == 0 && PCI_DEVFN(1, 0) == devfn &&
314	    ((reg & ~3) == PCI_BASE_ADDRESS_0))
315		return 0;
316
317	return pci_direct_conf1.write(seg, bus, devfn, reg, len, value);
318}
319
320static const struct pci_raw_ops ce4100_pci_conf = {
321	.read =	ce4100_conf_read,
322	.write = ce4100_conf_write,
323};
324
325int __init ce4100_pci_init(void)
326{
327	init_sim_regs();
328	raw_pci_ops = &ce4100_pci_conf;
329	/* Indicate caller that it should invoke pci_legacy_init() */
330	return 1;
331}
332