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