arch/powerpc/platforms/cell/cbe_regs.c

   1 /*
   2  * cbe_regs.c
   3  *
   4  * Accessor routines for the various MMIO register blocks of the CBE
   5  *
   6  * (c) 2006 Benjamin Herrenschmidt <benh@kernel.crashing.org>, IBM Corp.
   7  */
   8
   9 #include <linux/percpu.h>
  10 #include <linux/types.h>
  11 #include <linux/module.h>
  12
  13 #include <asm/io.h>
  14 #include <asm/pgtable.h>
  15 #include <asm/prom.h>
  16 #include <asm/ptrace.h>
  17 #include <asm/of_device.h>
  18 #include <asm/of_platform.h>
  19
  20 #include "cbe_regs.h"
  21
  22 /*
  23  * Current implementation uses "cpu" nodes. We build our own mapping
  24  * array of cpu numbers to cpu nodes locally for now to allow interrupt
  25  * time code to have a fast path rather than call of_get_cpu_node(). If
  26  * we implement cpu hotplug, we'll have to install an appropriate norifier
  27  * in order to release references to the cpu going away
  28  */
  29 static struct cbe_regs_map
  30 {
  31         struct device_node *cpu_node;
  32         struct device_node *be_node;
  33         struct cbe_pmd_regs __iomem *pmd_regs;
  34         struct cbe_iic_regs __iomem *iic_regs;
  35         struct cbe_mic_tm_regs __iomem *mic_tm_regs;
  36         struct cbe_pmd_shadow_regs pmd_shadow_regs;
  37 } cbe_regs_maps[MAX_CBE];
  38 static int cbe_regs_map_count;
  39
  40 static struct cbe_thread_map
  41 {
  42         struct device_node *cpu_node;
  43         struct device_node *be_node;
  44         struct cbe_regs_map *regs;
  45         unsigned int thread_id;
  46         unsigned int cbe_id;
  47 } cbe_thread_map[NR_CPUS];
  48
  49 static cpumask_t cbe_local_mask[MAX_CBE] = { [0 ... MAX_CBE-1] = CPU_MASK_NONE };
  50 static cpumask_t cbe_first_online_cpu = CPU_MASK_NONE;
  51
  52 static struct cbe_regs_map *cbe_find_map(struct device_node *np)
  53 {
  54         int i;
  55         struct device_node *tmp_np;
  56
  57         if (strcasecmp(np->type, "spe")) {
  58                 for (i = 0; i < cbe_regs_map_count; i++)
  59                         if (cbe_regs_maps[i].cpu_node == np ||
  60                             cbe_regs_maps[i].be_node == np)
  61                                 return &cbe_regs_maps[i];
  62                 return NULL;
  63         }
  64
  65         if (np->data)
  66                 return np->data;
  67
  68         /* walk up path until cpu or be node was found */
  69         tmp_np = np;
  70         do {
  71                 tmp_np = tmp_np->parent;
  72                 /* on a correct devicetree we wont get up to root */
  73                 BUG_ON(!tmp_np);
  74         } while (strcasecmp(tmp_np->type, "cpu") &&
  75                  strcasecmp(tmp_np->type, "be"));
  76
  77         np->data = cbe_find_map(tmp_np);
  78
  79         return np->data;
  80 }
  81
  82 struct cbe_pmd_regs __iomem *cbe_get_pmd_regs(struct device_node *np)
  83 {
  84         struct cbe_regs_map *map = cbe_find_map(np);
  85         if (map == NULL)
  86                 return NULL;
  87         return map->pmd_regs;
  88 }
  89 EXPORT_SYMBOL_GPL(cbe_get_pmd_regs);
  90
  91 struct cbe_pmd_regs __iomem *cbe_get_cpu_pmd_regs(int cpu)
  92 {
  93         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
  94         if (map == NULL)
  95                 return NULL;
  96         return map->pmd_regs;
  97 }
  98 EXPORT_SYMBOL_GPL(cbe_get_cpu_pmd_regs);
  99
 100 struct cbe_pmd_shadow_regs *cbe_get_pmd_shadow_regs(struct device_node *np)
 101 {
 102         struct cbe_regs_map *map = cbe_find_map(np);
 103         if (map == NULL)
 104                 return NULL;
 105         return &map->pmd_shadow_regs;
 106 }
 107
 108 struct cbe_pmd_shadow_regs *cbe_get_cpu_pmd_shadow_regs(int cpu)
 109 {
 110         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
 111         if (map == NULL)
 112                 return NULL;
 113         return &map->pmd_shadow_regs;
 114 }
 115
 116 struct cbe_iic_regs __iomem *cbe_get_iic_regs(struct device_node *np)
 117 {
 118         struct cbe_regs_map *map = cbe_find_map(np);
 119         if (map == NULL)
 120                 return NULL;
 121         return map->iic_regs;
 122 }
 123
 124 struct cbe_iic_regs __iomem *cbe_get_cpu_iic_regs(int cpu)
 125 {
 126         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
 127         if (map == NULL)
 128                 return NULL;
 129         return map->iic_regs;
 130 }
 131
 132 struct cbe_mic_tm_regs __iomem *cbe_get_mic_tm_regs(struct device_node *np)
 133 {
 134         struct cbe_regs_map *map = cbe_find_map(np);
 135         if (map == NULL)
 136                 return NULL;
 137         return map->mic_tm_regs;
 138 }
 139
 140 struct cbe_mic_tm_regs __iomem *cbe_get_cpu_mic_tm_regs(int cpu)
 141 {
 142         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
 143         if (map == NULL)
 144                 return NULL;
 145         return map->mic_tm_regs;
 146 }
 147 EXPORT_SYMBOL_GPL(cbe_get_cpu_mic_tm_regs);
 148
 149 u32 cbe_get_hw_thread_id(int cpu)
 150 {
 151         return cbe_thread_map[cpu].thread_id;
 152 }
 153 EXPORT_SYMBOL_GPL(cbe_get_hw_thread_id);
 154
 155 u32 cbe_cpu_to_node(int cpu)
 156 {
 157         return cbe_thread_map[cpu].cbe_id;
 158 }
 159 EXPORT_SYMBOL_GPL(cbe_cpu_to_node);
 160
 161 u32 cbe_node_to_cpu(int node)
 162 {
 163         return find_first_bit( (unsigned long *) &cbe_local_mask[node], sizeof(cpumask_t));
 164 }
 165 EXPORT_SYMBOL_GPL(cbe_node_to_cpu);
 166
 167 static struct device_node *cbe_get_be_node(int cpu_id)
 168 {
 169         struct device_node *np;
 170
 171         for_each_node_by_type (np, "be") {
 172                 int len,i;
 173                 const phandle *cpu_handle;
 174
 175                 cpu_handle = of_get_property(np, "cpus", &len);
 176
 177                 /*
 178                  * the CAB SLOF tree is non compliant, so we just assume
 179                  * there is only one node
 180                  */
 181                 if (WARN_ON_ONCE(!cpu_handle))
 182                         return np;
 183
 184                 for (i=0; i<len; i++)
 185                         if (of_find_node_by_phandle(cpu_handle[i]) == of_get_cpu_node(cpu_id, NULL))
 186                                 return np;
 187         }
 188
 189         return NULL;
 190 }
 191
 192 void __init cbe_fill_regs_map(struct cbe_regs_map *map)
 193 {
 194         if(map->be_node) {
 195                 struct device_node *be, *np;
 196
 197                 be = map->be_node;
 198
 199                 for_each_node_by_type(np, "pervasive")
 200                         if (of_get_parent(np) == be)
 201                                 map->pmd_regs = of_iomap(np, 0);
 202
 203                 for_each_node_by_type(np, "CBEA-Internal-Interrupt-Controller")
 204                         if (of_get_parent(np) == be)
 205                                 map->iic_regs = of_iomap(np, 2);
 206
 207                 for_each_node_by_type(np, "mic-tm")
 208                         if (of_get_parent(np) == be)
 209                                 map->mic_tm_regs = of_iomap(np, 0);
 210         } else {
 211                 struct device_node *cpu;
 212                 /* That hack must die die die ! */
 213                 const struct address_prop {
 214                         unsigned long address;
 215                         unsigned int len;
 216                 } __attribute__((packed)) *prop;
 217
 218                 cpu = map->cpu_node;
 219
 220                 prop = of_get_property(cpu, "pervasive", NULL);
 221                 if (prop != NULL)
 222                         map->pmd_regs = ioremap(prop->address, prop->len);
 223
 224                 prop = of_get_property(cpu, "iic", NULL);
 225                 if (prop != NULL)
 226                         map->iic_regs = ioremap(prop->address, prop->len);
 227
 228                 prop = of_get_property(cpu, "mic-tm", NULL);
 229                 if (prop != NULL)
 230                         map->mic_tm_regs = ioremap(prop->address, prop->len);
 231         }
 232 }
 233
 234
 235 void __init cbe_regs_init(void)
 236 {
 237         int i;
 238         unsigned int thread_id;
 239         struct device_node *cpu;
 240
 241         /* Build local fast map of CPUs */
 242         for_each_possible_cpu(i) {
 243                 cbe_thread_map[i].cpu_node = of_get_cpu_node(i, &thread_id);
 244                 cbe_thread_map[i].be_node = cbe_get_be_node(i);
 245                 cbe_thread_map[i].thread_id = thread_id;
 246         }
 247
 248         /* Find maps for each device tree CPU */
 249         for_each_node_by_type(cpu, "cpu") {
 250                 struct cbe_regs_map *map;
 251                 unsigned int cbe_id;
 252
 253                 cbe_id = cbe_regs_map_count++;
 254                 map = &cbe_regs_maps[cbe_id];
 255
 256                 if (cbe_regs_map_count > MAX_CBE) {
 257                         printk(KERN_ERR "cbe_regs: More BE chips than supported"
 258                                "!\n");
 259                         cbe_regs_map_count--;
 260                         return;
 261                 }
 262                 map->cpu_node = cpu;
 263
 264                 for_each_possible_cpu(i) {
 265                         struct cbe_thread_map *thread = &cbe_thread_map[i];
 266
 267                         if (thread->cpu_node == cpu) {
 268                                 thread->regs = map;
 269                                 thread->cbe_id = cbe_id;
 270                                 map->be_node = thread->be_node;
 271                                 cpu_set(i, cbe_local_mask[cbe_id]);
 272                                 if(thread->thread_id == 0)
 273                                         cpu_set(i, cbe_first_online_cpu);
 274                         }
 275                 }
 276
 277                 cbe_fill_regs_map(map);
 278         }
 279 }
 280