Logo Search packages:      
Sourcecode: linux-fsl-imx51 version File versions  Download package

err_common.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(&timestamp);
      
      /*
       * 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;
}


Generated by  Doxygen 1.6.0   Back to index