altos: Add support for multiple SPI busses and sharing device drivers
[fw/altos] / 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; version 2 of the License.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License along
14  * with this program; if not, write to the Free Software Foundation, Inc.,
15  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
16  */
17
18 #include <ao.h>
19 #include "ao_ms5607.h"
20
21 struct ms5607_prom {
22         uint16_t        reserved;
23         uint16_t        sens;
24         uint16_t        off;
25         uint16_t        tcs;
26         uint16_t        tco;
27         uint16_t        tref;
28         uint16_t        tempsens;
29         uint16_t        crc;
30 };
31
32 static struct ms5607_prom ms5607_prom;
33
34 static void
35 ao_ms5607_start(void) {
36         ao_spi_get(AO_MS5607_SPI_INDEX);
37         stm_gpio_set(&AO_MS5607_CS_GPIO, AO_MS5607_CS, 0);
38 }
39
40 static void
41 ao_ms5607_stop(void) {
42         stm_gpio_set(&AO_MS5607_CS_GPIO, AO_MS5607_CS, 1);
43         ao_spi_put(AO_MS5607_SPI_INDEX);
44 }
45
46 static void
47 ao_ms5607_reset(void) {
48         uint8_t cmd;
49
50         cmd = AO_MS5607_RESET;
51         ao_ms5607_start();
52         ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
53         ao_delay(AO_MS_TO_TICKS(10));
54         ao_ms5607_stop();
55 }
56
57 static uint16_t
58 ao_ms5607_prom_read(uint8_t addr)
59 {
60         uint8_t cmd = AO_MS5607_PROM_READ(addr);
61         uint8_t d[2];
62         uint16_t v;
63
64         ao_ms5607_start();
65         ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
66         ao_spi_recv(d, 2, AO_MS5607_SPI_INDEX);
67         ao_ms5607_stop();
68         return ((uint16_t) d[0] << 8) | (uint16_t) d[1];
69 }
70
71 static void
72 ao_ms5607_init_chip(void) {
73         uint8_t         addr;
74         uint16_t        *prom;
75
76         ao_ms5607_reset();
77         prom = &ms5607_prom.reserved;
78
79         for (addr = 0; addr <= 7; addr++)
80                 prom[addr] = ao_ms5607_prom_read(addr);
81         printf ("reserved: 0x%x\n", ms5607_prom.reserved);
82         printf ("sens:     0x%x\n", ms5607_prom.sens);
83         printf ("off:      0x%x\n", ms5607_prom.off);
84         printf ("tcs:      0x%x\n", ms5607_prom.tcs);
85         printf ("tco:      0x%x\n", ms5607_prom.tco);
86         printf ("tref:     0x%x\n", ms5607_prom.tref);
87         printf ("tempsens: 0x%x\n", ms5607_prom.tempsens);
88         printf ("crc:      0x%x\n", ms5607_prom.crc);
89 }
90
91 static uint32_t
92 ao_ms5607_convert(uint8_t cmd) {
93         uint8_t reply[3];
94         uint8_t read;
95
96         ao_ms5607_start();
97         ao_spi_send(&cmd, 1, AO_MS5607_SPI_INDEX);
98         ao_ms5607_stop();
99
100         ao_delay(AO_MS_TO_TICKS(20));
101
102         ao_ms5607_start();
103         read = AO_MS5607_ADC_READ;
104         ao_spi_send(&read, 1, AO_MS5607_SPI_INDEX);
105         ao_spi_recv(&reply, 3, AO_MS5607_SPI_INDEX);
106         ao_ms5607_stop();
107
108         return ((uint32_t) reply[0] << 16) | ((uint32_t) reply[1] << 8) | (uint32_t) reply[2];
109 }
110
111 static void
112 ao_ms5607_dump(void)
113 {
114         uint8_t addr;
115         uint32_t D1, D2;
116         int32_t dT;
117         int32_t TEMP;
118         int64_t OFF;
119         int64_t SENS;
120         int32_t P;
121
122         D2 =  ao_ms5607_convert(AO_MS5607_CONVERT_D2_4096);
123         printf ("Conversion D2: %d\n", D2);
124         D1 =  ao_ms5607_convert(AO_MS5607_CONVERT_D1_4096);
125         printf ("Conversion D1: %d\n", D1);
126
127         dT = D2 - ((int32_t) ms5607_prom.tref << 8);
128         
129         TEMP = 2000 + (((int64_t) dT * ms5607_prom.tempsens) >> 23);
130
131         OFF = ((int64_t) ms5607_prom.off << 17) + (((int64_t) ms5607_prom.tco * dT) >> 6);
132
133         SENS = ((int64_t) ms5607_prom.sens << 16) + (((int64_t) ms5607_prom.tcs * dT) >> 7);
134
135         if (TEMP < 2000) {
136                 int32_t T2 = ((int64_t) dT * (int64_t) dT) >> 31;
137                 int32_t TEMPM = TEMP - 2000;
138                 int64_t OFF2 = (61 * (int64_t) TEMPM * (int64_t) TEMPM) >> 4;
139                 int64_t SENS2 = 2 * (int64_t) TEMPM * (int64_t) TEMPM;
140         }
141
142         P = ((((int64_t) D1 * SENS) >> 21) - OFF) >> 15;
143         
144         printf ("Temperature: %d\n", TEMP);
145         printf ("Pressure %d\n", P);
146 }
147
148 __code struct ao_cmds ao_ms5607_cmds[] = {
149         { ao_ms5607_init_chip,  "i\0Init MS5607" },
150         { ao_ms5607_dump,       "p\0Display MS5607 data" },
151         { 0, NULL },
152 };
153
154 void
155 ao_ms5607_init(void)
156 {
157         ao_cmd_register(&ao_ms5607_cmds[0]);
158         ao_spi_init_cs(AO_MS5607_CS_GPIO, (1 << AO_MS5607_CS));
159 }