/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2009 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#include <sys/types.h>
#include <sys/cmn_err.h>
#include <sys/conf.h>
#include <sys/ddi_impldefs.h>
#include <sys/autoconf.h>
#include <sys/systm.h>
#include <sys/modctl.h>
#include <sys/ddi.h>
#include <sys/sunddi.h>
#include <sys/sunndi.h>
#include <sys/ndi_impldefs.h>
#include <sys/promif.h>
#include <sys/stat.h>
#include <sys/kmem.h>
#include <sys/promif.h>
#include <sys/conf.h>
#include <sys/obpdefs.h>
#include <sys/cpuvar.h>
#include <vm/seg_kmem.h>
#include <sys/prom_plat.h>
#include <sys/machsystm.h>
#include <sys/note.h>
#include <sys/memlist.h>
#include <sys/ssm.h>
#include <sys/sbd_ioctl.h>
#include <sys/sbd.h>
#include <sys/sbdp_priv.h>
#include <sys/sbdp_mem.h>
#include <sys/sbdp_error.h>
#include <sys/serengeti.h>
#include <sys/sgsbbc.h> /* To get fn_t type definition */
/*
* Config information
*/
#ifdef DEBUG
uint_t sbdp_debug = 0x0;
#endif /* DEBUG */
/*
* Enable or disable dr
*/
int sbdp_dr_available = 1;
/* name properties for some Serengeti device nodes */
#define CMP_DEVNAME "cmp"
#define MEM_DEVNAME "memory"
#define CPU_DEVNAME "cpu"
#define IO_PCI_DEVNAME "pci"
#define IO_SGHSC_DEVNAME "sghsc"
#define IO_WCI_DEVNAME "wci"
static sbd_devattr_t sbdp_devattr[] = {
{ CMP_DEVNAME, "cmp", SBD_COMP_CMP },
{ MEM_DEVNAME, "memory-controller", SBD_COMP_MEM },
{ CPU_DEVNAME, "cpu", SBD_COMP_CPU },
{ IO_PCI_DEVNAME, "pci", SBD_COMP_IO },
{ IO_SGHSC_DEVNAME, "sghsc", SBD_COMP_IO },
{ IO_WCI_DEVNAME, "wci", SBD_COMP_IO },
/* last item must be blank */
{ NULL, NULL, SBD_COMP_UNKNOWN }
};
/*
* In the case of a busy mbox, if a status cmd comes in we return a cached
* copy. This cache is a link list of wnodes that contains bd structs with
* the appropriate info. When a new wnode is created a whole entry is added
* to the list.
*/
sbdp_wnode_t *first_node = NULL; /* first wnode. Entry to the link list */
int cur_num_wnodes = 0; /* how many nodes are currently running */
/* Macros to access fields in the previous array */
#define SBDP_CT(i) sbdp_devattr[i].s_dnodetype
#define SBDP_DEVNAME(i) sbdp_devattr[(i)].s_devname
#define SBDP_OTYPE(i) sbdp_devattr[(i)].s_obp_type
/*
* Prototypes
*/
sbdp_wnode_t *sbdp_get_wnodep(int);
/*
* Module linkage information for the kernel.
*/
static struct modlmisc modlmisc = {
&mod_miscops,
"Serengeti sbdp",
};
static struct modlinkage modlinkage = {
MODREV_1,
(void *)&modlmisc,
NULL
};
/*
* VA area used during CPU shutdown.
*/
caddr_t sbdp_shutdown_va;
/*
* Mutex to protect our inventory
*/
kmutex_t sbdp_wnode_mutex;
int
_init(void)
{
int e;
e = mod_install(&modlinkage);
if (e != 0)
return (e);
sbdp_shutdown_va = vmem_alloc(heap_arena, PAGESIZE, VM_SLEEP);
ASSERT(sbdp_shutdown_va != NULL);
sbdp_valp = (uint64_t *)vmem_alloc(static_alloc_arena,
sizeof (uint64_t), VM_SLEEP);
mutex_init(&sbdp_wnode_mutex, NULL, MUTEX_DRIVER, NULL);
return (e);
}
int
_fini(void)
{
int e;
/*
* Remove the module.
*/
e = mod_remove(&modlinkage);
if (e != 0)
return (e);
vmem_free(heap_arena, sbdp_shutdown_va, PAGESIZE);
sbdp_shutdown_va = NULL;
vmem_free(static_alloc_arena, (void *)sbdp_valp, sizeof (uint64_t));
sbdp_valp = NULL;
mutex_destroy(&sbdp_wnode_mutex);
return (e);
}
int
_info(struct modinfo *modinfop)
{
return (mod_info(&modlinkage, modinfop));
}
int
sbdp_get_bd_and_wnode_num(pnode_t nodeid, int *bd, int *wnode)
{
int portid;
static fn_t f = "sbdp_get_bd_and_wnode_num";
extern int get_portid(pnode_t node, pnode_t *cmpp);
SBDP_DBG_FUNC("%s\n", f);
if (sbdp_is_node_bad(nodeid))
return (-1);
if ((portid = get_portid(nodeid, NULL)) == -1)
return (-1);
/*
* decode the board number
*/
*bd = SG_PORTID_TO_BOARD_NUM(portid);
*wnode = SG_PORTID_TO_NODEID(portid);
return (0);
}
int
sbdp_get_board_num(sbdp_handle_t *hp, dev_info_t *dip)
{
_NOTE(ARGUNUSED(hp))
pnode_t nodeid;
int bd, wnode;
static fn_t f = "sbdp_get_board_num";
SBDP_DBG_FUNC("%s\n", f);
if (dip == NULL)
return (-1);
nodeid = ddi_get_nodeid(dip);
/*
* Portid has encoded the nodeid and the agent id. The top
* 4 bits are correspond to the wcnodeid and the lower 5 are the
* agent id.
* Each agent id represents a physical location hence we can
* obtain the board number
*/
if (sbdp_get_bd_and_wnode_num(nodeid, &bd, &wnode) < 0)
return (-1);
return (bd);
}
sbd_devattr_t *
sbdp_get_devattr(void)
{
return (&sbdp_devattr[0]);
}
int
sbdp_portid_to_cpu_unit(int cmp, int core)
{
return (SG_PORTID_TO_CPU_UNIT(cmp, core));
}
int
sbdp_get_unit_num(sbdp_handle_t *hp, dev_info_t *dip)
{
int unit = -1;
int portid;
processorid_t cpuid;
sbd_comp_type_t type;
char dev_type[OBP_MAXPROPNAME];
int i;
pnode_t nodeid;
static fn_t f = "sbdp_get_unit_num";
SBDP_DBG_FUNC("%s\n", f);
if (dip == NULL)
return (-1);
nodeid = ddi_get_nodeid(dip);
if (sbdp_is_node_bad(nodeid))
return (-1);
if (prom_getprop(nodeid, "device_type", (caddr_t)dev_type) < 0) {
SBDP_DBG_MISC("%s: couldn't get device_type\n", f);
return (-1);
}
for (i = 0; SBDP_CT(i) != SBD_COMP_UNKNOWN; i++) {
if (strcmp(dev_type, SBDP_OTYPE(i)) != 0)
continue;
type = SBDP_CT(i);
}
switch (type) {
case SBD_COMP_CPU:
if ((cpuid = sbdp_get_cpuid(hp, dip)) != -1) {
unit = SG_CPUID_TO_CPU_UNIT(cpuid);
}
break;
case SBD_COMP_MEM:
unit = 0;
break;
case SBD_COMP_IO: {
regspace_t regs[3];
int len = 0;
/*
* Check to see if this is a cpci node
* cpci nodes are assign unit nums of 5 for now
* So they don't conflict with the pci unit nums
*/
if (strcmp(dev_type, "sghsc") == 0) {
SBDP_DBG_MISC("it is a sghsc\n");
return (4);
}
if (prom_getprop(nodeid, "portid", (caddr_t)&portid) <= 0) {
SBDP_DBG_MISC("%s: couldn't get portid\n", f);
return (-1);
}
len = prom_getproplen(nodeid, "reg");
if (len <= 0) {
SBDP_DBG_MISC("%s: couldn't get length\n", f);
return (-1);
}
if (prom_getprop(nodeid, "reg", (caddr_t)regs) < 0) {
SBDP_DBG_MISC("%s: couldn't get registers\n", f);
return (-1);
}
if ((portid % 2) != 0)
if ((regs[0].regspec_addr_lo & 0x700000) ==
0x700000)
unit = 0;
else
unit = 1;
else
if ((regs[0].regspec_addr_lo & 0x700000) ==
0x700000)
unit = 2;
else
unit = 3;
SBDP_DBG_MISC("unit is %d\n", unit);
break;
}
default:
break;
}
return (unit);
}
struct sbdp_mem_dip {
sbdp_bd_t *bdp;
dev_info_t *dip;
};
static int
sbdp_get_mem_dip(pnode_t node, void *arg, uint_t flags)
{
_NOTE(ARGUNUSED(flags))
struct sbdp_mem_dip *smdp = (struct sbdp_mem_dip *)arg;
mem_op_t mem = {0};
if (node == OBP_NONODE || node == OBP_BADNODE)
return (DDI_FAILURE);
mem.nodes = smdp->bdp->nodes;
mem.board = smdp->bdp->bd;
mem.nmem = smdp->bdp->nnum;
(void) sbdp_is_mem(node, &mem);
/*
* We need to find the dip only for the first nodeid
*/
if (smdp->bdp->nnum == 0 && mem.nmem == 1) {
ASSERT(smdp->dip == NULL);
smdp->dip = e_ddi_nodeid_to_dip(node);
}
smdp->bdp->nnum = mem.nmem;
return (DDI_SUCCESS);
}
/*
* Update the board info. Required after a copy rename
*/
void
sbdp_update_bd_info(sbdp_bd_t *bdp)
{
attach_pkt_t apkt, *apktp = &apkt;
struct sbdp_mem_dip smd = {0};
static fn_t f = "sbdp_update_bd_info";
SBDP_DBG_FUNC("%s\n", f);
if (bdp == NULL) {
return;
}
/*
* Grab the lock
*/
mutex_enter(&bdp->bd_mutex);
/*
* we get the top nodes here. This will have a side effect of
* updating the present bit for cpus
*/
apktp->node = bdp->wnode;
apktp->board = bdp->bd;
apktp->num_of_nodes = 0;
apktp->flags = 0;
sbdp_walk_prom_tree(prom_rootnode(), sbdp_select_top_nodes,
(void *) apktp);
/*
* We need to clear nnum since we are looking again for the
* nodes
*/
bdp->nnum = 0;
smd.bdp = bdp;
/*
* If a dip is found by sbdp_get_mem_dip(), it will be
* returned held
*/
sbdp_walk_prom_tree(prom_rootnode(), sbdp_get_mem_dip, &smd);
if (smd.dip != NULL) {
sbdp_handle_t *hp;
hp = kmem_zalloc(sizeof (sbdp_handle_t), KM_SLEEP);
hp->h_board = bdp->bd;
hp->h_wnode = bdp->wnode;
hp->h_err = kmem_zalloc(sizeof (*hp->h_err), KM_SLEEP);
if (bdp->ml != NULL) {
(void) sbdp_del_memlist(hp, bdp->ml);
}
bdp->ml = sbdp_get_memlist(hp, (dev_info_t *)NULL);
/*
* if the board doesn't have banks initialize them,
* otherwise we assume they have been updated if
* necessary
*/
if (bdp->banks == NULL) {
sbdp_init_bd_banks(bdp);
}
#ifdef DEBUG
sbdp_print_bd_banks(bdp);
#endif
if (sbdphw_get_base_physaddr(hp, smd.dip, &bdp->bpa))
bdp->bpa = -1;
ddi_release_devi(smd.dip);
kmem_free(hp->h_err, sizeof (*hp->h_err));
kmem_free(hp, sizeof (sbdp_handle_t));
}
mutex_exit(&bdp->bd_mutex);
}
/*
* Initialize the board struct. This remains cached. We update it
* every time we have a successful show_board and after a copy-rename
*/
void
sbdp_bd_init(sbdp_bd_t *bdp, int bd, int wnode)
{
static fn_t f = "sbdp_bd_init";
SBDP_DBG_FUNC("%s\n", f);
bdp->bd = bd;
bdp->wnode = wnode;
SBDP_UNSET_ALL_CPUS_IN_RESET(bdp);
bdp->cpus_present = 0;
sbdp_update_bd_info(bdp);
mutex_init(&bdp->bd_mutex, NULL, MUTEX_DRIVER, NULL);
bdp->bd_sc = (show_board_t *)kmem_zalloc(sizeof (show_board_t),
KM_SLEEP);
bdp->valid_cp = -1;
}
/*
* This entry is going away. Clean up
*/
void
sbdp_bd_fini(sbdp_bd_t *bdp)
{
static fn_t f = "sbdp_bd_fini";
SBDP_DBG_FUNC("%s\n", f);
sbdp_cleanup_bd(bdp->wnode, bdp->bd);
kmem_free(bdp->bd_sc, sizeof (show_board_t));
bdp->bd_sc = NULL;
mutex_destroy(&bdp->bd_mutex);
#ifdef DEBUG
sbdp_print_all_segs();
#endif
}
/*
* A new wnode has arrived. Initialize the struct and create
* the board structures.
*/
void
sbdp_wnode_init(sbdp_wnode_t *wnodep, int wnode, int boards)
{
int i;
static fn_t f = "sbdp_wnode_init";
SBDP_DBG_FUNC("%s\n", f);
wnodep->wnode = wnode;
wnodep->nbds = boards;
wnodep->bds = kmem_zalloc(sizeof (sbdp_bd_t) * boards, KM_SLEEP);
wnodep->next = wnodep->prev = NULL;
for (i = 0; i < boards; i++)
sbdp_bd_init(&wnodep->bds[i], i, wnode);
}
/*
* Wnode got DRed out. Clean up all the node stuff including the boards
*/
void
sbdp_wnode_fini(sbdp_wnode_t *wnodep)
{
int boards;
int i;
static fn_t f = "sbdp_wnode_fini";
SBDP_DBG_FUNC("%s\n", f);
boards = wnodep->nbds;
for (i = 0; i < boards; i++)
sbdp_bd_fini(&wnodep->bds[i]);
kmem_free(wnodep->bds, sizeof (sbdp_bd_t) * boards);
wnodep->next = wnodep->prev = NULL;
kmem_free(wnodep, sizeof (sbdp_wnode_t));
}
/*
* Add all the necessary fields to this board's struct
*/
void
sbdp_add_new_bd_info(int wnode, int board)
{
sbdp_wnode_t *cur;
static fn_t f = "sbdp_add_new_bd_info";
SBDP_DBG_FUNC("%s\n", f);
cur = sbdp_get_wnodep(wnode);
SBDP_DBG_MISC("adding new board info %d\n", board);
sbdp_update_bd_info(&cur->bds[board]);
}
/*
* This board has gone away. Clean the necessary fields
*/
void
sbdp_cleanup_bd(int wnode, int board)
{
sbdp_wnode_t *cur;
sbdp_handle_t handle, *hp;
sbdp_bd_t *bdp;
int i;
static fn_t f = "sbdp_cleanup_bd";
SBDP_DBG_FUNC("%s\n", f);
cur = sbdp_get_wnodep(wnode);
SBDP_DBG_MISC("cleaning up bd info for bd %d\n", board);
if (cur == NULL) {
SBDP_DBG_MISC("cur is null\n");
return;
}
bdp = &cur->bds[board];
/*
* Grab the lock
*/
mutex_enter(&bdp->bd_mutex);
for (i = 0; i < bdp->nnum; i++)
bdp->nodes[i] = (pnode_t)0;
bdp->nnum = 0;
sbdp_fini_bd_banks(bdp);
hp = &handle;
hp->h_board = bdp->bd;
hp->h_wnode = bdp->wnode;
if (bdp->ml) {
(void) sbdp_del_memlist(hp, bdp->ml);
}
bdp->ml = NULL;
bdp->bpa = -1;
sbdp_cpu_in_reset(wnode, bdp->bd, SBDP_ALL_CPUS, 0);
bdp->cpus_present = 0;
mutex_exit(&bdp->bd_mutex);
}
/*
* Traverse the list looking for wnode. Return it when found
*/
sbdp_wnode_t *
sbdp_get_wnodep(int wnode)
{
sbdp_wnode_t *cur;
int i;
static fn_t f = "sbdp_get_wnodep";
SBDP_DBG_FUNC("%s\n", f);
mutex_enter(&sbdp_wnode_mutex);
for (i = 0, cur = first_node; i < cur_num_wnodes; i++,
cur = cur->next) {
if (cur->wnode == wnode) {
mutex_exit(&sbdp_wnode_mutex);
return (cur);
}
}
mutex_exit(&sbdp_wnode_mutex);
return (NULL);
}
/*
* Insert this brand new node into our master list. It leaves it all
* initialized
*/
void
sbdp_insert_wnode(int wnode, int max_boards)
{
sbdp_wnode_t *wnodep;
sbdp_wnode_t *cur;
static fn_t f = "sbdp_insert_wnode";
SBDP_DBG_FUNC("%s\n", f);
wnodep = kmem_zalloc(sizeof (sbdp_wnode_t), KM_SLEEP);
mutex_enter(&sbdp_wnode_mutex);
if (first_node == NULL) {
first_node = wnodep;
cur_num_wnodes++;
} else {
cur = first_node + cur_num_wnodes++;
cur->next = wnodep;
wnodep->prev = cur;
}
mutex_exit(&sbdp_wnode_mutex);
sbdp_wnode_init(wnodep, wnode, max_boards);
}
/*
* This node is gone. Remove it from the list and also clean up
*/
void
sbdp_remove_wnode(sbdp_wnode_t *wnodep)
{
sbdp_wnode_t *cur;
static fn_t f = "sbdp_remove_wnode";
SBDP_DBG_FUNC("%s\n", f);
if (wnodep != NULL) {
sbdp_wnode_fini(wnodep);
mutex_enter(&sbdp_wnode_mutex);
if (first_node == wnodep)
first_node = NULL;
else {
cur = wnodep->prev;
if (cur != NULL)
cur->next = wnodep->next;
if (wnodep->next != NULL)
wnodep->next->prev = cur;
}
cur_num_wnodes--;
mutex_exit(&sbdp_wnode_mutex);
}
}
/*
* Entry point from sbd. This is called when a new node is added. We
* create an entry in our inventory and initialize all the stuff that will be
* needed
*/
int
sbdp_setup_instance(caddr_t arg)
{
ssm_sbdp_info_t *sbdp_info;
int instance;
int wnode;
int max_boards;
static fn_t f = "sbdp_setup_instance";
SBDP_DBG_FUNC("%s\n", f);
/*
* We get this directly from ssm
*/
sbdp_info = (ssm_sbdp_info_t *)arg;
instance = sbdp_info->instance;
wnode = sbdp_info->wnode;
max_boards = plat_max_boards();
SBDP_DBG_MISC("sbdp_setup_instance: instance %d wnode %d\n", instance,
sbdp_info->wnode);
if (sbdp_get_wnodep(wnode) == NULL) {
/*
* This node has not been instanstiated
* create one
*/
sbdp_insert_wnode(wnode, max_boards);
}
return (DDI_SUCCESS);
}
/*
* Entry point from sbd. This is called when a node has been removed (or is
* going away. We do all the necessary cleanup
*/
int
sbdp_teardown_instance(caddr_t arg)
{
ssm_sbdp_info_t *sbdp_info;
int instance;
int wnode;
sbdp_wnode_t *wnodep;
static fn_t f = "sbdp_teardown_instance";
SBDP_DBG_FUNC("%s\n", f);
/*
* ssm should have set this up
*/
sbdp_info = (ssm_sbdp_info_t *)arg;
instance = sbdp_info->instance;
wnode = sbdp_info->wnode;
SBDP_DBG_MISC("sbdp_teardown_instance: instance %d wnode %d\n",
instance, wnode);
/*
* Find this node and then remove it
*/
if ((wnodep = sbdp_get_wnodep(wnode)) != NULL) {
sbdp_remove_wnode(wnodep);
}
return (DDI_SUCCESS);
}
int
sbdp_disabled_component(sbdp_handle_t *hp)
{
#ifdef lint
hp = hp;
#endif
return (0);
}
/* ARGSUSED */
int
sbdp_release_component(sbdp_handle_t *hp, dev_info_t *dip)
{
return (0);
}
void
sbdp_set_err(sbd_error_t *ep, int ecode, char *rsc)
{
static fn_t f = "sbdp_set_err";
SBDP_DBG_FUNC("%s\n", f);
ASSERT(ep != NULL);
ep->e_code = ecode;
if (rsc != NULL) {
(void) strcpy((caddr_t)(ep->e_rsc), (caddr_t)rsc);
}
}
/*
* Serengeti DR passthrus are for debugging purposes only.
*/
static struct {
const char *name;
int (*handler)(sbdp_handle_t *, void *);
} sbdp_passthrus[] = {
#ifdef DEBUG
{ "readmem", sbdp_passthru_readmem },
{ "prep-script", sbdp_passthru_prep_script },
{ "test-quiesce", sbdp_passthru_test_quiesce },
{ "inject-error", sbdp_passthru_inject_error },
{ "reset-error", sbdp_passthru_reset_error },
#endif
/* the following line must always be last */
{ NULL, NULL }
};
/*ARGSUSED*/
int
sbdp_ioctl(sbdp_handle_t *hp, sbdp_ioctl_arg_t *sbdpi)
{
#ifdef DEBUG
char buf[512];
int rv;
sbd_ioctl_arg_t *sbdi = (sbd_ioctl_arg_t *)sbdpi->h_iap;
int i;
static fn_t f = "sbdp_ioctl";
SBDP_DBG_FUNC("%s\n", f);
if (sbdi->i_len >= sizeof (buf) ||
ddi_copyin(sbdi->i_opts, buf, sbdi->i_len, sbdpi->h_mode)) {
sbdp_set_err(hp->h_err, ESBD_FAULT, NULL);
return (-1);
}
i = 0;
while (sbdp_passthrus[i].name != NULL) {
int len;
len = strlen(sbdp_passthrus[i].name);
if (strncmp(sbdp_passthrus[i].name, buf, len) == 0)
break;
i++;
}
if (sbdp_passthrus[i].name == NULL) {
sbdp_set_err(hp->h_err, ESBD_INVAL, NULL);
rv = EIO;
} else {
rv = (*sbdp_passthrus[i].handler)(hp, buf);
if (rv != ESBD_NOERROR) {
sbdp_set_err(hp->h_err, rv, NULL);
rv = EIO;
}
}
return (rv);
#else
return (0);
#endif
}
/*
* Check the dnode we obtained. Need to find a better way to determine
* if the node has the correct starting address
*/
int
sbdp_is_node_bad(pnode_t node)
{
static fn_t f = "sbdp_is_node_bad";
SBDP_DBG_FUNC("%s\n", f);
return ((node == OBP_NONODE) || (node == OBP_BADNODE) ||
((node & 0x80000000u) != 0x80000000u));
}
/*
* Retrieve the information we have on this board from
* the inventory
*/
sbdp_bd_t *
sbdp_get_bd_info(int wnode, int board)
{
sbdp_wnode_t *wnodep;
sbdp_bd_t *bdp;
int max_bds;
static fn_t f = "sbdp_get_bd_info";
SBDP_DBG_FUNC("%s\n", f);
wnodep = sbdp_get_wnodep(wnode);
max_bds = plat_max_boards();
if ((wnodep == NULL) || ((board < 0) && (board > max_bds))) {
return (NULL);
}
bdp = &wnodep->bds[board];
/*
* We might not have the complete bd info. With cheetah we
* cannot access the memory decode registers when then cpu is
* in reset. If the mem info is incomplete, then we try to gather it
* here
*/
sbdp_update_bd_info(bdp);
return (bdp);
}
/*
* There are certain cases where obp marks components as failed
* If the status is ok the node won't have any status property. It
* is only there if the status is other than ok.
*/
sbd_cond_t
sbdp_get_comp_status(pnode_t nodeid)
{
char status_buf[OBP_MAXPROPNAME];
static const char *status = "status";
static const char *failed = "fail";
static const char *disabled = "disabled";
static fn_t f = "sbdp_get_comp_status";
SBDP_DBG_FUNC("%s\n", f);
if (sbdp_is_node_bad(nodeid)) {
SBDP_DBG_STATE("node is not ok\n");
return (SBD_COND_UNKNOWN);
}
if (prom_getproplen(nodeid, (char *)status) <= 0) {
SBDP_DBG_STATE("status is ok\n");
return (SBD_COND_OK);
}
if (prom_getprop(nodeid, (char *)status, status_buf) < 0) {
SBDP_DBG_STATE("status is unknown\n");
return (SBD_COND_UNKNOWN);
}
if (strncmp(status_buf, failed, strlen(failed)) == 0) {
SBDP_DBG_STATE("status of failed\n");
return (SBD_COND_FAILED);
}
if (strcmp(status_buf, disabled) == 0) {
SBDP_DBG_STATE("status of unusable\n");
return (SBD_COND_UNUSABLE);
}
return (SBD_COND_OK);
}
void
sbdp_cpu_in_reset(int node, int bd, int unit, int reset)
{
sbdp_wnode_t *cur;
sbdp_bd_t *bdp;
static fn_t f = "sbdp_cpu_in_reset";
SBDP_DBG_FUNC("%s\n", f);
if ((unit < -1) || (bd < 0) || (node < 0)) {
return;
}
cur = sbdp_get_wnodep(node);
SBDP_DBG_MISC("marking cpu %d %s for board %d\n", unit,
(reset) ? "in reset" : "out of reset", bd);
if (cur == NULL) {
return;
}
bdp = &cur->bds[bd];
if (unit == SBDP_ALL_CPUS)
if (reset == 1)
SBDP_SET_ALL_CPUS_IN_RESET(bdp);
else
SBDP_UNSET_ALL_CPUS_IN_RESET(bdp);
else
if (reset == 1)
SBDP_SET_CPU_IN_RESET(bdp, unit);
else
SBDP_UNSET_CPU_IN_RESET(bdp, unit);
}
int
sbdp_set_cpu_present(int node, int bd, int unit)
{
sbdp_wnode_t *cur;
sbdp_bd_t *bdp;
static fn_t f = "sbdp_set_cpu_present";
SBDP_DBG_FUNC("%s\n", f);
if ((unit < 0) || (bd < 0) || (node < 0)) {
return (-1);
}
cur = sbdp_get_wnodep(node);
if (cur == NULL) {
return (-1);
}
bdp = &cur->bds[bd];
SBDP_SET_CPU_PRESENT(bdp, unit);
return (0);
}
int
sbdp_is_cpu_present(int node, int bd, int unit)
{
sbdp_wnode_t *cur;
sbdp_bd_t *bdp;
static fn_t f = "sbdp_is_cpu_present";
SBDP_DBG_FUNC("%s\n", f);
if ((unit < 0) || (bd < 0) || (node < 0)) {
return (-1);
}
cur = sbdp_get_wnodep(node);
if (cur == NULL) {
return (-1);
}
bdp = &cur->bds[bd];
return (SBDP_IS_CPU_PRESENT(bdp, unit));
}
int
sbdp_is_cpu_in_reset(int node, int bd, int unit)
{
sbdp_wnode_t *cur;
sbdp_bd_t *bdp;
static fn_t f = "sbdp_is_cpu_in_reset";
SBDP_DBG_FUNC("%s\n", f);
if ((unit < 0) || (bd < 0) || (node < 0)) {
return (-1);
}
cur = sbdp_get_wnodep(node);
if (cur == NULL) {
return (-1);
}
bdp = &cur->bds[bd];
return (SBDP_IS_CPU_IN_RESET(bdp, unit));
}
int
sbdp_dr_avail(void)
{
static fn_t f = "sbdp_dr_avail";
SBDP_DBG_FUNC("%s\n", f);
if (sbdp_dr_available)
if (sg_prom_sb_dr_check() == 0)
return (1);
return (0);
}