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