err.no Git - linux-2.6/blob - arch/x86/kernel/numaq_32.c

   1 /*
   2  * Written by: Patricia Gaughen, IBM Corporation
   3  *
   4  * Copyright (C) 2002, IBM Corp.
   5  *
   6  * All rights reserved.
   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, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
  16  * NON INFRINGEMENT.  See the GNU General Public License for more
  17  * details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  *
  23  * Send feedback to <gone@us.ibm.com>
  24  */
  25
  26 #include <linux/mm.h>
  27 #include <linux/bootmem.h>
  28 #include <linux/mmzone.h>
  29 #include <linux/module.h>
  30 #include <linux/nodemask.h>
  31 #include <asm/numaq.h>
  32 #include <asm/topology.h>
  33 #include <asm/processor.h>
  34 #include <asm/mpspec.h>
  35 #include <asm/e820.h>
  36 #include <asm/setup.h>
  37
  38 #define MB_TO_PAGES(addr) ((addr) << (20 - PAGE_SHIFT))
  39
  40 /*
  41  * Function: smp_dump_qct()
  42  *
  43  * Description: gets memory layout from the quad config table.  This
  44  * function also updates node_online_map with the nodes (quads) present.
  45  */
  46 static void __init smp_dump_qct(void)
  47 {
  48         int node;
  49         struct eachquadmem *eq;
  50         struct sys_cfg_data *scd =
  51                 (struct sys_cfg_data *)__va(SYS_CFG_DATA_PRIV_ADDR);
  52
  53         nodes_clear(node_online_map);
  54         for_each_node(node) {
  55                 if (scd->quads_present31_0 & (1 << node)) {
  56                         node_set_online(node);
  57                         eq = &scd->eq[node];
  58                         /* Convert to pages */
  59                         node_start_pfn[node] = MB_TO_PAGES(
  60                                 eq->hi_shrd_mem_start - eq->priv_mem_size);
  61                         node_end_pfn[node] = MB_TO_PAGES(
  62                                 eq->hi_shrd_mem_start + eq->hi_shrd_mem_size);
  63
  64                         e820_register_active_regions(node, node_start_pfn[node],
  65                                                         node_end_pfn[node]);
  66                         memory_present(node,
  67                                 node_start_pfn[node], node_end_pfn[node]);
  68                         node_remap_size[node] = node_memmap_size_bytes(node,
  69                                                         node_start_pfn[node],
  70                                                         node_end_pfn[node]);
  71                 }
  72         }
  73 }
  74
  75
  76 void __init numaq_tsc_disable(void)
  77 {
  78         if (!found_numaq)
  79                 return;
  80
  81         if (num_online_nodes() > 1) {
  82                 printk(KERN_DEBUG "NUMAQ: disabling TSC\n");
  83                 setup_clear_cpu_cap(X86_FEATURE_TSC);
  84         }
  85 }
  86
  87 int found_numaq;
  88 /*
  89  * Have to match translation table entries to main table entries by counter
  90  * hence the mpc_record variable .... can't see a less disgusting way of
  91  * doing this ....
  92  */
  93 struct mpc_config_translation {
  94         unsigned char mpc_type;
  95         unsigned char trans_len;
  96         unsigned char trans_type;
  97         unsigned char trans_quad;
  98         unsigned char trans_global;
  99         unsigned char trans_local;
 100         unsigned short trans_reserved;
 101 };
 102
 103 /* x86_quirks member */
 104 static int mpc_record;
 105 static struct mpc_config_translation *translation_table[MAX_MPC_ENTRY]
 106     __cpuinitdata;
 107
 108 static inline int generate_logical_apicid(int quad, int phys_apicid)
 109 {
 110         return (quad << 4) + (phys_apicid ? phys_apicid << 1 : 1);
 111 }
 112
 113 /* x86_quirks member */
 114 static int mpc_apic_id(struct mpc_config_processor *m)
 115 {
 116         int quad = translation_table[mpc_record]->trans_quad;
 117         int logical_apicid = generate_logical_apicid(quad, m->mpc_apicid);
 118
 119         printk(KERN_DEBUG "Processor #%d %u:%u APIC version %d (quad %d, apic %d)\n",
 120                m->mpc_apicid,
 121                (m->mpc_cpufeature & CPU_FAMILY_MASK) >> 8,
 122                (m->mpc_cpufeature & CPU_MODEL_MASK) >> 4,
 123                m->mpc_apicver, quad, logical_apicid);
 124         return logical_apicid;
 125 }
 126
 127 int mp_bus_id_to_node[MAX_MP_BUSSES];
 128
 129 int mp_bus_id_to_local[MAX_MP_BUSSES];
 130
 131 /* x86_quirks member */
 132 static void mpc_oem_bus_info(struct mpc_config_bus *m, char *name)
 133 {
 134         int quad = translation_table[mpc_record]->trans_quad;
 135         int local = translation_table[mpc_record]->trans_local;
 136
 137         mp_bus_id_to_node[m->mpc_busid] = quad;
 138         mp_bus_id_to_local[m->mpc_busid] = local;
 139         printk(KERN_INFO "Bus #%d is %s (node %d)\n",
 140                m->mpc_busid, name, quad);
 141 }
 142
 143 int quad_local_to_mp_bus_id [NR_CPUS/4][4];
 144
 145 /* x86_quirks member */
 146 static void mpc_oem_pci_bus(struct mpc_config_bus *m)
 147 {
 148         int quad = translation_table[mpc_record]->trans_quad;
 149         int local = translation_table[mpc_record]->trans_local;
 150
 151         quad_local_to_mp_bus_id[quad][local] = m->mpc_busid;
 152 }
 153
 154 static void __init MP_translation_info(struct mpc_config_translation *m)
 155 {
 156         printk(KERN_INFO
 157                "Translation: record %d, type %d, quad %d, global %d, local %d\n",
 158                mpc_record, m->trans_type, m->trans_quad, m->trans_global,
 159                m->trans_local);
 160
 161         if (mpc_record >= MAX_MPC_ENTRY)
 162                 printk(KERN_ERR "MAX_MPC_ENTRY exceeded!\n");
 163         else
 164                 translation_table[mpc_record] = m;      /* stash this for later */
 165         if (m->trans_quad < MAX_NUMNODES && !node_online(m->trans_quad))
 166                 node_set_online(m->trans_quad);
 167 }
 168
 169 static int __init mpf_checksum(unsigned char *mp, int len)
 170 {
 171         int sum = 0;
 172
 173         while (len--)
 174                 sum += *mp++;
 175
 176         return sum & 0xFF;
 177 }
 178
 179 /*
 180  * Read/parse the MPC oem tables
 181  */
 182
 183 static void __init smp_read_mpc_oem(struct mp_config_oemtable *oemtable,
 184                                     unsigned short oemsize)
 185 {
 186         int count = sizeof(*oemtable);  /* the header size */
 187         unsigned char *oemptr = ((unsigned char *)oemtable) + count;
 188
 189         mpc_record = 0;
 190         printk(KERN_INFO "Found an OEM MPC table at %8p - parsing it ... \n",
 191                oemtable);
 192         if (memcmp(oemtable->oem_signature, MPC_OEM_SIGNATURE, 4)) {
 193                 printk(KERN_WARNING
 194                        "SMP mpc oemtable: bad signature [%c%c%c%c]!\n",
 195                        oemtable->oem_signature[0], oemtable->oem_signature[1],
 196                        oemtable->oem_signature[2], oemtable->oem_signature[3]);
 197                 return;
 198         }
 199         if (mpf_checksum((unsigned char *)oemtable, oemtable->oem_length)) {
 200                 printk(KERN_WARNING "SMP oem mptable: checksum error!\n");
 201                 return;
 202         }
 203         while (count < oemtable->oem_length) {
 204                 switch (*oemptr) {
 205                 case MP_TRANSLATION:
 206                         {
 207                                 struct mpc_config_translation *m =
 208                                     (struct mpc_config_translation *)oemptr;
 209                                 MP_translation_info(m);
 210                                 oemptr += sizeof(*m);
 211                                 count += sizeof(*m);
 212                                 ++mpc_record;
 213                                 break;
 214                         }
 215                 default:
 216                         {
 217                                 printk(KERN_WARNING
 218                                        "Unrecognised OEM table entry type! - %d\n",
 219                                        (int)*oemptr);
 220                                 return;
 221                         }
 222                 }
 223         }
 224 }
 225
 226 static struct x86_quirks numaq_x86_quirks __initdata = {
 227         .arch_time_init         = NULL,
 228         .arch_pre_intr_init     = NULL,
 229         .arch_memory_setup      = NULL,
 230         .arch_intr_init         = NULL,
 231         .arch_trap_init         = NULL,
 232         .mach_get_smp_config    = NULL,
 233         .mach_find_smp_config   = NULL,
 234         .mpc_record             = &mpc_record,
 235         .mpc_apic_id            = mpc_apic_id,
 236         .mpc_oem_bus_info       = mpc_oem_bus_info,
 237         .mpc_oem_pci_bus        = mpc_oem_pci_bus,
 238         .smp_read_mpc_oem       = smp_read_mpc_oem,
 239 };
 240
 241 void numaq_mps_oem_check(struct mp_config_table *mpc, char *oem,
 242                                  char *productid)
 243 {
 244         if (strncmp(oem, "IBM NUMA", 8))
 245                 printk("Warning!  Not a NUMA-Q system!\n");
 246         else
 247                 found_numaq = 1;
 248 }
 249
 250 static __init void early_check_numaq(void)
 251 {
 252         /*
 253          * Find possible boot-time SMP configuration:
 254          */
 255         early_find_smp_config();
 256         /*
 257          * get boot-time SMP configuration:
 258          */
 259         if (smp_found_config)
 260                 early_get_smp_config();
 261
 262         if (found_numaq)
 263                 x86_quirks = &numaq_x86_quirks;
 264 }
 265
 266 int __init get_memcfg_numaq(void)
 267 {
 268         early_check_numaq();
 269         if (!found_numaq)
 270                 return 0;
 271         smp_dump_qct();
 272         return 1;
 273 }