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 return (PinName)(pin_n + (port << 4));
ebrus 0:6bc4ac881c8e 43 }
ebrus 0:6bc4ac881c8e 44
ebrus 0:6bc4ac881c8e 45 void port_init(port_t *obj, PortName port, int mask, PinDirection dir) {
ebrus 0:6bc4ac881c8e 46 uint32_t port_index = (uint32_t)port;
ebrus 0:6bc4ac881c8e 47
ebrus 0:6bc4ac881c8e 48 // Enable GPIO clock
ebrus 0:6bc4ac881c8e 49 uint32_t gpio_add = Set_GPIO_Clock(port_index);
ebrus 0:6bc4ac881c8e 50 GPIO_TypeDef *gpio = (GPIO_TypeDef *)gpio_add;
ebrus 0:6bc4ac881c8e 51
ebrus 0:6bc4ac881c8e 52 // Fill PORT object structure for future use
ebrus 0:6bc4ac881c8e 53 obj->port = port;
ebrus 0:6bc4ac881c8e 54 obj->mask = mask;
ebrus 0:6bc4ac881c8e 55 obj->direction = dir;
ebrus 0:6bc4ac881c8e 56 obj->reg_in = &gpio->IDR;
ebrus 0:6bc4ac881c8e 57 obj->reg_out = &gpio->ODR;
ebrus 0:6bc4ac881c8e 58
ebrus 0:6bc4ac881c8e 59 port_dir(obj, dir);
ebrus 0:6bc4ac881c8e 60 }
ebrus 0:6bc4ac881c8e 61
ebrus 0:6bc4ac881c8e 62 void port_dir(port_t *obj, PinDirection dir) {
ebrus 0:6bc4ac881c8e 63 uint32_t i;
ebrus 0:6bc4ac881c8e 64 obj->direction = dir;
ebrus 0:6bc4ac881c8e 65 for (i = 0; i < 16; i++) { // Process all pins
ebrus 0:6bc4ac881c8e 66 if (obj->mask & (1 << i)) { // If the pin is used
ebrus 0:6bc4ac881c8e 67 if (dir == PIN_OUTPUT) {
ebrus 0:6bc4ac881c8e 68 pin_function(port_pin(obj->port, i), STM_PIN_DATA(STM_MODE_OUTPUT_PP, GPIO_NOPULL, 0));
ebrus 0:6bc4ac881c8e 69 } else { // PIN_INPUT
ebrus 0:6bc4ac881c8e 70 pin_function(port_pin(obj->port, i), STM_PIN_DATA(STM_MODE_INPUT, GPIO_NOPULL, 0));
ebrus 0:6bc4ac881c8e 71 }
ebrus 0:6bc4ac881c8e 72 }
ebrus 0:6bc4ac881c8e 73 }
ebrus 0:6bc4ac881c8e 74 }
ebrus 0:6bc4ac881c8e 75
ebrus 0:6bc4ac881c8e 76 void port_mode(port_t *obj, PinMode mode) {
ebrus 0:6bc4ac881c8e 77 uint32_t i;
ebrus 0:6bc4ac881c8e 78 for (i = 0; i < 16; i++) { // Process all pins
ebrus 0:6bc4ac881c8e 79 if (obj->mask & (1 << i)) { // If the pin is used
ebrus 0:6bc4ac881c8e 80 pin_mode(port_pin(obj->port, i), mode);
ebrus 0:6bc4ac881c8e 81 }
ebrus 0:6bc4ac881c8e 82 }
ebrus 0:6bc4ac881c8e 83 }
ebrus 0:6bc4ac881c8e 84
ebrus 0:6bc4ac881c8e 85 void port_write(port_t *obj, int value) {
ebrus 0:6bc4ac881c8e 86 *obj->reg_out = (*obj->reg_out & ~obj->mask) | (value & obj->mask);
ebrus 0:6bc4ac881c8e 87 }
ebrus 0:6bc4ac881c8e 88
ebrus 0:6bc4ac881c8e 89 int port_read(port_t *obj) {
ebrus 0:6bc4ac881c8e 90 if (obj->direction == PIN_OUTPUT) {
ebrus 0:6bc4ac881c8e 91 return (*obj->reg_out & obj->mask);
ebrus 0:6bc4ac881c8e 92 } else { // PIN_INPUT
ebrus 0:6bc4ac881c8e 93 return (*obj->reg_in & obj->mask);
ebrus 0:6bc4ac881c8e 94 }
ebrus 0:6bc4ac881c8e 95 }
ebrus 0:6bc4ac881c8e 96
ebrus 0:6bc4ac881c8e 97 #endif