arch/mips/dec/prom/identify.c

   1 /*
   2  * identify.c: machine identification code.
   3  *
   4  * Copyright (C) 1998 Harald Koerfgen and Paul M. Antoine
   5  * Copyright (C) 2002, 2003, 2004  Maciej W. Rozycki
   6  */
   7 #include <linux/init.h>
   8 #include <linux/kernel.h>
   9 #include <linux/mc146818rtc.h>
  10 #include <linux/module.h>
  11 #include <linux/string.h>
  12 #include <linux/types.h>
  13
  14 #include <asm/bootinfo.h>
  15 #include <asm/dec/ioasic.h>
  16 #include <asm/dec/ioasic_addrs.h>
  17 #include <asm/dec/kn01.h>
  18 #include <asm/dec/kn02.h>
  19 #include <asm/dec/kn02ba.h>
  20 #include <asm/dec/kn02ca.h>
  21 #include <asm/dec/kn03.h>
  22 #include <asm/dec/kn230.h>
  23 #include <asm/dec/prom.h>
  24
  25 #include "dectypes.h"
  26
  27 extern unsigned long mips_machgroup;
  28 extern unsigned long mips_machtype;
  29
  30 static const char *dec_system_strings[] = {
  31         [MACH_DSUNKNOWN]        "unknown DECstation",
  32         [MACH_DS23100]          "DECstation 2100/3100",
  33         [MACH_DS5100]           "DECsystem 5100",
  34         [MACH_DS5000_200]       "DECstation 5000/200",
  35         [MACH_DS5000_1XX]       "DECstation 5000/1xx",
  36         [MACH_DS5000_XX]        "Personal DECstation 5000/xx",
  37         [MACH_DS5000_2X0]       "DECstation 5000/2x0",
  38         [MACH_DS5400]           "DECsystem 5400",
  39         [MACH_DS5500]           "DECsystem 5500",
  40         [MACH_DS5800]           "DECsystem 5800",
  41         [MACH_DS5900]           "DECsystem 5900",
  42 };
  43
  44 const char *get_system_type(void)
  45 {
  46 #define STR_BUF_LEN     64
  47         static char system[STR_BUF_LEN];
  48         static int called = 0;
  49
  50         if (called == 0) {
  51                 called = 1;
  52                 snprintf(system, STR_BUF_LEN, "Digital %s",
  53                          dec_system_strings[mips_machtype]);
  54         }
  55
  56         return system;
  57 }
  58
  59
  60 /*
  61  * Setup essential system-specific memory addresses.  We need them
  62  * early.  Semantically the functions belong to prom/init.c, but they
  63  * are compact enough we want them inlined. --macro
  64  */
  65 volatile u8 *dec_rtc_base;
  66
  67 EXPORT_SYMBOL(dec_rtc_base);
  68
  69 static inline void prom_init_kn01(void)
  70 {
  71         dec_rtc_base = (void *)KN01_RTC_BASE;
  72         dec_kn_slot_size = KN01_SLOT_SIZE;
  73 }
  74
  75 static inline void prom_init_kn230(void)
  76 {
  77         dec_rtc_base = (void *)KN01_RTC_BASE;
  78         dec_kn_slot_size = KN01_SLOT_SIZE;
  79 }
  80
  81 static inline void prom_init_kn02(void)
  82 {
  83         dec_rtc_base = (void *)KN02_RTC_BASE;
  84         dec_kn_slot_size = KN02_SLOT_SIZE;
  85 }
  86
  87 static inline void prom_init_kn02xa(void)
  88 {
  89         ioasic_base = (void *)KN02XA_IOASIC_BASE;
  90         dec_rtc_base = (void *)KN02XA_RTC_BASE;
  91         dec_kn_slot_size = IOASIC_SLOT_SIZE;
  92 }
  93
  94 static inline void prom_init_kn03(void)
  95 {
  96         ioasic_base = (void *)KN03_IOASIC_BASE;
  97         dec_rtc_base = (void *)KN03_RTC_BASE;
  98         dec_kn_slot_size = IOASIC_SLOT_SIZE;
  99 }
 100
 101
 102 void __init prom_identify_arch(u32 magic)
 103 {
 104         unsigned char dec_cpunum, dec_firmrev, dec_etc, dec_systype;
 105         u32 dec_sysid;
 106
 107         if (!prom_is_rex(magic)) {
 108                 dec_sysid = simple_strtoul(prom_getenv("systype"),
 109                                            (char **)0, 0);
 110         } else {
 111                 dec_sysid = rex_getsysid();
 112                 if (dec_sysid == 0) {
 113                         printk("Zero sysid returned from PROM! "
 114                                "Assuming a PMAX-like machine.\n");
 115                         dec_sysid = 1;
 116                 }
 117         }
 118
 119         dec_cpunum = (dec_sysid & 0xff000000) >> 24;
 120         dec_systype = (dec_sysid & 0xff0000) >> 16;
 121         dec_firmrev = (dec_sysid & 0xff00) >> 8;
 122         dec_etc = dec_sysid & 0xff;
 123
 124         /* We're obviously one of the DEC machines */
 125         mips_machgroup = MACH_GROUP_DEC;
 126
 127         /*
 128          * FIXME: This may not be an exhaustive list of DECStations/Servers!
 129          * Put all model-specific initialisation calls here.
 130          */
 131         switch (dec_systype) {
 132         case DS2100_3100:
 133                 mips_machtype = MACH_DS23100;
 134                 prom_init_kn01();
 135                 break;
 136         case DS5100:            /* DS5100 MIPSMATE */
 137                 mips_machtype = MACH_DS5100;
 138                 prom_init_kn230();
 139                 break;
 140         case DS5000_200:        /* DS5000 3max */
 141                 mips_machtype = MACH_DS5000_200;
 142                 prom_init_kn02();
 143                 break;
 144         case DS5000_1XX:        /* DS5000/100 3min */
 145                 mips_machtype = MACH_DS5000_1XX;
 146                 prom_init_kn02xa();
 147                 break;
 148         case DS5000_2X0:        /* DS5000/240 3max+ or DS5900 bigmax */
 149                 mips_machtype = MACH_DS5000_2X0;
 150                 prom_init_kn03();
 151                 if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP))
 152                         mips_machtype = MACH_DS5900;
 153                 break;
 154         case DS5000_XX:         /* Personal DS5000/xx maxine */
 155                 mips_machtype = MACH_DS5000_XX;
 156                 prom_init_kn02xa();
 157                 break;
 158         case DS5800:            /* DS5800 Isis */
 159                 mips_machtype = MACH_DS5800;
 160                 break;
 161         case DS5400:            /* DS5400 MIPSfair */
 162                 mips_machtype = MACH_DS5400;
 163                 break;
 164         case DS5500:            /* DS5500 MIPSfair-2 */
 165                 mips_machtype = MACH_DS5500;
 166                 break;
 167         default:
 168                 mips_machtype = MACH_DSUNKNOWN;
 169                 break;
 170         }
 171
 172         if (mips_machtype == MACH_DSUNKNOWN)
 173                 printk("This is an %s, id is %x\n",
 174                        dec_system_strings[mips_machtype], dec_systype);
 175         else
 176                 printk("This is a %s\n", dec_system_strings[mips_machtype]);
 177 }