altos: Add conversion between Pa and meters
[fw/altos] / src / core / ao_convert_pa.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 #if !defined(AO_CONVERT_TEST) && !defined(AO_FLIGHT_TEST)
19 #include "ao.h"
20 #endif
21
22 static const int32_t altitude_table[] = {
23 #include "altitude-pa.h"
24 };
25
26 #define ALT_SCALE       (1 << ALT_SHIFT)
27 #define ALT_MASK        (ALT_SCALE - 1)
28
29 int32_t
30 ao_pa_to_altitude(int32_t pa)
31 {
32         int16_t o;
33         int16_t part;
34         int32_t low, high;
35
36         if (pa < 0)
37                 pa = 0;
38         if (pa > 120000)
39                 pa = 120000;
40         o = pa >> ALT_SHIFT;
41         part = pa & ALT_MASK;
42
43         low = (int32_t) altitude_table[o] * (ALT_SCALE - part);
44         high = (int32_t) altitude_table[o+1] * part + (ALT_SCALE >> 1);
45         return (low + high) >> ALT_SHIFT;
46 }
47
48 int32_t
49 ao_altitude_to_pa(int32_t alt)
50 {
51         int32_t         span, sub_span;
52         uint16_t        l, h, m;
53         int32_t         pa;
54
55         l = 0;
56         h = NALT - 1;
57         while ((h - l) != 1) {
58                 m = (l + h) >> 1;
59                 if (altitude_table[m] < alt)
60                         h = m;
61                 else
62                         l = m;
63         }
64         span = altitude_table[l] - altitude_table[h];
65         sub_span = altitude_table[l] - alt;
66         pa = ((((int32_t) l * (span - sub_span) + (int32_t) h * sub_span) << ALT_SHIFT) + (span >> 1)) / span;
67         if (pa > 120000)
68                 pa = 120000;
69         if (pa < 0)
70                 pa = 0;
71         return pa;
72 }