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_TMPM46B/port_api.c@189:f392fc9709a3, 2019-02-20 (annotated)

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

Who changed what in which revision?

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