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
Parent:
181:57724642e740
mbed library release version 165

Who changed what in which revision?

UserRevisionLine numberNew contents of line
AnnaBridge 181:57724642e740 1 /* mbed Microcontroller Library
AnnaBridge 181:57724642e740 2 * Copyright (c) 2006-2013 ARM Limited
AnnaBridge 181:57724642e740 3 *
AnnaBridge 181:57724642e740 4 * Licensed under the Apache License, Version 2.0 (the "License");
AnnaBridge 181:57724642e740 5 * you may not use this file except in compliance with the License.
AnnaBridge 181:57724642e740 6 * You may obtain a copy of the License at
AnnaBridge 181:57724642e740 7 *
AnnaBridge 181:57724642e740 8 * http://www.apache.org/licenses/LICENSE-2.0
AnnaBridge 181:57724642e740 9 *
AnnaBridge 181:57724642e740 10 * Unless required by applicable law or agreed to in writing, software
AnnaBridge 181:57724642e740 11 * distributed under the License is distributed on an "AS IS" BASIS,
AnnaBridge 181:57724642e740 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
AnnaBridge 181:57724642e740 13 * See the License for the specific language governing permissions and
AnnaBridge 181:57724642e740 14 * limitations under the License.
AnnaBridge 181:57724642e740 15 */
AnnaBridge 181:57724642e740 16 #include "port_api.h"
AnnaBridge 181:57724642e740 17 #include "pinmap.h"
AnnaBridge 181:57724642e740 18 #include "gpio_api.h"
AnnaBridge 181:57724642e740 19 #include "gpio_addrdefine.h"
AnnaBridge 181:57724642e740 20
AnnaBridge 181:57724642e740 21 PinName port_pin(PortName port, int pin_n) {
AnnaBridge 181:57724642e740 22 return (PinName)((port*0x10)+pin_n);
AnnaBridge 181:57724642e740 23 }
AnnaBridge 181:57724642e740 24
AnnaBridge 181:57724642e740 25 void port_init(port_t *obj, PortName port, int mask, PinDirection dir) {
AnnaBridge 181:57724642e740 26 uint32_t i;
AnnaBridge 181:57724642e740 27
AnnaBridge 181:57724642e740 28 obj->port = port;
AnnaBridge 181:57724642e740 29 obj->mask = mask;
AnnaBridge 181:57724642e740 30 obj->reg_dir = (volatile uint32_t *)PMSR(port);
AnnaBridge 181:57724642e740 31 obj->reg_out = (volatile uint32_t *)PORT(port);
AnnaBridge 181:57724642e740 32 obj->reg_in = (volatile uint32_t *)PPR(port);
AnnaBridge 181:57724642e740 33 obj->reg_buf = (volatile uint32_t *)PIBC(port);
AnnaBridge 181:57724642e740 34 // Do not use masking, because it prevents the use of the unmasked pins
AnnaBridge 181:57724642e740 35 // port_reg->FIOMASK = ~mask;
AnnaBridge 181:57724642e740 36
AnnaBridge 181:57724642e740 37 // The function is set per pin: reuse gpio logic
AnnaBridge 181:57724642e740 38 for (i = 0; i < 32; i++) {
AnnaBridge 181:57724642e740 39 if (obj->mask & (1 << i)) {
AnnaBridge 181:57724642e740 40 gpio_set(port_pin(obj->port, i));
AnnaBridge 181:57724642e740 41 }
AnnaBridge 181:57724642e740 42 }
AnnaBridge 181:57724642e740 43
AnnaBridge 181:57724642e740 44 port_dir(obj, dir);
AnnaBridge 181:57724642e740 45 }
AnnaBridge 181:57724642e740 46
AnnaBridge 181:57724642e740 47 void port_mode(port_t *obj, PinMode mode) {
AnnaBridge 181:57724642e740 48 uint32_t i;
AnnaBridge 181:57724642e740 49 // The mode is set per pin: reuse pinmap logic
AnnaBridge 181:57724642e740 50 for (i = 0; i < 32; i++) {
AnnaBridge 181:57724642e740 51 if (obj->mask & (1 << i)) {
AnnaBridge 181:57724642e740 52 pin_mode(port_pin(obj->port, i), mode);
AnnaBridge 181:57724642e740 53 }
AnnaBridge 181:57724642e740 54 }
AnnaBridge 181:57724642e740 55 }
AnnaBridge 181:57724642e740 56
AnnaBridge 181:57724642e740 57 void port_dir(port_t *obj, PinDirection dir) {
AnnaBridge 181:57724642e740 58 switch (dir) {
AnnaBridge 181:57724642e740 59 case PIN_INPUT : *obj->reg_dir = (obj->mask << 16) | obj->mask;
AnnaBridge 181:57724642e740 60 *obj->reg_buf |= obj->mask;
AnnaBridge 181:57724642e740 61 break;
AnnaBridge 181:57724642e740 62 case PIN_OUTPUT: *obj->reg_dir = (obj->mask << 16) | ~obj->mask;
AnnaBridge 181:57724642e740 63 *obj->reg_buf &= ~obj->mask;
AnnaBridge 181:57724642e740 64 break;
AnnaBridge 181:57724642e740 65 default:
AnnaBridge 181:57724642e740 66 // do nothing
AnnaBridge 181:57724642e740 67 break;
AnnaBridge 181:57724642e740 68 }
AnnaBridge 181:57724642e740 69 }
AnnaBridge 181:57724642e740 70
AnnaBridge 181:57724642e740 71 void port_write(port_t *obj, int value) {
AnnaBridge 181:57724642e740 72 *obj->reg_out = (obj->mask << 16) | (value & obj->mask);
AnnaBridge 181:57724642e740 73 }
AnnaBridge 181:57724642e740 74
AnnaBridge 181:57724642e740 75 int port_read(port_t *obj) {
AnnaBridge 181:57724642e740 76 return (*obj->reg_in & obj->mask);
AnnaBridge 181:57724642e740 77 }