xref: /openbmc/qemu/hw/i2c/aspeed_i2c.c (revision 25268a18)
1 /*
2  * ARM Aspeed I2C controller
3  *
4  * Copyright (C) 2016 IBM Corp.
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, see <http://www.gnu.org/licenses/>.
18  *
19  */
20 
21 #include "qemu/osdep.h"
22 #include "hw/sysbus.h"
23 #include "migration/vmstate.h"
24 #include "qemu/cutils.h"
25 #include "qemu/log.h"
26 #include "qemu/module.h"
27 #include "qemu/error-report.h"
28 #include "qapi/error.h"
29 #include "hw/i2c/aspeed_i2c.h"
30 #include "hw/irq.h"
31 #include "hw/qdev-properties.h"
32 #include "hw/registerfields.h"
33 #include "trace.h"
34 
35 /* Enable SLAVE_ADDR_RX_MATCH always */
36 #define R_I2CD_INTR_STS_ALWAYS_ENABLE  R_I2CD_INTR_STS_SLAVE_ADDR_RX_MATCH_MASK
37 
38 static inline void aspeed_i2c_bus_raise_interrupt(AspeedI2CBus *bus)
39 {
40     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
41     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
42     uint32_t intr_ctrl_reg = aspeed_i2c_bus_intr_ctrl_offset(bus);
43     uint32_t intr_ctrl_mask = bus->regs[intr_ctrl_reg] |
44         R_I2CD_INTR_STS_ALWAYS_ENABLE;
45     bool raise_irq;
46 
47     if (trace_event_get_state_backends(TRACE_ASPEED_I2C_BUS_RAISE_INTERRUPT)) {
48         g_autofree char *buf = g_strdup_printf("%s%s%s%s%s%s%s",
49                aspeed_i2c_bus_pkt_mode_en(bus) &&
50                ARRAY_FIELD_EX32(bus->regs, I2CM_INTR_STS, PKT_CMD_DONE) ?
51                                                "pktdone|" : "",
52                SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, TX_NAK) ?
53                                                "nak|" : "",
54                SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, TX_ACK) ?
55                                                "ack|" : "",
56                SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, RX_DONE) ?
57                                                "done|" : "",
58                ARRAY_FIELD_EX32(bus->regs, I2CD_INTR_STS, SLAVE_ADDR_RX_MATCH) ?
59                                                "slave-match|" : "",
60                SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, NORMAL_STOP) ?
61                                                "stop|" : "",
62                SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, ABNORMAL) ?
63                                                "abnormal"  : "");
64 
65            trace_aspeed_i2c_bus_raise_interrupt(bus->regs[reg_intr_sts], buf);
66     }
67 
68     raise_irq = bus->regs[reg_intr_sts] & intr_ctrl_mask ;
69 
70     /* In packet mode we don't mask off INTR_STS */
71     if (!aspeed_i2c_bus_pkt_mode_en(bus)) {
72         bus->regs[reg_intr_sts] &= intr_ctrl_mask;
73     }
74 
75     if (raise_irq) {
76         bus->controller->intr_status |= 1 << bus->id;
77         qemu_irq_raise(aic->bus_get_irq(bus));
78     }
79 }
80 
81 static inline void aspeed_i2c_bus_raise_slave_interrupt(AspeedI2CBus *bus)
82 {
83     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
84 
85     if (!bus->regs[R_I2CS_INTR_STS]) {
86         return;
87     }
88 
89     bus->controller->intr_status |= 1 << bus->id;
90     qemu_irq_raise(aic->bus_get_irq(bus));
91 }
92 
93 static uint64_t aspeed_i2c_bus_old_read(AspeedI2CBus *bus, hwaddr offset,
94                                         unsigned size)
95 {
96     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
97     uint64_t value = bus->regs[offset / sizeof(*bus->regs)];
98 
99     switch (offset) {
100     case A_I2CD_FUN_CTRL:
101     case A_I2CD_AC_TIMING1:
102     case A_I2CD_AC_TIMING2:
103     case A_I2CD_INTR_CTRL:
104     case A_I2CD_INTR_STS:
105     case A_I2CD_DEV_ADDR:
106     case A_I2CD_POOL_CTRL:
107     case A_I2CD_BYTE_BUF:
108         /* Value is already set, don't do anything. */
109         break;
110     case A_I2CD_CMD:
111         value = SHARED_FIELD_DP32(value, BUS_BUSY_STS, i2c_bus_busy(bus->bus));
112         break;
113     case A_I2CD_DMA_ADDR:
114         if (!aic->has_dma) {
115             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
116             value = -1;
117         }
118         break;
119     case A_I2CD_DMA_LEN:
120         if (!aic->has_dma) {
121             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
122             value = -1;
123         }
124         break;
125 
126     default:
127         qemu_log_mask(LOG_GUEST_ERROR,
128                       "%s: Bad offset 0x%" HWADDR_PRIx "\n", __func__, offset);
129         value = -1;
130         break;
131     }
132 
133     trace_aspeed_i2c_bus_read(bus->id, offset, size, value);
134     return value;
135 }
136 
137 static uint64_t aspeed_i2c_bus_new_read(AspeedI2CBus *bus, hwaddr offset,
138                                         unsigned size)
139 {
140     uint64_t value = bus->regs[offset / sizeof(*bus->regs)];
141 
142     switch (offset) {
143     case A_I2CC_FUN_CTRL:
144     case A_I2CC_AC_TIMING:
145     case A_I2CC_POOL_CTRL:
146     case A_I2CM_INTR_CTRL:
147     case A_I2CM_INTR_STS:
148     case A_I2CC_MS_TXRX_BYTE_BUF:
149     case A_I2CM_DMA_LEN:
150     case A_I2CM_DMA_TX_ADDR:
151     case A_I2CM_DMA_RX_ADDR:
152     case A_I2CM_DMA_LEN_STS:
153     case A_I2CC_DMA_ADDR:
154     case A_I2CC_DMA_LEN:
155 
156     case A_I2CS_DEV_ADDR:
157     case A_I2CS_DMA_RX_ADDR:
158     case A_I2CS_DMA_LEN:
159     case A_I2CS_CMD:
160     case A_I2CS_INTR_CTRL:
161     case A_I2CS_DMA_LEN_STS:
162         /* Value is already set, don't do anything. */
163         break;
164     case A_I2CS_INTR_STS:
165         break;
166     case A_I2CM_CMD:
167         value = SHARED_FIELD_DP32(value, BUS_BUSY_STS, i2c_bus_busy(bus->bus));
168         break;
169     default:
170         qemu_log_mask(LOG_GUEST_ERROR,
171                       "%s: Bad offset 0x%" HWADDR_PRIx "\n", __func__, offset);
172         value = -1;
173         break;
174     }
175 
176     trace_aspeed_i2c_bus_read(bus->id, offset, size, value);
177     return value;
178 }
179 
180 static uint64_t aspeed_i2c_bus_read(void *opaque, hwaddr offset,
181                                     unsigned size)
182 {
183     AspeedI2CBus *bus = opaque;
184     if (aspeed_i2c_is_new_mode(bus->controller)) {
185         return aspeed_i2c_bus_new_read(bus, offset, size);
186     }
187     return aspeed_i2c_bus_old_read(bus, offset, size);
188 }
189 
190 static void aspeed_i2c_set_state(AspeedI2CBus *bus, uint8_t state)
191 {
192     if (aspeed_i2c_is_new_mode(bus->controller)) {
193         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CC_MS_TXRX_BYTE_BUF, TX_STATE,
194                                 state);
195     } else {
196         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CD_CMD, TX_STATE, state);
197     }
198 }
199 
200 static uint8_t aspeed_i2c_get_state(AspeedI2CBus *bus)
201 {
202     if (aspeed_i2c_is_new_mode(bus->controller)) {
203         return SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CC_MS_TXRX_BYTE_BUF,
204                                        TX_STATE);
205     }
206     return SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CD_CMD, TX_STATE);
207 }
208 
209 static int aspeed_i2c_dma_read(AspeedI2CBus *bus, uint8_t *data)
210 {
211     MemTxResult result;
212     AspeedI2CState *s = bus->controller;
213     uint32_t reg_dma_addr = aspeed_i2c_bus_dma_addr_offset(bus);
214     uint32_t reg_dma_len = aspeed_i2c_bus_dma_len_offset(bus);
215 
216     result = address_space_read(&s->dram_as, bus->regs[reg_dma_addr],
217                                 MEMTXATTRS_UNSPECIFIED, data, 1);
218     if (result != MEMTX_OK) {
219         qemu_log_mask(LOG_GUEST_ERROR, "%s: DRAM read failed @%08x\n",
220                       __func__, bus->regs[reg_dma_addr]);
221         return -1;
222     }
223 
224     bus->regs[reg_dma_addr]++;
225     bus->regs[reg_dma_len]--;
226     return 0;
227 }
228 
229 static int aspeed_i2c_bus_send(AspeedI2CBus *bus)
230 {
231     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
232     int ret = -1;
233     int i;
234     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
235     uint32_t reg_pool_ctrl = aspeed_i2c_bus_pool_ctrl_offset(bus);
236     uint32_t reg_byte_buf = aspeed_i2c_bus_byte_buf_offset(bus);
237     uint32_t reg_dma_len = aspeed_i2c_bus_dma_len_offset(bus);
238     int pool_tx_count = SHARED_ARRAY_FIELD_EX32(bus->regs, reg_pool_ctrl,
239                                                 TX_COUNT) + 1;
240 
241     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_BUFF_EN)) {
242         for (i = 0; i < pool_tx_count; i++) {
243             uint8_t *pool_base = aic->bus_pool_base(bus);
244 
245             trace_aspeed_i2c_bus_send("BUF", i + 1, pool_tx_count,
246                                       pool_base[i]);
247             ret = i2c_send(bus->bus, pool_base[i]);
248             if (ret) {
249                 break;
250             }
251         }
252         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, TX_BUFF_EN, 0);
253     } else if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_DMA_EN)) {
254         /* In new mode, clear how many bytes we TXed */
255         if (aspeed_i2c_is_new_mode(bus->controller)) {
256             ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN_STS, TX_LEN, 0);
257         }
258         while (bus->regs[reg_dma_len]) {
259             uint8_t data;
260             aspeed_i2c_dma_read(bus, &data);
261             trace_aspeed_i2c_bus_send("DMA", bus->regs[reg_dma_len],
262                                       bus->regs[reg_dma_len], data);
263             ret = i2c_send(bus->bus, data);
264             if (ret) {
265                 break;
266             }
267             /* In new mode, keep track of how many bytes we TXed */
268             if (aspeed_i2c_is_new_mode(bus->controller)) {
269                 ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN_STS, TX_LEN,
270                                  ARRAY_FIELD_EX32(bus->regs, I2CM_DMA_LEN_STS,
271                                                   TX_LEN) + 1);
272             }
273         }
274         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, TX_DMA_EN, 0);
275     } else {
276         trace_aspeed_i2c_bus_send("BYTE", 0, 1,
277                                   bus->regs[reg_byte_buf]);
278         ret = i2c_send(bus->bus, bus->regs[reg_byte_buf]);
279     }
280 
281     return ret;
282 }
283 
284 static void aspeed_i2c_bus_recv(AspeedI2CBus *bus)
285 {
286     AspeedI2CState *s = bus->controller;
287     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(s);
288     uint8_t data;
289     int i;
290     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
291     uint32_t reg_pool_ctrl = aspeed_i2c_bus_pool_ctrl_offset(bus);
292     uint32_t reg_byte_buf = aspeed_i2c_bus_byte_buf_offset(bus);
293     uint32_t reg_dma_len = aspeed_i2c_bus_dma_len_offset(bus);
294     uint32_t reg_dma_addr = aspeed_i2c_bus_dma_addr_offset(bus);
295     int pool_rx_count = SHARED_ARRAY_FIELD_EX32(bus->regs, reg_pool_ctrl,
296                                                 RX_SIZE) + 1;
297 
298     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_BUFF_EN)) {
299         uint8_t *pool_base = aic->bus_pool_base(bus);
300         if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_pool_ctrl,
301                                     BUF_ORGANIZATION)) {
302             pool_base += 16;
303         }
304 
305         for (i = 0; i < pool_rx_count; i++) {
306             pool_base[i] = i2c_recv(bus->bus);
307             trace_aspeed_i2c_bus_recv("BUF", i + 1, pool_rx_count,
308                                       pool_base[i]);
309         }
310 
311         /* Update RX count */
312         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_pool_ctrl, RX_COUNT, i & 0xff);
313         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, RX_BUFF_EN, 0);
314     } else if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_DMA_EN)) {
315         /* In new mode, clear how many bytes we RXed */
316         if (aspeed_i2c_is_new_mode(bus->controller)) {
317             ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN_STS, RX_LEN, 0);
318         }
319 
320         while (bus->regs[reg_dma_len]) {
321             MemTxResult result;
322 
323             data = i2c_recv(bus->bus);
324             trace_aspeed_i2c_bus_recv("DMA", bus->regs[reg_dma_len],
325                                       bus->regs[reg_dma_len], data);
326             result = address_space_write(&s->dram_as, bus->regs[reg_dma_addr],
327                                          MEMTXATTRS_UNSPECIFIED, &data, 1);
328             if (result != MEMTX_OK) {
329                 qemu_log_mask(LOG_GUEST_ERROR, "%s: DRAM write failed @%08x\n",
330                               __func__, bus->regs[reg_dma_addr]);
331                 return;
332             }
333             bus->regs[reg_dma_addr]++;
334             bus->regs[reg_dma_len]--;
335             /* In new mode, keep track of how many bytes we RXed */
336             if (aspeed_i2c_is_new_mode(bus->controller)) {
337                 ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN_STS, RX_LEN,
338                                  ARRAY_FIELD_EX32(bus->regs, I2CM_DMA_LEN_STS,
339                                                   RX_LEN) + 1);
340             }
341         }
342         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, RX_DMA_EN, 0);
343     } else {
344         data = i2c_recv(bus->bus);
345         trace_aspeed_i2c_bus_recv("BYTE", 1, 1, bus->regs[reg_byte_buf]);
346         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_byte_buf, RX_BUF, data);
347     }
348 }
349 
350 static void aspeed_i2c_handle_rx_cmd(AspeedI2CBus *bus)
351 {
352     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
353     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
354 
355     aspeed_i2c_set_state(bus, I2CD_MRXD);
356     aspeed_i2c_bus_recv(bus);
357     SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, RX_DONE, 1);
358     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_S_RX_CMD_LAST)) {
359         i2c_nack(bus->bus);
360     }
361     SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_RX_CMD, 0);
362     SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_S_RX_CMD_LAST, 0);
363     aspeed_i2c_set_state(bus, I2CD_MACTIVE);
364 }
365 
366 static uint8_t aspeed_i2c_get_addr(AspeedI2CBus *bus)
367 {
368     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
369     uint32_t reg_byte_buf = aspeed_i2c_bus_byte_buf_offset(bus);
370     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
371 
372     if (aspeed_i2c_bus_pkt_mode_en(bus)) {
373         return (ARRAY_FIELD_EX32(bus->regs, I2CM_CMD, PKT_DEV_ADDR) << 1) |
374                 SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_RX_CMD);
375     }
376     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_BUFF_EN)) {
377         uint8_t *pool_base = aic->bus_pool_base(bus);
378 
379         return pool_base[0];
380     } else if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_DMA_EN)) {
381         uint8_t data;
382 
383         aspeed_i2c_dma_read(bus, &data);
384         return data;
385     } else {
386         return bus->regs[reg_byte_buf];
387     }
388 }
389 
390 static bool aspeed_i2c_check_sram(AspeedI2CBus *bus)
391 {
392     AspeedI2CState *s = bus->controller;
393     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(s);
394     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
395     bool dma_en = SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_DMA_EN)  ||
396                   SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_DMA_EN)  ||
397                   SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_BUFF_EN) ||
398                   SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_BUFF_EN);
399     if (!aic->check_sram) {
400         return true;
401     }
402 
403     /*
404      * AST2500: SRAM must be enabled before using the Buffer Pool or
405      * DMA mode.
406      */
407     if (!FIELD_EX32(s->ctrl_global, I2C_CTRL_GLOBAL, SRAM_EN) && dma_en) {
408         qemu_log_mask(LOG_GUEST_ERROR, "%s: SRAM is not enabled\n", __func__);
409         return false;
410     }
411 
412     return true;
413 }
414 
415 static void aspeed_i2c_bus_cmd_dump(AspeedI2CBus *bus)
416 {
417     g_autofree char *cmd_flags = NULL;
418     uint32_t count;
419     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
420     uint32_t reg_pool_ctrl = aspeed_i2c_bus_pool_ctrl_offset(bus);
421     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
422     uint32_t reg_dma_len = aspeed_i2c_bus_dma_len_offset(bus);
423     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_BUFF_EN)) {
424         count = SHARED_ARRAY_FIELD_EX32(bus->regs, reg_pool_ctrl, TX_COUNT) + 1;
425     } else if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_DMA_EN)) {
426         count = bus->regs[reg_dma_len];
427     } else { /* BYTE mode */
428         count = 1;
429     }
430 
431     cmd_flags = g_strdup_printf("%s%s%s%s%s%s%s%s%s",
432     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_START_CMD) ? "start|" : "",
433     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_DMA_EN) ? "rxdma|" : "",
434     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_DMA_EN) ? "txdma|" : "",
435     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, RX_BUFF_EN) ? "rxbuf|" : "",
436     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_BUFF_EN) ? "txbuf|" : "",
437     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_TX_CMD) ? "tx|" : "",
438     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_RX_CMD) ? "rx|" : "",
439     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_S_RX_CMD_LAST) ? "last|" : "",
440     SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_STOP_CMD) ? "stop|" : "");
441 
442     trace_aspeed_i2c_bus_cmd(bus->regs[reg_cmd], cmd_flags, count,
443                              bus->regs[reg_intr_sts]);
444 }
445 
446 /*
447  * The state machine needs some refinement. It is only used to track
448  * invalid STOP commands for the moment.
449  */
450 static void aspeed_i2c_bus_handle_cmd(AspeedI2CBus *bus, uint64_t value)
451 {
452     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
453     uint32_t reg_cmd = aspeed_i2c_bus_cmd_offset(bus);
454     uint32_t reg_dma_len = aspeed_i2c_bus_dma_len_offset(bus);
455 
456     if (!aspeed_i2c_check_sram(bus)) {
457         return;
458     }
459 
460     if (trace_event_get_state_backends(TRACE_ASPEED_I2C_BUS_CMD)) {
461         aspeed_i2c_bus_cmd_dump(bus);
462     }
463 
464     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_START_CMD)) {
465         uint8_t state = aspeed_i2c_get_state(bus) & I2CD_MACTIVE ?
466             I2CD_MSTARTR : I2CD_MSTART;
467         uint8_t addr;
468 
469         aspeed_i2c_set_state(bus, state);
470 
471         addr = aspeed_i2c_get_addr(bus);
472         if (i2c_start_transfer(bus->bus, extract32(addr, 1, 7),
473                                extract32(addr, 0, 1))) {
474             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, TX_NAK, 1);
475             if (aspeed_i2c_bus_pkt_mode_en(bus)) {
476                 ARRAY_FIELD_DP32(bus->regs, I2CM_INTR_STS, PKT_CMD_FAIL, 1);
477             }
478         } else {
479             /* START doesn't set TX_ACK in packet mode */
480             if (!aspeed_i2c_bus_pkt_mode_en(bus)) {
481                 SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, TX_ACK, 1);
482             }
483         }
484 
485         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_START_CMD, 0);
486 
487         if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_DMA_EN)) {
488             if (bus->regs[reg_dma_len] == 0) {
489                 SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_TX_CMD, 0);
490             }
491         } else if (!SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, TX_BUFF_EN)) {
492             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_TX_CMD, 0);
493         }
494 
495         /* No slave found */
496         if (!i2c_bus_busy(bus->bus)) {
497             if (aspeed_i2c_bus_pkt_mode_en(bus)) {
498                 ARRAY_FIELD_DP32(bus->regs, I2CM_INTR_STS, PKT_CMD_FAIL, 1);
499                 ARRAY_FIELD_DP32(bus->regs, I2CM_INTR_STS, PKT_CMD_DONE, 1);
500             }
501             return;
502         }
503         aspeed_i2c_set_state(bus, I2CD_MACTIVE);
504     }
505 
506     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_TX_CMD)) {
507         aspeed_i2c_set_state(bus, I2CD_MTXD);
508         if (aspeed_i2c_bus_send(bus)) {
509             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, TX_NAK, 1);
510             i2c_end_transfer(bus->bus);
511         } else {
512             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, TX_ACK, 1);
513         }
514         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_TX_CMD, 0);
515         aspeed_i2c_set_state(bus, I2CD_MACTIVE);
516     }
517 
518     if ((SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_RX_CMD) ||
519          SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_S_RX_CMD_LAST)) &&
520         !SHARED_ARRAY_FIELD_EX32(bus->regs, reg_intr_sts, RX_DONE)) {
521         aspeed_i2c_handle_rx_cmd(bus);
522     }
523 
524     if (SHARED_ARRAY_FIELD_EX32(bus->regs, reg_cmd, M_STOP_CMD)) {
525         if (!(aspeed_i2c_get_state(bus) & I2CD_MACTIVE)) {
526             qemu_log_mask(LOG_GUEST_ERROR, "%s: abnormal stop\n", __func__);
527             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, ABNORMAL, 1);
528             if (aspeed_i2c_bus_pkt_mode_en(bus)) {
529                 ARRAY_FIELD_DP32(bus->regs, I2CM_INTR_STS, PKT_CMD_FAIL, 1);
530             }
531         } else {
532             aspeed_i2c_set_state(bus, I2CD_MSTOP);
533             i2c_end_transfer(bus->bus);
534             SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, NORMAL_STOP, 1);
535         }
536         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_cmd, M_STOP_CMD, 0);
537         aspeed_i2c_set_state(bus, I2CD_IDLE);
538 
539         i2c_schedule_pending_master(bus->bus);
540     }
541 
542     if (aspeed_i2c_bus_pkt_mode_en(bus)) {
543         ARRAY_FIELD_DP32(bus->regs, I2CM_INTR_STS, PKT_CMD_DONE, 1);
544     }
545 }
546 
547 static void aspeed_i2c_bus_new_write(AspeedI2CBus *bus, hwaddr offset,
548                                      uint64_t value, unsigned size)
549 {
550     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
551     bool handle_rx;
552     bool w1t;
553 
554     trace_aspeed_i2c_bus_write(bus->id, offset, size, value);
555 
556     switch (offset) {
557     case A_I2CC_FUN_CTRL:
558         bus->regs[R_I2CC_FUN_CTRL] = value;
559         break;
560     case A_I2CC_AC_TIMING:
561         bus->regs[R_I2CC_AC_TIMING] = value & 0x1ffff0ff;
562         break;
563     case A_I2CC_MS_TXRX_BYTE_BUF:
564         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CC_MS_TXRX_BYTE_BUF, TX_BUF,
565                                 value);
566         break;
567     case A_I2CC_POOL_CTRL:
568         bus->regs[R_I2CC_POOL_CTRL] &= ~0xffffff;
569         bus->regs[R_I2CC_POOL_CTRL] |= (value & 0xffffff);
570         break;
571     case A_I2CM_INTR_CTRL:
572         bus->regs[R_I2CM_INTR_CTRL] = value & 0x0007f07f;
573         break;
574     case A_I2CM_INTR_STS:
575         handle_rx = SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CM_INTR_STS, RX_DONE)
576                     && SHARED_FIELD_EX32(value, RX_DONE);
577 
578         /* In packet mode, clearing PKT_CMD_DONE clears other interrupts. */
579         if (aspeed_i2c_bus_pkt_mode_en(bus) &&
580            FIELD_EX32(value, I2CM_INTR_STS, PKT_CMD_DONE)) {
581             bus->regs[R_I2CM_INTR_STS] &= 0xf0001000;
582             if (!bus->regs[R_I2CM_INTR_STS]) {
583                 bus->controller->intr_status &= ~(1 << bus->id);
584                 qemu_irq_lower(aic->bus_get_irq(bus));
585             }
586             aspeed_i2c_bus_raise_slave_interrupt(bus);
587             break;
588         }
589         bus->regs[R_I2CM_INTR_STS] &= ~(value & 0xf007f07f);
590         if (!bus->regs[R_I2CM_INTR_STS]) {
591             bus->controller->intr_status &= ~(1 << bus->id);
592             qemu_irq_lower(aic->bus_get_irq(bus));
593         }
594         if (handle_rx && (SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CM_CMD,
595                                                   M_RX_CMD) ||
596                           SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CM_CMD,
597                                                   M_S_RX_CMD_LAST))) {
598             aspeed_i2c_handle_rx_cmd(bus);
599             aspeed_i2c_bus_raise_interrupt(bus);
600         }
601         break;
602     case A_I2CM_CMD:
603         if (!aspeed_i2c_bus_is_enabled(bus)) {
604             break;
605         }
606 
607         if (!aspeed_i2c_bus_is_master(bus)) {
608             qemu_log_mask(LOG_GUEST_ERROR, "%s: Master mode is not enabled\n",
609                           __func__);
610             break;
611         }
612 
613         if (!aic->has_dma &&
614             (SHARED_FIELD_EX32(value, RX_DMA_EN) ||
615              SHARED_FIELD_EX32(value, TX_DMA_EN))) {
616             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
617             break;
618         }
619 
620         if (bus->regs[R_I2CM_INTR_STS] & 0xffff0000) {
621             qemu_log_mask(LOG_UNIMP, "%s: Packet mode is not implemented\n",
622                           __func__);
623             break;
624         }
625 
626         value &= 0xff0ffbfb;
627         if (ARRAY_FIELD_EX32(bus->regs, I2CM_CMD, W1_CTRL)) {
628             bus->regs[R_I2CM_CMD] |= value;
629         } else {
630             bus->regs[R_I2CM_CMD] = value;
631         }
632 
633         aspeed_i2c_bus_handle_cmd(bus, value);
634         aspeed_i2c_bus_raise_interrupt(bus);
635         break;
636     case A_I2CM_DMA_TX_ADDR:
637         bus->regs[R_I2CM_DMA_TX_ADDR] = FIELD_EX32(value, I2CM_DMA_TX_ADDR,
638                                                    ADDR);
639         bus->regs[R_I2CC_DMA_ADDR] = FIELD_EX32(value, I2CM_DMA_TX_ADDR, ADDR);
640         bus->regs[R_I2CC_DMA_LEN] = ARRAY_FIELD_EX32(bus->regs, I2CM_DMA_LEN,
641                                                      TX_BUF_LEN) + 1;
642         break;
643     case A_I2CM_DMA_RX_ADDR:
644         bus->regs[R_I2CM_DMA_RX_ADDR] = FIELD_EX32(value, I2CM_DMA_RX_ADDR,
645                                                    ADDR);
646         bus->regs[R_I2CC_DMA_ADDR] = FIELD_EX32(value, I2CM_DMA_RX_ADDR, ADDR);
647         bus->regs[R_I2CC_DMA_LEN] = ARRAY_FIELD_EX32(bus->regs, I2CM_DMA_LEN,
648                                                      RX_BUF_LEN) + 1;
649         break;
650     case A_I2CM_DMA_LEN:
651         w1t = FIELD_EX32(value, I2CM_DMA_LEN, RX_BUF_LEN_W1T) ||
652               FIELD_EX32(value, I2CM_DMA_LEN, TX_BUF_LEN_W1T);
653         /* If none of the w1t bits are set, just write to the reg as normal. */
654         if (!w1t) {
655             bus->regs[R_I2CM_DMA_LEN] = value;
656             break;
657         }
658         if (FIELD_EX32(value, I2CM_DMA_LEN, RX_BUF_LEN_W1T)) {
659             ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN, RX_BUF_LEN,
660                              FIELD_EX32(value, I2CM_DMA_LEN, RX_BUF_LEN));
661         }
662         if (FIELD_EX32(value, I2CM_DMA_LEN, TX_BUF_LEN_W1T)) {
663             ARRAY_FIELD_DP32(bus->regs, I2CM_DMA_LEN, TX_BUF_LEN,
664                              FIELD_EX32(value, I2CM_DMA_LEN, TX_BUF_LEN));
665         }
666         break;
667     case A_I2CM_DMA_LEN_STS:
668         /* Writes clear to 0 */
669         bus->regs[R_I2CM_DMA_LEN_STS] = 0;
670         break;
671     case A_I2CC_DMA_ADDR:
672     case A_I2CC_DMA_LEN:
673         /* RO */
674         break;
675     case A_I2CS_DEV_ADDR:
676         bus->regs[R_I2CS_DEV_ADDR] = value;
677         break;
678     case A_I2CS_DMA_RX_ADDR:
679         bus->regs[R_I2CS_DMA_RX_ADDR] = value;
680         break;
681     case A_I2CS_DMA_LEN:
682         assert(FIELD_EX32(value, I2CS_DMA_LEN, TX_BUF_LEN) == 0);
683         if (FIELD_EX32(value, I2CS_DMA_LEN, RX_BUF_LEN_W1T)) {
684             ARRAY_FIELD_DP32(bus->regs, I2CS_DMA_LEN, RX_BUF_LEN,
685                              FIELD_EX32(value, I2CS_DMA_LEN, RX_BUF_LEN));
686         } else {
687             bus->regs[R_I2CS_DMA_LEN] = value;
688         }
689         break;
690     case A_I2CS_CMD:
691         if (FIELD_EX32(value, I2CS_CMD, W1_CTRL)) {
692             bus->regs[R_I2CS_CMD] |= value;
693         } else {
694             bus->regs[R_I2CS_CMD] = value;
695         }
696         i2c_slave_set_address(bus->slave, bus->regs[R_I2CS_DEV_ADDR]);
697         break;
698     case A_I2CS_INTR_CTRL:
699         bus->regs[R_I2CS_INTR_CTRL] = value;
700         break;
701 
702     case A_I2CS_INTR_STS:
703         if (ARRAY_FIELD_EX32(bus->regs, I2CS_INTR_CTRL, PKT_CMD_DONE)) {
704             if (ARRAY_FIELD_EX32(bus->regs, I2CS_INTR_STS, PKT_CMD_DONE) &&
705                 FIELD_EX32(value, I2CS_INTR_STS, PKT_CMD_DONE)) {
706                 bus->regs[R_I2CS_INTR_STS] &= 0xfffc0000;
707             }
708         } else {
709             bus->regs[R_I2CS_INTR_STS] &= ~value;
710         }
711         if (!bus->regs[R_I2CS_INTR_STS]) {
712             bus->controller->intr_status &= ~(1 << bus->id);
713             qemu_irq_lower(aic->bus_get_irq(bus));
714         }
715         aspeed_i2c_bus_raise_interrupt(bus);
716         break;
717     case A_I2CS_DMA_LEN_STS:
718         bus->regs[R_I2CS_DMA_LEN_STS] = 0;
719         break;
720     case A_I2CS_DMA_TX_ADDR:
721         qemu_log_mask(LOG_UNIMP, "%s: Slave mode DMA TX is not implemented\n",
722                       __func__);
723         break;
724     default:
725         qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n",
726                       __func__, offset);
727     }
728 }
729 
730 static void aspeed_i2c_bus_old_write(AspeedI2CBus *bus, hwaddr offset,
731                                      uint64_t value, unsigned size)
732 {
733     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(bus->controller);
734     bool handle_rx;
735 
736     trace_aspeed_i2c_bus_write(bus->id, offset, size, value);
737 
738     switch (offset) {
739     case A_I2CD_FUN_CTRL:
740         if (SHARED_FIELD_EX32(value, SLAVE_EN)) {
741             i2c_slave_set_address(bus->slave, bus->regs[R_I2CD_DEV_ADDR]);
742         }
743         bus->regs[R_I2CD_FUN_CTRL] = value & 0x0071C3FF;
744         break;
745     case A_I2CD_AC_TIMING1:
746         bus->regs[R_I2CD_AC_TIMING1] = value & 0xFFFFF0F;
747         break;
748     case A_I2CD_AC_TIMING2:
749         bus->regs[R_I2CD_AC_TIMING2] = value & 0x7;
750         break;
751     case A_I2CD_INTR_CTRL:
752         bus->regs[R_I2CD_INTR_CTRL] = value & 0x7FFF;
753         break;
754     case A_I2CD_INTR_STS:
755         handle_rx = SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CD_INTR_STS, RX_DONE)
756                     && SHARED_FIELD_EX32(value, RX_DONE);
757         bus->regs[R_I2CD_INTR_STS] &= ~(value & 0x7FFF);
758         if (!bus->regs[R_I2CD_INTR_STS]) {
759             bus->controller->intr_status &= ~(1 << bus->id);
760             qemu_irq_lower(aic->bus_get_irq(bus));
761         }
762         if (handle_rx) {
763             if (SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CD_CMD, M_RX_CMD) ||
764                 SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CD_CMD,
765                                         M_S_RX_CMD_LAST)) {
766                 aspeed_i2c_handle_rx_cmd(bus);
767                 aspeed_i2c_bus_raise_interrupt(bus);
768             } else if (aspeed_i2c_get_state(bus) == I2CD_STXD) {
769                 i2c_ack(bus->bus);
770             }
771         }
772         break;
773     case A_I2CD_DEV_ADDR:
774         bus->regs[R_I2CD_DEV_ADDR] = value;
775         break;
776     case A_I2CD_POOL_CTRL:
777         bus->regs[R_I2CD_POOL_CTRL] &= ~0xffffff;
778         bus->regs[R_I2CD_POOL_CTRL] |= (value & 0xffffff);
779         break;
780 
781     case A_I2CD_BYTE_BUF:
782         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CD_BYTE_BUF, TX_BUF, value);
783         break;
784     case A_I2CD_CMD:
785         if (!aspeed_i2c_bus_is_enabled(bus)) {
786             break;
787         }
788 
789         if (!aspeed_i2c_bus_is_master(bus)) {
790             qemu_log_mask(LOG_GUEST_ERROR, "%s: Master mode is not enabled\n",
791                           __func__);
792             break;
793         }
794 
795         if (!aic->has_dma &&
796             (SHARED_FIELD_EX32(value, RX_DMA_EN) ||
797              SHARED_FIELD_EX32(value, TX_DMA_EN))) {
798             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
799             break;
800         }
801 
802         bus->regs[R_I2CD_CMD] &= ~0xFFFF;
803         bus->regs[R_I2CD_CMD] |= value & 0xFFFF;
804 
805         aspeed_i2c_bus_handle_cmd(bus, value);
806         aspeed_i2c_bus_raise_interrupt(bus);
807         break;
808     case A_I2CD_DMA_ADDR:
809         if (!aic->has_dma) {
810             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
811             break;
812         }
813 
814         bus->regs[R_I2CD_DMA_ADDR] = value & 0x3ffffffc;
815         break;
816 
817     case A_I2CD_DMA_LEN:
818         if (!aic->has_dma) {
819             qemu_log_mask(LOG_GUEST_ERROR, "%s: No DMA support\n",  __func__);
820             break;
821         }
822 
823         bus->regs[R_I2CD_DMA_LEN] = value & 0xfff;
824         if (!bus->regs[R_I2CD_DMA_LEN]) {
825             qemu_log_mask(LOG_UNIMP, "%s: invalid DMA length\n",  __func__);
826         }
827         break;
828 
829     default:
830         qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n",
831                       __func__, offset);
832     }
833 }
834 
835 static void aspeed_i2c_bus_write(void *opaque, hwaddr offset,
836                                      uint64_t value, unsigned size)
837 {
838     AspeedI2CBus *bus = opaque;
839     if (aspeed_i2c_is_new_mode(bus->controller)) {
840         aspeed_i2c_bus_new_write(bus, offset, value, size);
841     } else {
842         aspeed_i2c_bus_old_write(bus, offset, value, size);
843     }
844 }
845 
846 static uint64_t aspeed_i2c_ctrl_read(void *opaque, hwaddr offset,
847                                    unsigned size)
848 {
849     AspeedI2CState *s = opaque;
850 
851     switch (offset) {
852     case A_I2C_CTRL_STATUS:
853         return s->intr_status;
854     case A_I2C_CTRL_GLOBAL:
855         return s->ctrl_global;
856     case A_I2C_CTRL_NEW_CLK_DIVIDER:
857         if (aspeed_i2c_is_new_mode(s)) {
858             return s->new_clk_divider;
859         }
860         qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n",
861                       __func__, offset);
862         break;
863     default:
864         qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n",
865                       __func__, offset);
866         break;
867     }
868 
869     return -1;
870 }
871 
872 static void aspeed_i2c_ctrl_write(void *opaque, hwaddr offset,
873                                   uint64_t value, unsigned size)
874 {
875     AspeedI2CState *s = opaque;
876 
877     switch (offset) {
878     case A_I2C_CTRL_GLOBAL:
879         s->ctrl_global = value;
880         break;
881     case A_I2C_CTRL_NEW_CLK_DIVIDER:
882         if (aspeed_i2c_is_new_mode(s)) {
883             s->new_clk_divider = value;
884         } else {
885             qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx
886                           "\n", __func__, offset);
887         }
888         break;
889     case A_I2C_CTRL_STATUS:
890     default:
891         qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n",
892                       __func__, offset);
893         break;
894     }
895 }
896 
897 static const MemoryRegionOps aspeed_i2c_bus_ops = {
898     .read = aspeed_i2c_bus_read,
899     .write = aspeed_i2c_bus_write,
900     .endianness = DEVICE_LITTLE_ENDIAN,
901 };
902 
903 static const MemoryRegionOps aspeed_i2c_ctrl_ops = {
904     .read = aspeed_i2c_ctrl_read,
905     .write = aspeed_i2c_ctrl_write,
906     .endianness = DEVICE_LITTLE_ENDIAN,
907 };
908 
909 static uint64_t aspeed_i2c_share_pool_read(void *opaque, hwaddr offset,
910                                      unsigned size)
911 {
912     AspeedI2CState *s = opaque;
913     uint64_t ret = 0;
914     int i;
915 
916     for (i = 0; i < size; i++) {
917         ret |= (uint64_t) s->share_pool[offset + i] << (8 * i);
918     }
919 
920     return ret;
921 }
922 
923 static void aspeed_i2c_share_pool_write(void *opaque, hwaddr offset,
924                                   uint64_t value, unsigned size)
925 {
926     AspeedI2CState *s = opaque;
927     int i;
928 
929     for (i = 0; i < size; i++) {
930         s->share_pool[offset + i] = (value >> (8 * i)) & 0xFF;
931     }
932 }
933 
934 static const MemoryRegionOps aspeed_i2c_share_pool_ops = {
935     .read = aspeed_i2c_share_pool_read,
936     .write = aspeed_i2c_share_pool_write,
937     .endianness = DEVICE_LITTLE_ENDIAN,
938     .valid = {
939         .min_access_size = 1,
940         .max_access_size = 4,
941     },
942 };
943 
944 static const VMStateDescription aspeed_i2c_bus_vmstate = {
945     .name = TYPE_ASPEED_I2C,
946     .version_id = 5,
947     .minimum_version_id = 5,
948     .fields = (const VMStateField[]) {
949         VMSTATE_UINT32_ARRAY(regs, AspeedI2CBus, ASPEED_I2C_NEW_NUM_REG),
950         VMSTATE_END_OF_LIST()
951     }
952 };
953 
954 static const VMStateDescription aspeed_i2c_vmstate = {
955     .name = TYPE_ASPEED_I2C,
956     .version_id = 3,
957     .minimum_version_id = 3,
958     .fields = (const VMStateField[]) {
959         VMSTATE_UINT32(intr_status, AspeedI2CState),
960         VMSTATE_STRUCT_ARRAY(busses, AspeedI2CState,
961                              ASPEED_I2C_NR_BUSSES, 1, aspeed_i2c_bus_vmstate,
962                              AspeedI2CBus),
963         VMSTATE_UINT8_ARRAY(share_pool, AspeedI2CState,
964                             ASPEED_I2C_SHARE_POOL_SIZE),
965         VMSTATE_END_OF_LIST()
966     }
967 };
968 
969 static void aspeed_i2c_reset(DeviceState *dev)
970 {
971     AspeedI2CState *s = ASPEED_I2C(dev);
972 
973     s->intr_status = 0;
974 }
975 
976 static void aspeed_i2c_instance_init(Object *obj)
977 {
978     AspeedI2CState *s = ASPEED_I2C(obj);
979     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(s);
980     int i;
981 
982     for (i = 0; i < aic->num_busses; i++) {
983         object_initialize_child(obj, "bus[*]", &s->busses[i],
984                                 TYPE_ASPEED_I2C_BUS);
985     }
986 }
987 
988 /*
989  * Address Definitions (AST2400 and AST2500)
990  *
991  *   0x000 ... 0x03F: Global Register
992  *   0x040 ... 0x07F: Device 1
993  *   0x080 ... 0x0BF: Device 2
994  *   0x0C0 ... 0x0FF: Device 3
995  *   0x100 ... 0x13F: Device 4
996  *   0x140 ... 0x17F: Device 5
997  *   0x180 ... 0x1BF: Device 6
998  *   0x1C0 ... 0x1FF: Device 7
999  *   0x200 ... 0x2FF: Buffer Pool (AST2500 unused in linux driver)
1000  *   0x300 ... 0x33F: Device 8
1001  *   0x340 ... 0x37F: Device 9
1002  *   0x380 ... 0x3BF: Device 10
1003  *   0x3C0 ... 0x3FF: Device 11
1004  *   0x400 ... 0x43F: Device 12
1005  *   0x440 ... 0x47F: Device 13
1006  *   0x480 ... 0x4BF: Device 14
1007  *   0x800 ... 0xFFF: Buffer Pool (AST2400 unused in linux driver)
1008  */
1009 static void aspeed_i2c_realize(DeviceState *dev, Error **errp)
1010 {
1011     int i;
1012     SysBusDevice *sbd = SYS_BUS_DEVICE(dev);
1013     AspeedI2CState *s = ASPEED_I2C(dev);
1014     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(s);
1015 
1016     sysbus_init_irq(sbd, &s->irq);
1017     memory_region_init_io(&s->iomem, OBJECT(s), &aspeed_i2c_ctrl_ops, s,
1018                           "aspeed.i2c", aic->mem_size);
1019     sysbus_init_mmio(sbd, &s->iomem);
1020 
1021     for (i = 0; i < aic->num_busses; i++) {
1022         Object *bus = OBJECT(&s->busses[i]);
1023         int offset = i < aic->gap ? 1 : 5;
1024 
1025         if (!object_property_set_link(bus, "controller", OBJECT(s), errp)) {
1026             return;
1027         }
1028 
1029         if (!object_property_set_uint(bus, "bus-id", i, errp)) {
1030             return;
1031         }
1032 
1033         if (!sysbus_realize(SYS_BUS_DEVICE(bus), errp)) {
1034             return;
1035         }
1036 
1037         memory_region_add_subregion(&s->iomem, aic->reg_size * (i + offset),
1038                                     &s->busses[i].mr);
1039     }
1040 
1041     memory_region_init_io(&s->pool_iomem, OBJECT(s),
1042                           &aspeed_i2c_share_pool_ops, s,
1043                           "aspeed.i2c-share-pool", aic->pool_size);
1044     memory_region_add_subregion(&s->iomem, aic->pool_base, &s->pool_iomem);
1045 
1046     if (aic->has_dma) {
1047         if (!s->dram_mr) {
1048             error_setg(errp, TYPE_ASPEED_I2C ": 'dram' link not set");
1049             return;
1050         }
1051 
1052         address_space_init(&s->dram_as, s->dram_mr,
1053                            TYPE_ASPEED_I2C "-dma-dram");
1054     }
1055 }
1056 
1057 static Property aspeed_i2c_properties[] = {
1058     DEFINE_PROP_LINK("dram", AspeedI2CState, dram_mr,
1059                      TYPE_MEMORY_REGION, MemoryRegion *),
1060     DEFINE_PROP_END_OF_LIST(),
1061 };
1062 
1063 static void aspeed_i2c_class_init(ObjectClass *klass, void *data)
1064 {
1065     DeviceClass *dc = DEVICE_CLASS(klass);
1066 
1067     dc->vmsd = &aspeed_i2c_vmstate;
1068     dc->reset = aspeed_i2c_reset;
1069     device_class_set_props(dc, aspeed_i2c_properties);
1070     dc->realize = aspeed_i2c_realize;
1071     dc->desc = "Aspeed I2C Controller";
1072 }
1073 
1074 static const TypeInfo aspeed_i2c_info = {
1075     .name          = TYPE_ASPEED_I2C,
1076     .parent        = TYPE_SYS_BUS_DEVICE,
1077     .instance_init = aspeed_i2c_instance_init,
1078     .instance_size = sizeof(AspeedI2CState),
1079     .class_init    = aspeed_i2c_class_init,
1080     .class_size = sizeof(AspeedI2CClass),
1081     .abstract   = true,
1082 };
1083 
1084 static int aspeed_i2c_bus_new_slave_event(AspeedI2CBus *bus,
1085                                           enum i2c_event event)
1086 {
1087     switch (event) {
1088     case I2C_START_SEND_ASYNC:
1089         if (!SHARED_ARRAY_FIELD_EX32(bus->regs, R_I2CS_CMD, RX_DMA_EN)) {
1090             qemu_log_mask(LOG_GUEST_ERROR,
1091                           "%s: Slave mode RX DMA is not enabled\n", __func__);
1092             return -1;
1093         }
1094         ARRAY_FIELD_DP32(bus->regs, I2CS_DMA_LEN_STS, RX_LEN, 0);
1095         bus->regs[R_I2CC_DMA_ADDR] =
1096             ARRAY_FIELD_EX32(bus->regs, I2CS_DMA_RX_ADDR, ADDR);
1097         bus->regs[R_I2CC_DMA_LEN] =
1098             ARRAY_FIELD_EX32(bus->regs, I2CS_DMA_LEN, RX_BUF_LEN) + 1;
1099         i2c_ack(bus->bus);
1100         break;
1101     case I2C_FINISH:
1102         ARRAY_FIELD_DP32(bus->regs, I2CS_INTR_STS, PKT_CMD_DONE, 1);
1103         ARRAY_FIELD_DP32(bus->regs, I2CS_INTR_STS, SLAVE_ADDR_RX_MATCH, 1);
1104         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CS_INTR_STS, NORMAL_STOP, 1);
1105         SHARED_ARRAY_FIELD_DP32(bus->regs, R_I2CS_INTR_STS, RX_DONE, 1);
1106         aspeed_i2c_bus_raise_slave_interrupt(bus);
1107         break;
1108     default:
1109         qemu_log_mask(LOG_UNIMP, "%s: i2c event %d unimplemented\n",
1110                       __func__, event);
1111         return -1;
1112     }
1113 
1114     return 0;
1115 }
1116 
1117 static int aspeed_i2c_bus_slave_event(I2CSlave *slave, enum i2c_event event)
1118 {
1119     BusState *qbus = qdev_get_parent_bus(DEVICE(slave));
1120     AspeedI2CBus *bus = ASPEED_I2C_BUS(qbus->parent);
1121     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
1122     uint32_t reg_byte_buf = aspeed_i2c_bus_byte_buf_offset(bus);
1123     uint32_t reg_dev_addr = aspeed_i2c_bus_dev_addr_offset(bus);
1124     uint32_t dev_addr = SHARED_ARRAY_FIELD_EX32(bus->regs, reg_dev_addr,
1125                                                 SLAVE_DEV_ADDR1);
1126 
1127     if (aspeed_i2c_is_new_mode(bus->controller)) {
1128         return aspeed_i2c_bus_new_slave_event(bus, event);
1129     }
1130 
1131     switch (event) {
1132     case I2C_START_SEND_ASYNC:
1133         /* Bit[0] == 0 indicates "send". */
1134         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_byte_buf, RX_BUF, dev_addr << 1);
1135 
1136         ARRAY_FIELD_DP32(bus->regs, I2CD_INTR_STS, SLAVE_ADDR_RX_MATCH, 1);
1137         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, RX_DONE, 1);
1138 
1139         aspeed_i2c_set_state(bus, I2CD_STXD);
1140 
1141         break;
1142 
1143     case I2C_FINISH:
1144         SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, NORMAL_STOP, 1);
1145 
1146         aspeed_i2c_set_state(bus, I2CD_IDLE);
1147 
1148         break;
1149 
1150     default:
1151         return -1;
1152     }
1153 
1154     aspeed_i2c_bus_raise_interrupt(bus);
1155 
1156     return 0;
1157 }
1158 
1159 static void aspeed_i2c_bus_new_slave_send_async(AspeedI2CBus *bus, uint8_t data)
1160 {
1161     assert(address_space_write(&bus->controller->dram_as,
1162                                bus->regs[R_I2CC_DMA_ADDR],
1163                                MEMTXATTRS_UNSPECIFIED, &data, 1) == MEMTX_OK);
1164 
1165     bus->regs[R_I2CC_DMA_ADDR]++;
1166     bus->regs[R_I2CC_DMA_LEN]--;
1167     ARRAY_FIELD_DP32(bus->regs, I2CS_DMA_LEN_STS, RX_LEN,
1168                      ARRAY_FIELD_EX32(bus->regs, I2CS_DMA_LEN_STS, RX_LEN) + 1);
1169     i2c_ack(bus->bus);
1170 }
1171 
1172 static void aspeed_i2c_bus_slave_send_async(I2CSlave *slave, uint8_t data)
1173 {
1174     BusState *qbus = qdev_get_parent_bus(DEVICE(slave));
1175     AspeedI2CBus *bus = ASPEED_I2C_BUS(qbus->parent);
1176     uint32_t reg_intr_sts = aspeed_i2c_bus_intr_sts_offset(bus);
1177     uint32_t reg_byte_buf = aspeed_i2c_bus_byte_buf_offset(bus);
1178 
1179     if (aspeed_i2c_is_new_mode(bus->controller)) {
1180         return aspeed_i2c_bus_new_slave_send_async(bus, data);
1181     }
1182 
1183     SHARED_ARRAY_FIELD_DP32(bus->regs, reg_byte_buf, RX_BUF, data);
1184     SHARED_ARRAY_FIELD_DP32(bus->regs, reg_intr_sts, RX_DONE, 1);
1185 
1186     aspeed_i2c_bus_raise_interrupt(bus);
1187 }
1188 
1189 static void aspeed_i2c_bus_slave_class_init(ObjectClass *klass, void *data)
1190 {
1191     DeviceClass *dc = DEVICE_CLASS(klass);
1192     I2CSlaveClass *sc = I2C_SLAVE_CLASS(klass);
1193 
1194     dc->desc = "Aspeed I2C Bus Slave";
1195 
1196     sc->event = aspeed_i2c_bus_slave_event;
1197     sc->send_async = aspeed_i2c_bus_slave_send_async;
1198 }
1199 
1200 static const TypeInfo aspeed_i2c_bus_slave_info = {
1201     .name           = TYPE_ASPEED_I2C_BUS_SLAVE,
1202     .parent         = TYPE_I2C_SLAVE,
1203     .instance_size  = sizeof(AspeedI2CBusSlave),
1204     .class_init     = aspeed_i2c_bus_slave_class_init,
1205 };
1206 
1207 static void aspeed_i2c_bus_reset(DeviceState *dev)
1208 {
1209     AspeedI2CBus *s = ASPEED_I2C_BUS(dev);
1210 
1211     memset(s->regs, 0, sizeof(s->regs));
1212     i2c_end_transfer(s->bus);
1213 }
1214 
1215 static void aspeed_i2c_bus_realize(DeviceState *dev, Error **errp)
1216 {
1217     AspeedI2CBus *s = ASPEED_I2C_BUS(dev);
1218     AspeedI2CClass *aic;
1219     g_autofree char *name = g_strdup_printf(TYPE_ASPEED_I2C_BUS ".%d", s->id);
1220 
1221     if (!s->controller) {
1222         error_setg(errp, TYPE_ASPEED_I2C_BUS ": 'controller' link not set");
1223         return;
1224     }
1225 
1226     aic = ASPEED_I2C_GET_CLASS(s->controller);
1227 
1228     sysbus_init_irq(SYS_BUS_DEVICE(dev), &s->irq);
1229 
1230     s->bus = i2c_init_bus(dev, name);
1231     s->slave = i2c_slave_create_simple(s->bus, TYPE_ASPEED_I2C_BUS_SLAVE,
1232                                        0xff);
1233 
1234     memory_region_init_io(&s->mr, OBJECT(s), &aspeed_i2c_bus_ops,
1235                           s, name, aic->reg_size);
1236     sysbus_init_mmio(SYS_BUS_DEVICE(dev), &s->mr);
1237 }
1238 
1239 static Property aspeed_i2c_bus_properties[] = {
1240     DEFINE_PROP_UINT8("bus-id", AspeedI2CBus, id, 0),
1241     DEFINE_PROP_LINK("controller", AspeedI2CBus, controller, TYPE_ASPEED_I2C,
1242                      AspeedI2CState *),
1243     DEFINE_PROP_END_OF_LIST(),
1244 };
1245 
1246 static void aspeed_i2c_bus_class_init(ObjectClass *klass, void *data)
1247 {
1248     DeviceClass *dc = DEVICE_CLASS(klass);
1249 
1250     dc->desc = "Aspeed I2C Bus";
1251     dc->realize = aspeed_i2c_bus_realize;
1252     dc->reset = aspeed_i2c_bus_reset;
1253     device_class_set_props(dc, aspeed_i2c_bus_properties);
1254 }
1255 
1256 static const TypeInfo aspeed_i2c_bus_info = {
1257     .name           = TYPE_ASPEED_I2C_BUS,
1258     .parent         = TYPE_SYS_BUS_DEVICE,
1259     .instance_size  = sizeof(AspeedI2CBus),
1260     .class_init     = aspeed_i2c_bus_class_init,
1261 };
1262 
1263 static qemu_irq aspeed_2400_i2c_bus_get_irq(AspeedI2CBus *bus)
1264 {
1265     return bus->controller->irq;
1266 }
1267 
1268 static uint8_t *aspeed_2400_i2c_bus_pool_base(AspeedI2CBus *bus)
1269 {
1270     uint8_t *pool_page =
1271         &bus->controller->share_pool[ARRAY_FIELD_EX32(bus->regs,
1272                                                       I2CD_FUN_CTRL,
1273                                                       POOL_PAGE_SEL) * 0x100];
1274 
1275     return &pool_page[ARRAY_FIELD_EX32(bus->regs, I2CD_POOL_CTRL, OFFSET)];
1276 }
1277 
1278 static void aspeed_2400_i2c_class_init(ObjectClass *klass, void *data)
1279 {
1280     DeviceClass *dc = DEVICE_CLASS(klass);
1281     AspeedI2CClass *aic = ASPEED_I2C_CLASS(klass);
1282 
1283     dc->desc = "ASPEED 2400 I2C Controller";
1284 
1285     aic->num_busses = 14;
1286     aic->reg_size = 0x40;
1287     aic->gap = 7;
1288     aic->bus_get_irq = aspeed_2400_i2c_bus_get_irq;
1289     aic->pool_size = 0x800;
1290     aic->pool_base = 0x800;
1291     aic->bus_pool_base = aspeed_2400_i2c_bus_pool_base;
1292     aic->mem_size = 0x1000;
1293 }
1294 
1295 static const TypeInfo aspeed_2400_i2c_info = {
1296     .name = TYPE_ASPEED_2400_I2C,
1297     .parent = TYPE_ASPEED_I2C,
1298     .class_init = aspeed_2400_i2c_class_init,
1299 };
1300 
1301 static qemu_irq aspeed_2500_i2c_bus_get_irq(AspeedI2CBus *bus)
1302 {
1303     return bus->controller->irq;
1304 }
1305 
1306 static uint8_t *aspeed_2500_i2c_bus_pool_base(AspeedI2CBus *bus)
1307 {
1308     return &bus->controller->share_pool[bus->id * 0x10];
1309 }
1310 
1311 static void aspeed_2500_i2c_class_init(ObjectClass *klass, void *data)
1312 {
1313     DeviceClass *dc = DEVICE_CLASS(klass);
1314     AspeedI2CClass *aic = ASPEED_I2C_CLASS(klass);
1315 
1316     dc->desc = "ASPEED 2500 I2C Controller";
1317 
1318     aic->num_busses = 14;
1319     aic->reg_size = 0x40;
1320     aic->gap = 7;
1321     aic->bus_get_irq = aspeed_2500_i2c_bus_get_irq;
1322     aic->pool_size = 0x100;
1323     aic->pool_base = 0x200;
1324     aic->bus_pool_base = aspeed_2500_i2c_bus_pool_base;
1325     aic->check_sram = true;
1326     aic->has_dma = true;
1327     aic->mem_size = 0x1000;
1328 }
1329 
1330 static const TypeInfo aspeed_2500_i2c_info = {
1331     .name = TYPE_ASPEED_2500_I2C,
1332     .parent = TYPE_ASPEED_I2C,
1333     .class_init = aspeed_2500_i2c_class_init,
1334 };
1335 
1336 static qemu_irq aspeed_2600_i2c_bus_get_irq(AspeedI2CBus *bus)
1337 {
1338     return bus->irq;
1339 }
1340 
1341 static uint8_t *aspeed_2600_i2c_bus_pool_base(AspeedI2CBus *bus)
1342 {
1343    return &bus->controller->share_pool[bus->id * 0x20];
1344 }
1345 
1346 static void aspeed_2600_i2c_class_init(ObjectClass *klass, void *data)
1347 {
1348     DeviceClass *dc = DEVICE_CLASS(klass);
1349     AspeedI2CClass *aic = ASPEED_I2C_CLASS(klass);
1350 
1351     dc->desc = "ASPEED 2600 I2C Controller";
1352 
1353     aic->num_busses = 16;
1354     aic->reg_size = 0x80;
1355     aic->gap = -1; /* no gap */
1356     aic->bus_get_irq = aspeed_2600_i2c_bus_get_irq;
1357     aic->pool_size = 0x200;
1358     aic->pool_base = 0xC00;
1359     aic->bus_pool_base = aspeed_2600_i2c_bus_pool_base;
1360     aic->has_dma = true;
1361     aic->mem_size = 0x1000;
1362 }
1363 
1364 static const TypeInfo aspeed_2600_i2c_info = {
1365     .name = TYPE_ASPEED_2600_I2C,
1366     .parent = TYPE_ASPEED_I2C,
1367     .class_init = aspeed_2600_i2c_class_init,
1368 };
1369 
1370 static void aspeed_1030_i2c_class_init(ObjectClass *klass, void *data)
1371 {
1372     DeviceClass *dc = DEVICE_CLASS(klass);
1373     AspeedI2CClass *aic = ASPEED_I2C_CLASS(klass);
1374 
1375     dc->desc = "ASPEED 1030 I2C Controller";
1376 
1377     aic->num_busses = 14;
1378     aic->reg_size = 0x80;
1379     aic->gap = -1; /* no gap */
1380     aic->bus_get_irq = aspeed_2600_i2c_bus_get_irq;
1381     aic->pool_size = 0x200;
1382     aic->pool_base = 0xC00;
1383     aic->bus_pool_base = aspeed_2600_i2c_bus_pool_base;
1384     aic->has_dma = true;
1385     aic->mem_size = 0x10000;
1386 }
1387 
1388 static const TypeInfo aspeed_1030_i2c_info = {
1389     .name = TYPE_ASPEED_1030_I2C,
1390     .parent = TYPE_ASPEED_I2C,
1391     .class_init = aspeed_1030_i2c_class_init,
1392 };
1393 
1394 static void aspeed_i2c_register_types(void)
1395 {
1396     type_register_static(&aspeed_i2c_bus_info);
1397     type_register_static(&aspeed_i2c_bus_slave_info);
1398     type_register_static(&aspeed_i2c_info);
1399     type_register_static(&aspeed_2400_i2c_info);
1400     type_register_static(&aspeed_2500_i2c_info);
1401     type_register_static(&aspeed_2600_i2c_info);
1402     type_register_static(&aspeed_1030_i2c_info);
1403 }
1404 
1405 type_init(aspeed_i2c_register_types)
1406 
1407 
1408 I2CBus *aspeed_i2c_get_bus(AspeedI2CState *s, int busnr)
1409 {
1410     AspeedI2CClass *aic = ASPEED_I2C_GET_CLASS(s);
1411     I2CBus *bus = NULL;
1412 
1413     if (busnr >= 0 && busnr < aic->num_busses) {
1414         bus = s->busses[busnr].bus;
1415     }
1416 
1417     return bus;
1418 }
1419