Switch from GPLv2 to GPLv2+
[fw/altos] / ao-tools / ao-view / aoview_convert.c
1 /*
2  * Copyright © 2009 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 "aoview.h"
20
21 static int16_t altitude_table[] = {
22 #include "altitude.h"
23 };
24
25 #define ALT_FRAC_SCALE  (1 << ALT_FRAC_BITS)
26 #define ALT_FRAC_MASK   (ALT_FRAC_SCALE - 1)
27
28 int16_t
29 aoview_pres_to_altitude(int16_t pres)
30 {
31         uint8_t o;
32         int16_t part;
33
34         if (pres < 0)
35                 pres = 0;
36         o = pres >> ALT_FRAC_BITS;
37         part = pres & ALT_FRAC_MASK;
38
39         return ((int32_t) altitude_table[o] * (ALT_FRAC_SCALE - part) +
40                 (int32_t) altitude_table[o+1] * part + (ALT_FRAC_SCALE >> 1)) >> ALT_FRAC_BITS;
41 }
42
43 int16_t
44 aoview_altitude_to_pres(int16_t alt)
45 {
46         int16_t span, sub_span;
47         uint8_t l, h, m;
48         int32_t pres;
49
50         l = 0;
51         h = NALT - 1;
52         while ((h - l) != 1) {
53                 m = (l + h) >> 1;
54                 if (altitude_table[m] < alt)
55                         h = m;
56                 else
57                         l = m;
58         }
59         span = altitude_table[l] - altitude_table[h];
60         sub_span = altitude_table[l] - alt;
61         pres = ((((int32_t) l * (span - sub_span) + (int32_t) h * sub_span) << ALT_FRAC_BITS) + (span >> 1)) / span;
62         if (pres > 32767)
63                 pres = 32767;
64         if (pres < 0)
65                 pres = 0;
66         return (int16_t) pres;
67 }