321 lines
7.8 KiB
C
321 lines
7.8 KiB
C
/*
|
||
* linux/arch/alpha/kernel/err_common.c
|
||
*
|
||
* Copyright (C) 2000 Jeff Wiedemeier (Compaq Computer Corporation)
|
||
*
|
||
* Error handling code supporting Alpha systems
|
||
*/
|
||
|
||
#include <linux/init.h>
|
||
#include <linux/sched.h>
|
||
|
||
#include <asm/io.h>
|
||
#include <asm/hwrpb.h>
|
||
#include <asm/smp.h>
|
||
#include <asm/err_common.h>
|
||
|
||
#include "err_impl.h"
|
||
#include "proto.h"
|
||
|
||
/*
|
||
* err_print_prefix -- error handling print routines should prefix
|
||
* all prints with this
|
||
*/
|
||
char *err_print_prefix = KERN_NOTICE;
|
||
|
||
|
||
/*
|
||
* Generic
|
||
*/
|
||
void
|
||
mchk_dump_mem(void *data, size_t length, char **annotation)
|
||
{
|
||
unsigned long *ldata = data;
|
||
size_t i;
|
||
|
||
for (i = 0; (i * sizeof(*ldata)) < length; i++) {
|
||
if (annotation && !annotation[i])
|
||
annotation = NULL;
|
||
printk("%s %08x: %016lx %s\n",
|
||
err_print_prefix,
|
||
(unsigned)(i * sizeof(*ldata)), ldata[i],
|
||
annotation ? annotation[i] : "");
|
||
}
|
||
}
|
||
|
||
void
|
||
mchk_dump_logout_frame(struct el_common *mchk_header)
|
||
{
|
||
printk("%s -- Frame Header --\n"
|
||
" Frame Size: %d (0x%x) bytes\n"
|
||
" Flags: %s%s\n"
|
||
" MCHK Code: 0x%x\n"
|
||
" Frame Rev: %d\n"
|
||
" Proc Offset: 0x%08x\n"
|
||
" Sys Offset: 0x%08x\n"
|
||
" -- Processor Region --\n",
|
||
err_print_prefix,
|
||
mchk_header->size, mchk_header->size,
|
||
mchk_header->retry ? "RETRY " : "",
|
||
mchk_header->err2 ? "SECOND_ERR " : "",
|
||
mchk_header->code,
|
||
mchk_header->frame_rev,
|
||
mchk_header->proc_offset,
|
||
mchk_header->sys_offset);
|
||
|
||
mchk_dump_mem((void *)
|
||
((unsigned long)mchk_header + mchk_header->proc_offset),
|
||
mchk_header->sys_offset - mchk_header->proc_offset,
|
||
NULL);
|
||
|
||
printk("%s -- System Region --\n", err_print_prefix);
|
||
mchk_dump_mem((void *)
|
||
((unsigned long)mchk_header + mchk_header->sys_offset),
|
||
mchk_header->size - mchk_header->sys_offset,
|
||
NULL);
|
||
printk("%s -- End of Frame --\n", err_print_prefix);
|
||
}
|
||
|
||
|
||
/*
|
||
* Console Data Log
|
||
*/
|
||
/* Data */
|
||
static struct el_subpacket_handler *subpacket_handler_list = NULL;
|
||
static struct el_subpacket_annotation *subpacket_annotation_list = NULL;
|
||
|
||
static struct el_subpacket *
|
||
el_process_header_subpacket(struct el_subpacket *header)
|
||
{
|
||
union el_timestamp timestamp;
|
||
char *name = "UNKNOWN EVENT";
|
||
int packet_count = 0;
|
||
int length = 0;
|
||
|
||
if (header->class != EL_CLASS__HEADER) {
|
||
printk("%s** Unexpected header CLASS %d TYPE %d, aborting\n",
|
||
err_print_prefix,
|
||
header->class, header->type);
|
||
return NULL;
|
||
}
|
||
|
||
switch(header->type) {
|
||
case EL_TYPE__HEADER__SYSTEM_ERROR_FRAME:
|
||
name = "SYSTEM ERROR";
|
||
length = header->by_type.sys_err.frame_length;
|
||
packet_count =
|
||
header->by_type.sys_err.frame_packet_count;
|
||
timestamp.as_int = 0;
|
||
break;
|
||
case EL_TYPE__HEADER__SYSTEM_EVENT_FRAME:
|
||
name = "SYSTEM EVENT";
|
||
length = header->by_type.sys_event.frame_length;
|
||
packet_count =
|
||
header->by_type.sys_event.frame_packet_count;
|
||
timestamp = header->by_type.sys_event.timestamp;
|
||
break;
|
||
case EL_TYPE__HEADER__HALT_FRAME:
|
||
name = "ERROR HALT";
|
||
length = header->by_type.err_halt.frame_length;
|
||
packet_count =
|
||
header->by_type.err_halt.frame_packet_count;
|
||
timestamp = header->by_type.err_halt.timestamp;
|
||
break;
|
||
case EL_TYPE__HEADER__LOGOUT_FRAME:
|
||
name = "LOGOUT FRAME";
|
||
length = header->by_type.logout_header.frame_length;
|
||
packet_count = 1;
|
||
timestamp.as_int = 0;
|
||
break;
|
||
default: /* Unknown */
|
||
printk("%s** Unknown header - CLASS %d TYPE %d, aborting\n",
|
||
err_print_prefix,
|
||
header->class, header->type);
|
||
return NULL;
|
||
}
|
||
|
||
printk("%s*** %s:\n"
|
||
" CLASS %d, TYPE %d\n",
|
||
err_print_prefix,
|
||
name,
|
||
header->class, header->type);
|
||
el_print_timestamp(×tamp);
|
||
|
||
/*
|
||
* Process the subpackets
|
||
*/
|
||
el_process_subpackets(header, packet_count);
|
||
|
||
/* return the next header */
|
||
header = (struct el_subpacket *)
|
||
((unsigned long)header + header->length + length);
|
||
return header;
|
||
}
|
||
|
||
static struct el_subpacket *
|
||
el_process_subpacket_reg(struct el_subpacket *header)
|
||
{
|
||
struct el_subpacket *next = NULL;
|
||
struct el_subpacket_handler *h = subpacket_handler_list;
|
||
|
||
for (; h && h->class != header->class; h = h->next);
|
||
if (h) next = h->handler(header);
|
||
|
||
return next;
|
||
}
|
||
|
||
void
|
||
el_print_timestamp(union el_timestamp *timestamp)
|
||
{
|
||
if (timestamp->as_int)
|
||
printk("%s TIMESTAMP: %d/%d/%02d %d:%02d:%0d\n",
|
||
err_print_prefix,
|
||
timestamp->b.month, timestamp->b.day,
|
||
timestamp->b.year, timestamp->b.hour,
|
||
timestamp->b.minute, timestamp->b.second);
|
||
}
|
||
|
||
void
|
||
el_process_subpackets(struct el_subpacket *header, int packet_count)
|
||
{
|
||
struct el_subpacket *subpacket;
|
||
int i;
|
||
|
||
subpacket = (struct el_subpacket *)
|
||
((unsigned long)header + header->length);
|
||
|
||
for (i = 0; subpacket && i < packet_count; i++) {
|
||
printk("%sPROCESSING SUBPACKET %d\n", err_print_prefix, i);
|
||
subpacket = el_process_subpacket(subpacket);
|
||
}
|
||
}
|
||
|
||
struct el_subpacket *
|
||
el_process_subpacket(struct el_subpacket *header)
|
||
{
|
||
struct el_subpacket *next = NULL;
|
||
|
||
switch(header->class) {
|
||
case EL_CLASS__TERMINATION:
|
||
/* Termination packet, there are no more */
|
||
break;
|
||
case EL_CLASS__HEADER:
|
||
next = el_process_header_subpacket(header);
|
||
break;
|
||
default:
|
||
if (NULL == (next = el_process_subpacket_reg(header))) {
|
||
printk("%s** Unexpected header CLASS %d TYPE %d"
|
||
" -- aborting.\n",
|
||
err_print_prefix,
|
||
header->class, header->type);
|
||
}
|
||
break;
|
||
}
|
||
|
||
return next;
|
||
}
|
||
|
||
void
|
||
el_annotate_subpacket(struct el_subpacket *header)
|
||
{
|
||
struct el_subpacket_annotation *a;
|
||
char **annotation = NULL;
|
||
|
||
for (a = subpacket_annotation_list; a; a = a->next) {
|
||
if (a->class == header->class &&
|
||
a->type == header->type &&
|
||
a->revision == header->revision) {
|
||
/*
|
||
* We found the annotation
|
||
*/
|
||
annotation = a->annotation;
|
||
printk("%s %s\n", err_print_prefix, a->description);
|
||
break;
|
||
}
|
||
}
|
||
|
||
mchk_dump_mem(header, header->length, annotation);
|
||
}
|
||
|
||
static void __init
|
||
cdl_process_console_data_log(int cpu, struct percpu_struct *pcpu)
|
||
{
|
||
struct el_subpacket *header = (struct el_subpacket *)
|
||
(IDENT_ADDR | pcpu->console_data_log_pa);
|
||
int err;
|
||
|
||
printk("%s******* CONSOLE DATA LOG FOR CPU %d. *******\n"
|
||
"*** Error(s) were logged on a previous boot\n",
|
||
err_print_prefix, cpu);
|
||
|
||
for (err = 0; header && (header->class != EL_CLASS__TERMINATION); err++)
|
||
header = el_process_subpacket(header);
|
||
|
||
/* let the console know it's ok to clear the error(s) at restart */
|
||
pcpu->console_data_log_pa = 0;
|
||
|
||
printk("%s*** %d total error(s) logged\n"
|
||
"**** END OF CONSOLE DATA LOG FOR CPU %d ****\n",
|
||
err_print_prefix, err, cpu);
|
||
}
|
||
|
||
void __init
|
||
cdl_check_console_data_log(void)
|
||
{
|
||
struct percpu_struct *pcpu;
|
||
unsigned long cpu;
|
||
|
||
for (cpu = 0; cpu < hwrpb->nr_processors; cpu++) {
|
||
pcpu = (struct percpu_struct *)
|
||
((unsigned long)hwrpb + hwrpb->processor_offset
|
||
+ cpu * hwrpb->processor_size);
|
||
if (pcpu->console_data_log_pa)
|
||
cdl_process_console_data_log(cpu, pcpu);
|
||
}
|
||
|
||
}
|
||
|
||
int __init
|
||
cdl_register_subpacket_annotation(struct el_subpacket_annotation *new)
|
||
{
|
||
struct el_subpacket_annotation *a = subpacket_annotation_list;
|
||
|
||
if (a == NULL) subpacket_annotation_list = new;
|
||
else {
|
||
for (; a->next != NULL; a = a->next) {
|
||
if ((a->class == new->class && a->type == new->type) ||
|
||
a == new) {
|
||
printk("Attempted to re-register "
|
||
"subpacket annotation\n");
|
||
return -EINVAL;
|
||
}
|
||
}
|
||
a->next = new;
|
||
}
|
||
new->next = NULL;
|
||
|
||
return 0;
|
||
}
|
||
|
||
int __init
|
||
cdl_register_subpacket_handler(struct el_subpacket_handler *new)
|
||
{
|
||
struct el_subpacket_handler *h = subpacket_handler_list;
|
||
|
||
if (h == NULL) subpacket_handler_list = new;
|
||
else {
|
||
for (; h->next != NULL; h = h->next) {
|
||
if (h->class == new->class || h == new) {
|
||
printk("Attempted to re-register "
|
||
"subpacket handler\n");
|
||
return -EINVAL;
|
||
}
|
||
}
|
||
h->next = new;
|
||
}
|
||
new->next = NULL;
|
||
|
||
return 0;
|
||
}
|
||
|