/* file: window.c Paul Albrecht September 1984
Last revised: 12 April 2001
Subwindow definitions for plt
Copyright (C) Paul Albrecht 1988
Recent changes (by George Moody, george@mit.edu):
12 April 2001: added input checking in WindowDef, rewrote SuppressionDef
to avoid buffer overflow, general cleanup
_______________________________________________________________________________
This program is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free Software
Foundation; either version 2 of the License, or (at your option) any later
version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with
this program; if not, write to the Free Software Foundation, Inc., 59 Temple
Place - Suite 330, Boston, MA 02111-1307, USA.
You may contact the maintainer by e-mail (george@mit.edu) or postal mail
(MIT Room E25-505A, Cambridge, MA 02139 USA). For updates to this software,
please visit PhysioNet (http://www.physionet.org/).
_______________________________________________________________________________
*/
#include "plt.h"
/* Prototypes of functions defined in this module. */
void WindowDef(char *config, char *subsect);
void SuppressionDef(char *str);
void gsuppress(void);
static void turnoff(AxisPtr a, Const flag);
/* Public functions */
void WindowDef(char *config, char *subsect)
{
static float
mgrid[] = {0, .935, 1, .935, 0, .941, 1, .941, -1 },
mwin[] = {.12, .1, .94, .85 },
*msgrid = mgrid,
mswin[] = {.2, .17, .92, .85 },
bgrid[] = {0, .935, 1, .935, 0, .941, 1, .941,
0, .463, 1, .463, 0, .468, 1, .468, -1 },
bwin[] = {.074, .53, .96, .88,
.074, .06, .96, .41 },
*bsgrid = bgrid,
bswin[] = {.1, .53, .945, .85,
.1, .07, .945, .39 },
qgrid[] = { 0, .935, 1, .935, 0, .941, 1, .941,
0, .463, 1, .463, 0, .468, 1, .468,
.498, 0, .498, .94, .502, 0, .502, .94, -1},
qwin[] = {.074, .53, .454, .88, .58, .53, .96, .88,
.074, .06, .454, .41, .58, .06, .96, .41 },
qpgrid[] = { 0, .935, 1, .935, 0, .941, 1, .941,
0, .463, 1, .463, 0, .468, 1, .468,
.498, 0, .498, .94, .503, 0, .503, .94, -1},
qpwin[] = {.08, .54, .45, .87, .59, .54, .96, .87,
.08, .07, .45, .40, .59, .07, .96, .40 },
*qsgrid = qgrid,
qswin[] = {.1, .53, .435, .85, .6, .53, .945, .85,
.1, .07, .435, .39, .6, .07, .945, .39 };
float *wl, *gr;
char subsectmax;
if (config == 0)
config = "m";
if (subsect == 0)
subsect = "0";
if (strcmp(config,"m") == 0) {
gr = mgrid;
wl = mwin;
title.text = "";
subsectmax = '1';
}
else if (strcmp(config,"ms") == 0) {
gr = msgrid;
wl = mswin;
title.text = "";
subsectmax = '1';
}
else if (strcmp(config,"b") == 0) {
gr = bgrid;
wl = bwin;
subsectmax = '2';
}
else if (strcmp(config,"bs") == 0) {
gr = bsgrid;
wl = bswin;
subsectmax = '2';
}
else if (strcmp(config,"q") == 0) {
gr = qgrid;
wl = qwin;
subsectmax = '4';
}
else if (strcmp(config,"qs") == 0) {
gr = qsgrid;
wl = qswin;
subsectmax = '4';
}
else if (strcmp(config,"qp") == 0) {
gr = qpgrid;
wl = qpwin;
subsectmax = '4';
}
if (*subsect < '1' || *subsect > subsectmax) {
xa.min = ya.min = xmin = ymin = xwmins = ywmins = 0;
xa.max = ya.max = xmax = ymax = xwmaxs = ywmaxs = 1;
theight = 0.97;
title.just = "CC";
while (*gr >= 0) {
FigureDef(CONNECT, WINC, gr[0], gr[1], gr[2], gr[3], NULL);
gr += 4;
}
FigureDef(BOX, WINC, 0.0, 0.0, 1.0, 1.0, NULL);
SuppressionDef("xy");
}
else {
wl += (*subsect-'1') * sizeof(*wl);
xwmins = wl[0];
ywmins = wl[1];
xwmaxs = wl[2];
ywmaxs = wl[3];
omode &= ~ERASE;
title.just = "CB";
theight = 1.07;
if (config[0] != 'm')
TextInit(-1);
SuppressionDef("e");
xa.lbl = "";
}
}
/* Suppress the generation of parts of the graph */
void SuppressionDef(char *str)
{
size_t len1 = Plot.suppress ? strlen(Plot.suppress) : 0;
size_t len2 = str ? strlen(str) : 0;
char *ptr;
ptr = zmem(len1 + len2 + 1, 1);
if (Plot.suppress) {
strcpy(ptr, Plot.suppress);
free(Plot.suppress);
}
if (str)
strcpy(ptr+len1, str);
Plot.suppress = ptr;
}
void gsuppress(void)
{
AxisPtr a;
char chr;
a = 0;
if (Plot.suppress)
while (chr = *Plot.suppress++) {
switch (chr) {
case 'a': turnoff(a, AXIS); break;
case 'e': turnoff(a, ERASE); break;
case 'f': turnoff(a, FIGURES); break;
case 'g': turnoff(a, GRIDMARKS); break;
case 'm': turnoff(a, TICKMARKS); break;
case 'n': turnoff(a, TICKNUMS); break;
case 'l': turnoff(a, LABELS); break;
case 'p': turnoff(a, PLOTS); break;
case 't': turnoff(a, TITLES); break;
case 'x': xa.mode = 0; break;
case 'y': ya.mode = 0; break;
case 'C': omode = xa.mode = ya.mode = 077777; a = 0; break;
case 'A': a = 0; break;
case 'X': a = &xa; break;
case 'Y': a = &ya; break;
default: err(NO, "Bad element `%c' for suppress", chr);
}
}
}
/* Private functions (callable only from within this module) */
static void turnoff(AxisPtr a, Const flag)
{
short mask = ~flag;
if (a == 0) omode &= mask;
if (a == 0 || a == &xa) xa.mode &= mask;
if (a == 0 || a == &ya) ya.mode &= mask;
}