1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
/* mbed Microcontroller Library
* Copyright (c) 2006-2013 ARM Limited
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include "port_api.h"
#include "pinmap.h"
#include "gpio_api.h"
#if DEVICE_PORTIN || DEVICE_PORTOUT
PinName port_pin(PortName port, int pin_n) {
return pin_n + (port << 4);
}
void port_init(port_t *obj, PortName port, int mask, PinDirection dir) {
obj->port = port;
obj->mask = mask;
uint32_t port_index = (uint32_t) port;
GPIO_TypeDef *port_reg = (GPIO_TypeDef *)(GPIOA_BASE + (port_index << 10));
// Enable GPIO peripheral clock
RCC->AHB1ENR |= 1 << port_index;
obj->reg_mode = &port_reg->MODER;
obj->reg_set = &port_reg->BSRRH;
obj->reg_clr = &port_reg->BSRRL;
obj->reg_in = &port_reg->IDR;
obj->reg_out = &port_reg->ODR;
port_dir(obj, dir);
}
void port_mode(port_t *obj, PinMode mode) {
uint32_t i;
// The mode is set per pin: reuse pinmap logic
for (i=0; i<16; i++) {
if (obj->mask & (1<<i)) {
pin_mode(port_pin(obj->port, i), mode);
}
}
}
void port_dir(port_t *obj, PinDirection dir) {
obj->direction = dir;
uint32_t tmp = *obj->reg_mode;
for (int i=0; i<16; i++) {
if (obj->mask & (1 << i)) {
// Clear the mode bits (i.e. set to input)
tmp &= ~(0x3 << (i << 1));
if (dir == PIN_OUTPUT) {
// Set to output
tmp |= 0x1 << (i << 1);
}
}
}
*obj->reg_mode = tmp;
}
void port_write(port_t *obj, int value) {
*obj->reg_out = (*obj->reg_out & ~obj->mask) | (value & obj->mask);
}
int port_read(port_t *obj) {
switch (obj->direction) {
case PIN_OUTPUT: return *obj->reg_out & obj->mask;
case PIN_INPUT: return *obj->reg_in & obj->mask;
}
return 0;
}
#endif
|