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
ebrus 0:6bc4ac881c8e 33 #include "gpio_irq_api.h"
ebrus 0:6bc4ac881c8e 34 #include "pinmap.h"
ebrus 0:6bc4ac881c8e 35 #include "mbed_error.h"
ebrus 0:6bc4ac881c8e 36
ebrus 0:6bc4ac881c8e 37 #define EDGE_NONE (0)
ebrus 0:6bc4ac881c8e 38 #define EDGE_RISE (1)
ebrus 0:6bc4ac881c8e 39 #define EDGE_FALL (2)
ebrus 0:6bc4ac881c8e 40 #define EDGE_BOTH (3)
ebrus 0:6bc4ac881c8e 41
ebrus 0:6bc4ac881c8e 42 #define CHANNEL_NUM (16)
ebrus 0:6bc4ac881c8e 43
ebrus 0:6bc4ac881c8e 44 static uint32_t channel_ids[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
ebrus 0:6bc4ac881c8e 45 static uint32_t channel_gpio[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
ebrus 0:6bc4ac881c8e 46 static uint32_t channel_pin[CHANNEL_NUM] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
ebrus 0:6bc4ac881c8e 47
ebrus 0:6bc4ac881c8e 48 static gpio_irq_handler irq_handler;
ebrus 0:6bc4ac881c8e 49
ebrus 0:6bc4ac881c8e 50 static void handle_interrupt_in(uint32_t irq_index) {
ebrus 0:6bc4ac881c8e 51 //if irq_index==5 loop exti 5 to 9
ebrus 0:6bc4ac881c8e 52 //if irq_index==10 loop exti 10 to 15
ebrus 0:6bc4ac881c8e 53 //else exti loop one irq_index
ebrus 0:6bc4ac881c8e 54 uint32_t to_irq_index=(irq_index==5)?9:((irq_index==10)?15:irq_index);
ebrus 0:6bc4ac881c8e 55 GPIO_TypeDef *gpio;
ebrus 0:6bc4ac881c8e 56 uint32_t pin;
ebrus 0:6bc4ac881c8e 57 do{
ebrus 0:6bc4ac881c8e 58 // Retrieve the gpio and pin that generate the irq
ebrus 0:6bc4ac881c8e 59 gpio = (GPIO_TypeDef *)(channel_gpio[irq_index]);
ebrus 0:6bc4ac881c8e 60 pin = (uint32_t)(1 << channel_pin[irq_index]);
ebrus 0:6bc4ac881c8e 61 // Clear interrupt flag
ebrus 0:6bc4ac881c8e 62 if (EXTI_GetITStatus(pin) != RESET)
ebrus 0:6bc4ac881c8e 63 {
ebrus 0:6bc4ac881c8e 64 EXTI_ClearITPendingBit(pin);
ebrus 0:6bc4ac881c8e 65 if (channel_ids[irq_index] == 0) return;
ebrus 0:6bc4ac881c8e 66 // Check which edge has generated the irq
ebrus 0:6bc4ac881c8e 67 if ((gpio->IDR & pin) == 0) {
ebrus 0:6bc4ac881c8e 68 irq_handler(channel_ids[irq_index], IRQ_FALL);
ebrus 0:6bc4ac881c8e 69 } else {
ebrus 0:6bc4ac881c8e 70 irq_handler(channel_ids[irq_index], IRQ_RISE);
ebrus 0:6bc4ac881c8e 71 }
ebrus 0:6bc4ac881c8e 72 }
ebrus 0:6bc4ac881c8e 73 }while(irq_index++ < to_irq_index);
ebrus 0:6bc4ac881c8e 74 }
ebrus 0:6bc4ac881c8e 75
ebrus 0:6bc4ac881c8e 76
ebrus 0:6bc4ac881c8e 77 // The irq_index is passed to the function
ebrus 0:6bc4ac881c8e 78 static void gpio_irq0(void) {handle_interrupt_in(0);} // EXTI line 0
ebrus 0:6bc4ac881c8e 79 static void gpio_irq1(void) {handle_interrupt_in(1);} // EXTI line 1
ebrus 0:6bc4ac881c8e 80 static void gpio_irq2(void) {handle_interrupt_in(2);} // EXTI line 2
ebrus 0:6bc4ac881c8e 81 static void gpio_irq3(void) {handle_interrupt_in(3);} // EXTI line 3
ebrus 0:6bc4ac881c8e 82 static void gpio_irq4(void) {handle_interrupt_in(4);} // EXTI line 4
ebrus 0:6bc4ac881c8e 83 static void gpio_irq5(void) {handle_interrupt_in(5);} // EXTI lines 5 to 9
ebrus 0:6bc4ac881c8e 84 static void gpio_irq6(void) {handle_interrupt_in(10);} // EXTI lines 10 to 15
ebrus 0:6bc4ac881c8e 85
ebrus 0:6bc4ac881c8e 86 extern uint32_t Set_GPIO_Clock(uint32_t port_idx);
ebrus 0:6bc4ac881c8e 87
ebrus 0:6bc4ac881c8e 88 int gpio_irq_init(gpio_irq_t *obj, PinName pin, gpio_irq_handler handler, uint32_t id) {
ebrus 0:6bc4ac881c8e 89 IRQn_Type irq_n = (IRQn_Type)0;
ebrus 0:6bc4ac881c8e 90 uint32_t vector = 0;
ebrus 0:6bc4ac881c8e 91 uint32_t irq_index;
ebrus 0:6bc4ac881c8e 92
ebrus 0:6bc4ac881c8e 93 if (pin == NC) return -1;
ebrus 0:6bc4ac881c8e 94
ebrus 0:6bc4ac881c8e 95 uint32_t port_index = STM_PORT(pin);
ebrus 0:6bc4ac881c8e 96 uint32_t pin_index = STM_PIN(pin);
ebrus 0:6bc4ac881c8e 97
ebrus 0:6bc4ac881c8e 98 // Select irq number and interrupt routine
ebrus 0:6bc4ac881c8e 99 switch (pin_index) {
ebrus 0:6bc4ac881c8e 100 case 0:
ebrus 0:6bc4ac881c8e 101 irq_n = EXTI0_IRQn;
ebrus 0:6bc4ac881c8e 102 vector = (uint32_t)&gpio_irq0;
ebrus 0:6bc4ac881c8e 103 irq_index = 0;
ebrus 0:6bc4ac881c8e 104 break;
ebrus 0:6bc4ac881c8e 105 case 1:
ebrus 0:6bc4ac881c8e 106 irq_n = EXTI1_IRQn;
ebrus 0:6bc4ac881c8e 107 vector = (uint32_t)&gpio_irq1;
ebrus 0:6bc4ac881c8e 108 irq_index = 1;
ebrus 0:6bc4ac881c8e 109 break;
ebrus 0:6bc4ac881c8e 110 case 2:
ebrus 0:6bc4ac881c8e 111 irq_n = EXTI2_IRQn;
ebrus 0:6bc4ac881c8e 112 vector = (uint32_t)&gpio_irq2;
ebrus 0:6bc4ac881c8e 113 irq_index = 2;
ebrus 0:6bc4ac881c8e 114 break;
ebrus 0:6bc4ac881c8e 115 case 3:
ebrus 0:6bc4ac881c8e 116 irq_n = EXTI3_IRQn;
ebrus 0:6bc4ac881c8e 117 vector = (uint32_t)&gpio_irq3;
ebrus 0:6bc4ac881c8e 118 irq_index = 3;
ebrus 0:6bc4ac881c8e 119 break;
ebrus 0:6bc4ac881c8e 120 case 4:
ebrus 0:6bc4ac881c8e 121 irq_n = EXTI4_IRQn;
ebrus 0:6bc4ac881c8e 122 vector = (uint32_t)&gpio_irq4;
ebrus 0:6bc4ac881c8e 123 irq_index = 4;
ebrus 0:6bc4ac881c8e 124 break;
ebrus 0:6bc4ac881c8e 125 case 5:
ebrus 0:6bc4ac881c8e 126 case 6:
ebrus 0:6bc4ac881c8e 127 case 7:
ebrus 0:6bc4ac881c8e 128 case 8:
ebrus 0:6bc4ac881c8e 129 case 9:
ebrus 0:6bc4ac881c8e 130 irq_n = EXTI9_5_IRQn;
ebrus 0:6bc4ac881c8e 131 vector = (uint32_t)&gpio_irq5;
ebrus 0:6bc4ac881c8e 132 irq_index = pin_index;
ebrus 0:6bc4ac881c8e 133 break;
ebrus 0:6bc4ac881c8e 134 case 10:
ebrus 0:6bc4ac881c8e 135 case 11:
ebrus 0:6bc4ac881c8e 136 case 12:
ebrus 0:6bc4ac881c8e 137 case 13:
ebrus 0:6bc4ac881c8e 138 case 14:
ebrus 0:6bc4ac881c8e 139 case 15:
ebrus 0:6bc4ac881c8e 140 irq_n = EXTI15_10_IRQn;
ebrus 0:6bc4ac881c8e 141 vector = (uint32_t)&gpio_irq6;
ebrus 0:6bc4ac881c8e 142 irq_index = pin_index;
ebrus 0:6bc4ac881c8e 143 break;
ebrus 0:6bc4ac881c8e 144 default:
ebrus 0:6bc4ac881c8e 145 error("InterruptIn error: pin not supported.\n");
ebrus 0:6bc4ac881c8e 146 return -1;
ebrus 0:6bc4ac881c8e 147 }
ebrus 0:6bc4ac881c8e 148 // Enable GPIO clock
ebrus 0:6bc4ac881c8e 149 uint32_t gpio_add = Set_GPIO_Clock(port_index);
ebrus 0:6bc4ac881c8e 150
ebrus 0:6bc4ac881c8e 151 // Enable AFIO clock
ebrus 0:6bc4ac881c8e 152 RCC_APB2PeriphClockCmd(RCC_APB2Periph_AFIO, ENABLE);
ebrus 0:6bc4ac881c8e 153
ebrus 0:6bc4ac881c8e 154 // Connect EXTI line to pin
ebrus 0:6bc4ac881c8e 155 GPIO_EXTILineConfig(port_index, pin_index);
ebrus 0:6bc4ac881c8e 156
ebrus 0:6bc4ac881c8e 157 // Configure EXTI line
ebrus 0:6bc4ac881c8e 158 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 159 EXTI_InitStructure.EXTI_Line = (uint32_t)(1 << pin_index);
ebrus 0:6bc4ac881c8e 160 EXTI_InitStructure.EXTI_Mode = EXTI_Mode_Interrupt;
ebrus 0:6bc4ac881c8e 161 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Falling;
ebrus 0:6bc4ac881c8e 162 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 163 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 164
ebrus 0:6bc4ac881c8e 165 // Enable and set EXTI interrupt to the lowest priority
ebrus 0:6bc4ac881c8e 166 NVIC_InitTypeDef NVIC_InitStructure;
ebrus 0:6bc4ac881c8e 167 NVIC_InitStructure.NVIC_IRQChannel = irq_n;
ebrus 0:6bc4ac881c8e 168 NVIC_InitStructure.NVIC_IRQChannelPreemptionPriority = 0x0F;
ebrus 0:6bc4ac881c8e 169 NVIC_InitStructure.NVIC_IRQChannelSubPriority = 0x0F;
ebrus 0:6bc4ac881c8e 170 NVIC_InitStructure.NVIC_IRQChannelCmd = ENABLE;
ebrus 0:6bc4ac881c8e 171 NVIC_Init(&NVIC_InitStructure);
ebrus 0:6bc4ac881c8e 172
ebrus 0:6bc4ac881c8e 173 NVIC_SetVector(irq_n, vector);
ebrus 0:6bc4ac881c8e 174 NVIC_EnableIRQ(irq_n);
ebrus 0:6bc4ac881c8e 175
ebrus 0:6bc4ac881c8e 176 // Save informations for future use
ebrus 0:6bc4ac881c8e 177 obj->irq_n = irq_n;
ebrus 0:6bc4ac881c8e 178 obj->irq_index = irq_index;
ebrus 0:6bc4ac881c8e 179 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 180 channel_ids[irq_index] = id;
ebrus 0:6bc4ac881c8e 181 channel_gpio[irq_index] = gpio_add;
ebrus 0:6bc4ac881c8e 182 channel_pin[irq_index] = pin_index;
ebrus 0:6bc4ac881c8e 183
ebrus 0:6bc4ac881c8e 184 irq_handler = handler;
ebrus 0:6bc4ac881c8e 185
ebrus 0:6bc4ac881c8e 186 return 0;
ebrus 0:6bc4ac881c8e 187 }
ebrus 0:6bc4ac881c8e 188
ebrus 0:6bc4ac881c8e 189 void gpio_irq_free(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 190 channel_ids[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 191 channel_gpio[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 192 channel_pin[obj->irq_index] = 0;
ebrus 0:6bc4ac881c8e 193 // Disable EXTI line
ebrus 0:6bc4ac881c8e 194 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 195 EXTI_StructInit(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 196 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 197 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 198 }
ebrus 0:6bc4ac881c8e 199
ebrus 0:6bc4ac881c8e 200 void gpio_irq_set(gpio_irq_t *obj, gpio_irq_event event, uint32_t enable) {
ebrus 0:6bc4ac881c8e 201 EXTI_InitTypeDef EXTI_InitStructure;
ebrus 0:6bc4ac881c8e 202
ebrus 0:6bc4ac881c8e 203 uint32_t pin_index = channel_pin[obj->irq_index];
ebrus 0:6bc4ac881c8e 204
ebrus 0:6bc4ac881c8e 205 EXTI_InitStructure.EXTI_Line = (uint32_t)(1 << pin_index);
ebrus 0:6bc4ac881c8e 206 EXTI_InitStructure.EXTI_Mode = EXTI_Mode_Interrupt;
ebrus 0:6bc4ac881c8e 207
ebrus 0:6bc4ac881c8e 208 if (event == IRQ_RISE) {
ebrus 0:6bc4ac881c8e 209 if ((obj->event == EDGE_FALL) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 210 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising_Falling;
ebrus 0:6bc4ac881c8e 211 obj->event = EDGE_BOTH;
ebrus 0:6bc4ac881c8e 212 }
ebrus 0:6bc4ac881c8e 213 else { // NONE or RISE
ebrus 0:6bc4ac881c8e 214 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising;
ebrus 0:6bc4ac881c8e 215 obj->event = EDGE_RISE;
ebrus 0:6bc4ac881c8e 216 }
ebrus 0:6bc4ac881c8e 217 }
ebrus 0:6bc4ac881c8e 218
ebrus 0:6bc4ac881c8e 219 if (event == IRQ_FALL) {
ebrus 0:6bc4ac881c8e 220 if ((obj->event == EDGE_RISE) || (obj->event == EDGE_BOTH)) {
ebrus 0:6bc4ac881c8e 221 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Rising_Falling;
ebrus 0:6bc4ac881c8e 222 obj->event = EDGE_BOTH;
ebrus 0:6bc4ac881c8e 223 }
ebrus 0:6bc4ac881c8e 224 else { // NONE or FALL
ebrus 0:6bc4ac881c8e 225 EXTI_InitStructure.EXTI_Trigger = EXTI_Trigger_Falling;
ebrus 0:6bc4ac881c8e 226 obj->event = EDGE_FALL;
ebrus 0:6bc4ac881c8e 227 }
ebrus 0:6bc4ac881c8e 228 }
ebrus 0:6bc4ac881c8e 229
ebrus 0:6bc4ac881c8e 230 if (enable) {
ebrus 0:6bc4ac881c8e 231 EXTI_InitStructure.EXTI_LineCmd = ENABLE;
ebrus 0:6bc4ac881c8e 232 }
ebrus 0:6bc4ac881c8e 233 else {
ebrus 0:6bc4ac881c8e 234 EXTI_InitStructure.EXTI_LineCmd = DISABLE;
ebrus 0:6bc4ac881c8e 235 }
ebrus 0:6bc4ac881c8e 236
ebrus 0:6bc4ac881c8e 237 EXTI_Init(&EXTI_InitStructure);
ebrus 0:6bc4ac881c8e 238 }
ebrus 0:6bc4ac881c8e 239
ebrus 0:6bc4ac881c8e 240 void gpio_irq_enable(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 241 NVIC_EnableIRQ(obj->irq_n);
ebrus 0:6bc4ac881c8e 242 }
ebrus 0:6bc4ac881c8e 243
ebrus 0:6bc4ac881c8e 244 void gpio_irq_disable(gpio_irq_t *obj) {
ebrus 0:6bc4ac881c8e 245 NVIC_DisableIRQ(obj->irq_n);
ebrus 0:6bc4ac881c8e 246 obj->event = EDGE_NONE;
ebrus 0:6bc4ac881c8e 247 }