/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (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 (c) 1999 by Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <ctype.h>
#include <string.h>
#include <kvm.h>
#include <varargs.h>
#include <errno.h>
#include <time.h>
#include <dirent.h>
#include <fcntl.h>
#include <sys/param.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <sys/utsname.h>
#include <sys/openpromio.h>
#include <kstat.h>
#include <libintl.h>
#include <syslog.h>
#include <sys/dkio.h>
#include "pdevinfo.h"
#include "display.h"
#include "pdevinfo_sun4u.h"
#include "display_sun4u.h"
#include "libprtdiag.h"
/*
* This module does the reading and interpreting of sun4u system
* kstats. These kstats are created by the following drivers:
* fhc, environ, sysctrl. Each board in the tree should have
* kstats created for it. There are also system wide kstats that
* are created.
*/
void
read_platform_kstats(Sys_tree *tree, struct system_kstat_data *sys_kstat,
struct bd_kstat_data *bdp, struct envctrl_kstat_data *ep)
{
Board_node *bnode;
kstat_ctl_t *kc;
kstat_t *ksp;
kstat_named_t *knp;
int i;
struct hp_info *hp;
#ifdef lint
ep = ep;
#endif
if ((kc = kstat_open()) == NULL) {
return;
}
/* For each board in the system, read the kstats for it. */
for (bnode = tree->bd_list; bnode != NULL; bnode = bnode->next) {
int board;
/*
* Kstat instances numbers are set by fhc, ac, simmstat,
* and environ drivers based on their board# property.
*/
board = bnode->board_num;
bdp = &sys_kstat->bd_ksp_list[board];
/* Try to find an FHC instance for this board number */
ksp = kstat_lookup(kc, UNIX, board, FHC_KSTAT_NAME);
/* Atempt to read the FHC kstat */
if ((ksp != NULL) && (kstat_read(kc, ksp, NULL) == -1)) {
ksp = NULL;
}
/* Now read out the data if the kstat read OK */
if (ksp != NULL) {
/*
* We set the kstats_ok flag to good here. If we
* fail one of the data reads, we set it to bad.
*/
bdp->fhc_kstats_ok = 1;
/*
* For each data value, If the Kstat named struct
* is found, then get the data out.
*/
knp = kstat_data_lookup(ksp, CSR_KSTAT_NAMED);
if (knp != NULL) {
bdp->fhc_csr = knp->value.ul;
} else {
bdp->fhc_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, BSR_KSTAT_NAMED);
if (knp != NULL) {
bdp->fhc_bsr = knp->value.ul;
} else {
bdp->fhc_kstats_ok = 0;
}
}
/* Try to find an AC instance for this board number */
ksp = kstat_lookup(kc, UNIX, board, AC_KSTAT_NAME);
/* Attempt to read the AC kstat. */
if ((ksp != NULL) && (kstat_read(kc, ksp, NULL) == -1)) {
ksp = NULL;
}
/* If the AC kstat exists, try to read the data from it. */
if (ksp != NULL) {
/*
* We set the kstats_ok flag to good here. If we
* fail one of the data reads, we set it to bad.
*/
bdp->ac_kstats_ok = 1;
bdp->ac_memstat_ok = 1;
/*
* For each data value, If the Kstat named struct
* is found, then get the data out.
*/
knp = kstat_data_lookup(ksp, MEMCTL_KSTAT_NAMED);
if (knp != NULL) {
bdp->ac_memctl = knp->value.ull;
} else {
bdp->ac_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, MEMDECODE0_KSTAT_NAMED);
if (knp != NULL) {
bdp->ac_memdecode[0] = knp->value.ull;
} else {
bdp->ac_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, MEMDECODE1_KSTAT_NAMED);
if (knp != NULL) {
bdp->ac_memdecode[1] = knp->value.ull;
} else {
bdp->ac_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, BANK_0_KSTAT_NAMED);
if (knp != NULL) {
bdp->mem_stat[0].status = knp->value.c[0];
bdp->mem_stat[0].condition = knp->value.c[1];
} else {
bdp->ac_memstat_ok = 0;
}
knp = kstat_data_lookup(ksp, BANK_1_KSTAT_NAMED);
if (knp != NULL) {
bdp->mem_stat[1].status = knp->value.c[0];
bdp->mem_stat[1].condition = knp->value.c[1];
} else {
bdp->ac_memstat_ok = 0;
}
}
/* Try to find an simmstat instance for this board number */
ksp = kstat_lookup(kc, UNIX, board, SIMMSTAT_KSTAT_NAME);
if (ksp != NULL) {
if (kstat_read(kc, ksp, NULL) == -1) {
bdp->simmstat_kstats_ok = 0;
} else {
bdp->simmstat_kstats_ok = 1;
(void) memcpy(&bdp->simm_status, ksp->ks_data,
sizeof (bdp->simm_status));
}
}
/* Try to find an overtemp kstat instance for this board */
ksp = kstat_lookup(kc, UNIX, board, OVERTEMP_KSTAT_NAME);
if (ksp != NULL) {
if (kstat_read(kc, ksp, NULL) == -1) {
bdp->temp_kstat_ok = 0;
} else {
bdp->temp_kstat_ok = 1;
(void) memcpy(&bdp->tempstat, ksp->ks_data,
sizeof (bdp->tempstat));
/* XXX - this is for 2.5.1 testing. remove */
if (sizeof (bdp->tempstat) > ksp->ks_data_size)
bdp->tempstat.trend = TREND_UNKNOWN;
}
}
}
/* Read the kstats for the system control board */
ksp = kstat_lookup(kc, UNIX, 0, SYSCTRL_KSTAT_NAME);
if ((ksp != NULL) && (kstat_read(kc, ksp, NULL) == -1)) {
sys_kstat->sys_kstats_ok = 0;
ksp = NULL;
}
if (ksp != NULL) {
sys_kstat->sys_kstats_ok = 1;
knp = kstat_data_lookup(ksp, CSR_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->sysctrl = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, STAT1_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->sysstat1 = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, STAT2_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->sysstat2 = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, CLK_FREQ2_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->clk_freq2 = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, FAN_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->fan_status = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, KEY_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->keysw_status = knp->value.c[0];
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, POWER_KSTAT_NAMED);
if (knp != NULL) {
sys_kstat->power_state =
(enum power_state)knp->value.l;
} else {
sys_kstat->sys_kstats_ok = 0;
}
knp = kstat_data_lookup(ksp, CLK_VER_KSTAT_NAME);
if (knp != NULL) {
sys_kstat->clk_ver = knp->value.c[0];
} else {
/*
* the clock version register only appears
* on new clock boards
*/
sys_kstat->clk_ver = 0;
}
}
/* Read the kstats for the power supply stats */
ksp = kstat_lookup(kc, UNIX, 0, PSSHAD_KSTAT_NAME);
if ((ksp != NULL) && (kstat_read(kc, ksp, NULL) != -1)) {
sys_kstat->psstat_kstat_ok = 1;
(void) memcpy(&sys_kstat->ps_shadow[0], ksp->ks_data,
sizeof (sys_kstat->ps_shadow));
} else {
sys_kstat->psstat_kstat_ok = 0;
}
/* read the overtemp kstat for the system control board */
/* Try to find an overtemp kstat instance for this board */
ksp = kstat_lookup(kc, UNIX, CLOCK_BOARD_INDEX, OVERTEMP_KSTAT_NAME);
if (ksp != NULL) {
if (kstat_read(kc, ksp, NULL) == -1) {
sys_kstat->temp_kstat_ok = 0;
} else {
sys_kstat->temp_kstat_ok = 1;
(void) memcpy(&sys_kstat->tempstat, ksp->ks_data,
sizeof (sys_kstat->tempstat));
/* XXX - this is for 2.5.1 testing. remove */
if (sizeof (sys_kstat->tempstat) > ksp->ks_data_size)
sys_kstat->tempstat.trend = TREND_UNKNOWN;
}
}
/* Read the reset-info kstat from one of the boards. */
ksp = kstat_lookup(kc, UNIX, 0, RESETINFO_KSTAT_NAME);
if (ksp == NULL) {
sys_kstat->reset_kstats_ok = 0;
} else if (kstat_read(kc, ksp, NULL) == -1) {
sys_kstat->reset_kstats_ok = 0;
} else {
sys_kstat->reset_kstats_ok = 1;
(void) memcpy(&sys_kstat->reset_info, ksp->ks_data,
sizeof (sys_kstat->reset_info));
}
/* read kstats for hotplugged boards */
for (i = 0, hp = &sys_kstat->hp_info[0]; i < MAX_BOARDS; i++, hp++) {
ksp = kstat_lookup(kc, UNIX, i, BDLIST_KSTAT_NAME);
if (ksp == NULL) {
continue;
}
if (kstat_read(kc, ksp, NULL) == -1) {
hp->kstat_ok = 0;
} else {
hp->kstat_ok = 1;
(void) memcpy(&hp->bd_info, ksp->ks_data,
sizeof (hp->bd_info));
}
}
/* read in the kstat for the fault list. */
ksp = kstat_lookup(kc, UNIX, 0, FT_LIST_KSTAT_NAME);
if (ksp == NULL) {
sys_kstat->ft_kstat_ok = 0;
} else {
if (kstat_read(kc, ksp, NULL) == -1) {
perror("kstat read");
sys_kstat->ft_kstat_ok = 0;
return;
}
sys_kstat->nfaults = ksp->ks_data_size /
sizeof (struct ft_list);
sys_kstat->ft_array =
(struct ft_list *)malloc(ksp->ks_data_size);
if (sys_kstat->ft_array == NULL) {
perror("Malloc");
exit(2);
}
sys_kstat->ft_kstat_ok = 1;
(void) memcpy(sys_kstat->ft_array, ksp->ks_data,
ksp->ks_data_size);
}
}
/*
* This function does the reading and interpreting of sun4u system
* kstats. These kstats are created by the following drivers:
* fhc, environ, sysctrl. Each board in the tree should have
* kstats created for it. There are also system wide kstats that
* are created.
*/
void
read_sun4u_kstats(Sys_tree *tree, struct system_kstat_data *sys_kstat)
{
#if 0
Board_node *bnode;
kstat_t *ksp;
kstat_named_t *knp;
struct hp_info *hp;
struct envctrltwo_kstat_data *ecp;
#endif
kstat_ctl_t *kc;
int i;
struct bd_kstat_data *bdp;
struct envctrl_kstat_data *ep;
if ((kc = kstat_open()) == NULL) {
return;
}
#ifdef lint
kc = kc;
#endif
/* Initialize the kstats structure */
sys_kstat->sys_kstats_ok = 0;
sys_kstat->temp_kstat_ok = 0;
sys_kstat->reset_kstats_ok = 0;
sys_kstat->ft_kstat_ok = 0;
sys_kstat->envctrl_kstat_ok = 0;
for (i = 0; i < MAX_BOARDS; i++) {
bdp = &sys_kstat->bd_ksp_list[i];
bdp->ac_kstats_ok = 0;
bdp->fhc_kstats_ok = 0;
bdp->simmstat_kstats_ok = 0;
bdp->temp_kstat_ok = 0;
sys_kstat->hp_info[i].kstat_ok = 0;
}
for (i = 0; i < MAX_DEVS; i++) {
ep = &sys_kstat->env_data;
ep->ps_kstats[i].instance = I2C_NODEV;
ep->fan_kstats[i].instance = I2C_NODEV;
ep->encl_kstats[i].instance = I2C_NODEV;
}
read_platform_kstats(tree, sys_kstat, bdp, ep);
}