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