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 static const char *dec_system_strings[] = {
  30         [MACH_DSUNKNOWN]        "unknown DECstation",
  31         [MACH_DS23100]          "DECstation 2100/3100",
  32         [MACH_DS5100]           "DECsystem 5100",
  33         [MACH_DS5000_200]       "DECstation 5000/200",
  34         [MACH_DS5000_1XX]       "DECstation 5000/1xx",
  35         [MACH_DS5000_XX]        "Personal DECstation 5000/xx",
  36         [MACH_DS5000_2X0]       "DECstation 5000/2x0",
  37         [MACH_DS5400]           "DECsystem 5400",
  38         [MACH_DS5500]           "DECsystem 5500",
  39         [MACH_DS5800]           "DECsystem 5800",
  40         [MACH_DS5900]           "DECsystem 5900",
  41 };
  42
  43 const char *get_system_type(void)
  44 {
  45 #define STR_BUF_LEN     64
  46         static char system[STR_BUF_LEN];
  47         static int called = 0;
  48
  49         if (called == 0) {
  50                 called = 1;
  51                 snprintf(system, STR_BUF_LEN, "Digital %s",
  52                          dec_system_strings[mips_machtype]);
  53         }
  54
  55         return system;
  56 }
  57
  58
  59 /*
  60  * Setup essential system-specific memory addresses.  We need them
  61  * early.  Semantically the functions belong to prom/init.c, but they
  62  * are compact enough we want them inlined. --macro
  63  */
  64 volatile u8 *dec_rtc_base;
  65
  66 EXPORT_SYMBOL(dec_rtc_base);
  67
  68 static inline void prom_init_kn01(void)
  69 {
  70         dec_kn_slot_base = KN01_SLOT_BASE;
  71         dec_kn_slot_size = KN01_SLOT_SIZE;
  72
  73         dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
  74 }
  75
  76 static inline void prom_init_kn230(void)
  77 {
  78         dec_kn_slot_base = KN01_SLOT_BASE;
  79         dec_kn_slot_size = KN01_SLOT_SIZE;
  80
  81         dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
  82 }
  83
  84 static inline void prom_init_kn02(void)
  85 {
  86         dec_kn_slot_base = KN02_SLOT_BASE;
  87         dec_kn_slot_size = KN02_SLOT_SIZE;
  88         dec_tc_bus = 1;
  89
  90         dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN02_RTC);
  91 }
  92
  93 static inline void prom_init_kn02xa(void)
  94 {
  95         dec_kn_slot_base = KN02XA_SLOT_BASE;
  96         dec_kn_slot_size = IOASIC_SLOT_SIZE;
  97         dec_tc_bus = 1;
  98
  99         ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
 100         dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
 101 }
 102
 103 static inline void prom_init_kn03(void)
 104 {
 105         dec_kn_slot_base = KN03_SLOT_BASE;
 106         dec_kn_slot_size = IOASIC_SLOT_SIZE;
 107         dec_tc_bus = 1;
 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         /*
 137          * FIXME: This may not be an exhaustive list of DECStations/Servers!
 138          * Put all model-specific initialisation calls here.
 139          */
 140         switch (dec_systype) {
 141         case DS2100_3100:
 142                 mips_machtype = MACH_DS23100;
 143                 prom_init_kn01();
 144                 break;
 145         case DS5100:            /* DS5100 MIPSMATE */
 146                 mips_machtype = MACH_DS5100;
 147                 prom_init_kn230();
 148                 break;
 149         case DS5000_200:        /* DS5000 3max */
 150                 mips_machtype = MACH_DS5000_200;
 151                 prom_init_kn02();
 152                 break;
 153         case DS5000_1XX:        /* DS5000/100 3min */
 154                 mips_machtype = MACH_DS5000_1XX;
 155                 prom_init_kn02xa();
 156                 break;
 157         case DS5000_2X0:        /* DS5000/240 3max+ or DS5900 bigmax */
 158                 mips_machtype = MACH_DS5000_2X0;
 159                 prom_init_kn03();
 160                 if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP))
 161                         mips_machtype = MACH_DS5900;
 162                 break;
 163         case DS5000_XX:         /* Personal DS5000/xx maxine */
 164                 mips_machtype = MACH_DS5000_XX;
 165                 prom_init_kn02xa();
 166                 break;
 167         case DS5800:            /* DS5800 Isis */
 168                 mips_machtype = MACH_DS5800;
 169                 break;
 170         case DS5400:            /* DS5400 MIPSfair */
 171                 mips_machtype = MACH_DS5400;
 172                 break;
 173         case DS5500:            /* DS5500 MIPSfair-2 */
 174                 mips_machtype = MACH_DS5500;
 175                 break;
 176         default:
 177                 mips_machtype = MACH_DSUNKNOWN;
 178                 break;
 179         }
 180
 181         if (mips_machtype == MACH_DSUNKNOWN)
 182                 printk("This is an %s, id is %x\n",
 183                        dec_system_strings[mips_machtype], dec_systype);
 184         else
 185                 printk("This is a %s\n", dec_system_strings[mips_machtype]);
 186 }