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 ram_resource(device_t dev, unsigned long index,
 101                          unsigned long basek, unsigned long sizek)
 102 {
 103         struct resource *resource;
 104
 105         if (!sizek)
 106                 return;
 107
 108         resource = new_resource(dev, index);
 109         resource->base = ((resource_t) basek) << 10;
 110         resource->size = ((resource_t) sizek) << 10;
 111         resource->flags = IORESOURCE_MEM | IORESOURCE_CACHEABLE |
 112             IORESOURCE_FIXED | IORESOURCE_STORED | IORESOURCE_ASSIGNED;
 113 }
 114
 115 static void tolm_test(void *gp, struct device *dev, struct resource *new)
 116 {
 117         struct resource **best_p = gp;
 118         struct resource *best;
 119
 120         best = *best_p;
 121         if (!best || (best->base > new->base))
 122                 best = new;
 123         *best_p = best;
 124 }
 125
 126 static u32 find_pci_tolm(struct bus *bus)
 127 {
 128         struct resource *min;
 129         u32 tolm;
 130
 131         print_debug("Entering find_pci_tolm\n");
 132
 133         min = 0;
 134         search_bus_resources(bus, IORESOURCE_MEM, IORESOURCE_MEM,
 135                              tolm_test, &min);
 136         tolm = 0xffffffffUL;
 137         if (min && tolm > min->base)
 138                 tolm = min->base;
 139
 140         print_debug("Leaving find_pci_tolm\n");
 141
 142         return tolm;
 143 }
 144
 145 #if CONFIG_WRITE_HIGH_TABLES==1
 146 /* maximum size of high tables in KB */
 147 #define HIGH_TABLES_SIZE 64
 148 extern uint64_t high_tables_base, high_tables_size;
 149 #endif
 150
 151 static void pci_domain_set_resources(device_t dev)
 152 {
 153         /* The order is important to find the correct RAM size. */
 154         static const u8 ramregs[] = { 0x43, 0x42, 0x41, 0x40 };
 155         device_t mc_dev;
 156         u32 pci_tolm;
 157
 158         printk(BIOS_SPEW, "Entering cn700 pci_domain_set_resources.\n");
 159
 160         pci_tolm = find_pci_tolm(dev->link_list);
 161         mc_dev = dev_find_device(PCI_VENDOR_ID_VIA,
 162                                  PCI_DEVICE_ID_VIA_CN700_MEMCTRL, 0);
 163
 164         if (mc_dev) {
 165                 unsigned long tomk, tolmk;
 166                 unsigned char rambits;
 167                 int i, idx;
 168
 169                 /*
 170                  * Once the register value is not zero, the RAM size is
 171                  * this register's value multiply 64 * 1024 * 1024.
 172                  */
 173                 for (rambits = 0, i = 0; i < ARRAY_SIZE(ramregs); i++) {
 174                         rambits = pci_read_config8(mc_dev, ramregs[i]);
 175                         if (rambits != 0)
 176                                 break;
 177                 }
 178
 179                 tomk = rambits * 64 * 1024;
 180                 printk(BIOS_DEBUG, "tomk is 0x%lx\n", tomk);
 181                 /* Compute the Top Of Low Memory (TOLM), in Kb. */
 182                 tolmk = pci_tolm >> 10;
 183                 if (tolmk >= tomk) {
 184                         /* The PCI hole does does not overlap the memory. */
 185                         tolmk = tomk;
 186                 }
 187
 188 #if CONFIG_WRITE_HIGH_TABLES == 1
 189                 high_tables_base = (tolmk - CONFIG_VIDEO_MB * 1024 - HIGH_TABLES_SIZE) * 1024;
 190                 high_tables_size = HIGH_TABLES_SIZE * 1024;
 191                 printk(BIOS_DEBUG, "tom: %lx, high_tables_base: %llx, high_tables_size: %llx\n", tomk*1024, high_tables_base, high_tables_size);
 192 #endif
 193
 194                 /* Report the memory regions. */
 195                 idx = 10;
 196                 /* TODO: Hole needed? */
 197                 ram_resource(dev, idx++, 0, 640);       /* First 640k */
 198                 /* Leave a hole for VGA, 0xa0000 - 0xc0000 */
 199                 ram_resource(dev, idx++, 768,
 200                              (tolmk - 768 - CONFIG_VIDEO_MB * 1024));
 201         }
 202         assign_resources(dev->link_list);
 203 }
 204
 205 static struct device_operations pci_domain_ops = {
 206         .read_resources   = pci_domain_read_resources,
 207         .set_resources    = pci_domain_set_resources,
 208         .enable_resources = NULL,
 209         .init             = NULL,
 210         .scan_bus         = pci_domain_scan_bus,
 211 };
 212
 213 static void cpu_bus_init(device_t dev)
 214 {
 215         initialize_cpus(dev->link_list);
 216 }
 217
 218 static void cpu_bus_noop(device_t dev)
 219 {
 220 }
 221
 222 static struct device_operations cpu_bus_ops = {
 223         .read_resources   = cpu_bus_noop,
 224         .set_resources    = cpu_bus_noop,
 225         .enable_resources = cpu_bus_noop,
 226         .init             = cpu_bus_init,
 227         .scan_bus         = 0,
 228 };
 229
 230 static void enable_dev(struct device *dev)
 231 {
 232         printk(BIOS_SPEW, "In cn700 enable_dev for device %s.\n", dev_path(dev));
 233
 234         /* Set the operations if it is a special bus type. */
 235         if (dev->path.type == DEVICE_PATH_PCI_DOMAIN) {
 236                 dev->ops = &pci_domain_ops;
 237                 pci_set_method(dev);
 238         } else if (dev->path.type == DEVICE_PATH_APIC_CLUSTER) {
 239                 dev->ops = &cpu_bus_ops;
 240         }
 241 }
 242
 243 struct chip_operations northbridge_via_cn700_ops = {
 244         CHIP_NAME("VIA CN700 Northbridge")
 245         .enable_dev = enable_dev,
 246 };