1 /*
2  * Copyright (c) 2019 Intel Corporation
3  *
4  * SPDX-License-Identifier: Apache-2.0
5  */
6 
7 #define DT_DRV_COMPAT microchip_xec_ps2
8 
9 #include <errno.h>
10 #include <device.h>
11 #include <drivers/ps2.h>
12 #include <soc.h>
13 #include <logging/log.h>
14 
15 #define LOG_LEVEL CONFIG_PS2_LOG_LEVEL
16 LOG_MODULE_REGISTER(ps2_mchp_xec);
17 
18 /* in 50us units */
19 #define PS2_TIMEOUT 10000
20 
21 struct ps2_xec_config {
22 	PS2_Type *base;
23 	uint8_t girq_id;
24 	uint8_t girq_bit;
25 	uint8_t isr_nvic;
26 };
27 
28 struct ps2_xec_data {
29 	ps2_callback_t callback_isr;
30 	struct k_sem tx_lock;
31 };
32 
ps2_xec_configure(const struct device * dev,ps2_callback_t callback_isr)33 static int ps2_xec_configure(const struct device *dev,
34 			     ps2_callback_t callback_isr)
35 {
36 	const struct ps2_xec_config *config = dev->config;
37 	struct ps2_xec_data *data = dev->data;
38 	PS2_Type *base = config->base;
39 
40 	uint8_t  __attribute__((unused)) dummy;
41 
42 	if (!callback_isr) {
43 		return -EINVAL;
44 	}
45 
46 	data->callback_isr = callback_isr;
47 
48 	/* In case the self test for a PS2 device already finished and
49 	 * set the SOURCE bit to 1 we clear it before enabling the
50 	 * interrupts. Instances must be allocated before the BAT or
51 	 * the host may time out.
52 	 */
53 	MCHP_GIRQ_SRC(config->girq_id) = BIT(config->girq_bit);
54 	dummy = base->TRX_BUFF;
55 	base->STATUS = MCHP_PS2_STATUS_RW1C_MASK;
56 
57 	/* Enable FSM and init instance in rx mode*/
58 	base->CTRL = MCHP_PS2_CTRL_EN_POS;
59 
60 	/* We enable the interrupts in the EC aggregator so that the
61 	 * result  can be forwarded to the ARM NVIC
62 	 */
63 	MCHP_GIRQ_ENSET(config->girq_id) = BIT(config->girq_bit);
64 
65 	k_sem_give(&data->tx_lock);
66 
67 	return 0;
68 }
69 
70 
ps2_xec_write(const struct device * dev,uint8_t value)71 static int ps2_xec_write(const struct device *dev, uint8_t value)
72 {
73 	const struct ps2_xec_config *config = dev->config;
74 	struct ps2_xec_data *data = dev->data;
75 	PS2_Type *base = config->base;
76 	int i = 0;
77 
78 	uint8_t  __attribute__((unused)) dummy;
79 
80 	if (k_sem_take(&data->tx_lock, K_NO_WAIT)) {
81 		return -EACCES;
82 	}
83 	/* Allow the PS2 controller to complete a RX transaction. This
84 	 * is because the channel may be actively receiving data.
85 	 * In addition, it is necessary to wait for a previous TX
86 	 * transaction to complete. The PS2 block has a single
87 	 * FSM.
88 	 */
89 	while (((base->STATUS &
90 		(MCHP_PS2_STATUS_RX_BUSY | MCHP_PS2_STATUS_TX_IDLE))
91 		!= MCHP_PS2_STATUS_TX_IDLE) && (i < PS2_TIMEOUT)) {
92 		k_busy_wait(50);
93 		i++;
94 	}
95 
96 	if (unlikely(i == PS2_TIMEOUT)) {
97 		LOG_DBG("PS2 write timed out");
98 		return -ETIMEDOUT;
99 	}
100 
101 	/* Inhibit ps2 controller and clear status register */
102 	base->CTRL = 0x00;
103 
104 	/* Read to clear data ready bit in the status register*/
105 	dummy = base->TRX_BUFF;
106 	k_sleep(K_MSEC(1));
107 	base->STATUS = MCHP_PS2_STATUS_RW1C_MASK;
108 
109 	/* Switch the interface to TX mode and enable state machine */
110 	base->CTRL = MCHP_PS2_CTRL_TR_TX | MCHP_PS2_CTRL_EN;
111 
112 	/* Write value to TX/RX register */
113 	base->TRX_BUFF = value;
114 
115 	k_sem_give(&data->tx_lock);
116 
117 	return 0;
118 }
119 
ps2_xec_inhibit_interface(const struct device * dev)120 static int ps2_xec_inhibit_interface(const struct device *dev)
121 {
122 	const struct ps2_xec_config *config = dev->config;
123 	struct ps2_xec_data *data = dev->data;
124 	PS2_Type *base = config->base;
125 
126 	if (k_sem_take(&data->tx_lock, K_MSEC(10)) != 0) {
127 		return -EACCES;
128 	}
129 
130 	base->CTRL = 0x00;
131 	MCHP_GIRQ_SRC(config->girq_id) = BIT(config->girq_bit);
132 	NVIC_ClearPendingIRQ(config->isr_nvic);
133 
134 	k_sem_give(&data->tx_lock);
135 
136 	return 0;
137 }
138 
ps2_xec_enable_interface(const struct device * dev)139 static int ps2_xec_enable_interface(const struct device *dev)
140 {
141 	const struct ps2_xec_config *config = dev->config;
142 	struct ps2_xec_data *data = dev->data;
143 	PS2_Type *base = config->base;
144 
145 	MCHP_GIRQ_SRC(config->girq_id) = BIT(config->girq_bit);
146 	base->CTRL = MCHP_PS2_CTRL_EN;
147 
148 	k_sem_give(&data->tx_lock);
149 
150 	return 0;
151 }
ps2_xec_isr(const struct device * dev)152 static void ps2_xec_isr(const struct device *dev)
153 {
154 	const struct ps2_xec_config *config = dev->config;
155 	struct ps2_xec_data *data = dev->data;
156 	PS2_Type *base = config->base;
157 	uint32_t status;
158 
159 	MCHP_GIRQ_SRC(config->girq_id) = BIT(config->girq_bit);
160 
161 	/* Read and clear status */
162 	status = base->STATUS;
163 
164 	if (status & MCHP_PS2_STATUS_RXD_RDY) {
165 		base->CTRL = 0x00;
166 		if (data->callback_isr) {
167 			data->callback_isr(dev, base->TRX_BUFF);
168 		}
169 	} else if (status &
170 		    (MCHP_PS2_STATUS_TX_TMOUT | MCHP_PS2_STATUS_TX_ST_TMOUT)) {
171 		/* Clear sticky bits and go to read mode */
172 		base->STATUS = MCHP_PS2_STATUS_RW1C_MASK;
173 		LOG_ERR("TX time out: %0x", status);
174 	}
175 
176 	/* The control register reverts to RX automatically after
177 	 * transmiting the data
178 	 */
179 	base->CTRL = MCHP_PS2_CTRL_EN;
180 }
181 
182 static const struct ps2_driver_api ps2_xec_driver_api = {
183 	.config = ps2_xec_configure,
184 	.read = NULL,
185 	.write = ps2_xec_write,
186 	.disable_callback = ps2_xec_inhibit_interface,
187 	.enable_callback = ps2_xec_enable_interface,
188 };
189 
190 #ifdef CONFIG_PS2_XEC_0
191 static int ps2_xec_init_0(const struct device *dev);
192 
193 static const struct ps2_xec_config ps2_xec_config_0 = {
194 	.base = (PS2_Type *) DT_INST_REG_ADDR(0),
195 	.girq_id = DT_INST_PROP(0, girq),
196 	.girq_bit = DT_INST_PROP(0, girq_bit),
197 	.isr_nvic = DT_INST_IRQN(0),
198 };
199 
200 static struct ps2_xec_data ps2_xec_port_data_0;
201 
202 DEVICE_DT_INST_DEFINE(0,
203 		    &ps2_xec_init_0,
204 		    NULL,
205 		    &ps2_xec_port_data_0, &ps2_xec_config_0,
206 		    POST_KERNEL, CONFIG_PS2_INIT_PRIORITY,
207 		    &ps2_xec_driver_api);
208 
209 
ps2_xec_init_0(const struct device * dev)210 static int ps2_xec_init_0(const struct device *dev)
211 {
212 	ARG_UNUSED(dev);
213 
214 	struct ps2_xec_data *data = dev->data;
215 
216 	k_sem_init(&data->tx_lock, 0, 1);
217 
218 	IRQ_CONNECT(DT_INST_IRQN(0),
219 		    DT_INST_IRQ(0, priority),
220 		    ps2_xec_isr, DEVICE_DT_INST_GET(0), 0);
221 
222 	irq_enable(DT_INST_IRQN(0));
223 
224 	return 0;
225 }
226 #endif /* CONFIG_PS2_XEC_0 */
227 
228 #ifdef CONFIG_PS2_XEC_1
229 static int ps2_xec_init_1(const struct device *dev);
230 
231 static const struct ps2_xec_config ps2_xec_config_1 = {
232 	.base = (PS2_Type *) DT_INST_REG_ADDR(1),
233 	.girq_id = DT_INST_PROP(1, girq),
234 	.girq_bit = DT_INST_PROP(1, girq_bit),
235 	.isr_nvic = DT_INST_IRQN(1),
236 
237 };
238 
239 static struct ps2_xec_data ps2_xec_port_data_1;
240 
241 DEVICE_DT_INST_DEFINE(1,
242 		    &ps2_xec_init_1,
243 		    NULL,
244 		    &ps2_xec_port_data_1, &ps2_xec_config_1,
245 		    POST_KERNEL, CONFIG_PS2_INIT_PRIORITY,
246 		    &ps2_xec_driver_api);
247 
ps2_xec_init_1(const struct device * dev)248 static int ps2_xec_init_1(const struct device *dev)
249 {
250 	ARG_UNUSED(dev);
251 
252 	struct ps2_xec_data *data = dev->data;
253 
254 	k_sem_init(&data->tx_lock, 0, 1);
255 
256 	IRQ_CONNECT(DT_INST_IRQN(1),
257 		    DT_INST_IRQ(1, priority),
258 		    ps2_xec_isr, DEVICE_DT_INST_GET(1), 0);
259 
260 	irq_enable(DT_INST_IRQN(1));
261 
262 	return 0;
263 }
264 #endif /* CONFIG_PS2_XEC_1 */
265