mbed library sources. Supersedes mbed-src.

Dependents:   Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more

Committer:
AnnaBridge
Date:
Wed Feb 20 22:31:08 2019 +0000
Revision:
189:f392fc9709a3
Parent:
181:57724642e740
mbed library release version 165

Who changed what in which revision?

UserRevisionLine numberNew contents of line
AnnaBridge 181:57724642e740 1 /* mbed Microcontroller Library
AnnaBridge 181:57724642e740 2 * Copyright (c) 2006-2013 ARM Limited
AnnaBridge 181:57724642e740 3 *
AnnaBridge 181:57724642e740 4 * Licensed under the Apache License, Version 2.0 (the "License");
AnnaBridge 181:57724642e740 5 * you may not use this file except in compliance with the License.
AnnaBridge 181:57724642e740 6 * You may obtain a copy of the License at
AnnaBridge 181:57724642e740 7 *
AnnaBridge 181:57724642e740 8 * http://www.apache.org/licenses/LICENSE-2.0
AnnaBridge 181:57724642e740 9 *
AnnaBridge 181:57724642e740 10 * Unless required by applicable law or agreed to in writing, software
AnnaBridge 181:57724642e740 11 * distributed under the License is distributed on an "AS IS" BASIS,
AnnaBridge 181:57724642e740 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
AnnaBridge 181:57724642e740 13 * See the License for the specific language governing permissions and
AnnaBridge 181:57724642e740 14 * limitations under the License.
AnnaBridge 181:57724642e740 15 */
AnnaBridge 181:57724642e740 16 #include <stddef.h>
AnnaBridge 181:57724642e740 17
AnnaBridge 181:57724642e740 18 #include "gpio_irq_api.h"
AnnaBridge 181:57724642e740 19 #include "iodefine.h"
AnnaBridge 181:57724642e740 20 #include "PeripheralPins.h"
AnnaBridge 181:57724642e740 21 #include "cmsis.h"
AnnaBridge 181:57724642e740 22 #include "gpio_addrdefine.h"
AnnaBridge 181:57724642e740 23
AnnaBridge 181:57724642e740 24 #define CHANNEL_NUM 8
AnnaBridge 181:57724642e740 25
AnnaBridge 181:57724642e740 26 static void gpio_irq0(void);
AnnaBridge 181:57724642e740 27 static void gpio_irq1(void);
AnnaBridge 181:57724642e740 28 static void gpio_irq2(void);
AnnaBridge 181:57724642e740 29 static void gpio_irq3(void);
AnnaBridge 181:57724642e740 30 static void gpio_irq4(void);
AnnaBridge 181:57724642e740 31 static void gpio_irq5(void);
AnnaBridge 181:57724642e740 32 static void gpio_irq6(void);
AnnaBridge 181:57724642e740 33 static void gpio_irq7(void);
AnnaBridge 181:57724642e740 34
AnnaBridge 181:57724642e740 35 static gpio_irq_t *channel_obj[CHANNEL_NUM] = {NULL};
AnnaBridge 181:57724642e740 36 static gpio_irq_handler irq_handler;
AnnaBridge 181:57724642e740 37 static const int nIRQn_h = 32;
AnnaBridge 181:57724642e740 38 extern PinName gpio_multi_guard;
AnnaBridge 181:57724642e740 39
AnnaBridge 181:57724642e740 40 static const IRQHandler irq_tbl[CHANNEL_NUM] = {
AnnaBridge 181:57724642e740 41 &gpio_irq0,
AnnaBridge 181:57724642e740 42 &gpio_irq1,
AnnaBridge 181:57724642e740 43 &gpio_irq2,
AnnaBridge 181:57724642e740 44 &gpio_irq3,
AnnaBridge 181:57724642e740 45 &gpio_irq4,
AnnaBridge 181:57724642e740 46 &gpio_irq5,
AnnaBridge 181:57724642e740 47 &gpio_irq6,
AnnaBridge 181:57724642e740 48 &gpio_irq7,
AnnaBridge 181:57724642e740 49 };
AnnaBridge 181:57724642e740 50
AnnaBridge 181:57724642e740 51 static void handle_interrupt_in(int irq_num) {
AnnaBridge 181:57724642e740 52 uint16_t irqs;
AnnaBridge 181:57724642e740 53 uint16_t edge_req;
AnnaBridge 181:57724642e740 54 gpio_irq_t *obj;
AnnaBridge 181:57724642e740 55 gpio_irq_event irq_event;
AnnaBridge 181:57724642e740 56
AnnaBridge 181:57724642e740 57 irqs = INTCIRQRR;
AnnaBridge 181:57724642e740 58 if (irqs & (1 << irq_num)) {
AnnaBridge 181:57724642e740 59 obj = channel_obj[irq_num];
AnnaBridge 181:57724642e740 60 if (obj != NULL) {
AnnaBridge 181:57724642e740 61 edge_req = ((INTCICR1 >> (obj->ch * 2)) & 3);
AnnaBridge 181:57724642e740 62 if (edge_req == 1) {
AnnaBridge 181:57724642e740 63 irq_event = IRQ_FALL;
AnnaBridge 181:57724642e740 64 } else if (edge_req == 2) {
AnnaBridge 181:57724642e740 65 irq_event = IRQ_RISE;
AnnaBridge 181:57724642e740 66 } else {
AnnaBridge 181:57724642e740 67 uint32_t mask = (1 << (obj->pin & 0x0F));
AnnaBridge 181:57724642e740 68 __I uint32_t *reg_in = (volatile uint32_t *) PPR((int)PINGROUP(obj->pin));
AnnaBridge 181:57724642e740 69
AnnaBridge 181:57724642e740 70 if ((*reg_in & mask) == 0) {
AnnaBridge 181:57724642e740 71 irq_event = IRQ_FALL;
AnnaBridge 181:57724642e740 72 } else {
AnnaBridge 181:57724642e740 73 irq_event = IRQ_RISE;
AnnaBridge 181:57724642e740 74 }
AnnaBridge 181:57724642e740 75 }
AnnaBridge 181:57724642e740 76 irq_handler(obj->port, irq_event);
AnnaBridge 181:57724642e740 77 }
AnnaBridge 181:57724642e740 78 INTCIRQRR &= ~(1 << irq_num);
AnnaBridge 181:57724642e740 79 }
AnnaBridge 181:57724642e740 80 }
AnnaBridge 181:57724642e740 81
AnnaBridge 181:57724642e740 82 static void gpio_irq0(void) {
AnnaBridge 181:57724642e740 83 handle_interrupt_in(0);
AnnaBridge 181:57724642e740 84 }
AnnaBridge 181:57724642e740 85
AnnaBridge 181:57724642e740 86 static void gpio_irq1(void) {
AnnaBridge 181:57724642e740 87 handle_interrupt_in(1);
AnnaBridge 181:57724642e740 88 }
AnnaBridge 181:57724642e740 89
AnnaBridge 181:57724642e740 90 static void gpio_irq2(void) {
AnnaBridge 181:57724642e740 91 handle_interrupt_in(2);
AnnaBridge 181:57724642e740 92 }
AnnaBridge 181:57724642e740 93
AnnaBridge 181:57724642e740 94 static void gpio_irq3(void) {
AnnaBridge 181:57724642e740 95 handle_interrupt_in(3);
AnnaBridge 181:57724642e740 96 }
AnnaBridge 181:57724642e740 97
AnnaBridge 181:57724642e740 98 static void gpio_irq4(void) {
AnnaBridge 181:57724642e740 99 handle_interrupt_in(4);
AnnaBridge 181:57724642e740 100 }
AnnaBridge 181:57724642e740 101
AnnaBridge 181:57724642e740 102 static void gpio_irq5(void) {
AnnaBridge 181:57724642e740 103 handle_interrupt_in(5);
AnnaBridge 181:57724642e740 104 }
AnnaBridge 181:57724642e740 105
AnnaBridge 181:57724642e740 106 static void gpio_irq6(void) {
AnnaBridge 181:57724642e740 107 handle_interrupt_in(6);
AnnaBridge 181:57724642e740 108 }
AnnaBridge 181:57724642e740 109
AnnaBridge 181:57724642e740 110 static void gpio_irq7(void) {
AnnaBridge 181:57724642e740 111 handle_interrupt_in(7);
AnnaBridge 181:57724642e740 112 }
AnnaBridge 181:57724642e740 113
AnnaBridge 181:57724642e740 114 int gpio_irq_init(gpio_irq_t *obj, PinName pin, gpio_irq_handler handler, uint32_t id) {
AnnaBridge 181:57724642e740 115 int shift;
AnnaBridge 181:57724642e740 116 if (pin == NC) return -1;
AnnaBridge 181:57724642e740 117
AnnaBridge 181:57724642e740 118 obj->ch = pinmap_peripheral(pin, PinMap_IRQ);
AnnaBridge 181:57724642e740 119 obj->pin = (int)pin ;
AnnaBridge 181:57724642e740 120 obj->port = (int)id ;
AnnaBridge 181:57724642e740 121
AnnaBridge 181:57724642e740 122 shift = obj->ch*2;
AnnaBridge 181:57724642e740 123 channel_obj[obj->ch] = obj;
AnnaBridge 181:57724642e740 124 irq_handler = handler;
AnnaBridge 181:57724642e740 125
AnnaBridge 181:57724642e740 126 pinmap_pinout(pin, PinMap_IRQ);
AnnaBridge 181:57724642e740 127 gpio_multi_guard = pin; /* Set multi guard */
AnnaBridge 181:57724642e740 128
AnnaBridge 181:57724642e740 129 // INTC settings
AnnaBridge 181:57724642e740 130 InterruptHandlerRegister((IRQn_Type)(nIRQn_h+obj->ch), (void (*)(uint32_t))irq_tbl[obj->ch]);
AnnaBridge 181:57724642e740 131 INTCICR1 &= ~(0x3 << shift);
AnnaBridge 181:57724642e740 132 GIC_SetPriority((IRQn_Type)(nIRQn_h+obj->ch), 5);
AnnaBridge 181:57724642e740 133 GIC_SetConfiguration((IRQn_Type)(nIRQn_h + obj->ch), 1);
AnnaBridge 181:57724642e740 134 obj->int_enable = 1;
AnnaBridge 181:57724642e740 135 __enable_irq();
AnnaBridge 181:57724642e740 136
AnnaBridge 181:57724642e740 137 return 0;
AnnaBridge 181:57724642e740 138 }
AnnaBridge 181:57724642e740 139
AnnaBridge 181:57724642e740 140 void gpio_irq_free(gpio_irq_t *obj) {
AnnaBridge 181:57724642e740 141 channel_obj[obj->ch] = NULL;
AnnaBridge 181:57724642e740 142 }
AnnaBridge 181:57724642e740 143
AnnaBridge 181:57724642e740 144 void gpio_irq_set(gpio_irq_t *obj, gpio_irq_event event, uint32_t enable) {
AnnaBridge 181:57724642e740 145 int shift = obj->ch*2;
AnnaBridge 181:57724642e740 146 uint16_t val = event == IRQ_RISE ? 2 :
AnnaBridge 181:57724642e740 147 event == IRQ_FALL ? 1 : 0;
AnnaBridge 181:57724642e740 148 uint16_t work_icr_val;
AnnaBridge 181:57724642e740 149
AnnaBridge 181:57724642e740 150 /* check edge interrupt setting */
AnnaBridge 181:57724642e740 151 work_icr_val = INTCICR1;
AnnaBridge 181:57724642e740 152 if (enable == 1) {
AnnaBridge 181:57724642e740 153 /* Set interrupt serect */
AnnaBridge 181:57724642e740 154 work_icr_val |= (val << shift);
AnnaBridge 181:57724642e740 155 } else {
AnnaBridge 181:57724642e740 156 /* Clear interrupt serect */
AnnaBridge 181:57724642e740 157 work_icr_val &= ~(val << shift);
AnnaBridge 181:57724642e740 158 }
AnnaBridge 181:57724642e740 159
AnnaBridge 181:57724642e740 160 if ((work_icr_val & (3 << shift)) == 0) {
AnnaBridge 181:57724642e740 161 /* No edge interrupt setting */
AnnaBridge 181:57724642e740 162 GIC_DisableIRQ((IRQn_Type)(nIRQn_h+obj->ch));
AnnaBridge 181:57724642e740 163 /* Clear Interrupt flags */
AnnaBridge 181:57724642e740 164 INTCIRQRR &= ~(1 << obj->ch);
AnnaBridge 181:57724642e740 165 INTCICR1 = work_icr_val;
AnnaBridge 181:57724642e740 166 } else if (obj->int_enable == 1) {
AnnaBridge 181:57724642e740 167 INTCICR1 = work_icr_val;
AnnaBridge 181:57724642e740 168 GIC_EnableIRQ((IRQn_Type)(nIRQn_h + obj->ch));
AnnaBridge 181:57724642e740 169 } else {
AnnaBridge 181:57724642e740 170 INTCICR1 = work_icr_val;
AnnaBridge 181:57724642e740 171 }
AnnaBridge 181:57724642e740 172 }
AnnaBridge 181:57724642e740 173
AnnaBridge 181:57724642e740 174 void gpio_irq_enable(gpio_irq_t *obj) {
AnnaBridge 181:57724642e740 175 int shift = obj->ch*2;
AnnaBridge 181:57724642e740 176 uint16_t work_icr_val = INTCICR1;
AnnaBridge 181:57724642e740 177
AnnaBridge 181:57724642e740 178 /* check edge interrupt setting */
AnnaBridge 181:57724642e740 179 if ((work_icr_val & (3 << shift)) != 0) {
AnnaBridge 181:57724642e740 180 GIC_EnableIRQ((IRQn_Type)(nIRQn_h + obj->ch));
AnnaBridge 181:57724642e740 181 }
AnnaBridge 181:57724642e740 182 obj->int_enable = 1;
AnnaBridge 181:57724642e740 183 }
AnnaBridge 181:57724642e740 184
AnnaBridge 181:57724642e740 185 void gpio_irq_disable(gpio_irq_t *obj) {
AnnaBridge 181:57724642e740 186 GIC_DisableIRQ((IRQn_Type)(nIRQn_h + obj->ch));
AnnaBridge 181:57724642e740 187 obj->int_enable = 0;
AnnaBridge 181:57724642e740 188 }
AnnaBridge 181:57724642e740 189