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

#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
12
#include "leds.h"
13
14
15

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

#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>

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

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

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

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

43
44
	GPIO_Init();

45
46
47
48
49
	pmic_init();
	pmic_set_led(0, 0);
	pmic_set_led(1, 0);
	pmic_set_led(2, 0);

50
	portexpander_init();
51

52
	PB_Init();
53

54
	TMR_Delay(MXC_TMR0, MSEC(1000), 0);
55

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

71
72
73
	while (RTC_EnableRTCE(MXC_RTC) == 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
	portexpander_poll();
219
}
220

221
222
223
224
225
226
227
228
229
230
231
232
233
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;
}

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

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

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

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