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:
186:707f6e361f3e
mbed library release version 165

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Anna Bridge 186:707f6e361f3e 1 /* mbed Microcontroller Library
Anna Bridge 186:707f6e361f3e 2 * Copyright (c) 2006-2018 ARM Limited
Anna Bridge 186:707f6e361f3e 3 *
Anna Bridge 186:707f6e361f3e 4 * Licensed under the Apache License, Version 2.0 (the "License");
Anna Bridge 186:707f6e361f3e 5 * you may not use this file except in compliance with the License.
Anna Bridge 186:707f6e361f3e 6 * You may obtain a copy of the License at
Anna Bridge 186:707f6e361f3e 7 *
Anna Bridge 186:707f6e361f3e 8 * http://www.apache.org/licenses/LICENSE-2.0
Anna Bridge 186:707f6e361f3e 9 *
Anna Bridge 186:707f6e361f3e 10 * Unless required by applicable law or agreed to in writing, software
Anna Bridge 186:707f6e361f3e 11 * distributed under the License is distributed on an "AS IS" BASIS,
Anna Bridge 186:707f6e361f3e 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
Anna Bridge 186:707f6e361f3e 13 * See the License for the specific language governing permissions and
Anna Bridge 186:707f6e361f3e 14 * limitations under the License.
Anna Bridge 186:707f6e361f3e 15 */
Anna Bridge 186:707f6e361f3e 16 #include "gpio_api.h"
Anna Bridge 186:707f6e361f3e 17 #include "pinmap.h"
Anna Bridge 186:707f6e361f3e 18
Anna Bridge 186:707f6e361f3e 19 // function to enable the GPIO pin
Anna Bridge 186:707f6e361f3e 20 uint32_t gpio_set(PinName pin)
Anna Bridge 186:707f6e361f3e 21 {
Anna Bridge 186:707f6e361f3e 22 return (1);
Anna Bridge 186:707f6e361f3e 23 }
Anna Bridge 186:707f6e361f3e 24
Anna Bridge 186:707f6e361f3e 25 //function to initialise the gpio pin
Anna Bridge 186:707f6e361f3e 26 // this links the board control bits for each pin
Anna Bridge 186:707f6e361f3e 27 // with the object created for the pin
Anna Bridge 186:707f6e361f3e 28 void gpio_init(gpio_t *obj, PinName pin)
Anna Bridge 186:707f6e361f3e 29 {
Anna Bridge 186:707f6e361f3e 30 if (pin == NC) {
Anna Bridge 186:707f6e361f3e 31 return;
Anna Bridge 186:707f6e361f3e 32 } else {
Anna Bridge 186:707f6e361f3e 33 int pin_value = 0;
Anna Bridge 186:707f6e361f3e 34 obj->pin = pin;
Anna Bridge 186:707f6e361f3e 35 if (pin <= 15) {
Anna Bridge 186:707f6e361f3e 36 pin_value = pin;
Anna Bridge 186:707f6e361f3e 37 } else if (pin >= 16 && pin <= 31) {
Anna Bridge 186:707f6e361f3e 38 pin_value = pin - 16;
Anna Bridge 186:707f6e361f3e 39 } else if (pin >= 32 && pin <= 47) {
Anna Bridge 186:707f6e361f3e 40 pin_value = pin - 32;
Anna Bridge 186:707f6e361f3e 41 } else if (pin >= 48 && pin <= 51) {
Anna Bridge 186:707f6e361f3e 42 pin_value = pin - 48;
Anna Bridge 186:707f6e361f3e 43 } else if (pin == 100 || pin == 101) {
Anna Bridge 186:707f6e361f3e 44 pin_value = pin - 100;
Anna Bridge 186:707f6e361f3e 45 } else if (pin == 110 || pin == 111) {
Anna Bridge 186:707f6e361f3e 46 pin_value = pin - 110;
Anna Bridge 186:707f6e361f3e 47 } else if (pin >= 200 && pin <= 207) {
Anna Bridge 186:707f6e361f3e 48 pin_value = pin - 200;
Anna Bridge 186:707f6e361f3e 49 } else if (pin >= 210 && pin <= 217) {
Anna Bridge 186:707f6e361f3e 50 pin_value = pin - 210;
Anna Bridge 186:707f6e361f3e 51 } else if (pin == 303) {
Anna Bridge 186:707f6e361f3e 52 pin_value = pin - 302;
Anna Bridge 186:707f6e361f3e 53 } else if (pin == 307) {
Anna Bridge 186:707f6e361f3e 54 pin_value = pin - 307;
Anna Bridge 186:707f6e361f3e 55 } else if (pin == 308) {
Anna Bridge 186:707f6e361f3e 56 pin_value = pin - 305;
Anna Bridge 186:707f6e361f3e 57 } else if (pin == 309) {
Anna Bridge 186:707f6e361f3e 58 pin_value = pin - 305;
Anna Bridge 186:707f6e361f3e 59 } else if (pin == 310) {
Anna Bridge 186:707f6e361f3e 60 pin_value = pin - 305;
Anna Bridge 186:707f6e361f3e 61 } else if (pin == 311) {
Anna Bridge 186:707f6e361f3e 62 pin_value = pin - 305;
Anna Bridge 186:707f6e361f3e 63 } else if (pin == 323) {
Anna Bridge 186:707f6e361f3e 64 pin_value = pin - 315;
Anna Bridge 186:707f6e361f3e 65 } else if (pin == 334) {
Anna Bridge 186:707f6e361f3e 66 pin_value = pin - 325;
Anna Bridge 186:707f6e361f3e 67 } else if (pin == 653) {
Anna Bridge 186:707f6e361f3e 68 pin_value = pin - 646;
Anna Bridge 186:707f6e361f3e 69 }
Anna Bridge 186:707f6e361f3e 70
Anna Bridge 186:707f6e361f3e 71 obj->mask = 0x1 << pin_value;
Anna Bridge 186:707f6e361f3e 72 obj->pin_number = pin;
Anna Bridge 186:707f6e361f3e 73 if (pin <= 15) {
Anna Bridge 186:707f6e361f3e 74 obj->reg_data = &CMSDK_GPIO0->DATAOUT ;
Anna Bridge 186:707f6e361f3e 75 obj->reg_in = &CMSDK_GPIO0->DATA ;
Anna Bridge 186:707f6e361f3e 76 obj->reg_dir = &CMSDK_GPIO0->OUTENABLESET ;
Anna Bridge 186:707f6e361f3e 77 obj->reg_dirclr = &CMSDK_GPIO0->OUTENABLECLR ;
Anna Bridge 186:707f6e361f3e 78 } else if (pin >= 16 && pin <= 31) {
Anna Bridge 186:707f6e361f3e 79 obj->reg_data = &CMSDK_GPIO1->DATAOUT ;
Anna Bridge 186:707f6e361f3e 80 obj->reg_in = &CMSDK_GPIO1->DATA ;
Anna Bridge 186:707f6e361f3e 81 obj->reg_dir = &CMSDK_GPIO1->OUTENABLESET ;
Anna Bridge 186:707f6e361f3e 82 obj->reg_dirclr = &CMSDK_GPIO1->OUTENABLECLR ;
Anna Bridge 186:707f6e361f3e 83 } else if (pin >= 32 && pin <= 47) {
Anna Bridge 186:707f6e361f3e 84 obj->reg_data = &CMSDK_GPIO2->DATAOUT;
Anna Bridge 186:707f6e361f3e 85 obj->reg_in = &CMSDK_GPIO2->DATA;
Anna Bridge 186:707f6e361f3e 86 obj->reg_dir = &CMSDK_GPIO2->OUTENABLESET ;
Anna Bridge 186:707f6e361f3e 87 obj->reg_dirclr = &CMSDK_GPIO2->OUTENABLECLR ;
Anna Bridge 186:707f6e361f3e 88 } else if (pin >= 48 && pin <= 51) {
Anna Bridge 186:707f6e361f3e 89 obj->reg_data = &CMSDK_GPIO3->DATAOUT;
Anna Bridge 186:707f6e361f3e 90 obj->reg_in = &CMSDK_GPIO3->DATA;
Anna Bridge 186:707f6e361f3e 91 obj->reg_dir = &CMSDK_GPIO3->OUTENABLESET ;
Anna Bridge 186:707f6e361f3e 92 obj->reg_dirclr = &CMSDK_GPIO3->OUTENABLECLR ;
Anna Bridge 186:707f6e361f3e 93 } else if (pin == 100 || pin == 101) {
Anna Bridge 186:707f6e361f3e 94 obj->reg_data = &MPS2_FPGAIO->LED; //user leds
Anna Bridge 186:707f6e361f3e 95 obj->reg_in = &MPS2_FPGAIO->LED;
Anna Bridge 186:707f6e361f3e 96 } else if (pin == 110 || pin == 111) {
Anna Bridge 186:707f6e361f3e 97 obj->reg_data = &MPS2_FPGAIO->BUTTON; //user switches
Anna Bridge 186:707f6e361f3e 98 obj->reg_in = &MPS2_FPGAIO->BUTTON; //user switches
Anna Bridge 186:707f6e361f3e 99 } else if (pin >= 200 && pin <= 207) {
Anna Bridge 186:707f6e361f3e 100 obj->reg_data = &MPS2_SCC->LEDS; //mcc leds
Anna Bridge 186:707f6e361f3e 101 obj->reg_in = &MPS2_SCC->LEDS; //mcc leds
Anna Bridge 186:707f6e361f3e 102 } else if (pin >= 210 && pin <= 217) {
Anna Bridge 186:707f6e361f3e 103 obj->reg_in = &MPS2_SCC->SWITCHES; //mcc switches
Anna Bridge 186:707f6e361f3e 104 } else if (pin == 303 || pin == 307) {
Anna Bridge 186:707f6e361f3e 105 obj->reg_data = &MPS2_FPGAIO->MISC; //spi chip select = 303, clcd chip select = 307
Anna Bridge 186:707f6e361f3e 106 } else if (pin == 308 || pin == 309 || pin == 310 || pin == 311) {
Anna Bridge 186:707f6e361f3e 107 obj->reg_data = &MPS2_FPGAIO->MISC; //clcd control bits
Anna Bridge 186:707f6e361f3e 108 } else if (pin == 323 || pin == 334 || pin == 653) { //spi 3 chip select = 323, spi 4 chip select = 334, adc chip select = 653
Anna Bridge 186:707f6e361f3e 109 obj->reg_data = &MPS2_FPGAIO->MISC; //spi cs bits
Anna Bridge 186:707f6e361f3e 110 }
Anna Bridge 186:707f6e361f3e 111
Anna Bridge 186:707f6e361f3e 112 if (pin == 323) {
Anna Bridge 186:707f6e361f3e 113 CMSDK_GPIO0->ALTFUNCSET |= 0x1000;
Anna Bridge 186:707f6e361f3e 114 } else if (pin == 334) {
Anna Bridge 186:707f6e361f3e 115 CMSDK_GPIO2->ALTFUNCSET |= 0x0040;
Anna Bridge 186:707f6e361f3e 116 } else if (pin == 653) {
Anna Bridge 186:707f6e361f3e 117 CMSDK_GPIO1->ALTFUNCSET |= 0x0001;
Anna Bridge 186:707f6e361f3e 118 }
Anna Bridge 186:707f6e361f3e 119 }
Anna Bridge 186:707f6e361f3e 120 }
Anna Bridge 186:707f6e361f3e 121
Anna Bridge 186:707f6e361f3e 122 void gpio_mode(gpio_t *obj, PinMode mode)
Anna Bridge 186:707f6e361f3e 123 {
Anna Bridge 186:707f6e361f3e 124 pin_mode(obj->pin, mode);
Anna Bridge 186:707f6e361f3e 125 }
Anna Bridge 186:707f6e361f3e 126
Anna Bridge 186:707f6e361f3e 127 void gpio_dir(gpio_t *obj, PinDirection direction)
Anna Bridge 186:707f6e361f3e 128 {
Anna Bridge 186:707f6e361f3e 129 if (obj->pin >= 0 && obj->pin <= 51) {
Anna Bridge 186:707f6e361f3e 130 switch (direction) {
Anna Bridge 186:707f6e361f3e 131 case PIN_INPUT :
Anna Bridge 186:707f6e361f3e 132 *obj->reg_dirclr = obj->mask;
Anna Bridge 186:707f6e361f3e 133 break;
Anna Bridge 186:707f6e361f3e 134 case PIN_OUTPUT:
Anna Bridge 186:707f6e361f3e 135 *obj->reg_dir |= obj->mask;
Anna Bridge 186:707f6e361f3e 136 break;
Anna Bridge 186:707f6e361f3e 137 }
Anna Bridge 186:707f6e361f3e 138 } else {
Anna Bridge 186:707f6e361f3e 139 return;
Anna Bridge 186:707f6e361f3e 140 }
Anna Bridge 186:707f6e361f3e 141 }
Anna Bridge 186:707f6e361f3e 142
Anna Bridge 186:707f6e361f3e 143 int gpio_is_connected(const gpio_t *obj)
Anna Bridge 186:707f6e361f3e 144 {
Anna Bridge 186:707f6e361f3e 145 if (obj->pin != (PinName)NC) {
Anna Bridge 186:707f6e361f3e 146 return 1;
Anna Bridge 186:707f6e361f3e 147 } else {
Anna Bridge 186:707f6e361f3e 148 return 0;
Anna Bridge 186:707f6e361f3e 149 }
Anna Bridge 186:707f6e361f3e 150 }
Anna Bridge 186:707f6e361f3e 151