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 static void pci_domain_set_resources(device_t dev)
 167 {
 168         /* The order is important to find the correct RAM size. */
 169         static const u8 ramregs[] = { 0x43, 0x42, 0x41, 0x40 };
 170         device_t mc_dev;
 171         u32 pci_tolm;
 172
 173         printk_spew("Entering cn700 pci_domain_set_resources.\n");
 174
 175         pci_tolm = find_pci_tolm(&dev->link[0]);
 176         mc_dev = dev_find_device(PCI_VENDOR_ID_VIA,
 177                                  PCI_DEVICE_ID_VIA_CN700_MEMCTRL, 0);
 178
 179         if (mc_dev) {
 180                 unsigned long tomk, tolmk;
 181                 unsigned char rambits;
 182                 int i, idx;
 183
 184                 /*
 185                  * Once the register value is not zero, the RAM size is
 186                  * this register's value multiply 64 * 1024 * 1024.
 187                  */
 188                 for (rambits = 0, i = 0; i < ARRAY_SIZE(ramregs); i++) {
 189                         rambits = pci_read_config8(mc_dev, ramregs[i]);
 190                         if (rambits != 0)
 191                                 break;
 192                 }
 193
 194                 tomk = rambits * 64 * 1024;
 195                 printk_spew("tomk is 0x%x\n", tomk);
 196                 /* Compute the Top Of Low Memory (TOLM), in Kb. */
 197                 tolmk = pci_tolm >> 10;
 198                 if (tolmk >= tomk) {
 199                         /* The PCI hole does does not overlap the memory. */
 200                         tolmk = tomk;
 201                 }
 202                 /* Report the memory regions. */
 203                 idx = 10;
 204                 /* TODO: Hole needed? */
 205                 ram_resource(dev, idx++, 0, 640);       /* First 640k */
 206                 /* Leave a hole for VGA, 0xa0000 - 0xc0000 */
 207                 ram_resource(dev, idx++, 768,
 208                              (tolmk - 768 - CONFIG_VIDEO_MB * 1024));
 209         }
 210         assign_resources(&dev->link[0]);
 211 }
 212
 213 static unsigned int pci_domain_scan_bus(device_t dev, unsigned int max)
 214 {
 215         printk_debug("Entering cn700 pci_domain_scan_bus.\n");
 216
 217         max = pci_scan_bus(&dev->link[0], PCI_DEVFN(0, 0), 0xff, max);
 218         return max;
 219 }
 220
 221 static const struct device_operations pci_domain_ops = {
 222         .read_resources   = pci_domain_read_resources,
 223         .set_resources    = pci_domain_set_resources,
 224         .enable_resources = enable_childrens_resources,
 225         .init             = 0,
 226         .scan_bus         = pci_domain_scan_bus,
 227 };
 228
 229 static void cpu_bus_init(device_t dev)
 230 {
 231         initialize_cpus(&dev->link[0]);
 232 }
 233
 234 static void cpu_bus_noop(device_t dev)
 235 {
 236 }
 237
 238 static const struct device_operations cpu_bus_ops = {
 239         .read_resources   = cpu_bus_noop,
 240         .set_resources    = cpu_bus_noop,
 241         .enable_resources = cpu_bus_noop,
 242         .init             = cpu_bus_init,
 243         .scan_bus         = 0,
 244 };
 245
 246 static void enable_dev(struct device *dev)
 247 {
 248         printk_spew("In cn700 enable_dev for device %s.\n", dev_path(dev));
 249
 250         /* Set the operations if it is a special bus type. */
 251         if (dev->path.type == DEVICE_PATH_PCI_DOMAIN) {
 252                 dev->ops = &pci_domain_ops;
 253                 pci_set_method(dev);
 254         } else if (dev->path.type == DEVICE_PATH_APIC_CLUSTER) {
 255                 dev->ops = &cpu_bus_ops;
 256         }
 257 }
 258
 259 struct chip_operations northbridge_via_cn700_ops = {
 260         CHIP_NAME("VIA CN700 Northbridge")
 261         .enable_dev = enable_dev,
 262 };