card10.c 5.72 KB
Newer Older
1
2
#include "pmic.h"
#include "bosch.h"
3
#include "display.h"
4
#include "portexpander.h"
5
6
7
8
9
10

#include "bhy_uc_driver.h"
#include "Bosch_PCB_7183_di03_BMI160_BMM150-7183_di03.2.1.11696_170103.h"
#include "bme680.h"
#include "bma400.h"
#include "bhy.h"
schneider's avatar
schneider committed
11
#include "leds.h"
12
13
14

#include "mxc_config.h"
#include "board.h"
15
#include "pb.h"
16
17
18
19
20
21
22
23
24
25
26

#include "tmr_utils.h"
#include "i2c.h"
#include "rtc.h"
#include "spi.h"
#include "gpio.h"

#include <stdio.h>
#include <stdint.h>
#include <string.h>

27
#define SPI_SPEED (15 * 1000 * 1000) // Bit Rate
28

29
30
31
const gpio_cfg_t bhi_interrupt_pin = {
	PORT_0, PIN_13, GPIO_FUNC_IN, GPIO_PAD_PULL_UP
};
32

33
34
void card10_init(void)
{
35
	printf("card10 init...\n");
36

37
38
39
	//Setup the I2CM
	I2C_Shutdown(MXC_I2C0_BUS0);
	I2C_Init(MXC_I2C0_BUS0, I2C_FAST_MODE, NULL);
40

41
42
	I2C_Shutdown(MXC_I2C1_BUS0);
	I2C_Init(MXC_I2C1_BUS0, I2C_FAST_MODE, NULL);
43

44
	portexpander_init();
45

46
	GPIO_Init();
47

48
	PB_Init();
49

50
51
52
53
54
	pmic_init();
	pmic_set_led(0, 0);
	pmic_set_led(1, 0);
	pmic_set_led(2, 0);
	TMR_Delay(MXC_TMR0, MSEC(1000), 0);
55

56
57
58
	while (RTC_EnableRTCE(MXC_RTC) == E_BUSY)
		;

59
	// Enable 32 kHz output
60
61
62
63
64
65
66
67
	while (RTC_SquareWave(
		       MXC_RTC,
		       SQUARE_WAVE_ENABLED,
		       F_32KHZ,
		       NOISE_IMMUNE_MODE,
		       NULL) == E_BUSY
	)
		;
68
	/* If we don't have a valid time yet, set it to 2019-01-01 */
69
70
71
72
73
	if (RTC_GetSecond() < 1546300800UL) {
		while (RTC_Init(MXC_RTC, 1546300800UL, 0, NULL) == E_BUSY)
			;
	}

74
75
	// Enable SPI
	sys_cfg_spi_t spi17y_master_cfg;
76

77
78
79
80
81
82
83
84
85
	spi17y_master_cfg.map = MAP_A;
	spi17y_master_cfg.ss0 = Enable;
	spi17y_master_cfg.ss1 = Disable;
	spi17y_master_cfg.ss2 = Disable;
	if (SPI_Init(SPI0, 0, SPI_SPEED, spi17y_master_cfg) != 0) {
		printf("Error configuring SPI\n");
		while (1)
			;
	}
86

87
	display_init();
88

89
	leds_init();
90

91
	GPIO_Config(&bhi_interrupt_pin);
92
93
94
95
}

static uint32_t ecg_read_reg(uint8_t reg)
{
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
	spi_req_t req;
	uint8_t tx_data[] = { (reg << 1) | 1, 0, 0, 0 };
	uint8_t rx_data[] = { 0, 0, 0, 0 };
	req.tx_data       = tx_data;
	req.rx_data       = rx_data;
	req.len           = 4;
	req.bits          = 8;
	req.width         = SPI17Y_WIDTH_1;
	req.ssel          = 0;
	req.deass         = 1;
	req.ssel_pol      = SPI17Y_POL_LOW;
	req.tx_num        = 0;
	req.rx_num        = 0;

	SPI_MasterTrans(SPI0, &req);

	return (rx_data[1] << 16) | (rx_data[2] << 8) | rx_data[3];
113
114
115
116
}

void card10_diag(void)
{
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
	uint8_t dummy[1] = { 0 };
	// "7-bit addresses 0b0000xxx and 0b1111xxx are reserved"
	for (int addr = 0x8; addr < 0x78; ++addr) {
		// A 0 byte write does not seem to work so always send a single byte.
		int res =
			I2C_MasterWrite(MXC_I2C0_BUS0, addr << 1, dummy, 1, 0);
		if (res == 1) {
			printf("Found (7 bit) address 0x%02x on I2C0\n", addr);
		}

		res = I2C_MasterWrite(MXC_I2C1_BUS0, addr << 1, dummy, 1, 0);
		if (res == 1) {
			printf("Found (7 bit) address 0x%02x on I2C1\n", addr);
		}
	}

	if (bhy_driver_init(bhy1_fw)) {
		printf("Failed to init bhy\n");
	} else {
		/* wait for the bhy trigger the interrupt pin go down and up again */
		while (GPIO_InGet(&bhi_interrupt_pin))
			;
		while (!GPIO_InGet(&bhi_interrupt_pin))
			;

		/* the remapping matrix for BHI and Magmetometer should be configured here to make sure rotation vector is */
		/* calculated in a correct coordinates system. */
		int8_t bhy_mapping_matrix_config[3 * 3] = { 0, -1, 0, 1, 0,
							    0, 0,  0, 1 };
		int8_t mag_mapping_matrix_config[3 * 3] = { -1, 0, 0, 0, 1,
							    0,  0, 0, -1 };
		bhy_mapping_matrix_set(
			PHYSICAL_SENSOR_INDEX_ACC, bhy_mapping_matrix_config
		);
		bhy_mapping_matrix_set(
			PHYSICAL_SENSOR_INDEX_MAG, mag_mapping_matrix_config
		);
		bhy_mapping_matrix_set(
			PHYSICAL_SENSOR_INDEX_GYRO, bhy_mapping_matrix_config
		);

		/* the sic matrix should be calculated for customer platform by logging uncalibrated magnetometer data. */
		/* the sic matrix here is only an example array (identity matrix). Customer should generate their own matrix. */
		/* This affects magnetometer fusion performance. */
		float sic_array[9] = { 1.0, 0.0, 0.0, 0.0, 1.0,
				       0.0, 0.0, 0.0, 1.0 };
		bhy_set_sic_matrix(sic_array);
	}

	struct bme680_dev gas_sensor;
	gas_sensor.dev_id   = BME680_I2C_ADDR_PRIMARY;
	gas_sensor.intf     = BME680_I2C_INTF;
	gas_sensor.read     = card10_bosch_i2c_read;
	gas_sensor.write    = card10_bosch_i2c_write;
	gas_sensor.delay_ms = card10_bosch_delay;
	gas_sensor.amb_temp = 25;

	int8_t rslt = BME680_OK;
	rslt        = bme680_init(&gas_sensor);
	if (rslt != BME680_OK) {
		printf("Failed to init BME680\n");
	}

	struct bma400_dev bma;
	bma.intf_ptr = NULL; /* To attach your interface device reference */
	bma.delay_ms = card10_bosch_delay;
	bma.dev_id   = BMA400_I2C_ADDRESS_SDO_LOW;
	bma.read     = card10_bosch_i2c_read_ex;
	bma.write    = card10_bosch_i2c_write_ex;
	bma.intf     = BMA400_I2C_INTF;

	rslt = bma400_init(&bma);
	if (rslt == BMA400_OK) {
		printf("BMA400 found with chip ID 0x%X\r\n", bma.chip_id);
	}
192

schneider's avatar
schneider committed
193
#if 0
194
195
196
197
    for(int i=0; i<0x20; i++) {
        uint32_t val = ecg_read_reg(i);
        printf("ECG: %02x: 0x%06x\n", i, val);
    }
schneider's avatar
schneider committed
198
#else
199
200
	uint32_t val = ecg_read_reg(0xf);
	printf("ECG: %02x: 0x%06lx (should be 0x5139a0)\n", 0xf, val);
schneider's avatar
schneider committed
201
#endif
202
}
203

q3k's avatar
q3k committed
204
void core1_start(void *isr)
205
{
q3k's avatar
q3k committed
206
	MXC_GCR->gp0 = (uint32_t)isr;
207
	MXC_GCR->perckcn1 &= ~MXC_F_GCR_PERCKCN1_CPU1;
208
209
}

210
211
212
void core1_stop(void)
{
	MXC_GCR->perckcn1 |= MXC_F_GCR_PERCKCN1_CPU1;
213
214
}

215
216
void card10_poll(void)
{
217
	pmic_poll();
218
}
219

220
221
222
223
224
225
226
227
228
229
230
231
232
void card10_reset(void)
{
	printf("Resetting ...\n");
	/*
        * Give the UART fifo time to clear.
        * TODO: Do this properly
        */
	for (int i = 0; i < 0x1000000; i++) {
		__asm volatile("nop");
	}
	MXC_GCR->rstr0 = MXC_F_GCR_RSTR0_SYSTEM;
}

233
234
void GPIO0_IRQHandler(void)
{
235
	GPIO_Handler(PORT_0);
236
237
238
239
}

void GPIO1_IRQHandler(void)
{
240
	GPIO_Handler(PORT_1);
241
242
243
244
}

void GPIO2_IRQHandler(void)
{
245
	GPIO_Handler(PORT_2);
246
247
248
249
}

void GPIO3_IRQHandler(void)
{
250
	GPIO_Handler(PORT_3);
251
}