mbed official / mbed-dev

mbed library sources. Supersedes mbed-src.

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

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

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

Who changed what in which revision?

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