2010-09-25 10:46:16 +03:00
|
|
|
/*
|
|
|
|
* project.c - Load and save solidify project descriptions
|
|
|
|
*
|
|
|
|
* Written 2010 by Werner Almesberger
|
|
|
|
* Copyright 2010 by Werner Almesberger
|
|
|
|
*
|
|
|
|
* 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.
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <math.h>
|
|
|
|
|
|
|
|
#include "util.h"
|
|
|
|
#include "face.h"
|
|
|
|
#include "solid.h"
|
|
|
|
#include "project.h"
|
|
|
|
|
|
|
|
|
|
|
|
static struct project *make_project(const char *name,
|
|
|
|
const char *top, const char *bottom, double dist_mm)
|
|
|
|
{
|
|
|
|
struct project *prj;
|
|
|
|
|
|
|
|
prj = alloc_type(struct project);
|
|
|
|
prj->name = stralloc(name);
|
2010-09-26 12:09:12 +03:00
|
|
|
prj->comment = NULL;
|
2010-09-25 10:46:16 +03:00
|
|
|
prj->top = stralloc(top);
|
|
|
|
prj->bottom = stralloc(bottom);
|
|
|
|
prj->s.a = read_face(top);
|
|
|
|
prj->s.b = read_face(bottom);
|
|
|
|
|
|
|
|
if (prj->s.a->x_step != prj->s.a->x_step ||
|
|
|
|
prj->s.a->y_step != prj->s.a->y_step ||
|
|
|
|
prj->s.a->z_step != prj->s.a->z_step) {
|
|
|
|
fprintf(stderr, "both faces must have the same resolution\n");
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
|
|
|
|
prj->s.dist = dist_mm/prj->s.a->z_step;
|
|
|
|
return prj;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
struct project *new_project(const char *name,
|
|
|
|
const char *top, const char *bottom, double dist_mm)
|
|
|
|
{
|
|
|
|
FILE *file;
|
|
|
|
|
|
|
|
file = fopen(name, "r");
|
|
|
|
if (file) {
|
|
|
|
fprintf(stderr, "%s: already exists\n", name);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
return make_project(name, top, bottom, dist_mm);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static void read_face_data(FILE *file, struct face *f)
|
|
|
|
{
|
|
|
|
float v;
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
2010-09-25 12:35:29 +03:00
|
|
|
f->z_ref = round(v/f->z_step);
|
2010-09-25 10:46:16 +03:00
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
f->fx = tan(v/180*M_PI);
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
f->fy = tan(v/180*M_PI);
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
v = v/180*M_PI;
|
|
|
|
f->m.a[0][0] = cos(v);
|
|
|
|
f->m.a[0][1] = -sin(v);
|
|
|
|
f->m.a[1][0] = sin(v);
|
|
|
|
f->m.a[1][1] = cos(v);
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
f->m.b[0] = v/f->x_step;
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
f->m.b[1] = v/f->y_step;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static void read_optional(FILE *file, struct project *prj)
|
|
|
|
{
|
|
|
|
float v;
|
|
|
|
|
|
|
|
if (fscanf(file, "%f", &v) != 1)
|
|
|
|
return;
|
|
|
|
prj->s.dist = v/prj->s.a->z_step;
|
|
|
|
|
|
|
|
read_face_data(file, prj->s.a);
|
|
|
|
read_face_data(file, prj->s.b);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
struct project *load_project(const char *name)
|
|
|
|
{
|
|
|
|
FILE *file;
|
|
|
|
char top[1000], bottom[1000]; /* @@@ enough */
|
2010-09-26 12:09:12 +03:00
|
|
|
char *comment;
|
2010-09-25 10:46:16 +03:00
|
|
|
struct project *prj;
|
|
|
|
|
|
|
|
file = fopen(name, "r");
|
|
|
|
if (!file) {
|
|
|
|
perror(name);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
|
2010-09-26 12:09:12 +03:00
|
|
|
comment = stralloc("");
|
|
|
|
|
|
|
|
while (1) {
|
|
|
|
if (!fgets(top, sizeof(top), file)) {
|
|
|
|
fprintf(stderr, "%s: can't read name of top face\n",
|
|
|
|
name);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
if (*top != '#')
|
|
|
|
break;
|
|
|
|
comment = realloc(comment, strlen(comment)+strlen(top)+1);
|
|
|
|
strcat(comment, top);
|
2010-09-25 10:46:16 +03:00
|
|
|
}
|
|
|
|
if (strchr(top, '\n'))
|
|
|
|
*strchr(top, '\n') = 0;
|
|
|
|
|
|
|
|
if (!fgets(bottom, sizeof(bottom), file)) {
|
|
|
|
fprintf(stderr, "%s: can't read name of bottom face\n",
|
|
|
|
bottom);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
if (strchr(bottom, '\n'))
|
|
|
|
*strchr(bottom, '\n') = 0;
|
|
|
|
|
|
|
|
prj = make_project(name, top, bottom, 0);
|
2010-09-26 12:09:12 +03:00
|
|
|
prj->comment = comment;
|
2010-09-25 10:46:16 +03:00
|
|
|
read_optional(file, prj);
|
|
|
|
|
|
|
|
return prj;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static void save_face_data(FILE *file, const char *name, const struct face *f)
|
|
|
|
{
|
|
|
|
double a;
|
|
|
|
|
|
|
|
a = asin(-f->m.a[0][1])/M_PI*180;
|
|
|
|
if (f->m.a[0][0] < 0)
|
|
|
|
a = 180-a;
|
|
|
|
if (fprintf(file, "%g %g %g\n%g %g %g\n",
|
|
|
|
f->z_ref*f->z_step,
|
|
|
|
atan(f->fx)/M_PI*180, atan(f->fy)/M_PI*180,
|
|
|
|
a, f->m.b[0]*f->x_step, f->m.b[1]*f->y_step) < 0) {
|
|
|
|
perror(name);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void save_project(const struct project *prj)
|
|
|
|
{
|
|
|
|
char tmp[1000]; /* @@@ enough */
|
|
|
|
FILE *file;
|
|
|
|
|
|
|
|
sprintf(tmp, "%s~", prj->name);
|
|
|
|
file = fopen(tmp, "w");
|
|
|
|
if (!file) {
|
|
|
|
perror(tmp);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
if (fprintf(file,
|
2010-09-26 12:09:12 +03:00
|
|
|
"%s%s\n%s\n%g\n", prj->comment ? prj->comment : "",
|
|
|
|
prj->top, prj->bottom, prj->s.dist*prj->s.a->z_step) < 0) {
|
2010-09-25 10:46:16 +03:00
|
|
|
perror(tmp);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
save_face_data(file, tmp, prj->s.a);
|
|
|
|
save_face_data(file, tmp, prj->s.b);
|
|
|
|
if (fclose(file) < 0) {
|
|
|
|
perror(tmp);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (rename(tmp, prj->name) < 0) {
|
|
|
|
fprintf(stderr, "rename %s to %s: %s\n", tmp, prj->name,
|
|
|
|
strerror(errno));
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
}
|