// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * QNAP TS-x09 Boards common functions
 *
 * Maintainers: Lennert Buytenhek <buytenh@marvell.com>
 *              Byron Bradley <byron.bbradley@gmail.com>
 */

#include <linux/kernel.h>
#include <linux/pci.h>
#include <linux/mv643xx_eth.h>
#include <linux/timex.h>
#include <linux/serial_reg.h>
#include "orion5x.h"
#include "tsx09-common.h"
#include "common.h"

/*****************************************************************************
 * QNAP TS-x09 specific power off method via UART1-attached PIC
 ****************************************************************************/

#define UART1_REG(x)    (UART1_VIRT_BASE + ((UART_##x) << 2))

void qnap_tsx09_power_off(void)
{
        /* 19200 baud divisor */
        const unsigned divisor = ((orion5x_tclk + (8 * 19200)) / (16 * 19200));

        pr_info("%s: triggering power-off...\n", __func__);

        /* hijack uart1 and reset into sane state (19200,8n1) */
        writel(0x83, UART1_REG(LCR));
        writel(divisor & 0xff, UART1_REG(DLL));
        writel((divisor >> 8) & 0xff, UART1_REG(DLM));
        writel(0x03, UART1_REG(LCR));
        writel(0x00, UART1_REG(IER));
        writel(0x00, UART1_REG(FCR));
        writel(0x00, UART1_REG(MCR));

        /* send the power-off command 'A' to PIC */
        writel('A', UART1_REG(TX));
}

/*****************************************************************************
 * Ethernet
 ****************************************************************************/

struct mv643xx_eth_platform_data qnap_tsx09_eth_data = {
        .phy_addr       = MV643XX_ETH_PHY_ADDR(8),
};

static int __init qnap_tsx09_parse_hex_nibble(char n)
{
        if (n >= '0' && n <= '9')
                return n - '0';

        if (n >= 'A' && n <= 'F')
                return n - 'A' + 10;

        if (n >= 'a' && n <= 'f')
                return n - 'a' + 10;

        return -1;
}

static int __init qnap_tsx09_parse_hex_byte(const char *b)
{
        int hi;
        int lo;

        hi = qnap_tsx09_parse_hex_nibble(b[0]);
        lo = qnap_tsx09_parse_hex_nibble(b[1]);

        if (hi < 0 || lo < 0)
                return -1;

        return (hi << 4) | lo;
}

static int __init qnap_tsx09_check_mac_addr(const char *addr_str)
{
        u_int8_t addr[6];
        int i;

        for (i = 0; i < 6; i++) {
                int byte;

                /*
                 * Enforce "xx:xx:xx:xx:xx:xx\n" format.
                 */
                if (addr_str[(i * 3) + 2] != ((i < 5) ? ':' : '\n'))
                        return -1;

                byte = qnap_tsx09_parse_hex_byte(addr_str + (i * 3));
                if (byte < 0)
                        return -1;
                addr[i] = byte;
        }

        printk(KERN_INFO "tsx09: found ethernet mac address %pM\n", addr);

        memcpy(qnap_tsx09_eth_data.mac_addr, addr, 6);

        return 0;
}

/*
 * The 'NAS Config' flash partition has an ext2 filesystem which
 * contains a file that has the ethernet MAC address in plain text
 * (format "xx:xx:xx:xx:xx:xx\n").
 */
void __init qnap_tsx09_find_mac_addr(u32 mem_base, u32 size)
{
        unsigned long addr;

        for (addr = mem_base; addr < (mem_base + size); addr += 1024) {
                char *nor_page;
                int ret = 0;

                nor_page = ioremap(addr, 1024);
                if (nor_page != NULL) {
                        ret = qnap_tsx09_check_mac_addr(nor_page);
                        iounmap(nor_page);
                }

                if (ret == 0)
                        break;
        }
}