Test program for a Max30102 heartrate sensor on a STM32L476RG specific board ENSMM
Dependencies: mbed
These two pictures show how to connect the Mheuve Sensor to the ST-Link debugger (don't forget to disable ST-link jumpers and JP5 on the board! ):
These two pictures show how to connect the Mheuve Sensor TX RX to the ST-Link debugger (don't forget to cross TX and RX, it means Mheuve sensor TX on ST-Link RX and ST-Link TX on Mheuve sensor RX ):
The Mheuve sensor board needs to be powered by an external battery.
The result appears on the terminal, speed config is 115200 bds.
MAX30102/MAX30102.cpp@5:648aa1e83d65, 2021-01-27 (annotated)
- Committer:
- jimbaud
- Date:
- Wed Jan 27 09:32:22 2021 +0000
- Revision:
- 5:648aa1e83d65
- Parent:
- 4:5273ab1085ab
Test program for a Max30102 heartrate sensor on a STM32L476RG specific board ENSMM
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
MaximGordon | 0:346a7fa07998 | 1 | /** \file max30102.cpp ****************************************************** |
MaximGordon | 0:346a7fa07998 | 2 | * |
MaximGordon | 0:346a7fa07998 | 3 | * Project: MAXREFDES117# |
MaximGordon | 0:346a7fa07998 | 4 | * Filename: max30102.cpp |
MaximGordon | 0:346a7fa07998 | 5 | * Description: This module is an embedded controller driver for the MAX30102 |
MaximGordon | 0:346a7fa07998 | 6 | * |
MaximGordon | 0:346a7fa07998 | 7 | * |
MaximGordon | 0:346a7fa07998 | 8 | * -------------------------------------------------------------------- |
MaximGordon | 0:346a7fa07998 | 9 | * |
MaximGordon | 0:346a7fa07998 | 10 | * This code follows the following naming conventions: |
MaximGordon | 0:346a7fa07998 | 11 | * |
MaximGordon | 4:5273ab1085ab | 12 | * char ch_pmod_value |
MaximGordon | 4:5273ab1085ab | 13 | * char (array) s_pmod_s_string[16] |
MaximGordon | 4:5273ab1085ab | 14 | * float f_pmod_value |
MaximGordon | 4:5273ab1085ab | 15 | * int32_t n_pmod_value |
MaximGordon | 4:5273ab1085ab | 16 | * int32_t (array) an_pmod_value[16] |
MaximGordon | 4:5273ab1085ab | 17 | * int16_t w_pmod_value |
MaximGordon | 4:5273ab1085ab | 18 | * int16_t (array) aw_pmod_value[16] |
MaximGordon | 4:5273ab1085ab | 19 | * uint16_t uw_pmod_value |
MaximGordon | 4:5273ab1085ab | 20 | * uint16_t (array) auw_pmod_value[16] |
MaximGordon | 4:5273ab1085ab | 21 | * uint8_t uch_pmod_value |
MaximGordon | 4:5273ab1085ab | 22 | * uint8_t (array) auch_pmod_buffer[16] |
MaximGordon | 4:5273ab1085ab | 23 | * uint32_t un_pmod_value |
MaximGordon | 4:5273ab1085ab | 24 | * int32_t * pn_pmod_value |
MaximGordon | 0:346a7fa07998 | 25 | * |
MaximGordon | 0:346a7fa07998 | 26 | * ------------------------------------------------------------------------- */ |
MaximGordon | 0:346a7fa07998 | 27 | /******************************************************************************* |
MaximGordon | 4:5273ab1085ab | 28 | * Copyright (C) 2016 Maxim Integrated Products, Inc., All Rights Reserved. |
MaximGordon | 0:346a7fa07998 | 29 | * |
MaximGordon | 0:346a7fa07998 | 30 | * Permission is hereby granted, free of charge, to any person obtaining a |
MaximGordon | 0:346a7fa07998 | 31 | * copy of this software and associated documentation files (the "Software"), |
MaximGordon | 0:346a7fa07998 | 32 | * to deal in the Software without restriction, including without limitation |
MaximGordon | 0:346a7fa07998 | 33 | * the rights to use, copy, modify, merge, publish, distribute, sublicense, |
MaximGordon | 0:346a7fa07998 | 34 | * and/or sell copies of the Software, and to permit persons to whom the |
MaximGordon | 0:346a7fa07998 | 35 | * Software is furnished to do so, subject to the following conditions: |
MaximGordon | 0:346a7fa07998 | 36 | * |
MaximGordon | 0:346a7fa07998 | 37 | * The above copyright notice and this permission notice shall be included |
MaximGordon | 0:346a7fa07998 | 38 | * in all copies or substantial portions of the Software. |
MaximGordon | 0:346a7fa07998 | 39 | * |
MaximGordon | 0:346a7fa07998 | 40 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS |
MaximGordon | 0:346a7fa07998 | 41 | * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF |
MaximGordon | 0:346a7fa07998 | 42 | * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. |
MaximGordon | 0:346a7fa07998 | 43 | * IN NO EVENT SHALL MAXIM INTEGRATED BE LIABLE FOR ANY CLAIM, DAMAGES |
MaximGordon | 0:346a7fa07998 | 44 | * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, |
MaximGordon | 0:346a7fa07998 | 45 | * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR |
MaximGordon | 0:346a7fa07998 | 46 | * OTHER DEALINGS IN THE SOFTWARE. |
MaximGordon | 0:346a7fa07998 | 47 | * |
MaximGordon | 0:346a7fa07998 | 48 | * Except as contained in this notice, the name of Maxim Integrated |
MaximGordon | 0:346a7fa07998 | 49 | * Products, Inc. shall not be used except as stated in the Maxim Integrated |
MaximGordon | 0:346a7fa07998 | 50 | * Products, Inc. Branding Policy. |
MaximGordon | 0:346a7fa07998 | 51 | * |
MaximGordon | 0:346a7fa07998 | 52 | * The mere transfer of this software does not imply any licenses |
MaximGordon | 0:346a7fa07998 | 53 | * of trade secrets, proprietary technology, copyrights, patents, |
MaximGordon | 0:346a7fa07998 | 54 | * trademarks, maskwork rights, or any other form of intellectual |
MaximGordon | 0:346a7fa07998 | 55 | * property whatsoever. Maxim Integrated Products, Inc. retains all |
MaximGordon | 0:346a7fa07998 | 56 | * ownership rights. |
MaximGordon | 0:346a7fa07998 | 57 | ******************************************************************************* |
MaximGordon | 0:346a7fa07998 | 58 | */ |
MaximGordon | 0:346a7fa07998 | 59 | #include "mbed.h" |
MaximGordon | 0:346a7fa07998 | 60 | #include "MAX30102.h" |
MaximGordon | 0:346a7fa07998 | 61 | |
jimbaud | 5:648aa1e83d65 | 62 | |
jimbaud | 5:648aa1e83d65 | 63 | I2C i2c(PC_1, PC_0); |
jimbaud | 5:648aa1e83d65 | 64 | |
MaximGordon | 0:346a7fa07998 | 65 | |
MaximGordon | 0:346a7fa07998 | 66 | bool maxim_max30102_write_reg(uint8_t uch_addr, uint8_t uch_data) |
MaximGordon | 0:346a7fa07998 | 67 | /** |
MaximGordon | 0:346a7fa07998 | 68 | * \brief Write a value to a MAX30102 register |
MaximGordon | 0:346a7fa07998 | 69 | * \par Details |
MaximGordon | 0:346a7fa07998 | 70 | * This function writes a value to a MAX30102 register |
MaximGordon | 0:346a7fa07998 | 71 | * |
MaximGordon | 0:346a7fa07998 | 72 | * \param[in] uch_addr - register address |
MaximGordon | 0:346a7fa07998 | 73 | * \param[in] uch_data - register data |
MaximGordon | 0:346a7fa07998 | 74 | * |
MaximGordon | 0:346a7fa07998 | 75 | * \retval true on success |
MaximGordon | 0:346a7fa07998 | 76 | */ |
MaximGordon | 0:346a7fa07998 | 77 | { |
MaximGordon | 3:7c0fb55eb3ff | 78 | char ach_i2c_data[2]; |
MaximGordon | 3:7c0fb55eb3ff | 79 | ach_i2c_data[0]=uch_addr; |
MaximGordon | 3:7c0fb55eb3ff | 80 | ach_i2c_data[1]=uch_data; |
MaximGordon | 0:346a7fa07998 | 81 | |
MaximGordon | 3:7c0fb55eb3ff | 82 | if(i2c.write(I2C_WRITE_ADDR, ach_i2c_data, 2, false)==0) |
MaximGordon | 0:346a7fa07998 | 83 | return true; |
MaximGordon | 0:346a7fa07998 | 84 | else |
MaximGordon | 0:346a7fa07998 | 85 | return false; |
MaximGordon | 0:346a7fa07998 | 86 | } |
MaximGordon | 0:346a7fa07998 | 87 | |
MaximGordon | 3:7c0fb55eb3ff | 88 | bool maxim_max30102_read_reg(uint8_t uch_addr, uint8_t *puch_data) |
MaximGordon | 0:346a7fa07998 | 89 | /** |
MaximGordon | 0:346a7fa07998 | 90 | * \brief Read a MAX30102 register |
MaximGordon | 0:346a7fa07998 | 91 | * \par Details |
MaximGordon | 0:346a7fa07998 | 92 | * This function reads a MAX30102 register |
MaximGordon | 0:346a7fa07998 | 93 | * |
MaximGordon | 0:346a7fa07998 | 94 | * \param[in] uch_addr - register address |
MaximGordon | 3:7c0fb55eb3ff | 95 | * \param[out] puch_data - pointer that stores the register data |
MaximGordon | 0:346a7fa07998 | 96 | * |
MaximGordon | 0:346a7fa07998 | 97 | * \retval true on success |
MaximGordon | 0:346a7fa07998 | 98 | */ |
MaximGordon | 0:346a7fa07998 | 99 | { |
MaximGordon | 0:346a7fa07998 | 100 | char ch_i2c_data; |
MaximGordon | 0:346a7fa07998 | 101 | ch_i2c_data=uch_addr; |
MaximGordon | 0:346a7fa07998 | 102 | if(i2c.write(I2C_WRITE_ADDR, &ch_i2c_data, 1, true)!=0) |
MaximGordon | 0:346a7fa07998 | 103 | return false; |
MaximGordon | 0:346a7fa07998 | 104 | if(i2c.read(I2C_READ_ADDR, &ch_i2c_data, 1, false)==0) |
MaximGordon | 0:346a7fa07998 | 105 | { |
MaximGordon | 3:7c0fb55eb3ff | 106 | *puch_data=(uint8_t) ch_i2c_data; |
MaximGordon | 0:346a7fa07998 | 107 | return true; |
MaximGordon | 0:346a7fa07998 | 108 | } |
MaximGordon | 0:346a7fa07998 | 109 | else |
MaximGordon | 0:346a7fa07998 | 110 | return false; |
MaximGordon | 0:346a7fa07998 | 111 | } |
MaximGordon | 0:346a7fa07998 | 112 | |
MaximGordon | 0:346a7fa07998 | 113 | bool maxim_max30102_init() |
MaximGordon | 0:346a7fa07998 | 114 | /** |
MaximGordon | 0:346a7fa07998 | 115 | * \brief Initialize the MAX30102 |
MaximGordon | 0:346a7fa07998 | 116 | * \par Details |
MaximGordon | 0:346a7fa07998 | 117 | * This function initializes the MAX30102 |
MaximGordon | 0:346a7fa07998 | 118 | * |
MaximGordon | 0:346a7fa07998 | 119 | * \param None |
MaximGordon | 0:346a7fa07998 | 120 | * |
MaximGordon | 0:346a7fa07998 | 121 | * \retval true on success |
MaximGordon | 0:346a7fa07998 | 122 | */ |
MaximGordon | 0:346a7fa07998 | 123 | { |
MaximGordon | 0:346a7fa07998 | 124 | if(!maxim_max30102_write_reg(REG_INTR_ENABLE_1,0xc0)) // INTR setting |
MaximGordon | 0:346a7fa07998 | 125 | return false; |
MaximGordon | 0:346a7fa07998 | 126 | if(!maxim_max30102_write_reg(REG_INTR_ENABLE_2,0x00)) |
MaximGordon | 0:346a7fa07998 | 127 | return false; |
MaximGordon | 0:346a7fa07998 | 128 | if(!maxim_max30102_write_reg(REG_FIFO_WR_PTR,0x00)) //FIFO_WR_PTR[4:0] |
MaximGordon | 0:346a7fa07998 | 129 | return false; |
MaximGordon | 0:346a7fa07998 | 130 | if(!maxim_max30102_write_reg(REG_OVF_COUNTER,0x00)) //OVF_COUNTER[4:0] |
MaximGordon | 0:346a7fa07998 | 131 | return false; |
MaximGordon | 0:346a7fa07998 | 132 | if(!maxim_max30102_write_reg(REG_FIFO_RD_PTR,0x00)) //FIFO_RD_PTR[4:0] |
MaximGordon | 0:346a7fa07998 | 133 | return false; |
MaximGordon | 0:346a7fa07998 | 134 | if(!maxim_max30102_write_reg(REG_FIFO_CONFIG,0x0f)) //sample avg = 1, fifo rollover=false, fifo almost full = 17 |
MaximGordon | 0:346a7fa07998 | 135 | return false; |
MaximGordon | 0:346a7fa07998 | 136 | if(!maxim_max30102_write_reg(REG_MODE_CONFIG,0x03)) //0x02 for Red only, 0x03 for SpO2 mode 0x07 multimode LED |
MaximGordon | 0:346a7fa07998 | 137 | return false; |
MaximGordon | 0:346a7fa07998 | 138 | if(!maxim_max30102_write_reg(REG_SPO2_CONFIG,0x27)) // SPO2_ADC range = 4096nA, SPO2 sample rate (100 Hz), LED pulseWidth (400uS) |
MaximGordon | 0:346a7fa07998 | 139 | return false; |
MaximGordon | 0:346a7fa07998 | 140 | |
MaximGordon | 0:346a7fa07998 | 141 | if(!maxim_max30102_write_reg(REG_LED1_PA,0x24)) //Choose value for ~ 7mA for LED1 |
MaximGordon | 0:346a7fa07998 | 142 | return false; |
MaximGordon | 0:346a7fa07998 | 143 | if(!maxim_max30102_write_reg(REG_LED2_PA,0x24)) // Choose value for ~ 7mA for LED2 |
MaximGordon | 0:346a7fa07998 | 144 | return false; |
MaximGordon | 0:346a7fa07998 | 145 | if(!maxim_max30102_write_reg(REG_PILOT_PA,0x7f)) // Choose value for ~ 25mA for Pilot LED |
MaximGordon | 0:346a7fa07998 | 146 | return false; |
MaximGordon | 0:346a7fa07998 | 147 | return true; |
MaximGordon | 0:346a7fa07998 | 148 | } |
MaximGordon | 0:346a7fa07998 | 149 | |
MaximGordon | 3:7c0fb55eb3ff | 150 | bool maxim_max30102_read_fifo(uint32_t *pun_red_led, uint32_t *pun_ir_led) |
MaximGordon | 0:346a7fa07998 | 151 | /** |
MaximGordon | 0:346a7fa07998 | 152 | * \brief Read a set of samples from the MAX30102 FIFO register |
MaximGordon | 0:346a7fa07998 | 153 | * \par Details |
MaximGordon | 0:346a7fa07998 | 154 | * This function reads a set of samples from the MAX30102 FIFO register |
MaximGordon | 0:346a7fa07998 | 155 | * |
MaximGordon | 3:7c0fb55eb3ff | 156 | * \param[out] *pun_red_led - pointer that stores the red LED reading data |
MaximGordon | 3:7c0fb55eb3ff | 157 | * \param[out] *pun_ir_led - pointer that stores the IR LED reading data |
MaximGordon | 0:346a7fa07998 | 158 | * |
MaximGordon | 0:346a7fa07998 | 159 | * \retval true on success |
MaximGordon | 0:346a7fa07998 | 160 | */ |
MaximGordon | 0:346a7fa07998 | 161 | { |
MaximGordon | 0:346a7fa07998 | 162 | uint32_t un_temp; |
MaximGordon | 0:346a7fa07998 | 163 | unsigned char uch_temp; |
MaximGordon | 3:7c0fb55eb3ff | 164 | *pun_red_led=0; |
MaximGordon | 3:7c0fb55eb3ff | 165 | *pun_ir_led=0; |
MaximGordon | 3:7c0fb55eb3ff | 166 | char ach_i2c_data[6]; |
MaximGordon | 0:346a7fa07998 | 167 | |
MaximGordon | 0:346a7fa07998 | 168 | //read and clear status register |
MaximGordon | 0:346a7fa07998 | 169 | maxim_max30102_read_reg(REG_INTR_STATUS_1, &uch_temp); |
MaximGordon | 0:346a7fa07998 | 170 | maxim_max30102_read_reg(REG_INTR_STATUS_2, &uch_temp); |
MaximGordon | 0:346a7fa07998 | 171 | |
MaximGordon | 3:7c0fb55eb3ff | 172 | ach_i2c_data[0]=REG_FIFO_DATA; |
MaximGordon | 3:7c0fb55eb3ff | 173 | if(i2c.write(I2C_WRITE_ADDR, ach_i2c_data, 1, true)!=0) |
MaximGordon | 0:346a7fa07998 | 174 | return false; |
MaximGordon | 3:7c0fb55eb3ff | 175 | if(i2c.read(I2C_READ_ADDR, ach_i2c_data, 6, false)!=0) |
MaximGordon | 0:346a7fa07998 | 176 | { |
MaximGordon | 0:346a7fa07998 | 177 | return false; |
MaximGordon | 0:346a7fa07998 | 178 | } |
MaximGordon | 3:7c0fb55eb3ff | 179 | un_temp=(unsigned char) ach_i2c_data[0]; |
MaximGordon | 0:346a7fa07998 | 180 | un_temp<<=16; |
MaximGordon | 3:7c0fb55eb3ff | 181 | *pun_red_led+=un_temp; |
MaximGordon | 3:7c0fb55eb3ff | 182 | un_temp=(unsigned char) ach_i2c_data[1]; |
MaximGordon | 0:346a7fa07998 | 183 | un_temp<<=8; |
MaximGordon | 3:7c0fb55eb3ff | 184 | *pun_red_led+=un_temp; |
MaximGordon | 3:7c0fb55eb3ff | 185 | un_temp=(unsigned char) ach_i2c_data[2]; |
MaximGordon | 3:7c0fb55eb3ff | 186 | *pun_red_led+=un_temp; |
MaximGordon | 0:346a7fa07998 | 187 | |
MaximGordon | 3:7c0fb55eb3ff | 188 | un_temp=(unsigned char) ach_i2c_data[3]; |
MaximGordon | 0:346a7fa07998 | 189 | un_temp<<=16; |
MaximGordon | 3:7c0fb55eb3ff | 190 | *pun_ir_led+=un_temp; |
MaximGordon | 3:7c0fb55eb3ff | 191 | un_temp=(unsigned char) ach_i2c_data[4]; |
MaximGordon | 0:346a7fa07998 | 192 | un_temp<<=8; |
MaximGordon | 3:7c0fb55eb3ff | 193 | *pun_ir_led+=un_temp; |
MaximGordon | 3:7c0fb55eb3ff | 194 | un_temp=(unsigned char) ach_i2c_data[5]; |
MaximGordon | 3:7c0fb55eb3ff | 195 | *pun_ir_led+=un_temp; |
MaximGordon | 3:7c0fb55eb3ff | 196 | *pun_red_led&=0x03FFFF; //Mask MSB [23:18] |
MaximGordon | 3:7c0fb55eb3ff | 197 | *pun_ir_led&=0x03FFFF; //Mask MSB [23:18] |
MaximGordon | 0:346a7fa07998 | 198 | |
MaximGordon | 0:346a7fa07998 | 199 | |
MaximGordon | 0:346a7fa07998 | 200 | return true; |
MaximGordon | 0:346a7fa07998 | 201 | } |
MaximGordon | 0:346a7fa07998 | 202 | |
MaximGordon | 0:346a7fa07998 | 203 | bool maxim_max30102_reset() |
MaximGordon | 0:346a7fa07998 | 204 | /** |
MaximGordon | 0:346a7fa07998 | 205 | * \brief Reset the MAX30102 |
MaximGordon | 0:346a7fa07998 | 206 | * \par Details |
MaximGordon | 0:346a7fa07998 | 207 | * This function resets the MAX30102 |
MaximGordon | 0:346a7fa07998 | 208 | * |
MaximGordon | 0:346a7fa07998 | 209 | * \param None |
MaximGordon | 0:346a7fa07998 | 210 | * |
MaximGordon | 0:346a7fa07998 | 211 | * \retval true on success |
MaximGordon | 0:346a7fa07998 | 212 | */ |
MaximGordon | 0:346a7fa07998 | 213 | { |
MaximGordon | 0:346a7fa07998 | 214 | if(!maxim_max30102_write_reg(REG_MODE_CONFIG,0x40)) |
MaximGordon | 0:346a7fa07998 | 215 | return false; |
MaximGordon | 0:346a7fa07998 | 216 | else |
MaximGordon | 0:346a7fa07998 | 217 | return true; |
MaximGordon | 0:346a7fa07998 | 218 | } |