FreeBSD/Linux Kernel Cross Reference
sys/dev/intel/spi.c
1 /*-
2 * Copyright (c) 2016 Oleksandr Tymoshenko <gonzo@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
29
30 #include "opt_acpi.h"
31
32 #include <sys/param.h>
33 #include <sys/bus.h>
34 #include <sys/kernel.h>
35 #include <sys/module.h>
36 #include <sys/proc.h>
37 #include <sys/rman.h>
38
39 #include <machine/bus.h>
40 #include <machine/resource.h>
41
42 #include <dev/spibus/spi.h>
43 #include <dev/spibus/spibusvar.h>
44
45 #include <contrib/dev/acpica/include/acpi.h>
46 #include <contrib/dev/acpica/include/accommon.h>
47
48 #include <dev/acpica/acpivar.h>
49
50 #include "spibus_if.h"
51
52 /**
53 * Macros for driver mutex locking
54 */
55 #define INTELSPI_LOCK(_sc) mtx_lock(&(_sc)->sc_mtx)
56 #define INTELSPI_UNLOCK(_sc) mtx_unlock(&(_sc)->sc_mtx)
57 #define INTELSPI_LOCK_INIT(_sc) \
58 mtx_init(&_sc->sc_mtx, device_get_nameunit((_sc)->sc_dev), \
59 "intelspi", MTX_DEF)
60 #define INTELSPI_LOCK_DESTROY(_sc) mtx_destroy(&(_sc)->sc_mtx)
61 #define INTELSPI_ASSERT_LOCKED(_sc) mtx_assert(&(_sc)->sc_mtx, MA_OWNED)
62 #define INTELSPI_ASSERT_UNLOCKED(_sc) mtx_assert(&(_sc)->sc_mtx, MA_NOTOWNED)
63
64 #define INTELSPI_WRITE(_sc, _off, _val) \
65 bus_write_4((_sc)->sc_mem_res, (_off), (_val))
66 #define INTELSPI_READ(_sc, _off) \
67 bus_read_4((_sc)->sc_mem_res, (_off))
68
69 #define INTELSPI_BUSY 0x1
70 #define TX_FIFO_THRESHOLD 2
71 #define RX_FIFO_THRESHOLD 2
72 #define CLOCK_DIV_10MHZ 5
73 #define DATA_SIZE_8BITS 8
74
75 #define CS_LOW 0
76 #define CS_HIGH 1
77
78 #define INTELSPI_SSPREG_SSCR0 0x0
79 #define SSCR0_SCR(n) (((n) - 1) << 8)
80 #define SSCR0_SSE (1 << 7)
81 #define SSCR0_FRF_SPI (0 << 4)
82 #define SSCR0_DSS(n) (((n) - 1) << 0)
83 #define INTELSPI_SSPREG_SSCR1 0x4
84 #define SSCR1_TINTE (1 << 19)
85 #define SSCR1_RFT(n) (((n) - 1) << 10)
86 #define SSCR1_RFT_MASK (0xf << 10)
87 #define SSCR1_TFT(n) (((n) - 1) << 6)
88 #define SSCR1_SPI_SPH (1 << 4)
89 #define SSCR1_SPI_SPO (1 << 3)
90 #define SSCR1_MODE_MASK (SSCR1_SPI_SPO | SSCR1_SPI_SPH)
91 #define SSCR1_MODE_0 (0)
92 #define SSCR1_MODE_1 (SSCR1_SPI_SPH)
93 #define SSCR1_MODE_2 (SSCR1_SPI_SPO)
94 #define SSCR1_MODE_3 (SSCR1_SPI_SPO | SSCR1_SPI_SPH)
95 #define SSCR1_TIE (1 << 1)
96 #define SSCR1_RIE (1 << 0)
97 #define INTELSPI_SSPREG_SSSR 0x8
98 #define SSSR_RFL_MASK (0xf << 12)
99 #define SSSR_TFL_MASK (0xf << 8)
100 #define SSSR_RNE (1 << 3)
101 #define SSSR_TNF (1 << 2)
102 #define INTELSPI_SSPREG_SSITR 0xC
103 #define INTELSPI_SSPREG_SSDR 0x10
104 #define INTELSPI_SSPREG_SSTO 0x28
105 #define INTELSPI_SSPREG_SSPSP 0x2C
106 #define INTELSPI_SSPREG_SSTSA 0x30
107 #define INTELSPI_SSPREG_SSRSA 0x34
108 #define INTELSPI_SSPREG_SSTSS 0x38
109 #define INTELSPI_SSPREG_SSACD 0x3C
110 #define INTELSPI_SSPREG_ITF 0x40
111 #define INTELSPI_SSPREG_SITF 0x44
112 #define INTELSPI_SSPREG_SIRF 0x48
113 #define INTELSPI_SSPREG_PRV_CLOCK_PARAMS 0x400
114 #define INTELSPI_SSPREG_RESETS 0x404
115 #define INTELSPI_SSPREG_GENERAL 0x408
116 #define INTELSPI_SSPREG_SSP_REG 0x40C
117 #define INTELSPI_SSPREG_SPI_CS_CTRL 0x418
118 #define SPI_CS_CTRL_CS_MASK (3)
119 #define SPI_CS_CTRL_SW_MODE (1 << 0)
120 #define SPI_CS_CTRL_HW_MODE (1 << 0)
121 #define SPI_CS_CTRL_CS_HIGH (1 << 1)
122 #define SPI_CS_CTRL_CS_LOW (0 << 1)
123
124 struct intelspi_softc {
125 ACPI_HANDLE sc_handle;
126 device_t sc_dev;
127 struct mtx sc_mtx;
128 int sc_mem_rid;
129 struct resource *sc_mem_res;
130 int sc_irq_rid;
131 struct resource *sc_irq_res;
132 void *sc_irq_ih;
133 struct spi_command *sc_cmd;
134 uint32_t sc_len;
135 uint32_t sc_read;
136 uint32_t sc_flags;
137 uint32_t sc_written;
138 };
139
140 static int intelspi_probe(device_t dev);
141 static int intelspi_attach(device_t dev);
142 static int intelspi_detach(device_t dev);
143 static void intelspi_intr(void *);
144
145 static int
146 intelspi_txfifo_full(struct intelspi_softc *sc)
147 {
148 uint32_t sssr;
149
150 INTELSPI_ASSERT_LOCKED(sc);
151
152 sssr = INTELSPI_READ(sc, INTELSPI_SSPREG_SSSR);
153 if (sssr & SSSR_TNF)
154 return (0);
155
156 return (1);
157 }
158
159 static int
160 intelspi_rxfifo_empty(struct intelspi_softc *sc)
161 {
162 uint32_t sssr;
163
164 INTELSPI_ASSERT_LOCKED(sc);
165
166 sssr = INTELSPI_READ(sc, INTELSPI_SSPREG_SSSR);
167 if (sssr & SSSR_RNE)
168 return (0);
169 else
170 return (1);
171 }
172
173 static void
174 intelspi_fill_tx_fifo(struct intelspi_softc *sc)
175 {
176 struct spi_command *cmd;
177 uint32_t written;
178 uint8_t *data;
179
180 INTELSPI_ASSERT_LOCKED(sc);
181
182 cmd = sc->sc_cmd;
183 while (sc->sc_written < sc->sc_len &&
184 !intelspi_txfifo_full(sc)) {
185 data = (uint8_t *)cmd->tx_cmd;
186 written = sc->sc_written++;
187
188 if (written >= cmd->tx_cmd_sz) {
189 data = (uint8_t *)cmd->tx_data;
190 written -= cmd->tx_cmd_sz;
191 }
192 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSDR, data[written]);
193 }
194 }
195
196 static void
197 intelspi_drain_rx_fifo(struct intelspi_softc *sc)
198 {
199 struct spi_command *cmd;
200 uint32_t read;
201 uint8_t *data;
202
203 INTELSPI_ASSERT_LOCKED(sc);
204
205 cmd = sc->sc_cmd;
206 while (sc->sc_read < sc->sc_len &&
207 !intelspi_rxfifo_empty(sc)) {
208 data = (uint8_t *)cmd->rx_cmd;
209 read = sc->sc_read++;
210 if (read >= cmd->rx_cmd_sz) {
211 data = (uint8_t *)cmd->rx_data;
212 read -= cmd->rx_cmd_sz;
213 }
214 data[read] = INTELSPI_READ(sc, INTELSPI_SSPREG_SSDR) & 0xff;
215 }
216 }
217
218 static int
219 intelspi_transaction_done(struct intelspi_softc *sc)
220 {
221 int txfifo_empty;
222 uint32_t sssr;
223
224 INTELSPI_ASSERT_LOCKED(sc);
225
226 if (sc->sc_written != sc->sc_len ||
227 sc->sc_read != sc->sc_len)
228 return (0);
229
230 sssr = INTELSPI_READ(sc, INTELSPI_SSPREG_SSSR);
231 txfifo_empty = ((sssr & SSSR_TFL_MASK) == 0) &&
232 (sssr & SSSR_TNF);
233
234 if (txfifo_empty && !(sssr & SSSR_RNE))
235 return (1);
236
237 return (0);
238 }
239
240 static int
241 intelspi_transact(struct intelspi_softc *sc)
242 {
243
244 INTELSPI_ASSERT_LOCKED(sc);
245
246 /* TX - Fill up the FIFO. */
247 intelspi_fill_tx_fifo(sc);
248
249 /* RX - Drain the FIFO. */
250 intelspi_drain_rx_fifo(sc);
251
252 /* Check for end of transfer. */
253 return intelspi_transaction_done(sc);
254 }
255
256 static void
257 intelspi_intr(void *arg)
258 {
259 struct intelspi_softc *sc;
260 uint32_t reg;
261
262 sc = (struct intelspi_softc *)arg;
263
264 INTELSPI_LOCK(sc);
265 if ((sc->sc_flags & INTELSPI_BUSY) == 0) {
266 INTELSPI_UNLOCK(sc);
267 return;
268 }
269
270 /* Check if SSP if off */
271 reg = INTELSPI_READ(sc, INTELSPI_SSPREG_SSSR);
272 if (reg == 0xffffffffU) {
273 INTELSPI_UNLOCK(sc);
274 return;
275 }
276
277 /* Check for end of transfer. */
278 if (intelspi_transact(sc)) {
279 /* Disable interrupts */
280 reg = INTELSPI_READ(sc, INTELSPI_SSPREG_SSCR1);
281 reg &= ~(SSCR1_TIE | SSCR1_RIE | SSCR1_TINTE);
282 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR1, reg);
283 wakeup(sc->sc_dev);
284 }
285
286 INTELSPI_UNLOCK(sc);
287 }
288
289 static void
290 intelspi_init(struct intelspi_softc *sc)
291 {
292 uint32_t reg;
293
294 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR0, 0);
295
296 /* Manual CS control */
297 reg = INTELSPI_READ(sc, INTELSPI_SSPREG_SPI_CS_CTRL);
298 reg &= ~(SPI_CS_CTRL_CS_MASK);
299 reg |= (SPI_CS_CTRL_SW_MODE | SPI_CS_CTRL_CS_HIGH);
300 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SPI_CS_CTRL, reg);
301
302 /* Set TX/RX FIFO IRQ threshold levels */
303 reg = SSCR1_TFT(TX_FIFO_THRESHOLD) | SSCR1_RFT(RX_FIFO_THRESHOLD);
304 /*
305 * Set SPI mode. This should be part of transaction or sysctl
306 */
307 reg |= SSCR1_MODE_0;
308 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR1, reg);
309
310 /*
311 * Parent clock on Minowboard Turbot is 50MHz
312 * divide it by 5 to set to more or less reasonable
313 * value. But this should be part of transaction config
314 * or sysctl
315 */
316 reg = SSCR0_SCR(CLOCK_DIV_10MHZ);
317 /* Put SSP in SPI mode */
318 reg |= SSCR0_FRF_SPI;
319 /* Data size */
320 reg |= SSCR0_DSS(DATA_SIZE_8BITS);
321 /* Enable SSP */
322 reg |= SSCR0_SSE;
323 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR0, reg);
324 }
325
326 static void
327 intelspi_set_cs(struct intelspi_softc *sc, int level)
328 {
329 uint32_t reg;
330
331 reg = INTELSPI_READ(sc, INTELSPI_SSPREG_SPI_CS_CTRL);
332 reg &= ~(SPI_CS_CTRL_CS_MASK);
333 reg |= SPI_CS_CTRL_SW_MODE;
334
335 if (level == CS_HIGH)
336 reg |= SPI_CS_CTRL_CS_HIGH;
337 else
338 reg |= SPI_CS_CTRL_CS_LOW;
339
340 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SPI_CS_CTRL, reg);
341 }
342
343 static int
344 intelspi_transfer(device_t dev, device_t child, struct spi_command *cmd)
345 {
346 struct intelspi_softc *sc;
347 int err;
348 uint32_t sscr1;
349
350 sc = device_get_softc(dev);
351 err = 0;
352
353 KASSERT(cmd->tx_cmd_sz == cmd->rx_cmd_sz,
354 ("TX/RX command sizes should be equal"));
355 KASSERT(cmd->tx_data_sz == cmd->rx_data_sz,
356 ("TX/RX data sizes should be equal"));
357
358 INTELSPI_LOCK(sc);
359
360 /* If the controller is in use wait until it is available. */
361 while (sc->sc_flags & INTELSPI_BUSY) {
362 err = mtx_sleep(dev, &sc->sc_mtx, 0, "intelspi", 0);
363 if (err == EINTR) {
364 INTELSPI_UNLOCK(sc);
365 return (err);
366 }
367 }
368
369 /* Now we have control over SPI controller. */
370 sc->sc_flags = INTELSPI_BUSY;
371
372 /* Save a pointer to the SPI command. */
373 sc->sc_cmd = cmd;
374 sc->sc_read = 0;
375 sc->sc_written = 0;
376 sc->sc_len = cmd->tx_cmd_sz + cmd->tx_data_sz;
377
378 /* Enable CS */
379 intelspi_set_cs(sc, CS_LOW);
380 /* Transfer as much as possible to FIFOs */
381 if (!intelspi_transact(sc)) {
382 /* If FIFO is not large enough - enable interrupts */
383 sscr1 = INTELSPI_READ(sc, INTELSPI_SSPREG_SSCR1);
384 sscr1 |= (SSCR1_TIE | SSCR1_RIE | SSCR1_TINTE);
385 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR1, sscr1);
386
387 /* and wait for transaction to complete */
388 err = mtx_sleep(dev, &sc->sc_mtx, 0, "intelspi", hz * 2);
389 }
390
391 /* de-asser CS */
392 intelspi_set_cs(sc, CS_HIGH);
393
394 /* Clear transaction details */
395 sc->sc_cmd = NULL;
396 sc->sc_read = 0;
397 sc->sc_written = 0;
398 sc->sc_len = 0;
399
400 /* Make sure the SPI engine and interrupts are disabled. */
401 sscr1 = INTELSPI_READ(sc, INTELSPI_SSPREG_SSCR1);
402 sscr1 &= ~(SSCR1_TIE | SSCR1_RIE | SSCR1_TINTE);
403 INTELSPI_WRITE(sc, INTELSPI_SSPREG_SSCR1, sscr1);
404
405 /* Release the controller and wakeup the next thread waiting for it. */
406 sc->sc_flags = 0;
407 wakeup_one(dev);
408 INTELSPI_UNLOCK(sc);
409
410 /*
411 * Check for transfer timeout. The SPI controller doesn't
412 * return errors.
413 */
414 if (err == EWOULDBLOCK) {
415 device_printf(sc->sc_dev, "transfer timeout\n");
416 err = EIO;
417 }
418
419 return (err);
420 }
421
422 static int
423 intelspi_probe(device_t dev)
424 {
425 static char *gpio_ids[] = { "80860F0E", NULL };
426 int rv;
427
428 if (acpi_disabled("spi") )
429 return (ENXIO);
430 rv = ACPI_ID_PROBE(device_get_parent(dev), dev, gpio_ids, NULL);
431 if (rv <= 0)
432 device_set_desc(dev, "Intel SPI Controller");
433 return (rv);
434 }
435
436 static int
437 intelspi_attach(device_t dev)
438 {
439 struct intelspi_softc *sc;
440
441 sc = device_get_softc(dev);
442 sc->sc_dev = dev;
443 sc->sc_handle = acpi_get_handle(dev);
444
445 INTELSPI_LOCK_INIT(sc);
446
447 sc->sc_mem_rid = 0;
448 sc->sc_mem_res = bus_alloc_resource_any(sc->sc_dev,
449 SYS_RES_MEMORY, &sc->sc_mem_rid, RF_ACTIVE);
450 if (sc->sc_mem_res == NULL) {
451 device_printf(dev, "can't allocate memory resource\n");
452 goto error;
453 }
454
455 sc->sc_irq_rid = 0;
456 sc->sc_irq_res = bus_alloc_resource_any(sc->sc_dev,
457 SYS_RES_IRQ, &sc->sc_irq_rid, RF_ACTIVE);
458 if (sc->sc_irq_res == NULL) {
459 device_printf(dev, "can't allocate IRQ resource\n");
460 goto error;
461 }
462
463 /* Hook up our interrupt handler. */
464 if (bus_setup_intr(dev, sc->sc_irq_res, INTR_TYPE_MISC | INTR_MPSAFE,
465 NULL, intelspi_intr, sc, &sc->sc_irq_ih)) {
466 device_printf(dev, "cannot setup the interrupt handler\n");
467 goto error;
468 }
469
470 intelspi_init(sc);
471
472 device_add_child(dev, "spibus", -1);
473
474 return (bus_generic_attach(dev));
475
476 error:
477 INTELSPI_LOCK_DESTROY(sc);
478
479 if (sc->sc_mem_res != NULL)
480 bus_release_resource(dev, SYS_RES_MEMORY,
481 sc->sc_mem_rid, sc->sc_mem_res);
482
483 if (sc->sc_irq_res != NULL)
484 bus_release_resource(dev, SYS_RES_IRQ,
485 sc->sc_irq_rid, sc->sc_irq_res);
486
487 return (ENXIO);
488 }
489
490 static int
491 intelspi_detach(device_t dev)
492 {
493 struct intelspi_softc *sc;
494
495 sc = device_get_softc(dev);
496
497 INTELSPI_LOCK_DESTROY(sc);
498
499 if (sc->sc_irq_ih)
500 bus_teardown_intr(dev, sc->sc_irq_res, sc->sc_irq_ih);
501
502 if (sc->sc_mem_res != NULL)
503 bus_release_resource(dev, SYS_RES_MEMORY,
504 sc->sc_mem_rid, sc->sc_mem_res);
505
506 if (sc->sc_irq_res != NULL)
507 bus_release_resource(dev, SYS_RES_IRQ,
508 sc->sc_irq_rid, sc->sc_irq_res);
509
510 return (bus_generic_detach(dev));
511 }
512
513 static device_method_t intelspi_methods[] = {
514 /* Device interface */
515 DEVMETHOD(device_probe, intelspi_probe),
516 DEVMETHOD(device_attach, intelspi_attach),
517 DEVMETHOD(device_detach, intelspi_detach),
518
519 /* SPI interface */
520 DEVMETHOD(spibus_transfer, intelspi_transfer),
521
522 DEVMETHOD_END
523 };
524
525 static driver_t intelspi_driver = {
526 "spi",
527 intelspi_methods,
528 sizeof(struct intelspi_softc),
529 };
530
531 DRIVER_MODULE(intelspi, acpi, intelspi_driver, 0, 0);
532 MODULE_DEPEND(intelspi, acpi, 1, 1, 1);
533 MODULE_DEPEND(intelspi, spibus, 1, 1, 1);
Cache object: 80c064e61f763c20edcec9f39ce0ace6
|