2d3adf1288ee8ceb17e7b2f0e8e73e0459ddaf7d
[coreboot.git] / src / northbridge / via / cn700 / northbridge.c
1 /*
2  * This file is part of the coreboot project.
3  *
4  * Copyright (C) 2008 VIA Technologies, Inc.
5  * (Written by Aaron Lwe <aaron.lwe@gmail.com> for VIA)
6  * Copyright (C) 2007 Corey Osgood <corey.osgood@gmail.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
21  */
22
23 #include <console/console.h>
24 #include <arch/io.h>
25 #include <stdint.h>
26 #include <device/device.h>
27 #include <device/pci.h>
28 #include <device/pci_ids.h>
29 #include <stdlib.h>
30 #include <string.h>
31 #include <bitops.h>
32 #include <cpu/cpu.h>
33 #include "chip.h"
34 #include "northbridge.h"
35 #include "cn700.h"
36
37 static void memctrl_init(device_t dev)
38 {
39         device_t vlink_dev;
40         u16 reg16;
41         u8 ranks, pagec, paged, pagee, pagef, shadowreg;
42
43         /* Set up the VGA framebuffer size. */
44         reg16 = (log2(CONFIG_VIDEO_MB) << 12) | (1 << 15);
45         pci_write_config16(dev, 0xa0, reg16);
46
47         /* Set up VGA timers. */
48         pci_write_config8(dev, 0xa2, 0x44);
49
50         for (ranks = 0x4b; ranks >= 0x48; ranks--) {
51                 if (pci_read_config8(dev, ranks)) {
52                         ranks -= 0x48;
53                         break;
54                 }
55         }
56         if (ranks == 0x47)
57                 ranks = 0x00;
58         reg16 = 0xaae0;
59         reg16 |= ranks;
60         /* GMINT Misc. FrameBuffer rank */
61         pci_write_config16(dev, 0xb0, reg16);
62         /* AGPCINT Misc. */
63         pci_write_config8(dev, 0xb8, 0x08);
64
65         /* Shadow RAM */
66         pagec = 0xff, paged = 0xff, pagee = 0xff, pagef = 0x30;
67         /* PAGE C, D, E are all read write enable */
68         pci_write_config8(dev, 0x80, pagec);
69         pci_write_config8(dev, 0x81, paged);
70         pci_write_config8(dev, 0x82, pagee);
71         /* PAGE F are read/writable */
72         shadowreg = pci_read_config8(dev, 0x83);
73         shadowreg |= pagef;
74         pci_write_config8(dev, 0x83, shadowreg);
75         /* vlink mirror */
76         vlink_dev = dev_find_device(PCI_VENDOR_ID_VIA,
77                                     PCI_DEVICE_ID_VIA_CN700_VLINK, 0);
78         if (vlink_dev) {
79                 pci_write_config8(vlink_dev, 0x61, pagec);
80                 pci_write_config8(vlink_dev, 0x62, paged);
81                 pci_write_config8(vlink_dev, 0x64, pagee);
82
83                 shadowreg = pci_read_config8(vlink_dev, 0x63);
84                 shadowreg |= pagef;
85                 pci_write_config8(vlink_dev, 0x63, shadowreg);
86         }
87 }
88
89 static const struct device_operations memctrl_operations = {
90         .read_resources = cn700_noop,
91         .init           = memctrl_init,
92 };
93
94 static const struct pci_driver memctrl_driver __pci_driver = {
95         .ops    = &memctrl_operations,
96         .vendor = PCI_VENDOR_ID_VIA,
97         .device = PCI_DEVICE_ID_VIA_CN700_MEMCTRL,
98 };
99
100 static void pci_domain_read_resources(device_t dev)
101 {
102         struct resource *resource;
103
104         printk_spew("Entering cn700 pci_domain_read_resources.\n");
105
106         /* Initialize the system wide I/O space constraints. */
107         resource = new_resource(dev, IOINDEX_SUBTRACTIVE(0, 0));
108         resource->limit = 0xffffUL;
109         resource->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE |
110             IORESOURCE_ASSIGNED;
111
112         /* Initialize the system wide memory resources constraints. */
113         resource = new_resource(dev, IOINDEX_SUBTRACTIVE(1, 0));
114         resource->limit = 0xffffffffULL;
115         resource->flags = IORESOURCE_MEM | IORESOURCE_SUBTRACTIVE |
116             IORESOURCE_ASSIGNED;
117
118         printk_spew("Leaving cn700 pci_domain_read_resources.\n");
119 }
120
121 static void ram_resource(device_t dev, unsigned long index,
122                          unsigned long basek, unsigned long sizek)
123 {
124         struct resource *resource;
125
126         if (!sizek)
127                 return;
128
129         resource = new_resource(dev, index);
130         resource->base = ((resource_t) basek) << 10;
131         resource->size = ((resource_t) sizek) << 10;
132         resource->flags = IORESOURCE_MEM | IORESOURCE_CACHEABLE |
133             IORESOURCE_FIXED | IORESOURCE_STORED | IORESOURCE_ASSIGNED;
134 }
135
136 static void tolm_test(void *gp, struct device *dev, struct resource *new)
137 {
138         struct resource **best_p = gp;
139         struct resource *best;
140
141         best = *best_p;
142         if (!best || (best->base > new->base))
143                 best = new;
144         *best_p = best;
145 }
146
147 static u32 find_pci_tolm(struct bus *bus)
148 {
149         struct resource *min;
150         u32 tolm;
151
152         print_debug("Entering find_pci_tolm\n");
153
154         min = 0;
155         search_bus_resources(bus, IORESOURCE_MEM, IORESOURCE_MEM,
156                              tolm_test, &min);
157         tolm = 0xffffffffUL;
158         if (min && tolm > min->base)
159                 tolm = min->base;
160
161         print_debug("Leaving find_pci_tolm\n");
162
163         return tolm;
164 }
165
166 #if HAVE_HIGH_TABLES==1
167 /* maximum size of high tables in KB */
168 #define HIGH_TABLES_SIZE 64
169 extern uint64_t high_tables_base, high_tables_size;
170 #endif
171
172 static void pci_domain_set_resources(device_t dev)
173 {
174         /* The order is important to find the correct RAM size. */
175         static const u8 ramregs[] = { 0x43, 0x42, 0x41, 0x40 };
176         device_t mc_dev;
177         u32 pci_tolm;
178
179         printk_spew("Entering cn700 pci_domain_set_resources.\n");
180
181         pci_tolm = find_pci_tolm(&dev->link[0]);
182         mc_dev = dev_find_device(PCI_VENDOR_ID_VIA,
183                                  PCI_DEVICE_ID_VIA_CN700_MEMCTRL, 0);
184
185         if (mc_dev) {
186                 unsigned long tomk, tolmk;
187                 unsigned char rambits;
188                 int i, idx;
189
190                 /*
191                  * Once the register value is not zero, the RAM size is
192                  * this register's value multiply 64 * 1024 * 1024.
193                  */
194                 for (rambits = 0, i = 0; i < ARRAY_SIZE(ramregs); i++) {
195                         rambits = pci_read_config8(mc_dev, ramregs[i]);
196                         if (rambits != 0)
197                                 break;
198                 }
199
200                 tomk = rambits * 64 * 1024;
201                 printk_spew("tomk is 0x%x\n", tomk);
202                 /* Compute the Top Of Low Memory (TOLM), in Kb. */
203                 tolmk = pci_tolm >> 10;
204                 if (tolmk >= tomk) {
205                         /* The PCI hole does does not overlap the memory. */
206                         tolmk = tomk;
207                 }
208
209 #if HAVE_HIGH_TABLES == 1
210                 high_tables_base = (tolmk - HIGH_TABLES_SIZE) * 1024;
211                 high_tables_size = HIGH_TABLES_SIZE* 1024;
212                 printk_debug("tom: %lx, high_tables_base: %llx, high_tables_size: %llx\n", tomk*1024, high_tables_base, high_tables_size);
213 #endif
214
215                 /* Report the memory regions. */
216                 idx = 10;
217                 /* TODO: Hole needed? */
218                 ram_resource(dev, idx++, 0, 640);       /* First 640k */
219                 /* Leave a hole for VGA, 0xa0000 - 0xc0000 */
220                 ram_resource(dev, idx++, 768,
221                              (tolmk - 768 - CONFIG_VIDEO_MB * 1024));
222         }
223         assign_resources(&dev->link[0]);
224 }
225
226 static unsigned int pci_domain_scan_bus(device_t dev, unsigned int max)
227 {
228         printk_debug("Entering cn700 pci_domain_scan_bus.\n");
229
230         max = pci_scan_bus(&dev->link[0], PCI_DEVFN(0, 0), 0xff, max);
231         return max;
232 }
233
234 static const struct device_operations pci_domain_ops = {
235         .read_resources   = pci_domain_read_resources,
236         .set_resources    = pci_domain_set_resources,
237         .enable_resources = enable_childrens_resources,
238         .init             = 0,
239         .scan_bus         = pci_domain_scan_bus,
240 };
241
242 static void cpu_bus_init(device_t dev)
243 {
244         initialize_cpus(&dev->link[0]);
245 }
246
247 static void cpu_bus_noop(device_t dev)
248 {
249 }
250
251 static const struct device_operations cpu_bus_ops = {
252         .read_resources   = cpu_bus_noop,
253         .set_resources    = cpu_bus_noop,
254         .enable_resources = cpu_bus_noop,
255         .init             = cpu_bus_init,
256         .scan_bus         = 0,
257 };
258
259 static void enable_dev(struct device *dev)
260 {
261         printk_spew("In cn700 enable_dev for device %s.\n", dev_path(dev));
262
263         /* Set the operations if it is a special bus type. */
264         if (dev->path.type == DEVICE_PATH_PCI_DOMAIN) {
265                 dev->ops = &pci_domain_ops;
266                 pci_set_method(dev);
267         } else if (dev->path.type == DEVICE_PATH_APIC_CLUSTER) {
268                 dev->ops = &cpu_bus_ops;
269         }
270 }
271
272 struct chip_operations northbridge_via_cn700_ops = {
273         CHIP_NAME("VIA CN700 Northbridge")
274         .enable_dev = enable_dev,
275 };