75 #define FFND_LIB_VER "4.2.3"
78 #error "You must define FREEFORM as a preprocessor name."
79 #error "You must do this for the benefit of files in the FreeForm project"
80 #error "which do not include freeform.h"
128 #define FF_CC_MSVC1 1
129 #define FF_CC_MSVC4 2
130 #define FF_CC_MACCW 3
140 #define TOO_MANY_MACHINES
149 #define FF_OS FF_OS_DOS
152 #define FF_CC FF_CC_MSVC1
157 #error "A PC compiler has already been defined"
159 #define FF_CC FF_CC_MSVC4
164 #define FF_CC FF_CC_MSVC1
172 #define TOO_MANY_MACHINES
181 #define FF_OS FF_OS_UNIX
182 #define FF_CC FF_CC_UNIX
189 #define TOO_MANY_MACHINES
198 #define FF_OS FF_OS_UNIX
199 #define FF_CC FF_CC_UNIX
206 #define TOO_MANY_MACHINES
215 #define FF_OS FF_OS_UNIX
216 #define FF_CC FF_CC_UNIX
223 #define TOO_MANY_MACHINES
232 #define FF_OS FF_OS_MAC
233 #define FF_CC FF_CC_MACCW
240 #define TOO_MANY_MACHINES
249 #define FF_OS FF_OS_UNIX
250 #define FF_CC FF_CC_UNIX
257 #define TOO_MANY_MACHINES
266 #define FF_OS FF_OS_UNIX
267 #define FF_CC FF_CC_UNIX
274 #define TOO_MANY_MACHINES
283 #define FF_OS FF_OS_UNIX
284 #define FF_CC FF_CC_UNIX
295 #define TOO_MANY_MACHINES
304 #define FF_OS FF_OS_UNIX
305 #define FF_CC FF_CC_UNIX
310 #error "Machine type has not been defined."
311 #error "Please define one in your makefile or project."
314 #ifdef TOO_MANY_MACHINES
315 #error "More than one machine type has been defined"
317 #error "PC is currently defined"
320 #error "SUN is currently defined"
323 #error "IRIS4 is currently defined"
326 #error "MAC is currently defined"
329 #error "IBM6000 is currently defined"
332 #error "HP9000 is currently defined"
335 #error "DEC_ALPHA is currently defined"
338 #error "IRIX is currently defined"
340 #error "Please check your makefile or project."
343 #if !defined(LONGS_ARE_32) && !defined(LONGS_ARE_64)
344 #error "longs have not been defined as either 32 or 64 bits"
345 #error "This should never happen, contact support"
349 #error "A C compiler has not been defined"
350 You should define one of the following:
365 #error "An operating system has not been defined"
366 You should define one of the following:
386 #define UNIX_DIR_SEPARATOR '/'
387 #define UNIX_DIR_SEPARATOR_STRING "/"
389 #define MAC_DIR_SEPARATOR ':'
390 #define MAC_DIR_SEPARATOR_STRING ":"
392 #define DOS_DIR_SEPARATOR '\\'
393 #define DOS_DIR_SEPARATOR_STRING "\\"
399 #if FF_OS == FF_OS_MACOS
401 #define NATIVE_DIR_SEPARATOR MAC_DIR_SEPARATOR
402 #define NATIVE_DIR_SEPARATOR_STRING MAC_DIR_SEPARATOR_STRING
406 #if FF_OS == FF_OS_DOS
408 #define NATIVE_DIR_SEPARATOR DOS_DIR_SEPARATOR
409 #define NATIVE_DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING
413 #if FF_OS == FF_OS_UNIX
415 #define NATIVE_DIR_SEPARATOR UNIX_DIR_SEPARATOR
416 #define NATIVE_DIR_SEPARATOR_STRING UNIX_DIR_SEPARATOR_STRING
423 #define FFNT_UINT16 3
425 #define FFNT_UINT32 5
427 #define FFNT_UINT64 7
428 #define FFNT_FLOAT32 8
429 #define FFNT_FLOAT64 9
430 #define FFNT_ENOTE 10
432 #ifdef WANT_NCSA_TYPES
434 typedef signed char int8;
435 typedef unsigned char uint8;
436 typedef signed short int int16;
437 typedef unsigned short int uint16;
438 typedef float float32;
439 typedef double float64;
446 #define SIZE_UINT16 2
448 #define SIZE_UINT32 4
450 #define SIZE_UINT64 8
451 #define SIZE_INT128 16
452 #define SIZE_UINT128 16
454 #define SIZE_FLOAT32 4
455 #define SIZE_FLOAT64 8
456 #define SIZE_ENOTE SIZE_FLOAT64
457 #define SIZE_FLOAT128 16
459 typedef double big_var_type;
460 typedef big_var_type align_var_type;
462 #define FFV_INT8_MIN (-SCHAR_MAX-1)
463 #define FFV_INT8_MAX SCHAR_MAX
464 #define FFV_UINT8_MIN 0
465 #define FFV_UINT8_MAX UCHAR_MAX
466 #define FFV_INT16_MIN (-SHRT_MAX-1)
467 #define FFV_INT16_MAX SHRT_MAX
468 #define FFV_UINT16_MIN 0
469 #define FFV_UINT16_MAX USHRT_MAX
470 #define FFV_FLOAT32_MIN -FLT_MAX
471 #define FFV_FLOAT32_MAX FLT_MAX
472 #define FFV_FLOAT64_MIN -DBL_MAX
473 #define FFV_FLOAT64_MAX DBL_MAX
474 #define FFV_ENOTE_MIN FFV_FLOAT64_MIN
475 #define FFV_ENOTE_MAX FFV_FLOAT64_MAX
477 #define FFV_FLOAT32_EPSILON FLT_EPSILON
478 #define FFV_FLOAT64_EPSILON DBL_EPSILON
479 #define FFV_ENOTE_EPSILON FFV_FLOAT64_EPSILON
481 extern const char *fft_cnv_flags[FFNT_ENOTE + 1];
482 extern const char *fft_cnv_flags_width[FFNT_ENOTE + 1];
483 extern const char *fft_cnv_flags_prec[FFNT_ENOTE + 1];
484 extern const char *fft_cnv_flags_width_prec[FFNT_ENOTE + 1];
489 #error "longs have been defined as both 32 and 64 bits"
490 #error "This should never happen, contact support"
493 #ifdef WANT_NCSA_TYPES
495 typedef signed long int int32;
496 typedef unsigned long int uint32;
502 #define FFV_INT32_MIN (-LONG_MAX-1)
503 #define FFV_INT32_MAX LONG_MAX
504 #define FFV_UINT32_MIN 0
505 #define FFV_UINT32_MAX ULONG_MAX
506 #define FFV_INT64_MIN 0
507 #define FFV_INT64_MAX 0
508 #define FFV_UINT64_MIN 0
509 #define FFV_UINT64_MAX 0
516 #error "longs have been defined as both 32 and 64 bits"
517 #error "This should never happen, contact support"
520 #ifdef WANT_NCSA_TYPES
522 typedef signed int int32;
523 typedef unsigned int uint32;
524 typedef signed long int int64;
525 typedef unsigned long int uint64;
529 #define FFV_INT32_MIN (-INT_MAX-1)
530 #define FFV_INT32_MAX INT_MAX
531 #define FFV_UINT32_MIN 0
532 #define FFV_UINT32_MAX UINT_MAX
533 #define FFV_INT64_MIN (-LONG_MAX-1)
534 #define FFV_INT64_MAX LONG_MAX
535 #define FFV_UINT64_MIN 0
536 #define FFV_UINT64_MAX ULONG_MAX
540 typedef double ff_enote;
544 #define FFV_NULL (FF_TYPES_t)0x00000000
546 #define FFV_SIZE_1 (FF_TYPES_t)0x00000001
547 #define FFV_SIZE_2 (FF_TYPES_t)0x00000002
548 #define FFV_UNSIGNED (FF_TYPES_t)0x00000004
549 #define FFV_INTEGER (FF_TYPES_t)0x00000008
550 #define FFV_REAL (FF_TYPES_t)0x00000010
551 #define FFV_TEXT (FF_TYPES_t)0x00000020
554 #define FFV_CHAR FFV_TEXT
556 #define FFV_CONSTANT (FF_TYPES_t)0x00000040
557 #define FFV_INITIAL (FF_TYPES_t)0x00000080
558 #define FFV_EOL (FF_TYPES_t)0x00000140
561 #define FFV_DATA_TYPES (FF_TYPES_t)0x000001FF
563 #define FFV_CONVERT (FF_TYPES_t)0x00000200
564 #define FFV_EQUATION (FF_TYPES_t)0x00000400
565 #define FFNT_CONSTANT (FF_TYPES_t)0x00000800
566 #define FFNT_EQUIV (FF_TYPES_t)0x00001000
567 #define FFV_TRANSLATOR (FF_TYPES_t)0x00002000
568 #define FFV_ORPHAN (FF_TYPES_t)0x00004000
569 #define FFV_EQN (FF_TYPES_t)0x00008000
570 #define FFV_BIT_FIELD (FF_TYPES_t)0x00010000
572 #define FFV_RECORD (FF_TYPES_t)0x00010000
573 #define FFV_INTERNAL (FF_TYPES_t)0x00020000
574 #define FFV_DELIM_VALUE (FF_TYPES_t)0x00040000
575 #define FFV_DELIM_ITEM (FF_TYPES_t)0x00080000
576 #define FFV_PARAM_NAME (FF_TYPES_t)0x00100000
577 #define FFV_PARAM_VALUE (FF_TYPES_t)0x00200000
579 #define DONT_USE_THIS_BIT_PATTERN 0x40000000
581 #define FFV_INT8 ( FFV_INTEGER)
582 #define FFV_UINT8 (FFV_UNSIGNED | FFV_INTEGER)
583 #define FFV_INT16 ( FFV_INTEGER | FFV_SIZE_1)
584 #define FFV_UINT16 (FFV_UNSIGNED | FFV_INTEGER | FFV_SIZE_1)
585 #define FFV_INT32 ( FFV_INTEGER | FFV_SIZE_2)
586 #define FFV_UINT32 (FFV_UNSIGNED | FFV_INTEGER | FFV_SIZE_2)
587 #define FFV_INT64 ( FFV_INTEGER | FFV_SIZE_1 | FFV_SIZE_2)
588 #define FFV_UINT64 (FFV_UNSIGNED | FFV_INTEGER | FFV_SIZE_1 | FFV_SIZE_2)
589 #define FFV_FLOAT32 ( FFV_REAL | FFV_SIZE_2)
590 #define FFV_FLOAT64 ( FFV_REAL | FFV_SIZE_1 | FFV_SIZE_2)
591 #define FFV_ENOTE ( FFV_REAL)
593 #define FFV_UCHAR FFV_UINT8
594 #define FFV_SHORT FFV_INT16
595 #define FFV_USHORT FFV_UINT16
598 #define FFV_LONG FFV_INT32
599 #define FFV_ULONG FFV_UINT32
603 #define FFV_LONG FFV_INT64
604 #define FFV_ULONG FFV_UINT64
607 #define FFV_FLOAT FFV_FLOAT32
608 #define FFV_DOUBLE FFV_FLOAT64
610 #define IS_TEXT_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_TEXT)
611 #define IS_INT8_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_INT8)
612 #define IS_UINT8_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_UINT8)
613 #define IS_INT16_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_INT16)
614 #define IS_UINT16_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_UINT16)
615 #define IS_INT32_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_INT32)
616 #define IS_UINT32_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_UINT32)
617 #define IS_INT64_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_INT64)
618 #define IS_UINT64_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_UINT64)
619 #define IS_FLOAT32_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_FLOAT32)
620 #define IS_FLOAT64_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_FLOAT64)
621 #define IS_ENOTE_TYPE(t) (FFV_DATA_TYPE_TYPE(t) == FFV_ENOTE)
622 #define IS_EQN_TYPE(t) ((t) & FFV_EQN)
623 #define IS_CONSTANT_TYPE(t)((t) ? (((t) & FFV_CONSTANT) == FFV_CONSTANT) : FALSE)
624 #define IS_INITIAL_TYPE(t) ((t) ? (((t) & FFV_INITIAL) == FFV_INITIAL) : FALSE)
626 #define IS_RECORD_TYPE(t) ((t) & FFV_RECORD)
628 #define IS_INTERNAL_TYPE(t) ((t) & FFV_INTERNAL)
630 #define IS_DELIM_VALUE_TYPE(t) ((t) & FFV_DELIM_VALUE)
631 #define IS_DELIM_ITEM_TYPE(t) ((t) & FFV_DELIM_ITEM)
632 #define IS_PARAM_NAME_TYPE(t) ((t) & FFV_PARAM_NAME)
633 #define IS_PARAM_VALUE_TYPE(t) ((t) & FFV_PARAM_VALUE)
635 #define IS_TEXT(v) IS_TEXT_TYPE(FFV_DATA_TYPE(v))
636 #define IS_INT8(v) IS_INT8_TYPE(FFV_DATA_TYPE(v))
637 #define IS_UINT8(v) IS_UINT8_TYPE((FFV_DATA_TYPE(v))
638 #define IS_INT16(v) IS_INT16_TYPE(FFV_DATA_TYPE(v))
639 #define IS_UINT16(v) IS_UINT16_TYPE(FFV_DATA_TYPE(v))
640 #define IS_INT32(v) IS_INT32_TYPE(FFV_DATA_TYPE(v))
641 #define IS_UINT32(v) IS_UINT32_TYPE(FFV_DATA_TYPE(v))
642 #define IS_INT64(v) IS_INT64_TYPE(FFV_DATA_TYPE(v))
643 #define IS_UINT64(v) IS_UINT64_TYPE(FFV_DATA_TYPE(v))
644 #define IS_FLOAT32(v) IS_FLOAT32_TYPE(FFV_DATA_TYPE(v))
645 #define IS_FLOAT64(v) IS_FLOAT64_TYPE(FFV_DATA_TYPE(v))
646 #define IS_ENOTE(v) IS_ENOTE_TYPE(FFV_DATA_TYPE(v))
647 #define IS_EQN(v) IS_EQN_TYPE(FFV_TYPE(v))
649 #define IS_RECORD_VAR(v) IS_RECORD_TYPE(FFV_TYPE(v))
651 #define IS_INTERNAL_VAR(v) IS_INTERNAL_TYPE(FFV_TYPE(v))
653 #define IS_DELIM_VALUE_VAR(v) IS_DELIM_VALUE_TYPE(FFV_TYPE(v))
654 #define IS_DELIM_ITEM_VAR(v) IS_DELIM_ITEM_TYPE(FFV_TYPE(v))
655 #define IS_PARAM_NAME_VAR(v) IS_PARAM_NAME_TYPE(FFV_TYPE(v))
656 #define IS_PARAM_VALUE_VAR(v) IS_PARAM_VALUE_TYPE(FFV_TYPE(v))
658 #define IS_UNSIGNED(v) (FFV_DATA_TYPE(v) & FFV_UNSIGNED)
659 #define IS_INTEGER(v) (FFV_DATA_TYPE(v) & FFV_INTEGER)
660 #define IS_REAL(v) (FFV_DATA_TYPE(v) & FFV_REAL)
662 #define IS_UNSIGNED_TYPE(t) (FFV_DATA_TYPE_TYPE(t) & FFV_UNSIGNED)
663 #define IS_INTEGER_TYPE(t) (FFV_DATA_TYPE_TYPE(t) & FFV_INTEGER)
664 #define IS_REAL_TYPE(t) (FFV_DATA_TYPE_TYPE(t) & FFV_REAL)
666 #define IS_BIT_FIELD(v) ((v) ? (((v)->type & FFV_BIT_FIELD) == FFV_BIT_FIELD) : FALSE)
667 #define IS_CONVERT(v) ((v) ? (((v)->type & FFV_CONVERT) == FFV_CONVERT) : FALSE)
668 #define IS_CONSTANT(v) ((v) ? IS_CONSTANT_TYPE(FFV_TYPE(v)) : FALSE)
669 #define IS_INITIAL(v) ((v) ? IS_INITIAL_TYPE(FFV_TYPE(v)) : FALSE)
670 #define IS_EQUATION(v) ((v) ? ((v)->type & FFV_EQUATION) == FFV_EQUATION : FALSE)
671 #define IS_TRANSLATOR(v) ((v) ? ((v)->type & FFV_TRANSLATOR) == FFV_TRANSLATOR : FALSE)
672 #define IS_ORPHAN_VAR(v) ((v) ? ((v)->type & FFV_ORPHAN) == FFV_ORPHAN : FALSE)
673 #define IS_EOL(v) ((v) ? ((v)->type & FFV_EOL) == FFV_EOL : FALSE)
674 #define IS_FLAG(v) ((v) ? (v)->type == FF_VAR_TYPE_FLAG : FALSE)
676 typedef unsigned long FF_TYPES_t;
677 #define FF_VAR_TYPE_FLAG (FF_TYPES_t)0xffffffff
679 #define IS_KEYWORDED_PARAMETER(p) ((p)[0] == '$')
686 #define NUM_VARIABLE_TYPES 25
687 extern FFF_LOOKUP variable_types[NUM_VARIABLE_TYPES];
690 #define FFF_FILE_TYPES (FFF_BINARY | FFF_ASCII | FFF_FLAT)
691 #define FFF_DATA_TYPES (FFF_DATA | FFF_HEADER | FFF_FILE | FFF_REC)
692 #define FFF_GROUP (FFF_FILE_TYPES | FFF_DATA_TYPES)
697 #define FFF_NULL (FF_TYPES_t)0x00000000
698 #define FFF_BINARY (FF_TYPES_t)0x00000001
699 #define FFF_ASCII (FF_TYPES_t)0x00000002
700 #define FFF_FLAT (FF_TYPES_t)0x00000004
703 #define FFF_TABLE (FF_TYPES_t)0x00000008
704 #define FFF_HEADER (FF_TYPES_t)0x00000010
705 #define FFF_FILE (FF_TYPES_t)0x00000020
706 #define FFF_REC (FF_TYPES_t)0x00000040
707 #define FFF_DATA (FF_TYPES_t)0x00000080
709 #define FFF_SEPARATE (FF_TYPES_t)0x00000100
710 #define FFF_VARIED (FF_TYPES_t)0x00000200
711 #define FFF_INPUT (FF_TYPES_t)0x00000400
712 #define FFF_OUTPUT (FF_TYPES_t)0x00000800
713 #define FFF_IO (FF_TYPES_t)0x00000C00
715 #define FFF_SCALE (FF_TYPES_t)0x00001000
716 #define FFF_ADD_HERE (FF_TYPES_t)0x00002000
717 #define FFF_DELETE_ME (FF_TYPES_t)0X00008000
719 #define FF_ARRAY (FF_TYPES_t)0x40000000
720 #define FFF_RECORD (FF_TYPES_t)0x80000000
723 #define IS_ARRAY_TYPE(t) ((t) & FF_ARRAY)
724 #define IS_ARRAY(x) IS_ARRAY_TYPE(FFF_TYPE(x))
726 #define FFF_ALL_TYPES (FF_TYPES_t)0x0000FFFF
729 #define IS_BINARY_TYPE(t) ((t) & FFF_BINARY)
730 #define IS_ASCII_TYPE(t) ((t) & FFF_ASCII)
731 #define IS_FLAT_TYPE(t) ((t) & FFF_FLAT)
733 #define IS_TABLE_TYPE(t) ((t) & FFF_TABLE)
734 #define IS_DATA_TYPE(t) ((t) & FFF_DATA)
735 #define IS_HEADER_TYPE(t) ((t) & FFF_HEADER)
736 #define IS_FILE_TYPE(t) ((t) & FFF_FILE)
737 #define IS_REC_TYPE(t) ((t) & FFF_REC)
738 #define IS_FILE_HEADER_TYPE(t) (IS_FILE_TYPE(t) && IS_HEADER_TYPE(t))
739 #define IS_REC_HEADER_TYPE(t) (IS_REC_TYPE(t) && IS_HEADER_TYPE(t))
740 #define IS_SEPARATE_TYPE(t) ((t) & FFF_SEPARATE)
741 #define IS_EMBEDDED_TYPE(t) (!IS_SEPARATE_TYPE(t))
742 #define IS_VARIED_TYPE(t) ((t) & FFF_VARIED)
743 #define IS_INPUT_TYPE(t) ((t) & FFF_INPUT)
744 #define IS_OUTPUT_TYPE(t) ((t) & FFF_OUTPUT)
745 #define IS_SCALE_TYPE(t) ((t) & FFF_SCALE)
747 #define IS_RECORD_FORMAT_TYPE(t) ((t) & FFF_RECORD)
749 #define IS_BINARY(f) IS_BINARY_TYPE(FFF_TYPE(f))
750 #define IS_ASCII(f) IS_ASCII_TYPE(FFF_TYPE(f))
751 #define IS_FLAT(f) IS_FLAT_TYPE(FFF_TYPE(f))
753 #define IS_TABLE(f) IS_TABLE_TYPE(FFF_TYPE(f))
754 #define IS_DATA(f) IS_DATA_TYPE(FFF_TYPE(f))
755 #define IS_HEADER(f) IS_HEADER_TYPE(FFF_TYPE(f))
756 #define IS_FILE(f) IS_FILE_TYPE(FFF_TYPE(f))
757 #define IS_FILE_HEADER(f) (IS_FILE_HEADER_TYPE(FFF_TYPE(f)))
758 #define IS_REC_HEADER(f) (IS_REC_HEADER_TYPE(FFF_TYPE(f)))
759 #define IS_REC(f) IS_REC_TYPE(FFF_TYPE(f))
760 #define IS_SEPARATE(f) IS_SEPARATE_TYPE(FFF_TYPE(f))
761 #define IS_EMBEDDED(f) (!IS_SEPARATE(f))
762 #define IS_VARIED(f) IS_VARIED_TYPE(FFF_TYPE(f))
763 #define IS_INPUT(f) IS_INPUT_TYPE(FFF_TYPE(f))
764 #define IS_OUTPUT(f) IS_OUTPUT_TYPE(FFF_TYPE(f))
765 #define IS_SCALE(f) IS_SCALE_TYPE(FFF_TYPE(f))
767 #define IS_RECORD_FORMAT(f) IS_RECORD_FORMAT_TYPE(FFF_TYPE(f))
769 #define NUM_FORMAT_TYPES 71
770 extern FFF_LOOKUP format_types[NUM_FORMAT_TYPES];
772 #define FF_DBG_LOG "ff_debug.log"
773 #define FF_DBG_LOG_SIZE 10240
779 #if defined(DEBUG) || defined(_DEBUG) && !defined(FF_DBG)
785 #define FF_VALIDATE(o) (((o) && ((void *)(o) == (o)->check_address)) ? (void)0 : _ff_err_assert(#o, __FILE__, __LINE__))
787 #define FF_VALIDATE(o) 0
799 #define DOUBLE_UP DBL_EPSILON
800 #define FLOAT_UP FLT_EPSILON
803 #if FF_CC == FF_CC_UNIX
806 #include <sys/types.h>
807 #include <sys/stat.h>
813 #if FF_CC == FF_CC_MSVC1 || FF_CC == FF_CC_MSVC4
817 #include <sys\types.h>
818 #include <sys\stat.h>
824 #include <dl_lists.h>
825 #include <os_utils.h>
826 #include <memtrack.h>
834 #if FF_CC == FF_CC_MSVC1
842 typedef char HUGE *FF_DATA_BUFFER;
843 typedef void HUGE *FF_DATA_PTR;
845 typedef char **FF_STRING_HANDLE;
848 #define FD_FORMAT(fd) ((fd)->format)
849 #define FFF_FIRST(fl) dll_first(fl)
850 #define FFF_NEXT(fl) dll_next(fl)
851 #define FD_FIRST(fdl) dll_first(fdl)
852 #define FD_LAST(fdl) dll_last(fdl)
853 #define FFV_FIRST_VARIABLE(f) ((VARIABLE_LIST)dll_first((f)->variables))
854 #define FFV_NEXT_VARIABLE(vl) dll_next(vl)
855 #define FORMAT_LENGTH(f) ((size_t)(f)->length)
856 #define FF_VAR_LENGTH(v) ((size_t)(v)->end_pos - (size_t)(v)->start_pos + (size_t)1)
858 #define FFV_TYPE(v) ((v)->type)
859 #define FFV_DATA_TYPE_TYPE(t) ((t) & FFV_DATA_TYPES)
860 #define FFV_DATA_TYPE(v) FFV_DATA_TYPE_TYPE(FFV_TYPE(v))
861 #define FFF_TYPE(f) ((f)->type)
862 #define FFF_FORMAT_TYPE(f) (FFF_TYPE(f) & FFF_ALL_TYPES)
863 #define FD_TYPE(fd) (FFF_TYPE((fd)->format) & FFF_DATA_TYPES)
865 #define FD_IS_NATIVE_BYTE_ORDER(fd) (endian() == (BOOLEAN)(fd)->state.byte_order)
867 #define MAX_PV_LENGTH MAX_PATH
868 #define MAX_NAME_LENGTH MAX_PV_LENGTH
869 #define TMP_BUFFER_SIZE 1024
870 #define LOGGING_QUANTA 10240U
871 #define SCRATCH_QUANTA 1024U
873 #define FMT_BUFSIZE_BUFFER_SIZE 4096
880 typedef unsigned FF_BSS_t;
893 unsigned short usage;
895 FF_BSS_t total_bytes;
904 #define BUFSIZE_TOTAL_BYTES_UNKNOWN INT_MAX
919 char *input_format_file;
920 char *input_format_title;
921 char *input_format_buffer;
925 char *output_format_file;
926 char *output_format_title;
927 char *output_format_buffer;
930 unsigned long cache_size;
931 long records_to_read;
934 BOOLEAN error_prompt;
937 char *cv_list_file_dir;
940 BOOLEAN cv_maxmin_only;
943 char *sdts_terms_file;
945 struct struct_std_args_user {
946 unsigned int set_cv_precision :1;
947 unsigned int is_stdin_redirected :1;
948 unsigned int is_stdout_redirected :1;
949 unsigned int format_title :1;
950 unsigned int format_file :1;
986 #define FF_MAX_NAME MAX_PATH
988 #define FFV_MISC_INIT NULL
990 typedef unsigned long FF_NDX_t;
1003 void *check_address;
1009 unsigned int num_vars;
1013 #define FORMAT_NAME_INIT "Format Was Untitled"
1014 #define FORMAT_LOCUS_INIT "Unknown Origin"
1015 #define FORMAT_LOCUS_GV_EDIT "GeoVu Format Editor"
1027 #include <eval_eqn.h>
1034 void *check_address;
1049 void* check_address;
1051 unsigned long cur_record;
1052 unsigned long min_record;
1053 unsigned long max_record;
1062 void *check_address;
1075 char *array_desc_str;
1090 void *check_address;
1094 struct struct_fd_state {
1095 unsigned int byte_order;
1096 unsigned int new_record;
1097 unsigned int locked;
1098 unsigned int unused;
1106 #include <name_tab.h>
1116 void *check_address;
1123 typedef enum enum_pp_object {
1124 PPO_FORMAT_LIST = 0, PPO_NT_LIST = 1, ADD_YOUR_TYPE_HERE = 2
1136 struct struct_nt_list {
1137 FF_TYPES_t nt_io_type;
1140 void *add_your_object_here;
1142 PP_OBJECT_TYPES ppo_type;
1148 typedef unsigned long FF_ARRAY_OFFSET_t;
1154 void *check_address;
1161 struct struct_connect {
1163 #if defined(_DEBUG) || defined(DEBUG)
1175 struct struct_file_info {
1176 FF_ARRAY_OFFSET_t first_array_offset;
1177 FF_ARRAY_OFFSET_t current_array_offset;
1179 unsigned long bytes_left;
1180 unsigned long bytes_done;
1193 void *check_address;
1195 char name[FF_MAX_NAME];
1208 void *check_address;
1209 void *locked_buffer;
1223 void *check_address;
1244 #define FF_VARIABLE(vl) ((VARIABLE_PTR)(vl)->data.u.var)
1245 #define FF_FORMAT(fl) ((FORMAT_PTR)(fl)->data.u.fmt)
1246 #define FD_FORMAT_DATA(fdl) ((FORMAT_DATA_PTR)(fdl)->data.u.fd)
1247 #define FF_AC(acl) ((FF_ARRAY_CONDUIT_PTR)(acl)->data.u.ac)
1248 #define FF_PI(pil) ((PROCESS_INFO_PTR)(pil)->data.u.pi)
1249 #define FF_EP(el) ((FF_ERROR_PTR)(el)->data.u.err)
1250 #define FF_DF(dfl) ((FF_DATA_FLAG_PTR)(dfl)->data.u.df)
1252 #define dll_next(n) ((n)->next)
1253 #define dll_previous(n) ((n)->previous)
1260 typedef enum enum_ff_dll_data_types {
1268 DLL_HEAD_NODE = SHRT_MAX
1269 } FF_DLL_DATA_TYPES;
1273 union union_struct_ff_dll_data_u {
1282 FF_DLL_DATA_TYPES type;
1287 void *check_address;
1293 unsigned int status;
1302 void *check_address;
1315 void *check_address;
1322 long num_array_elements;
1325 #define DEFAULT_CACHE_SIZE 16384L
1327 #define FF_MAX_CACHE_SIZE (unsigned long)UINT_MAX
1329 #define DBSET_INPUT_FORMATS 1
1330 #define DBSET_OUTPUT_FORMATS 2
1331 #define DBSET_HEADERS 3
1332 #define DBSET_READ_EQV 4
1333 #define DBSET_CACHE_SIZE 5
1334 #define DBSET_HEADER_FILE_NAMES 6
1335 #define DBSET_QUERY_RESTRICTION 7
1336 #define DBSET_VARIABLE_RESTRICTION 8
1337 #define DBSET_BYTE_ORDER 9
1338 #define DBSET_CREATE_CONDUITS 10
1339 #define DBSET_USER_UPDATE_FORMATS 11
1340 #define DBSET_INIT_CONDUITS 12
1341 #define DBSET_FORMAT_MAPPINGS 13
1342 #define DBSET_EQUATION_VARIABLES 14
1343 #define DBSET_SETUP_STDIN 15
1344 #define DBSET_VAR_MINMAX 16
1346 #define DBASK_FORMAT_SUMMARY 1
1347 #define DBASK_PROCESS_INFO 2
1348 #define DBASK_VAR_NAMES 3
1349 #define DBASK_VAR_MINS 4
1350 #define DBASK_VAR_MAXS 5
1351 #define DBASK_VAR_UNITS 6
1352 #define DBASK_VAR_FLAGS 7
1353 #define DBASK_ARRAY_DIM_NAMES 8
1354 #define DBASK_ARRAY_DIM_INFO 9
1355 #define DBASK_BYTES_TO_PROCESS 10
1356 #define DBASK_FORMAT_DESCRIPTION 11
1357 #define DBASK_FORMAT_LIST_DESCRIPTION 12
1358 #define DBASK_TAB_TO_ARRAY_FORMAT_DESCRIPTION 13
1359 #define DBASK_FORMAT_DESCRIPTION_TO_USER 14
1360 #define DBASK_FORMAT_LIST_DESCRIPTION_TO_USER 15
1362 #define DBDO_READ_FORMATS 1
1363 #define DBDO_WRITE_FORMATS 2
1364 #define DBDO_CONVERT_DATA 3
1365 #define DBDO_BYTE_SWAP 4
1366 #define DBDO_FILTER_ON_QUERY 5
1367 #define DBDO_CONVERT_FORMATS 6
1368 #define DBDO_PROCESS_FORMATS 7
1369 #define DBDO_READ_STDIN 8
1370 #define DBDO_CHECK_STDOUT 9
1371 #define DBDO_PROCESS_DATA 10
1374 #define DBDO_WRITE_OUTPUT_FMT_FILE 255
1377 #error "NT_ANYWHERE is already defined!"
1379 #define NT_HEADERS FFF_FILE | FFF_REC | FFF_HEADER
1380 #define NT_TABLE FFF_TABLE
1382 #define NT_INPUT FFF_INPUT | NT_HEADERS | NT_TABLE
1383 #define NT_OUTPUT FFF_OUTPUT | NT_HEADERS | NT_TABLE
1385 #define NT_ANYWHERE FFF_FILE | FFF_REC | FFF_HEADER | FFF_TABLE
1388 #define PINFO_POLE(pi) ((pi)->pole)
1389 #define PINFO_FD(pi) (PINFO_POLE(pi)->fd)
1390 #define PINFO_DATA(pi) (PINFO_FD(pi)->data)
1391 #define PINFO_BUFFER(pi) (PINFO_DATA(pi)->buffer)
1392 #define PINFO_BYTES_USED(pi) (PINFO_DATA(pi)->bytes_used)
1393 #define PINFO_TOTAL_BYTES(pi) (PINFO_DATA(pi)->total_bytes)
1394 #define PINFO_STATE(pi) (PINFO_FD(pi)->state)
1395 #define PINFO_LOCKED(pi) (PINFO_STATE(pi).locked)
1396 #define PINFO_NEW_RECORD(pi) (PINFO_STATE(pi).new_record)
1397 #define PINFO_BYTE_ORDER(pi) (PINFO_STATE(pi).byte_order)
1398 #define PINFO_FORMAT(pi) (PINFO_FD(pi)->format)
1400 #define PINFO_SUPER_ARRAY_BYTES(pi) (PINFO_ARRAY_MAP(pi)->super_array->contig_size)
1401 #define PINFO_SUB_ARRAY_BYTES(pi) (PINFO_ARRAY_MAP(pi)->sub_array->contig_size)
1403 #define PINFO_SUPER_ARRAY_ELS(pi) (PINFO_ARRAY_MAP(pi)->super_array->total_elements)
1404 #define PINFO_SUB_ARRAY_ELS(pi) (PINFO_ARRAY_MAP(pi)->sub_array->total_elements)
1406 #define PINFO_ARRAY_BYTES(pi) (PINFO_ARRAY_MAP(pi)->super_array->contig_size)
1408 #define PINFO_ARRAY_DIMS(pi) (PINFO_ARRAY_MAP(pi)->super_array->num_dim)
1409 #define PINFO_ARRAY_NAME(pi, dim) (PINFO_ARRAY_MAP(pi)->super_array->dim_name[dim])
1410 #define PINFO_ARRAY_DIM_SIZE(pi, dim) (PINFO_ARRAY_MAP(pi)->super_array->dim_size[dim])
1413 #define PINFO_TYPE(pi) (PINFO_FORMAT(pi)->type)
1414 #define PINFO_NAME(pi) (PINFO_FORMAT(pi)->name)
1415 #define PINFO_ORIGIN(pi) (PINFO_FORMAT(pi)->locus)
1416 #define PINFO_RECL(pi) (FORMAT_LENGTH(PINFO_FORMAT(pi)))
1417 #define PINFO_CACHEL(pi) (PINFO_TOTAL_BYTES(pi) - 1)
1418 #define PINFO_NUMVARS(pi) (PINFO_FORMAT(pi)->num_vars)
1419 #define PINFO_IS_FILE(pi) (PINFO_POLE(pi)->connect.id & NDARRS_FILE)
1420 #define PINFO_IS_ARRAY(pi) (IS_ARRAY(PINFO_FORMAT(pi)))
1421 #define PINFO_IS_BROKEN(pi) (PINFO_ARRAY_MAP(pi)->sub_array->type == NDARRT_BROKEN)
1422 #define PINFO_FNAME(pi) (PINFO_POLE(pi)->connect.locus.filename)
1423 #define PINFO_LOCUS_BUFSIZE(pi) (PINFO_POLE(pi)->connect.locus.bufsize)
1424 #define PINFO_LOCUS_BUFFER(pi) (PINFO_POLE(pi)->connect.locus.bufsize->buffer)
1425 #define PINFO_LOCUS_SIZE(pi) (PINFO_POLE(pi)->connect.locus.bufsize->total_bytes)
1426 #define PINFO_LOCUS_FILLED(pi) (PINFO_POLE(pi)->connect.locus.bufsize->bytes_used)
1427 #define PINFO_FIRST_ARRAY_OFFSET(pi) (PINFO_POLE(pi)->connect.file_info.first_array_offset)
1428 #define PINFO_CURRENT_ARRAY_OFFSET(pi) (PINFO_POLE(pi)->connect.file_info.current_array_offset)
1429 #define PINFO_ARRAY_DONE(pi) (PINFO_POLE(pi)->connect.array_done)
1430 #define PINFO_BYTES_LEFT(pi) (PINFO_POLE(pi)->connect.bytes_left)
1431 #define PINFO_BYTES_DONE(pi) (PINFO_POLE(pi)->connect.bytes_done)
1432 #define PINFO_ARRAY_MAP(pi) (PINFO_POLE(pi)->array_mapping)
1433 #define PINFO_ID(pi) (PINFO_POLE(pi)->connect.id)
1434 #define PINFO_FORMAT_MAP(pi) (PINFO_POLE(pi)->format_data_mapping)
1436 #define PINFO_SUPER_ARRAY(pi) (PINFO_ARRAY_MAP(pi)->super_array)
1437 #define PINFO_SUB_ARRAY(pi) (PINFO_ARRAY_MAP(pi)->sub_array)
1439 #define PINFO_NUM_DIMS(pi) (PINFO_ARRAY_MAP(pi)->super_array->num_dim)
1441 #define PINFO_DIM_NAME(pi,i) (PINFO_ARRAY_MAP(pi)->super_array->dim_name[i])
1442 #define PINFO_DIM_START_INDEX(pi, i) (PINFO_ARRAY_MAP(pi)->super_array->start_index[i])
1443 #define PINFO_DIM_END_INDEX(pi, i) (PINFO_ARRAY_MAP(pi)->super_array->end_index[i])
1444 #define PINFO_DIM_GRANULARITY(pi, i) (PINFO_ARRAY_MAP(pi)->super_array->granularity[i])
1445 #define PINFO_DIM_SEPARATION(pi, i) (PINFO_ARRAY_MAP(pi)->super_array->separation[i])
1446 #define PINFO_DIM_GROUPING(pi, i) (PINFO_ARRAY_MAP(pi)->super_array->grouping[i])
1448 #define PINFO_MATE(pi) ((pi)->mate)
1451 #define PINFO_MATE_POLE(pi) PINFO_POLE(PINFO_MATE(pi))
1452 #define PINFO_MATE_FD(pi) PINFO_FD(PINFO_MATE(pi))
1453 #define PINFO_MATE_DATA(pi) PINFO_DATA(PINFO_MATE(pi))
1454 #define PINFO_MATE_BUFFER(pi) PINFO_BUFFER(PINFO_MATE(pi))
1455 #define PINFO_MATE_BYTES_USED(pi) PINFO_BYTES_USED(PINFO_MATE(pi))
1456 #define PINFO_MATE_TOTAL_BYTES(pi) PINFO_TOTAL_BYTES(PINFO_MATE(pi))
1457 #define PINFO_MATE_STATE(pi) PINFO_STATE(PINFO_MATE(pi))
1458 #define PINFO_MATE_LOCKED(pi) PINFO_LOCKED(PINFO_MATE(pi))
1459 #define PINFO_MATE_NEW_RECORD(pi) PINFO_NEW_RECORD(PINFO_MATE(pi))
1460 #define PINFO_MATE_BYTE_ORDER(pi) PINFO_BYTE_ORDER(PINFO_MATE(pi))
1461 #define PINFO_MATE_FORMAT(pi) PINFO_FORMAT(PINFO_MATE(pi))
1463 #define PINFO_MATE_SUPER_ARRAY_BYTES(pi) PINFO_SUPER_ARRAY_BYTES(PINFO_MATE(pi))
1464 #define PINFO_MATE_SUB_ARRAY_BYTES(pi) PINFO_SUB_ARRAY_BYTES(PINFO_MATE(pi))
1466 #define PINFO_MATE_SUPER_ARRAY_ELS(pi) PINFO_SUPER_ARRAY_ELS(PINFO_MATE(pi))
1467 #define PINFO_MATE_SUB_ARRAY_ELS(pi) PINFO_SUB_ARRAY_ELS(PINFO_MATE(pi))
1469 #define PINFO_MATE_ARRAY_BYTES(pi) (PINFO_MATE_ARRAY_MAP(pi)->sub_array->contig_size)
1471 #define PINFO_MATE_SUPER_ARRAY(pi) (PINFO_MATE_ARRAY_MAP(pi)->super_array)
1472 #define PINFO_MATE_SUB_ARRAY(pi) (PINFO_MATE_ARRAY_MAP(pi)->sub_array)
1475 #define PINFO_MATE_TYPE(pi) PINFO_TYPE(PINFO_MATE(pi))
1476 #define PINFO_MATE_NAME(pi) PINFO_NAME(PINFO_MATE(pi))
1477 #define PINFO_MATE_ORIGIN(pi) PINFO_ORIGIN(PINFO_MATE(pi))
1478 #define PINFO_MATE_RECL(pi) PINFO_RECL(PINFO_MATE(pi))
1479 #define PINFO_MATE_CACHEL(pi) PINFO_CACHEL(PINFO_MATE(pi))
1480 #define PINFO_MATE_NUMVARS(pi) PINFO_NUMVARS(PINFO_MATE(pi))
1481 #define PINFO_MATE_IS_FILE(pi) PINFO_IS_FILE(PINFO_MATE(pi))
1482 #define PINFO_MATE_FNAME(pi) PINFO_FNAME(PINFO_MATE(pi))
1483 #define PINFO_MATE_LOCUS(pi) PINFO_LOCUS(PINFO_MATE(pi))
1484 #define PINFO_MATE_ARRAY_OFFSET(pi) PINFO_ARRAY_OFFSET(PINFO_MATE(pi))
1485 #define PINFO_MATE_ARRAY_DONE(pi) PINFO_ARRAY_DONE(PINFO_MATE(pi))
1486 #define PINFO_MATE_BYTES_LEFT(pi) PINFO_BYTES_LEFT(PINFO_MATE(pi))
1487 #define PINFO_MATE_BYTES_DONE(pi) PINFO_BYTES_DONE(PINFO_MATE(pi))
1488 #define PINFO_MATE_BUFFER_SIZE(pi) PINFO_BUFFER_SIZE(PINFO_MATE(pi))
1489 #define PINFO_MATE_ARRAY_MAP(pi) PINFO_ARRAY_MAP(PINFO_MATE(pi))
1490 #define PINFO_MATE_ID(pi) PINFO_ID(PINFO_MATE(pi))
1492 void dll_assign(
void *data, FF_DLL_DATA_TYPES type,
DLL_NODE_PTR node);
1494 typedef BOOLEAN (*pgenobj_cmp_t)(
void *,
void *);
1496 int list_replace_items(pgenobj_cmp_t lmi_cmp,
DLL_NODE_PTR list);
1500 size_t ffv_type_size(FF_TYPES_t var_type);
1512 #define FFF_NAME_CASE (FF_TYPES_t)2
1523 void db_format_list_mark_io(
FORMAT_LIST f_list, FF_TYPES_t format_type,
1524 char *input_file_name,
char *output_file_name);
1528 int nt_ask(
DATA_BIN_PTR, FF_TYPES_t origin,
char *name,
1529 FF_TYPES_t value_type,
void *value);
1530 int nt_put(
DATA_BIN_PTR, FF_TYPES_t origin,
char *name,
1531 FF_TYPES_t value_type,
void *value);
1533 char *nt_find_user_name(
DATA_BIN_PTR dbin, FF_TYPES_t origin_type,
1535 char *nt_find_geovu_name(
DATA_BIN_PTR dbin, FF_TYPES_t origin_type,
1541 BOOLEAN endian(
void);
1555 int ff_put_binary_data(
VARIABLE_PTR var,
void *in_data_ptr,
1556 size_t in_var_length, FF_TYPES_t in_data_type,
void *out_data_ptr,
1557 FF_TYPES_t out_format_type);
1560 int ff_get_double(
VARIABLE_PTR,
void *,
double *, FF_TYPES_t);
1561 int ff_binary_to_string(
void *source, FF_TYPES_t data_type,
int precision,
1570 FORMAT_PTR ff_create_format(
char *name,
char *origin);
1587 int format_to_ISO8211DDR(
FORMAT_PTR format,
const char *first_fields,
1592 int btype_to_btype(
void *src_value, FF_TYPES_t src_type,
void *dest_value,
1593 FF_TYPES_t dest_type);
1594 BOOLEAN type_cmp(FF_TYPES_t type,
void *value0,
void *value1);
1617 int new_name_string__(
const char *new_name, FF_STRING_HANDLE name_h);
1620 long num_records,
long start_record,
long end_record);
1627 void update_format_var(FF_TYPES_t data_type, FF_NDX_t bytes_per_pixel,
1634 #define MM_MAX_MIN 101
1635 #define MM_MISSING_DATA_FLAGS 102
1654 FF_CVF cv_abs_sign_to_value;
1656 FF_CVF cv_date_string;
1657 FF_CVF cv_time_string;
1661 FF_CVF cv_degabs_nsew;
1664 FF_CVF cv_feet_to_meters;
1666 FF_CVF cv_geog_quad;
1667 FF_CVF cv_geog_sign;
1672 FF_CVF cv_meters_to_feet;
1676 FF_CVF cv_sea_flags;
1677 FF_CVF cv_slu_flags;
1686 int wfprintf(FILE *stream,
const char *format, ...);
1695 FF_DATA_BUFFER ff_strnstr(
char *pcPattern, FF_DATA_BUFFER pcText,
1698 int get_output_delims(
DATA_BIN_PTR dbin,
char *delim_item,
short *distance,