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

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * Copyright (C) 2012-2015 Panasonic Corporation
   4  * Copyright (C) 2015-2020 Socionext Inc.
   5  *   Author: Masahiro Yamada <yamada.masahiro@socionext.com>
   6  */
   7
   8 #include <dm.h>
   9 #include <fdt_support.h>
  10 #include <linux/ctype.h>
  11 #include <linux/delay.h>
  12 #include <linux/io.h>
  13 #include <asm/global_data.h>
  14
  15 #include "micro-support-card.h"
  16
  17 #define SMC911X_OFFSET                  0x00000
  18 #define LED_OFFSET                      0x90000
  19 #define NS16550A_OFFSET                 0xb0000
  20 #define MICRO_SUPPORT_CARD_RESET        0xd0034
  21 #define MICRO_SUPPORT_CARD_REVISION     0xd00e0
  22
  23 static bool support_card_found;
  24 static void __iomem *support_card_base;
  25
  26 static void support_card_detect(void)
  27 {
  28         DECLARE_GLOBAL_DATA_PTR;
  29         const void *fdt = gd->fdt_blob;
  30         int offset;
  31         u64 addr, addr2;
  32
  33         offset = fdt_node_offset_by_compatible(fdt, 0, "smsc,lan9118");
  34         if (offset < 0)
  35                 return;
  36
  37         addr = fdt_get_base_address(fdt, offset);
  38         if (addr == OF_BAD_ADDR)
  39                 return;
  40         addr -= SMC911X_OFFSET;
  41
  42         offset = fdt_node_offset_by_compatible(fdt, 0, "ns16550a");
  43         if (offset < 0)
  44                 return;
  45
  46         addr2 = fdt_get_base_address(fdt, offset);
  47         if (addr2 == OF_BAD_ADDR)
  48                 return;
  49         addr2 -= NS16550A_OFFSET;
  50
  51         /* sanity check */
  52         if (addr != addr2)
  53                 return;
  54
  55         support_card_base = ioremap(addr, 0x100000);
  56
  57         support_card_found = true;
  58 }
  59
  60 /*
  61  * 0: reset deassert, 1: reset
  62  *
  63  * bit[0]: LAN, I2C, LED
  64  * bit[1]: UART
  65  */
  66 static void support_card_reset_deassert(void)
  67 {
  68         writel(0x00010000, support_card_base + MICRO_SUPPORT_CARD_RESET);
  69 }
  70
  71 static void support_card_reset(void)
  72 {
  73         writel(0x00020003, support_card_base + MICRO_SUPPORT_CARD_RESET);
  74 }
  75
  76 static int support_card_show_revision(void)
  77 {
  78         u32 revision;
  79
  80         revision = readl(support_card_base + MICRO_SUPPORT_CARD_REVISION);
  81         revision &= 0xff;
  82
  83         /* revision 3.6.x card changed the revision format */
  84         printf("SC:    Micro Support Card (CPLD version %s%d.%d)\n",
  85                revision >> 4 == 6 ? "3." : "",
  86                revision >> 4, revision & 0xf);
  87
  88         return 0;
  89 }
  90
  91 void support_card_init(void)
  92 {
  93         struct udevice *dev;
  94         int ret;
  95
  96         /* The system bus must be initialized for access to the support card. */
  97         ret = uclass_get_device_by_driver(UCLASS_SIMPLE_BUS,
  98                                           DM_DRIVER_GET(uniphier_system_bus_driver),
  99                                           &dev);
 100         if (ret)
 101                 return;
 102
 103         /* Check DT to see if this board has the support card. */
 104         support_card_detect();
 105
 106         if (!support_card_found)
 107                 return;
 108
 109         support_card_reset();
 110         /*
 111          * After power on, we need to keep the LAN controller in reset state
 112          * for a while. (200 usec)
 113          */
 114         udelay(200);
 115         support_card_reset_deassert();
 116
 117         support_card_show_revision();
 118 }
 119
 120 static const u8 ledval_num[] = {
 121         0x7e, /* 0 */
 122         0x0c, /* 1 */
 123         0xb6, /* 2 */
 124         0x9e, /* 3 */
 125         0xcc, /* 4 */
 126         0xda, /* 5 */
 127         0xfa, /* 6 */
 128         0x4e, /* 7 */
 129         0xfe, /* 8 */
 130         0xde, /* 9 */
 131 };
 132
 133 static const u8 ledval_alpha[] = {
 134         0xee, /* A */
 135         0xf8, /* B */
 136         0x72, /* C */
 137         0xbc, /* D */
 138         0xf2, /* E */
 139         0xe2, /* F */
 140         0x7a, /* G */
 141         0xe8, /* H */
 142         0x08, /* I */
 143         0x3c, /* J */
 144         0xea, /* K */
 145         0x70, /* L */
 146         0x6e, /* M */
 147         0xa8, /* N */
 148         0xb8, /* O */
 149         0xe6, /* P */
 150         0xce, /* Q */
 151         0xa0, /* R */
 152         0xc8, /* S */
 153         0x8c, /* T */
 154         0x7c, /* U */
 155         0x54, /* V */
 156         0xfc, /* W */
 157         0xec, /* X */
 158         0xdc, /* Y */
 159         0xa4, /* Z */
 160 };
 161
 162 static u8 char2ledval(char c)
 163 {
 164         if (isdigit(c))
 165                 return ledval_num[c - '0'];
 166         else if (isalpha(c))
 167                 return ledval_alpha[toupper(c) - 'A'];
 168
 169         return 0;
 170 }
 171
 172 void led_puts(const char *s)
 173 {
 174         int i;
 175         u32 val = 0;
 176
 177         if (!support_card_found)
 178                 return;
 179
 180         if (!s)
 181                 return;
 182
 183         for (i = 0; i < 4; i++) {
 184                 val <<= 8;
 185                 val |= char2ledval(*s);
 186                 if (*s != '\0')
 187                         s++;
 188         }
 189
 190         writel(~val, support_card_base + LED_OFFSET);
 191 }