static void
save_floatc(struct uih_context *uih, const char *name, number_t number)
{
start_save(uih, name);
save_float(uih, number);
stop_save(uih);
}
static void
save_stringc(struct uih_context *uih, const char *name, const char *param)
{
start_save(uih, name);
save_string(uih, param);
stop_save(uih);
}
static void
save_onoffc(struct uih_context *uih, const char *name, int number)
{
start_save(uih, name);
save_onoff(uih, number);
stop_save(uih);
}
static void
save_intc (struct uih_context *uih, CONST char *name, int number)
{
start_save (uih, name);
save_int (uih, number);
stop_save (uih);
}
static void
save_float2c(struct uih_context *uih, const char *name,
number_t number, int places)
{
start_save(uih, name);
save_float2(uih, number, places);
stop_save(uih);
}
static void
save_keystringc (struct uih_context *uih, CONST char *name,
CONST char *param)
{
start_save (uih, name);
save_keystring (uih, param);
stop_save (uih);
}
static void
save_coordc (struct uih_context *uih, CONST char *name,
number_t number, number_t number2)
{
start_save (uih, name);
save_float (uih, number);
save_float (uih, number2);
stop_save (uih);
}
static void savepos3(struct uih_context *uih)
{
int n = ndecimals(uih);
start_save(uih, "morphview");
save_float2(uih, uih->fcontext->s.cr, n);
save_float2(uih, uih->fcontext->s.ci, n);
save_float2(uih, uih->fcontext->s.rr, n);
save_float2(uih, uih->fcontext->s.ri, n);
stop_save(uih);
uih->savec->fcontext->s = uih->fcontext->s;
}
PRIVATE void checkpoint_now(void) {
if (checkpoint_filename != NULL) {
char buf[80];
FILE *f;
void *handle;
sprintf(buf, "%s.%.3d", checkpoint_filename, checkpoint_suffix++);
f = fopen(buf, "w");
if (f == NULL)
return;
handle = start_save(f);
save(handle, (OBJ) symtab);
save_restartable_threads(handle, f);
end_save(handle);
fclose(f);
}
}
void uih_saveframe(struct uih_context *uih)
{
struct uih_savedcontext *s = uih->savec;
int i;
int resetsync = 0;
if (uih->save) {
changed = 0;
if (s->firsttime)
save_noparam(uih, "initstate");
if (s->nonfractalscreen && !uih->nonfractalscreen)
save_noparam(uih, "display"), s->nonfractalscreen = 0;
for (i = uih_nfilters; i >= 0; i--) {
if (uih->filter[i] != NULL) {
if (s->filter[i] != 1) {
start_save(uih, "filter");
save_keystring(uih, uih->filter[i]->action->shortname);
save_onoff(uih, 1);
s->filter[i] = 1;
stop_save(uih);
}
} else if (s->filter[i] != 0) {
s->filter[i] = 0;
start_save(uih, "filter");
save_keystring(uih, uih_filters[i]->shortname);
save_onoff(uih, 0);
stop_save(uih);
}
}
if (uih->palettechanged) {
switch (uih->palettetype) {
case 0:
save_intc(uih, "defaultpalette", uih->paletteshift);
break;
default:
start_save(uih, "palette");
save_int(uih, uih->palettetype);
save_int(uih, uih->paletteseed);
save_int(uih, uih->paletteshift);
stop_save(uih);
break;
}
uih->palettechanged = 0;
s->manualpaletteshift = 0;
}
if (s->manualpaletteshift != uih->manualpaletteshift)
save_intc(uih, "shiftpalette",
uih->manualpaletteshift - s->manualpaletteshift),
s->manualpaletteshift = uih->manualpaletteshift;
if (s->fcontext->currentformula != uih->fcontext->currentformula) {
save_keystringc(uih, "formula",
uih->fcontext->currentformula->shortname),
s->fcontext->currentformula =
uih->fcontext->currentformula;
#ifdef SFFE_USING
/*SFFE : malczak */
if ((int) (uih->fcontext->currentformula - formulas) == 24) //user formula
{
save_stringc(uih, "usrform", uih->parser->expression);
if (uih->pinit)
save_stringc(uih, "usrformInit",
uih->pinit->expression);
else
save_stringc(uih, "usrformInit", "");
};
/*SFFE : malczak */
#endif
set_formula(s->fcontext,
(int) (uih->fcontext->currentformula - formulas));
}
if (s->mode >= UIH_SAVEALL)
save_intc(uih, "letterspersec", uih->letterspersec);
if (s->mode > UIH_SAVEPOS) {
if (s->speedup != uih->speedup)
save_floatc(uih, "speedup", uih->speedup), s->speedup =
uih->speedup;
if (s->maxstep != uih->maxstep)
save_floatc(uih, "maxstep", uih->maxstep), s->maxstep =
uih->maxstep;
if (s->fastmode != uih->fastmode)
save_nstringc(uih, "fastmode", uih->fastmode,
save_fastmode), s->fastmode = uih->fastmode;
}
if (s->juliamode != uih->juliamode)
save_onoffc(uih, "fastjulia", uih->juliamode), s->juliamode =
uih->juliamode;
if (s->cycling != uih->cycling)
save_onoffc(uih, "cycling", uih->cycling), s->cycling =
uih->cycling;
if (s->mode >= UIH_SAVEPOS
&& s->fcontext->periodicity != uih->fcontext->periodicity)
save_onoffc(uih, "periodicity", uih->fcontext->periodicity),
s->fcontext->periodicity = uih->fcontext->periodicity;
if ((uih->cycling || s->mode >= UIH_SAVEALL)
&& (s->cyclingspeed != uih->cyclingspeed
|| s->direction != uih->direction * uih->cyclingdirection))
save_intc(uih, "cyclingspeed",
uih->cyclingspeed * uih->direction *
uih->cyclingdirection), s->cyclingspeed =
uih->cyclingspeed, s->direction =
uih->direction * uih->cyclingdirection;
if ((s->mode > UIH_SAVEPOS && (uih->step || uih->zoomactive))
&& (s->xcenter != uih->xcenter || s->ycenter != uih->ycenter))
save_coordc(uih, "zoomcenter", uih->xcenter, uih->ycenter),
s->xcenter = uih->xcenter, s->ycenter = uih->ycenter;
if ((!uih->fcontext->mandelbrot || uih->juliamode)
&& (s->fcontext->pre != uih->fcontext->pre
|| s->fcontext->pim != uih->fcontext->pim)) {
if (uih->juliamode && uih->pressed)
save_coordc(uih, "morphjulia", uih->fcontext->pre,
uih->fcontext->pim), s->fcontext->pre =
uih->fcontext->pre, s->fcontext->pim =
uih->fcontext->pim;
else
save_coordc(uih, "juliaseed", uih->fcontext->pre,
uih->fcontext->pim), s->fcontext->pre =
uih->fcontext->pre, s->fcontext->pim =
uih->fcontext->pim;
}
if (uih->fcontext->bre != s->fcontext->bre
|| uih->fcontext->bim != s->fcontext->bim) {
save_coordc(uih, "perturbation", uih->fcontext->bre,
uih->fcontext->bim), s->fcontext->bre =
uih->fcontext->bre, s->fcontext->bim = uih->fcontext->bim;
}
if (uih->fastrotate != s->fastrotate && s->mode > UIH_SAVEPOS) {
save_onoffc(uih, "fastrotate", uih->fastrotate);
s->fastrotate = uih->fastrotate;
}
if (uih->fcontext->angle != s->fcontext->angle
&& s->autorotate != 1) {
if (s->rotatepressed && s->mode == UIH_SAVEANIMATION)
save_float2c(uih, "morphangle", uih->fcontext->angle, 5);
else
save_float2c(uih, "angle", uih->fcontext->angle, 5);
s->rotatepressed = uih->rotatepressed;
s->fcontext->angle = uih->fcontext->angle;
}
if (uih->rotationspeed != s->rotationspeed
&&
((s->mode > UIH_SAVEPOS
&& uih->rotatemode == ROTATE_CONTINUOUS)
|| s->mode >= UIH_SAVEALL)) {
save_float2c(uih, "rotationspeed", uih->rotationspeed, 6);
s->rotationspeed = uih->rotationspeed;
}
if (s->autorotate != (uih->rotatemode == ROTATE_CONTINUOUS)) {
s->autorotate = (uih->rotatemode == ROTATE_CONTINUOUS);
save_onoffc(uih, "autorotate", s->autorotate);
}
if (s->fcontext->maxiter != uih->fcontext->maxiter)
save_intc(uih, "maxiter", uih->fcontext->maxiter),
s->fcontext->maxiter = uih->fcontext->maxiter;
if (s->fcontext->bailout != uih->fcontext->bailout)
save_floatc(uih, "bailout", uih->fcontext->bailout),
s->fcontext->bailout = uih->fcontext->bailout;
if (s->fcontext->coloringmode != uih->fcontext->coloringmode)
save_intc(uih, "outcoloring", uih->fcontext->coloringmode),
s->fcontext->coloringmode = uih->fcontext->coloringmode;
if (s->fcontext->incoloringmode != uih->fcontext->incoloringmode)
save_intc(uih, "incoloring", uih->fcontext->incoloringmode),
s->fcontext->incoloringmode =
uih->fcontext->incoloringmode;
if (s->fcontext->incoloringmode != uih->fcontext->incoloringmode)
save_intc(uih, "incoloring", uih->fcontext->incoloringmode),
s->fcontext->incoloringmode =
uih->fcontext->incoloringmode;
if ((s->fcontext->incoloringmode == 10 || s->mode >= UIH_SAVEALL)
&& s->fcontext->intcolor != uih->fcontext->intcolor)
save_intc(uih, "intcoloring", uih->fcontext->intcolor),
s->fcontext->intcolor = uih->fcontext->intcolor;
if ((s->fcontext->coloringmode == 10 || s->mode >= UIH_SAVEALL)
&& s->fcontext->outtcolor != uih->fcontext->outtcolor)
save_intc(uih, "outtcoloring", uih->fcontext->outtcolor),
s->fcontext->outtcolor = uih->fcontext->outtcolor;
if (s->fcontext->mandelbrot != uih->fcontext->mandelbrot)
save_onoffc(uih, "julia", !uih->fcontext->mandelbrot),
s->fcontext->mandelbrot = uih->fcontext->mandelbrot;
if (s->mode > UIH_SAVEPOS
&& s->fcontext->range != uih->fcontext->range)
save_intc(uih, "range", uih->fcontext->range),
s->fcontext->range = uih->fcontext->range;
if (s->fcontext->plane != uih->fcontext->plane)
save_intc(uih, "plane", uih->fcontext->plane),
s->fcontext->plane = uih->fcontext->plane;
if (s->zoomactive != uih->zoomactive && s->mode > UIH_SAVEPOS) {
switch (uih->zoomactive) {
case -1:
save_noparam(uih, "unzoom");
break;
case 1:
save_noparam(uih, "zoom");
break;
default:
save_noparam(uih, "stop");
break;
}
s->zoomactive = uih->zoomactive;
}
if ((s->mode >= UIH_SAVEPOS || uih->displaytext)
&& s->color != uih->color) {
start_save(uih, "color");
save_nstring(uih, uih->color, uih_colornames);
stop_save(uih);
s->color = uih->color;
}
if (s->clearscreen) {
save_noparam(uih, "clearscreen");
s->clearscreen = 0;
s->nonfractalscreen = 1;
}
if (uih->displaytext) {
for (i = 0; i < 3; i++) {
if (uih->displaytext & (1 << i)) {
if (s->ytextpos != i || s->xtextpos != uih->textpos[i]) {
start_save(uih, "textpossition");
save_nstring(uih, uih->xtextpos, xtextposnames);
save_nstring(uih, uih->ytextpos, ytextposnames);
stop_save(uih);
s->xtextpos = uih->xtextpos;
s->ytextpos = uih->ytextpos;
}
save_stringc(uih, "text", uih->text[i]);
s->nonfractalscreen = 1;
}
}
save_noparam(uih, "textsleep");
uih->displaytext = 0;
}
if (s->autorotate && changed
&& tl_lookup_timer(uih->savec->synctimer) > 500000)
save_float2c(uih, "angle", uih->fcontext->angle, 5),
resetsync = 1;
if (s->mode == UIH_SAVEPOS)
savepos(uih);
else {
if (uih->viewchanged)
savepos(uih), uih->viewchanged = 0;
else if (uih->moved)
savepos3(uih), uih->moved = 0;
else if (((changed && uih->step) || last)
&& tl_lookup_timer(uih->savec->synctimer) > 500000)
resetsync = 1, savepos2(uih);
}
if (uih->savec->firsttime)
uih->savec->firsttime = 0;
if (s->writefailed)
uih_save_disable(uih);
if (resetsync)
tl_reset_timer(uih->savec->synctimer);
} /*if uih->save */
}
static void save_noparam(struct uih_context *uih, const char *name)
{
start_save(uih, name);
stop_save(uih);
}