mbed official / mbed-dev

mbed library sources. Supersedes mbed-src.

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

targets/TARGET_TT/TARGET_TT_M3HQ/port_api.c@189:f392fc9709a3, 2019-02-20 (annotated)

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

Who changed what in which revision?

UserRevisionLine numberNew contents of line
AnnaBridge 189:f392fc9709a3 1 /* mbed Microcontroller Library
AnnaBridge 189:f392fc9709a3 2 * (C)Copyright TOSHIBA ELECTRONIC DEVICES & STORAGE CORPORATION 2018 All rights reserved
AnnaBridge 189:f392fc9709a3 3 * SPDX-License-Identifier: Apache-2.0
AnnaBridge 189:f392fc9709a3 4 * Licensed under the Apache License, Version 2.0 (the "License");
AnnaBridge 189:f392fc9709a3 5 * you may not use this file except in compliance with the License.
AnnaBridge 189:f392fc9709a3 6 * You may obtain a copy of the License at
AnnaBridge 189:f392fc9709a3 7 *
AnnaBridge 189:f392fc9709a3 8 * http://www.apache.org/licenses/LICENSE-2.0
AnnaBridge 189:f392fc9709a3 9 *
AnnaBridge 189:f392fc9709a3 10 * Unless required by applicable law or agreed to in writing, software
AnnaBridge 189:f392fc9709a3 11 * distributed under the License is distributed on an "AS IS" BASIS,
AnnaBridge 189:f392fc9709a3 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
AnnaBridge 189:f392fc9709a3 13 * See the License for the specific language governing permissions and
AnnaBridge 189:f392fc9709a3 14 * limitations under the License.
AnnaBridge 189:f392fc9709a3 15 */
AnnaBridge 189:f392fc9709a3 16 #include "port_api.h"
AnnaBridge 189:f392fc9709a3 17 #include "pinmap.h"
AnnaBridge 189:f392fc9709a3 18 #include "gpio_include.h"
AnnaBridge 189:f392fc9709a3 19
AnnaBridge 189:f392fc9709a3 20 #define PORT_PIN_NUM 8
AnnaBridge 189:f392fc9709a3 21
AnnaBridge 189:f392fc9709a3 22 PinName port_pin(PortName port, int pin_n)
AnnaBridge 189:f392fc9709a3 23 {
AnnaBridge 189:f392fc9709a3 24 PinName pin = NC;
AnnaBridge 189:f392fc9709a3 25 pin = (PinName) ((port << 3 ) | pin_n);
AnnaBridge 189:f392fc9709a3 26 return pin;
AnnaBridge 189:f392fc9709a3 27 }
AnnaBridge 189:f392fc9709a3 28
AnnaBridge 189:f392fc9709a3 29 void port_init(port_t *obj, PortName port, int mask, PinDirection dir)
AnnaBridge 189:f392fc9709a3 30 {
AnnaBridge 189:f392fc9709a3 31 uint8_t i = 0;
AnnaBridge 189:f392fc9709a3 32
AnnaBridge 189:f392fc9709a3 33 // Assert that port is valid
AnnaBridge 189:f392fc9709a3 34 MBED_ASSERT(port <= PortV);
AnnaBridge 189:f392fc9709a3 35
AnnaBridge 189:f392fc9709a3 36 // Store port and port mask for future use
AnnaBridge 189:f392fc9709a3 37 obj->port = port;
AnnaBridge 189:f392fc9709a3 38 obj->mask = mask;
AnnaBridge 189:f392fc9709a3 39 // Enabling Port Clock Supply
AnnaBridge 189:f392fc9709a3 40 TSB_CG->FSYSENA |= (1<<(obj->port));
AnnaBridge 189:f392fc9709a3 41 // Set port function and port direction
AnnaBridge 189:f392fc9709a3 42 for (i = 0; i < PORT_PIN_NUM; i++) {
AnnaBridge 189:f392fc9709a3 43 if (obj->mask & (1 << i)) { // If the pin is used
AnnaBridge 189:f392fc9709a3 44 pin_function(port_pin(obj->port, i), dir);
AnnaBridge 189:f392fc9709a3 45 }
AnnaBridge 189:f392fc9709a3 46 }
AnnaBridge 189:f392fc9709a3 47 }
AnnaBridge 189:f392fc9709a3 48
AnnaBridge 189:f392fc9709a3 49 void port_mode(port_t *obj, PinMode mode)
AnnaBridge 189:f392fc9709a3 50 {
AnnaBridge 189:f392fc9709a3 51 uint8_t i = 0;
AnnaBridge 189:f392fc9709a3 52
AnnaBridge 189:f392fc9709a3 53 // Assert that port is valid
AnnaBridge 189:f392fc9709a3 54 MBED_ASSERT(obj->port <= PortV);
AnnaBridge 189:f392fc9709a3 55
AnnaBridge 189:f392fc9709a3 56 // Set mode for masked pins
AnnaBridge 189:f392fc9709a3 57 for (i = 0; i < PORT_PIN_NUM; i++) {
AnnaBridge 189:f392fc9709a3 58 if (obj->mask & (1 << i)) { // If the pin is used
AnnaBridge 189:f392fc9709a3 59 pin_mode(port_pin(obj->port, i), mode);
AnnaBridge 189:f392fc9709a3 60 }
AnnaBridge 189:f392fc9709a3 61 }
AnnaBridge 189:f392fc9709a3 62 }
AnnaBridge 189:f392fc9709a3 63
AnnaBridge 189:f392fc9709a3 64 void port_dir(port_t *obj, PinDirection dir)
AnnaBridge 189:f392fc9709a3 65 {
AnnaBridge 189:f392fc9709a3 66 uint8_t bit = 0;
AnnaBridge 189:f392fc9709a3 67 // Assert that port is valid
AnnaBridge 189:f392fc9709a3 68 MBED_ASSERT(obj->port <= PortV);
AnnaBridge 189:f392fc9709a3 69 // Set direction for masked pins
AnnaBridge 189:f392fc9709a3 70 switch (dir) {
AnnaBridge 189:f392fc9709a3 71 case PIN_INPUT:
AnnaBridge 189:f392fc9709a3 72 for (bit = 0; bit < PORT_PIN_NUM; bit++) {
AnnaBridge 189:f392fc9709a3 73 if (((obj->mask >> bit) & 0x01) == 0x01) {
AnnaBridge 189:f392fc9709a3 74 pin_function((PinName)bit, PIN_INPUT);
AnnaBridge 189:f392fc9709a3 75 }
AnnaBridge 189:f392fc9709a3 76 }
AnnaBridge 189:f392fc9709a3 77 break;
AnnaBridge 189:f392fc9709a3 78 case PIN_OUTPUT:
AnnaBridge 189:f392fc9709a3 79 for (bit = 0; bit < PORT_PIN_NUM; bit++) {
AnnaBridge 189:f392fc9709a3 80 if (((obj->mask >> bit) & 0x01) == 0x01) {
AnnaBridge 189:f392fc9709a3 81 pin_function((PinName)bit, PIN_OUTPUT);
AnnaBridge 189:f392fc9709a3 82 }
AnnaBridge 189:f392fc9709a3 83 }
AnnaBridge 189:f392fc9709a3 84 break;
AnnaBridge 189:f392fc9709a3 85 case PIN_INOUT:
AnnaBridge 189:f392fc9709a3 86 for (bit = 0; bit < PORT_PIN_NUM; bit++) {
AnnaBridge 189:f392fc9709a3 87 if (((obj->mask >> bit) & 0x01) == 0x01) {
AnnaBridge 189:f392fc9709a3 88 pin_function((PinName)bit, PIN_INOUT);
AnnaBridge 189:f392fc9709a3 89 }
AnnaBridge 189:f392fc9709a3 90 }
AnnaBridge 189:f392fc9709a3 91 break;
AnnaBridge 189:f392fc9709a3 92 default:
AnnaBridge 189:f392fc9709a3 93 break;
AnnaBridge 189:f392fc9709a3 94 }
AnnaBridge 189:f392fc9709a3 95 }
AnnaBridge 189:f392fc9709a3 96
AnnaBridge 189:f392fc9709a3 97 void port_write(port_t *obj, int value)
AnnaBridge 189:f392fc9709a3 98 {
AnnaBridge 189:f392fc9709a3 99 uint8_t port_data = 0;
AnnaBridge 189:f392fc9709a3 100 uint8_t data = 0;
AnnaBridge 189:f392fc9709a3 101 int bit = 0;
AnnaBridge 189:f392fc9709a3 102 uint8_t val = 0;
AnnaBridge 189:f392fc9709a3 103 uint32_t base;
AnnaBridge 189:f392fc9709a3 104
AnnaBridge 189:f392fc9709a3 105 // Assert that port is valid
AnnaBridge 189:f392fc9709a3 106 MBED_ASSERT(obj->port <= PortV);
AnnaBridge 189:f392fc9709a3 107 base = BITBAND_PORT_BASE(obj->port);
AnnaBridge 189:f392fc9709a3 108 base = BITBAND_PORT_MODE_BASE(base, GPIO_Mode_DATA);
AnnaBridge 189:f392fc9709a3 109 // Get current data of port
AnnaBridge 189:f392fc9709a3 110 for (bit = 7; bit >= 0; bit--) {
AnnaBridge 189:f392fc9709a3 111 BITBAND_PORT_READ(val, base, bit);
AnnaBridge 189:f392fc9709a3 112 port_data <<= 1;
AnnaBridge 189:f392fc9709a3 113 port_data |= val;
AnnaBridge 189:f392fc9709a3 114 }
AnnaBridge 189:f392fc9709a3 115 // Calculate data to write to masked pins
AnnaBridge 189:f392fc9709a3 116 data = (port_data & ~obj->mask) | (value & obj->mask);
AnnaBridge 189:f392fc9709a3 117 for (bit = 0; bit < PORT_PIN_NUM; bit++) {
AnnaBridge 189:f392fc9709a3 118 if (((obj->mask >> bit) & 0x01) == 0x01) {
AnnaBridge 189:f392fc9709a3 119 if(((data >> bit) & 0x01) == GPIO_PIN_SET) {
AnnaBridge 189:f392fc9709a3 120 BITBAND_PORT_SET(base, bit);
AnnaBridge 189:f392fc9709a3 121 } else {
AnnaBridge 189:f392fc9709a3 122 BITBAND_PORT_CLR(base, bit);
AnnaBridge 189:f392fc9709a3 123 }
AnnaBridge 189:f392fc9709a3 124 }
AnnaBridge 189:f392fc9709a3 125 }
AnnaBridge 189:f392fc9709a3 126 }
AnnaBridge 189:f392fc9709a3 127
AnnaBridge 189:f392fc9709a3 128 int port_read(port_t *obj)
AnnaBridge 189:f392fc9709a3 129 {
AnnaBridge 189:f392fc9709a3 130 uint8_t port_data = 0;
AnnaBridge 189:f392fc9709a3 131 uint8_t data = 0;
AnnaBridge 189:f392fc9709a3 132 int bit = 0;
AnnaBridge 189:f392fc9709a3 133 uint8_t val = 0;
AnnaBridge 189:f392fc9709a3 134 uint32_t base;
AnnaBridge 189:f392fc9709a3 135
AnnaBridge 189:f392fc9709a3 136 // Assert that port is valid
AnnaBridge 189:f392fc9709a3 137 MBED_ASSERT(obj->port <= PortV);
AnnaBridge 189:f392fc9709a3 138 base = BITBAND_PORT_BASE(obj->port);
AnnaBridge 189:f392fc9709a3 139 base = BITBAND_PORT_MODE_BASE(base, GPIO_Mode_DATA);
AnnaBridge 189:f392fc9709a3 140
AnnaBridge 189:f392fc9709a3 141 // Get current data of port
AnnaBridge 189:f392fc9709a3 142 for (bit = 7; bit >= 0; bit--) {
AnnaBridge 189:f392fc9709a3 143 BITBAND_PORT_READ(val, base, bit);
AnnaBridge 189:f392fc9709a3 144 port_data <<= 1;
AnnaBridge 189:f392fc9709a3 145 port_data |= val;
AnnaBridge 189:f392fc9709a3 146 }
AnnaBridge 189:f392fc9709a3 147 // Calculate data of masked pins
AnnaBridge 189:f392fc9709a3 148 data = port_data & obj->mask;
AnnaBridge 189:f392fc9709a3 149 return data;
AnnaBridge 189:f392fc9709a3 150 }