Aditya Mehrotra / mbed-dev

Dependents:   CAN_TEST SPIne_Plus_DYNO_SENSORS SPIne_Plus_v2 SPIne_Plus_Dyno_v2

Committer:
saloutos
Date:
Thu Nov 26 04:08:56 2020 +0000
Revision:
0:083111ae2a11
first commit of leaned mbed dev lib

Who changed what in which revision?

UserRevisionLine numberNew contents of line
saloutos 0:083111ae2a11 1 /* mbed Microcontroller Library
saloutos 0:083111ae2a11 2 *******************************************************************************
saloutos 0:083111ae2a11 3 * Copyright (c) 2015, STMicroelectronics
saloutos 0:083111ae2a11 4 * All rights reserved.
saloutos 0:083111ae2a11 5 *
saloutos 0:083111ae2a11 6 * Redistribution and use in source and binary forms, with or without
saloutos 0:083111ae2a11 7 * modification, are permitted provided that the following conditions are met:
saloutos 0:083111ae2a11 8 *
saloutos 0:083111ae2a11 9 * 1. Redistributions of source code must retain the above copyright notice,
saloutos 0:083111ae2a11 10 * this list of conditions and the following disclaimer.
saloutos 0:083111ae2a11 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
saloutos 0:083111ae2a11 12 * this list of conditions and the following disclaimer in the documentation
saloutos 0:083111ae2a11 13 * and/or other materials provided with the distribution.
saloutos 0:083111ae2a11 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
saloutos 0:083111ae2a11 15 * may be used to endorse or promote products derived from this software
saloutos 0:083111ae2a11 16 * without specific prior written permission.
saloutos 0:083111ae2a11 17 *
saloutos 0:083111ae2a11 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
saloutos 0:083111ae2a11 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
saloutos 0:083111ae2a11 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
saloutos 0:083111ae2a11 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
saloutos 0:083111ae2a11 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
saloutos 0:083111ae2a11 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
saloutos 0:083111ae2a11 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
saloutos 0:083111ae2a11 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
saloutos 0:083111ae2a11 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
saloutos 0:083111ae2a11 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
saloutos 0:083111ae2a11 28 *******************************************************************************
saloutos 0:083111ae2a11 29 */
saloutos 0:083111ae2a11 30
saloutos 0:083111ae2a11 31
saloutos 0:083111ae2a11 32 #include "mbed_assert.h"
saloutos 0:083111ae2a11 33 #include "i2c_api.h"
saloutos 0:083111ae2a11 34 #include "platform/mbed_wait_api.h"
saloutos 0:083111ae2a11 35
saloutos 0:083111ae2a11 36 #if DEVICE_I2C
saloutos 0:083111ae2a11 37
saloutos 0:083111ae2a11 38 #include "cmsis.h"
saloutos 0:083111ae2a11 39 #include "pinmap.h"
saloutos 0:083111ae2a11 40 #include "PeripheralPins.h"
saloutos 0:083111ae2a11 41 #include "i2c_device.h" // family specific defines
saloutos 0:083111ae2a11 42
saloutos 0:083111ae2a11 43 #ifndef DEBUG_STDIO
saloutos 0:083111ae2a11 44 # define DEBUG_STDIO 0
saloutos 0:083111ae2a11 45 #endif
saloutos 0:083111ae2a11 46
saloutos 0:083111ae2a11 47 #if DEBUG_STDIO
saloutos 0:083111ae2a11 48 # include <stdio.h>
saloutos 0:083111ae2a11 49 # define DEBUG_PRINTF(...) do { printf(__VA_ARGS__); } while(0)
saloutos 0:083111ae2a11 50 #else
saloutos 0:083111ae2a11 51 # define DEBUG_PRINTF(...) {}
saloutos 0:083111ae2a11 52 #endif
saloutos 0:083111ae2a11 53
saloutos 0:083111ae2a11 54 #if DEVICE_I2C_ASYNCH
saloutos 0:083111ae2a11 55 #define I2C_S(obj) (struct i2c_s *) (&((obj)->i2c))
saloutos 0:083111ae2a11 56 #else
saloutos 0:083111ae2a11 57 #define I2C_S(obj) (struct i2c_s *) (obj)
saloutos 0:083111ae2a11 58 #endif
saloutos 0:083111ae2a11 59
saloutos 0:083111ae2a11 60 /* Family specific description for I2C */
saloutos 0:083111ae2a11 61 #define I2C_NUM (5)
saloutos 0:083111ae2a11 62 static I2C_HandleTypeDef* i2c_handles[I2C_NUM];
saloutos 0:083111ae2a11 63
saloutos 0:083111ae2a11 64 /* Timeout values are based on core clock and I2C clock.
saloutos 0:083111ae2a11 65 The BYTE_TIMEOUT is computed as twice the number of cycles it would
saloutos 0:083111ae2a11 66 take to send 10 bits over I2C. Most Flags should take less than that.
saloutos 0:083111ae2a11 67 This is for immediate FLAG or ACK check.
saloutos 0:083111ae2a11 68 */
saloutos 0:083111ae2a11 69 #define BYTE_TIMEOUT ((SystemCoreClock / obj_s->hz) * 2 * 10)
saloutos 0:083111ae2a11 70 /* Timeout values based on I2C clock.
saloutos 0:083111ae2a11 71 The BYTE_TIMEOUT_US is computed as 3x the time in us it would
saloutos 0:083111ae2a11 72 take to send 10 bits over I2C. Most Flags should take less than that.
saloutos 0:083111ae2a11 73 This is for complete transfers check.
saloutos 0:083111ae2a11 74 */
saloutos 0:083111ae2a11 75 #define BYTE_TIMEOUT_US ((SystemCoreClock / obj_s->hz) * 3 * 10)
saloutos 0:083111ae2a11 76 /* Timeout values for flags and events waiting loops. These timeouts are
saloutos 0:083111ae2a11 77 not based on accurate values, they just guarantee that the application will
saloutos 0:083111ae2a11 78 not remain stuck if the I2C communication is corrupted.
saloutos 0:083111ae2a11 79 */
saloutos 0:083111ae2a11 80 #define FLAG_TIMEOUT ((int)0x1000)
saloutos 0:083111ae2a11 81
saloutos 0:083111ae2a11 82 /* GENERIC INIT and HELPERS FUNCTIONS */
saloutos 0:083111ae2a11 83
saloutos 0:083111ae2a11 84 #if defined(I2C1_BASE)
saloutos 0:083111ae2a11 85 static void i2c1_irq(void)
saloutos 0:083111ae2a11 86 {
saloutos 0:083111ae2a11 87 I2C_HandleTypeDef * handle = i2c_handles[0];
saloutos 0:083111ae2a11 88 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 89 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 90 }
saloutos 0:083111ae2a11 91 #endif
saloutos 0:083111ae2a11 92 #if defined(I2C2_BASE)
saloutos 0:083111ae2a11 93 static void i2c2_irq(void)
saloutos 0:083111ae2a11 94 {
saloutos 0:083111ae2a11 95 I2C_HandleTypeDef * handle = i2c_handles[1];
saloutos 0:083111ae2a11 96 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 97 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 98 }
saloutos 0:083111ae2a11 99 #endif
saloutos 0:083111ae2a11 100 #if defined(I2C3_BASE)
saloutos 0:083111ae2a11 101 static void i2c3_irq(void)
saloutos 0:083111ae2a11 102 {
saloutos 0:083111ae2a11 103 I2C_HandleTypeDef * handle = i2c_handles[2];
saloutos 0:083111ae2a11 104 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 105 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 106 }
saloutos 0:083111ae2a11 107 #endif
saloutos 0:083111ae2a11 108 #if defined(I2C4_BASE)
saloutos 0:083111ae2a11 109 static void i2c4_irq(void)
saloutos 0:083111ae2a11 110 {
saloutos 0:083111ae2a11 111 I2C_HandleTypeDef * handle = i2c_handles[3];
saloutos 0:083111ae2a11 112 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 113 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 114 }
saloutos 0:083111ae2a11 115 #endif
saloutos 0:083111ae2a11 116 #if defined(FMPI2C1_BASE)
saloutos 0:083111ae2a11 117 static void i2c5_irq(void)
saloutos 0:083111ae2a11 118 {
saloutos 0:083111ae2a11 119 I2C_HandleTypeDef * handle = i2c_handles[4];
saloutos 0:083111ae2a11 120 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 121 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 122 }
saloutos 0:083111ae2a11 123 #endif
saloutos 0:083111ae2a11 124
saloutos 0:083111ae2a11 125 void i2c_ev_err_enable(i2c_t *obj, uint32_t handler) {
saloutos 0:083111ae2a11 126 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 127 IRQn_Type irq_event_n = obj_s->event_i2cIRQ;
saloutos 0:083111ae2a11 128 IRQn_Type irq_error_n = obj_s->error_i2cIRQ;
saloutos 0:083111ae2a11 129 /* default prio in master case is set to 2 */
saloutos 0:083111ae2a11 130 uint32_t prio = 2;
saloutos 0:083111ae2a11 131
saloutos 0:083111ae2a11 132 /* Set up ITs using IRQ and handler tables */
saloutos 0:083111ae2a11 133 NVIC_SetVector(irq_event_n, handler);
saloutos 0:083111ae2a11 134 NVIC_SetVector(irq_error_n, handler);
saloutos 0:083111ae2a11 135
saloutos 0:083111ae2a11 136 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 137 /* Set higher priority to slave device than master.
saloutos 0:083111ae2a11 138 * In case a device makes use of both master and slave, the
saloutos 0:083111ae2a11 139 * slave needs higher responsiveness.
saloutos 0:083111ae2a11 140 */
saloutos 0:083111ae2a11 141 if (obj_s->slave) {
saloutos 0:083111ae2a11 142 prio = 1;
saloutos 0:083111ae2a11 143 }
saloutos 0:083111ae2a11 144 #endif
saloutos 0:083111ae2a11 145
saloutos 0:083111ae2a11 146 NVIC_SetPriority(irq_event_n, prio);
saloutos 0:083111ae2a11 147 NVIC_SetPriority(irq_error_n, prio);
saloutos 0:083111ae2a11 148 NVIC_EnableIRQ(irq_event_n);
saloutos 0:083111ae2a11 149 NVIC_EnableIRQ(irq_error_n);
saloutos 0:083111ae2a11 150 }
saloutos 0:083111ae2a11 151
saloutos 0:083111ae2a11 152 void i2c_ev_err_disable(i2c_t *obj) {
saloutos 0:083111ae2a11 153 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 154 IRQn_Type irq_event_n = obj_s->event_i2cIRQ;
saloutos 0:083111ae2a11 155 IRQn_Type irq_error_n = obj_s->error_i2cIRQ;
saloutos 0:083111ae2a11 156
saloutos 0:083111ae2a11 157 HAL_NVIC_DisableIRQ(irq_event_n);
saloutos 0:083111ae2a11 158 HAL_NVIC_DisableIRQ(irq_error_n);
saloutos 0:083111ae2a11 159 }
saloutos 0:083111ae2a11 160
saloutos 0:083111ae2a11 161 uint32_t i2c_get_irq_handler(i2c_t *obj)
saloutos 0:083111ae2a11 162 {
saloutos 0:083111ae2a11 163 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 164 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 165 uint32_t handler = 0;
saloutos 0:083111ae2a11 166
saloutos 0:083111ae2a11 167 switch (obj_s->index) {
saloutos 0:083111ae2a11 168 #if defined(I2C1_BASE)
saloutos 0:083111ae2a11 169 case 0:
saloutos 0:083111ae2a11 170 handler = (uint32_t)&i2c1_irq;
saloutos 0:083111ae2a11 171 break;
saloutos 0:083111ae2a11 172 #endif
saloutos 0:083111ae2a11 173 #if defined(I2C2_BASE)
saloutos 0:083111ae2a11 174 case 1:
saloutos 0:083111ae2a11 175 handler = (uint32_t)&i2c2_irq;
saloutos 0:083111ae2a11 176 break;
saloutos 0:083111ae2a11 177 #endif
saloutos 0:083111ae2a11 178 #if defined(I2C3_BASE)
saloutos 0:083111ae2a11 179 case 2:
saloutos 0:083111ae2a11 180 handler = (uint32_t)&i2c3_irq;
saloutos 0:083111ae2a11 181 break;
saloutos 0:083111ae2a11 182 #endif
saloutos 0:083111ae2a11 183 #if defined(I2C4_BASE)
saloutos 0:083111ae2a11 184 case 3:
saloutos 0:083111ae2a11 185 handler = (uint32_t)&i2c4_irq;
saloutos 0:083111ae2a11 186 break;
saloutos 0:083111ae2a11 187 #endif
saloutos 0:083111ae2a11 188 #if defined(FMPI2C1_BASE)
saloutos 0:083111ae2a11 189 case 4:
saloutos 0:083111ae2a11 190 handler = (uint32_t)&i2c5_irq;
saloutos 0:083111ae2a11 191 break;
saloutos 0:083111ae2a11 192 #endif
saloutos 0:083111ae2a11 193 }
saloutos 0:083111ae2a11 194
saloutos 0:083111ae2a11 195 i2c_handles[obj_s->index] = handle;
saloutos 0:083111ae2a11 196 return handler;
saloutos 0:083111ae2a11 197 }
saloutos 0:083111ae2a11 198
saloutos 0:083111ae2a11 199 void i2c_hw_reset(i2c_t *obj) {
saloutos 0:083111ae2a11 200 int timeout;
saloutos 0:083111ae2a11 201 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 202 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 203
saloutos 0:083111ae2a11 204 handle->Instance = (I2C_TypeDef *)(obj_s->i2c);
saloutos 0:083111ae2a11 205
saloutos 0:083111ae2a11 206 // wait before reset
saloutos 0:083111ae2a11 207 timeout = BYTE_TIMEOUT;
saloutos 0:083111ae2a11 208 while ((__HAL_I2C_GET_FLAG(handle, I2C_FLAG_BUSY)) && (--timeout != 0));
saloutos 0:083111ae2a11 209 #if defined I2C1_BASE
saloutos 0:083111ae2a11 210 if (obj_s->i2c == I2C_1) {
saloutos 0:083111ae2a11 211 __HAL_RCC_I2C1_FORCE_RESET();
saloutos 0:083111ae2a11 212 __HAL_RCC_I2C1_RELEASE_RESET();
saloutos 0:083111ae2a11 213 }
saloutos 0:083111ae2a11 214 #endif
saloutos 0:083111ae2a11 215 #if defined I2C2_BASE
saloutos 0:083111ae2a11 216 if (obj_s->i2c == I2C_2) {
saloutos 0:083111ae2a11 217 __HAL_RCC_I2C2_FORCE_RESET();
saloutos 0:083111ae2a11 218 __HAL_RCC_I2C2_RELEASE_RESET();
saloutos 0:083111ae2a11 219 }
saloutos 0:083111ae2a11 220 #endif
saloutos 0:083111ae2a11 221 #if defined I2C3_BASE
saloutos 0:083111ae2a11 222 if (obj_s->i2c == I2C_3) {
saloutos 0:083111ae2a11 223 __HAL_RCC_I2C3_FORCE_RESET();
saloutos 0:083111ae2a11 224 __HAL_RCC_I2C3_RELEASE_RESET();
saloutos 0:083111ae2a11 225 }
saloutos 0:083111ae2a11 226 #endif
saloutos 0:083111ae2a11 227 #if defined I2C4_BASE
saloutos 0:083111ae2a11 228 if (obj_s->i2c == I2C_4) {
saloutos 0:083111ae2a11 229 __HAL_RCC_I2C4_FORCE_RESET();
saloutos 0:083111ae2a11 230 __HAL_RCC_I2C4_RELEASE_RESET();
saloutos 0:083111ae2a11 231 }
saloutos 0:083111ae2a11 232 #endif
saloutos 0:083111ae2a11 233 #if defined FMPI2C1_BASE
saloutos 0:083111ae2a11 234 if (obj_s->i2c == FMPI2C_1) {
saloutos 0:083111ae2a11 235 __HAL_RCC_FMPI2C1_FORCE_RESET();
saloutos 0:083111ae2a11 236 __HAL_RCC_FMPI2C1_RELEASE_RESET();
saloutos 0:083111ae2a11 237 }
saloutos 0:083111ae2a11 238 #endif
saloutos 0:083111ae2a11 239 }
saloutos 0:083111ae2a11 240
saloutos 0:083111ae2a11 241 void i2c_sw_reset(i2c_t *obj)
saloutos 0:083111ae2a11 242 {
saloutos 0:083111ae2a11 243 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 244 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 245 /* SW reset procedure:
saloutos 0:083111ae2a11 246 * PE must be kept low during at least 3 APB clock cycles
saloutos 0:083111ae2a11 247 * in order to perform the software reset.
saloutos 0:083111ae2a11 248 * This is ensured by writing the following software sequence:
saloutos 0:083111ae2a11 249 * - Write PE=0
saloutos 0:083111ae2a11 250 * - Check PE=0
saloutos 0:083111ae2a11 251 * - Write PE=1.
saloutos 0:083111ae2a11 252 */
saloutos 0:083111ae2a11 253 handle->Instance->CR1 &= ~I2C_CR1_PE;
saloutos 0:083111ae2a11 254 while(handle->Instance->CR1 & I2C_CR1_PE);
saloutos 0:083111ae2a11 255 handle->Instance->CR1 |= I2C_CR1_PE;
saloutos 0:083111ae2a11 256 }
saloutos 0:083111ae2a11 257
saloutos 0:083111ae2a11 258 void i2c_init(i2c_t *obj, PinName sda, PinName scl) {
saloutos 0:083111ae2a11 259
saloutos 0:083111ae2a11 260 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 261
saloutos 0:083111ae2a11 262 // Determine the I2C to use
saloutos 0:083111ae2a11 263 I2CName i2c_sda = (I2CName)pinmap_peripheral(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 264 I2CName i2c_scl = (I2CName)pinmap_peripheral(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 265 obj_s->sda = sda;
saloutos 0:083111ae2a11 266 obj_s->scl = scl;
saloutos 0:083111ae2a11 267
saloutos 0:083111ae2a11 268 obj_s->i2c = (I2CName)pinmap_merge(i2c_sda, i2c_scl);
saloutos 0:083111ae2a11 269 MBED_ASSERT(obj_s->i2c != (I2CName)NC);
saloutos 0:083111ae2a11 270
saloutos 0:083111ae2a11 271 #if defined I2C1_BASE
saloutos 0:083111ae2a11 272 // Enable I2C1 clock and pinout if not done
saloutos 0:083111ae2a11 273 if (obj_s->i2c == I2C_1) {
saloutos 0:083111ae2a11 274 obj_s->index = 0;
saloutos 0:083111ae2a11 275 __HAL_RCC_I2C1_CLK_ENABLE();
saloutos 0:083111ae2a11 276 // Configure I2C pins
saloutos 0:083111ae2a11 277 pinmap_pinout(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 278 pinmap_pinout(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 279 pin_mode(sda, OpenDrainPullUp);
saloutos 0:083111ae2a11 280 pin_mode(scl, OpenDrainPullUp);
saloutos 0:083111ae2a11 281 obj_s->event_i2cIRQ = I2C1_EV_IRQn;
saloutos 0:083111ae2a11 282 obj_s->error_i2cIRQ = I2C1_ER_IRQn;
saloutos 0:083111ae2a11 283 }
saloutos 0:083111ae2a11 284 #endif
saloutos 0:083111ae2a11 285 #if defined I2C2_BASE
saloutos 0:083111ae2a11 286 // Enable I2C2 clock and pinout if not done
saloutos 0:083111ae2a11 287 if (obj_s->i2c == I2C_2) {
saloutos 0:083111ae2a11 288 obj_s->index = 1;
saloutos 0:083111ae2a11 289 __HAL_RCC_I2C2_CLK_ENABLE();
saloutos 0:083111ae2a11 290 // Configure I2C pins
saloutos 0:083111ae2a11 291 pinmap_pinout(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 292 pinmap_pinout(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 293 pin_mode(sda, OpenDrainPullUp);
saloutos 0:083111ae2a11 294 pin_mode(scl, OpenDrainPullUp);
saloutos 0:083111ae2a11 295 obj_s->event_i2cIRQ = I2C2_EV_IRQn;
saloutos 0:083111ae2a11 296 obj_s->error_i2cIRQ = I2C2_ER_IRQn;
saloutos 0:083111ae2a11 297 }
saloutos 0:083111ae2a11 298 #endif
saloutos 0:083111ae2a11 299 #if defined I2C3_BASE
saloutos 0:083111ae2a11 300 // Enable I2C3 clock and pinout if not done
saloutos 0:083111ae2a11 301 if (obj_s->i2c == I2C_3) {
saloutos 0:083111ae2a11 302 obj_s->index = 2;
saloutos 0:083111ae2a11 303 __HAL_RCC_I2C3_CLK_ENABLE();
saloutos 0:083111ae2a11 304 // Configure I2C pins
saloutos 0:083111ae2a11 305 pinmap_pinout(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 306 pinmap_pinout(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 307 pin_mode(sda, OpenDrainPullUp);
saloutos 0:083111ae2a11 308 pin_mode(scl, OpenDrainPullUp);
saloutos 0:083111ae2a11 309 obj_s->event_i2cIRQ = I2C3_EV_IRQn;
saloutos 0:083111ae2a11 310 obj_s->error_i2cIRQ = I2C3_ER_IRQn;
saloutos 0:083111ae2a11 311 }
saloutos 0:083111ae2a11 312 #endif
saloutos 0:083111ae2a11 313 #if defined I2C4_BASE
saloutos 0:083111ae2a11 314 // Enable I2C3 clock and pinout if not done
saloutos 0:083111ae2a11 315 if (obj_s->i2c == I2C_4) {
saloutos 0:083111ae2a11 316 obj_s->index = 3;
saloutos 0:083111ae2a11 317 __HAL_RCC_I2C4_CLK_ENABLE();
saloutos 0:083111ae2a11 318 // Configure I2C pins
saloutos 0:083111ae2a11 319 pinmap_pinout(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 320 pinmap_pinout(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 321 pin_mode(sda, OpenDrainPullUp);
saloutos 0:083111ae2a11 322 pin_mode(scl, OpenDrainPullUp);
saloutos 0:083111ae2a11 323 obj_s->event_i2cIRQ = I2C4_EV_IRQn;
saloutos 0:083111ae2a11 324 obj_s->error_i2cIRQ = I2C4_ER_IRQn;
saloutos 0:083111ae2a11 325 }
saloutos 0:083111ae2a11 326 #endif
saloutos 0:083111ae2a11 327 #if defined FMPI2C1_BASE
saloutos 0:083111ae2a11 328 // Enable I2C3 clock and pinout if not done
saloutos 0:083111ae2a11 329 if (obj_s->i2c == FMPI2C_1) {
saloutos 0:083111ae2a11 330 obj_s->index = 4;
saloutos 0:083111ae2a11 331 __HAL_RCC_FMPI2C1_CLK_ENABLE();
saloutos 0:083111ae2a11 332 // Configure I2C pins
saloutos 0:083111ae2a11 333 pinmap_pinout(sda, PinMap_I2C_SDA);
saloutos 0:083111ae2a11 334 pinmap_pinout(scl, PinMap_I2C_SCL);
saloutos 0:083111ae2a11 335 pin_mode(sda, OpenDrainPullUp);
saloutos 0:083111ae2a11 336 pin_mode(scl, OpenDrainPullUp);
saloutos 0:083111ae2a11 337 obj_s->event_i2cIRQ = FMPI2C1_EV_IRQn;
saloutos 0:083111ae2a11 338 obj_s->error_i2cIRQ = FMPI2C1_ER_IRQn;
saloutos 0:083111ae2a11 339 }
saloutos 0:083111ae2a11 340 #endif
saloutos 0:083111ae2a11 341
saloutos 0:083111ae2a11 342 // I2C configuration
saloutos 0:083111ae2a11 343 // Default hz value used for timeout computation
saloutos 0:083111ae2a11 344 if(!obj_s->hz)
saloutos 0:083111ae2a11 345 obj_s->hz = 100000; // 100 kHz per default
saloutos 0:083111ae2a11 346
saloutos 0:083111ae2a11 347 // Reset to clear pending flags if any
saloutos 0:083111ae2a11 348 i2c_hw_reset(obj);
saloutos 0:083111ae2a11 349 i2c_frequency(obj, obj_s->hz );
saloutos 0:083111ae2a11 350
saloutos 0:083111ae2a11 351 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 352 // I2C master by default
saloutos 0:083111ae2a11 353 obj_s->slave = 0;
saloutos 0:083111ae2a11 354 obj_s->pending_slave_tx_master_rx = 0;
saloutos 0:083111ae2a11 355 obj_s->pending_slave_rx_maxter_tx = 0;
saloutos 0:083111ae2a11 356 #endif
saloutos 0:083111ae2a11 357
saloutos 0:083111ae2a11 358 // I2C Xfer operation init
saloutos 0:083111ae2a11 359 obj_s->event = 0;
saloutos 0:083111ae2a11 360 obj_s->XferOperation = I2C_FIRST_AND_LAST_FRAME;
saloutos 0:083111ae2a11 361 #ifdef I2C_IP_VERSION_V2
saloutos 0:083111ae2a11 362 obj_s->pending_start = 0;
saloutos 0:083111ae2a11 363 #endif
saloutos 0:083111ae2a11 364 }
saloutos 0:083111ae2a11 365
saloutos 0:083111ae2a11 366 void i2c_frequency(i2c_t *obj, int hz)
saloutos 0:083111ae2a11 367 {
saloutos 0:083111ae2a11 368 int timeout;
saloutos 0:083111ae2a11 369 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 370 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 371
saloutos 0:083111ae2a11 372 // wait before init
saloutos 0:083111ae2a11 373 timeout = BYTE_TIMEOUT;
saloutos 0:083111ae2a11 374 while ((__HAL_I2C_GET_FLAG(handle, I2C_FLAG_BUSY)) && (--timeout != 0));
saloutos 0:083111ae2a11 375
saloutos 0:083111ae2a11 376 #ifdef I2C_IP_VERSION_V1
saloutos 0:083111ae2a11 377 handle->Init.ClockSpeed = hz;
saloutos 0:083111ae2a11 378 handle->Init.DutyCycle = I2C_DUTYCYCLE_2;
saloutos 0:083111ae2a11 379 #endif
saloutos 0:083111ae2a11 380 #ifdef I2C_IP_VERSION_V2
saloutos 0:083111ae2a11 381 /* Only predefined timing for below frequencies are supported */
saloutos 0:083111ae2a11 382 MBED_ASSERT((hz == 100000) || (hz == 400000) || (hz == 1000000));
saloutos 0:083111ae2a11 383 handle->Init.Timing = get_i2c_timing(hz);
saloutos 0:083111ae2a11 384
saloutos 0:083111ae2a11 385 // Enable the Fast Mode Plus capability
saloutos 0:083111ae2a11 386 if (hz == 1000000) {
saloutos 0:083111ae2a11 387 #if defined(I2C1_BASE) && defined(__HAL_SYSCFG_FASTMODEPLUS_ENABLE) && defined (I2C_FASTMODEPLUS_I2C1)
saloutos 0:083111ae2a11 388 if (obj_s->i2c == I2C_1) {
saloutos 0:083111ae2a11 389 HAL_I2CEx_EnableFastModePlus(I2C_FASTMODEPLUS_I2C1);
saloutos 0:083111ae2a11 390 }
saloutos 0:083111ae2a11 391 #endif
saloutos 0:083111ae2a11 392 #if defined(I2C2_BASE) && defined(__HAL_SYSCFG_FASTMODEPLUS_ENABLE) && defined (I2C_FASTMODEPLUS_I2C2)
saloutos 0:083111ae2a11 393 if (obj_s->i2c == I2C_2) {
saloutos 0:083111ae2a11 394 HAL_I2CEx_EnableFastModePlus(I2C_FASTMODEPLUS_I2C2);
saloutos 0:083111ae2a11 395 }
saloutos 0:083111ae2a11 396 #endif
saloutos 0:083111ae2a11 397 #if defined(I2C3_BASE) && defined(__HAL_SYSCFG_FASTMODEPLUS_ENABLE) && defined (I2C_FASTMODEPLUS_I2C3)
saloutos 0:083111ae2a11 398 if (obj_s->i2c == I2C_3) {
saloutos 0:083111ae2a11 399 HAL_I2CEx_EnableFastModePlus(I2C_FASTMODEPLUS_I2C3);
saloutos 0:083111ae2a11 400 }
saloutos 0:083111ae2a11 401 #endif
saloutos 0:083111ae2a11 402 #if defined(I2C4_BASE) && defined(__HAL_SYSCFG_FASTMODEPLUS_ENABLE) && defined (I2C_FASTMODEPLUS_I2C4)
saloutos 0:083111ae2a11 403 if (obj_s->i2c == I2C_4) {
saloutos 0:083111ae2a11 404 HAL_I2CEx_EnableFastModePlus(I2C_FASTMODEPLUS_I2C4);
saloutos 0:083111ae2a11 405 }
saloutos 0:083111ae2a11 406 #endif
saloutos 0:083111ae2a11 407 }
saloutos 0:083111ae2a11 408 #endif //I2C_IP_VERSION_V2
saloutos 0:083111ae2a11 409
saloutos 0:083111ae2a11 410 /*##-1- Configure the I2C clock source. The clock is derived from the SYSCLK #*/
saloutos 0:083111ae2a11 411 #if defined(I2C1_BASE) && defined (__HAL_RCC_I2C1_CONFIG)
saloutos 0:083111ae2a11 412 if (obj_s->i2c == I2C_1) {
saloutos 0:083111ae2a11 413 __HAL_RCC_I2C1_CONFIG(I2CAPI_I2C1_CLKSRC);
saloutos 0:083111ae2a11 414 }
saloutos 0:083111ae2a11 415 #endif
saloutos 0:083111ae2a11 416 #if defined(I2C2_BASE) && defined(__HAL_RCC_I2C2_CONFIG)
saloutos 0:083111ae2a11 417 if (obj_s->i2c == I2C_2) {
saloutos 0:083111ae2a11 418 __HAL_RCC_I2C2_CONFIG(I2CAPI_I2C2_CLKSRC);
saloutos 0:083111ae2a11 419 }
saloutos 0:083111ae2a11 420 #endif
saloutos 0:083111ae2a11 421 #if defined(I2C3_BASE) && defined(__HAL_RCC_I2C3_CONFIG)
saloutos 0:083111ae2a11 422 if (obj_s->i2c == I2C_3) {
saloutos 0:083111ae2a11 423 __HAL_RCC_I2C3_CONFIG(I2CAPI_I2C3_CLKSRC);
saloutos 0:083111ae2a11 424 }
saloutos 0:083111ae2a11 425 #endif
saloutos 0:083111ae2a11 426 #if defined(I2C4_BASE) && defined(__HAL_RCC_I2C4_CONFIG)
saloutos 0:083111ae2a11 427 if (obj_s->i2c == I2C_4) {
saloutos 0:083111ae2a11 428 __HAL_RCC_I2C4_CONFIG(I2CAPI_I2C4_CLKSRC);
saloutos 0:083111ae2a11 429 }
saloutos 0:083111ae2a11 430 #endif
saloutos 0:083111ae2a11 431
saloutos 0:083111ae2a11 432 #ifdef I2C_ANALOGFILTER_ENABLE
saloutos 0:083111ae2a11 433 /* Enable the Analog I2C Filter */
saloutos 0:083111ae2a11 434 HAL_I2CEx_AnalogFilter_Config(handle,I2C_ANALOGFILTER_ENABLE);
saloutos 0:083111ae2a11 435 #endif
saloutos 0:083111ae2a11 436
saloutos 0:083111ae2a11 437 // I2C configuration
saloutos 0:083111ae2a11 438 handle->Init.AddressingMode = I2C_ADDRESSINGMODE_7BIT;
saloutos 0:083111ae2a11 439 handle->Init.DualAddressMode = I2C_DUALADDRESS_DISABLE;
saloutos 0:083111ae2a11 440 handle->Init.GeneralCallMode = I2C_GENERALCALL_DISABLE;
saloutos 0:083111ae2a11 441 handle->Init.NoStretchMode = I2C_NOSTRETCH_DISABLE;
saloutos 0:083111ae2a11 442 handle->Init.OwnAddress1 = 0;
saloutos 0:083111ae2a11 443 handle->Init.OwnAddress2 = 0;
saloutos 0:083111ae2a11 444 HAL_I2C_Init(handle);
saloutos 0:083111ae2a11 445
saloutos 0:083111ae2a11 446 /* store frequency for timeout computation */
saloutos 0:083111ae2a11 447 obj_s->hz = hz;
saloutos 0:083111ae2a11 448 }
saloutos 0:083111ae2a11 449
saloutos 0:083111ae2a11 450 i2c_t *get_i2c_obj(I2C_HandleTypeDef *hi2c){
saloutos 0:083111ae2a11 451 /* Aim of the function is to get i2c_s pointer using hi2c pointer */
saloutos 0:083111ae2a11 452 /* Highly inspired from magical linux kernel's "container_of" */
saloutos 0:083111ae2a11 453 /* (which was not directly used since not compatible with IAR toolchain) */
saloutos 0:083111ae2a11 454 struct i2c_s *obj_s;
saloutos 0:083111ae2a11 455 i2c_t *obj;
saloutos 0:083111ae2a11 456
saloutos 0:083111ae2a11 457 obj_s = (struct i2c_s *)( (char *)hi2c - offsetof(struct i2c_s,handle));
saloutos 0:083111ae2a11 458 obj = (i2c_t *)( (char *)obj_s - offsetof(i2c_t,i2c));
saloutos 0:083111ae2a11 459
saloutos 0:083111ae2a11 460 return (obj);
saloutos 0:083111ae2a11 461 }
saloutos 0:083111ae2a11 462
saloutos 0:083111ae2a11 463 void i2c_reset(i2c_t *obj) {
saloutos 0:083111ae2a11 464 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 465 /* As recommended in i2c_api.h, mainly send stop */
saloutos 0:083111ae2a11 466 i2c_stop(obj);
saloutos 0:083111ae2a11 467 /* then re-init */
saloutos 0:083111ae2a11 468 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 469 }
saloutos 0:083111ae2a11 470
saloutos 0:083111ae2a11 471 /*
saloutos 0:083111ae2a11 472 * UNITARY APIS.
saloutos 0:083111ae2a11 473 * For very basic operations, direct registers access is needed
saloutos 0:083111ae2a11 474 * There are 2 different IPs version that need to be supported
saloutos 0:083111ae2a11 475 */
saloutos 0:083111ae2a11 476 #ifdef I2C_IP_VERSION_V1
saloutos 0:083111ae2a11 477 int i2c_start(i2c_t *obj) {
saloutos 0:083111ae2a11 478
saloutos 0:083111ae2a11 479 int timeout;
saloutos 0:083111ae2a11 480 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 481 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 482
saloutos 0:083111ae2a11 483 // Clear Acknowledge failure flag
saloutos 0:083111ae2a11 484 __HAL_I2C_CLEAR_FLAG(handle, I2C_FLAG_AF);
saloutos 0:083111ae2a11 485
saloutos 0:083111ae2a11 486 // Wait the STOP condition has been previously correctly sent
saloutos 0:083111ae2a11 487 // This timeout can be avoid in some specific cases by simply clearing the STOP bit
saloutos 0:083111ae2a11 488 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 489 while ((handle->Instance->CR1 & I2C_CR1_STOP) == I2C_CR1_STOP) {
saloutos 0:083111ae2a11 490 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 491 return 1;
saloutos 0:083111ae2a11 492 }
saloutos 0:083111ae2a11 493 }
saloutos 0:083111ae2a11 494
saloutos 0:083111ae2a11 495 // Generate the START condition
saloutos 0:083111ae2a11 496 handle->Instance->CR1 |= I2C_CR1_START;
saloutos 0:083111ae2a11 497
saloutos 0:083111ae2a11 498 // Wait the START condition has been correctly sent
saloutos 0:083111ae2a11 499 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 500 while (__HAL_I2C_GET_FLAG(handle, I2C_FLAG_SB) == RESET) {
saloutos 0:083111ae2a11 501 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 502 return 1;
saloutos 0:083111ae2a11 503 }
saloutos 0:083111ae2a11 504 }
saloutos 0:083111ae2a11 505
saloutos 0:083111ae2a11 506 return 0;
saloutos 0:083111ae2a11 507 }
saloutos 0:083111ae2a11 508
saloutos 0:083111ae2a11 509 int i2c_stop(i2c_t *obj) {
saloutos 0:083111ae2a11 510 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 511 I2C_TypeDef *i2c = (I2C_TypeDef *)obj_s->i2c;
saloutos 0:083111ae2a11 512
saloutos 0:083111ae2a11 513 // Generate the STOP condition
saloutos 0:083111ae2a11 514 i2c->CR1 |= I2C_CR1_STOP;
saloutos 0:083111ae2a11 515
saloutos 0:083111ae2a11 516 /* In case of mixed usage of the APIs (unitary + SYNC)
saloutos 0:083111ae2a11 517 * re-init HAL state
saloutos 0:083111ae2a11 518 */
saloutos 0:083111ae2a11 519 if(obj_s->XferOperation != I2C_FIRST_AND_LAST_FRAME)
saloutos 0:083111ae2a11 520 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 521
saloutos 0:083111ae2a11 522 return 0;
saloutos 0:083111ae2a11 523 }
saloutos 0:083111ae2a11 524
saloutos 0:083111ae2a11 525 int i2c_byte_read(i2c_t *obj, int last) {
saloutos 0:083111ae2a11 526
saloutos 0:083111ae2a11 527 int timeout;
saloutos 0:083111ae2a11 528 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 529 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 530
saloutos 0:083111ae2a11 531 if (last) {
saloutos 0:083111ae2a11 532 // Don't acknowledge the last byte
saloutos 0:083111ae2a11 533 handle->Instance->CR1 &= ~I2C_CR1_ACK;
saloutos 0:083111ae2a11 534 } else {
saloutos 0:083111ae2a11 535 // Acknowledge the byte
saloutos 0:083111ae2a11 536 handle->Instance->CR1 |= I2C_CR1_ACK;
saloutos 0:083111ae2a11 537 }
saloutos 0:083111ae2a11 538
saloutos 0:083111ae2a11 539 // Wait until the byte is received
saloutos 0:083111ae2a11 540 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 541 while (__HAL_I2C_GET_FLAG(handle, I2C_FLAG_RXNE) == RESET) {
saloutos 0:083111ae2a11 542 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 543 return -1;
saloutos 0:083111ae2a11 544 }
saloutos 0:083111ae2a11 545 }
saloutos 0:083111ae2a11 546
saloutos 0:083111ae2a11 547 return (int)handle->Instance->DR;
saloutos 0:083111ae2a11 548 }
saloutos 0:083111ae2a11 549
saloutos 0:083111ae2a11 550 int i2c_byte_write(i2c_t *obj, int data) {
saloutos 0:083111ae2a11 551
saloutos 0:083111ae2a11 552 int timeout;
saloutos 0:083111ae2a11 553 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 554 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 555
saloutos 0:083111ae2a11 556 handle->Instance->DR = (uint8_t)data;
saloutos 0:083111ae2a11 557
saloutos 0:083111ae2a11 558 // Wait until the byte (might be the address) is transmitted
saloutos 0:083111ae2a11 559 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 560 while ((__HAL_I2C_GET_FLAG(handle, I2C_FLAG_TXE) == RESET) &&
saloutos 0:083111ae2a11 561 (__HAL_I2C_GET_FLAG(handle, I2C_FLAG_BTF) == RESET) &&
saloutos 0:083111ae2a11 562 (__HAL_I2C_GET_FLAG(handle, I2C_FLAG_ADDR) == RESET)) {
saloutos 0:083111ae2a11 563 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 564 return 2;
saloutos 0:083111ae2a11 565 }
saloutos 0:083111ae2a11 566 }
saloutos 0:083111ae2a11 567
saloutos 0:083111ae2a11 568 if (__HAL_I2C_GET_FLAG(handle, I2C_FLAG_ADDR) != RESET)
saloutos 0:083111ae2a11 569 {
saloutos 0:083111ae2a11 570 __HAL_I2C_CLEAR_ADDRFLAG(handle);
saloutos 0:083111ae2a11 571 }
saloutos 0:083111ae2a11 572
saloutos 0:083111ae2a11 573 return 1;
saloutos 0:083111ae2a11 574 }
saloutos 0:083111ae2a11 575 #endif //I2C_IP_VERSION_V1
saloutos 0:083111ae2a11 576 #ifdef I2C_IP_VERSION_V2
saloutos 0:083111ae2a11 577
saloutos 0:083111ae2a11 578 int i2c_start(i2c_t *obj) {
saloutos 0:083111ae2a11 579 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 580 /* This I2C IP doesn't */
saloutos 0:083111ae2a11 581 obj_s->pending_start = 1;
saloutos 0:083111ae2a11 582 return 0;
saloutos 0:083111ae2a11 583 }
saloutos 0:083111ae2a11 584
saloutos 0:083111ae2a11 585 int i2c_stop(i2c_t *obj) {
saloutos 0:083111ae2a11 586 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 587 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 588 int timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 589 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 590 if (obj_s->slave) {
saloutos 0:083111ae2a11 591 /* re-init slave when stop is requested */
saloutos 0:083111ae2a11 592 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 593 return 0;
saloutos 0:083111ae2a11 594 }
saloutos 0:083111ae2a11 595 #endif
saloutos 0:083111ae2a11 596 // Disable reload mode
saloutos 0:083111ae2a11 597 handle->Instance->CR2 &= (uint32_t)~I2C_CR2_RELOAD;
saloutos 0:083111ae2a11 598 // Generate the STOP condition
saloutos 0:083111ae2a11 599 handle->Instance->CR2 |= I2C_CR2_STOP;
saloutos 0:083111ae2a11 600
saloutos 0:083111ae2a11 601 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 602 while (!__HAL_I2C_GET_FLAG(handle, I2C_FLAG_STOPF)) {
saloutos 0:083111ae2a11 603 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 604 return I2C_ERROR_BUS_BUSY;
saloutos 0:083111ae2a11 605 }
saloutos 0:083111ae2a11 606 }
saloutos 0:083111ae2a11 607
saloutos 0:083111ae2a11 608 /* Clear STOP Flag */
saloutos 0:083111ae2a11 609 __HAL_I2C_CLEAR_FLAG(handle, I2C_FLAG_STOPF);
saloutos 0:083111ae2a11 610
saloutos 0:083111ae2a11 611 /* Erase slave address, this wiil be used as a marker
saloutos 0:083111ae2a11 612 * to know when we need to prepare next start */
saloutos 0:083111ae2a11 613 handle->Instance->CR2 &= ~I2C_CR2_SADD;
saloutos 0:083111ae2a11 614
saloutos 0:083111ae2a11 615 /*
saloutos 0:083111ae2a11 616 * V2 IP is meant for automatic STOP, not user STOP
saloutos 0:083111ae2a11 617 * SW reset the IP state machine before next transaction
saloutos 0:083111ae2a11 618 */
saloutos 0:083111ae2a11 619 i2c_sw_reset(obj);
saloutos 0:083111ae2a11 620
saloutos 0:083111ae2a11 621 /* In case of mixed usage of the APIs (unitary + SYNC)
saloutos 0:083111ae2a11 622 * re-init HAL state */
saloutos 0:083111ae2a11 623 if (obj_s->XferOperation != I2C_FIRST_AND_LAST_FRAME) {
saloutos 0:083111ae2a11 624 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 625 }
saloutos 0:083111ae2a11 626
saloutos 0:083111ae2a11 627 return 0;
saloutos 0:083111ae2a11 628 }
saloutos 0:083111ae2a11 629
saloutos 0:083111ae2a11 630 int i2c_byte_read(i2c_t *obj, int last) {
saloutos 0:083111ae2a11 631 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 632 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 633 int timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 634 uint32_t tmpreg = handle->Instance->CR2;
saloutos 0:083111ae2a11 635 char data;
saloutos 0:083111ae2a11 636 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 637 if (obj_s->slave) {
saloutos 0:083111ae2a11 638 return i2c_slave_read(obj, &data, 1);
saloutos 0:083111ae2a11 639 }
saloutos 0:083111ae2a11 640 #endif
saloutos 0:083111ae2a11 641 /* Then send data when there's room in the TX fifo */
saloutos 0:083111ae2a11 642 if ((tmpreg & I2C_CR2_RELOAD) != 0) {
saloutos 0:083111ae2a11 643 while (!__HAL_I2C_GET_FLAG(handle, I2C_FLAG_TCR)) {
saloutos 0:083111ae2a11 644 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 645 DEBUG_PRINTF("timeout in byte_read\r\n");
saloutos 0:083111ae2a11 646 return -1;
saloutos 0:083111ae2a11 647 }
saloutos 0:083111ae2a11 648 }
saloutos 0:083111ae2a11 649 }
saloutos 0:083111ae2a11 650
saloutos 0:083111ae2a11 651 /* Enable reload mode as we don't know how many bytes will be sent */
saloutos 0:083111ae2a11 652 /* and set transfer size to 1 */
saloutos 0:083111ae2a11 653 tmpreg |= I2C_CR2_RELOAD | (I2C_CR2_NBYTES & (1 << 16));
saloutos 0:083111ae2a11 654 /* Set the prepared configuration */
saloutos 0:083111ae2a11 655 handle->Instance->CR2 = tmpreg;
saloutos 0:083111ae2a11 656
saloutos 0:083111ae2a11 657 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 658 while (!__HAL_I2C_GET_FLAG(handle, I2C_FLAG_RXNE)) {
saloutos 0:083111ae2a11 659 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 660 return -1;
saloutos 0:083111ae2a11 661 }
saloutos 0:083111ae2a11 662 }
saloutos 0:083111ae2a11 663
saloutos 0:083111ae2a11 664 /* Then Get Byte */
saloutos 0:083111ae2a11 665 data = handle->Instance->RXDR;
saloutos 0:083111ae2a11 666
saloutos 0:083111ae2a11 667 if (last) {
saloutos 0:083111ae2a11 668 /* Disable Address Acknowledge */
saloutos 0:083111ae2a11 669 handle->Instance->CR2 |= I2C_CR2_NACK;
saloutos 0:083111ae2a11 670 }
saloutos 0:083111ae2a11 671
saloutos 0:083111ae2a11 672 return data;
saloutos 0:083111ae2a11 673 }
saloutos 0:083111ae2a11 674
saloutos 0:083111ae2a11 675 int i2c_byte_write(i2c_t *obj, int data) {
saloutos 0:083111ae2a11 676 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 677 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 678 int timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 679 uint32_t tmpreg = handle->Instance->CR2;
saloutos 0:083111ae2a11 680 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 681 if (obj_s->slave) {
saloutos 0:083111ae2a11 682 return i2c_slave_write(obj, (char *) &data, 1);
saloutos 0:083111ae2a11 683 }
saloutos 0:083111ae2a11 684 #endif
saloutos 0:083111ae2a11 685 if (obj_s->pending_start) {
saloutos 0:083111ae2a11 686 obj_s->pending_start = 0;
saloutos 0:083111ae2a11 687 //* First byte after the start is the address */
saloutos 0:083111ae2a11 688 tmpreg |= (uint32_t)((uint32_t)data & I2C_CR2_SADD);
saloutos 0:083111ae2a11 689 if (data & 0x01) {
saloutos 0:083111ae2a11 690 tmpreg |= I2C_CR2_START | I2C_CR2_RD_WRN;
saloutos 0:083111ae2a11 691 } else {
saloutos 0:083111ae2a11 692 tmpreg |= I2C_CR2_START;
saloutos 0:083111ae2a11 693 tmpreg &= ~I2C_CR2_RD_WRN;
saloutos 0:083111ae2a11 694 }
saloutos 0:083111ae2a11 695 /* Disable reload first to use it later */
saloutos 0:083111ae2a11 696 tmpreg &= ~I2C_CR2_RELOAD;
saloutos 0:083111ae2a11 697 /* Disable Autoend */
saloutos 0:083111ae2a11 698 tmpreg &= ~I2C_CR2_AUTOEND;
saloutos 0:083111ae2a11 699 /* Do not set any transfer size for now */
saloutos 0:083111ae2a11 700 tmpreg |= (I2C_CR2_NBYTES & (1 << 16));
saloutos 0:083111ae2a11 701 /* Set the prepared configuration */
saloutos 0:083111ae2a11 702 handle->Instance->CR2 = tmpreg;
saloutos 0:083111ae2a11 703 } else {
saloutos 0:083111ae2a11 704 /* Set the prepared configuration */
saloutos 0:083111ae2a11 705 tmpreg = handle->Instance->CR2;
saloutos 0:083111ae2a11 706
saloutos 0:083111ae2a11 707 /* Then send data when there's room in the TX fifo */
saloutos 0:083111ae2a11 708 if ((tmpreg & I2C_CR2_RELOAD) != 0) {
saloutos 0:083111ae2a11 709 while (!__HAL_I2C_GET_FLAG(handle, I2C_FLAG_TCR)) {
saloutos 0:083111ae2a11 710 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 711 DEBUG_PRINTF("timeout in byte_write\r\n");
saloutos 0:083111ae2a11 712 return 2;
saloutos 0:083111ae2a11 713 }
saloutos 0:083111ae2a11 714 }
saloutos 0:083111ae2a11 715 }
saloutos 0:083111ae2a11 716 /* Enable reload mode as we don't know how many bytes will eb sent */
saloutos 0:083111ae2a11 717 tmpreg |= I2C_CR2_RELOAD;
saloutos 0:083111ae2a11 718 /* Set transfer size to 1 */
saloutos 0:083111ae2a11 719 tmpreg |= (I2C_CR2_NBYTES & (1 << 16));
saloutos 0:083111ae2a11 720 /* Set the prepared configuration */
saloutos 0:083111ae2a11 721 handle->Instance->CR2 = tmpreg;
saloutos 0:083111ae2a11 722 /* Prepare next write */
saloutos 0:083111ae2a11 723 timeout = FLAG_TIMEOUT;
saloutos 0:083111ae2a11 724 while (!__HAL_I2C_GET_FLAG(handle, I2C_FLAG_TXE)) {
saloutos 0:083111ae2a11 725 if ((timeout--) == 0) {
saloutos 0:083111ae2a11 726 return 2;
saloutos 0:083111ae2a11 727 }
saloutos 0:083111ae2a11 728 }
saloutos 0:083111ae2a11 729 /* Write byte */
saloutos 0:083111ae2a11 730 handle->Instance->TXDR = data;
saloutos 0:083111ae2a11 731 }
saloutos 0:083111ae2a11 732
saloutos 0:083111ae2a11 733 return 1;
saloutos 0:083111ae2a11 734 }
saloutos 0:083111ae2a11 735 #endif //I2C_IP_VERSION_V2
saloutos 0:083111ae2a11 736
saloutos 0:083111ae2a11 737 /*
saloutos 0:083111ae2a11 738 * SYNC APIS
saloutos 0:083111ae2a11 739 */
saloutos 0:083111ae2a11 740 int i2c_read(i2c_t *obj, int address, char *data, int length, int stop) {
saloutos 0:083111ae2a11 741 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 742 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 743 int count = I2C_ERROR_BUS_BUSY, ret = 0;
saloutos 0:083111ae2a11 744 uint32_t timeout = 0;
saloutos 0:083111ae2a11 745
saloutos 0:083111ae2a11 746 if ((obj_s->XferOperation == I2C_FIRST_AND_LAST_FRAME) ||
saloutos 0:083111ae2a11 747 (obj_s->XferOperation == I2C_LAST_FRAME)) {
saloutos 0:083111ae2a11 748 if (stop)
saloutos 0:083111ae2a11 749 obj_s->XferOperation = I2C_FIRST_AND_LAST_FRAME;
saloutos 0:083111ae2a11 750 else
saloutos 0:083111ae2a11 751 obj_s->XferOperation = I2C_FIRST_FRAME;
saloutos 0:083111ae2a11 752 } else if ((obj_s->XferOperation == I2C_FIRST_FRAME) ||
saloutos 0:083111ae2a11 753 (obj_s->XferOperation == I2C_NEXT_FRAME)) {
saloutos 0:083111ae2a11 754 if (stop)
saloutos 0:083111ae2a11 755 obj_s->XferOperation = I2C_LAST_FRAME;
saloutos 0:083111ae2a11 756 else
saloutos 0:083111ae2a11 757 obj_s->XferOperation = I2C_NEXT_FRAME;
saloutos 0:083111ae2a11 758 }
saloutos 0:083111ae2a11 759
saloutos 0:083111ae2a11 760 obj_s->event = 0;
saloutos 0:083111ae2a11 761
saloutos 0:083111ae2a11 762 /* Activate default IRQ handlers for sync mode
saloutos 0:083111ae2a11 763 * which would be overwritten in async mode
saloutos 0:083111ae2a11 764 */
saloutos 0:083111ae2a11 765 i2c_ev_err_enable(obj, i2c_get_irq_handler(obj));
saloutos 0:083111ae2a11 766
saloutos 0:083111ae2a11 767 ret = HAL_I2C_Master_Sequential_Receive_IT(handle, address, (uint8_t *) data, length, obj_s->XferOperation);
saloutos 0:083111ae2a11 768
saloutos 0:083111ae2a11 769 if(ret == HAL_OK) {
saloutos 0:083111ae2a11 770 timeout = BYTE_TIMEOUT_US * (length + 1);
saloutos 0:083111ae2a11 771 /* transfer started : wait completion or timeout */
saloutos 0:083111ae2a11 772 while(!(obj_s->event & I2C_EVENT_ALL) && (--timeout != 0)) {
saloutos 0:083111ae2a11 773 wait_us(1);
saloutos 0:083111ae2a11 774 }
saloutos 0:083111ae2a11 775
saloutos 0:083111ae2a11 776 i2c_ev_err_disable(obj);
saloutos 0:083111ae2a11 777
saloutos 0:083111ae2a11 778 if((timeout == 0) || (obj_s->event != I2C_EVENT_TRANSFER_COMPLETE)) {
saloutos 0:083111ae2a11 779 DEBUG_PRINTF(" TIMEOUT or error in i2c_read\r\n");
saloutos 0:083111ae2a11 780 /* re-init IP to try and get back in a working state */
saloutos 0:083111ae2a11 781 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 782 } else {
saloutos 0:083111ae2a11 783 count = length;
saloutos 0:083111ae2a11 784 }
saloutos 0:083111ae2a11 785 } else {
saloutos 0:083111ae2a11 786 DEBUG_PRINTF("ERROR in i2c_read:%d\r\n", ret);
saloutos 0:083111ae2a11 787 }
saloutos 0:083111ae2a11 788
saloutos 0:083111ae2a11 789 return count;
saloutos 0:083111ae2a11 790 }
saloutos 0:083111ae2a11 791
saloutos 0:083111ae2a11 792 int i2c_write(i2c_t *obj, int address, const char *data, int length, int stop) {
saloutos 0:083111ae2a11 793 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 794 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 795 int count = I2C_ERROR_BUS_BUSY, ret = 0;
saloutos 0:083111ae2a11 796 uint32_t timeout = 0;
saloutos 0:083111ae2a11 797
saloutos 0:083111ae2a11 798 if ((obj_s->XferOperation == I2C_FIRST_AND_LAST_FRAME) ||
saloutos 0:083111ae2a11 799 (obj_s->XferOperation == I2C_LAST_FRAME)) {
saloutos 0:083111ae2a11 800 if (stop)
saloutos 0:083111ae2a11 801 obj_s->XferOperation = I2C_FIRST_AND_LAST_FRAME;
saloutos 0:083111ae2a11 802 else
saloutos 0:083111ae2a11 803 obj_s->XferOperation = I2C_FIRST_FRAME;
saloutos 0:083111ae2a11 804 } else if ((obj_s->XferOperation == I2C_FIRST_FRAME) ||
saloutos 0:083111ae2a11 805 (obj_s->XferOperation == I2C_NEXT_FRAME)) {
saloutos 0:083111ae2a11 806 if (stop)
saloutos 0:083111ae2a11 807 obj_s->XferOperation = I2C_LAST_FRAME;
saloutos 0:083111ae2a11 808 else
saloutos 0:083111ae2a11 809 obj_s->XferOperation = I2C_NEXT_FRAME;
saloutos 0:083111ae2a11 810 }
saloutos 0:083111ae2a11 811
saloutos 0:083111ae2a11 812 obj_s->event = 0;
saloutos 0:083111ae2a11 813
saloutos 0:083111ae2a11 814 i2c_ev_err_enable(obj, i2c_get_irq_handler(obj));
saloutos 0:083111ae2a11 815
saloutos 0:083111ae2a11 816 ret = HAL_I2C_Master_Sequential_Transmit_IT(handle, address, (uint8_t *) data, length, obj_s->XferOperation);
saloutos 0:083111ae2a11 817
saloutos 0:083111ae2a11 818 if(ret == HAL_OK) {
saloutos 0:083111ae2a11 819 timeout = BYTE_TIMEOUT_US * (length + 1);
saloutos 0:083111ae2a11 820 /* transfer started : wait completion or timeout */
saloutos 0:083111ae2a11 821 while(!(obj_s->event & I2C_EVENT_ALL) && (--timeout != 0)) {
saloutos 0:083111ae2a11 822 wait_us(1);
saloutos 0:083111ae2a11 823 }
saloutos 0:083111ae2a11 824
saloutos 0:083111ae2a11 825 i2c_ev_err_disable(obj);
saloutos 0:083111ae2a11 826
saloutos 0:083111ae2a11 827 if((timeout == 0) || (obj_s->event != I2C_EVENT_TRANSFER_COMPLETE)) {
saloutos 0:083111ae2a11 828 DEBUG_PRINTF(" TIMEOUT or error in i2c_write\r\n");
saloutos 0:083111ae2a11 829 /* re-init IP to try and get back in a working state */
saloutos 0:083111ae2a11 830 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 831 } else {
saloutos 0:083111ae2a11 832 count = length;
saloutos 0:083111ae2a11 833 }
saloutos 0:083111ae2a11 834 } else {
saloutos 0:083111ae2a11 835 DEBUG_PRINTF("ERROR in i2c_read\r\n");
saloutos 0:083111ae2a11 836 }
saloutos 0:083111ae2a11 837
saloutos 0:083111ae2a11 838 return count;
saloutos 0:083111ae2a11 839 }
saloutos 0:083111ae2a11 840
saloutos 0:083111ae2a11 841 void HAL_I2C_MasterTxCpltCallback(I2C_HandleTypeDef *hi2c){
saloutos 0:083111ae2a11 842 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 843 i2c_t *obj = get_i2c_obj(hi2c);
saloutos 0:083111ae2a11 844 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 845
saloutos 0:083111ae2a11 846 #if DEVICE_I2C_ASYNCH
saloutos 0:083111ae2a11 847 /* Handle potential Tx/Rx use case */
saloutos 0:083111ae2a11 848 if ((obj->tx_buff.length) && (obj->rx_buff.length)) {
saloutos 0:083111ae2a11 849 if (obj_s->stop) {
saloutos 0:083111ae2a11 850 obj_s->XferOperation = I2C_LAST_FRAME;
saloutos 0:083111ae2a11 851 } else {
saloutos 0:083111ae2a11 852 obj_s->XferOperation = I2C_NEXT_FRAME;
saloutos 0:083111ae2a11 853 }
saloutos 0:083111ae2a11 854
saloutos 0:083111ae2a11 855 HAL_I2C_Master_Sequential_Receive_IT(hi2c, obj_s->address, (uint8_t*)obj->rx_buff.buffer , obj->rx_buff.length, obj_s->XferOperation);
saloutos 0:083111ae2a11 856 }
saloutos 0:083111ae2a11 857 else
saloutos 0:083111ae2a11 858 #endif
saloutos 0:083111ae2a11 859 {
saloutos 0:083111ae2a11 860 /* Set event flag */
saloutos 0:083111ae2a11 861 obj_s->event = I2C_EVENT_TRANSFER_COMPLETE;
saloutos 0:083111ae2a11 862 }
saloutos 0:083111ae2a11 863 }
saloutos 0:083111ae2a11 864
saloutos 0:083111ae2a11 865 void HAL_I2C_MasterRxCpltCallback(I2C_HandleTypeDef *hi2c){
saloutos 0:083111ae2a11 866 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 867 i2c_t *obj = get_i2c_obj(hi2c);
saloutos 0:083111ae2a11 868 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 869
saloutos 0:083111ae2a11 870 /* Set event flag */
saloutos 0:083111ae2a11 871 obj_s->event = I2C_EVENT_TRANSFER_COMPLETE;
saloutos 0:083111ae2a11 872 }
saloutos 0:083111ae2a11 873
saloutos 0:083111ae2a11 874 void HAL_I2C_ErrorCallback(I2C_HandleTypeDef *hi2c){
saloutos 0:083111ae2a11 875 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 876 i2c_t *obj = get_i2c_obj(hi2c);
saloutos 0:083111ae2a11 877 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 878 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 879 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 880 uint32_t address = 0;
saloutos 0:083111ae2a11 881 /* Store address to handle it after reset */
saloutos 0:083111ae2a11 882 if(obj_s->slave)
saloutos 0:083111ae2a11 883 address = handle->Init.OwnAddress1;
saloutos 0:083111ae2a11 884 #endif
saloutos 0:083111ae2a11 885
saloutos 0:083111ae2a11 886 DEBUG_PRINTF("HAL_I2C_ErrorCallback:%d, index=%d\r\n", (int) hi2c->ErrorCode, obj_s->index);
saloutos 0:083111ae2a11 887
saloutos 0:083111ae2a11 888 /* re-init IP to try and get back in a working state */
saloutos 0:083111ae2a11 889 i2c_init(obj, obj_s->sda, obj_s->scl);
saloutos 0:083111ae2a11 890
saloutos 0:083111ae2a11 891 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 892 /* restore slave address */
saloutos 0:083111ae2a11 893 if (address != 0) {
saloutos 0:083111ae2a11 894 obj_s->slave = 1;
saloutos 0:083111ae2a11 895 i2c_slave_address(obj, 0, address, 0);
saloutos 0:083111ae2a11 896 }
saloutos 0:083111ae2a11 897 #endif
saloutos 0:083111ae2a11 898
saloutos 0:083111ae2a11 899 /* Keep Set event flag */
saloutos 0:083111ae2a11 900 obj_s->event = I2C_EVENT_ERROR;
saloutos 0:083111ae2a11 901 }
saloutos 0:083111ae2a11 902
saloutos 0:083111ae2a11 903 #if DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 904 /* SLAVE API FUNCTIONS */
saloutos 0:083111ae2a11 905 void i2c_slave_address(i2c_t *obj, int idx, uint32_t address, uint32_t mask) {
saloutos 0:083111ae2a11 906 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 907 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 908
saloutos 0:083111ae2a11 909 // I2C configuration
saloutos 0:083111ae2a11 910 handle->Init.OwnAddress1 = address;
saloutos 0:083111ae2a11 911 HAL_I2C_Init(handle);
saloutos 0:083111ae2a11 912
saloutos 0:083111ae2a11 913 i2c_ev_err_enable(obj, i2c_get_irq_handler(obj));
saloutos 0:083111ae2a11 914
saloutos 0:083111ae2a11 915 HAL_I2C_EnableListen_IT(handle);
saloutos 0:083111ae2a11 916 }
saloutos 0:083111ae2a11 917
saloutos 0:083111ae2a11 918 void i2c_slave_mode(i2c_t *obj, int enable_slave) {
saloutos 0:083111ae2a11 919
saloutos 0:083111ae2a11 920 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 921 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 922
saloutos 0:083111ae2a11 923 if (enable_slave) {
saloutos 0:083111ae2a11 924 obj_s->slave = 1;
saloutos 0:083111ae2a11 925 HAL_I2C_EnableListen_IT(handle);
saloutos 0:083111ae2a11 926 } else {
saloutos 0:083111ae2a11 927 obj_s->slave = 0;
saloutos 0:083111ae2a11 928 HAL_I2C_DisableListen_IT(handle);
saloutos 0:083111ae2a11 929 }
saloutos 0:083111ae2a11 930 }
saloutos 0:083111ae2a11 931
saloutos 0:083111ae2a11 932 // See I2CSlave.h
saloutos 0:083111ae2a11 933 #define NoData 0 // the slave has not been addressed
saloutos 0:083111ae2a11 934 #define ReadAddressed 1 // the master has requested a read from this slave (slave = transmitter)
saloutos 0:083111ae2a11 935 #define WriteGeneral 2 // the master is writing to all slave
saloutos 0:083111ae2a11 936 #define WriteAddressed 3 // the master is writing to this slave (slave = receiver)
saloutos 0:083111ae2a11 937
saloutos 0:083111ae2a11 938
saloutos 0:083111ae2a11 939 void HAL_I2C_AddrCallback(I2C_HandleTypeDef *hi2c, uint8_t TransferDirection, uint16_t AddrMatchCode) {
saloutos 0:083111ae2a11 940 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 941 i2c_t *obj = get_i2c_obj(hi2c);
saloutos 0:083111ae2a11 942 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 943
saloutos 0:083111ae2a11 944 /* Transfer direction in HAL is from Master point of view */
saloutos 0:083111ae2a11 945 if(TransferDirection == I2C_DIRECTION_RECEIVE) {
saloutos 0:083111ae2a11 946 obj_s->pending_slave_tx_master_rx = 1;
saloutos 0:083111ae2a11 947 }
saloutos 0:083111ae2a11 948
saloutos 0:083111ae2a11 949 if(TransferDirection == I2C_DIRECTION_TRANSMIT) {
saloutos 0:083111ae2a11 950 obj_s->pending_slave_rx_maxter_tx = 1;
saloutos 0:083111ae2a11 951 }
saloutos 0:083111ae2a11 952 }
saloutos 0:083111ae2a11 953
saloutos 0:083111ae2a11 954 void HAL_I2C_SlaveTxCpltCallback(I2C_HandleTypeDef *I2cHandle){
saloutos 0:083111ae2a11 955 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 956 i2c_t *obj = get_i2c_obj(I2cHandle);
saloutos 0:083111ae2a11 957 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 958 obj_s->pending_slave_tx_master_rx = 0;
saloutos 0:083111ae2a11 959 }
saloutos 0:083111ae2a11 960
saloutos 0:083111ae2a11 961 void HAL_I2C_SlaveRxCpltCallback(I2C_HandleTypeDef *I2cHandle){
saloutos 0:083111ae2a11 962 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 963 i2c_t *obj = get_i2c_obj(I2cHandle);
saloutos 0:083111ae2a11 964 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 965 obj_s->pending_slave_rx_maxter_tx = 0;
saloutos 0:083111ae2a11 966 }
saloutos 0:083111ae2a11 967
saloutos 0:083111ae2a11 968 void HAL_I2C_ListenCpltCallback(I2C_HandleTypeDef *hi2c)
saloutos 0:083111ae2a11 969 {
saloutos 0:083111ae2a11 970 /* restart listening for master requests */
saloutos 0:083111ae2a11 971 HAL_I2C_EnableListen_IT(hi2c);
saloutos 0:083111ae2a11 972 }
saloutos 0:083111ae2a11 973
saloutos 0:083111ae2a11 974 int i2c_slave_receive(i2c_t *obj) {
saloutos 0:083111ae2a11 975
saloutos 0:083111ae2a11 976 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 977 int retValue = NoData;
saloutos 0:083111ae2a11 978
saloutos 0:083111ae2a11 979 if(obj_s->pending_slave_rx_maxter_tx) {
saloutos 0:083111ae2a11 980 retValue = WriteAddressed;
saloutos 0:083111ae2a11 981 }
saloutos 0:083111ae2a11 982
saloutos 0:083111ae2a11 983 if(obj_s->pending_slave_tx_master_rx) {
saloutos 0:083111ae2a11 984 retValue = ReadAddressed;
saloutos 0:083111ae2a11 985 }
saloutos 0:083111ae2a11 986
saloutos 0:083111ae2a11 987 return (retValue);
saloutos 0:083111ae2a11 988 }
saloutos 0:083111ae2a11 989
saloutos 0:083111ae2a11 990 int i2c_slave_read(i2c_t *obj, char *data, int length) {
saloutos 0:083111ae2a11 991 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 992 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 993 int count = 0;
saloutos 0:083111ae2a11 994 int ret = 0;
saloutos 0:083111ae2a11 995 uint32_t timeout = 0;
saloutos 0:083111ae2a11 996
saloutos 0:083111ae2a11 997 /* Always use I2C_NEXT_FRAME as slave will just adapt to master requests */
saloutos 0:083111ae2a11 998 ret = HAL_I2C_Slave_Sequential_Receive_IT(handle, (uint8_t *) data, length, I2C_NEXT_FRAME);
saloutos 0:083111ae2a11 999
saloutos 0:083111ae2a11 1000 if(ret == HAL_OK) {
saloutos 0:083111ae2a11 1001 timeout = BYTE_TIMEOUT_US * (length + 1);
saloutos 0:083111ae2a11 1002 while(obj_s->pending_slave_rx_maxter_tx && (--timeout != 0)) {
saloutos 0:083111ae2a11 1003 wait_us(1);
saloutos 0:083111ae2a11 1004 }
saloutos 0:083111ae2a11 1005
saloutos 0:083111ae2a11 1006 if(timeout != 0) {
saloutos 0:083111ae2a11 1007 count = length;
saloutos 0:083111ae2a11 1008 } else {
saloutos 0:083111ae2a11 1009 DEBUG_PRINTF("TIMEOUT or error in i2c_slave_read\r\n");
saloutos 0:083111ae2a11 1010 }
saloutos 0:083111ae2a11 1011 }
saloutos 0:083111ae2a11 1012 return count;
saloutos 0:083111ae2a11 1013 }
saloutos 0:083111ae2a11 1014
saloutos 0:083111ae2a11 1015 int i2c_slave_write(i2c_t *obj, const char *data, int length) {
saloutos 0:083111ae2a11 1016 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1017 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1018 int count = 0;
saloutos 0:083111ae2a11 1019 int ret = 0;
saloutos 0:083111ae2a11 1020 uint32_t timeout = 0;
saloutos 0:083111ae2a11 1021
saloutos 0:083111ae2a11 1022 /* Always use I2C_NEXT_FRAME as slave will just adapt to master requests */
saloutos 0:083111ae2a11 1023 ret = HAL_I2C_Slave_Sequential_Transmit_IT(handle, (uint8_t *) data, length, I2C_NEXT_FRAME);
saloutos 0:083111ae2a11 1024
saloutos 0:083111ae2a11 1025 if(ret == HAL_OK) {
saloutos 0:083111ae2a11 1026 timeout = BYTE_TIMEOUT_US * (length + 1);
saloutos 0:083111ae2a11 1027 while(obj_s->pending_slave_tx_master_rx && (--timeout != 0)) {
saloutos 0:083111ae2a11 1028 wait_us(1);
saloutos 0:083111ae2a11 1029 }
saloutos 0:083111ae2a11 1030
saloutos 0:083111ae2a11 1031 if(timeout != 0) {
saloutos 0:083111ae2a11 1032 count = length;
saloutos 0:083111ae2a11 1033 } else {
saloutos 0:083111ae2a11 1034 DEBUG_PRINTF("TIMEOUT or error in i2c_slave_write\r\n");
saloutos 0:083111ae2a11 1035 }
saloutos 0:083111ae2a11 1036 }
saloutos 0:083111ae2a11 1037
saloutos 0:083111ae2a11 1038 return count;
saloutos 0:083111ae2a11 1039 }
saloutos 0:083111ae2a11 1040 #endif // DEVICE_I2CSLAVE
saloutos 0:083111ae2a11 1041
saloutos 0:083111ae2a11 1042 #if DEVICE_I2C_ASYNCH
saloutos 0:083111ae2a11 1043 /* ASYNCH MASTER API FUNCTIONS */
saloutos 0:083111ae2a11 1044 void HAL_I2C_AbortCpltCallback(I2C_HandleTypeDef *hi2c){
saloutos 0:083111ae2a11 1045 /* Get object ptr based on handler ptr */
saloutos 0:083111ae2a11 1046 i2c_t *obj = get_i2c_obj(hi2c);
saloutos 0:083111ae2a11 1047 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1048 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1049
saloutos 0:083111ae2a11 1050 /* Disable IT. Not always done before calling macro */
saloutos 0:083111ae2a11 1051 __HAL_I2C_DISABLE_IT(handle, I2C_IT_ALL);
saloutos 0:083111ae2a11 1052 i2c_ev_err_disable(obj);
saloutos 0:083111ae2a11 1053
saloutos 0:083111ae2a11 1054 /* Set event flag */
saloutos 0:083111ae2a11 1055 obj_s->event = I2C_EVENT_ERROR;
saloutos 0:083111ae2a11 1056 }
saloutos 0:083111ae2a11 1057
saloutos 0:083111ae2a11 1058 void i2c_transfer_asynch(i2c_t *obj, const void *tx, size_t tx_length, void *rx, size_t rx_length, uint32_t address, uint32_t stop, uint32_t handler, uint32_t event, DMAUsage hint) {
saloutos 0:083111ae2a11 1059
saloutos 0:083111ae2a11 1060 // TODO: DMA usage is currently ignored by this way
saloutos 0:083111ae2a11 1061 (void) hint;
saloutos 0:083111ae2a11 1062
saloutos 0:083111ae2a11 1063 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1064 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1065
saloutos 0:083111ae2a11 1066 /* Update object */
saloutos 0:083111ae2a11 1067 obj->tx_buff.buffer = (void *)tx;
saloutos 0:083111ae2a11 1068 obj->tx_buff.length = tx_length;
saloutos 0:083111ae2a11 1069 obj->tx_buff.pos = 0;
saloutos 0:083111ae2a11 1070 obj->tx_buff.width = 8;
saloutos 0:083111ae2a11 1071
saloutos 0:083111ae2a11 1072 obj->rx_buff.buffer = (void *)rx;
saloutos 0:083111ae2a11 1073 obj->rx_buff.length = rx_length;
saloutos 0:083111ae2a11 1074 obj->rx_buff.pos = SIZE_MAX;
saloutos 0:083111ae2a11 1075 obj->rx_buff.width = 8;
saloutos 0:083111ae2a11 1076
saloutos 0:083111ae2a11 1077 obj_s->available_events = event;
saloutos 0:083111ae2a11 1078 obj_s->event = 0;
saloutos 0:083111ae2a11 1079 obj_s->address = address;
saloutos 0:083111ae2a11 1080 obj_s->stop = stop;
saloutos 0:083111ae2a11 1081
saloutos 0:083111ae2a11 1082 i2c_ev_err_enable(obj, handler);
saloutos 0:083111ae2a11 1083
saloutos 0:083111ae2a11 1084 /* Set operation step depending if stop sending required or not */
saloutos 0:083111ae2a11 1085 if ((tx_length && !rx_length) || (!tx_length && rx_length)) {
saloutos 0:083111ae2a11 1086 if ((obj_s->XferOperation == I2C_FIRST_AND_LAST_FRAME) ||
saloutos 0:083111ae2a11 1087 (obj_s->XferOperation == I2C_LAST_FRAME)) {
saloutos 0:083111ae2a11 1088 if (stop)
saloutos 0:083111ae2a11 1089 obj_s->XferOperation = I2C_FIRST_AND_LAST_FRAME;
saloutos 0:083111ae2a11 1090 else
saloutos 0:083111ae2a11 1091 obj_s->XferOperation = I2C_FIRST_FRAME;
saloutos 0:083111ae2a11 1092 } else if ((obj_s->XferOperation == I2C_FIRST_FRAME) ||
saloutos 0:083111ae2a11 1093 (obj_s->XferOperation == I2C_NEXT_FRAME)) {
saloutos 0:083111ae2a11 1094 if (stop)
saloutos 0:083111ae2a11 1095 obj_s->XferOperation = I2C_LAST_FRAME;
saloutos 0:083111ae2a11 1096 else
saloutos 0:083111ae2a11 1097 obj_s->XferOperation = I2C_NEXT_FRAME;
saloutos 0:083111ae2a11 1098 }
saloutos 0:083111ae2a11 1099
saloutos 0:083111ae2a11 1100 if (tx_length > 0) {
saloutos 0:083111ae2a11 1101 HAL_I2C_Master_Sequential_Transmit_IT(handle, address, (uint8_t*)tx, tx_length, obj_s->XferOperation);
saloutos 0:083111ae2a11 1102 }
saloutos 0:083111ae2a11 1103 if (rx_length > 0) {
saloutos 0:083111ae2a11 1104 HAL_I2C_Master_Sequential_Receive_IT(handle, address, (uint8_t*)rx, rx_length, obj_s->XferOperation);
saloutos 0:083111ae2a11 1105 }
saloutos 0:083111ae2a11 1106 }
saloutos 0:083111ae2a11 1107 else if (tx_length && rx_length) {
saloutos 0:083111ae2a11 1108 /* Two steps operation, don't modify XferOperation, keep it for next step */
saloutos 0:083111ae2a11 1109 if ((obj_s->XferOperation == I2C_FIRST_AND_LAST_FRAME) ||
saloutos 0:083111ae2a11 1110 (obj_s->XferOperation == I2C_LAST_FRAME)) {
saloutos 0:083111ae2a11 1111 HAL_I2C_Master_Sequential_Transmit_IT(handle, address, (uint8_t*)tx, tx_length, I2C_FIRST_FRAME);
saloutos 0:083111ae2a11 1112 } else if ((obj_s->XferOperation == I2C_FIRST_FRAME) ||
saloutos 0:083111ae2a11 1113 (obj_s->XferOperation == I2C_NEXT_FRAME)) {
saloutos 0:083111ae2a11 1114 HAL_I2C_Master_Sequential_Transmit_IT(handle, address, (uint8_t*)tx, tx_length, I2C_NEXT_FRAME);
saloutos 0:083111ae2a11 1115 }
saloutos 0:083111ae2a11 1116 }
saloutos 0:083111ae2a11 1117 }
saloutos 0:083111ae2a11 1118
saloutos 0:083111ae2a11 1119
saloutos 0:083111ae2a11 1120 uint32_t i2c_irq_handler_asynch(i2c_t *obj) {
saloutos 0:083111ae2a11 1121
saloutos 0:083111ae2a11 1122 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1123 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1124
saloutos 0:083111ae2a11 1125 HAL_I2C_EV_IRQHandler(handle);
saloutos 0:083111ae2a11 1126 HAL_I2C_ER_IRQHandler(handle);
saloutos 0:083111ae2a11 1127
saloutos 0:083111ae2a11 1128 /* Return I2C event status */
saloutos 0:083111ae2a11 1129 return (obj_s->event & obj_s->available_events);
saloutos 0:083111ae2a11 1130 }
saloutos 0:083111ae2a11 1131
saloutos 0:083111ae2a11 1132 uint8_t i2c_active(i2c_t *obj) {
saloutos 0:083111ae2a11 1133
saloutos 0:083111ae2a11 1134 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1135 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1136
saloutos 0:083111ae2a11 1137 if (handle->State == HAL_I2C_STATE_READY) {
saloutos 0:083111ae2a11 1138 return 0;
saloutos 0:083111ae2a11 1139 }
saloutos 0:083111ae2a11 1140 else {
saloutos 0:083111ae2a11 1141 return 1;
saloutos 0:083111ae2a11 1142 }
saloutos 0:083111ae2a11 1143 }
saloutos 0:083111ae2a11 1144
saloutos 0:083111ae2a11 1145 void i2c_abort_asynch(i2c_t *obj) {
saloutos 0:083111ae2a11 1146
saloutos 0:083111ae2a11 1147 struct i2c_s *obj_s = I2C_S(obj);
saloutos 0:083111ae2a11 1148 I2C_HandleTypeDef *handle = &(obj_s->handle);
saloutos 0:083111ae2a11 1149
saloutos 0:083111ae2a11 1150 /* Abort HAL requires DevAddress, but is not used. Use Dummy */
saloutos 0:083111ae2a11 1151 uint16_t Dummy_DevAddress = 0x00;
saloutos 0:083111ae2a11 1152
saloutos 0:083111ae2a11 1153 HAL_I2C_Master_Abort_IT(handle, Dummy_DevAddress);
saloutos 0:083111ae2a11 1154 }
saloutos 0:083111ae2a11 1155
saloutos 0:083111ae2a11 1156 #endif // DEVICE_I2C_ASYNCH
saloutos 0:083111ae2a11 1157
saloutos 0:083111ae2a11 1158 #endif // DEVICE_I2C