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
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 * Copyright (c) 2018 GigaDevice Semiconductor Inc.
AnnaBridge 189:f392fc9709a3 3 *
AnnaBridge 189:f392fc9709a3 4 * SPDX-License-Identifier: Apache-2.0
AnnaBridge 189:f392fc9709a3 5 *
AnnaBridge 189:f392fc9709a3 6 * Licensed under the Apache License, Version 2.0 (the "License");
AnnaBridge 189:f392fc9709a3 7 * you may not use this file except in compliance with the License.
AnnaBridge 189:f392fc9709a3 8 * You may obtain a copy of the License at
AnnaBridge 189:f392fc9709a3 9 *
AnnaBridge 189:f392fc9709a3 10 * http://www.apache.org/licenses/LICENSE-2.0
AnnaBridge 189:f392fc9709a3 11 *
AnnaBridge 189:f392fc9709a3 12 * Unless required by applicable law or agreed to in writing, software
AnnaBridge 189:f392fc9709a3 13 * distributed under the License is distributed on an "AS IS" BASIS,
AnnaBridge 189:f392fc9709a3 14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
AnnaBridge 189:f392fc9709a3 15 * See the License for the specific language governing permissions and
AnnaBridge 189:f392fc9709a3 16 * limitations under the License.
AnnaBridge 189:f392fc9709a3 17 */
AnnaBridge 189:f392fc9709a3 18 #include "port_api.h"
AnnaBridge 189:f392fc9709a3 19 #include "pinmap.h"
AnnaBridge 189:f392fc9709a3 20 #include "gpio_api.h"
AnnaBridge 189:f392fc9709a3 21 #include "mbed_error.h"
AnnaBridge 189:f392fc9709a3 22
AnnaBridge 189:f392fc9709a3 23 #if DEVICE_PORTIN || DEVICE_PORTOUT
AnnaBridge 189:f392fc9709a3 24
AnnaBridge 189:f392fc9709a3 25 extern uint32_t gpio_clock_enable(uint32_t port_idx);
AnnaBridge 189:f392fc9709a3 26
AnnaBridge 189:f392fc9709a3 27 /** Get the pin name from the port's pin number
AnnaBridge 189:f392fc9709a3 28 *
AnnaBridge 189:f392fc9709a3 29 * @param port The port name
AnnaBridge 189:f392fc9709a3 30 * @param pin_n The pin number within the specified port
AnnaBridge 189:f392fc9709a3 31 * @return The pin name for the port's pin number
AnnaBridge 189:f392fc9709a3 32 * BIT[7:4] port number
AnnaBridge 189:f392fc9709a3 33 BIT[3:0] pin number
AnnaBridge 189:f392fc9709a3 34 */
AnnaBridge 189:f392fc9709a3 35 PinName port_pin(PortName port, int pin_n)
AnnaBridge 189:f392fc9709a3 36 {
AnnaBridge 189:f392fc9709a3 37 return (PinName)(pin_n + (port << 4));
AnnaBridge 189:f392fc9709a3 38 }
AnnaBridge 189:f392fc9709a3 39
AnnaBridge 189:f392fc9709a3 40 /** Initilize the port
AnnaBridge 189:f392fc9709a3 41 *
AnnaBridge 189:f392fc9709a3 42 * @param obj The port object to initialize
AnnaBridge 189:f392fc9709a3 43 * @param port The port name
AnnaBridge 189:f392fc9709a3 44 * @param mask The bitmask to identify which bits in the port should be included (0 - ignore)
AnnaBridge 189:f392fc9709a3 45 * @param dir The port direction
AnnaBridge 189:f392fc9709a3 46 */
AnnaBridge 189:f392fc9709a3 47 void port_init(port_t *obj, PortName port, int mask, PinDirection dir)
AnnaBridge 189:f392fc9709a3 48 {
AnnaBridge 189:f392fc9709a3 49 uint32_t port_index = (uint32_t)port;
AnnaBridge 189:f392fc9709a3 50 uint32_t gpio = gpio_clock_enable(port_index);
AnnaBridge 189:f392fc9709a3 51
AnnaBridge 189:f392fc9709a3 52 obj->port = port;
AnnaBridge 189:f392fc9709a3 53 obj->mask = mask;
AnnaBridge 189:f392fc9709a3 54 obj->direction = dir;
AnnaBridge 189:f392fc9709a3 55 obj->reg_in = &GPIO_ISTAT(gpio);
AnnaBridge 189:f392fc9709a3 56 obj->reg_out = &GPIO_OCTL(gpio);
AnnaBridge 189:f392fc9709a3 57
AnnaBridge 189:f392fc9709a3 58 port_dir(obj, dir);
AnnaBridge 189:f392fc9709a3 59 }
AnnaBridge 189:f392fc9709a3 60
AnnaBridge 189:f392fc9709a3 61 /** Set port direction (in/out)
AnnaBridge 189:f392fc9709a3 62 *
AnnaBridge 189:f392fc9709a3 63 * @param obj The port object
AnnaBridge 189:f392fc9709a3 64 * @param dir The port direction to be set
AnnaBridge 189:f392fc9709a3 65 */
AnnaBridge 189:f392fc9709a3 66 void port_dir(port_t *obj, PinDirection dir)
AnnaBridge 189:f392fc9709a3 67 {
AnnaBridge 189:f392fc9709a3 68 uint32_t i;
AnnaBridge 189:f392fc9709a3 69 obj->direction = dir;
AnnaBridge 189:f392fc9709a3 70 for (i = 0; i < 16; i++) {
AnnaBridge 189:f392fc9709a3 71 if (obj->mask & (1 << i)) {
AnnaBridge 189:f392fc9709a3 72 if (dir == PIN_OUTPUT) {
AnnaBridge 189:f392fc9709a3 73 pin_function(port_pin(obj->port, i), MODE_OUT_PP);
AnnaBridge 189:f392fc9709a3 74 } else {
AnnaBridge 189:f392fc9709a3 75 pin_function(port_pin(obj->port, i), MODE_IN_FLOATING);
AnnaBridge 189:f392fc9709a3 76 }
AnnaBridge 189:f392fc9709a3 77 }
AnnaBridge 189:f392fc9709a3 78 }
AnnaBridge 189:f392fc9709a3 79 }
AnnaBridge 189:f392fc9709a3 80
AnnaBridge 189:f392fc9709a3 81 /** Set the input port mode
AnnaBridge 189:f392fc9709a3 82 *
AnnaBridge 189:f392fc9709a3 83 * @param obj The port object
AnnaBridge 189:f392fc9709a3 84 * @param mode THe port mode to be set
AnnaBridge 189:f392fc9709a3 85 */
AnnaBridge 189:f392fc9709a3 86 void port_mode(port_t *obj, PinMode mode)
AnnaBridge 189:f392fc9709a3 87 {
AnnaBridge 189:f392fc9709a3 88 uint32_t i;
AnnaBridge 189:f392fc9709a3 89 for (i = 0; i < 16; i++) {
AnnaBridge 189:f392fc9709a3 90 if (obj->mask & (1 << i)) {
AnnaBridge 189:f392fc9709a3 91 pin_mode(port_pin(obj->port, i), mode);
AnnaBridge 189:f392fc9709a3 92 }
AnnaBridge 189:f392fc9709a3 93 }
AnnaBridge 189:f392fc9709a3 94 }
AnnaBridge 189:f392fc9709a3 95
AnnaBridge 189:f392fc9709a3 96 /** Write value to the port
AnnaBridge 189:f392fc9709a3 97 *
AnnaBridge 189:f392fc9709a3 98 * @param obj The port object
AnnaBridge 189:f392fc9709a3 99 * @param value The value to be set
AnnaBridge 189:f392fc9709a3 100 */
AnnaBridge 189:f392fc9709a3 101 void port_write(port_t *obj, int value)
AnnaBridge 189:f392fc9709a3 102 {
AnnaBridge 189:f392fc9709a3 103 *obj->reg_out = (*obj->reg_out & ~obj->mask) | (value & obj->mask);
AnnaBridge 189:f392fc9709a3 104 }
AnnaBridge 189:f392fc9709a3 105
AnnaBridge 189:f392fc9709a3 106 /** Read the current value on the port
AnnaBridge 189:f392fc9709a3 107 *
AnnaBridge 189:f392fc9709a3 108 * @param obj The port object
AnnaBridge 189:f392fc9709a3 109 * @return An integer with each bit corresponding to an associated port pin setting
AnnaBridge 189:f392fc9709a3 110 */
AnnaBridge 189:f392fc9709a3 111 int port_read(port_t *obj)
AnnaBridge 189:f392fc9709a3 112 {
AnnaBridge 189:f392fc9709a3 113 if (obj->direction == PIN_OUTPUT) {
AnnaBridge 189:f392fc9709a3 114 return (*obj->reg_out & obj->mask);
AnnaBridge 189:f392fc9709a3 115 } else {
AnnaBridge 189:f392fc9709a3 116 return (*obj->reg_in & obj->mask);
AnnaBridge 189:f392fc9709a3 117 }
AnnaBridge 189:f392fc9709a3 118 }
AnnaBridge 189:f392fc9709a3 119
AnnaBridge 189:f392fc9709a3 120 #endif