target/linux/ar71xx/files/arch/mips/ar71xx/prom.c

   1 /*
   2  *  Atheros AR71xx SoC specific prom routines
   3  *
   4  *  Copyright (C) 2008-2009 Gabor Juhos <juhosg@openwrt.org>
   5  *  Copyright (C) 2008 Imre Kaloz <kaloz@openwrt.org>
   6  *
   7  *  This program is free software; you can redistribute it and/or modify it
   8  *  under the terms of the GNU General Public License version 2 as published
   9  *  by the Free Software Foundation.
  10  */
  11
  12 #include <linux/kernel.h>
  13 #include <linux/init.h>
  14 #include <linux/io.h>
  15 #include <linux/serial_reg.h>
  16
  17 #include <asm/bootinfo.h>
  18 #include <asm/addrspace.h>
  19 #include <asm/fw/myloader/myloader.h>
  20
  21 #include <asm/mach-ar71xx/ar71xx.h>
  22
  23 #include "devices.h"
  24
  25 struct board_rec {
  26         char            *name;
  27         unsigned long   mach_type;
  28 };
  29
  30 static int ar71xx_prom_argc __initdata;
  31 static char **ar71xx_prom_argv __initdata;
  32 static char **ar71xx_prom_envp __initdata;
  33
  34 static struct board_rec boards[] __initdata = {
  35         {
  36                 .name           = "411",
  37                 .mach_type      = AR71XX_MACH_RB_411,
  38         }, {
  39                 .name           = "433",
  40                 .mach_type      = AR71XX_MACH_RB_433,
  41         }, {
  42                 .name           = "450",
  43                 .mach_type      = AR71XX_MACH_RB_450,
  44         }, {
  45                 .name           = "493",
  46                 .mach_type      = AR71XX_MACH_RB_493,
  47         }, {
  48                 .name           = "AP81",
  49                 .mach_type      = AR71XX_MACH_AP81,
  50         }, {
  51                 .name           = "AP83",
  52                 .mach_type      = AR71XX_MACH_AP83,
  53         }, {
  54                 .name           = "AW-NR580",
  55                 .mach_type      = AR71XX_MACH_AW_NR580,
  56         }, {
  57                 .name           = "TEW-632BRP",
  58                 .mach_type      = AR71XX_MACH_TEW_632BRP,
  59         }, {
  60                 .name           = "TL-WR941ND",
  61                 .mach_type      = AR71XX_MACH_TL_WR941ND,
  62         }, {
  63                 .name           = "UBNT-RS",
  64                 .mach_type      = AR71XX_MACH_UBNT_RS,
  65         }, {
  66                 .name           = "UBNT-RSPRO",
  67                 .mach_type      = AR71XX_MACH_UBNT_RSPRO,
  68         }, {
  69                 .name           = "Ubiquiti AR71xx-based board",
  70                 .mach_type      = AR71XX_MACH_UBNT_RS,
  71         }, {
  72                 .name           = "UBNT-LS-SR71",
  73                 .mach_type      = AR71XX_MACH_UBNT_LSSR71,
  74         }, {
  75                 .name           = "UBNT-LSX",
  76                 .mach_type      = AR71XX_MACH_UBNT_LSX,
  77         }, {
  78                 .name           = "WNR2000",
  79                 .mach_type      = AR71XX_MACH_WNR2000,
  80         }, {
  81                 .name           = "WRT400N",
  82                 .mach_type      = AR71XX_MACH_WRT400N,
  83         }, {
  84                 .name           = "PB42",
  85                 .mach_type      = AR71XX_MACH_PB42,
  86         }, {
  87                 .name           = "MZK-W300NH",
  88                 .mach_type      = AR71XX_MACH_MZK_W300NH,
  89         }, {
  90                 .name           = "MZK-W04NU",
  91                 .mach_type      = AR71XX_MACH_MZK_W04NU,
  92         }
  93 };
  94
  95 static inline int is_valid_ram_addr(void *addr)
  96 {
  97         if (((u32) addr > KSEG0) &&
  98             ((u32) addr < (KSEG0 + AR71XX_MEM_SIZE_MAX)))
  99                 return 1;
 100
 101         if (((u32) addr > KSEG1) &&
 102             ((u32) addr < (KSEG1 + AR71XX_MEM_SIZE_MAX)))
 103                 return 1;
 104
 105         return 0;
 106 }
 107
 108 static __init char *ar71xx_prom_getargv(const char *name)
 109 {
 110         int len = strlen(name);
 111         int i;
 112
 113         if (!is_valid_ram_addr(ar71xx_prom_argv))
 114                 return NULL;
 115
 116         for (i = 0; i < ar71xx_prom_argc; i++) {
 117                 char *argv = ar71xx_prom_argv[i];
 118
 119                 if (!is_valid_ram_addr(argv))
 120                         continue;
 121
 122                 if (strncmp(name, argv, len) == 0 && (argv)[len] == '=')
 123                         return argv + len + 1;
 124         }
 125
 126         return NULL;
 127 }
 128
 129 static __init char *ar71xx_prom_getenv(const char *envname)
 130 {
 131         int len = strlen(envname);
 132         char **env;
 133
 134         if (!is_valid_ram_addr(ar71xx_prom_envp))
 135                 return NULL;
 136
 137         for (env = ar71xx_prom_envp; is_valid_ram_addr(*env); env++) {
 138                 if (strncmp(envname, *env, len) == 0 && (*env)[len] == '=')
 139                         return *env + len + 1;
 140
 141                 /* RedBoot env comes in pointer pairs - key, value */
 142                 if (strncmp(envname, *env, len) == 0 && (*env)[len] == 0)
 143                         if (is_valid_ram_addr(*(++env)))
 144                                 return *env;
 145         }
 146
 147         return NULL;
 148 }
 149
 150 static __init unsigned long find_board_byname(char *name)
 151 {
 152         int i;
 153
 154         for (i = 0; i < ARRAY_SIZE(boards); i++)
 155                 if (strcmp(name, boards[i].name) == 0)
 156                         return boards[i].mach_type;
 157
 158         return AR71XX_MACH_GENERIC;
 159 }
 160
 161 static int ar71xx_prom_init_myloader(void)
 162 {
 163         struct myloader_info *mylo;
 164
 165         mylo = myloader_get_info();
 166         if (!mylo)
 167                 return 0;
 168
 169         switch (mylo->did) {
 170         case DEVID_COMPEX_WP543:
 171                 ar71xx_mach_type = AR71XX_MACH_WP543;
 172                 break;
 173         default:
 174                 printk(KERN_WARNING "prom: unknown device id: %x\n",
 175                                 mylo->did);
 176         }
 177         ar71xx_set_mac_base(mylo->macs[0]);
 178
 179         return 1;
 180 }
 181
 182 static void ar71xx_prom_init_generic(void)
 183 {
 184         char *p;
 185
 186         ar71xx_prom_argc = fw_arg0;
 187         ar71xx_prom_argv = (char **)fw_arg1;
 188         ar71xx_prom_envp = (char **)fw_arg2;
 189
 190         p = ar71xx_prom_getargv("board");
 191         if (!p)
 192                 p = ar71xx_prom_getenv("board");
 193         if (p)
 194                 ar71xx_mach_type = find_board_byname(p);
 195
 196         p = ar71xx_prom_getenv("ethaddr");
 197         if (!p)
 198                 p = ar71xx_prom_getargv("kmac");
 199         if (p)
 200                 ar71xx_parse_mac_addr(p);
 201 }
 202
 203 void __init prom_init(void)
 204 {
 205         printk(KERN_DEBUG "prom: fw_arg0=%08x, fw_arg1=%08x, "
 206                         "fw_arg2=%08x, fw_arg3=%08x\n",
 207                         (unsigned int)fw_arg0, (unsigned int)fw_arg1,
 208                         (unsigned int)fw_arg2, (unsigned int)fw_arg3);
 209
 210         ar71xx_mach_type = AR71XX_MACH_GENERIC;
 211
 212         if (ar71xx_prom_init_myloader())
 213                 return;
 214
 215         ar71xx_prom_init_generic();
 216 }
 217
 218 void __init prom_free_prom_memory(void)
 219 {
 220         /* We do not have to prom memory to free */
 221 }
 222
 223 #define UART_READ(r) \
 224         __raw_readl((void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4 * (r)))
 225
 226 #define UART_WRITE(r, v) \
 227         __raw_writel((v), (void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4*(r)))
 228
 229 void prom_putchar(unsigned char ch)
 230 {
 231         while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
 232         UART_WRITE(UART_TX, ch);
 233         while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
 234 }