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
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
|
/*
* COPYRIGHT
*
* pcb-rnd, interactive printed circuit board design
* Copyright (C) 2016 Tibor 'Igor2' Palinkas
*
* 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*
* Contact:
* Project page: http://repo.hu/projects/pcb-rnd
* lead developer: http://repo.hu/projects/pcb-rnd/contact.html
* mailing list: pcb-rnd (at) list.repo.hu (send "subscribe")
*/
#ifndef PCB_QUERY_H
#define PCB_QUERY_H
#include <genvector/vtp0.h>
#include <genht/htsi.h>
#include <genregex/regex_se.h>
#include "fields_sphash.h"
#include "obj_common.h"
#include "layer.h"
#include "flag_str.h"
typedef struct pcb_qry_val_s pcb_qry_val_t;
typedef struct pcb_query_iter_s pcb_query_iter_t;
typedef int (*pcb_qry_fnc_t)(int argc, pcb_qry_val_t *argv, pcb_qry_val_t *res);
/* value of an expression */
typedef enum pcb_qry_valtype_e {
PCBQ_VT_VOID,
PCBQ_VT_OBJ,
PCBQ_VT_LST,
PCBQ_VT_COORD, /* considered int */
PCBQ_VT_DOUBLE,
PCBQ_VT_STRING
} pcb_qry_valtype_t;
struct pcb_qry_val_s {
pcb_qry_valtype_t type;
union {
pcb_any_obj_t *obj;
vtp0_t lst;
pcb_coord_t crd;
double dbl;
const char *str;
} data;
};
/* Script parsed into a tree */
typedef struct pcb_qry_node_s pcb_qry_node_t;
typedef enum {
PCBQ_RULE,
PCBQ_RNAME,
PCBQ_EXPR_PROG,
PCBQ_EXPR,
PCBQ_ITER_CTX,
PCBQ_OP_AND,
PCBQ_OP_OR,
PCBQ_OP_EQ,
PCBQ_OP_NEQ,
PCBQ_OP_GTEQ,
PCBQ_OP_LTEQ,
PCBQ_OP_GT,
PCBQ_OP_LT,
PCBQ_OP_ADD,
PCBQ_OP_SUB,
PCBQ_OP_MUL,
PCBQ_OP_DIV,
PCBQ_OP_MATCH,
PCBQ_OP_NOT,
PCBQ_FIELD,
PCBQ_FIELD_OF,
PCBQ_LISTVAR,
PCBQ_VAR,
PCBQ_FNAME,
PCBQ_FCALL,
PCBQ_FLAG, /* leaf */
PCBQ_DATA_COORD, /* leaf */
PCBQ_DATA_DOUBLE, /* leaf */
PCBQ_DATA_STRING, /* leaf */
PCBQ_DATA_REGEX, /* leaf */
PCBQ_DATA_CONST, /* leaf */
PCBQ_DATA_INVALID, /* leaf */
PCBQ_DATA_LYTC, /* leaf */
PCBQ_nodetype_max
} pcb_qry_nodetype_t;
struct pcb_qry_node_s {
pcb_qry_nodetype_t type;
pcb_qry_node_t *next; /* sibling on this level of the tree (or NULL) */
pcb_qry_node_t *parent;
union { /* field selection depends on ->type */
pcb_coord_t crd;
double dbl;
const char *str;
pcb_query_iter_t *iter_ctx;
pcb_qry_node_t *children; /* first child (NULL for a leaf node) */
pcb_qry_fnc_t fnc;
struct pcb_qry_lytc_s {
pcb_layer_type_t lyt;
pcb_layer_combining_t lyc;
} lytc;
} data;
union { /* field selection depends on ->type */
query_fields_keys_t fld; /* field_sphash value from str */
pcb_qry_val_t result; /* of pure functions and subtrees */
re_se_t *regex;
long cnst; /* named constant */
const pcb_flag_bits_t *flg;
} precomp;
};
pcb_qry_node_t *pcb_qry_n_alloc(pcb_qry_nodetype_t ntype);
pcb_qry_node_t *pcb_qry_n_insert(pcb_qry_node_t *parent, pcb_qry_node_t *ch);
void pcb_qry_dump_tree(const char *prefix, pcb_qry_node_t *top);
void pcb_qry_set_input(const char *script);
struct pcb_query_iter_s {
htsi_t names; /* name->index hash */
int num_vars;
const char **vn; /* pointers to the hash names so they can be indexed */
pcb_qry_val_t *lst;
/* iterator state for each variable - point into the correspoinding lst[] */
vtp0_t **vects;
pcb_cardinal_t *idx;
int all_idx; /* index of the "@" variable or -1 */
};
pcb_query_iter_t *pcb_qry_iter_alloc(void);
int pcb_qry_iter_var(pcb_query_iter_t *it, const char *varname, int alloc);
void pcb_qry_iter_init(pcb_query_iter_t *it);
pcb_query_iter_t *pcb_qry_find_iter(pcb_qry_node_t *node);
char *pcb_query_sprint_val(pcb_qry_val_t *val);
/* functions */
int pcb_qry_fnc_reg(const char *name, pcb_qry_fnc_t fnc);
pcb_qry_fnc_t pcb_qry_fnc_lookup(const char *name);
const char *pcb_qry_fnc_name(pcb_qry_fnc_t fnc);
#endif
|
