Merge remote-tracking branch 'remotes/dgibson/tags/ppc-for-2.9-20170303' into staging
[qemu/ar7.git] / hw / ssi / omap_spi.c
blob22034656b8c8fde4edcdc063372ac98b36d7ee35
1 /*
2 * TI OMAP processor's Multichannel SPI emulation.
4 * Copyright (C) 2007-2009 Nokia Corporation
6 * Original code for OMAP2 by Andrzej Zaborowski <andrew@openedhand.com>
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 or
11 * (at your option) any later version of the License.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License along
19 * with this program; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22 #include "qemu/osdep.h"
23 #include "hw/hw.h"
24 #include "hw/arm/omap.h"
26 /* Multichannel SPI */
27 struct omap_mcspi_s {
28 MemoryRegion iomem;
29 qemu_irq irq;
30 int chnum;
32 uint32_t sysconfig;
33 uint32_t systest;
34 uint32_t irqst;
35 uint32_t irqen;
36 uint32_t wken;
37 uint32_t control;
39 struct omap_mcspi_ch_s {
40 qemu_irq txdrq;
41 qemu_irq rxdrq;
42 uint32_t (*txrx)(void *opaque, uint32_t, int);
43 void *opaque;
45 uint32_t tx;
46 uint32_t rx;
48 uint32_t config;
49 uint32_t status;
50 uint32_t control;
51 } ch[4];
54 static inline void omap_mcspi_interrupt_update(struct omap_mcspi_s *s)
56 qemu_set_irq(s->irq, s->irqst & s->irqen);
59 static inline void omap_mcspi_dmarequest_update(struct omap_mcspi_ch_s *ch)
61 qemu_set_irq(ch->txdrq,
62 (ch->control & 1) && /* EN */
63 (ch->config & (1 << 14)) && /* DMAW */
64 (ch->status & (1 << 1)) && /* TXS */
65 ((ch->config >> 12) & 3) != 1); /* TRM */
66 qemu_set_irq(ch->rxdrq,
67 (ch->control & 1) && /* EN */
68 (ch->config & (1 << 15)) && /* DMAW */
69 (ch->status & (1 << 0)) && /* RXS */
70 ((ch->config >> 12) & 3) != 2); /* TRM */
73 static void omap_mcspi_transfer_run(struct omap_mcspi_s *s, int chnum)
75 struct omap_mcspi_ch_s *ch = s->ch + chnum;
77 if (!(ch->control & 1)) /* EN */
78 return;
79 if ((ch->status & (1 << 0)) && /* RXS */
80 ((ch->config >> 12) & 3) != 2 && /* TRM */
81 !(ch->config & (1 << 19))) /* TURBO */
82 goto intr_update;
83 if ((ch->status & (1 << 1)) && /* TXS */
84 ((ch->config >> 12) & 3) != 1) /* TRM */
85 goto intr_update;
87 if (!(s->control & 1) || /* SINGLE */
88 (ch->config & (1 << 20))) { /* FORCE */
89 if (ch->txrx)
90 ch->rx = ch->txrx(ch->opaque, ch->tx, /* WL */
91 1 + (0x1f & (ch->config >> 7)));
94 ch->tx = 0;
95 ch->status |= 1 << 2; /* EOT */
96 ch->status |= 1 << 1; /* TXS */
97 if (((ch->config >> 12) & 3) != 2) /* TRM */
98 ch->status |= 1 << 0; /* RXS */
100 intr_update:
101 if ((ch->status & (1 << 0)) && /* RXS */
102 ((ch->config >> 12) & 3) != 2 && /* TRM */
103 !(ch->config & (1 << 19))) /* TURBO */
104 s->irqst |= 1 << (2 + 4 * chnum); /* RX_FULL */
105 if ((ch->status & (1 << 1)) && /* TXS */
106 ((ch->config >> 12) & 3) != 1) /* TRM */
107 s->irqst |= 1 << (0 + 4 * chnum); /* TX_EMPTY */
108 omap_mcspi_interrupt_update(s);
109 omap_mcspi_dmarequest_update(ch);
112 void omap_mcspi_reset(struct omap_mcspi_s *s)
114 int ch;
116 s->sysconfig = 0;
117 s->systest = 0;
118 s->irqst = 0;
119 s->irqen = 0;
120 s->wken = 0;
121 s->control = 4;
123 for (ch = 0; ch < 4; ch ++) {
124 s->ch[ch].config = 0x060000;
125 s->ch[ch].status = 2; /* TXS */
126 s->ch[ch].control = 0;
128 omap_mcspi_dmarequest_update(s->ch + ch);
131 omap_mcspi_interrupt_update(s);
134 static uint64_t omap_mcspi_read(void *opaque, hwaddr addr,
135 unsigned size)
137 struct omap_mcspi_s *s = (struct omap_mcspi_s *) opaque;
138 int ch = 0;
139 uint32_t ret;
141 if (size != 4) {
142 return omap_badwidth_read32(opaque, addr);
145 switch (addr) {
146 case 0x00: /* MCSPI_REVISION */
147 return 0x91;
149 case 0x10: /* MCSPI_SYSCONFIG */
150 return s->sysconfig;
152 case 0x14: /* MCSPI_SYSSTATUS */
153 return 1; /* RESETDONE */
155 case 0x18: /* MCSPI_IRQSTATUS */
156 return s->irqst;
158 case 0x1c: /* MCSPI_IRQENABLE */
159 return s->irqen;
161 case 0x20: /* MCSPI_WAKEUPENABLE */
162 return s->wken;
164 case 0x24: /* MCSPI_SYST */
165 return s->systest;
167 case 0x28: /* MCSPI_MODULCTRL */
168 return s->control;
170 case 0x68: ch ++;
171 /* fall through */
172 case 0x54: ch ++;
173 /* fall through */
174 case 0x40: ch ++;
175 /* fall through */
176 case 0x2c: /* MCSPI_CHCONF */
177 return s->ch[ch].config;
179 case 0x6c: ch ++;
180 /* fall through */
181 case 0x58: ch ++;
182 /* fall through */
183 case 0x44: ch ++;
184 /* fall through */
185 case 0x30: /* MCSPI_CHSTAT */
186 return s->ch[ch].status;
188 case 0x70: ch ++;
189 /* fall through */
190 case 0x5c: ch ++;
191 /* fall through */
192 case 0x48: ch ++;
193 /* fall through */
194 case 0x34: /* MCSPI_CHCTRL */
195 return s->ch[ch].control;
197 case 0x74: ch ++;
198 /* fall through */
199 case 0x60: ch ++;
200 /* fall through */
201 case 0x4c: ch ++;
202 /* fall through */
203 case 0x38: /* MCSPI_TX */
204 return s->ch[ch].tx;
206 case 0x78: ch ++;
207 /* fall through */
208 case 0x64: ch ++;
209 /* fall through */
210 case 0x50: ch ++;
211 /* fall through */
212 case 0x3c: /* MCSPI_RX */
213 s->ch[ch].status &= ~(1 << 0); /* RXS */
214 ret = s->ch[ch].rx;
215 omap_mcspi_transfer_run(s, ch);
216 return ret;
219 OMAP_BAD_REG(addr);
220 return 0;
223 static void omap_mcspi_write(void *opaque, hwaddr addr,
224 uint64_t value, unsigned size)
226 struct omap_mcspi_s *s = (struct omap_mcspi_s *) opaque;
227 int ch = 0;
229 if (size != 4) {
230 omap_badwidth_write32(opaque, addr, value);
231 return;
234 switch (addr) {
235 case 0x00: /* MCSPI_REVISION */
236 case 0x14: /* MCSPI_SYSSTATUS */
237 case 0x30: /* MCSPI_CHSTAT0 */
238 case 0x3c: /* MCSPI_RX0 */
239 case 0x44: /* MCSPI_CHSTAT1 */
240 case 0x50: /* MCSPI_RX1 */
241 case 0x58: /* MCSPI_CHSTAT2 */
242 case 0x64: /* MCSPI_RX2 */
243 case 0x6c: /* MCSPI_CHSTAT3 */
244 case 0x78: /* MCSPI_RX3 */
245 OMAP_RO_REG(addr);
246 return;
248 case 0x10: /* MCSPI_SYSCONFIG */
249 if (value & (1 << 1)) /* SOFTRESET */
250 omap_mcspi_reset(s);
251 s->sysconfig = value & 0x31d;
252 break;
254 case 0x18: /* MCSPI_IRQSTATUS */
255 if (!((s->control & (1 << 3)) && (s->systest & (1 << 11)))) {
256 s->irqst &= ~value;
257 omap_mcspi_interrupt_update(s);
259 break;
261 case 0x1c: /* MCSPI_IRQENABLE */
262 s->irqen = value & 0x1777f;
263 omap_mcspi_interrupt_update(s);
264 break;
266 case 0x20: /* MCSPI_WAKEUPENABLE */
267 s->wken = value & 1;
268 break;
270 case 0x24: /* MCSPI_SYST */
271 if (s->control & (1 << 3)) /* SYSTEM_TEST */
272 if (value & (1 << 11)) { /* SSB */
273 s->irqst |= 0x1777f;
274 omap_mcspi_interrupt_update(s);
276 s->systest = value & 0xfff;
277 break;
279 case 0x28: /* MCSPI_MODULCTRL */
280 if (value & (1 << 3)) /* SYSTEM_TEST */
281 if (s->systest & (1 << 11)) { /* SSB */
282 s->irqst |= 0x1777f;
283 omap_mcspi_interrupt_update(s);
285 s->control = value & 0xf;
286 break;
288 case 0x68: ch ++;
289 /* fall through */
290 case 0x54: ch ++;
291 /* fall through */
292 case 0x40: ch ++;
293 /* fall through */
294 case 0x2c: /* MCSPI_CHCONF */
295 if ((value ^ s->ch[ch].config) & (3 << 14)) /* DMAR | DMAW */
296 omap_mcspi_dmarequest_update(s->ch + ch);
297 if (((value >> 12) & 3) == 3) /* TRM */
298 fprintf(stderr, "%s: invalid TRM value (3)\n", __FUNCTION__);
299 if (((value >> 7) & 0x1f) < 3) /* WL */
300 fprintf(stderr, "%s: invalid WL value (%" PRIx64 ")\n",
301 __FUNCTION__, (value >> 7) & 0x1f);
302 s->ch[ch].config = value & 0x7fffff;
303 break;
305 case 0x70: ch ++;
306 /* fall through */
307 case 0x5c: ch ++;
308 /* fall through */
309 case 0x48: ch ++;
310 /* fall through */
311 case 0x34: /* MCSPI_CHCTRL */
312 if (value & ~s->ch[ch].control & 1) { /* EN */
313 s->ch[ch].control |= 1;
314 omap_mcspi_transfer_run(s, ch);
315 } else
316 s->ch[ch].control = value & 1;
317 break;
319 case 0x74: ch ++;
320 /* fall through */
321 case 0x60: ch ++;
322 /* fall through */
323 case 0x4c: ch ++;
324 /* fall through */
325 case 0x38: /* MCSPI_TX */
326 s->ch[ch].tx = value;
327 s->ch[ch].status &= ~(1 << 1); /* TXS */
328 omap_mcspi_transfer_run(s, ch);
329 break;
331 default:
332 OMAP_BAD_REG(addr);
333 return;
337 static const MemoryRegionOps omap_mcspi_ops = {
338 .read = omap_mcspi_read,
339 .write = omap_mcspi_write,
340 .endianness = DEVICE_NATIVE_ENDIAN,
343 struct omap_mcspi_s *omap_mcspi_init(struct omap_target_agent_s *ta, int chnum,
344 qemu_irq irq, qemu_irq *drq, omap_clk fclk, omap_clk iclk)
346 struct omap_mcspi_s *s = g_new0(struct omap_mcspi_s, 1);
347 struct omap_mcspi_ch_s *ch = s->ch;
349 s->irq = irq;
350 s->chnum = chnum;
351 while (chnum --) {
352 ch->txdrq = *drq ++;
353 ch->rxdrq = *drq ++;
354 ch ++;
356 omap_mcspi_reset(s);
358 memory_region_init_io(&s->iomem, NULL, &omap_mcspi_ops, s, "omap.mcspi",
359 omap_l4_region_size(ta, 0));
360 omap_l4_attach(ta, 0, &s->iomem);
362 return s;
365 void omap_mcspi_attach(struct omap_mcspi_s *s,
366 uint32_t (*txrx)(void *opaque, uint32_t, int), void *opaque,
367 int chipselect)
369 if (chipselect < 0 || chipselect >= s->chnum)
370 hw_error("%s: Bad chipselect %i\n", __FUNCTION__, chipselect);
372 s->ch[chipselect].txrx = txrx;
373 s->ch[chipselect].opaque = opaque;