1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
/* expr.h
Copyright (C) 2005,2006,2007,2008 Eugene K. Ressler, Jr.
This file is part of Sketch, a small, simple system for making
3d drawings with LaTeX and the PSTricks or TikZ package.
Sketch 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 3, or (at your option)
any later version.
Sketch 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 Sketch; see the file COPYING.txt. If not, see
http://www.gnu.org/copyleft */
#ifndef __EXPR_H
#define __EXPR_H
#include <stdio.h>
#include "geometry.h"
// used by parser for dynamically typed expression evaluation
// must match expr_val_type_str[] in expr.c
typedef enum expr_typa_t {
E_FLOAT,
E_POINT,
E_VECTOR,
E_TRANSFORM,
} EXPR_TYPE;
extern char *expr_val_type_str[];
typedef struct expr_val_t {
EXPR_TYPE tag;
union {
FLOAT flt;
POINT_3D pt;
VECTOR_3D vec;
TRANSFORM xf;
} val;
} EXPR_VAL;
#define EXPR_TYPE_IS(E, T) ((E)->tag == (T))
// set expression value to given type and value
void set_float(EXPR_VAL * r, FLOAT val);
void set_point(EXPR_VAL * r, POINT_3D val);
void set_vector(EXPR_VAL * r, VECTOR_3D val);
void set_transform(EXPR_VAL * r, TRANSFORM val);
// coerce an expression value to given type
// generate error message if it can't be done
void coerce_to_float(EXPR_VAL * r, FLOAT * val, SRC_LINE line);
void coerce_to_point(EXPR_VAL * r, POINT_3D val, SRC_LINE line);
void coerce_to_vector(EXPR_VAL * r, VECTOR_3D val, SRC_LINE line);
void coerce_to_transform(EXPR_VAL * r, TRANSFORM val, SRC_LINE line);
void print_expr_val(FILE * f, EXPR_VAL * r);
void do_add(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_sub(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_mul(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_thn(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_dvd(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_dot(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_pwr(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_mag(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_neg(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_unit(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_sqrt(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_sin(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_cos(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_asin(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_acos(EXPR_VAL * r, EXPR_VAL * a, SRC_LINE line);
void do_index(EXPR_VAL * r, EXPR_VAL * a, int index, SRC_LINE line);
void do_atan2(EXPR_VAL * r, EXPR_VAL * a, EXPR_VAL * b, SRC_LINE line);
void do_inverse(TRANSFORM inv, TRANSFORM xf, SRC_LINE line);
#endif
|
