arch/arm/mach-uniphier/micro-support-card.c

   1 /*
   2  * Copyright (C) 2012-2015 Panasonic Corporation
   3  * Copyright (C) 2015-2016 Socionext Inc.
   4  *   Author: Masahiro Yamada <yamada.masahiro@socionext.com>
   5  *
   6  * SPDX-License-Identifier:     GPL-2.0+
   7  */
   8
   9 #include <common.h>
  10 #include <linux/ctype.h>
  11 #include <linux/io.h>
  12
  13 #include "micro-support-card.h"
  14
  15 #define MICRO_SUPPORT_CARD_BASE         0x43f00000
  16 #define SMC911X_BASE                    ((MICRO_SUPPORT_CARD_BASE) + 0x00000)
  17 #define LED_BASE                        ((MICRO_SUPPORT_CARD_BASE) + 0x90000)
  18 #define NS16550A_BASE                   ((MICRO_SUPPORT_CARD_BASE) + 0xb0000)
  19 #define MICRO_SUPPORT_CARD_RESET        ((MICRO_SUPPORT_CARD_BASE) + 0xd0034)
  20 #define MICRO_SUPPORT_CARD_REVISION     ((MICRO_SUPPORT_CARD_BASE) + 0xd00E0)
  21
  22 /*
  23  * 0: reset deassert, 1: reset
  24  *
  25  * bit[0]: LAN, I2C, LED
  26  * bit[1]: UART
  27  */
  28 static void support_card_reset_deassert(void)
  29 {
  30         writel(0x00010000, MICRO_SUPPORT_CARD_RESET);
  31 }
  32
  33 static void support_card_reset(void)
  34 {
  35         writel(0x00020003, MICRO_SUPPORT_CARD_RESET);
  36 }
  37
  38 static int support_card_show_revision(void)
  39 {
  40         u32 revision;
  41
  42         revision = readl(MICRO_SUPPORT_CARD_REVISION);
  43         revision &= 0xff;
  44
  45         /* revision 3.6.x card changed the revision format */
  46         printf("(CPLD version %s%d.%d)\n", revision >> 4 == 6 ? "3." : "",
  47                revision >> 4, revision & 0xf);
  48
  49         return 0;
  50 }
  51
  52 int checkboard(void)
  53 {
  54         printf("SC:    Micro Support Card ");
  55         return support_card_show_revision();
  56 }
  57
  58 void support_card_init(void)
  59 {
  60         support_card_reset();
  61         /*
  62          * After power on, we need to keep the LAN controller in reset state
  63          * for a while. (200 usec)
  64          */
  65         udelay(200);
  66         support_card_reset_deassert();
  67 }
  68
  69 #if defined(CONFIG_SMC911X)
  70 #include <netdev.h>
  71
  72 int board_eth_init(bd_t *bis)
  73 {
  74         return smc911x_initialize(0, SMC911X_BASE);
  75 }
  76 #endif
  77
  78 #if !defined(CONFIG_SYS_NO_FLASH)
  79
  80 #include <mtd/cfi_flash.h>
  81
  82 struct memory_bank {
  83         phys_addr_t base;
  84         unsigned long size;
  85 };
  86
  87 static int mem_is_flash(const struct memory_bank *mem)
  88 {
  89         const int loop = 128;
  90         u32 *scratch_addr;
  91         u32 saved_value;
  92         int ret = 1;
  93         int i;
  94
  95         /* just in case, use the tail of the memory bank */
  96         scratch_addr = map_physmem(mem->base + mem->size - sizeof(u32) * loop,
  97                                    sizeof(u32) * loop, MAP_NOCACHE);
  98
  99         for (i = 0; i < loop; i++, scratch_addr++) {
 100                 saved_value = readl(scratch_addr);
 101                 writel(~saved_value, scratch_addr);
 102                 if (readl(scratch_addr) != saved_value) {
 103                         /* We assume no memory or SRAM here. */
 104                         writel(saved_value, scratch_addr);
 105                         ret = 0;
 106                         break;
 107                 }
 108         }
 109
 110         unmap_physmem(scratch_addr, MAP_NOCACHE);
 111
 112         return ret;
 113 }
 114
 115 /* {address, size} */
 116 static const struct memory_bank memory_banks[] = {
 117         {0x42000000, 0x01f00000},
 118 };
 119
 120 static const struct memory_bank
 121 *flash_banks_list[CONFIG_SYS_MAX_FLASH_BANKS_DETECT];
 122
 123 phys_addr_t cfi_flash_bank_addr(int i)
 124 {
 125         return flash_banks_list[i]->base;
 126 }
 127
 128 unsigned long cfi_flash_bank_size(int i)
 129 {
 130         return flash_banks_list[i]->size;
 131 }
 132
 133 static void detect_num_flash_banks(void)
 134 {
 135         const struct memory_bank *memory_bank, *end;
 136
 137         cfi_flash_num_flash_banks = 0;
 138
 139         memory_bank = memory_banks;
 140         end = memory_bank + ARRAY_SIZE(memory_banks);
 141
 142         for (; memory_bank < end; memory_bank++) {
 143                 if (cfi_flash_num_flash_banks >=
 144                     CONFIG_SYS_MAX_FLASH_BANKS_DETECT)
 145                         break;
 146
 147                 if (mem_is_flash(memory_bank)) {
 148                         flash_banks_list[cfi_flash_num_flash_banks] =
 149                                                                 memory_bank;
 150
 151                         debug("flash bank found: base = 0x%lx, size = 0x%lx\n",
 152                               (unsigned long)memory_bank->base,
 153                               (unsigned long)memory_bank->size);
 154                         cfi_flash_num_flash_banks++;
 155                 }
 156         }
 157
 158         debug("number of flash banks: %d\n", cfi_flash_num_flash_banks);
 159 }
 160 #else /* CONFIG_SYS_NO_FLASH */
 161 static void detect_num_flash_banks(void)
 162 {
 163 };
 164 #endif /* CONFIG_SYS_NO_FLASH */
 165
 166 void support_card_late_init(void)
 167 {
 168         detect_num_flash_banks();
 169 }
 170
 171 static const u8 ledval_num[] = {
 172         0x7e, /* 0 */
 173         0x0c, /* 1 */
 174         0xb6, /* 2 */
 175         0x9e, /* 3 */
 176         0xcc, /* 4 */
 177         0xda, /* 5 */
 178         0xfa, /* 6 */
 179         0x4e, /* 7 */
 180         0xfe, /* 8 */
 181         0xde, /* 9 */
 182 };
 183
 184 static const u8 ledval_alpha[] = {
 185         0xee, /* A */
 186         0xf8, /* B */
 187         0x72, /* C */
 188         0xbc, /* D */
 189         0xf2, /* E */
 190         0xe2, /* F */
 191         0x7a, /* G */
 192         0xe8, /* H */
 193         0x08, /* I */
 194         0x3c, /* J */
 195         0xea, /* K */
 196         0x70, /* L */
 197         0x6e, /* M */
 198         0xa8, /* N */
 199         0xb8, /* O */
 200         0xe6, /* P */
 201         0xce, /* Q */
 202         0xa0, /* R */
 203         0xc8, /* S */
 204         0x8c, /* T */
 205         0x7c, /* U */
 206         0x54, /* V */
 207         0xfc, /* W */
 208         0xec, /* X */
 209         0xdc, /* Y */
 210         0xa4, /* Z */
 211 };
 212
 213 static u8 char2ledval(char c)
 214 {
 215         if (isdigit(c))
 216                 return ledval_num[c - '0'];
 217         else if (isalpha(c))
 218                 return ledval_alpha[toupper(c) - 'A'];
 219
 220         return 0;
 221 }
 222
 223 void led_puts(const char *s)
 224 {
 225         int i;
 226         u32 val = 0;
 227
 228         if (!s)
 229                 return;
 230
 231         for (i = 0; i < 4; i++) {
 232                 val <<= 8;
 233                 val |= char2ledval(*s);
 234                 if (*s != '\0')
 235                         s++;
 236         }
 237
 238         writel(~val, LED_BASE);
 239 }