Files
2026-08-20 20:28:40 +01:00

222 lines
8.3 KiB
C

#ifndef PLOT_H
/*
* Simple diagnostic 2d plot function
*
* Copyright 1998 - 2004 Graeme W. Gill
* All rights reserved.
*
* This material is licenced under the GNU AFFERO GENERAL PUBLIC LICENSE Version 3 :-
* see the License.txt file for licencing details.
*/
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
/* Plot logging support */
void start_plot_log(char *plotlogname);
void stop_plot_log();
/* Print a message to stdout. This will be logged if logging enabled. */
void plot_msg(char *fmt, ...);
void plot_msg_fmt(char *fmt, va_list args);
/* To suppress plotting set env ARGYLL_SUPPRESS_PLOT */
/* MXGPHS is defined in aconfig.h, and usually has a value of 16 */
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
extern int plot_colors[MXGPHS][3];
/* Graph order is Black = Y1, Red = Y2, Green = Y3, Blue = Y4, Yellow = Y5, Purple = Y6 */
/* Brown = Y7, Orange = Y8, Grey = Y9, White = Y10 */
/* A plot color */
typedef struct {
float rgb[3]; /* 0.0 - 1.0 */
} plot_col;
/* Plot Symbol type */
typedef enum {
plotNoSym = 0,
plotDiagCross = 1,
plotOrthCross = 2,
plotSquare = 3,
plotDiamond = 4,
plotUpTriang = 5,
plotDownTriang = 6
} plot_sym;
/* Plot up to 3 X/Y Graphs. return when the user closes the window */
/* return 0 on success, -1 on error */
int do_plot(double *x, double *y1, double *y2, double *y3, int n);
/* Plot up to 3 graphs. */
/* if dowait > 0, wait for user key */
/* if dowait < 0, wait for no seconds */
/* If xmax > xmin, use as x scale, else auto. */
/* If ymax > ymin, use as y scale, else auto. */
/* ratio is window X / Y */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
int do_plot_x(double *x, double *y1, double *y2, double *y3, int n,
int dowait, double pxmin, double pxmax, double pymin, double pymax, double ratio);
/* Plot up to 3 graphs + crosses. Wait for key */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
int do_plot_p(double *x, double *y1, double *y2, double *y3, int n,
double *x4, double *y4, int m);
/* Public routines */
/* Plot up to 6 graphs */
/* return 0 on success, -1 on error */
/* Graph order is Black = Y1, Red = Y2, Green = Y3, Blue = Y4, Yellow = Y5, Purple = Y6 */
int do_plot6(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6, int n);
/* Plot up to 6 graphs + optional crosses. Wait for a key */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
int do_plot6p(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6,
int n, double *x7, double *y7, int m);
/* Public routines */
/* Plot up to 10 graphs. Wait for a key */
/* return 0 on success, -1 on error */
/* Graph order is Black = Y1, Red = Y2, Green = Y3, Blue = Y4, Yellow = Y5, Purple = Y6 */
/* Brown = Y7, Orange = Y8, Grey = Y9, White = Y10 */
/* if dozero flag, make sure y range covers zero */
int do_plot10(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6,
double *y7, double *y8, double *y9, double *y10,
int n, int dozero);
/* Plot up to 10 graphs + optional crosses. Wait for a key */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
int do_plot10p(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6,
double *y7, double *y8, double *y9, double *y10,
int n, double *xp, double *yp, int m);
/* Plot up to 10 graphs + optional crosses */
/* if dowait > 0, wait for user key */
/* if dowait < 0, wait for no seconds */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
int do_plot10pw(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6,
double *y7, double *y8, double *y9, double *y10,
int n, double *xp, double *yp, int m, int dowait);
/* Plot up to 10 graphs + optional crosses */
/* if dowait > 0, wait for user key */
/* if dowait < 0, wait for no seconds */
/* return 0 on success, -1 on error */
/* If n is -ve, reverse the X axis */
/* if dozero flag, make sure y range covers zero */
int do_plot10pwz(double *x, double *y1, double *y2, double *y3, double *y4, double *y5, double *y6,
double *y7, double *y8, double *y9, double *y10,
int n, double *xp, double *yp, int m, int dowait, int zero);
/* Public routines */
/* Plot up to MXGPHS (16) graphs + optional crosses */
/* yy must be yy[MXGPHS] with unused yy[] == NULL */
int do_plotNpwz(double *x, double **yy, int n, double *xp, double *yp, int m, int dowait, int zero);
/* Plot a bunch of vectors + points + optional colored points & notation */
/* return 0 on success, -1 on error */
/* Vectors are x1, y1 to x2, y2 with 'X' at x2, y2, */
/* Colored annotated Crosss at x3, y3. */
int do_plot_vec(double xmin, double xmax, double ymin, double ymax,
double *x1, double *y1, double *x2, double *y2, int n,
int dowait,
double *x3, double *y3, plot_col *mcols, char **mtext, int m);
/* Plot a bunch of vectors + points + optional colored points & notation */
/* + optional colored vectors */
/* return 0 on success, -1 on error */
/* Vectors are x1, y1 to x2, y2 with annotated 'X' at x2, y2, */
/* Colored annotated Crosss at x3, y3. */
/* Colored vector from x4, y4 to x5, y5 */
int do_plot_vec2(double xmin, double xmax, double ymin, double ymax,
double *x1, double *y1, double *x2, double *y2, char **ntext, int n,
int dowait,
double *x3, double *y3, plot_col *mcols, char **mtext, int m,
double *x4, double *y4, double *x5, double *y5, plot_col *ocols, int o);
/* Plot a bunch of colored vectors + points + optional colored points & notation */
/* + optional colored vectors */
/* return 0 on success, -1 on error */
/* Vectors are x1, y1 to x2, y2 with color ncols and annotated 'X' at x2, y2, */
/* Colored annotated Crosss at x3, y3. */
/* Colored vector from x4, y4 to x5, y5 */
int do_plot_vec3(double xmin, double xmax, double ymin, double ymax,
double *x1, double *y1, double *x2, double *y2, plot_col *ncols, char **ntext, int n,
int dowait,
double *x3, double *y3, plot_col *mcols, char **mtext, int m,
double *x4, double *y4, double *x5, double *y5, plot_col *ocols, int o);
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
/* General plot */
int do_plot_gen(
double ixmin, double ixmax, double iymin, double iymax, /* Graph range, */
/* xmin == xmax, ymin == ymax for auto bound on data */
double ratio, /* X/Y graph ratio */
int zero, /* Force ymin to be zero */
int dowait, /* Wait for user key */
double *x1, double *y1, double *x2, double *y2, plot_col *ocols, int o, /* Line segments */
double *x3, double *y3, plot_sym *tp, plot_col *pcols, char **ptext, int p /* Symbols */
);
/* General plot helpers. */
/* This is a struct and set of functions that incrementally build up */
/* a plot scene, and then uses do_plot_gen() to implement the do_plot_g() function */
/* (See top of plot.c for plan of how to improve this.) */
typedef struct {
/* Vectors */
double *x1, *y1, *x2, *y2;
plot_col *ocols;
int o, oa;
/* Symbols */
double *x3, *y3;
plot_sym *tp;
plot_col *pcols;
char **ptext;
int p, pa;
/* Line helper */
double lx, ly;
float lrgb[3];
} plot_g;
/* rgb, text may be NULL for default/none */
/* Have to clear list after do_plot_g() */
void init_g(plot_g *g);
void add_vec_g(plot_g *g, double x1, double y1, double x2, double y2, float *rgb);
void add_sym_g(plot_g *g, double x3, double y3, plot_sym st, float *rgb, char *ptext);
int get_xy_g(plot_g *g, double xy[2], int ix); /* Fetch point at index */
int set_xy_g(plot_g *g, double xy[2], int ix); /* Change point at index */
int get_vxyix_g(plot_g *g); /* Get the current index number */
/* Line helper. Adds vectors */
void start_line_g(plot_g *g, double x, double y, float *rgb);
void extend_line_g(plot_g *g, double x, double y);
void get_bounds_g(plot_g *g, double *xmin, double *xmax, double *ymin, double *ymax);
/* Calls do_plot_gen() which auto-sizes the plot */
void do_plot_g(plot_g *g,
double xmin, double xmax, double ymin, double ymax,
double ratio, int zero, int dowait);
void clear_g(plot_g *g);
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
#define PLOT_H
#endif /* PLOT_H */