103831d35Sstevel /*
203831d35Sstevel * CDDL HEADER START
303831d35Sstevel *
403831d35Sstevel * The contents of this file are subject to the terms of the
5e79c98e6Szk * Common Development and Distribution License (the "License").
6e79c98e6Szk * You may not use this file except in compliance with the License.
703831d35Sstevel *
803831d35Sstevel * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
903831d35Sstevel * or http://www.opensolaris.org/os/licensing.
1003831d35Sstevel * See the License for the specific language governing permissions
1103831d35Sstevel * and limitations under the License.
1203831d35Sstevel *
1303831d35Sstevel * When distributing Covered Code, include this CDDL HEADER in each
1403831d35Sstevel * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
1503831d35Sstevel * If applicable, add the following below this CDDL HEADER, with the
1603831d35Sstevel * fields enclosed by brackets "[]" replaced with your own identifying
1703831d35Sstevel * information: Portions Copyright [yyyy] [name of copyright owner]
1803831d35Sstevel *
1903831d35Sstevel * CDDL HEADER END
2003831d35Sstevel */
2103831d35Sstevel /*
22e79c98e6Szk * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
2303831d35Sstevel * Use is subject to license terms.
24*2bcbf80cSPeter Tribble * Copyright 2020 Peter Tribble.
2503831d35Sstevel *
2603831d35Sstevel * Littleneck Platform specific functions.
2703831d35Sstevel *
28*2bcbf80cSPeter Tribble * called when :
2903831d35Sstevel * machine_type == MTYPE_LITTLENECK
3003831d35Sstevel *
3103831d35Sstevel */
3203831d35Sstevel
3303831d35Sstevel #include <stdio.h>
3403831d35Sstevel #include <stdlib.h>
3503831d35Sstevel #include <unistd.h>
3603831d35Sstevel #include <kstat.h>
3703831d35Sstevel #include <string.h>
3803831d35Sstevel #include <assert.h>
3903831d35Sstevel #include <libintl.h>
4003831d35Sstevel #include <note.h>
4103831d35Sstevel #include <syslog.h>
4203831d35Sstevel
4303831d35Sstevel #include <sys/openpromio.h>
4403831d35Sstevel #include <sys/sysmacros.h>
4503831d35Sstevel
4603831d35Sstevel #include <pdevinfo.h>
4703831d35Sstevel #include <display.h>
4803831d35Sstevel #include <pdevinfo_sun4u.h>
4903831d35Sstevel #include <display_sun4u.h>
5003831d35Sstevel #include <libprtdiag.h>
5103831d35Sstevel
5203831d35Sstevel #include <picl.h>
5303831d35Sstevel #include "workfile.c"
5403831d35Sstevel
5503831d35Sstevel #define LNECK_MAX_PS 2
5603831d35Sstevel #define LNECK_MAX_DISKS 2
5703831d35Sstevel #define LNECK_MAX_FANS 1
5803831d35Sstevel
5903831d35Sstevel #ifndef SCHIZO_COMPAT_PROP
6003831d35Sstevel #define SCHIZO_COMPAT_PROP "pci108e,8001"
6103831d35Sstevel #endif
6203831d35Sstevel
6303831d35Sstevel /* Count of failed PSU's found */
6403831d35Sstevel int ps_failure = 0;
6503831d35Sstevel
6603831d35Sstevel /*
6703831d35Sstevel * Ignore first entry into disp_envc_status()
6803831d35Sstevel * from libprtdiag/common/display_sun4u.c
6903831d35Sstevel */
7003831d35Sstevel int print_flag = 0;
7103831d35Sstevel
7203831d35Sstevel /*
7303831d35Sstevel * these functions will overlay the symbol table of libprtdiag
7403831d35Sstevel * at runtime (workgroup server systems only)
7503831d35Sstevel */
7603831d35Sstevel int error_check(Sys_tree *tree, struct system_kstat_data *kstats);
7703831d35Sstevel void display_cpu_devices(Sys_tree *tree);
7803831d35Sstevel void display_pci(Board_node *board);
7903831d35Sstevel void display_io_cards(struct io_card *list);
8003831d35Sstevel void display_diaginfo(int flag, Prom_node *root, Sys_tree *tree,
8103831d35Sstevel struct system_kstat_data *kstats);
8203831d35Sstevel void display_ffb(Board_node *board, int table);
83*2bcbf80cSPeter Tribble void display_memoryconf(Sys_tree *tree);
8403831d35Sstevel
8503831d35Sstevel /* local functions */
8603831d35Sstevel static int disp_envc_status(void);
8703831d35Sstevel static int lneck_env_print_temps(picl_nodehdl_t);
8803831d35Sstevel static int lneck_env_print_keyswitch(picl_nodehdl_t);
8903831d35Sstevel static int lneck_env_print_FSP_LEDS(picl_nodehdl_t);
9003831d35Sstevel static int lneck_env_print_disk(picl_nodehdl_t);
9103831d35Sstevel static int lneck_env_print_fans(picl_nodehdl_t);
9203831d35Sstevel static int lneck_env_print_ps(picl_nodehdl_t);
9303831d35Sstevel
9403831d35Sstevel static void lneck_display_hw_revisions(Prom_node *root,
9503831d35Sstevel Board_node *bnode);
9603831d35Sstevel static void display_schizo_revisions(Board_node *bdlist);
9703831d35Sstevel
9803831d35Sstevel /*
9903831d35Sstevel * Defining the error_check function in order to return the
10003831d35Sstevel * appropriate error code.
10103831d35Sstevel */
10203831d35Sstevel /*ARGSUSED0*/
10303831d35Sstevel int
error_check(Sys_tree * tree,struct system_kstat_data * kstats)10403831d35Sstevel error_check(Sys_tree *tree, struct system_kstat_data *kstats)
10503831d35Sstevel {
10603831d35Sstevel int exit_code = 0; /* init to all OK */
10703831d35Sstevel /* silently check for any types of machine errors */
10803831d35Sstevel print_flag = 0;
10903831d35Sstevel if (disp_fail_parts(tree) || disp_envc_status())
11003831d35Sstevel /* set exit_code to show failures */
11103831d35Sstevel exit_code = 1;
11203831d35Sstevel
11303831d35Sstevel print_flag = 1;
11403831d35Sstevel
11503831d35Sstevel return (exit_code);
11603831d35Sstevel }
11703831d35Sstevel
11803831d35Sstevel void
display_cpu_devices(Sys_tree * tree)11903831d35Sstevel display_cpu_devices(Sys_tree *tree)
12003831d35Sstevel {
12103831d35Sstevel Board_node *bnode;
12203831d35Sstevel
12303831d35Sstevel /*
12403831d35Sstevel * Display the table header for CPUs . Then display the CPU
12503831d35Sstevel * frequency, cache size, and processor revision of all cpus.
12603831d35Sstevel */
12703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
128e79c98e6Szk "\n"
129e79c98e6Szk "========================= CPUs "
130e79c98e6Szk "==============================================="
131e79c98e6Szk "\n"
132e79c98e6Szk "\n"
133e79c98e6Szk " Run E$ CPU CPU \n"
134e79c98e6Szk "Brd CPU MHz MB Impl. Mask \n"
135e79c98e6Szk "--- --- ---- ---- ------- ---- \n"));
13603831d35Sstevel
13703831d35Sstevel /* Now display all of the cpus on each board */
13803831d35Sstevel bnode = tree->bd_list;
13903831d35Sstevel while (bnode != NULL) {
14003831d35Sstevel display_cpus(bnode);
14103831d35Sstevel bnode = bnode->next;
14203831d35Sstevel }
14303831d35Sstevel
14403831d35Sstevel log_printf("\n");
14503831d35Sstevel }
14603831d35Sstevel
14703831d35Sstevel
14803831d35Sstevel /*
14903831d35Sstevel * Display the CPUs present on this board.
15003831d35Sstevel */
15103831d35Sstevel void
display_cpus(Board_node * board)15203831d35Sstevel display_cpus(Board_node *board)
15303831d35Sstevel {
15403831d35Sstevel Prom_node *cpu;
15503831d35Sstevel char cpu_name[] = "cpu";
15603831d35Sstevel
15703831d35Sstevel /*
15803831d35Sstevel * display the CPUs' operating frequency, cache size, impl. field
15903831d35Sstevel * and mask revision.
16003831d35Sstevel */
16103831d35Sstevel
16203831d35Sstevel for (cpu = dev_find_type(board->nodes, cpu_name); cpu != NULL;
16303831d35Sstevel cpu = dev_next_type(cpu, cpu_name)) {
164e79c98e6Szk uint_t freq; /* CPU clock frequency */
16503831d35Sstevel int ecache_size; /* External cache size */
16603831d35Sstevel int *mid;
16703831d35Sstevel int *impl;
16803831d35Sstevel int *mask;
16903831d35Sstevel
17003831d35Sstevel mid = (int *)get_prop_val(find_prop(cpu, "portid"));
17103831d35Sstevel freq = LNECK_CLK_FREQ_TO_MHZ(get_cpu_freq(cpu));
17203831d35Sstevel ecache_size = get_ecache_size(cpu);
17303831d35Sstevel impl = (int *)get_prop_val(find_prop(cpu, "implementation#"));
17403831d35Sstevel mask = (int *)get_prop_val(find_prop(cpu, "mask#"));
17503831d35Sstevel
17603831d35Sstevel /* Do not display a failed CPU node */
17703831d35Sstevel if ((freq != 0) && (node_failed(cpu) == 0)) {
17803831d35Sstevel /* Board number */
17903831d35Sstevel switch (*mid) {
18003831d35Sstevel case 1:
18103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
18203831d35Sstevel " B "));
18303831d35Sstevel break;
18403831d35Sstevel case 0:
18503831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
18603831d35Sstevel " A "));
18703831d35Sstevel break;
18803831d35Sstevel default:
18903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "X "));
19003831d35Sstevel }
19103831d35Sstevel
19203831d35Sstevel /* CPU MID */
19303831d35Sstevel log_printf("%2d ", *mid);
19403831d35Sstevel
19503831d35Sstevel /* Module number */
19603831d35Sstevel
19703831d35Sstevel /* Running frequency */
198e79c98e6Szk log_printf("%4u ", freq);
19903831d35Sstevel
20003831d35Sstevel /* Ecache size */
20103831d35Sstevel if (ecache_size == 0)
20203831d35Sstevel log_printf("N/A ");
20303831d35Sstevel else
20403831d35Sstevel log_printf("%4.1f ",
205e79c98e6Szk (float)ecache_size / (float)(1<<20));
20603831d35Sstevel
20703831d35Sstevel /* Implementation */
20803831d35Sstevel if (impl == NULL) {
20903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%6s "),
21003831d35Sstevel " N/A");
21103831d35Sstevel } else {
21203831d35Sstevel if (IS_CHEETAH(*impl))
21303831d35Sstevel log_printf("%-7s ", "US-III", 0);
21403831d35Sstevel else if (IS_CHEETAH_PLUS(*impl))
21503831d35Sstevel log_printf("%-7s ", "US-III+", 0);
21603831d35Sstevel else
21703831d35Sstevel log_printf("%-7x ", *impl, 0);
21803831d35Sstevel }
21903831d35Sstevel
22003831d35Sstevel /* CPU Mask */
22103831d35Sstevel if (mask == NULL) {
22203831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " N/A "));
22303831d35Sstevel } else {
22403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " %d.%d "),
22503831d35Sstevel (*mask >> 4) & 0xf, *mask & 0xf);
22603831d35Sstevel }
22703831d35Sstevel
22803831d35Sstevel log_printf("\n");
22903831d35Sstevel }
23003831d35Sstevel }
23103831d35Sstevel }
23203831d35Sstevel
23303831d35Sstevel void
display_memoryconf(Sys_tree * tree)234*2bcbf80cSPeter Tribble display_memoryconf(Sys_tree *tree)
23503831d35Sstevel {
23603831d35Sstevel Board_node *bnode = tree->bd_list;
23703831d35Sstevel
23803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
239e79c98e6Szk "========================= Memory Configuration"
240e79c98e6Szk " ===============================\n"
241e79c98e6Szk "\n Logical Logical Logical "
242e79c98e6Szk "\n MC Bank Bank Bank DIMM "
243e79c98e6Szk "Interleave Interleaved"
244e79c98e6Szk "\n Brd ID num size Status Size "
245e79c98e6Szk "Factor with"
246e79c98e6Szk "\n---- --- ---- ------ ----------- ------ "
247e79c98e6Szk "---------- -----------"));
24803831d35Sstevel
24903831d35Sstevel while (bnode != NULL) {
25003831d35Sstevel if (get_us3_mem_regs(bnode)) {
25103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
25203831d35Sstevel "\nFailed to get memory information.\n"));
25303831d35Sstevel return;
25403831d35Sstevel }
25503831d35Sstevel bnode = bnode->next;
25603831d35Sstevel }
25703831d35Sstevel
25803831d35Sstevel /* Display what we have found */
25903831d35Sstevel display_us3_banks();
26003831d35Sstevel }
26103831d35Sstevel
26203831d35Sstevel /*ARGSUSED2*/
26303831d35Sstevel void
display_diaginfo(int flag,Prom_node * root,Sys_tree * tree,struct system_kstat_data * kstats)26403831d35Sstevel display_diaginfo(int flag, Prom_node *root, Sys_tree *tree,
26503831d35Sstevel struct system_kstat_data *kstats)
26603831d35Sstevel {
26703831d35Sstevel /*
26803831d35Sstevel * Now display the last powerfail time and the fatal hardware
26903831d35Sstevel * reset information. We do this under a couple of conditions.
27003831d35Sstevel * First if the user asks for it. The second is iof the user
27103831d35Sstevel * told us to do logging, and we found a system failure.
27203831d35Sstevel */
27303831d35Sstevel
27403831d35Sstevel if (flag) {
27503831d35Sstevel /*
27603831d35Sstevel * display time of latest powerfail. Not all systems
27703831d35Sstevel * have this capability. For those that do not, this
27803831d35Sstevel * is just a no-op.
27903831d35Sstevel */
28003831d35Sstevel disp_powerfail(root);
28103831d35Sstevel
28203831d35Sstevel (void) disp_envc_status();
28303831d35Sstevel
28403831d35Sstevel /* Hardware revision function calls */
28503831d35Sstevel lneck_display_hw_revisions(root, tree->bd_list);
28603831d35Sstevel log_printf("\n");
28703831d35Sstevel }
28803831d35Sstevel return;
28903831d35Sstevel
29003831d35Sstevel }
29103831d35Sstevel
29203831d35Sstevel /*
29303831d35Sstevel * display_pci
29403831d35Sstevel * Display all the PCI IO cards on this board.
29503831d35Sstevel */
29603831d35Sstevel void
display_pci(Board_node * board)29703831d35Sstevel display_pci(Board_node *board)
29803831d35Sstevel {
29903831d35Sstevel struct io_card *card_list = NULL;
30003831d35Sstevel struct io_card card;
30103831d35Sstevel void *value;
30203831d35Sstevel Prom_node *pci;
30303831d35Sstevel Prom_node *card_node;
30403831d35Sstevel
30503831d35Sstevel char *slot_name_arr[LNECK_MAX_SLOTS_PER_IO_BD] = {NULL};
30603831d35Sstevel int i;
30703831d35Sstevel
30803831d35Sstevel if (board == NULL)
30903831d35Sstevel return;
31003831d35Sstevel
31103831d35Sstevel memset(&card, 0, sizeof (struct io_card));
31203831d35Sstevel /* Initialize all the common information */
31303831d35Sstevel card.display = TRUE;
31403831d35Sstevel card.board = board->board_num;
31503831d35Sstevel
31603831d35Sstevel /*
31703831d35Sstevel * Search for each pci instance, then find/display all nodes under
31803831d35Sstevel * each instance node found.
31903831d35Sstevel */
32003831d35Sstevel for (pci = dev_find_node_by_compat(board->nodes, SCHIZO_COMPAT_PROP);
321e79c98e6Szk pci != NULL;
322e79c98e6Szk pci = dev_next_node_by_compat(pci, SCHIZO_COMPAT_PROP)) {
32303831d35Sstevel (void) snprintf(card.bus_type, MAXSTRLEN,
324e79c98e6Szk dgettext(TEXT_DOMAIN, "PCI"));
32503831d35Sstevel /*
32603831d35Sstevel * Get slot-name properties from parent node and
32703831d35Sstevel * store them in an array.
32803831d35Sstevel */
32903831d35Sstevel value = (char *)get_prop_val(
330e79c98e6Szk find_prop(pci, "slot-names"));
33103831d35Sstevel
33203831d35Sstevel if (value != NULL) {
33303831d35Sstevel /* array starts after first int */
33403831d35Sstevel slot_name_arr[0] = (char *)value + sizeof (int);
33503831d35Sstevel for (i = 1; i < LNECK_MAX_SLOTS_PER_IO_BD; i++) {
33603831d35Sstevel slot_name_arr[i] = (char *)slot_name_arr[i - 1]
337e79c98e6Szk + strlen(slot_name_arr[i - 1]) +1;
33803831d35Sstevel }
33903831d35Sstevel }
34003831d35Sstevel /*
34103831d35Sstevel * Search for Children of this node ie. Cards.
34203831d35Sstevel * Note: any of these cards can be a pci-bridge
34303831d35Sstevel * that itself has children. If we find a
34403831d35Sstevel * pci-bridge we need to handle it specially.
34503831d35Sstevel */
34603831d35Sstevel card_node = pci->child;
34703831d35Sstevel /* Generate the list of pci cards on pci instance: pci */
34803831d35Sstevel fill_pci_card_list(pci, card_node, &card, &card_list,
349e79c98e6Szk slot_name_arr);
35003831d35Sstevel } /* end-for */
35103831d35Sstevel
35203831d35Sstevel display_io_cards(card_list);
35303831d35Sstevel free_io_cards(card_list);
35403831d35Sstevel log_printf("\n");
35503831d35Sstevel }
35603831d35Sstevel
35703831d35Sstevel /*
35803831d35Sstevel * Print out all the io cards in the list. Also print the column
35903831d35Sstevel * headers if told to do so.
36003831d35Sstevel */
36103831d35Sstevel void
display_io_cards(struct io_card * list)36203831d35Sstevel display_io_cards(struct io_card *list)
36303831d35Sstevel {
36403831d35Sstevel static int banner = 0; /* Have we printed the column headings? */
36503831d35Sstevel struct io_card *p;
36603831d35Sstevel
36703831d35Sstevel if (list == NULL) {
36803831d35Sstevel return;
36903831d35Sstevel }
37003831d35Sstevel
37103831d35Sstevel if (banner == FALSE) {
37203831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
373e79c98e6Szk " Bus Max\n"
374e79c98e6Szk " IO Port Bus Freq Bus Dev,\n"
375e79c98e6Szk "Brd Type ID Side Slot MHz Freq Func State "
376e79c98e6Szk "Name "));
37703831d35Sstevel #ifdef DEBUG
378e79c98e6Szk log_printf(dgettext(TEXT_DOMAIN,
379e79c98e6Szk "Model Notes\n"));
38003831d35Sstevel #else
381e79c98e6Szk log_printf(dgettext(TEXT_DOMAIN, "Model\n"));
38203831d35Sstevel #endif
38303831d35Sstevel /* ---------Node Brd IO Port Bus Slot Bus Max Dev Stat */
38403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
385e79c98e6Szk "---- ---- ---- ---- ---- ---- ---- ---- ----- "
386e79c98e6Szk "-------------------------------- "
38703831d35Sstevel #ifdef DEBUG
388e79c98e6Szk "---------------------- "
38903831d35Sstevel #endif
390e79c98e6Szk "----------------------\n"));
39103831d35Sstevel banner = TRUE;
39203831d35Sstevel }
39303831d35Sstevel
39403831d35Sstevel for (p = list; p != NULL; p = p -> next) {
39503831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "I/O "));
39603831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-4s "), p->bus_type);
39703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-3d "),
398e79c98e6Szk p->schizo_portid);
39903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%c "), p->pci_bus);
40003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-1s "), p->slot_str);
40103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-3d "), p->freq);
40203831d35Sstevel switch (p->pci_bus) {
40303831d35Sstevel case 'A':
40403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " 66 "));
40503831d35Sstevel break;
40603831d35Sstevel case 'B':
40703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " 33 "));
40803831d35Sstevel break;
40903831d35Sstevel default:
41003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " - "));
41103831d35Sstevel break;
41203831d35Sstevel }
41303831d35Sstevel
41403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-1d,%-1d "),
41503831d35Sstevel p->dev_no, p->func_no);
41603831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-5s "), p->status);
41703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-32.32s"), p->name);
41803831d35Sstevel if (strlen(p->name) > 32)
41903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "+ "));
42003831d35Sstevel else
42103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " "));
42203831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-22.22s"), p->model);
42303831d35Sstevel if (strlen(p->model) > 22)
42403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "+"));
42503831d35Sstevel #ifdef DEBUG
42603831d35Sstevel log_printf("%s ", p->notes);
42703831d35Sstevel #endif
42803831d35Sstevel log_printf("\n");
42903831d35Sstevel }
43003831d35Sstevel }
43103831d35Sstevel
43203831d35Sstevel /*
43303831d35Sstevel * display_ffb
43403831d35Sstevel *
43503831d35Sstevel * There are no FFB's on a Littleneck, however in the generic library,
43603831d35Sstevel * the display_ffb() function is implemented so we have to define an
43703831d35Sstevel * empty function here.
43803831d35Sstevel */
43903831d35Sstevel /*ARGSUSED0*/
44003831d35Sstevel void
display_ffb(Board_node * board,int table)44103831d35Sstevel display_ffb(Board_node *board, int table)
44203831d35Sstevel {}
44303831d35Sstevel
44403831d35Sstevel
44503831d35Sstevel /*
44603831d35Sstevel * local functions
44703831d35Sstevel */
44803831d35Sstevel
44903831d35Sstevel /*
45003831d35Sstevel * disp_fail_parts
45103831d35Sstevel *
45203831d35Sstevel * Display the failed parts in the system. This function looks for
45303831d35Sstevel * the status property in all PROM nodes. On systems where
45403831d35Sstevel * the PROM does not support passing diagnostic information
45503831d35Sstevel * through the device tree, this routine will be silent.
45603831d35Sstevel */
45703831d35Sstevel int
disp_fail_parts(Sys_tree * tree)45803831d35Sstevel disp_fail_parts(Sys_tree *tree)
45903831d35Sstevel {
46003831d35Sstevel int exit_code = 0;
46103831d35Sstevel int system_failed = 0;
46203831d35Sstevel Board_node *bnode = tree->bd_list;
46303831d35Sstevel Prom_node *pnode;
46403831d35Sstevel
46503831d35Sstevel /* go through all of the boards looking for failed units. */
46603831d35Sstevel while (bnode != NULL) {
46703831d35Sstevel /* find failed chips */
46803831d35Sstevel pnode = find_failed_node(bnode->nodes);
46903831d35Sstevel if ((pnode != NULL) && !system_failed) {
47003831d35Sstevel system_failed = 1;
47103831d35Sstevel exit_code = 1;
47203831d35Sstevel if (print_flag == 0) {
47303831d35Sstevel return (exit_code);
47403831d35Sstevel }
47503831d35Sstevel log_printf("\n");
47603831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "Failed Field "
477e79c98e6Szk "Replaceable Units (FRU) in System:\n"));
47803831d35Sstevel log_printf("=========================="
479e79c98e6Szk "====================\n");
48003831d35Sstevel }
48103831d35Sstevel while (pnode != NULL) {
48203831d35Sstevel void *value;
48303831d35Sstevel char *name; /* node name string */
48403831d35Sstevel char *type; /* node type string */
48503831d35Sstevel char *board_type = NULL;
48603831d35Sstevel
48703831d35Sstevel value = get_prop_val(find_prop(pnode, "status"));
48803831d35Sstevel name = get_node_name(pnode);
48903831d35Sstevel
49003831d35Sstevel /* sanity check of data retrieved from PROM */
49103831d35Sstevel if ((value == NULL) || (name == NULL)) {
49203831d35Sstevel pnode = next_failed_node(pnode);
49303831d35Sstevel continue;
49403831d35Sstevel }
49503831d35Sstevel
49603831d35Sstevel /* Find the board type of this board */
49703831d35Sstevel if (bnode->board_type == CPU_BOARD) {
49803831d35Sstevel board_type = "CPU";
49903831d35Sstevel } else {
50003831d35Sstevel board_type = "IO";
50103831d35Sstevel }
50203831d35Sstevel
50303831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%s unavailable "
504e79c98e6Szk "on %s Board #%d\n"), name, board_type,
505e79c98e6Szk bnode->board_num);
50603831d35Sstevel
50703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
508e79c98e6Szk "\tPROM fault string: %s\n"), value);
50903831d35Sstevel
51003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
511e79c98e6Szk "\tFailed Field Replaceable Unit is "));
51203831d35Sstevel
51303831d35Sstevel /*
51403831d35Sstevel * Determine whether FRU is CPU module, system
51503831d35Sstevel * board, or SBus card.
51603831d35Sstevel */
51703831d35Sstevel if ((name != NULL) && (strstr(name, "sbus"))) {
51803831d35Sstevel
51903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
520e79c98e6Szk "SBus Card %d\n"),
521e79c98e6Szk get_sbus_slot(pnode));
52203831d35Sstevel
52303831d35Sstevel } else if (((name = get_node_name(pnode->parent)) !=
524e79c98e6Szk NULL) && (strstr(name, "pci"))) {
52503831d35Sstevel
52603831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
527e79c98e6Szk "PCI Card %d"),
528e79c98e6Szk get_pci_device(pnode));
52903831d35Sstevel
53003831d35Sstevel } else if (((type = get_node_type(pnode)) != NULL) &&
531e79c98e6Szk (strstr(type, "cpu"))) {
53203831d35Sstevel
53303831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "UltraSPARC "
534e79c98e6Szk "module Board %d Module %d\n"), 0,
535e79c98e6Szk get_id(pnode));
53603831d35Sstevel
53703831d35Sstevel } else {
53803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
539e79c98e6Szk "%s board %d\n"), board_type,
540e79c98e6Szk bnode->board_num);
54103831d35Sstevel }
54203831d35Sstevel pnode = next_failed_node(pnode);
54303831d35Sstevel }
54403831d35Sstevel bnode = bnode->next;
54503831d35Sstevel }
54603831d35Sstevel
54703831d35Sstevel if (!system_failed) {
54803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
549e79c98e6Szk "No failures found in System\n"));
55003831d35Sstevel log_printf("===========================\n\n");
55103831d35Sstevel return (0);
55203831d35Sstevel } else {
55303831d35Sstevel return (1);
55403831d35Sstevel }
55503831d35Sstevel }
55603831d35Sstevel
55703831d35Sstevel
55803831d35Sstevel /*
55903831d35Sstevel * disp_envc_status
56003831d35Sstevel *
56103831d35Sstevel * This routine displays the environmental status passed up from
56203831d35Sstevel * device drivers via the envlibobj.so library.
56303831d35Sstevel * This is a Littleneck specific environmental information display routine.
56403831d35Sstevel */
56503831d35Sstevel static int
disp_envc_status(void)56603831d35Sstevel disp_envc_status(void)
56703831d35Sstevel {
56803831d35Sstevel int err;
56903831d35Sstevel char *system = "SYSTEM";
57003831d35Sstevel picl_nodehdl_t system_node, root;
57103831d35Sstevel
57203831d35Sstevel log_printf("\n");
57303831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "========================="
574e79c98e6Szk " Environmental Status =========================\n\n"));
57503831d35Sstevel
57603831d35Sstevel err = picl_initialize();
57703831d35Sstevel if (err != PICL_SUCCESS) {
57803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
579e79c98e6Szk "Cannot print environmental information\n"
580e79c98e6Szk "picl_initialize failed\n"
581e79c98e6Szk "%s\n"), picl_strerror(err));
58203831d35Sstevel }
58303831d35Sstevel
58403831d35Sstevel if (err == PICL_SUCCESS) {
58503831d35Sstevel err = picl_get_root(&root);
58603831d35Sstevel err = find_child_device(root, system, &system_node);
58703831d35Sstevel if (err != PICL_SUCCESS) {
58803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
589e79c98e6Szk "Cannot print environmental information\n"
590e79c98e6Szk "find_child_device for the SYSTEM node "
591e79c98e6Szk "failed\n"
592e79c98e6Szk "%s\n"), picl_strerror(err));
59303831d35Sstevel }
59403831d35Sstevel
59503831d35Sstevel if ((err = lneck_env_print_temps(system_node)) !=
59603831d35Sstevel PICL_SUCCESS) {
59703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
598e79c98e6Szk "Temperature Checking failed: %s\n"),
599e79c98e6Szk picl_strerror(err));
60003831d35Sstevel }
60103831d35Sstevel if ((err = lneck_env_print_keyswitch(system_node)) !=
60203831d35Sstevel PICL_SUCCESS) {
60303831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
604e79c98e6Szk "Keyswitch information checking failed: %s\n"),
605e79c98e6Szk picl_strerror(err));
60603831d35Sstevel }
60703831d35Sstevel if ((err = lneck_env_print_FSP_LEDS(system_node)) !=
60803831d35Sstevel PICL_SUCCESS) {
60903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
610e79c98e6Szk "FSP LED information checking failed: %s\n"),
611e79c98e6Szk picl_strerror(err));
61203831d35Sstevel }
61303831d35Sstevel if ((err = lneck_env_print_disk(system_node)) !=
61403831d35Sstevel PICL_SUCCESS) {
61503831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
616e79c98e6Szk "Disk information checking failed: %s\n"),
617e79c98e6Szk picl_strerror(err));
61803831d35Sstevel }
61903831d35Sstevel if ((err = lneck_env_print_fans(system_node)) !=
62003831d35Sstevel PICL_SUCCESS) {
62103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
622e79c98e6Szk "Fan information checking failed: %s\n"),
623e79c98e6Szk picl_strerror(err));
62403831d35Sstevel }
62503831d35Sstevel if ((err = lneck_env_print_ps(system_node)) !=
62603831d35Sstevel PICL_SUCCESS) {
62703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
628e79c98e6Szk "Power Supply information checking failed: "
629e79c98e6Szk "%s\n"), picl_strerror(err));
63003831d35Sstevel } else if (ps_failure != 0)
63103831d35Sstevel err = PICL_FAILURE;
63203831d35Sstevel }
63303831d35Sstevel return (err);
63403831d35Sstevel }
63503831d35Sstevel
63603831d35Sstevel int
lneck_env_print_ps(picl_nodehdl_t system_node)63703831d35Sstevel lneck_env_print_ps(picl_nodehdl_t system_node)
63803831d35Sstevel {
63903831d35Sstevel int i, err = 0;
64003831d35Sstevel int32_t number;
64103831d35Sstevel picl_nodehdl_t *ps;
64203831d35Sstevel picl_nodehdl_t ps_fail[2], ps_type[2];
64303831d35Sstevel char name[PICL_PROPNAMELEN_MAX];
64403831d35Sstevel boolean_t type;
64503831d35Sstevel char fault_state[PICL_PROPNAMELEN_MAX];
64603831d35Sstevel
64703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
648e79c98e6Szk "Power Supplies:\n"
649e79c98e6Szk "---------------\n"
650e79c98e6Szk "Supply Status PS Type\n"
651e79c98e6Szk "------ ------ ---------------\n"));
65203831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_PS", &number,
653e79c98e6Szk &ps);
65403831d35Sstevel if (err != PICL_SUCCESS) {
65503831d35Sstevel return (err);
65603831d35Sstevel }
65703831d35Sstevel
65803831d35Sstevel for (i = 0; i < LNECK_MAX_PS; i++) {
65903831d35Sstevel err = picl_get_propval_by_name(ps[i], PICL_PROP_NAME, name,
660e79c98e6Szk PICL_PROPNAMELEN_MAX);
66103831d35Sstevel if (err == PICL_SUCCESS) {
66203831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%6-s"), name);
66303831d35Sstevel } else continue;
66403831d35Sstevel
66503831d35Sstevel err = picl_get_propval_by_name(ps[i], "FaultInformation",
666e79c98e6Szk fault_state, PICL_PROPNAMELEN_MAX);
66703831d35Sstevel if (err == PICL_SUCCESS) {
66803831d35Sstevel if ((strlen(fault_state) == 0) ||
669e79c98e6Szk (strcmp(fault_state, "NO_FAULT") == 0)) {
67003831d35Sstevel strcpy(fault_state, "OK");
67103831d35Sstevel } else
67203831d35Sstevel /*
67303831d35Sstevel * Bump up count if fault_state !OK
67403831d35Sstevel */
67503831d35Sstevel ps_failure++;
67603831d35Sstevel
67703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " [%-6s] "),
678e79c98e6Szk fault_state);
67903831d35Sstevel } else {
68003831d35Sstevel return (err);
68103831d35Sstevel }
68203831d35Sstevel
68303831d35Sstevel err = fill_device_from_id(ps[i], "PSVC_DEV_FAULT_SENSOR",
684e79c98e6Szk &ps_fail[i]);
68503831d35Sstevel if (err != PICL_SUCCESS) {
68603831d35Sstevel return (err);
68703831d35Sstevel }
68803831d35Sstevel
68903831d35Sstevel err = fill_device_from_id(ps[i], "PSVC_DEV_TYPE_SENSOR",
690e79c98e6Szk &ps_type[i]);
69103831d35Sstevel if (err != PICL_SUCCESS) {
69203831d35Sstevel return (err);
69303831d35Sstevel }
69403831d35Sstevel err = picl_get_propval_by_name(ps_type[i], "Gpio-value", &type,
695e79c98e6Szk sizeof (boolean_t));
69603831d35Sstevel if (err == PICL_SUCCESS) {
69703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " [%13s]"),
698e79c98e6Szk type == 0 ? "Quahog/Razor" : "Sun-Fire-280R");
69903831d35Sstevel if (type == 0) {
70003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
701e79c98e6Szk "WARNING: PS is of the wrong type\n"));
70203831d35Sstevel } else log_printf("\n");
70303831d35Sstevel } else {
70403831d35Sstevel return (err);
70503831d35Sstevel }
70603831d35Sstevel
70703831d35Sstevel }
70803831d35Sstevel
70903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
710e79c98e6Szk "\n"
711e79c98e6Szk "================================="
712e79c98e6Szk "\n"
713e79c98e6Szk "\n"));
71403831d35Sstevel
71503831d35Sstevel /*
71603831d35Sstevel * Do not display an error message just because PS1 is
71703831d35Sstevel * not present.
71803831d35Sstevel */
71903831d35Sstevel if (err == PICL_INVALIDHANDLE) {
72003831d35Sstevel err = PICL_SUCCESS;
72103831d35Sstevel }
72203831d35Sstevel
72303831d35Sstevel return (err);
72403831d35Sstevel }
72503831d35Sstevel
72603831d35Sstevel int
lneck_env_print_fans(picl_nodehdl_t system_node)72703831d35Sstevel lneck_env_print_fans(picl_nodehdl_t system_node) {
72803831d35Sstevel int i, err = 0;
72903831d35Sstevel int32_t number;
73003831d35Sstevel picl_nodehdl_t *fans;
73103831d35Sstevel picl_nodehdl_t fan_fault[1];
73203831d35Sstevel char fault_state[PICL_PROPNAMELEN_MAX];
73303831d35Sstevel char name[PICL_PROPNAMELEN_MAX];
73403831d35Sstevel
73503831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_FAN", &number,
73603831d35Sstevel &fans);
73703831d35Sstevel if (err != PICL_SUCCESS) {
73803831d35Sstevel return (err);
73903831d35Sstevel }
74003831d35Sstevel
74103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
74203831d35Sstevel "\n"
74303831d35Sstevel "=================================\n"
74403831d35Sstevel "\n"
74503831d35Sstevel "Fan Bank :\n"
74603831d35Sstevel "----------\n"
74703831d35Sstevel "\n"
74803831d35Sstevel "Bank Status\n"
74903831d35Sstevel "---- -------\n"));
75003831d35Sstevel
75103831d35Sstevel for (i = 0; i < LNECK_MAX_FANS; i++) {
75203831d35Sstevel err = picl_get_propval_by_name(fans[i], PICL_PROP_NAME, name,
75303831d35Sstevel PICL_PROPNAMELEN_MAX);
75403831d35Sstevel if (err == PICL_SUCCESS) {
75503831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%16-s"), name);
75603831d35Sstevel } else continue;
75703831d35Sstevel
75803831d35Sstevel err = fill_device_from_id(fans[i], "PSVC_DEV_FAULT_SENSOR",
75903831d35Sstevel &fan_fault[i]);
76003831d35Sstevel if (err != PICL_SUCCESS) {
76103831d35Sstevel return (err);
76203831d35Sstevel }
76303831d35Sstevel
76403831d35Sstevel err = picl_get_propval_by_name(fans[i], "FaultInformation",
76503831d35Sstevel &fault_state, PICL_PROPNAMELEN_MAX);
76603831d35Sstevel
76703831d35Sstevel if (err == PICL_SUCCESS) {
76803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " [%3s]\n"),
76903831d35Sstevel fault_state);
77003831d35Sstevel } else {
77103831d35Sstevel return (err);
77203831d35Sstevel }
77303831d35Sstevel }
77403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
77503831d35Sstevel "\n"
77603831d35Sstevel "================================="
77703831d35Sstevel "\n"
77803831d35Sstevel "\n"));
77903831d35Sstevel
78003831d35Sstevel return (err);
78103831d35Sstevel }
78203831d35Sstevel
78303831d35Sstevel int
lneck_env_print_disk(picl_nodehdl_t system_node)78403831d35Sstevel lneck_env_print_disk(picl_nodehdl_t system_node) {
78503831d35Sstevel int i, err = 0;
78603831d35Sstevel int32_t number;
78703831d35Sstevel picl_nodehdl_t *disks;
78803831d35Sstevel char fault_state[PICL_PROPNAMELEN_MAX];
78903831d35Sstevel char name[PICL_PROPNAMELEN_MAX];
79003831d35Sstevel
79103831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_DISK", &number,
79203831d35Sstevel &disks);
79303831d35Sstevel if (err != PICL_SUCCESS) {
79403831d35Sstevel return (err);
79503831d35Sstevel }
79603831d35Sstevel
79703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
79803831d35Sstevel "Disk Status:\n"
79903831d35Sstevel " Presence Fault Value\n"
80003831d35Sstevel " -------- -----------\n"));
80103831d35Sstevel
80203831d35Sstevel for (i = 0; i < LNECK_MAX_DISKS; i++) {
80303831d35Sstevel err = picl_get_propval_by_name(disks[i], PICL_PROP_NAME, name,
80403831d35Sstevel PICL_PROPNAMELEN_MAX);
80503831d35Sstevel switch (err) {
80603831d35Sstevel case PICL_SUCCESS:
80703831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
80803831d35Sstevel "DISK %2d: [PRESENT]"), i);
80903831d35Sstevel break;
81003831d35Sstevel case PICL_INVALIDHANDLE:
81103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
81203831d35Sstevel "DISK %2d: [EMPTY ]\n"), i);
81303831d35Sstevel continue;
81403831d35Sstevel default:
81503831d35Sstevel return (err);
81603831d35Sstevel }
81703831d35Sstevel err = picl_get_propval_by_name(disks[i], "FaultInformation",
81803831d35Sstevel &fault_state, PICL_PROPNAMELEN_MAX);
81903831d35Sstevel if (err == PICL_SUCCESS) {
82003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " [%3s]"),
82103831d35Sstevel fault_state);
82203831d35Sstevel } else {
82303831d35Sstevel if (err != PICL_INVALIDHANDLE)
82403831d35Sstevel return (err);
82503831d35Sstevel }
82603831d35Sstevel log_printf("\n");
82703831d35Sstevel }
82803831d35Sstevel
82903831d35Sstevel if (err == PICL_INVALIDHANDLE) {
83003831d35Sstevel err = PICL_SUCCESS;
83103831d35Sstevel }
83203831d35Sstevel
83303831d35Sstevel return (err);
83403831d35Sstevel }
83503831d35Sstevel
83603831d35Sstevel int
lneck_env_print_FSP_LEDS(picl_nodehdl_t system_node)83703831d35Sstevel lneck_env_print_FSP_LEDS(picl_nodehdl_t system_node) {
83803831d35Sstevel int err;
83903831d35Sstevel int32_t number;
84003831d35Sstevel picl_nodehdl_t *fsp_led;
84103831d35Sstevel char fault_state[PICL_PROPNAMELEN_MAX];
84203831d35Sstevel
84303831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_FSP_LED", &number,
84403831d35Sstevel &fsp_led);
84503831d35Sstevel if (err != PICL_SUCCESS) {
84603831d35Sstevel return (err);
84703831d35Sstevel }
84803831d35Sstevel
84903831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
85003831d35Sstevel "System LED Status: POWER GEN FAULT\n"
85103831d35Sstevel " [ ON]"));
85203831d35Sstevel err = picl_get_propval_by_name(fsp_led[0], "State", &fault_state,
85303831d35Sstevel PICL_PROPNAMELEN_MAX);
85403831d35Sstevel if (err == PICL_SUCCESS) {
85503831d35Sstevel log_printf(" [%3s]", fault_state);
85603831d35Sstevel } else {
85703831d35Sstevel return (err);
85803831d35Sstevel }
85903831d35Sstevel
86003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
86103831d35Sstevel "\n"
86203831d35Sstevel "\n"
86303831d35Sstevel "================================="
86403831d35Sstevel "\n"
86503831d35Sstevel "\n"));
86603831d35Sstevel
86703831d35Sstevel return (err);
86803831d35Sstevel }
86903831d35Sstevel
87003831d35Sstevel int
lneck_env_print_keyswitch(picl_nodehdl_t system_node)87103831d35Sstevel lneck_env_print_keyswitch(picl_nodehdl_t system_node) {
87203831d35Sstevel int err = 0;
87303831d35Sstevel picl_nodehdl_t *keyswitch;
87403831d35Sstevel int32_t number;
87503831d35Sstevel char ks_pos[PICL_PROPNAMELEN_MAX];
87603831d35Sstevel
87703831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_KEYSWITCH", &number,
87803831d35Sstevel &keyswitch);
87903831d35Sstevel if (err != PICL_SUCCESS) {
88003831d35Sstevel return (err);
88103831d35Sstevel }
88203831d35Sstevel err = picl_get_propval_by_name(keyswitch[0], "State", ks_pos,
88303831d35Sstevel PICL_PROPNAMELEN_MAX);
88403831d35Sstevel if (err != PICL_SUCCESS) {
88503831d35Sstevel return (err);
88603831d35Sstevel }
88703831d35Sstevel
88803831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
88903831d35Sstevel "Front Status Panel:\n"
89003831d35Sstevel "-------------------\n"
89103831d35Sstevel "Keyswitch position: %s\n"), ks_pos);
89203831d35Sstevel log_printf("\n");
89303831d35Sstevel
89403831d35Sstevel return (err);
89503831d35Sstevel }
89603831d35Sstevel
89703831d35Sstevel int
lneck_env_print_temps(picl_nodehdl_t system_node)89803831d35Sstevel lneck_env_print_temps(picl_nodehdl_t system_node) {
89903831d35Sstevel int i, err = 0;
90003831d35Sstevel picl_nodehdl_t *system_ts_nodes;
90103831d35Sstevel int32_t temp, number;
90203831d35Sstevel
90303831d35Sstevel err = fill_device_array_from_id(system_node, "PSVC_TS", &number,
90403831d35Sstevel &system_ts_nodes);
90503831d35Sstevel if (err != PICL_SUCCESS) {
90603831d35Sstevel return (err);
90703831d35Sstevel }
90803831d35Sstevel
90903831d35Sstevel
91003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
91103831d35Sstevel "System Temperatures (Celsius):\n"
91203831d35Sstevel "------------------------------\n"
91303831d35Sstevel "cpu0 1 \n"
91403831d35Sstevel "---------\n"));
91503831d35Sstevel
91603831d35Sstevel for (i = 0; i < 2; i++) {
91703831d35Sstevel err = picl_get_propval_by_name(system_ts_nodes[i],
91803831d35Sstevel "Temperature", &temp, sizeof (temp));
91903831d35Sstevel if (err == PICL_SUCCESS) {
92003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " %02d"), temp);
92103831d35Sstevel } else {
92203831d35Sstevel if (err == PICL_INVALIDHANDLE) {
92303831d35Sstevel err = PICL_SUCCESS;
92403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " xx"));
92503831d35Sstevel } else {
92603831d35Sstevel return (err);
92703831d35Sstevel }
92803831d35Sstevel }
92903831d35Sstevel }
93003831d35Sstevel
93103831d35Sstevel log_printf("\n");
93203831d35Sstevel log_printf("\n");
93303831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
93403831d35Sstevel "=================================\n"));
93503831d35Sstevel log_printf("\n");
93603831d35Sstevel
93703831d35Sstevel return (err);
93803831d35Sstevel }
93903831d35Sstevel
94003831d35Sstevel static void
lneck_display_hw_revisions(Prom_node * root,Board_node * bdlist)94103831d35Sstevel lneck_display_hw_revisions(Prom_node *root, Board_node *bdlist)
94203831d35Sstevel {
94303831d35Sstevel Prom_node *pnode;
94403831d35Sstevel char *value;
94503831d35Sstevel
94603831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "\n"
947e79c98e6Szk "========================= HW Revisions "
948e79c98e6Szk "=======================================\n\n"));
94903831d35Sstevel
95003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN,
951e79c98e6Szk "System PROM revisions:\n"
952e79c98e6Szk "----------------------\n"));
95303831d35Sstevel
95403831d35Sstevel pnode = dev_find_node(root, "openprom");
95503831d35Sstevel if (pnode != NULL) {
956e79c98e6Szk value = (char *)get_prop_val(find_prop(pnode, "version"));
957e79c98e6Szk log_printf(value);
95803831d35Sstevel }
95903831d35Sstevel
96003831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "\n\n"
961e79c98e6Szk "IO ASIC revisions:\n"
962e79c98e6Szk "------------------\n"
963e79c98e6Szk " Port\n"
964e79c98e6Szk "Model ID Status Version\n"
965e79c98e6Szk "-------- ---- ------ -------\n"));
96603831d35Sstevel
96703831d35Sstevel display_schizo_revisions(bdlist);
96803831d35Sstevel }
96903831d35Sstevel
97003831d35Sstevel static void
display_schizo_revisions(Board_node * bdlist)97103831d35Sstevel display_schizo_revisions(Board_node *bdlist)
97203831d35Sstevel {
97303831d35Sstevel Prom_node *pnode;
97403831d35Sstevel int *int_val;
97503831d35Sstevel int portid;
97603831d35Sstevel int prev_portid = -1;
97703831d35Sstevel char *status_a = NULL;
97803831d35Sstevel char *status_b = NULL;
97903831d35Sstevel int revision;
98003831d35Sstevel #ifdef DEBUG
98103831d35Sstevel uint32_t a_notes, b_notes;
98203831d35Sstevel #endif
98303831d35Sstevel int pci_bus;
98403831d35Sstevel Board_node *bnode;
98503831d35Sstevel bnode = bdlist;
98603831d35Sstevel
98703831d35Sstevel while (bnode != NULL) {
98803831d35Sstevel /*
98903831d35Sstevel * search this board node for all Schizos
99003831d35Sstevel */
99103831d35Sstevel
99203831d35Sstevel for (pnode = dev_find_node_by_compat(bnode->nodes,
993e79c98e6Szk SCHIZO_COMPAT_PROP); pnode != NULL;
994e79c98e6Szk pnode = dev_next_node_by_compat(pnode,
995e79c98e6Szk SCHIZO_COMPAT_PROP)) {
99603831d35Sstevel
99703831d35Sstevel /*
99803831d35Sstevel * get the reg property to determine
99903831d35Sstevel * whether we are looking at side A or B
100003831d35Sstevel */
100103831d35Sstevel
100203831d35Sstevel int_val = (int *)get_prop_val
1003e79c98e6Szk (find_prop(pnode, "reg"));
100403831d35Sstevel if (int_val != NULL) {
100503831d35Sstevel int_val ++; /* second integer in array */
100603831d35Sstevel pci_bus = ((*int_val) & 0x7f0000);
100703831d35Sstevel }
100803831d35Sstevel
100903831d35Sstevel /* get portid */
101003831d35Sstevel int_val = (int *)get_prop_val
1011e79c98e6Szk (find_prop(pnode, "portid"));
101203831d35Sstevel if (int_val == NULL)
101303831d35Sstevel continue;
101403831d35Sstevel
101503831d35Sstevel portid = *int_val;
101603831d35Sstevel
101703831d35Sstevel /*
101803831d35Sstevel * If this is a new portid and it is PCI bus B,
101903831d35Sstevel * we skip onto the PCI bus A.
102003831d35Sstevel */
102103831d35Sstevel if ((portid != prev_portid) && (pci_bus == 0x700000)) {
102203831d35Sstevel prev_portid = portid;
102303831d35Sstevel /* status */
102403831d35Sstevel status_b = (char *)get_prop_val
102503831d35Sstevel (find_prop(pnode, "status"));
102603831d35Sstevel #ifdef DEBUG
102703831d35Sstevel b_notes = pci_bus;
102803831d35Sstevel #endif
102903831d35Sstevel continue; /* skip to the next schizo */
103003831d35Sstevel }
103103831d35Sstevel
103203831d35Sstevel /*
103303831d35Sstevel * This must be side A of the same Schizo.
103403831d35Sstevel * Gather all its props and display them.
103503831d35Sstevel */
103603831d35Sstevel #ifdef DEBUG
103703831d35Sstevel a_notes = pci_bus;
103803831d35Sstevel #endif
103903831d35Sstevel
104003831d35Sstevel prev_portid = portid;
104103831d35Sstevel
104203831d35Sstevel int_val = (int *)get_prop_val
1043e79c98e6Szk (find_prop(pnode, "version#"));
104403831d35Sstevel if (int_val != NULL)
104503831d35Sstevel revision = *int_val;
104603831d35Sstevel else
104703831d35Sstevel revision = -1;
104803831d35Sstevel
104903831d35Sstevel status_a = (char *)get_prop_val(find_prop
1050e79c98e6Szk (pnode, "status"));
105103831d35Sstevel
105203831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "Schizo "));
105303831d35Sstevel
105403831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, "%-3d "), portid, 0);
105503831d35Sstevel
105603831d35Sstevel
105703831d35Sstevel log_printf((status_a == NULL && status_b == NULL) ?
1058e79c98e6Szk dgettext(TEXT_DOMAIN, " ok ") :
1059e79c98e6Szk dgettext(TEXT_DOMAIN, " fail "));
106003831d35Sstevel
106103831d35Sstevel log_printf(dgettext(TEXT_DOMAIN, " %4d "),
106203831d35Sstevel revision);
106303831d35Sstevel #ifdef DEBUG
106403831d35Sstevel log_printf(" 0x%x 0x%x", a_notes, b_notes);
106503831d35Sstevel #endif
106603831d35Sstevel log_printf("\n");
106703831d35Sstevel }
106803831d35Sstevel bnode = bnode->next;
106903831d35Sstevel }
107003831d35Sstevel }
1071