mbed library sources

Dependents:   FRDM-KL46Z_LCD_Test FRDM-KL46Z_LCD_Test FRDM-KL46Z_Plantilla FRDM-KL46Z_Plantilla ... more

Committer:
ebrus
Date:
Thu Jul 28 15:56:34 2016 +0000
Revision:
0:6bc4ac881c8e
1;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ebrus 0:6bc4ac881c8e 1 /* mbed Microcontroller Library
ebrus 0:6bc4ac881c8e 2 *******************************************************************************
ebrus 0:6bc4ac881c8e 3 * Copyright (c) 2014, STMicroelectronics
ebrus 0:6bc4ac881c8e 4 * All rights reserved.
ebrus 0:6bc4ac881c8e 5 *
ebrus 0:6bc4ac881c8e 6 * Redistribution and use in source and binary forms, with or without
ebrus 0:6bc4ac881c8e 7 * modification, are permitted provided that the following conditions are met:
ebrus 0:6bc4ac881c8e 8 *
ebrus 0:6bc4ac881c8e 9 * 1. Redistributions of source code must retain the above copyright notice,
ebrus 0:6bc4ac881c8e 10 * this list of conditions and the following disclaimer.
ebrus 0:6bc4ac881c8e 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
ebrus 0:6bc4ac881c8e 12 * this list of conditions and the following disclaimer in the documentation
ebrus 0:6bc4ac881c8e 13 * and/or other materials provided with the distribution.
ebrus 0:6bc4ac881c8e 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
ebrus 0:6bc4ac881c8e 15 * may be used to endorse or promote products derived from this software
ebrus 0:6bc4ac881c8e 16 * without specific prior written permission.
ebrus 0:6bc4ac881c8e 17 *
ebrus 0:6bc4ac881c8e 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
ebrus 0:6bc4ac881c8e 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
ebrus 0:6bc4ac881c8e 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
ebrus 0:6bc4ac881c8e 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
ebrus 0:6bc4ac881c8e 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
ebrus 0:6bc4ac881c8e 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
ebrus 0:6bc4ac881c8e 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
ebrus 0:6bc4ac881c8e 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
ebrus 0:6bc4ac881c8e 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
ebrus 0:6bc4ac881c8e 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
ebrus 0:6bc4ac881c8e 28 *******************************************************************************
ebrus 0:6bc4ac881c8e 29 */
ebrus 0:6bc4ac881c8e 30 #include <stddef.h>
ebrus 0:6bc4ac881c8e 31 #include "cmsis.h"
ebrus 0:6bc4ac881c8e 32 #include "gpio_irq_api.h"
ebrus 0:6bc4ac881c8e 33 #include "pinmap.h"
ebrus 0:6bc4ac881c8e 34 #include "mbed_error.h"
ebrus 0:6bc4ac881c8e 35
ebrus 0:6bc4ac881c8e 36 #define EDGE_NONE (0)
ebrus 0:6bc4ac881c8e 37 #define EDGE_RISE (1)
ebrus 0:6bc4ac881c8e 38 #define EDGE_FALL (2)
ebrus 0:6bc4ac881c8e 39 #define EDGE_BOTH (3)
ebrus 0:6bc4ac881c8e 40
ebrus 0:6bc4ac881c8e 41 #define CHANNEL_NUM (7)
ebrus 0:6bc4ac881c8e 42
ebrus 0:6bc4ac881c8e 43 static uint32_t channel_ids[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0};
ebrus 0:6bc4ac881c8e 44 static uint32_t channel_gpio[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0};
ebrus 0:6bc4ac881c8e 45 static uint32_t channel_pin[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0};
ebrus 0:6bc4ac881c8e 46
ebrus 0:6bc4ac881c8e 47 static gpio_irq_handler irq_handler;
ebrus 0:6bc4ac881c8e 48
ebrus 0:6bc4ac881c8e 49 static void handle_interrupt_in(uint32_t irq_index) {
ebrus 0:6bc4ac881c8e 50 // Retrieve the gpio and pin that generate the irq
ebrus 0:6bc4ac881c8e 51 GPIO_TypeDef *gpio = (GPIO_TypeDef *)(channel_gpio[irq_index]);
ebrus 0:6bc4ac881c8e 52 uint32_t pin = (uint32_t)(1 << channel_pin[irq_index]);
ebrus 0:6bc4ac881c8e 53
ebrus 0:6bc4ac881c8e 54 // Clear interrupt flag
ebrus 0:6bc4ac881c8e 55 if (EXTI_GetITStatus(pin) != RESET) {
ebrus 0:6bc4ac881c8e 56 EXTI_ClearITPendingBit(pin);
ebrus 0:6bc4ac881c8e 57 }
ebrus 0:6bc4ac881c8e 58
ebrus 0:6bc4ac881c8e 59 if (channel_ids[irq_index] == 0) return;
ebrus 0:6bc4ac881c8e 60
ebrus 0:6bc4ac881c8e 61 // Check which edge has generated the irq
ebrus 0:6bc4ac881c8e 62 if ((gpio->IDR & pin) == 0) {
ebrus 0:6bc4ac881c8e 63 irq_handler(channel_ids[irq_index], IRQ_FALL);
ebrus 0:6bc4ac881c8e 64 } else {
ebrus 0:6bc4ac881c8e 65 irq_handler(channel_ids[irq_index], IRQ_RISE);
ebrus 0:6bc4ac881c8e 66 }
ebrus 0:6bc4ac881c8e 67 }
ebrus 0:6bc4ac881c8e 68
ebrus 0:6bc4ac881c8e 69 // The irq_index is passed to the function
ebrus 0:6bc4ac881c8e 70 static void gpio_irq0(void) {
ebrus 0:6bc4ac881c8e 71 handle_interrupt_in(0); // EXTI line 0
ebrus 0:6bc4ac881c8e 72 }
ebrus 0:6bc4ac881c8e 73 static void gpio_irq1(void) {
ebrus 0:6bc4ac881c8e 74 handle_interrupt_in(1); // EXTI line 1
ebrus 0:6bc4ac881c8e 75 }
ebrus 0:6bc4ac881c8e 76 static void gpio_irq2(void) {
ebrus 0:6bc4ac881c8e 77 handle_interrupt_in(2); // EXTI line 2
ebrus 0:6bc4ac881c8e 78 }
ebrus 0:6bc4ac881c8e 79 static void gpio_irq3(void) {
ebrus 0:6bc4ac881c8e 80 handle_interrupt_in(3); // EXTI line 3
ebrus 0:6bc4ac881c8e 81 }
ebrus 0:6bc4ac881c8e 82 static void gpio_irq4(void) {
ebrus 0:6bc4ac881c8e 83 handle_interrupt_in(4); // EXTI line 4
ebrus 0:6bc4ac881c8e 84 }
ebrus 0:6bc4ac881c8e 85 static void gpio_irq5(void) {
ebrus 0:6bc4ac881c8e 86 handle_interrupt_in(5); // EXTI lines 5 to 9
ebrus 0:6bc4ac881c8e 87 }
ebrus 0:6bc4ac881c8e 88 static void gpio_irq6(void) {
ebrus 0:6bc4ac881c8e 89 handle_interrupt_in(6); // EXTI lines 10 to 15
ebrus 0:6bc4ac881c8e 90 }
ebrus 0:6bc4ac881c8e 91
ebrus 0:6bc4ac881c8e 92 extern uint32_t Set_GPIO_Clock(uint32_t port_idx);
ebrus 0:6bc4ac881c8e 93
ebrus 0:6bc4ac881c8e 94 int gpio_irq_init(gpio_irq_t *obj, PinName pin, gpio_irq_handler handler, uint32_t id) {
ebrus 0:6bc4ac881c8e 95 IRQn_Type irq_n = (IRQn_Type)0;
ebrus 0:6bc4ac881c8e 96 uint32_t vector = 0;
ebrus 0:6bc4ac881c8e 97 uint32_t irq_index;
ebrus 0:6bc4ac881c8e 98
ebrus 0:6bc4ac881c8e 99 if (pin == NC) return -1;
ebrus 0:6bc4ac881c8e 100
ebrus 0:6bc4ac881c8e 101 uint32_t port_index = STM_PORT(pin);
ebrus 0:6bc4ac881c8e 102 uint32_t pin_index = STM_PIN(pin);
ebrus 0:6bc4ac881c8e 103
ebrus 0:6bc4ac881c8e 104 // Select irq number and interrupt routine
ebrus 0:6bc4ac881c8e 105 switch (pin_index) {
ebrus 0:6bc4ac881c8e 106 case 0:
ebrus 0:6bc4ac881c8e 107 irq_n = EXTI0_IRQn;
ebrus 0:6bc4ac881c8e 108 vector = (uint32_t)&gpio_irq0;
ebrus 0:6bc4ac881c8e 109 irq_index = 0;
ebrus 0:6bc4ac881c8e 110 break;
ebrus 0:6bc4ac881c8e 111 case 1:
ebrus 0:6bc4ac881c8e 112 irq_n = EXTI1_IRQn;
ebrus 0:6bc4ac881c8e 113 vector = (uint32_t)&gpio_irq1;
ebrus 0:6bc4ac881c8e 114 irq_index = 1;
ebrus 0:6bc4ac881c8e 115 break;
ebrus 0:6bc4ac881c8e 116 case 2:
ebrus 0:6bc4ac881c8e 117 irq_n = EXTI2_IRQn;
ebrus 0:6bc4ac881c8e 118 vector = (uint32_t)&gpio_irq2;
ebrus 0:6bc4ac881c8e 119 irq_index = 2;
ebrus 0:6bc4ac881c8e 120 break;
ebrus 0:6bc4ac881c8e 121 case 3:
ebrus 0:6bc4ac881c8e 122 irq_n = EXTI3_IRQn;
ebrus 0:6bc4ac881c8e 123 vector = (uint32_t)&gpio_irq3;
ebrus 0:6bc4ac881c8e 124 irq_index = 3;
ebrus 0:6bc4ac881c8e 125 break;
ebrus 0:6bc4ac881c8e 126 case 4:
ebrus 0:6bc4ac881c8e 127 irq_n = EXTI4_IRQn;
ebrus 0:6bc4ac881c8e 128 vector = (uint32_t)&gpio_irq4;
ebrus 0:6bc4ac881c8e 129 irq_index = 4;
ebrus 0:6bc4ac881c8e 130 break;
ebrus 0:6bc4ac881c8e 131 case 5:
ebrus 0:6bc4ac881c8e 132 case 6:
ebrus 0:6bc4ac881c8e 133 case 7:
ebrus 0:6bc4ac881c8e 134 case 8:
ebrus 0:6bc4ac881c8e 135 case 9:
ebrus 0:6bc4ac881c8e 136 irq_n = EXTI9_5_IRQn;
ebrus 0:6bc4ac881c8e 137 vector = (uint32_t)&gpio_irq5;
ebrus 0:6bc4ac881c8e 138 irq_index = 5;
ebrus 0:6bc4ac881c8e 139 break;
ebrus 0:6bc4ac881c8e 140 case 10:
ebrus 0:6bc4ac881c8e 141 case 11:
ebrus 0:6bc4ac881c8e 142 case 12:
ebrus 0:6bc4ac881c8e 143 case 13:
ebrus 0:6bc4ac881c8e 144 case 14:
ebrus 0:6bc4ac881c8e 145 case 15:
ebrus 0:6bc4ac881c8e 146 irq_n = EXTI15_10_IRQn;
ebrus 0:6bc4ac881c8e 147 vector = (uint32_t)&gpio_irq6;
ebrus 0:6bc4ac881c8e 148 irq_index = 6;
ebrus 0:6bc4ac881c8e 149 break;
ebrus 0:6bc4ac881c8e 150 default:
ebrus 0:6bc4ac881c8e 151 error("InterruptIn error: pin not supported.\n");
ebrus 0:6bc4ac881c8e 152 return -1;
ebrus 0:6bc4ac881c8e 153 }
ebrus 0:6bc4ac881c8e 154
ebrus 0:6bc4ac881c8e 155 // Enable GPIO clock
ebrus 0:6bc4ac881c8e 156 uint32_t gpio_add = Set_GPIO_Clock(port_index);
ebrus 0:6bc4ac881c8e 157
ebrus 0:6bc4ac881c8e 158 // Enable SYSCFG clock
ebrus 0:6bc4ac881c8e 159 RCC_APB2PeriphClockCmd(RCC_APB2Periph_SYSCFG, ENABLE);
ebrus 0:6bc4ac881c8e 160
ebrus 0:6bc4ac881c8e 161 // Connect EXTI line to pin
ebrus 0:6bc4ac881c8e 162 SYSCFG_EXTILineConfig(port_index, pin_index);
ebrus 0:6bc4ac881c8e 163
ebrus 0:6bc4ac881c8e 164 // Configure EXTI line
ebrus 0:6bc4ac881c8e 165 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 166 EXTI_InitStructure.EXTI_Line = (uint32_t)(1 << pin_index);
ebrus 0:6bc4ac881c8e 167 EXTI_InitStructure.EXTI_Mode = EXTI_Mode_Interrupt;
ebrus 0:6bc4ac881c8e 168 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Falling;
ebrus 0:6bc4ac881c8e 169 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 170 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 171
ebrus 0:6bc4ac881c8e 172 // Enable and set EXTI interrupt to the lowest priority
ebrus 0:6bc4ac881c8e 173 NVIC_InitTypeDef NVIC_InitStructure;
ebrus 0:6bc4ac881c8e 174 NVIC_InitStructure.NVIC_IRQChannel = irq_n;
ebrus 0:6bc4ac881c8e 175 NVIC_InitStructure.NVIC_IRQChannelPreemptionPriority = 0x0F;
ebrus 0:6bc4ac881c8e 176 NVIC_InitStructure.NVIC_IRQChannelSubPriority = 0x0F;
ebrus 0:6bc4ac881c8e 177 NVIC_InitStructure.NVIC_IRQChannelCmd = ENABLE;
ebrus 0:6bc4ac881c8e 178 NVIC_Init(&NVIC_InitStructure);
ebrus 0:6bc4ac881c8e 179
ebrus 0:6bc4ac881c8e 180 NVIC_SetVector(irq_n, vector);
ebrus 0:6bc4ac881c8e 181 NVIC_EnableIRQ(irq_n);
ebrus 0:6bc4ac881c8e 182
ebrus 0:6bc4ac881c8e 183 // Save informations for future use
ebrus 0:6bc4ac881c8e 184 obj->irq_n = irq_n;
ebrus 0:6bc4ac881c8e 185 obj->irq_index = irq_index;
ebrus 0:6bc4ac881c8e 186 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 187 channel_ids[irq_index] = id;
ebrus 0:6bc4ac881c8e 188 channel_gpio[irq_index] = gpio_add;
ebrus 0:6bc4ac881c8e 189 channel_pin[irq_index] = pin_index;
ebrus 0:6bc4ac881c8e 190
ebrus 0:6bc4ac881c8e 191 irq_handler = handler;
ebrus 0:6bc4ac881c8e 192
ebrus 0:6bc4ac881c8e 193 return 0;
ebrus 0:6bc4ac881c8e 194 }
ebrus 0:6bc4ac881c8e 195
ebrus 0:6bc4ac881c8e 196 void gpio_irq_free(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 197 channel_ids[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 198 channel_gpio[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 199 channel_pin[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 200 // Disable EXTI line
ebrus 0:6bc4ac881c8e 201 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 202 EXTI_StructInit(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 203 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 204 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 205 }
ebrus 0:6bc4ac881c8e 206
ebrus 0:6bc4ac881c8e 207 void gpio_irq_set(gpio_irq_t *obj, gpio_irq_event event, uint32_t enable) {
ebrus 0:6bc4ac881c8e 208 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 209
ebrus 0:6bc4ac881c8e 210 uint32_t pin_index = channel_pin[obj->irq_index];
ebrus 0:6bc4ac881c8e 211
ebrus 0:6bc4ac881c8e 212 EXTI_InitStructure.EXTI_Line = (uint32_t)(1 << pin_index);
ebrus 0:6bc4ac881c8e 213 EXTI_InitStructure.EXTI_Mode = EXTI_Mode_Interrupt;
ebrus 0:6bc4ac881c8e 214 EXTI_InitStructure.EXTI_LineCmd = DISABLE; // Default
ebrus 0:6bc4ac881c8e 215
ebrus 0:6bc4ac881c8e 216 if (enable) {
ebrus 0:6bc4ac881c8e 217 if (event == IRQ_RISE) {
ebrus 0:6bc4ac881c8e 218 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 219 if ((obj->event == EDGE_FALL) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 220 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising_Falling;
ebrus 0:6bc4ac881c8e 221 obj->event = EDGE_BOTH;
ebrus 0:6bc4ac881c8e 222 } else { // NONE or RISE
ebrus 0:6bc4ac881c8e 223 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising;
ebrus 0:6bc4ac881c8e 224 obj->event = EDGE_RISE;
ebrus 0:6bc4ac881c8e 225 }
ebrus 0:6bc4ac881c8e 226 }
ebrus 0:6bc4ac881c8e 227 if (event == IRQ_FALL) {
ebrus 0:6bc4ac881c8e 228 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 229 if ((obj->event == EDGE_RISE) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 230 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising_Falling;
ebrus 0:6bc4ac881c8e 231 obj->event = EDGE_BOTH;
ebrus 0:6bc4ac881c8e 232 } else { // NONE or FALL
ebrus 0:6bc4ac881c8e 233 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Falling;
ebrus 0:6bc4ac881c8e 234 obj->event = EDGE_FALL;
ebrus 0:6bc4ac881c8e 235 }
ebrus 0:6bc4ac881c8e 236 }
ebrus 0:6bc4ac881c8e 237 }
ebrus 0:6bc4ac881c8e 238 else { // Disable
ebrus 0:6bc4ac881c8e 239 if (event == IRQ_RISE) {
ebrus 0:6bc4ac881c8e 240 if ((obj->event == EDGE_FALL) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 241 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 242 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Falling;
ebrus 0:6bc4ac881c8e 243 obj->event = EDGE_FALL;
ebrus 0:6bc4ac881c8e 244 } else { // NONE or RISE
ebrus 0:6bc4ac881c8e 245 EXTI_InitStructure.EXTI_LineCmd = DISABLE;
ebrus 0:6bc4ac881c8e 246 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 247 }
ebrus 0:6bc4ac881c8e 248 }
ebrus 0:6bc4ac881c8e 249 if (event == IRQ_FALL) {
ebrus 0:6bc4ac881c8e 250 if ((obj->event == EDGE_RISE) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 251 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 252 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising;
ebrus 0:6bc4ac881c8e 253 obj->event = EDGE_RISE;
ebrus 0:6bc4ac881c8e 254 } else { // NONE or FALL
ebrus 0:6bc4ac881c8e 255 EXTI_InitStructure.EXTI_LineCmd = DISABLE;
ebrus 0:6bc4ac881c8e 256 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 257 }
ebrus 0:6bc4ac881c8e 258 }
ebrus 0:6bc4ac881c8e 259 }
ebrus 0:6bc4ac881c8e 260
ebrus 0:6bc4ac881c8e 261 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 262 }
ebrus 0:6bc4ac881c8e 263
ebrus 0:6bc4ac881c8e 264 void gpio_irq_enable(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 265 NVIC_EnableIRQ(obj->irq_n);
ebrus 0:6bc4ac881c8e 266 }
ebrus 0:6bc4ac881c8e 267
ebrus 0:6bc4ac881c8e 268 void gpio_irq_disable(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 269 NVIC_DisableIRQ(obj->irq_n);
ebrus 0:6bc4ac881c8e 270 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 271 }