git.gag.com Git - fw/altos/blob - src/drivers/ao_ms5607.c

   1 /*
   2  * Copyright © 2012 Keith Packard <keithp@keithp.com>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  17  */
  18
  19 #include <ao.h>
  20 #include <ao_exti.h>
  21 #include <ao_ms5607.h>
  22
  23 #if HAS_MS5607 || HAS_MS5611
  24
  25 struct ao_ms5607_prom   ao_ms5607_prom;
  26 static uint8_t          ms5607_configured;
  27
  28 #define AO_MS5607_SPI_SPEED     ao_spi_speed(AO_MS5607_SPI_INDEX, 20000000)
  29
  30 static void
  31 ao_ms5607_start(void) {
  32         ao_spi_get_bit(AO_MS5607_CS_PORT, AO_MS5607_CS_PIN, AO_MS5607_SPI_INDEX, AO_MS5607_SPI_SPEED);
  33 }
  34
  35 static void
  36 ao_ms5607_stop(void) {
  37         ao_spi_put_bit(AO_MS5607_CS_PORT, AO_MS5607_CS_PIN, AO_MS5607_SPI_INDEX);
  38 }
  39
  40 static void
  41 ao_ms5607_reset(void) {
  42         uint8_t cmd;
  43
  44         cmd = AO_MS5607_RESET;
  45         ao_ms5607_start();
  46         ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
  47         ao_delay(AO_MS_TO_TICKS(10));
  48         ao_ms5607_stop();
  49 }
  50
  51 static uint8_t
  52 ao_ms5607_crc(uint8_t *prom)
  53 {
  54         uint8_t         crc_byte = prom[15];
  55         uint8_t         cnt;
  56         uint16_t        n_rem = 0;
  57         uint8_t         n_bit;
  58         uint8_t         *p = prom;
  59
  60         prom[15] = 0;
  61         for (cnt = 0; cnt < 16; cnt++) {
  62                 n_rem ^= (uint16_t) *p++;
  63                 for (n_bit = 8; n_bit > 0; n_bit--) {
  64                         if (n_rem & 0x8000)
  65                                 n_rem = (uint16_t) ((n_rem << 1) ^ 0x3000U);
  66                         else
  67                                 n_rem = (n_rem << 1);
  68                 }
  69         }
  70         n_rem = (n_rem >> 12) & 0xf;
  71         prom[15] = crc_byte;
  72         return (uint8_t) n_rem;
  73 }
  74
  75 static bool
  76 ao_ms5607_prom_valid(uint8_t *prom)
  77 {
  78         uint8_t crc;
  79         int     i;
  80         uint8_t *p;
  81
  82         /* Look for a value other than 0x0000 or 0xffff */
  83         p = prom;
  84         for (i = 0; i < 16; i++)
  85                 if (*p++ + 1 > 1)
  86                         break;
  87         if (i == 16)
  88                 return false;
  89
  90         crc = ao_ms5607_crc(prom);
  91         if (crc != (prom[15] & 0xf))
  92                 return false;
  93
  94         return true;
  95 }
  96
  97 static void
  98 ao_ms5607_prom_read(struct ao_ms5607_prom *prom)
  99 {
 100         uint8_t         addr;
 101         uint16_t        *r;
 102
 103         r = (uint16_t *) prom;
 104         for (addr = 0; addr < 8; addr++) {
 105                 uint8_t cmd = AO_MS5607_PROM_READ(addr);
 106                 ao_ms5607_start();
 107                 ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
 108                 ao_spi_recv(r, 2, AO_MS5607_SPI_INDEX);
 109                 ao_ms5607_stop();
 110                 r++;
 111         }
 112
 113
 114         if (!ao_ms5607_prom_valid((uint8_t *) prom)) {
 115 #if HAS_SENSOR_ERRORS
 116                 AO_SENSOR_ERROR(AO_DATA_MS5607);
 117 #else
 118                 ao_panic(AO_PANIC_SELF_TEST_MS5607);
 119 #endif
 120         }
 121
 122 #if __BYTE_ORDER == __LITTLE_ENDIAN
 123         /* Byte swap */
 124         r = (uint16_t *) prom;
 125         for (addr = 0; addr < 8; addr++) {
 126                 uint8_t         *t = (uint8_t *) r;
 127                 uint8_t a = t[0];
 128                 t[0] = t[1];
 129                 t[1] = a;
 130                 r++;
 131         }
 132 #endif
 133 }
 134
 135 void
 136 ao_ms5607_setup(void)
 137 {
 138         if (ms5607_configured)
 139                 return;
 140         ms5607_configured = 1;
 141         ao_ms5607_reset();
 142         ao_ms5607_prom_read(&ao_ms5607_prom);
 143 }
 144
 145 static volatile uint8_t ao_ms5607_done;
 146
 147 static void
 148 ao_ms5607_isr(void)
 149 {
 150         ao_exti_disable(AO_MS5607_MISO_PORT, AO_MS5607_MISO_PIN);
 151         ao_wakeup((void *) &ao_ms5607_done);
 152 }
 153
 154 static uint32_t
 155 ao_ms5607_get_sample(uint8_t cmd) {
 156         uint8_t reply[4];
 157
 158         ao_ms5607_start();
 159
 160         ao_exti_enable(AO_MS5607_MISO_PORT, AO_MS5607_MISO_PIN);
 161
 162         ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
 163
 164 #if AO_MS5607_PRIVATE_PINS
 165         ao_spi_put_pins(AO_MS5607_SPI_INDEX);
 166 #endif
 167         ao_arch_block_interrupts();
 168 #if !HAS_TASK
 169 #define ao_sleep_for(a,t) ao_sleep(a)
 170 #endif
 171         while (!ao_gpio_get(AO_MS5607_MISO_PORT, AO_MS5607_MISO_PIN)) {
 172                 if (ao_sleep_for((void *) &ao_ms5607_done, AO_MS_TO_TICKS(10)))
 173                         break;
 174         }
 175         ao_exti_disable(AO_MS5607_MISO_PORT, AO_MS5607_MISO_PIN);
 176         ao_arch_release_interrupts();
 177 #if AO_MS5607_PRIVATE_PINS
 178         ao_spi_clr_cs(AO_MS5607_CS_PORT, 1 << (AO_MS5607_CS_PIN));
 179 #else
 180         ao_ms5607_stop();
 181 #endif
 182
 183         ao_ms5607_start();
 184         reply[0] = AO_MS5607_ADC_READ;
 185 #if defined(AO_SPI_DUPLEX) && AO_SPI_DUPLEX == 0
 186         ao_spi_send(reply, 1, AO_MS5607_SPI_INDEX);
 187         ao_spi_recv(reply+1, 3, AO_MS5607_SPI_INDEX);
 188 #else
 189         ao_spi_duplex(&reply, &reply, 4, AO_MS5607_SPI_INDEX);
 190 #endif
 191         ao_ms5607_stop();
 192
 193         return ((uint32_t) reply[1] << 16) | ((uint32_t) reply[2] << 8) | (uint32_t) reply[3];
 194 }
 195
 196 #ifndef AO_MS5607_BARO_OVERSAMPLE
 197 #define AO_MS5607_BARO_OVERSAMPLE       2048
 198 #endif
 199
 200 #ifndef AO_MS5607_TEMP_OVERSAMPLE
 201 #define AO_MS5607_TEMP_OVERSAMPLE       AO_MS5607_BARO_OVERSAMPLE
 202 #endif
 203
 204 #define token_paster(x,y)       x ## y
 205 #define token_evaluator(x,y)    token_paster(x,y)
 206
 207 #define AO_CONVERT_D1   token_evaluator(AO_MS5607_CONVERT_D1_, AO_MS5607_BARO_OVERSAMPLE)
 208 #define AO_CONVERT_D2   token_evaluator(AO_MS5607_CONVERT_D2_, AO_MS5607_TEMP_OVERSAMPLE)
 209
 210 void
 211 ao_ms5607_sample(struct ao_ms5607_sample *sample)
 212 {
 213         sample->pres = ao_ms5607_get_sample(AO_CONVERT_D1);
 214         sample->temp = ao_ms5607_get_sample(AO_CONVERT_D2);
 215 }
 216
 217 #ifdef _CC1111_H_
 218 #include "ao_ms5607_convert_8051.c"
 219 #else
 220 #include "ao_ms5607_convert.c"
 221 #endif
 222
 223 #ifndef HAS_MS5607_TASK
 224 #define HAS_MS5607_TASK HAS_TASK
 225 #endif
 226
 227 struct ao_ms5607_sample ao_ms5607_current;
 228
 229 #if HAS_MS5607_TASK
 230 static void
 231 ao_ms5607(void)
 232 {
 233         struct ao_ms5607_sample sample;
 234         ao_ms5607_setup();
 235         for (;;)
 236         {
 237                 ao_ms5607_sample(&sample);
 238                 ao_arch_block_interrupts();
 239                 ao_ms5607_current = sample;
 240                 AO_DATA_PRESENT(AO_DATA_MS5607);
 241                 AO_DATA_WAIT();
 242                 ao_arch_release_interrupts();
 243         }
 244 }
 245
 246 struct ao_task ao_ms5607_task;
 247 #endif
 248
 249 #if HAS_TASK
 250 void
 251 ao_ms5607_info(void)
 252 {
 253 #if !HAS_MS5607_TASK
 254         ao_ms5607_setup();
 255 #endif
 256         printf ("ms5607 reserved: %u\n", ao_ms5607_prom.reserved);
 257         printf ("ms5607 sens: %u\n", ao_ms5607_prom.sens);
 258         printf ("ms5607 off: %u\n", ao_ms5607_prom.off);
 259         printf ("ms5607 tcs: %u\n", ao_ms5607_prom.tcs);
 260         printf ("ms5607 tco: %u\n", ao_ms5607_prom.tco);
 261         printf ("ms5607 tref: %u\n", ao_ms5607_prom.tref);
 262         printf ("ms5607 tempsens: %u\n", ao_ms5607_prom.tempsens);
 263         printf ("ms5607 crc: %u\n", ao_ms5607_prom.crc);
 264 }
 265
 266 static void
 267 ao_ms5607_dump(void)
 268 {
 269         struct ao_ms5607_value value;
 270
 271 #if !HAS_MS5607_TASK
 272         ao_ms5607_sample(&ao_ms5607_current);
 273 #endif
 274         ao_ms5607_convert(&ao_ms5607_current, &value);
 275         printf ("Pressure:    %8lu %8ld\n", ao_ms5607_current.pres, value.pres);
 276         printf ("Temperature: %8lu %8ld\n", ao_ms5607_current.temp, value.temp);
 277         printf ("Altitude: %ld\n", ao_pa_to_altitude(value.pres));
 278 }
 279
 280 const struct ao_cmds ao_ms5607_cmds[] = {
 281         { ao_ms5607_dump,       "B\0Display MS5607 data" },
 282         { 0, NULL },
 283 };
 284 #endif /* HAS_TASK */
 285
 286 void
 287 ao_ms5607_init(void)
 288 {
 289         ms5607_configured = 0;
 290         ao_spi_init_cs(AO_MS5607_CS_PORT, (1 << AO_MS5607_CS_PIN));
 291
 292 #if HAS_TASK
 293         ao_cmd_register(&ao_ms5607_cmds[0]);
 294 #endif
 295 #if HAS_MS5607_TASK
 296         ao_add_task(&ao_ms5607_task, ao_ms5607, "ms5607");
 297 #endif
 298
 299         /* Configure the MISO pin as an interrupt; when the
 300          * conversion is complete, the MS5607 will raise this
 301          * pin as a signal
 302          */
 303         ao_exti_setup(AO_MS5607_MISO_PORT,
 304                       AO_MS5607_MISO_PIN,
 305                       AO_EXTI_MODE_RISING|
 306                       AO_EXTI_PIN_NOCONFIGURE,
 307                       ao_ms5607_isr);
 308 }
 309
 310 #endif