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           = "PB44",
  88                 .mach_type      = AR71XX_MACH_PB44,
  89         }, {
  90                 .name           = "MZK-W300NH",
  91                 .mach_type      = AR71XX_MACH_MZK_W300NH,
  92         }, {
  93                 .name           = "MZK-W04NU",
  94                 .mach_type      = AR71XX_MACH_MZK_W04NU,
  95         }
  96 };
  97
  98 static inline int is_valid_ram_addr(void *addr)
  99 {
 100         if (((u32) addr > KSEG0) &&
 101             ((u32) addr < (KSEG0 + AR71XX_MEM_SIZE_MAX)))
 102                 return 1;
 103
 104         if (((u32) addr > KSEG1) &&
 105             ((u32) addr < (KSEG1 + AR71XX_MEM_SIZE_MAX)))
 106                 return 1;
 107
 108         return 0;
 109 }
 110
 111 static __init char *ar71xx_prom_getargv(const char *name)
 112 {
 113         int len = strlen(name);
 114         int i;
 115
 116         if (!is_valid_ram_addr(ar71xx_prom_argv))
 117                 return NULL;
 118
 119         for (i = 0; i < ar71xx_prom_argc; i++) {
 120                 char *argv = ar71xx_prom_argv[i];
 121
 122                 if (!is_valid_ram_addr(argv))
 123                         continue;
 124
 125                 if (strncmp(name, argv, len) == 0 && (argv)[len] == '=')
 126                         return argv + len + 1;
 127         }
 128
 129         return NULL;
 130 }
 131
 132 static __init char *ar71xx_prom_getenv(const char *envname)
 133 {
 134         int len = strlen(envname);
 135         char **env;
 136
 137         if (!is_valid_ram_addr(ar71xx_prom_envp))
 138                 return NULL;
 139
 140         for (env = ar71xx_prom_envp; is_valid_ram_addr(*env); env++) {
 141                 if (strncmp(envname, *env, len) == 0 && (*env)[len] == '=')
 142                         return *env + len + 1;
 143
 144                 /* RedBoot env comes in pointer pairs - key, value */
 145                 if (strncmp(envname, *env, len) == 0 && (*env)[len] == 0)
 146                         if (is_valid_ram_addr(*(++env)))
 147                                 return *env;
 148         }
 149
 150         return NULL;
 151 }
 152
 153 static __init unsigned long find_board_byname(char *name)
 154 {
 155         int i;
 156
 157         for (i = 0; i < ARRAY_SIZE(boards); i++)
 158                 if (strcmp(name, boards[i].name) == 0)
 159                         return boards[i].mach_type;
 160
 161         return AR71XX_MACH_GENERIC;
 162 }
 163
 164 static int ar71xx_prom_init_myloader(void)
 165 {
 166         struct myloader_info *mylo;
 167
 168         mylo = myloader_get_info();
 169         if (!mylo)
 170                 return 0;
 171
 172         switch (mylo->did) {
 173         case DEVID_COMPEX_WP543:
 174                 ar71xx_mach_type = AR71XX_MACH_WP543;
 175                 break;
 176         default:
 177                 printk(KERN_WARNING "prom: unknown device id: %x\n",
 178                                 mylo->did);
 179         }
 180         ar71xx_set_mac_base(mylo->macs[0]);
 181
 182         return 1;
 183 }
 184
 185 static void ar71xx_prom_init_generic(void)
 186 {
 187         char *p;
 188
 189         ar71xx_prom_argc = fw_arg0;
 190         ar71xx_prom_argv = (char **)fw_arg1;
 191         ar71xx_prom_envp = (char **)fw_arg2;
 192
 193         p = ar71xx_prom_getargv("board");
 194         if (!p)
 195                 p = ar71xx_prom_getenv("board");
 196         if (p)
 197                 ar71xx_mach_type = find_board_byname(p);
 198
 199         p = ar71xx_prom_getenv("ethaddr");
 200         if (!p)
 201                 p = ar71xx_prom_getargv("kmac");
 202         if (p)
 203                 ar71xx_parse_mac_addr(p);
 204 }
 205
 206 void __init prom_init(void)
 207 {
 208         printk(KERN_DEBUG "prom: fw_arg0=%08x, fw_arg1=%08x, "
 209                         "fw_arg2=%08x, fw_arg3=%08x\n",
 210                         (unsigned int)fw_arg0, (unsigned int)fw_arg1,
 211                         (unsigned int)fw_arg2, (unsigned int)fw_arg3);
 212
 213         ar71xx_mach_type = AR71XX_MACH_GENERIC;
 214
 215         if (ar71xx_prom_init_myloader())
 216                 return;
 217
 218         ar71xx_prom_init_generic();
 219 }
 220
 221 void __init prom_free_prom_memory(void)
 222 {
 223         /* We do not have to prom memory to free */
 224 }
 225
 226 #define UART_READ(r) \
 227         __raw_readl((void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4 * (r)))
 228
 229 #define UART_WRITE(r, v) \
 230         __raw_writel((v), (void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4*(r)))
 231
 232 void prom_putchar(unsigned char ch)
 233 {
 234         while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
 235         UART_WRITE(UART_TX, ch);
 236         while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
 237 }