mbed library sources

Dependents:   FRDM-KL46Z_LCD_Test FRDM-KL46Z_LCD_Test FRDM-KL46Z_Plantilla FRDM-KL46Z_Plantilla ... more

Committer:
ebrus
Date:
Thu Jul 28 15:56:34 2016 +0000
Revision:
0:6bc4ac881c8e
1;

Who changed what in which revision?

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