first cut at turnon scripts for EasyTimer v2
[fw/altos] / altoslib / AltosConvert.java
1 /*
2  * Copyright © 2010 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 /*
20  * Sensor data conversion functions
21  */
22 package org.altusmetrum.altoslib_14;
23
24 import java.util.*;
25
26 public class AltosConvert {
27
28         public static final double gravity = 9.80665;
29
30         /*
31          * Pressure Sensor Model, version 1.1
32          *
33          * written by Holly Grimes
34          *
35          * Uses the International Standard Atmosphere as described in
36          *   "A Quick Derivation relating altitude to air pressure" (version 1.03)
37          *    from the Portland State Aerospace Society, except that the atmosphere
38          *    is divided into layers with each layer having a different lapse rate.
39          *
40          * Lapse rate data for each layer was obtained from Wikipedia on Sept. 1, 2007
41          *    at site <http://en.wikipedia.org/wiki/International_Standard_Atmosphere
42          *
43          * Height measurements use the local tangent plane.  The postive z-direction is up.
44          *
45          * All measurements are given in SI units (Kelvin, Pascal, meter, meters/second^2).
46          *   The lapse rate is given in Kelvin/meter, the gas constant for air is given
47          *   in Joules/(kilogram-Kelvin).
48          */
49
50         private static final double GRAVITATIONAL_ACCELERATION = -gravity;
51         private static final double AIR_GAS_CONSTANT            = 287.053;
52         private static final double NUMBER_OF_LAYERS            = 7;
53         private static final double MAXIMUM_ALTITUDE            = 84852.0;
54         private static final double MINIMUM_PRESSURE            = 0.3734;
55         private static final double LAYER0_BASE_TEMPERATURE     = 288.15;
56         private static final double LAYER0_BASE_PRESSURE        = 101325;
57
58         /* lapse rate and base altitude for each layer in the atmosphere */
59         private static final double[] lapse_rate = {
60                 -0.0065, 0.0, 0.001, 0.0028, 0.0, -0.0028, -0.002
61         };
62
63         private static final int[] base_altitude = {
64                 0, 11000, 20000, 32000, 47000, 51000, 71000
65         };
66
67         /* outputs atmospheric pressure associated with the given altitude.
68          * altitudes are measured with respect to the mean sea level
69          */
70         public static double
71         altitude_to_pressure(double altitude)
72         {
73                 double base_temperature = LAYER0_BASE_TEMPERATURE;
74                 double base_pressure = LAYER0_BASE_PRESSURE;
75
76                 double pressure;
77                 double base; /* base for function to determine pressure */
78                 double exponent; /* exponent for function to determine pressure */
79                 int layer_number; /* identifies layer in the atmosphere */
80                 double delta_z; /* difference between two altitudes */
81
82                 if (altitude > MAXIMUM_ALTITUDE) /* FIX ME: use sensor data to improve model */
83                         return 0;
84
85                 /* calculate the base temperature and pressure for the atmospheric layer
86                    associated with the inputted altitude */
87                 for(layer_number = 0; layer_number < NUMBER_OF_LAYERS - 1 && altitude > base_altitude[layer_number + 1]; layer_number++) {
88                         delta_z = base_altitude[layer_number + 1] - base_altitude[layer_number];
89                         if (lapse_rate[layer_number] == 0.0) {
90                                 exponent = GRAVITATIONAL_ACCELERATION * delta_z
91                                         / AIR_GAS_CONSTANT / base_temperature;
92                                 base_pressure *= Math.exp(exponent);
93                         }
94                         else {
95                                 base = (lapse_rate[layer_number] * delta_z / base_temperature) + 1.0;
96                                 exponent = GRAVITATIONAL_ACCELERATION /
97                                         (AIR_GAS_CONSTANT * lapse_rate[layer_number]);
98                                 base_pressure *= Math.pow(base, exponent);
99                         }
100                         base_temperature += delta_z * lapse_rate[layer_number];
101                 }
102
103                 /* calculate the pressure at the inputted altitude */
104                 delta_z = altitude - base_altitude[layer_number];
105                 if (lapse_rate[layer_number] == 0.0) {
106                         exponent = GRAVITATIONAL_ACCELERATION * delta_z
107                                 / AIR_GAS_CONSTANT / base_temperature;
108                         pressure = base_pressure * Math.exp(exponent);
109                 }
110                 else {
111                         base = (lapse_rate[layer_number] * delta_z / base_temperature) + 1.0;
112                         exponent = GRAVITATIONAL_ACCELERATION /
113                                 (AIR_GAS_CONSTANT * lapse_rate[layer_number]);
114                         pressure = base_pressure * Math.pow(base, exponent);
115                 }
116
117                 return pressure;
118         }
119
120
121 /* outputs the altitude associated with the given pressure. the altitude
122    returned is measured with respect to the mean sea level */
123         public static double
124         pressure_to_altitude(double pressure)
125         {
126
127                 double next_base_temperature = LAYER0_BASE_TEMPERATURE;
128                 double next_base_pressure = LAYER0_BASE_PRESSURE;
129
130                 double altitude;
131                 double base_pressure;
132                 double base_temperature;
133                 double base; /* base for function to determine base pressure of next layer */
134                 double exponent; /* exponent for function to determine base pressure
135                                     of next layer */
136                 double coefficient;
137                 int layer_number; /* identifies layer in the atmosphere */
138                 int delta_z; /* difference between two altitudes */
139
140                 if (pressure < 0)  /* illegal pressure */
141                         return -1;
142                 if (pressure < MINIMUM_PRESSURE) /* FIX ME: use sensor data to improve model */
143                         return MAXIMUM_ALTITUDE;
144
145                 /* calculate the base temperature and pressure for the atmospheric layer
146                    associated with the inputted pressure. */
147                 layer_number = -1;
148                 do {
149                         layer_number++;
150                         base_pressure = next_base_pressure;
151                         base_temperature = next_base_temperature;
152                         delta_z = base_altitude[layer_number + 1] - base_altitude[layer_number];
153                         if (lapse_rate[layer_number] == 0.0) {
154                                 exponent = GRAVITATIONAL_ACCELERATION * delta_z
155                                         / AIR_GAS_CONSTANT / base_temperature;
156                                 next_base_pressure *= Math.exp(exponent);
157                         }
158                         else {
159                                 base = (lapse_rate[layer_number] * delta_z / base_temperature) + 1.0;
160                                 exponent = GRAVITATIONAL_ACCELERATION /
161                                         (AIR_GAS_CONSTANT * lapse_rate[layer_number]);
162                                 next_base_pressure *= Math.pow(base, exponent);
163                         }
164                         next_base_temperature += delta_z * lapse_rate[layer_number];
165                 }
166                 while(layer_number < NUMBER_OF_LAYERS - 1 && pressure < next_base_pressure);
167
168                 /* calculate the altitude associated with the inputted pressure */
169                 if (lapse_rate[layer_number] == 0.0) {
170                         coefficient = (AIR_GAS_CONSTANT / GRAVITATIONAL_ACCELERATION)
171                                 * base_temperature;
172                         altitude = base_altitude[layer_number]
173                                 + coefficient * Math.log(pressure / base_pressure);
174                 }
175                 else {
176                         base = pressure / base_pressure;
177                         exponent = AIR_GAS_CONSTANT * lapse_rate[layer_number]
178                                 / GRAVITATIONAL_ACCELERATION;
179                         coefficient = base_temperature / lapse_rate[layer_number];
180                         altitude = base_altitude[layer_number]
181                                 + coefficient * (Math.pow(base, exponent) - 1);
182                 }
183
184                 return altitude;
185         }
186
187         public static double degrees_to_radians(double degrees) {
188                 if (degrees == AltosLib.MISSING)
189                         return AltosLib.MISSING;
190                 return degrees * (Math.PI / 180.0);
191         }
192
193         public static double radians_to_degrees(double radians) {
194                 if (radians == AltosLib.MISSING)
195                         return AltosLib.MISSING;
196                 return radians * (180.0 / Math.PI);
197         }
198
199         public static double
200         cc_battery_to_voltage(double battery)
201         {
202                 return battery / 32767.0 * 5.0;
203         }
204
205         public static double
206         cc_igniter_to_voltage(double ignite)
207         {
208                 return ignite / 32767 * 15.0;
209         }
210
211         public static double
212         barometer_to_pressure(double count)
213         {
214                 return ((count / 16.0) / 2047.0 + 0.095) / 0.009 * 1000.0;
215         }
216
217         static double
218         thermometer_to_temperature(double thermo)
219         {
220                 return (thermo - 19791.268) / 32728.0 * 1.25 / 0.00247;
221         }
222
223         static double mega_adc(int raw) {
224                 return raw / 4095.0;
225         }
226
227         static public double mega_battery_voltage(int v_batt) {
228                 if (v_batt != AltosLib.MISSING)
229                         return 3.3 * mega_adc(v_batt) * (5.6 + 10.0) / 10.0;
230                 return AltosLib.MISSING;
231         }
232
233         static double mega_pyro_voltage(int raw) {
234                 if (raw != AltosLib.MISSING)
235                         return 3.3 * mega_adc(raw) * (100.0 + 27.0) / 27.0;
236                 return AltosLib.MISSING;
237         }
238
239         static double tele_mini_3_adc(int raw) {
240                 return raw / 4095.0;
241         }
242
243         static public double tele_mini_3_battery_voltage(int v_batt) {
244                 if (v_batt != AltosLib.MISSING)
245                         return 3.3 * tele_mini_3_adc(v_batt) * (5.6 + 10.0) / 10.0;
246                 return AltosLib.MISSING;
247         }
248
249         static double tele_mini_3_pyro_voltage(int raw) {
250                 if (raw != AltosLib.MISSING)
251                         return 3.3 * tele_mini_3_adc(raw) * (100.0 + 27.0) / 27.0;
252                 return AltosLib.MISSING;
253         }
254
255         static double tele_mini_2_voltage(int sensor) {
256                 double  supply = 3.3;
257
258                 return sensor / 32767.0 * supply * 127/27;
259         }
260
261         static double tele_gps_1_voltage(int sensor) {
262                 double  supply = 3.3;
263
264                 return sensor / 32767.0 * supply * (5.6 + 10.0) / 10.0;
265         }
266
267         static double tele_gps_2_voltage(int sensor) {
268                 double  supply = 3.3;
269
270                 return sensor / 4095.0 * supply * (5.6 + 10.0) / 10.0;
271         }
272
273         static double tele_bt_3_battery(int raw) {
274                 if (raw == AltosLib.MISSING)
275                         return AltosLib.MISSING;
276                 return 3.3 * mega_adc(raw) * (5.1 + 10.0) / 10.0;
277         }
278
279         static double easy_timer_voltage(int sensor) {
280                 return 3.3 * mega_adc(sensor) * (100.0 + 27.0) / 27.0;
281         }
282
283         static double easy_mini_2_adc(double raw) {
284                 return raw / 4095.0;
285         }
286
287         static double easy_mini_1_adc(double raw) {
288                 return raw / 32767.0;
289         }
290
291         static double easy_mini_1_voltage(int sensor, int serial) {
292                 double  supply = 3.3;
293                 double  diode_offset = 0.0;
294
295                 /* early prototypes had a 3.0V regulator */
296                 if (serial < 1000)
297                         supply = 3.0;
298
299                 /* Purple v1.0 boards had the sensor after the
300                  * blocking diode, which drops about 150mV
301                  */
302                 if (serial < 1665)
303                         diode_offset = 0.150;
304
305                 return easy_mini_1_adc(sensor) * supply * 127/27 + diode_offset;
306         }
307
308         static double easy_mini_2_voltage(int sensor) {
309                 double  supply = 3.3;
310
311                 return easy_mini_2_adc(sensor) * supply * 127/27;
312         }
313
314         static double motor_pressure(double voltage) {
315                 double  base = 0.5;
316                 double  max = 4.5;
317                 double  full_scale_pressure = psi_to_pa(1600);
318
319                 if (voltage < base)
320                         voltage = base;
321                 if (voltage > max)
322                         voltage = max;
323                 return (voltage - base) / (max - base) * full_scale_pressure;
324         }
325
326         static double easy_motor_3_adc(double raw) {
327                 return raw / 32767.0;
328         }
329
330         static double easy_motor_3_voltage(int sensor) {
331                 double  supply = 3.3;
332
333                 return easy_motor_3_adc(sensor) * supply * 15.6 / 10.0;
334         }
335
336         static double easy_motor_2_motor_pressure(int sensor, double ground_sensor) {
337                 double  supply = 3.3;
338                 double  ground_voltage = easy_mini_2_adc(ground_sensor) * supply * 15.6 / 10.0;
339                 double  voltage = easy_mini_2_adc(sensor) * supply * 15.6 / 10.0;
340
341                 return motor_pressure(voltage) - motor_pressure(ground_voltage);
342         }
343
344         static double easy_motor_3_motor_pressure(int sensor, double ground_sensor) {
345                 double  supply = 3.3;
346                 double  ground_voltage = easy_motor_3_adc(ground_sensor) * supply * 15.6 / 10.0;
347                 double  voltage = easy_motor_3_adc(sensor) * supply * 15.6 / 10.0;
348
349                 return motor_pressure(voltage) - motor_pressure(ground_voltage);
350         }
351
352         public static double radio_to_frequency(int freq, int setting, int cal, int channel) {
353                 double  f;
354
355                 if (freq > 0)
356                         f = freq / 1000.0;
357                 else {
358                         if (setting <= 0)
359                                 setting = cal;
360                         f = 434.550 * setting / cal;
361                         /* Round to nearest 50KHz */
362                         f = Math.floor (20.0 * f + 0.5) / 20.0;
363                 }
364                 return f + channel * 0.100;
365         }
366
367         public static int radio_frequency_to_setting(double frequency, int cal) {
368                 double  set = frequency / 434.550 * cal;
369
370                 return (int) Math.floor (set + 0.5);
371         }
372
373         public static int radio_frequency_to_channel(double frequency) {
374                 int     channel = (int) Math.floor ((frequency - 434.550) / 0.100 + 0.5);
375
376                 if (channel < 0)
377                         channel = 0;
378                 if (channel > 9)
379                         channel = 9;
380                 return channel;
381         }
382
383         public static double radio_channel_to_frequency(int channel) {
384                 return 434.550 + channel * 0.100;
385         }
386
387         public static int telem_to_rssi(int telem) {
388                 return telem / 2 - 74;
389         }
390
391         public static int[] ParseHex(String line) {
392                 String[] tokens = line.split("\\s+");
393                 int[] array = new int[tokens.length];
394
395                 for (int i = 0; i < tokens.length; i++)
396                         try {
397                                 array[i] = Integer.parseInt(tokens[i], 16);
398                         } catch (NumberFormatException ne) {
399                                 return null;
400                         }
401                 return array;
402         }
403
404         public static double meters_to_feet(double meters) {
405                 return meters * (100 / (2.54 * 12));
406         }
407
408         public static double feet_to_meters(double feet) {
409                 return feet * 12 * 2.54 / 100.0;
410         }
411
412         public static double meters_to_miles(double meters) {
413                 return meters_to_feet(meters) / 5280;
414         }
415
416         public static double miles_to_meters(double miles) {
417                 return feet_to_meters(miles * 5280);
418         }
419
420         public static double meters_to_mph(double mps) {
421                 return meters_to_miles(mps) * 3600;
422         }
423
424         public static double mph_to_meters(double mps) {
425                 return miles_to_meters(mps) / 3600;
426         }
427
428         public static double mps_to_fps(double mps) {
429                 return meters_to_miles(mps) * 5280;
430         }
431
432         public static double fps_to_mps(double mps) {
433                 return miles_to_meters(mps) / 5280;
434         }
435
436         public static double meters_to_mach(double meters) {
437                 return meters / 343;            /* something close to mach at usual rocket sites */
438         }
439
440         public static double meters_to_g(double meters) {
441                 return meters / 9.80665;
442         }
443
444         public static double c_to_f(double c) {
445                 return c * 9/5 + 32;
446         }
447
448         public static double f_to_c(double c) {
449                 return (c - 32) * 5/9;
450         }
451
452         public static double psi_to_pa(double psi) {
453                 return psi * 6894.76;
454         }
455
456         public static double pa_to_psi(double pa) {
457                 return pa / 6894.76;
458         }
459
460         public static double n_to_lb(double n) {
461                 return n * 0.22480894;
462         }
463
464         public static double lb_to_n(double lb) {
465                 return lb / 0.22480894;
466         }
467
468         public static double acceleration_from_sensor(double sensor, double plus_g, double minus_g, double ground) {
469
470                 if (sensor == AltosLib.MISSING)
471                         return AltosLib.MISSING;
472
473                 if (plus_g == AltosLib.MISSING || minus_g == AltosLib.MISSING)
474                         return AltosLib.MISSING;
475
476                 if (ground == AltosLib.MISSING)
477                         ground = plus_g;
478
479                 double counts_per_g = (plus_g - minus_g) / 2.0;
480                 double counts_per_mss = counts_per_g / gravity;
481
482                 if (counts_per_mss == 0)
483                         return AltosLib.MISSING;
484
485                 return (sensor - ground) / counts_per_mss;
486         }
487
488         public static boolean imperial_units = false;
489
490         public static AltosDistance distance = new AltosDistance();
491
492         public static AltosHeight height = new AltosHeight();
493
494         public static AltosPressure pressure = new AltosPressure();
495
496         public static AltosForce force = new AltosForce();
497
498         public static AltosSpeed speed = new AltosSpeed();
499
500         public static AltosAccel accel = new AltosAccel();
501
502         public static AltosTemperature temperature = new AltosTemperature();
503
504         public static AltosOrient orient = new AltosOrient();
505
506         public static AltosVoltage voltage = new AltosVoltage();
507
508         public static AltosLatitude latitude = new AltosLatitude();
509
510         public static AltosLongitude longitude = new AltosLongitude();
511
512         public static AltosRotationRate rotation_rate = new AltosRotationRate();
513
514         public static AltosStateName state_name = new AltosStateName();
515
516         public static AltosPyroName pyro_name = new AltosPyroName();
517
518         public static AltosUnits magnetic_field = new AltosGauss();
519
520         public static String show_gs(String format, double a) {
521                 a = meters_to_g(a);
522                 format = format.concat(" g");
523                 return String.format(format, a);
524         }
525
526         public static String say_gs(double a) {
527                 return String.format("%6.0 gees", meters_to_g(a));
528         }
529
530         public static int checksum(int[] data, int start, int length) {
531                 int     csum = 0x5a;
532                 for (int i = 0; i < length; i++)
533                         csum += data[i + start];
534                 return csum & 0xff;
535         }
536
537         public static int checksum(List<Byte> data, int start, int length) {
538                 int     csum = 0x5a;
539                 for (int i = 0; i < length; i++)
540                         csum += data.get(i+start);
541                 return csum & 0xff;
542         }
543
544         public static double beep_value_to_freq(int value) {
545                 if (value == 0)
546                         return 4000;
547                 return 1.0/2.0 * (24.0e6/32.0) / (double) value;
548         }
549
550         public static int beep_freq_to_value(double freq) {
551                 if (freq == 0)
552                         return 94;
553                 return (int) Math.floor (1.0/2.0 * (24.0e6/32.0) / freq + 0.5);
554         }
555
556         public static final int BEARING_LONG = 0;
557         public static final int BEARING_SHORT = 1;
558         public static final int BEARING_VOICE = 2;
559
560         public static String bearing_to_words(int length, double bearing) {
561                 String [][] bearing_string = {
562                         {
563                                 "North", "North North East", "North East", "East North East",
564                                 "East", "East South East", "South East", "South South East",
565                                 "South", "South South West", "South West", "West South West",
566                                 "West", "West North West", "North West", "North North West"
567                         }, {
568                                 "N", "NNE", "NE", "ENE",
569                                 "E", "ESE", "SE", "SSE",
570                                 "S", "SSW", "SW", "WSW",
571                                 "W", "WNW", "NW", "NNW"
572                         }, {
573                                 "north", "nor nor east", "north east", "east nor east",
574                                 "east", "east sow east", "south east", "sow sow east",
575                                 "south", "sow sow west", "south west", "west sow west",
576                                 "west", "west nor west", "north west", "nor nor west "
577                         }
578                 };
579                 return bearing_string[length][(int)((bearing / 90 * 8 + 1) / 2)%16];
580         }
581 }