altos: Parameterize altitude table access and initialization
[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 #ifndef AO_CONST_ATTRIB
23 #define AO_CONST_ATTRIB
24 #endif
25
26 static const alt_t altitude_table[] AO_CONST_ATTRIB = {
27 #include "altitude-pa.h"
28 };
29
30 #ifndef FETCH_ALT
31 #define FETCH_ALT(o)    altitude_table[o]
32 #endif
33
34 #define ALT_SCALE       (1 << ALT_SHIFT)
35 #define ALT_MASK        (ALT_SCALE - 1)
36
37 alt_t
38 ao_pa_to_altitude(int32_t pa)
39 {
40         int16_t o;
41         int16_t part;
42         int32_t low, high;
43
44         if (pa < 0)
45                 pa = 0;
46         if (pa > 120000)
47                 pa = 120000;
48         o = pa >> ALT_SHIFT;
49         part = pa & ALT_MASK;
50
51         low = (alt_t) FETCH_ALT(o) * (ALT_SCALE - part);
52         high = (alt_t) FETCH_ALT(o+1) * part + (ALT_SCALE >> 1);
53         return (low + high) >> ALT_SHIFT;
54 }
55
56 int32_t
57 ao_altitude_to_pa(int32_t alt)
58 {
59         int32_t         span, sub_span;
60         uint16_t        l, h, m;
61         int32_t         pa;
62
63         l = 0;
64         h = NALT - 1;
65         while ((h - l) != 1) {
66                 m = (l + h) >> 1;
67                 if (altitude_table[m] < alt)
68                         h = m;
69                 else
70                         l = m;
71         }
72         span = altitude_table[l] - altitude_table[h];
73         sub_span = altitude_table[l] - alt;
74         pa = ((((int32_t) l * (span - sub_span) + (int32_t) h * sub_span) << ALT_SHIFT) + (span >> 1)) / span;
75         if (pa > 120000)
76                 pa = 120000;
77         if (pa < 0)
78                 pa = 0;
79         return pa;
80 }