t

Fork of mbed-dev by mbed official

Committer:
bogdanm
Date:
Thu Oct 01 15:25:22 2015 +0300
Revision:
0:9b334a45a8ff
Child:
144:ef7eb2e8f9f7
Initial commit on mbed-dev

Replaces mbed-src (now inactive)

Who changed what in which revision?

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