Team Project / Mbed OS Oled_BLE_test1

Dependencies:   max32630fthr Adafruit_FeatherOLED_2020 USBDevice

Committer:
jonaangelica
Date:
Thu Feb 20 13:40:30 2020 +0000
Revision:
5:f18d3d0fe600
Parent:
0:cc636f742803
Child:
6:980318add386
font 3 oled display;

Who changed what in which revision?

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