1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * Copyright (C) 2020 BayLibre, SAS
4 * Author: Neil Armstrong <narmstrong@baylibre.com>
5 */
6
7#include <common.h>
8#include <dm.h>
9#include <env_internal.h>
10#include <init.h>
11#include <net.h>
12#include <asm/io.h>
13#include <asm/arch/boot.h>
14#include <asm/arch/eth.h>
15#include <asm/arch/sm.h>
16#include <asm/global_data.h>
17#include <i2c.h>
18#include "khadas-mcu.h"
19
20int mmc_get_env_dev(void)
21{
22	switch (meson_get_boot_device()) {
23	case BOOT_DEVICE_EMMC:
24		return 2;
25	case BOOT_DEVICE_SD:
26		return 1;
27	default:
28		/* boot device is not EMMC|SD */
29		return -1;
30	}
31}
32
33/*
34 * The VIM3 on-board  MCU can mux the PCIe/USB3.0 shared differential
35 * lines using a FUSB340TMX USB 3.1 SuperSpeed Data Switch between
36 * an USB3.0 Type A connector and a M.2 Key M slot.
37 * The PHY driving these differential lines is shared between
38 * the USB3.0 controller and the PCIe Controller, thus only
39 * a single controller can use it.
40 */
41int meson_ft_board_setup(void *blob, struct bd_info *bd)
42{
43	struct udevice *bus, *dev;
44	int node, i2c_node, ret;
45	unsigned int i2c_addr;
46	u32 *val;
47
48	/* Find I2C device */
49	node = fdt_node_offset_by_compatible(gd->fdt_blob, -1, "khadas,mcu");
50	if (node < 0) {
51		printf("vim3: cannot find khadas,mcu node\n");
52		return 0;
53	}
54
55	/* Get addr */
56	val = (u32 *)fdt_getprop(gd->fdt_blob, node, "reg", NULL);
57	if (!val) {
58		printf("vim3: cannot find khadas,mcu node i2c addr\n");
59		return 0;
60	}
61	i2c_addr = fdt32_to_cpu(*val);
62
63	/* Get i2c device */
64	i2c_node = fdt_parent_offset(gd->fdt_blob, node);
65	if (node < 0) {
66		printf("vim3: cannot find khadas,mcu i2c node\n");
67		return 0;
68	}
69
70	ret = uclass_get_device_by_of_offset(UCLASS_I2C, i2c_node, &bus);
71	if (ret < 0) {
72		printf("vim3: cannot find i2c bus (%d)\n", ret);
73		return 0;
74	}
75
76	ret = i2c_get_chip(bus, i2c_addr, 1, &dev);
77	if (ret < 0) {
78		printf("vim3: cannot find i2c chip (%d)\n", ret);
79		return 0;
80	}
81
82	/* Read USB_PCIE_SWITCH_REG */
83	ret = dm_i2c_reg_read(dev, KHADAS_MCU_USB_PCIE_SWITCH_REG);
84	if (ret < 0) {
85		printf("vim3: failed to read i2c reg (%d)\n", ret);
86		return 0;
87	}
88	debug("MCU_USB_PCIE_SWITCH_REG: %d\n", ret);
89
90	/*
91	 * If in PCIe mode, alter DT
92	 * 0: Enable USB3.0, Disable PCIE, 1: Disable USB3.0, Enable PCIE
93	 */
94	if (ret > 0) {
95		static char data[32] __aligned(4);
96		const void *ptmp;
97		int len;
98
99		/* Find USB node */
100		node = fdt_node_offset_by_compatible(blob, -1, "amlogic,meson-g12a-usb-ctrl");
101		if (node < 0) {
102			printf("vim3: cannot find amlogic,meson-g12a-usb-ctrl node\n");
103			return 0;
104		}
105
106		/* Update PHY names (mandatory to disable USB3.0) */
107		len = strlcpy(data, "usb2-phy0", 32) + 1;
108		len += strlcpy(&data[len], "usb2-phy1", 32 - len) + 1;
109		ret = fdt_setprop(blob, node, "phy-names", data, len);
110		if (ret < 0) {
111			printf("vim3: failed to update usb phy names property (%d)\n", ret);
112			return 0;
113		}
114
115		/* Update PHY list, by keeping the 2 first entries (optional) */
116		ptmp = fdt_getprop(blob, node, "phys", &len);
117		if (ptmp) {
118			memcpy(data, ptmp, min_t(unsigned int, 2 * sizeof(u32), len));
119
120			ret = fdt_setprop(blob, node, "phys", data,
121					  min_t(unsigned int, 2 * sizeof(u32), len));
122			if (ret < 0)
123				printf("vim3: failed to update usb phys property (%d)\n", ret);
124		} else
125			printf("vim3: cannot find usb node phys property\n");
126
127		/* Find PCIe node */
128		node = fdt_node_offset_by_compatible(blob, -1, "amlogic,g12a-pcie");
129		if (node < 0) {
130			printf("vim3: cannot find amlogic,g12a-pcie node\n");
131			return 0;
132		}
133
134		/* Enable PCIe */
135		len = strlcpy(data, "okay", 32) + 1;
136		ret = fdt_setprop(blob, node, "status", data, len);
137		if (ret < 0) {
138			printf("vim3: failed to enable pcie node (%d)\n", ret);
139			return 0;
140		}
141
142		printf("vim3: successfully enabled PCIe\n");
143	}
144
145	return 0;
146}
147
148#define EFUSE_MAC_OFFSET	0
149#define EFUSE_MAC_SIZE		12
150#define MAC_ADDR_LEN		6
151
152int misc_init_r(void)
153{
154	u8 mac_addr[MAC_ADDR_LEN + 1];
155	char efuse_mac_addr[EFUSE_MAC_SIZE], tmp[3];
156	char serial_string[EFUSE_MAC_SIZE + 1];
157	ssize_t len;
158
159	if (!eth_env_get_enetaddr("ethaddr", mac_addr)) {
160		len = meson_sm_read_efuse(EFUSE_MAC_OFFSET,
161					  efuse_mac_addr, EFUSE_MAC_SIZE);
162		if (len != EFUSE_MAC_SIZE)
163			return 0;
164
165		/* MAC is stored in ASCII format, 1bytes = 2characters */
166		for (int i = 0; i < 6; i++) {
167			tmp[0] = efuse_mac_addr[i * 2];
168			tmp[1] = efuse_mac_addr[i * 2 + 1];
169			tmp[2] = '\0';
170			mac_addr[i] = hextoul(tmp, NULL);
171		}
172		mac_addr[MAC_ADDR_LEN] = '\0';
173
174		if (is_valid_ethaddr(mac_addr))
175			eth_env_set_enetaddr("ethaddr", mac_addr);
176		else
177			meson_generate_serial_ethaddr();
178
179		eth_env_get_enetaddr("ethaddr", mac_addr);
180	}
181
182	if (!env_get("serial#")) {
183		eth_env_get_enetaddr("ethaddr", mac_addr);
184		sprintf(serial_string, "%02X%02X%02X%02X%02X%02X",
185			mac_addr[0], mac_addr[1], mac_addr[2],
186			mac_addr[3], mac_addr[4], mac_addr[5]);
187		env_set("serial#", serial_string);
188	}
189
190	return 0;
191}
192