2 * Support for dynamic reconfiguration for PCI, Memory, and CPU
3 * Hotplug and Dynamic Logical Partitioning on RPA platforms.
5 * Copyright (C) 2009 Nathan Fontenot
6 * Copyright (C) 2009 IBM Corporation
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License version
10 * 2 as published by the Free Software Foundation.
13 #include <linux/kernel.h>
14 #include <linux/kref.h>
15 #include <linux/notifier.h>
16 #include <linux/proc_fs.h>
17 #include <linux/spinlock.h>
18 #include <linux/cpu.h>
19 #include <linux/slab.h>
20 #include "offline_states.h"
23 #include <asm/machdep.h>
24 #include <asm/uaccess.h>
26 #include <asm/pSeries_reconfig.h>
36 static void dlpar_free_cc_property(struct property *prop)
43 static struct property *dlpar_parse_cc_property(struct cc_workarea *ccwa)
45 struct property *prop;
49 prop = kzalloc(sizeof(*prop), GFP_KERNEL);
53 name = (char *)ccwa + ccwa->name_offset;
54 prop->name = kstrdup(name, GFP_KERNEL);
56 prop->length = ccwa->prop_length;
57 value = (char *)ccwa + ccwa->prop_offset;
58 prop->value = kzalloc(prop->length, GFP_KERNEL);
60 dlpar_free_cc_property(prop);
64 memcpy(prop->value, value, prop->length);
68 static struct device_node *dlpar_parse_cc_node(struct cc_workarea *ccwa)
70 struct device_node *dn;
73 dn = kzalloc(sizeof(*dn), GFP_KERNEL);
77 /* The configure connector reported name does not contain a
78 * preceeding '/', so we allocate a buffer large enough to
79 * prepend this to the full_name.
81 name = (char *)ccwa + ccwa->name_offset;
82 dn->full_name = kasprintf(GFP_KERNEL, "/%s", name);
91 static void dlpar_free_one_cc_node(struct device_node *dn)
93 struct property *prop;
95 while (dn->properties) {
96 prop = dn->properties;
97 dn->properties = prop->next;
98 dlpar_free_cc_property(prop);
101 kfree(dn->full_name);
105 static void dlpar_free_cc_nodes(struct device_node *dn)
108 dlpar_free_cc_nodes(dn->child);
111 dlpar_free_cc_nodes(dn->sibling);
113 dlpar_free_one_cc_node(dn);
116 #define NEXT_SIBLING 1
118 #define NEXT_PROPERTY 3
119 #define PREV_PARENT 4
120 #define MORE_MEMORY 5
121 #define CALL_AGAIN -2
122 #define ERR_CFG_USE -9003
124 struct device_node *dlpar_configure_connector(u32 drc_index)
126 struct device_node *dn;
127 struct device_node *first_dn = NULL;
128 struct device_node *last_dn = NULL;
129 struct property *property;
130 struct property *last_property = NULL;
131 struct cc_workarea *ccwa;
135 cc_token = rtas_token("ibm,configure-connector");
136 if (cc_token == RTAS_UNKNOWN_SERVICE)
139 spin_lock(&rtas_data_buf_lock);
140 ccwa = (struct cc_workarea *)&rtas_data_buf[0];
141 ccwa->drc_index = drc_index;
144 rc = rtas_call(cc_token, 2, 1, NULL, rtas_data_buf, NULL);
148 dn = dlpar_parse_cc_node(ccwa);
152 dn->parent = last_dn->parent;
153 last_dn->sibling = dn;
158 dn = dlpar_parse_cc_node(ccwa);
165 dn->parent = last_dn;
174 property = dlpar_parse_cc_property(ccwa);
178 if (!last_dn->properties)
179 last_dn->properties = property;
181 last_property->next = property;
183 last_property = property;
187 last_dn = last_dn->parent;
196 printk(KERN_ERR "Unexpected Error (%d) "
197 "returned from configure-connector\n", rc);
201 rc = rtas_call(cc_token, 2, 1, NULL, rtas_data_buf, NULL);
204 spin_unlock(&rtas_data_buf_lock);
209 dlpar_free_cc_nodes(first_dn);
210 spin_unlock(&rtas_data_buf_lock);
214 static struct device_node *derive_parent(const char *path)
216 struct device_node *parent;
219 last_slash = strrchr(path, '/');
220 if (last_slash == path) {
221 parent = of_find_node_by_path("/");
224 int parent_path_len = last_slash - path + 1;
225 parent_path = kmalloc(parent_path_len, GFP_KERNEL);
229 strlcpy(parent_path, path, parent_path_len);
230 parent = of_find_node_by_path(parent_path);
237 int dlpar_attach_node(struct device_node *dn)
239 #ifdef CONFIG_PROC_DEVICETREE
240 struct proc_dir_entry *ent;
244 of_node_set_flag(dn, OF_DYNAMIC);
245 kref_init(&dn->kref);
246 dn->parent = derive_parent(dn->full_name);
250 rc = blocking_notifier_call_chain(&pSeries_reconfig_chain,
251 PSERIES_RECONFIG_ADD, dn);
252 if (rc == NOTIFY_BAD) {
253 printk(KERN_ERR "Failed to add device node %s\n",
255 return -ENOMEM; /* For now, safe to assume kmalloc failure */
260 #ifdef CONFIG_PROC_DEVICETREE
261 ent = proc_mkdir(strrchr(dn->full_name, '/') + 1, dn->parent->pde);
263 proc_device_tree_add_node(dn, ent);
266 of_node_put(dn->parent);
270 int dlpar_detach_node(struct device_node *dn)
272 #ifdef CONFIG_PROC_DEVICETREE
273 struct device_node *parent = dn->parent;
274 struct property *prop = dn->properties;
277 remove_proc_entry(prop->name, dn->pde);
282 remove_proc_entry(dn->pde->name, parent->pde);
285 blocking_notifier_call_chain(&pSeries_reconfig_chain,
286 PSERIES_RECONFIG_REMOVE, dn);
288 of_node_put(dn); /* Must decrement the refcount */
293 #define DR_ENTITY_SENSE 9003
294 #define DR_ENTITY_PRESENT 1
295 #define DR_ENTITY_UNUSABLE 2
296 #define ALLOCATION_STATE 9003
297 #define ALLOC_UNUSABLE 0
298 #define ALLOC_USABLE 1
299 #define ISOLATION_STATE 9001
303 int dlpar_acquire_drc(u32 drc_index)
307 rc = rtas_call(rtas_token("get-sensor-state"), 2, 2, &dr_status,
308 DR_ENTITY_SENSE, drc_index);
309 if (rc || dr_status != DR_ENTITY_UNUSABLE)
312 rc = rtas_set_indicator(ALLOCATION_STATE, drc_index, ALLOC_USABLE);
316 rc = rtas_set_indicator(ISOLATION_STATE, drc_index, UNISOLATE);
318 rtas_set_indicator(ALLOCATION_STATE, drc_index, ALLOC_UNUSABLE);
325 int dlpar_release_drc(u32 drc_index)
329 rc = rtas_call(rtas_token("get-sensor-state"), 2, 2, &dr_status,
330 DR_ENTITY_SENSE, drc_index);
331 if (rc || dr_status != DR_ENTITY_PRESENT)
334 rc = rtas_set_indicator(ISOLATION_STATE, drc_index, ISOLATE);
338 rc = rtas_set_indicator(ALLOCATION_STATE, drc_index, ALLOC_UNUSABLE);
340 rtas_set_indicator(ISOLATION_STATE, drc_index, UNISOLATE);
347 #ifdef CONFIG_ARCH_CPU_PROBE_RELEASE
349 static int dlpar_online_cpu(struct device_node *dn)
353 int len, nthreads, i;
356 intserv = of_get_property(dn, "ibm,ppc-interrupt-server#s", &len);
360 nthreads = len / sizeof(u32);
362 cpu_maps_update_begin();
363 for (i = 0; i < nthreads; i++) {
364 for_each_present_cpu(cpu) {
365 if (get_hard_smp_processor_id(cpu) != intserv[i])
367 BUG_ON(get_cpu_current_state(cpu)
368 != CPU_STATE_OFFLINE);
369 cpu_maps_update_done();
373 cpu_maps_update_begin();
377 if (cpu == num_possible_cpus())
378 printk(KERN_WARNING "Could not find cpu to online "
379 "with physical id 0x%x\n", intserv[i]);
381 cpu_maps_update_done();
388 static ssize_t dlpar_cpu_probe(const char *buf, size_t count)
390 struct device_node *dn;
391 unsigned long drc_index;
395 cpu_hotplug_driver_lock();
396 rc = strict_strtoul(buf, 0, &drc_index);
402 dn = dlpar_configure_connector(drc_index);
408 /* configure-connector reports cpus as living in the base
409 * directory of the device tree. CPUs actually live in the
410 * cpus directory so we need to fixup the full_name.
412 cpu_name = kasprintf(GFP_KERNEL, "/cpus%s", dn->full_name);
414 dlpar_free_cc_nodes(dn);
419 kfree(dn->full_name);
420 dn->full_name = cpu_name;
422 rc = dlpar_acquire_drc(drc_index);
424 dlpar_free_cc_nodes(dn);
429 rc = dlpar_attach_node(dn);
431 dlpar_release_drc(drc_index);
432 dlpar_free_cc_nodes(dn);
436 rc = dlpar_online_cpu(dn);
438 cpu_hotplug_driver_unlock();
440 return rc ? rc : count;
443 static int dlpar_offline_cpu(struct device_node *dn)
447 int len, nthreads, i;
450 intserv = of_get_property(dn, "ibm,ppc-interrupt-server#s", &len);
454 nthreads = len / sizeof(u32);
456 cpu_maps_update_begin();
457 for (i = 0; i < nthreads; i++) {
458 for_each_present_cpu(cpu) {
459 if (get_hard_smp_processor_id(cpu) != intserv[i])
462 if (get_cpu_current_state(cpu) == CPU_STATE_OFFLINE)
465 if (get_cpu_current_state(cpu) == CPU_STATE_ONLINE) {
466 cpu_maps_update_done();
470 cpu_maps_update_begin();
476 * The cpu is in CPU_STATE_INACTIVE.
477 * Upgrade it's state to CPU_STATE_OFFLINE.
479 set_preferred_offline_state(cpu, CPU_STATE_OFFLINE);
480 BUG_ON(plpar_hcall_norets(H_PROD, intserv[i])
485 if (cpu == num_possible_cpus())
486 printk(KERN_WARNING "Could not find cpu to offline "
487 "with physical id 0x%x\n", intserv[i]);
489 cpu_maps_update_done();
496 static ssize_t dlpar_cpu_release(const char *buf, size_t count)
498 struct device_node *dn;
499 const u32 *drc_index;
502 dn = of_find_node_by_path(buf);
506 drc_index = of_get_property(dn, "ibm,my-drc-index", NULL);
512 cpu_hotplug_driver_lock();
513 rc = dlpar_offline_cpu(dn);
520 rc = dlpar_release_drc(*drc_index);
526 rc = dlpar_detach_node(dn);
528 dlpar_acquire_drc(*drc_index);
534 cpu_hotplug_driver_unlock();
535 return rc ? rc : count;
538 static int __init pseries_dlpar_init(void)
540 ppc_md.cpu_probe = dlpar_cpu_probe;
541 ppc_md.cpu_release = dlpar_cpu_release;
545 machine_device_initcall(pseries, pseries_dlpar_init);
547 #endif /* CONFIG_ARCH_CPU_PROBE_RELEASE */