Andrew SaLoutos / mbed-dev-STM-lean

From Ben Katz mbed-dev library. Removed unnecessary target files to reduce the overall size by a factor of 10 to make it easier to import into the online IDE.

Dependents:   motor_driver motor_driver_screaming_fix

targets/TARGET_STM/port_api.c@0:083111ae2a11, 2020-11-26 (annotated)

Committer:
saloutos
Date:
Thu Nov 26 04:08:56 2020 +0000
Revision:
0:083111ae2a11
first commit of leaned mbed dev lib

Who changed what in which revision?

UserRevisionLine numberNew contents of line
saloutos 0:083111ae2a11 1 /* mbed Microcontroller Library
saloutos 0:083111ae2a11 2 *******************************************************************************
saloutos 0:083111ae2a11 3 * Copyright (c) 2016, STMicroelectronics
saloutos 0:083111ae2a11 4 * All rights reserved.
saloutos 0:083111ae2a11 5 *
saloutos 0:083111ae2a11 6 * Redistribution and use in source and binary forms, with or without
saloutos 0:083111ae2a11 7 * modification, are permitted provided that the following conditions are met:
saloutos 0:083111ae2a11 8 *
saloutos 0:083111ae2a11 9 * 1. Redistributions of source code must retain the above copyright notice,
saloutos 0:083111ae2a11 10 * this list of conditions and the following disclaimer.
saloutos 0:083111ae2a11 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
saloutos 0:083111ae2a11 12 * this list of conditions and the following disclaimer in the documentation
saloutos 0:083111ae2a11 13 * and/or other materials provided with the distribution.
saloutos 0:083111ae2a11 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
saloutos 0:083111ae2a11 15 * may be used to endorse or promote products derived from this software
saloutos 0:083111ae2a11 16 * without specific prior written permission.
saloutos 0:083111ae2a11 17 *
saloutos 0:083111ae2a11 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
saloutos 0:083111ae2a11 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
saloutos 0:083111ae2a11 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
saloutos 0:083111ae2a11 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
saloutos 0:083111ae2a11 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
saloutos 0:083111ae2a11 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
saloutos 0:083111ae2a11 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
saloutos 0:083111ae2a11 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
saloutos 0:083111ae2a11 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
saloutos 0:083111ae2a11 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
saloutos 0:083111ae2a11 28 *******************************************************************************
saloutos 0:083111ae2a11 29 */
saloutos 0:083111ae2a11 30 #include "port_api.h"
saloutos 0:083111ae2a11 31 #include "pinmap.h"
saloutos 0:083111ae2a11 32 #include "gpio_api.h"
saloutos 0:083111ae2a11 33 #include "mbed_error.h"
saloutos 0:083111ae2a11 34
saloutos 0:083111ae2a11 35 #if DEVICE_PORTIN || DEVICE_PORTOUT
saloutos 0:083111ae2a11 36
saloutos 0:083111ae2a11 37 extern GPIO_TypeDef *Set_GPIO_Clock(uint32_t port_idx);
saloutos 0:083111ae2a11 38
saloutos 0:083111ae2a11 39 // high nibble = port number (0=A, 1=B, 2=C, 3=D, 4=E, 5=F, ...)
saloutos 0:083111ae2a11 40 // low nibble = pin number
saloutos 0:083111ae2a11 41 PinName port_pin(PortName port, int pin_n)
saloutos 0:083111ae2a11 42 {
saloutos 0:083111ae2a11 43 return (PinName)(pin_n + (port << 4));
saloutos 0:083111ae2a11 44 }
saloutos 0:083111ae2a11 45
saloutos 0:083111ae2a11 46 void port_init(port_t *obj, PortName port, int mask, PinDirection dir)
saloutos 0:083111ae2a11 47 {
saloutos 0:083111ae2a11 48 uint32_t port_index = (uint32_t)port;
saloutos 0:083111ae2a11 49
saloutos 0:083111ae2a11 50 // Enable GPIO clock
saloutos 0:083111ae2a11 51 GPIO_TypeDef *gpio = Set_GPIO_Clock(port_index);
saloutos 0:083111ae2a11 52
saloutos 0:083111ae2a11 53 // Fill PORT object structure for future use
saloutos 0:083111ae2a11 54 obj->port = port;
saloutos 0:083111ae2a11 55 obj->mask = mask;
saloutos 0:083111ae2a11 56 obj->direction = dir;
saloutos 0:083111ae2a11 57 obj->reg_in = &gpio->IDR;
saloutos 0:083111ae2a11 58 obj->reg_out = &gpio->ODR;
saloutos 0:083111ae2a11 59
saloutos 0:083111ae2a11 60 port_dir(obj, dir);
saloutos 0:083111ae2a11 61 }
saloutos 0:083111ae2a11 62
saloutos 0:083111ae2a11 63 void port_dir(port_t *obj, PinDirection dir)
saloutos 0:083111ae2a11 64 {
saloutos 0:083111ae2a11 65 uint32_t i;
saloutos 0:083111ae2a11 66 obj->direction = dir;
saloutos 0:083111ae2a11 67 for (i = 0; i < 16; i++) { // Process all pins
saloutos 0:083111ae2a11 68 if (obj->mask & (1 << i)) { // If the pin is used
saloutos 0:083111ae2a11 69 if (dir == PIN_OUTPUT) {
saloutos 0:083111ae2a11 70 pin_function(port_pin(obj->port, i), STM_PIN_DATA(STM_MODE_OUTPUT_PP, GPIO_NOPULL, 0));
saloutos 0:083111ae2a11 71 } else { // PIN_INPUT
saloutos 0:083111ae2a11 72 pin_function(port_pin(obj->port, i), STM_PIN_DATA(STM_MODE_INPUT, GPIO_NOPULL, 0));
saloutos 0:083111ae2a11 73 }
saloutos 0:083111ae2a11 74 }
saloutos 0:083111ae2a11 75 }
saloutos 0:083111ae2a11 76 }
saloutos 0:083111ae2a11 77
saloutos 0:083111ae2a11 78 void port_mode(port_t *obj, PinMode mode)
saloutos 0:083111ae2a11 79 {
saloutos 0:083111ae2a11 80 uint32_t i;
saloutos 0:083111ae2a11 81 for (i = 0; i < 16; i++) { // Process all pins
saloutos 0:083111ae2a11 82 if (obj->mask & (1 << i)) { // If the pin is used
saloutos 0:083111ae2a11 83 pin_mode(port_pin(obj->port, i), mode);
saloutos 0:083111ae2a11 84 }
saloutos 0:083111ae2a11 85 }
saloutos 0:083111ae2a11 86 }
saloutos 0:083111ae2a11 87
saloutos 0:083111ae2a11 88 void port_write(port_t *obj, int value)
saloutos 0:083111ae2a11 89 {
saloutos 0:083111ae2a11 90 *obj->reg_out = (*obj->reg_out & ~obj->mask) | (value & obj->mask);
saloutos 0:083111ae2a11 91 }
saloutos 0:083111ae2a11 92
saloutos 0:083111ae2a11 93 int port_read(port_t *obj)
saloutos 0:083111ae2a11 94 {
saloutos 0:083111ae2a11 95 if (obj->direction == PIN_OUTPUT) {
saloutos 0:083111ae2a11 96 return (*obj->reg_out & obj->mask);
saloutos 0:083111ae2a11 97 } else { // PIN_INPUT
saloutos 0:083111ae2a11 98 return (*obj->reg_in & obj->mask);
saloutos 0:083111ae2a11 99 }
saloutos 0:083111ae2a11 100 }
saloutos 0:083111ae2a11 101
saloutos 0:083111ae2a11 102 #endif