2 * Copyright © 2009 Keith Packard <keithp@keithp.com>
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.
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.
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.
27 #include <plplot/plplot.h>
29 static const char *state_names[] = {
42 static int plot_colors[3][3] = {
43 { 0, 0x90, 0 }, /* height */
44 { 0xa0, 0, 0 }, /* speed */
45 { 0, 0, 0xc0 }, /* accel */
53 plot_perioddata(struct cc_perioddata *d, char *axis_label, char *plot_label,
54 double min_time, double max_time, int plot_type)
62 if (!cc_perioddata_limits(d, min_time, max_time, &start, &stop))
65 times = calloc(stop - start + 1, sizeof (double));
66 for (i = start; i <= stop; i++)
67 times[i-start] = i * d->step / 100.0;
69 ymin_i = cc_perioddata_min(d, min_time, max_time);
70 ymax_i = cc_perioddata_max(d, min_time, max_time);
71 ymin = d->data[ymin_i];
72 ymax = d->data[ymax_i];
74 plscol0(2, plot_colors[plot_type][0], plot_colors[plot_type][1], plot_colors[plot_type][2]);
76 plenv(times[0], times[stop-start],
78 pllab("Time", axis_label, plot_label);
80 plline(stop - start + 1, times, d->data + start);
85 plot_timedata(struct cc_timedata *d, char *axis_label, char *plot_label,
86 double min_time, double max_time)
93 int start = -1, stop = -1;
94 double start_time = 0, stop_time = 0;
97 for (i = 0; i < d->num; i++) {
98 if (start < 0 && d->data[i].time >= min_time) {
99 start_time = d->data[i].time;
102 if (d->data[i].time <= max_time) {
103 stop_time = d->data[i].time;
108 times = calloc(stop - start + 1, sizeof (double));
109 values = calloc(stop - start + 1, sizeof (double));
111 ymin_i = cc_timedata_min(d, min_time, max_time);
112 ymax_i = cc_timedata_max(d, min_time, max_time);
113 ymin = d->data[ymin_i].value;
114 ymax = d->data[ymax_i].value;
116 pllab("Time", axis_label, plot_label);
117 for (i = start; i <= stop; i++) {
118 times[i-start] = (d->data[i].time - start_time)/100.0;
119 values[i-start] = d->data[i].value;
121 plenv(times[0], times[stop-start], ymin, ymax, 0, 2);
122 plline(stop - start + 1, times, values);
127 static struct cc_perioddata *
128 merge_data(struct cc_perioddata *first, struct cc_perioddata *last, double split_time)
131 struct cc_perioddata *pd;
133 double start_time, stop_time;
136 pd = calloc(1, sizeof (struct cc_perioddata));
137 start_time = first->start;
138 stop_time = last->start + last->step * last->num;
139 num = (stop_time - start_time) / first->step;
141 pd->data = calloc(num, sizeof (double));
142 pd->start = first->start;
143 pd->step = first->step;
144 for (i = 0; i < num; i++) {
145 t = pd->start + i * pd->step;
146 if (t <= split_time) {
147 pd->data[i] = first->data[i];
151 j = (t - last->start) / last->step;
152 if (j < 0 || j >= last->num)
155 pd->data[i] = last->data[j];
162 analyse_flight(struct cc_flightraw *f, FILE *summary_file, FILE *detail_file, FILE *raw_file, char *plot_name)
168 double boost_start, boost_stop;
171 int pres_i, accel_i, speed_i;
172 int boost_start_set = 0;
173 int boost_stop_set = 0;
174 enum ao_flight_state state;
175 double state_start, state_stop;
176 struct cc_flightcooked *cooked;
179 fprintf(summary_file, "Flight: %9d\nSerial: %9d\n",
180 f->flight, f->serial);
181 boost_start = f->accel.data[0].time;
182 boost_stop = f->accel.data[f->accel.num-1].time;
183 for (i = 0; i < f->state.num; i++) {
184 if (f->state.data[i].value == ao_flight_boost && !boost_start_set) {
185 boost_start = f->state.data[i].time;
188 if (f->state.data[i].value > ao_flight_boost && !boost_stop_set) {
189 boost_stop = f->state.data[i].time;
194 pres_i = cc_timedata_min(&f->pres, f->pres.data[0].time,
195 f->pres.data[f->pres.num-1].time);
198 min_pres = f->pres.data[pres_i].value;
199 height = cc_barometer_to_altitude(min_pres) -
200 cc_barometer_to_altitude(f->ground_pres);
201 fprintf(summary_file, "Max height: %9.2fm %9.2fft %9.2fs\n",
202 height, height * 100 / 2.54 / 12,
203 (f->pres.data[pres_i].time - boost_start) / 100.0);
204 apogee = f->pres.data[pres_i].time;
207 cooked = cc_flight_cook(f);
209 speed_i = cc_perioddata_max(&cooked->accel_speed, boost_start, boost_stop);
211 speed = cooked->accel_speed.data[speed_i];
212 fprintf(summary_file, "Max speed: %9.2fm/s %9.2fft/s %9.2fs\n",
213 speed, speed * 100 / 2.4 / 12.0,
214 (cooked->accel_speed.start + speed_i * cooked->accel_speed.step - boost_start) / 100.0);
217 accel_i = cc_timedata_min(&f->accel, boost_start, boost_stop);
220 accel = cc_accelerometer_to_acceleration(f->accel.data[accel_i].value,
222 fprintf(summary_file, "Max accel: %9.2fm/s² %9.2fg %9.2fs\n",
223 accel, accel / 9.80665,
224 (f->accel.data[accel_i].time - boost_start) / 100.0);
227 for (i = 0; i < f->state.num; i++) {
228 state = f->state.data[i].value;
229 state_start = f->state.data[i].time;
230 while (i < f->state.num - 1 && f->state.data[i+1].value == state)
232 if (i < f->state.num - 1)
233 state_stop = f->state.data[i + 1].time;
235 state_stop = f->accel.data[f->accel.num-1].time;
236 fprintf(summary_file, "State: %s\n", state_names[state]);
237 fprintf(summary_file, "\tStart: %9.2fs\n", (state_start - boost_start) / 100.0);
238 fprintf(summary_file, "\tDuration: %9.2fs\n", (state_stop - state_start) / 100.0);
239 accel_i = cc_timedata_min(&f->accel, state_start, state_stop);
242 accel = cc_accelerometer_to_acceleration(f->accel.data[accel_i].value,
244 fprintf(summary_file, "\tMax accel: %9.2fm/s² %9.2fg %9.2fs\n",
245 accel, accel / 9.80665,
246 (f->accel.data[accel_i].time - boost_start) / 100.0);
250 if (state < ao_flight_drogue) {
251 speed_i = cc_perioddata_max_mag(&cooked->accel_speed, state_start, state_stop);
253 speed = cooked->accel_speed.data[speed_i];
254 avg_speed = cc_perioddata_average(&cooked->accel_speed, state_start, state_stop);
256 speed_i = cc_perioddata_max_mag(&cooked->pres_speed, state_start, state_stop);
258 speed = cooked->pres_speed.data[speed_i];
259 avg_speed = cc_perioddata_average(&cooked->pres_speed, state_start, state_stop);
263 fprintf(summary_file, "\tMax speed: %9.2fm/s %9.2fft/s %9.2fs\n",
264 speed, speed * 100 / 2.4 / 12.0,
265 (cooked->accel_speed.start + speed_i * cooked->accel_speed.step - boost_start) / 100.0);
266 fprintf(summary_file, "\tAvg speed: %9.2fm/s %9.2fft/s\n",
267 avg_speed, avg_speed * 100 / 2.4 / 12.0);
270 pres_i = cc_timedata_min(&f->pres, state_start, state_stop);
273 min_pres = f->pres.data[pres_i].value;
274 height = cc_barometer_to_altitude(min_pres) -
275 cc_barometer_to_altitude(f->ground_pres);
276 fprintf(summary_file, "\tMax height: %9.2fm %9.2fft %9.2fs\n",
277 height, height * 100 / 2.54 / 12,
278 (f->pres.data[pres_i].time - boost_start) / 100.0);
281 if (cooked && detail_file) {
282 double max_height = 0;
286 fprintf(detail_file, "%9s %9s %9s %9s\n",
287 "time", "height", "speed", "accel");
288 for (i = 0; i < cooked->pres_pos.num; i++) {
289 double time = (cooked->accel_accel.start + i * cooked->accel_accel.step - boost_start) / 100.0;
290 double accel = cooked->accel_accel.data[i];
291 double pos = cooked->pres_pos.data[i];
293 if (cooked->pres_pos.start + cooked->pres_pos.step * i < apogee)
294 speed = cooked->accel_speed.data[i];
296 speed = cooked->pres_speed.data[i];
297 fprintf(detail_file, "%9.2f %9.2f %9.2f %9.2f\n",
298 time, pos, speed, accel);
302 fprintf(raw_file, "%9s %9s %9s\n",
303 "time", "height", "accel");
304 for (i = 0; i < cooked->pres.num; i++) {
305 double time = cooked->pres.data[i].time;
306 double pres = cooked->pres.data[i].value;
307 double accel = cooked->accel.data[i].value;
308 fprintf(raw_file, "%9.2f %9.2f %9.2f %9.2f\n",
312 if (cooked && plot_name) {
313 struct cc_perioddata *speed;
317 plspage(PLOT_DPI, PLOT_DPI, 8 * PLOT_DPI, 8 * PLOT_DPI, 0, 0);
318 plscolbg(0xff, 0xff, 0xff);
321 speed = merge_data(&cooked->accel_speed, &cooked->pres_speed, apogee);
323 plot_perioddata(&cooked->pres_pos, "meters", "Height", -1e10, 1e10, PLOT_HEIGHT);
324 plot_perioddata(&cooked->pres_pos, "meters", "Height to Apogee", boost_start, apogee, PLOT_HEIGHT);
325 plot_perioddata(speed, "meters/second", "Speed", -1e10, 1e10, PLOT_SPEED);
326 plot_perioddata(speed, "meters/second", "Speed to Apogee", boost_start, apogee, PLOT_SPEED);
327 plot_perioddata(&cooked->accel_accel, "meters/second²", "Acceleration", -1e10, 1e10, PLOT_ACCEL);
328 plot_perioddata(&cooked->accel_accel, "meters/second²", "Acceleration during Boost", boost_start, boost_stop + (boost_stop - boost_start) / 2.0, PLOT_ACCEL);
334 cc_flightcooked_free(cooked);
337 static const struct option options[] = {
338 { .name = "summary", .has_arg = 1, .val = 's' },
339 { .name = "detail", .has_arg = 1, .val = 'd' },
340 { .name = "plot", .has_arg = 1, .val = 'p' },
341 { .name = "raw", .has_arg = 1, .val = 'r' },
345 static void usage(char *program)
347 fprintf(stderr, "usage: %s\n"
348 "\t[--summary=<summary-file>] [-s <summary-file>]\n"
349 "\t[--detail=<detail-file] [-d <detail-file>]\n"
350 "\t[--raw=<raw-file> -r <raw-file]\n"
351 "\t[--plot=<plot-file> -p <plot-file>]\n"
352 "\t{flight-log} ...\n", program);
357 main (int argc, char **argv)
360 FILE *summary_file = NULL;
361 FILE *detail_file = NULL;
362 FILE *raw_file = NULL;
365 struct cc_flightraw *raw;
369 char *summary_name = NULL;
370 char *detail_name = NULL;
371 char *raw_name = NULL;
372 char *plot_name = NULL;
374 while ((c = getopt_long(argc, argv, "s:d:p:r:", options, NULL)) != -1) {
377 summary_name = optarg;
380 detail_name = optarg;
393 summary_file = stdout;
395 summary_file = fopen(summary_name, "w");
397 perror (summary_name);
402 if (summary_name && !strcmp (summary_name, detail_name))
403 detail_file = summary_file;
405 detail_file = fopen(detail_name, "w");
413 raw_file = fopen (raw_name, "w");
419 for (i = optind; i < argc; i++) {
420 file = fopen(argv[i], "r");
426 s = strstr(argv[i], "-serial-");
428 serial = atoi(s + 8);
431 raw = cc_log_read(file);
438 raw->serial = serial;
439 analyse_flight(raw, summary_file, detail_file, raw_file, plot_name);
440 cc_flightraw_free(raw);