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 "qemu/log.h" 24 #include "hw/i2c/aspeed_i2c.h" 25 26 /* I2C Global Register */ 27 28 #define I2C_CTRL_STATUS 0x00 /* Device Interrupt Status */ 29 #define I2C_CTRL_ASSIGN 0x08 /* Device Interrupt Target 30 Assignment */ 31 32 /* I2C Device (Bus) Register */ 33 34 #define I2CD_FUN_CTRL_REG 0x00 /* I2CD Function Control */ 35 #define I2CD_BUFF_SEL_MASK (0x7 << 20) 36 #define I2CD_BUFF_SEL(x) (x << 20) 37 #define I2CD_M_SDA_LOCK_EN (0x1 << 16) 38 #define I2CD_MULTI_MASTER_DIS (0x1 << 15) 39 #define I2CD_M_SCL_DRIVE_EN (0x1 << 14) 40 #define I2CD_MSB_STS (0x1 << 9) 41 #define I2CD_SDA_DRIVE_1T_EN (0x1 << 8) 42 #define I2CD_M_SDA_DRIVE_1T_EN (0x1 << 7) 43 #define I2CD_M_HIGH_SPEED_EN (0x1 << 6) 44 #define I2CD_DEF_ADDR_EN (0x1 << 5) 45 #define I2CD_DEF_ALERT_EN (0x1 << 4) 46 #define I2CD_DEF_ARP_EN (0x1 << 3) 47 #define I2CD_DEF_GCALL_EN (0x1 << 2) 48 #define I2CD_SLAVE_EN (0x1 << 1) 49 #define I2CD_MASTER_EN (0x1) 50 51 #define I2CD_AC_TIMING_REG1 0x04 /* Clock and AC Timing Control #1 */ 52 #define I2CD_AC_TIMING_REG2 0x08 /* Clock and AC Timing Control #1 */ 53 #define I2CD_INTR_CTRL_REG 0x0c /* I2CD Interrupt Control */ 54 #define I2CD_INTR_STS_REG 0x10 /* I2CD Interrupt Status */ 55 56 #define I2CD_INTR_SLAVE_ADDR_MATCH (0x1 << 31) /* 0: addr1 1: addr2 */ 57 #define I2CD_INTR_SLAVE_ADDR_RX_PENDING (0x1 << 30) 58 /* bits[19-16] Reserved */ 59 60 /* All bits below are cleared by writing 1 */ 61 #define I2CD_INTR_SLAVE_INACTIVE_TIMEOUT (0x1 << 15) 62 #define I2CD_INTR_SDA_DL_TIMEOUT (0x1 << 14) 63 #define I2CD_INTR_BUS_RECOVER_DONE (0x1 << 13) 64 #define I2CD_INTR_SMBUS_ALERT (0x1 << 12) /* Bus [0-3] only */ 65 #define I2CD_INTR_SMBUS_ARP_ADDR (0x1 << 11) /* Removed */ 66 #define I2CD_INTR_SMBUS_DEV_ALERT_ADDR (0x1 << 10) /* Removed */ 67 #define I2CD_INTR_SMBUS_DEF_ADDR (0x1 << 9) /* Removed */ 68 #define I2CD_INTR_GCALL_ADDR (0x1 << 8) /* Removed */ 69 #define I2CD_INTR_SLAVE_ADDR_RX_MATCH (0x1 << 7) /* use RX_DONE */ 70 #define I2CD_INTR_SCL_TIMEOUT (0x1 << 6) 71 #define I2CD_INTR_ABNORMAL (0x1 << 5) 72 #define I2CD_INTR_NORMAL_STOP (0x1 << 4) 73 #define I2CD_INTR_ARBIT_LOSS (0x1 << 3) 74 #define I2CD_INTR_RX_DONE (0x1 << 2) 75 #define I2CD_INTR_TX_NAK (0x1 << 1) 76 #define I2CD_INTR_TX_ACK (0x1 << 0) 77 78 #define I2CD_CMD_REG 0x14 /* I2CD Command/Status */ 79 #define I2CD_SDA_OE (0x1 << 28) 80 #define I2CD_SDA_O (0x1 << 27) 81 #define I2CD_SCL_OE (0x1 << 26) 82 #define I2CD_SCL_O (0x1 << 25) 83 #define I2CD_TX_TIMING (0x1 << 24) 84 #define I2CD_TX_STATUS (0x1 << 23) 85 86 #define I2CD_TX_STATE_SHIFT 19 /* Tx State Machine */ 87 #define I2CD_TX_STATE_MASK 0xf 88 #define I2CD_IDLE 0x0 89 #define I2CD_MACTIVE 0x8 90 #define I2CD_MSTART 0x9 91 #define I2CD_MSTARTR 0xa 92 #define I2CD_MSTOP 0xb 93 #define I2CD_MTXD 0xc 94 #define I2CD_MRXACK 0xd 95 #define I2CD_MRXD 0xe 96 #define I2CD_MTXACK 0xf 97 #define I2CD_SWAIT 0x1 98 #define I2CD_SRXD 0x4 99 #define I2CD_STXACK 0x5 100 #define I2CD_STXD 0x6 101 #define I2CD_SRXACK 0x7 102 #define I2CD_RECOVER 0x3 103 104 #define I2CD_SCL_LINE_STS (0x1 << 18) 105 #define I2CD_SDA_LINE_STS (0x1 << 17) 106 #define I2CD_BUS_BUSY_STS (0x1 << 16) 107 #define I2CD_SDA_OE_OUT_DIR (0x1 << 15) 108 #define I2CD_SDA_O_OUT_DIR (0x1 << 14) 109 #define I2CD_SCL_OE_OUT_DIR (0x1 << 13) 110 #define I2CD_SCL_O_OUT_DIR (0x1 << 12) 111 #define I2CD_BUS_RECOVER_CMD_EN (0x1 << 11) 112 #define I2CD_S_ALT_EN (0x1 << 10) 113 #define I2CD_RX_DMA_ENABLE (0x1 << 9) 114 #define I2CD_TX_DMA_ENABLE (0x1 << 8) 115 116 /* Command Bit */ 117 #define I2CD_M_STOP_CMD (0x1 << 5) 118 #define I2CD_M_S_RX_CMD_LAST (0x1 << 4) 119 #define I2CD_M_RX_CMD (0x1 << 3) 120 #define I2CD_S_TX_CMD (0x1 << 2) 121 #define I2CD_M_TX_CMD (0x1 << 1) 122 #define I2CD_M_START_CMD (0x1) 123 124 #define I2CD_DEV_ADDR_REG 0x18 /* Slave Device Address */ 125 #define I2CD_BUF_CTRL_REG 0x1c /* Pool Buffer Control */ 126 #define I2CD_BYTE_BUF_REG 0x20 /* Transmit/Receive Byte Buffer */ 127 #define I2CD_BYTE_BUF_TX_SHIFT 0 128 #define I2CD_BYTE_BUF_TX_MASK 0xff 129 #define I2CD_BYTE_BUF_RX_SHIFT 8 130 #define I2CD_BYTE_BUF_RX_MASK 0xff 131 132 133 static inline bool aspeed_i2c_bus_is_master(AspeedI2CBus *bus) 134 { 135 return bus->ctrl & I2CD_MASTER_EN; 136 } 137 138 static inline bool aspeed_i2c_bus_is_enabled(AspeedI2CBus *bus) 139 { 140 return bus->ctrl & (I2CD_MASTER_EN | I2CD_SLAVE_EN); 141 } 142 143 static inline void aspeed_i2c_bus_raise_interrupt(AspeedI2CBus *bus) 144 { 145 bus->intr_status &= bus->intr_ctrl; 146 if (bus->intr_status) { 147 bus->controller->intr_status |= 1 << bus->id; 148 qemu_irq_raise(bus->controller->irq); 149 } 150 } 151 152 static uint64_t aspeed_i2c_bus_read(void *opaque, hwaddr offset, 153 unsigned size) 154 { 155 AspeedI2CBus *bus = opaque; 156 157 switch (offset) { 158 case I2CD_FUN_CTRL_REG: 159 return bus->ctrl; 160 case I2CD_AC_TIMING_REG1: 161 return bus->timing[0]; 162 case I2CD_AC_TIMING_REG2: 163 return bus->timing[1]; 164 case I2CD_INTR_CTRL_REG: 165 return bus->intr_ctrl; 166 case I2CD_INTR_STS_REG: 167 return bus->intr_status; 168 case I2CD_BYTE_BUF_REG: 169 return bus->buf; 170 case I2CD_CMD_REG: 171 return bus->cmd | (i2c_bus_busy(bus->bus) << 16); 172 default: 173 qemu_log_mask(LOG_GUEST_ERROR, 174 "%s: Bad offset 0x%" HWADDR_PRIx "\n", __func__, offset); 175 return -1; 176 } 177 } 178 179 static void aspeed_i2c_set_state(AspeedI2CBus *bus, uint8_t state) 180 { 181 bus->cmd &= ~(I2CD_TX_STATE_MASK << I2CD_TX_STATE_SHIFT); 182 bus->cmd |= (state & I2CD_TX_STATE_MASK) << I2CD_TX_STATE_SHIFT; 183 } 184 185 static uint8_t aspeed_i2c_get_state(AspeedI2CBus *bus) 186 { 187 return (bus->cmd >> I2CD_TX_STATE_SHIFT) & I2CD_TX_STATE_MASK; 188 } 189 190 /* 191 * The state machine needs some refinement. It is only used to track 192 * invalid STOP commands for the moment. 193 */ 194 static void aspeed_i2c_bus_handle_cmd(AspeedI2CBus *bus, uint64_t value) 195 { 196 bus->cmd &= ~0xFFFF; 197 bus->cmd |= value & 0xFFFF; 198 199 if (bus->cmd & I2CD_M_START_CMD) { 200 uint8_t state = aspeed_i2c_get_state(bus) & I2CD_MACTIVE ? 201 I2CD_MSTARTR : I2CD_MSTART; 202 203 aspeed_i2c_set_state(bus, state); 204 205 if (i2c_start_transfer(bus->bus, extract32(bus->buf, 1, 7), 206 extract32(bus->buf, 0, 1))) { 207 bus->intr_status |= I2CD_INTR_TX_NAK; 208 } else { 209 bus->intr_status |= I2CD_INTR_TX_ACK; 210 } 211 212 /* START command is also a TX command, as the slave address is 213 * sent on the bus */ 214 bus->cmd &= ~(I2CD_M_START_CMD | I2CD_M_TX_CMD); 215 216 /* No slave found */ 217 if (!i2c_bus_busy(bus->bus)) { 218 return; 219 } 220 aspeed_i2c_set_state(bus, I2CD_MACTIVE); 221 } 222 223 if (bus->cmd & I2CD_M_TX_CMD) { 224 aspeed_i2c_set_state(bus, I2CD_MTXD); 225 if (i2c_send(bus->bus, bus->buf)) { 226 bus->intr_status |= (I2CD_INTR_TX_NAK); 227 i2c_end_transfer(bus->bus); 228 } else { 229 bus->intr_status |= I2CD_INTR_TX_ACK; 230 } 231 bus->cmd &= ~I2CD_M_TX_CMD; 232 aspeed_i2c_set_state(bus, I2CD_MACTIVE); 233 } 234 235 if (bus->cmd & (I2CD_M_RX_CMD | I2CD_M_S_RX_CMD_LAST)) { 236 int ret; 237 238 aspeed_i2c_set_state(bus, I2CD_MRXD); 239 ret = i2c_recv(bus->bus); 240 if (ret < 0) { 241 qemu_log_mask(LOG_GUEST_ERROR, "%s: read failed\n", __func__); 242 ret = 0xff; 243 } else { 244 bus->intr_status |= I2CD_INTR_RX_DONE; 245 } 246 bus->buf = (ret & I2CD_BYTE_BUF_RX_MASK) << I2CD_BYTE_BUF_RX_SHIFT; 247 if (bus->cmd & I2CD_M_S_RX_CMD_LAST) { 248 i2c_nack(bus->bus); 249 } 250 bus->cmd &= ~(I2CD_M_RX_CMD | I2CD_M_S_RX_CMD_LAST); 251 aspeed_i2c_set_state(bus, I2CD_MACTIVE); 252 } 253 254 if (bus->cmd & I2CD_M_STOP_CMD) { 255 if (!(aspeed_i2c_get_state(bus) & I2CD_MACTIVE)) { 256 qemu_log_mask(LOG_GUEST_ERROR, "%s: abnormal stop\n", __func__); 257 bus->intr_status |= I2CD_INTR_ABNORMAL; 258 } else { 259 aspeed_i2c_set_state(bus, I2CD_MSTOP); 260 i2c_end_transfer(bus->bus); 261 bus->intr_status |= I2CD_INTR_NORMAL_STOP; 262 } 263 bus->cmd &= ~I2CD_M_STOP_CMD; 264 aspeed_i2c_set_state(bus, I2CD_IDLE); 265 } 266 } 267 268 static void aspeed_i2c_bus_write(void *opaque, hwaddr offset, 269 uint64_t value, unsigned size) 270 { 271 AspeedI2CBus *bus = opaque; 272 273 switch (offset) { 274 case I2CD_FUN_CTRL_REG: 275 if (value & I2CD_SLAVE_EN) { 276 qemu_log_mask(LOG_UNIMP, "%s: slave mode not implemented\n", 277 __func__); 278 break; 279 } 280 bus->ctrl = value & 0x0071C3FF; 281 break; 282 case I2CD_AC_TIMING_REG1: 283 bus->timing[0] = value & 0xFFFFF0F; 284 break; 285 case I2CD_AC_TIMING_REG2: 286 bus->timing[1] = value & 0x7; 287 break; 288 case I2CD_INTR_CTRL_REG: 289 bus->intr_ctrl = value & 0x7FFF; 290 break; 291 case I2CD_INTR_STS_REG: 292 bus->intr_status &= ~(value & 0x7FFF); 293 if (!bus->intr_status) { 294 bus->controller->intr_status &= ~(1 << bus->id); 295 qemu_irq_lower(bus->controller->irq); 296 } 297 break; 298 case I2CD_DEV_ADDR_REG: 299 qemu_log_mask(LOG_UNIMP, "%s: slave mode not implemented\n", 300 __func__); 301 break; 302 case I2CD_BYTE_BUF_REG: 303 bus->buf = (value & I2CD_BYTE_BUF_TX_MASK) << I2CD_BYTE_BUF_TX_SHIFT; 304 break; 305 case I2CD_CMD_REG: 306 if (!aspeed_i2c_bus_is_enabled(bus)) { 307 break; 308 } 309 310 if (!aspeed_i2c_bus_is_master(bus)) { 311 qemu_log_mask(LOG_UNIMP, "%s: slave mode not implemented\n", 312 __func__); 313 break; 314 } 315 316 aspeed_i2c_bus_handle_cmd(bus, value); 317 aspeed_i2c_bus_raise_interrupt(bus); 318 break; 319 320 default: 321 qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n", 322 __func__, offset); 323 } 324 } 325 326 static uint64_t aspeed_i2c_ctrl_read(void *opaque, hwaddr offset, 327 unsigned size) 328 { 329 AspeedI2CState *s = opaque; 330 331 switch (offset) { 332 case I2C_CTRL_STATUS: 333 return s->intr_status; 334 default: 335 qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n", 336 __func__, offset); 337 break; 338 } 339 340 return -1; 341 } 342 343 static void aspeed_i2c_ctrl_write(void *opaque, hwaddr offset, 344 uint64_t value, unsigned size) 345 { 346 switch (offset) { 347 case I2C_CTRL_STATUS: 348 default: 349 qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset 0x%" HWADDR_PRIx "\n", 350 __func__, offset); 351 break; 352 } 353 } 354 355 static const MemoryRegionOps aspeed_i2c_bus_ops = { 356 .read = aspeed_i2c_bus_read, 357 .write = aspeed_i2c_bus_write, 358 .endianness = DEVICE_LITTLE_ENDIAN, 359 }; 360 361 static const MemoryRegionOps aspeed_i2c_ctrl_ops = { 362 .read = aspeed_i2c_ctrl_read, 363 .write = aspeed_i2c_ctrl_write, 364 .endianness = DEVICE_LITTLE_ENDIAN, 365 }; 366 367 static const VMStateDescription aspeed_i2c_bus_vmstate = { 368 .name = TYPE_ASPEED_I2C, 369 .version_id = 1, 370 .minimum_version_id = 1, 371 .fields = (VMStateField[]) { 372 VMSTATE_UINT8(id, AspeedI2CBus), 373 VMSTATE_UINT32(ctrl, AspeedI2CBus), 374 VMSTATE_UINT32_ARRAY(timing, AspeedI2CBus, 2), 375 VMSTATE_UINT32(intr_ctrl, AspeedI2CBus), 376 VMSTATE_UINT32(intr_status, AspeedI2CBus), 377 VMSTATE_UINT32(cmd, AspeedI2CBus), 378 VMSTATE_UINT32(buf, AspeedI2CBus), 379 VMSTATE_END_OF_LIST() 380 } 381 }; 382 383 static const VMStateDescription aspeed_i2c_vmstate = { 384 .name = TYPE_ASPEED_I2C, 385 .version_id = 1, 386 .minimum_version_id = 1, 387 .fields = (VMStateField[]) { 388 VMSTATE_UINT32(intr_status, AspeedI2CState), 389 VMSTATE_STRUCT_ARRAY(busses, AspeedI2CState, 390 ASPEED_I2C_NR_BUSSES, 1, aspeed_i2c_bus_vmstate, 391 AspeedI2CBus), 392 VMSTATE_END_OF_LIST() 393 } 394 }; 395 396 static void aspeed_i2c_reset(DeviceState *dev) 397 { 398 int i; 399 AspeedI2CState *s = ASPEED_I2C(dev); 400 401 s->intr_status = 0; 402 403 for (i = 0; i < ASPEED_I2C_NR_BUSSES; i++) { 404 s->busses[i].intr_ctrl = 0; 405 s->busses[i].intr_status = 0; 406 s->busses[i].cmd = 0; 407 s->busses[i].buf = 0; 408 i2c_end_transfer(s->busses[i].bus); 409 } 410 } 411 412 /* 413 * Address Definitions 414 * 415 * 0x000 ... 0x03F: Global Register 416 * 0x040 ... 0x07F: Device 1 417 * 0x080 ... 0x0BF: Device 2 418 * 0x0C0 ... 0x0FF: Device 3 419 * 0x100 ... 0x13F: Device 4 420 * 0x140 ... 0x17F: Device 5 421 * 0x180 ... 0x1BF: Device 6 422 * 0x1C0 ... 0x1FF: Device 7 423 * 0x200 ... 0x2FF: Buffer Pool (unused in linux driver) 424 * 0x300 ... 0x33F: Device 8 425 * 0x340 ... 0x37F: Device 9 426 * 0x380 ... 0x3BF: Device 10 427 * 0x3C0 ... 0x3FF: Device 11 428 * 0x400 ... 0x43F: Device 12 429 * 0x440 ... 0x47F: Device 13 430 * 0x480 ... 0x4BF: Device 14 431 * 0x800 ... 0xFFF: Buffer Pool (unused in linux driver) 432 */ 433 static void aspeed_i2c_realize(DeviceState *dev, Error **errp) 434 { 435 int i; 436 SysBusDevice *sbd = SYS_BUS_DEVICE(dev); 437 AspeedI2CState *s = ASPEED_I2C(dev); 438 439 sysbus_init_irq(sbd, &s->irq); 440 memory_region_init_io(&s->iomem, OBJECT(s), &aspeed_i2c_ctrl_ops, s, 441 "aspeed.i2c", 0x1000); 442 sysbus_init_mmio(sbd, &s->iomem); 443 444 for (i = 0; i < ASPEED_I2C_NR_BUSSES; i++) { 445 char name[16]; 446 int offset = i < 7 ? 1 : 5; 447 snprintf(name, sizeof(name), "aspeed.i2c.%d", i); 448 s->busses[i].controller = s; 449 s->busses[i].id = i; 450 s->busses[i].bus = i2c_init_bus(dev, name); 451 memory_region_init_io(&s->busses[i].mr, OBJECT(dev), 452 &aspeed_i2c_bus_ops, &s->busses[i], name, 0x40); 453 memory_region_add_subregion(&s->iomem, 0x40 * (i + offset), 454 &s->busses[i].mr); 455 } 456 } 457 458 static void aspeed_i2c_class_init(ObjectClass *klass, void *data) 459 { 460 DeviceClass *dc = DEVICE_CLASS(klass); 461 462 dc->vmsd = &aspeed_i2c_vmstate; 463 dc->reset = aspeed_i2c_reset; 464 dc->realize = aspeed_i2c_realize; 465 dc->desc = "Aspeed I2C Controller"; 466 } 467 468 static const TypeInfo aspeed_i2c_info = { 469 .name = TYPE_ASPEED_I2C, 470 .parent = TYPE_SYS_BUS_DEVICE, 471 .instance_size = sizeof(AspeedI2CState), 472 .class_init = aspeed_i2c_class_init, 473 }; 474 475 static void aspeed_i2c_register_types(void) 476 { 477 type_register_static(&aspeed_i2c_info); 478 } 479 480 type_init(aspeed_i2c_register_types) 481 482 483 I2CBus *aspeed_i2c_get_bus(DeviceState *dev, int busnr) 484 { 485 AspeedI2CState *s = ASPEED_I2C(dev); 486 I2CBus *bus = NULL; 487 488 if (busnr >= 0 && busnr < ASPEED_I2C_NR_BUSSES) { 489 bus = s->busses[busnr].bus; 490 } 491 492 return bus; 493 } 494