arch/m68k/sun3/idprom.c

   1 /* $Id: idprom.c,v 1.22 1996/11/13 05:09:25 davem Exp $
   2  * idprom.c: Routines to load the idprom into kernel addresses and
   3  *           interpret the data contained within.
   4  *
   5  * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
   6  * Sun3/3x models added by David Monro (davidm@psrg.cs.usyd.edu.au)
   7  */
   8
   9 #include <linux/module.h>
  10 #include <linux/kernel.h>
  11 #include <linux/types.h>
  12 #include <linux/init.h>
  13 #include <linux/string.h>
  14
  15 #include <asm/oplib.h>
  16 #include <asm/idprom.h>
  17 #include <asm/machines.h>  /* Fun with Sun released architectures. */
  18
  19 struct idprom *idprom;
  20 EXPORT_SYMBOL(idprom);
  21
  22 static struct idprom idprom_buffer;
  23
  24 /* Here is the master table of Sun machines which use some implementation
  25  * of the Sparc CPU and have a meaningful IDPROM machtype value that we
  26  * know about.  See asm-sparc/machines.h for empirical constants.
  27  */
  28 struct Sun_Machine_Models Sun_Machines[NUM_SUN_MACHINES] = {
  29 /* First, Sun3's */
  30     { .name = "Sun 3/160 Series",       .id_machtype = (SM_SUN3 | SM_3_160) },
  31     { .name = "Sun 3/50",               .id_machtype = (SM_SUN3 | SM_3_50) },
  32     { .name = "Sun 3/260 Series",       .id_machtype = (SM_SUN3 | SM_3_260) },
  33     { .name = "Sun 3/110 Series",       .id_machtype = (SM_SUN3 | SM_3_110) },
  34     { .name = "Sun 3/60",               .id_machtype = (SM_SUN3 | SM_3_60) },
  35     { .name = "Sun 3/E",                .id_machtype = (SM_SUN3 | SM_3_E) },
  36 /* Now, Sun3x's */
  37     { .name = "Sun 3/460 Series",       .id_machtype = (SM_SUN3X | SM_3_460) },
  38     { .name = "Sun 3/80",               .id_machtype = (SM_SUN3X | SM_3_80) },
  39 /* Then, Sun4's */
  40 // { .name = "Sun 4/100 Series",        .id_machtype = (SM_SUN4 | SM_4_110) },
  41 // { .name = "Sun 4/200 Series",        .id_machtype = (SM_SUN4 | SM_4_260) },
  42 // { .name = "Sun 4/300 Series",        .id_machtype = (SM_SUN4 | SM_4_330) },
  43 // { .name = "Sun 4/400 Series",        .id_machtype = (SM_SUN4 | SM_4_470) },
  44 /* And now, Sun4c's */
  45 // { .name = "Sun4c SparcStation 1",    .id_machtype = (SM_SUN4C | SM_4C_SS1) },
  46 // { .name = "Sun4c SparcStation IPC",  .id_machtype = (SM_SUN4C | SM_4C_IPC) },
  47 // { .name = "Sun4c SparcStation 1+",   .id_machtype = (SM_SUN4C | SM_4C_SS1PLUS) },
  48 // { .name = "Sun4c SparcStation SLC",  .id_machtype = (SM_SUN4C | SM_4C_SLC) },
  49 // { .name = "Sun4c SparcStation 2",    .id_machtype = (SM_SUN4C | SM_4C_SS2) },
  50 // { .name = "Sun4c SparcStation ELC",  .id_machtype = (SM_SUN4C | SM_4C_ELC) },
  51 // { .name = "Sun4c SparcStation IPX",  .id_machtype = (SM_SUN4C | SM_4C_IPX) },
  52 /* Finally, early Sun4m's */
  53 // { .name = "Sun4m SparcSystem600",    .id_machtype = (SM_SUN4M | SM_4M_SS60) },
  54 // { .name = "Sun4m SparcStation10/20", .id_machtype = (SM_SUN4M | SM_4M_SS50) },
  55 // { .name = "Sun4m SparcStation5",     .id_machtype = (SM_SUN4M | SM_4M_SS40) },
  56 /* One entry for the OBP arch's which are sun4d, sun4e, and newer sun4m's */
  57 // { .name = "Sun4M OBP based system",  .id_machtype = (SM_SUN4M_OBP | 0x0) }
  58 };
  59
  60 static void __init display_system_type(unsigned char machtype)
  61 {
  62         register int i;
  63
  64         for (i = 0; i < NUM_SUN_MACHINES; i++) {
  65                 if(Sun_Machines[i].id_machtype == machtype) {
  66                         if (machtype != (SM_SUN4M_OBP | 0x00))
  67                                 printk("TYPE: %s\n", Sun_Machines[i].name);
  68                         else {
  69 #if 0
  70                                 prom_getproperty(prom_root_node, "banner-name",
  71                                                  sysname, sizeof(sysname));
  72                                 printk("TYPE: %s\n", sysname);
  73 #endif
  74                         }
  75                         return;
  76                 }
  77         }
  78
  79         prom_printf("IDPROM: Bogus id_machtype value, 0x%x\n", machtype);
  80         prom_halt();
  81 }
  82
  83 void sun3_get_model(unsigned char* model)
  84 {
  85         register int i;
  86
  87         for (i = 0; i < NUM_SUN_MACHINES; i++) {
  88                 if(Sun_Machines[i].id_machtype == idprom->id_machtype) {
  89                         strcpy(model, Sun_Machines[i].name);
  90                         return;
  91                 }
  92         }
  93 }
  94
  95
  96
  97 /* Calculate the IDPROM checksum (xor of the data bytes). */
  98 static unsigned char __init calc_idprom_cksum(struct idprom *idprom)
  99 {
 100         unsigned char cksum, i, *ptr = (unsigned char *)idprom;
 101
 102         for (i = cksum = 0; i <= 0x0E; i++)
 103                 cksum ^= *ptr++;
 104
 105         return cksum;
 106 }
 107
 108 /* Create a local IDPROM copy, verify integrity, and display information. */
 109 void __init idprom_init(void)
 110 {
 111         prom_get_idprom((char *) &idprom_buffer, sizeof(idprom_buffer));
 112
 113         idprom = &idprom_buffer;
 114
 115         if (idprom->id_format != 0x01)  {
 116                 prom_printf("IDPROM: Unknown format type!\n");
 117                 prom_halt();
 118         }
 119
 120         if (idprom->id_cksum != calc_idprom_cksum(idprom)) {
 121                 prom_printf("IDPROM: Checksum failure (nvram=%x, calc=%x)!\n",
 122                             idprom->id_cksum, calc_idprom_cksum(idprom));
 123                 prom_halt();
 124         }
 125
 126         display_system_type(idprom->id_machtype);
 127
 128         printk("Ethernet address: %x:%x:%x:%x:%x:%x\n",
 129                     idprom->id_ethaddr[0], idprom->id_ethaddr[1],
 130                     idprom->id_ethaddr[2], idprom->id_ethaddr[3],
 131                     idprom->id_ethaddr[4], idprom->id_ethaddr[5]);
 132 }