[0badc31] | 1 | /* cavern.h |
---|
[bb90203] | 2 | * SURVEX Cave surveying software - header file |
---|
[70fa970] | 3 | * Copyright (C) 1991-2003,2005,2006,2010,2013,2014,2015,2016,2019 Olly Betts |
---|
[44bb30d] | 4 | * Copyright (C) 2004 Simeon Warner |
---|
[846746e] | 5 | * |
---|
[89231c4] | 6 | * This program is free software; you can redistribute it and/or modify |
---|
| 7 | * it under the terms of the GNU General Public License as published by |
---|
| 8 | * the Free Software Foundation; either version 2 of the License, or |
---|
| 9 | * (at your option) any later version. |
---|
[846746e] | 10 | * |
---|
| 11 | * This program is distributed in the hope that it will be useful, |
---|
| 12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
---|
[89231c4] | 13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
---|
| 14 | * GNU General Public License for more details. |
---|
[846746e] | 15 | * |
---|
[89231c4] | 16 | * You should have received a copy of the GNU General Public License |
---|
| 17 | * along with this program; if not, write to the Free Software |
---|
[d333899] | 18 | * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
---|
[bb90203] | 19 | */ |
---|
| 20 | |
---|
[3875c32] | 21 | #ifndef CAVERN_H |
---|
| 22 | #define CAVERN_H |
---|
| 23 | |
---|
[05c700b] | 24 | /* Using covariances increases the memory required somewhat - may be |
---|
| 25 | * desirable to disable this for small memory machines */ |
---|
| 26 | |
---|
[93ac03a] | 27 | /* #define NO_COVARIANCES 1 */ |
---|
[bb90203] | 28 | |
---|
| 29 | #include <stdio.h> |
---|
| 30 | #include <stdlib.h> |
---|
| 31 | #include <string.h> |
---|
| 32 | #include <ctype.h> |
---|
| 33 | #include <math.h> |
---|
| 34 | #include <float.h> |
---|
| 35 | |
---|
[8719711] | 36 | #ifdef HAVE_PROJ_H |
---|
| 37 | /* Work around broken check in proj.h: |
---|
| 38 | * https://github.com/OSGeo/PROJ/issues/1523 |
---|
| 39 | */ |
---|
| 40 | # ifndef PROJ_H |
---|
| 41 | # include <proj.h> |
---|
| 42 | # endif |
---|
| 43 | #endif |
---|
| 44 | #define ACCEPT_USE_OF_DEPRECATED_PROJ_API_H 1 |
---|
[c092d72] | 45 | #include <proj_api.h> |
---|
| 46 | |
---|
[a405bc1] | 47 | #include "img_hosted.h" |
---|
[3d441da] | 48 | #include "useful.h" |
---|
[bb90203] | 49 | |
---|
[05c700b] | 50 | /* Set EXPLICIT_FIXED_FLAG to 1 to force an explicit fixed flag to be used |
---|
| 51 | * in each pos struct, rather than using p[0]==UNFIXED_VAL to indicate |
---|
| 52 | * unfixed-ness. This may be slightly faster, but uses more memory. |
---|
[bb90203] | 53 | */ |
---|
| 54 | #ifndef EXPLICIT_FIXED_FLAG |
---|
| 55 | # define EXPLICIT_FIXED_FLAG 0 |
---|
| 56 | #endif |
---|
| 57 | |
---|
| 58 | typedef double real; /* so we can change the precision used easily */ |
---|
| 59 | #define HUGE_REAL HUGE_VAL |
---|
[7bdf66d] | 60 | #define REAL_EPSILON DBL_EPSILON |
---|
[bb90203] | 61 | |
---|
| 62 | #if (!EXPLICIT_FIXED_FLAG) |
---|
| 63 | # define UNFIXED_VAL HUGE_VAL /* if p[0]==UNFIXED_VAL, station is unfixed */ |
---|
| 64 | #endif |
---|
| 65 | |
---|
[7d40549] | 66 | #define SPECIAL_EOL 0x0001 |
---|
| 67 | #define SPECIAL_BLANK 0x0002 |
---|
| 68 | #define SPECIAL_KEYWORD 0x0004 |
---|
| 69 | #define SPECIAL_COMMENT 0x0008 |
---|
| 70 | #define SPECIAL_OMIT 0x0010 |
---|
[a882316] | 71 | #ifndef NO_DEPRECATED |
---|
[7d40549] | 72 | #define SPECIAL_ROOT 0x0020 |
---|
[a882316] | 73 | #endif |
---|
[7d40549] | 74 | #define SPECIAL_SEPARATOR 0x0040 |
---|
| 75 | #define SPECIAL_NAMES 0x0080 |
---|
| 76 | #define SPECIAL_DECIMAL 0x0100 |
---|
| 77 | #define SPECIAL_MINUS 0x0200 |
---|
| 78 | #define SPECIAL_PLUS 0x0400 |
---|
| 79 | #define SPECIAL_OPEN 0x0800 |
---|
| 80 | #define SPECIAL_CLOSE 0x1000 |
---|
[bb90203] | 81 | |
---|
[3875c32] | 82 | extern char *fnm_output_base; |
---|
| 83 | extern int fnm_output_base_is_dir; |
---|
| 84 | |
---|
[d1878c51] | 85 | extern bool fExportUsed; |
---|
| 86 | |
---|
[1ee204e] | 87 | extern int current_days_since_1900; |
---|
[e0c7cd1] | 88 | |
---|
[bb90203] | 89 | /* Types */ |
---|
| 90 | |
---|
[05c700b] | 91 | typedef enum { |
---|
[009a9e4] | 92 | Q_NULL = -1, Q_DEFAULT, Q_POS, Q_PLUMB, Q_LEVEL, |
---|
| 93 | Q_GRADIENT, Q_BACKGRADIENT, Q_BEARING, Q_BACKBEARING, |
---|
[4f38f94] | 94 | Q_LENGTH, Q_BACKLENGTH, Q_DEPTH, Q_DX, Q_DY, Q_DZ, Q_COUNT, Q_DECLINATION, |
---|
[009a9e4] | 95 | Q_LEFT, Q_RIGHT, Q_UP, Q_DOWN, |
---|
| 96 | Q_MAC |
---|
[05c700b] | 97 | } q_quantity; |
---|
[bb90203] | 98 | |
---|
[27b8b59] | 99 | typedef enum { |
---|
| 100 | INFER_NULL = -1, INFER_EQUATES, INFER_EXPORTS, INFER_PLUMBS, INFER_SUBSURVEYS |
---|
| 101 | } infer_what; |
---|
| 102 | |
---|
[bb90203] | 103 | /* unsigned long to cope with 16-bit int-s */ |
---|
| 104 | #define BIT(N) (1UL << (N)) |
---|
| 105 | #define BITA(N) (1UL << ((N) - 'a')) |
---|
| 106 | |
---|
[7f08c83] | 107 | #define TSTBIT(W, N) (((W)>>(N))&1) |
---|
| 108 | |
---|
[bb90203] | 109 | /* masks for quantities which are length and angles respectively */ |
---|
[4f38f94] | 110 | #define LEN_QMASK (BIT(Q_LENGTH) | BIT(Q_BACKLENGTH) | BIT(Q_DEPTH) |\ |
---|
[b14f44f] | 111 | BIT(Q_DX) | BIT(Q_DY) | BIT(Q_DZ) | BIT(Q_POS) | BIT(Q_COUNT)) |
---|
| 112 | #define ANG_QMASK (BIT(Q_BEARING) | BIT(Q_BACKBEARING) |\ |
---|
| 113 | BIT(Q_GRADIENT) | BIT(Q_BACKGRADIENT) | BIT(Q_PLUMB) | BIT(Q_LEVEL) |\ |
---|
| 114 | BIT(Q_DECLINATION)) |
---|
[bb90203] | 115 | |
---|
[5c3c61a] | 116 | /* if you add/change the order, check factor_tab in commands.c */ |
---|
[05c700b] | 117 | typedef enum { |
---|
| 118 | UNITS_NULL = -1, UNITS_METRES, UNITS_FEET, UNITS_YARDS, |
---|
[70fa970] | 119 | UNITS_DEGS, UNITS_GRADS, UNITS_PERCENT, UNITS_MINUTES, UNITS_MAC, |
---|
| 120 | UNITS_DEPRECATED_ALIAS_FOR_GRADS |
---|
[05c700b] | 121 | } u_units; |
---|
[5c3c61a] | 122 | |
---|
[95c3272] | 123 | /* don't reorder these values! They need to match with img.h too */ |
---|
[5c3c61a] | 124 | typedef enum { |
---|
[95c3272] | 125 | FLAGS_NOT = -2, FLAGS_UNKNOWN = -1, FLAGS_SURFACE, FLAGS_DUPLICATE, |
---|
[710ecc1] | 126 | FLAGS_SPLAY, |
---|
[3d441da] | 127 | #if 0 |
---|
| 128 | /* underground, but through rock (e.g. radiolocation). Want to hide from |
---|
| 129 | * plots by default (so not cave) but don't want to include in surface |
---|
| 130 | * triangulation nets (so not surface) */ |
---|
[710ecc1] | 131 | FLAGS_SKELETAL, /* FIXME */ |
---|
[3d441da] | 132 | #endif |
---|
[dcbcae0] | 133 | /* Don't need to match img.h: */ |
---|
| 134 | FLAGS_ANON_ONE_END, |
---|
[eb5aea0] | 135 | FLAGS_IMPLICIT_SPLAY, |
---|
| 136 | FLAGS_STYLE_BIT0, FLAGS_STYLE_BIT1, FLAGS_STYLE_BIT2 |
---|
[5c3c61a] | 137 | } flags; |
---|
[bb90203] | 138 | |
---|
[eb5aea0] | 139 | /* flags are currently stored in an unsigned char */ |
---|
| 140 | typedef int compiletimeassert_flags0[FLAGS_STYLE_BIT2 <= 7 ? 1 : -1]; |
---|
| 141 | |
---|
| 142 | /* Mask to AND with to get bits to pass to img library. */ |
---|
| 143 | #define FLAGS_MASK \ |
---|
| 144 | (BIT(FLAGS_SURFACE) | BIT(FLAGS_DUPLICATE) | BIT(FLAGS_SPLAY)) |
---|
| 145 | |
---|
[ab4de24] | 146 | typedef int compiletimeassert_flags1[BIT(FLAGS_SURFACE) == img_FLAG_SURFACE ? 1 : -1]; |
---|
| 147 | typedef int compiletimeassert_flags2[BIT(FLAGS_DUPLICATE) == img_FLAG_DUPLICATE ? 1 : -1]; |
---|
| 148 | typedef int compiletimeassert_flags3[BIT(FLAGS_SPLAY) == img_FLAG_SPLAY ? 1 : -1]; |
---|
| 149 | |
---|
[95c3272] | 150 | typedef enum { |
---|
[ee05463] | 151 | /* Don't reorder these values! They need to match with img.h too. */ |
---|
[dfb4240] | 152 | SFLAGS_SURFACE = 0, SFLAGS_UNDERGROUND, SFLAGS_ENTRANCE, SFLAGS_EXPORTED, |
---|
[dcbcae0] | 153 | SFLAGS_FIXED, SFLAGS_ANON, SFLAGS_WALL, |
---|
[ee05463] | 154 | /* These values don't need to match img.h, but mustn't clash. */ |
---|
[f15cde77] | 155 | SFLAGS_USED = 11, |
---|
[d333899] | 156 | SFLAGS_SOLVED = 12, SFLAGS_SUSPECTTYPO = 13, SFLAGS_SURVEY = 14, SFLAGS_PREFIX_ENTERED = 15 |
---|
[95c3272] | 157 | } sflags; |
---|
[ee05463] | 158 | |
---|
| 159 | /* Mask to AND with to get bits to pass to img library. */ |
---|
| 160 | #define SFLAGS_MASK (BIT(SFLAGS_SURFACE) | BIT(SFLAGS_UNDERGROUND) |\ |
---|
[a2c33ae] | 161 | BIT(SFLAGS_ENTRANCE) | BIT(SFLAGS_EXPORTED) | BIT(SFLAGS_FIXED) |\ |
---|
[dcbcae0] | 162 | BIT(SFLAGS_ANON) | BIT(SFLAGS_WALL)) |
---|
[95c3272] | 163 | |
---|
[ab4de24] | 164 | typedef int compiletimeassert_sflags1[BIT(SFLAGS_SURFACE) == img_SFLAG_SURFACE ? 1 : -1]; |
---|
| 165 | typedef int compiletimeassert_sflags2[BIT(SFLAGS_UNDERGROUND) == img_SFLAG_UNDERGROUND ? 1 : -1]; |
---|
| 166 | typedef int compiletimeassert_sflags3[BIT(SFLAGS_ENTRANCE) == img_SFLAG_ENTRANCE ? 1 : -1]; |
---|
| 167 | typedef int compiletimeassert_sflags4[BIT(SFLAGS_EXPORTED) == img_SFLAG_EXPORTED ? 1 : -1]; |
---|
| 168 | typedef int compiletimeassert_sflags5[BIT(SFLAGS_FIXED) == img_SFLAG_FIXED ? 1 : -1]; |
---|
[a2c33ae] | 169 | typedef int compiletimeassert_sflags6[BIT(SFLAGS_ANON) == img_SFLAG_ANON ? 1 : -1]; |
---|
[dcbcae0] | 170 | typedef int compiletimeassert_sflags7[BIT(SFLAGS_WALL) == img_SFLAG_WALL ? 1 : -1]; |
---|
[ab4de24] | 171 | |
---|
[bb90203] | 172 | /* enumeration of field types */ |
---|
[05c700b] | 173 | typedef enum { |
---|
[4f38f94] | 174 | End = 0, Tape, Comp, Clino, BackTape, BackComp, BackClino, |
---|
| 175 | Left, Right, Up, Down, |
---|
[21c226e] | 176 | FrDepth, ToDepth, Dx, Dy, Dz, FrCount, ToCount, |
---|
[44bb30d] | 177 | /* Up to here are readings are allowed multiple values |
---|
| 178 | * and have slot in the value[] array in datain.c. |
---|
| 179 | * (Depth, DepthChange, and Count can have multiple |
---|
| 180 | * readings, but are actually handled using tokens |
---|
| 181 | * above rather than as themselves). |
---|
| 182 | * |
---|
| 183 | * Fr must be the first reading after this comment! |
---|
| 184 | */ |
---|
[21c226e] | 185 | Fr, To, Station, Depth, DepthChange, Count, Dir, |
---|
[44bb30d] | 186 | Newline, IgnoreAllAndNewLine, Ignore, IgnoreAll, |
---|
| 187 | /* IgnoreAll must be the last reading before this comment! |
---|
| 188 | * |
---|
| 189 | * Readings after this comment are only used in datain.c |
---|
| 190 | * so can have enum values >= 32 because we only use a |
---|
| 191 | * bitmask for those readings used in commands.c. |
---|
| 192 | */ |
---|
[07442af] | 193 | CompassDATComp, CompassDATClino, CompassDATBackComp, CompassDATBackClino, |
---|
| 194 | CompassDATLeft, CompassDATRight, CompassDATUp, CompassDATDown, |
---|
| 195 | CompassDATFlags |
---|
[0395657] | 196 | } reading; |
---|
[05c700b] | 197 | |
---|
[90bb053f] | 198 | /* if IgnoreAll is >= 32, the compiler will choke on this */ |
---|
| 199 | typedef char compiletimeassert_reading[IgnoreAll < 32 ? 1 : -1]; |
---|
| 200 | |
---|
[3d441da] | 201 | /* position or length vector */ |
---|
| 202 | typedef real delta[3]; |
---|
| 203 | |
---|
| 204 | /* variance */ |
---|
| 205 | #ifdef NO_COVARIANCES |
---|
| 206 | typedef real var[3]; |
---|
| 207 | typedef var svar; |
---|
| 208 | #else |
---|
| 209 | typedef real var[3][3]; |
---|
| 210 | typedef real svar[6]; |
---|
| 211 | #endif |
---|
[bb90203] | 212 | |
---|
| 213 | /* station name */ |
---|
| 214 | typedef struct Prefix { |
---|
| 215 | struct Prefix *up, *down, *right; |
---|
| 216 | struct Node *stn; |
---|
| 217 | struct Pos *pos; |
---|
[eb18f4d] | 218 | const char *ident; |
---|
[4d9eecd] | 219 | const char *filename; |
---|
| 220 | unsigned int line; |
---|
[c00c74a9] | 221 | /* If (min_export == 0) then max_export is max # levels above is this |
---|
| 222 | * prefix is used (and so needs to be exported) (0 == parent only). |
---|
| 223 | * If (min_export > 0) then max_export is max # levels above this |
---|
[932f7e9] | 224 | * prefix has been exported, and min_export is how far down the exports |
---|
| 225 | * have got (if min_export > 1 after a run, this prefix hasn't been |
---|
[c00c74a9] | 226 | * exported from below enough). |
---|
[27b8b59] | 227 | * If INFER_EXPORTS is active when a station is encountered, we |
---|
[c00c74a9] | 228 | * set min_export = USHRT_MAX and max_export gets set as usual. Then at |
---|
| 229 | * the end of the run, we also mark stations with min_export == USHRT_MAX |
---|
| 230 | * and max_export > 0 as exported. */ |
---|
| 231 | unsigned short max_export, min_export; |
---|
[95c3272] | 232 | /* stn flags - e.g. surface, underground, entrance |
---|
| 233 | * also suspecttypo and survey */ |
---|
[421b7d2] | 234 | unsigned short sflags; |
---|
[c00c74a9] | 235 | short shape; |
---|
[bb90203] | 236 | } prefix; |
---|
| 237 | |
---|
[b5a3219] | 238 | /* survey metadata */ |
---|
| 239 | typedef struct Meta_data { |
---|
| 240 | size_t ref_count; |
---|
[0e9e1ee] | 241 | /* Days since 1900 for start and end date of survey, or -1 if undated. */ |
---|
[1ee204e] | 242 | int days1, days2; |
---|
[b5a3219] | 243 | } meta_data; |
---|
| 244 | |
---|
[bb90203] | 245 | /* stuff stored for both forward & reverse legs */ |
---|
| 246 | typedef struct { |
---|
| 247 | struct Node *to; |
---|
| 248 | /* bits 0..1 = reverse leg number; bit7 is fFullLeg */ |
---|
| 249 | /* bit6 = fReplacementLeg (by reduction rules) */ |
---|
[cb3d1e2] | 250 | /* bit5 = articulation leg (i.e. carries no error) */ |
---|
[67508f0] | 251 | unsigned char reverse; |
---|
[5c3c61a] | 252 | /* flags - e.g. surface, duplicate survey |
---|
[693388e] | 253 | * only used if (FLAG_DATAHERE & !(FLAG_REPLACEMENTLEG|FLAG_FAKE)) |
---|
[b5a3219] | 254 | * This could be only in linkfor, but this is actually more space |
---|
| 255 | * efficient. |
---|
[5c3c61a] | 256 | */ |
---|
[67508f0] | 257 | unsigned char flags; |
---|
[bb90203] | 258 | } linkcommon; |
---|
[3d441da] | 259 | |
---|
[cb3d1e2] | 260 | #define FLAG_DATAHERE 0x80 |
---|
| 261 | #define FLAG_REPLACEMENTLEG 0x40 |
---|
[7f08c83] | 262 | #define FLAG_ARTICULATION 0x20 |
---|
[693388e] | 263 | #define FLAG_FAKE 0x10 /* an equate or leg inside an sdfix */ |
---|
[cb3d1e2] | 264 | #define MASK_REVERSEDIRN 0x03 |
---|
[bb90203] | 265 | |
---|
| 266 | /* reverse leg - deltas & vars stored on other dirn */ |
---|
| 267 | typedef struct LinkRev { |
---|
| 268 | linkcommon l; |
---|
| 269 | } linkrev; |
---|
| 270 | |
---|
| 271 | /* forward leg - deltas & vars stored here */ |
---|
| 272 | typedef struct Link { |
---|
| 273 | linkcommon l; |
---|
[eb18f4d] | 274 | delta d; /* Delta */ |
---|
[59f2dbb] | 275 | svar v; /* Variances */ |
---|
[b5a3219] | 276 | meta_data *meta; |
---|
[bb90203] | 277 | } linkfor; |
---|
| 278 | |
---|
| 279 | /* node - like a station, except several nodes are used to represent a |
---|
| 280 | * station with more than 3 legs connected to it |
---|
| 281 | */ |
---|
| 282 | typedef struct Node { |
---|
| 283 | struct Prefix *name; |
---|
| 284 | struct Link *leg[3]; |
---|
[564f471] | 285 | struct Node *prev, *next; |
---|
[118eea4] | 286 | long colour; |
---|
[bb90203] | 287 | } node; |
---|
| 288 | |
---|
| 289 | /* station position */ |
---|
| 290 | typedef struct Pos { |
---|
[eb18f4d] | 291 | delta p; /* Position */ |
---|
[bb90203] | 292 | #if EXPLICIT_FIXED_FLAG |
---|
[67508f0] | 293 | unsigned char fFixed; /* flag indicating if station is a fixed point */ |
---|
[bb90203] | 294 | #endif |
---|
| 295 | } pos; |
---|
| 296 | |
---|
| 297 | /* |
---|
| 298 | typedef struct Inst { |
---|
| 299 | real zero, scale, units; |
---|
| 300 | } inst; |
---|
| 301 | */ |
---|
| 302 | |
---|
[107b8bd] | 303 | /* Survey data styles */ |
---|
| 304 | #define STYLE_NORMAL 0 |
---|
| 305 | #define STYLE_DIVING 1 |
---|
| 306 | #define STYLE_CARTESIAN 2 |
---|
| 307 | #define STYLE_CYLPOLAR 3 |
---|
[ac28f4f] | 308 | #define STYLE_NOSURVEY 4 |
---|
| 309 | #define STYLE_PASSAGE 5 |
---|
[ee05463] | 310 | #define STYLE_IGNORE 6 |
---|
[107b8bd] | 311 | |
---|
[eb5aea0] | 312 | typedef int compiletimeassert_style1[STYLE_NORMAL == img_STYLE_NORMAL ? 1 : -1]; |
---|
| 313 | typedef int compiletimeassert_style2[STYLE_DIVING == img_STYLE_DIVING ? 1 : -1]; |
---|
| 314 | typedef int compiletimeassert_style3[STYLE_CARTESIAN == img_STYLE_CARTESIAN ? 1 : -1]; |
---|
| 315 | typedef int compiletimeassert_style4[STYLE_CYLPOLAR == img_STYLE_CYLPOLAR ? 1 : -1]; |
---|
| 316 | typedef int compiletimeassert_style5[STYLE_NOSURVEY == img_STYLE_NOSURVEY ? 1 : -1]; |
---|
| 317 | |
---|
[bb90203] | 318 | /* various settings preserved by *BEGIN and *END */ |
---|
| 319 | typedef struct Settings { |
---|
[b5a3219] | 320 | struct Settings *next; |
---|
[eb18f4d] | 321 | unsigned int Truncate; |
---|
[fa42426] | 322 | bool f_clino_percent; |
---|
| 323 | bool f_backclino_percent; |
---|
[dcbcae0] | 324 | bool dash_for_anon_wall_station; |
---|
[27b8b59] | 325 | unsigned char infer; |
---|
[bb90203] | 326 | enum {OFF, LOWER, UPPER} Case; |
---|
[107b8bd] | 327 | int style; |
---|
[bb90203] | 328 | prefix *Prefix; |
---|
[613028c] | 329 | prefix *begin_survey; /* used to check BEGIN and END match */ |
---|
[bb90203] | 330 | short *Translate; /* if short is >= 16 bits, which ANSI requires */ |
---|
| 331 | real Var[Q_MAC]; |
---|
| 332 | real z[Q_MAC]; |
---|
| 333 | real sc[Q_MAC]; |
---|
[cb3d1e2] | 334 | real units[Q_MAC]; |
---|
[78ed938] | 335 | const reading *ordering; |
---|
[47c7a94] | 336 | int begin_lineno; /* 0 means no block started in this file */ |
---|
[5c3c61a] | 337 | int flags; |
---|
[c092d72] | 338 | projPJ proj; |
---|
[58c7b459] | 339 | /* Location at which we calculate the declination if |
---|
| 340 | * z[Q_DECLINATION] == HUGE_REAL. */ |
---|
| 341 | real dec_x, dec_y, dec_z; |
---|
[95b0f1d] | 342 | /* Cached auto-declination, or HUGE_REAL for no cached value. Only |
---|
| 343 | * meaningful if date1 != -1. |
---|
| 344 | */ |
---|
| 345 | real declination; |
---|
[2c17123e] | 346 | /* Grid convergence. */ |
---|
| 347 | real convergence; |
---|
[b5a3219] | 348 | meta_data * meta; |
---|
[bb90203] | 349 | } settings; |
---|
| 350 | |
---|
| 351 | /* global variables */ |
---|
| 352 | extern settings *pcs; |
---|
| 353 | extern prefix *root; |
---|
[a2c33ae] | 354 | extern prefix *anon_list; |
---|
[bb90203] | 355 | extern node *stnlist; |
---|
[3875c32] | 356 | extern unsigned long optimize; |
---|
[c092d72] | 357 | extern projPJ proj_out; |
---|
| 358 | extern char * proj_str_out; |
---|
[bd283cf6] | 359 | |
---|
[bb90203] | 360 | extern char *survey_title; |
---|
| 361 | extern int survey_title_len; |
---|
| 362 | |
---|
| 363 | extern bool fExplicitTitle; |
---|
| 364 | extern long cLegs, cStns, cComponents; |
---|
| 365 | extern FILE *fhErrStat; |
---|
[693388e] | 366 | extern img *pimg; |
---|
[bb90203] | 367 | extern real totadj, total, totplan, totvert; |
---|
| 368 | extern real min[3], max[3]; |
---|
| 369 | extern prefix *pfxHi[3], *pfxLo[3]; |
---|
[647407d] | 370 | extern bool fQuiet; /* just show brief summary + errors */ |
---|
[ed0f5b6] | 371 | extern bool fMute; /* just show errors */ |
---|
[c0b279c] | 372 | extern bool fSuppress; /* only output 3d file */ |
---|
[bb90203] | 373 | |
---|
| 374 | /* macros */ |
---|
| 375 | |
---|
| 376 | #define POS(S, D) ((S)->name->pos->p[(D)]) |
---|
| 377 | #define POSD(S) ((S)->name->pos->p) |
---|
| 378 | |
---|
| 379 | #define data_here(L) ((L)->l.reverse & FLAG_DATAHERE) |
---|
[cb3d1e2] | 380 | #define reverse_leg_dirn(L) ((L)->l.reverse & MASK_REVERSEDIRN) |
---|
| 381 | #define reverse_leg(L) ((L)->l.to->leg[reverse_leg_dirn(L)]) |
---|
[bb90203] | 382 | |
---|
| 383 | #if EXPLICIT_FIXED_FLAG |
---|
| 384 | # define pfx_fixed(N) ((N)->pos->fFixed) |
---|
[3e25a0d] | 385 | # define pos_fixed(P) ((P)->fFixed) |
---|
[bb90203] | 386 | # define fix(S) (S)->name->pos->fFixed = (char)fTrue |
---|
[084905c] | 387 | # define fixpos(P) (P)->fFixed = (char)fTrue |
---|
[bb90203] | 388 | # define unfix(S) (S)->name->pos->fFixed = (char)fFalse |
---|
| 389 | #else |
---|
| 390 | # define pfx_fixed(N) ((N)->pos->p[0] != UNFIXED_VAL) |
---|
[3e25a0d] | 391 | # define pos_fixed(P) ((P)->p[0] != UNFIXED_VAL) |
---|
[bb90203] | 392 | # define fix(S) NOP |
---|
[084905c] | 393 | # define fixpos(P) NOP |
---|
[bb90203] | 394 | # define unfix(S) POS((S), 0) = UNFIXED_VAL |
---|
| 395 | #endif |
---|
| 396 | #define fixed(S) pfx_fixed((S)->name) |
---|
| 397 | |
---|
[0af7076] | 398 | /* macros for special chars */ |
---|
[bb90203] | 399 | |
---|
| 400 | #define isEol(c) (pcs->Translate[(c)] & SPECIAL_EOL) |
---|
| 401 | #define isBlank(c) (pcs->Translate[(c)] & SPECIAL_BLANK) |
---|
| 402 | #define isKeywd(c) (pcs->Translate[(c)] & SPECIAL_KEYWORD) |
---|
| 403 | #define isComm(c) (pcs->Translate[(c)] & SPECIAL_COMMENT) |
---|
| 404 | #define isOmit(c) (pcs->Translate[(c)] & SPECIAL_OMIT) |
---|
[a882316] | 405 | #ifndef NO_DEPRECATED |
---|
[bb90203] | 406 | #define isRoot(c) (pcs->Translate[(c)] & SPECIAL_ROOT) |
---|
[a882316] | 407 | #endif |
---|
[bb90203] | 408 | #define isSep(c) (pcs->Translate[(c)] & SPECIAL_SEPARATOR) |
---|
| 409 | #define isNames(c) (pcs->Translate[(c)] & SPECIAL_NAMES) |
---|
| 410 | #define isDecimal(c) (pcs->Translate[(c)] & SPECIAL_DECIMAL) |
---|
| 411 | #define isMinus(c) (pcs->Translate[(c)] & SPECIAL_MINUS) |
---|
| 412 | #define isPlus(c) (pcs->Translate[(c)] & SPECIAL_PLUS) |
---|
[21c226e] | 413 | #define isOpen(c) (pcs->Translate[(c)] & SPECIAL_OPEN) |
---|
| 414 | #define isClose(c) (pcs->Translate[(c)] & SPECIAL_CLOSE) |
---|
[bb90203] | 415 | |
---|
| 416 | #define isSign(c) (pcs->Translate[(c)] & (SPECIAL_PLUS | SPECIAL_MINUS)) |
---|
| 417 | #define isData(c) (pcs->Translate[(c)] & (SPECIAL_OMIT | SPECIAL_ROOT|\ |
---|
| 418 | SPECIAL_SEPARATOR | SPECIAL_NAMES | SPECIAL_DECIMAL | SPECIAL_PLUS |\ |
---|
| 419 | SPECIAL_MINUS)) |
---|
| 420 | |
---|
[647407d] | 421 | typedef struct nosurveylink { |
---|
| 422 | node *fr, *to; |
---|
[b3bef47] | 423 | int flags; |
---|
[ee05463] | 424 | meta_data *meta; |
---|
[647407d] | 425 | struct nosurveylink *next; |
---|
| 426 | } nosurveylink; |
---|
| 427 | |
---|
| 428 | extern nosurveylink *nosurveyhead; |
---|
| 429 | |
---|
[ee05463] | 430 | typedef struct lrud { |
---|
| 431 | struct lrud * next; |
---|
| 432 | prefix *stn; |
---|
[a6301a1] | 433 | meta_data *meta; |
---|
[ee05463] | 434 | real l, r, u, d; |
---|
| 435 | } lrud; |
---|
| 436 | |
---|
| 437 | typedef struct lrudlist { |
---|
| 438 | lrud * tube; |
---|
| 439 | struct lrudlist * next; |
---|
| 440 | } lrudlist; |
---|
| 441 | |
---|
| 442 | extern lrudlist * model; |
---|
| 443 | |
---|
| 444 | extern lrud ** next_lrud; |
---|
| 445 | |
---|
[3875c32] | 446 | #endif /* CAVERN_H */ |
---|