-
Notifications
You must be signed in to change notification settings - Fork 0
/
FITSIO.H
1565 lines (1420 loc) · 86.7 KB
/
FITSIO.H
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
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
/* Version Info: This file is distributed with version 2.500 of CFITSIO */
/* The FITSIO software was written by William Pence at the High Energy */
/* Astrophysic Science Archive Research Center (HEASARC) at the NASA */
/* Goddard Space Flight Center. */
/*
Copyright (Unpublished--all rights reserved under the copyright laws of
the United States), U.S. Government as represented by the Administrator
of the National Aeronautics and Space Administration. No copyright is
claimed in the United States under Title 17, U.S. Code.
Permission to freely use, copy, modify, and distribute this software
and its documentation without fee is hereby granted, provided that this
copyright notice and disclaimer of warranty appears in all copies.
DISCLAIMER:
THE SOFTWARE IS PROVIDED 'AS IS' WITHOUT ANY WARRANTY OF ANY KIND,
EITHER EXPRESSED, IMPLIED, OR STATUTORY, INCLUDING, BUT NOT LIMITED TO,
ANY WARRANTY THAT THE SOFTWARE WILL CONFORM TO SPECIFICATIONS, ANY
IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
PURPOSE, AND FREEDOM FROM INFRINGEMENT, AND ANY WARRANTY THAT THE
DOCUMENTATION WILL CONFORM TO THE SOFTWARE, OR ANY WARRANTY THAT THE
SOFTWARE WILL BE ERROR FREE. IN NO EVENT SHALL NASA BE LIABLE FOR ANY
DAMAGES, INCLUDING, BUT NOT LIMITED TO, DIRECT, INDIRECT, SPECIAL OR
CONSEQUENTIAL DAMAGES, ARISING OUT OF, RESULTING FROM, OR IN ANY WAY
CONNECTED WITH THIS SOFTWARE, WHETHER OR NOT BASED UPON WARRANTY,
CONTRACT, TORT , OR OTHERWISE, WHETHER OR NOT INJURY WAS SUSTAINED BY
PERSONS OR PROPERTY OR OTHERWISE, AND WHETHER OR NOT LOSS WAS SUSTAINED
FROM, OR AROSE OUT OF THE RESULTS OF, OR USE OF, THE SOFTWARE OR
SERVICES PROVIDED HEREUNDER."
*/
#ifndef _FITSIO_H
#define _FITSIO_H
#include <stdio.h>
#if defined(linux) || defined(__APPLE__)
# include <sys/types.h> /* apparently needed on debian linux systems */
#endif /* to define off_t */
#include <stdlib.h> /* apparently needed to define size_t with gcc 2.8.1 */
#include <limits.h> /* needed for LLONG_MAX and INT64_MAX definitions */
/* Define the datatype for variables which store file offset values. */
/* The new 'off_t' datatype should be used for this purpose, but some */
/* older compilers do not recognize this type, in which case we use 'long' */
/* instead. Note that _OFF_T is defined (or not) in stdio.h depending */
/* on whether _LARGEFILE_SOURCE is defined in sys/feature_tests.h */
/* (at least on Solaris platforms using cc) */
/* Debian systems require the 2nd test, below, */
/* i.e, "(defined(linux) && defined(__off_t_defined))" */
#if defined(_OFF_T) || (defined(linux) && defined(__off_t_defined)) || defined(_MIPS_SZLONG) || defined(__APPLE__) || defined(_AIX)
# define OFF_T off_t
#else
# define OFF_T long
#endif
/* typedef the 'LONGLONG' data type to the intrinsice 8-byte integer type */
#if defined(HAVE_LONGLONG) || defined(__APPLE__)
typedef long long LONGLONG;
# ifndef HAVE_LONGLONG
# define HAVE_LONGLONG 1
# endif
#elif defined(_MSC_VER) || defined(__BORLANDC__) /* Windows PCs; Visual C++, but not Borland C++ */
typedef __int64 LONGLONG;
# ifndef HAVE_LONGLONG
# define HAVE_LONGLONG 1
# endif
#else
typedef long LONGLONG; /* intrinsic 8-byte integer not supported */
#endif
/* The following exclusion if __CINT__ is defined is needed for ROOT */
#ifndef __CINT__
#include "longnam.h"
#endif
#ifdef __BUILDING_DLL
#define DLLEXPORT __declspec( dllexport )
#else
#define DLLEXPORT __declspec( dllimport )
#endif
/* global variables */
#define FLEN_FILENAME 1025 /* max length of a filename */
#define FLEN_KEYWORD 72 /* max length of a keyword (HIERARCH convention) */
#define FLEN_CARD 81 /* length of a FITS header card */
#define FLEN_VALUE 71 /* max length of a keyword value string */
#define FLEN_COMMENT 73 /* max length of a keyword comment string */
#define FLEN_ERRMSG 81 /* max length of a FITSIO error message */
#define FLEN_STATUS 31 /* max length of a FITSIO status text string */
#define TBIT 1 /* codes for FITS table data types */
#define TBYTE 11
#define TSBYTE 12
#define TLOGICAL 14
#define TSTRING 16
#define TUSHORT 20
#define TSHORT 21
#define TUINT 30
#define TINT 31
#define TULONG 40
#define TLONG 41
#define TINT32BIT 41 /* used when returning datatype of a column */
#define TFLOAT 42
#define TLONGLONG 81
#define TDOUBLE 82
#define TCOMPLEX 83
#define TDBLCOMPLEX 163
#define TYP_STRUC_KEY 10
#define TYP_CMPRS_KEY 20
#define TYP_SCAL_KEY 30
#define TYP_NULL_KEY 40
#define TYP_DIM_KEY 50
#define TYP_RANG_KEY 60
#define TYP_UNIT_KEY 70
#define TYP_DISP_KEY 80
#define TYP_HDUID_KEY 90
#define TYP_CKSUM_KEY 100
#define TYP_WCS_KEY 110
#define TYP_REFSYS_KEY 120
#define TYP_COMM_KEY 130
#define TYP_CONT_KEY 140
#define TYP_USER_KEY 150
#define INT32BIT int /* 32-bit integer datatype. Currently this */
/* datatype is an 'int' on all useful platforms */
/* however, it is possible that that are cases */
/* where 'int' is a 2-byte integer, in which case */
/* INT32BIT would need to be defined as 'long'. */
#define BYTE_IMG 8 /* BITPIX code values for FITS image types */
#define SHORT_IMG 16
#define LONG_IMG 32
#define LONGLONG_IMG 64
#define FLOAT_IMG -32
#define DOUBLE_IMG -64
/* The following 2 codes are not true FITS */
/* datatypes; these codes are only used internally */
/* within cfitsio to make it easier for users */
/* to deal with unsigned integers. */
#define SBYTE_IMG 10
#define USHORT_IMG 20
#define ULONG_IMG 40
#define IMAGE_HDU 0 /* Primary Array or IMAGE HDU */
#define ASCII_TBL 1 /* ASCII table HDU */
#define BINARY_TBL 2 /* Binary table HDU */
#define ANY_HDU -1 /* matches any HDU type */
#define READONLY 0 /* options when opening a file */
#define READWRITE 1
/* adopt a hopefully obscure number to use as a null value flag */
/* could be problems if the FITS files contain data with these values */
#define FLOATNULLVALUE -9.11912E-36F
#define DOUBLENULLVALUE -9.1191291391491E-36
/* Image compression algorithm types */
#define MAX_COMPRESS_DIM 6
#define RICE_1 11
#define GZIP_1 21
#define PLIO_1 31
#define HCOMPRESS_1 41
#ifndef TRUE
#define TRUE 1
#endif
#ifndef FALSE
#define FALSE 0
#endif
#define CASESEN 1 /* do case-sensitive string match */
#define CASEINSEN 0 /* do case-insensitive string match */
#define GT_ID_ALL_URI 0 /* hierarchical grouping parameters */
#define GT_ID_REF 1
#define GT_ID_POS 2
#define GT_ID_ALL 3
#define GT_ID_REF_URI 11
#define GT_ID_POS_URI 12
#define OPT_RM_GPT 0
#define OPT_RM_ENTRY 1
#define OPT_RM_MBR 2
#define OPT_RM_ALL 3
#define OPT_GCP_GPT 0
#define OPT_GCP_MBR 1
#define OPT_GCP_ALL 2
#define OPT_MCP_ADD 0
#define OPT_MCP_NADD 1
#define OPT_MCP_REPL 2
#define OPT_MCP_MOV 3
#define OPT_MRG_COPY 0
#define OPT_MRG_MOV 1
#define OPT_CMT_MBR 1
#define OPT_CMT_MBR_DEL 11
typedef struct /* structure used to store table column information */
{
char ttype[70]; /* column name = FITS TTYPEn keyword; */
long tbcol; /* offset in row to first byte of each column */
int tdatatype; /* datatype code of each column */
OFF_T trepeat; /* repeat count of column; number of elements */
double tscale; /* FITS TSCALn linear scaling factor */
double tzero; /* FITS TZEROn linear scaling zero point */
long tnull; /* FITS null value for int image or binary table cols */
char strnull[20]; /* FITS null value string for ASCII table columns */
char tform[10]; /* FITS tform keyword value */
long twidth; /* width of each ASCII table column */
}tcolumn;
#define VALIDSTRUC 555 /* magic value used to identify if structure is valid */
typedef struct /* structure used to store basic FITS file information */
{
int filehandle; /* handle returned by the file open function */
int driver; /* defines which set of I/O drivers should be used */
int open_count; /* number of opened 'fitsfiles' using this structure */
char *filename; /* file name */
int validcode; /* magic value used to verify that structure is valid */
OFF_T filesize; /* current size of the physical disk file in bytes */
OFF_T logfilesize; /* logical size of file, including unflushed buffers */
int lasthdu; /* is this the last HDU in the file? 0 = no, else yes */
OFF_T bytepos; /* current logical I/O pointer position in file */
OFF_T io_pos; /* current I/O pointer position in the physical file */
int curbuf; /* number of I/O buffer currently in use */
int curhdu; /* current HDU number; 0 = primary array */
int hdutype; /* 0 = primary array, 1 = ASCII table, 2 = binary table */
int writemode; /* 0 = readonly, 1 = readwrite */
int maxhdu; /* highest numbered HDU known to exist in the file */
int MAXHDU; /* dynamically allocated dimension of headstart array */
OFF_T *headstart; /* byte offset in file to start of each HDU */
OFF_T headend; /* byte offest in file to end of the current HDU header */
OFF_T nextkey; /* byte offset in file to beginning of next keyword */
OFF_T datastart;/* byte offset in file to start of the current data unit */
int tfield; /* number of fields in the table (primary array has 2 */
long origrows; /* original number of rows (value of NAXIS2 keyword) */
long numrows; /* number of rows in the table (dynamically updated) */
OFF_T rowlength; /* length of a table row or image size (bytes) */
tcolumn *tableptr; /* pointer to the table structure */
OFF_T heapstart; /* heap start byte relative to start of data unit */
long heapsize; /* size of the heap, in bytes */
/* the following elements are related to compressed images */
int request_compress_type; /* requested image compression algorithm */
long request_tilesize[MAX_COMPRESS_DIM]; /* requested tiling size */
int request_rice_nbits; /* requested noise bit parameter value */
int compressimg; /* 1 if HDU contains a compressed image, else 0 */
char zcmptype[12]; /* compression type string */
int compress_type; /* type of compression algorithm */
int zbitpix; /* FITS data type of image (BITPIX) */
int zndim; /* dimension of image */
long znaxis[MAX_COMPRESS_DIM]; /* length of each axis */
long tilesize[MAX_COMPRESS_DIM]; /* size of compression tiles */
long maxtilelen; /* max number of pixels in each image tile */
long maxelem; /* maximum length of variable length arrays */
int cn_compressed; /* column number for COMPRESSED_DATA column */
int cn_uncompressed; /* column number for UNCOMPRESSED_DATA column */
int cn_zscale; /* column number for ZSCALE column */
int cn_zzero; /* column number for ZZERO column */
int cn_zblank; /* column number for the ZBLANK column */
double zscale; /* scaling value, if same for all tiles */
double zzero; /* zero pt, if same for all tiles */
double cn_bscale; /* value of the BSCALE keyword in header */
double cn_bzero; /* value of the BZERO keyword in header */
int zblank; /* value for null pixels, if not a column */
int rice_blocksize; /* first compression parameter */
int rice_nbits; /* second compression parameter */
} FITSfile;
typedef struct /* structure used to store basic HDU information */
{
int HDUposition; /* HDU position in file; 0 = first HDU */
FITSfile *Fptr; /* pointer to FITS file structure */
}fitsfile;
typedef struct /* structure for the iterator function column information */
{
/* elements required as input to fits_iterate_data: */
fitsfile *fptr; /* pointer to the HDU containing the column */
int colnum; /* column number in the table (use name if < 1) */
char colname[70]; /* name (= TTYPEn value) of the column (optional) */
int datatype; /* output datatype (converted if necessary */
int iotype; /* = InputCol, InputOutputCol, or OutputCol */
/* output elements that may be useful for the work function: */
void *array; /* pointer to the array (and the null value) */
long repeat; /* binary table vector repeat value */
long tlmin; /* legal minimum data value */
long tlmax; /* legal maximum data value */
char tunit[70]; /* physical unit string */
char tdisp[70]; /* suggested display format */
} iteratorCol;
#define InputCol 0 /* flag for input only iterator column */
#define InputOutputCol 1 /* flag for input and output iterator column */
#define OutputCol 2 /* flag for output only iterator column */
/* error status codes */
#define SKIP_TABLE -104 /* move to 1st image when opening file */
#define SKIP_IMAGE -103 /* move to 1st table when opening file */
#define SKIP_NULL_PRIMARY -102 /* skip null primary array when opening file */
#define USE_MEM_BUFF -101 /* use memory buffer when opening file */
#define OVERFLOW_ERR -11 /* overflow during datatype conversion */
#define PREPEND_PRIMARY -9 /* used in ffiimg to insert new primary array */
#define SAME_FILE 101 /* input and output files are the same */
#define TOO_MANY_FILES 103 /* tried to open too many FITS files */
#define FILE_NOT_OPENED 104 /* could not open the named file */
#define FILE_NOT_CREATED 105 /* could not create the named file */
#define WRITE_ERROR 106 /* error writing to FITS file */
#define END_OF_FILE 107 /* tried to move past end of file */
#define READ_ERROR 108 /* error reading from FITS file */
#define FILE_NOT_CLOSED 110 /* could not close the file */
#define ARRAY_TOO_BIG 111 /* array dimensions exceed internal limit */
#define READONLY_FILE 112 /* Cannot write to readonly file */
#define MEMORY_ALLOCATION 113 /* Could not allocate memory */
#define BAD_FILEPTR 114 /* invalid fitsfile pointer */
#define NULL_INPUT_PTR 115 /* NULL input pointer to routine */
#define SEEK_ERROR 116 /* error seeking position in file */
#define BAD_URL_PREFIX 121 /* invalid URL prefix on file name */
#define TOO_MANY_DRIVERS 122 /* tried to register too many IO drivers */
#define DRIVER_INIT_FAILED 123 /* driver initialization failed */
#define NO_MATCHING_DRIVER 124 /* matching driver is not registered */
#define URL_PARSE_ERROR 125 /* failed to parse input file URL */
#define RANGE_PARSE_ERROR 126 /* failed to parse input file URL */
#define SHARED_ERRBASE (150)
#define SHARED_BADARG (SHARED_ERRBASE + 1)
#define SHARED_NULPTR (SHARED_ERRBASE + 2)
#define SHARED_TABFULL (SHARED_ERRBASE + 3)
#define SHARED_NOTINIT (SHARED_ERRBASE + 4)
#define SHARED_IPCERR (SHARED_ERRBASE + 5)
#define SHARED_NOMEM (SHARED_ERRBASE + 6)
#define SHARED_AGAIN (SHARED_ERRBASE + 7)
#define SHARED_NOFILE (SHARED_ERRBASE + 8)
#define SHARED_NORESIZE (SHARED_ERRBASE + 9)
#define HEADER_NOT_EMPTY 201 /* header already contains keywords */
#define KEY_NO_EXIST 202 /* keyword not found in header */
#define KEY_OUT_BOUNDS 203 /* keyword record number is out of bounds */
#define VALUE_UNDEFINED 204 /* keyword value field is blank */
#define NO_QUOTE 205 /* string is missing the closing quote */
#define BAD_KEYCHAR 207 /* illegal character in keyword name or card */
#define BAD_ORDER 208 /* required keywords out of order */
#define NOT_POS_INT 209 /* keyword value is not a positive integer */
#define NO_END 210 /* couldn't find END keyword */
#define BAD_BITPIX 211 /* illegal BITPIX keyword value*/
#define BAD_NAXIS 212 /* illegal NAXIS keyword value */
#define BAD_NAXES 213 /* illegal NAXISn keyword value */
#define BAD_PCOUNT 214 /* illegal PCOUNT keyword value */
#define BAD_GCOUNT 215 /* illegal GCOUNT keyword value */
#define BAD_TFIELDS 216 /* illegal TFIELDS keyword value */
#define NEG_WIDTH 217 /* negative table row size */
#define NEG_ROWS 218 /* negative number of rows in table */
#define COL_NOT_FOUND 219 /* column with this name not found in table */
#define BAD_SIMPLE 220 /* illegal value of SIMPLE keyword */
#define NO_SIMPLE 221 /* Primary array doesn't start with SIMPLE */
#define NO_BITPIX 222 /* Second keyword not BITPIX */
#define NO_NAXIS 223 /* Third keyword not NAXIS */
#define NO_NAXES 224 /* Couldn't find all the NAXISn keywords */
#define NO_XTENSION 225 /* HDU doesn't start with XTENSION keyword */
#define NOT_ATABLE 226 /* the CHDU is not an ASCII table extension */
#define NOT_BTABLE 227 /* the CHDU is not a binary table extension */
#define NO_PCOUNT 228 /* couldn't find PCOUNT keyword */
#define NO_GCOUNT 229 /* couldn't find GCOUNT keyword */
#define NO_TFIELDS 230 /* couldn't find TFIELDS keyword */
#define NO_TBCOL 231 /* couldn't find TBCOLn keyword */
#define NO_TFORM 232 /* couldn't find TFORMn keyword */
#define NOT_IMAGE 233 /* the CHDU is not an IMAGE extension */
#define BAD_TBCOL 234 /* TBCOLn keyword value < 0 or > rowlength */
#define NOT_TABLE 235 /* the CHDU is not a table */
#define COL_TOO_WIDE 236 /* column is too wide to fit in table */
#define COL_NOT_UNIQUE 237 /* more than 1 column name matches template */
#define BAD_ROW_WIDTH 241 /* sum of column widths not = NAXIS1 */
#define UNKNOWN_EXT 251 /* unrecognizable FITS extension type */
#define UNKNOWN_REC 252 /* unrecognizable FITS record */
#define END_JUNK 253 /* END keyword is not blank */
#define BAD_HEADER_FILL 254 /* Header fill area not blank */
#define BAD_DATA_FILL 255 /* Data fill area not blank or zero */
#define BAD_TFORM 261 /* illegal TFORM format code */
#define BAD_TFORM_DTYPE 262 /* unrecognizable TFORM datatype code */
#define BAD_TDIM 263 /* illegal TDIMn keyword value */
#define BAD_HEAP_PTR 264 /* invalid BINTABLE heap address */
#define BAD_HDU_NUM 301 /* HDU number < 1 or > MAXHDU */
#define BAD_COL_NUM 302 /* column number < 1 or > tfields */
#define NEG_FILE_POS 304 /* tried to move before beginning of file */
#define NEG_BYTES 306 /* tried to read or write negative bytes */
#define BAD_ROW_NUM 307 /* illegal starting row number in table */
#define BAD_ELEM_NUM 308 /* illegal starting element number in vector */
#define NOT_ASCII_COL 309 /* this is not an ASCII string column */
#define NOT_LOGICAL_COL 310 /* this is not a logical datatype column */
#define BAD_ATABLE_FORMAT 311 /* ASCII table column has wrong format */
#define BAD_BTABLE_FORMAT 312 /* Binary table column has wrong format */
#define NO_NULL 314 /* null value has not been defined */
#define NOT_VARI_LEN 317 /* this is not a variable length column */
#define BAD_DIMEN 320 /* illegal number of dimensions in array */
#define BAD_PIX_NUM 321 /* first pixel number greater than last pixel */
#define ZERO_SCALE 322 /* illegal BSCALE or TSCALn keyword = 0 */
#define NEG_AXIS 323 /* illegal axis length < 1 */
#define NOT_GROUP_TABLE 340
#define HDU_ALREADY_MEMBER 341
#define MEMBER_NOT_FOUND 342
#define GROUP_NOT_FOUND 343
#define BAD_GROUP_ID 344
#define TOO_MANY_HDUS_TRACKED 345
#define HDU_ALREADY_TRACKED 346
#define BAD_OPTION 347
#define IDENTICAL_POINTERS 348
#define BAD_GROUP_ATTACH 349
#define BAD_GROUP_DETACH 350
#define BAD_I2C 401 /* bad int to formatted string conversion */
#define BAD_F2C 402 /* bad float to formatted string conversion */
#define BAD_INTKEY 403 /* can't interprete keyword value as integer */
#define BAD_LOGICALKEY 404 /* can't interprete keyword value as logical */
#define BAD_FLOATKEY 405 /* can't interprete keyword value as float */
#define BAD_DOUBLEKEY 406 /* can't interprete keyword value as double */
#define BAD_C2I 407 /* bad formatted string to int conversion */
#define BAD_C2F 408 /* bad formatted string to float conversion */
#define BAD_C2D 409 /* bad formatted string to double conversion */
#define BAD_DATATYPE 410 /* bad keyword datatype code */
#define BAD_DECIM 411 /* bad number of decimal places specified */
#define NUM_OVERFLOW 412 /* overflow during datatype conversion */
# define DATA_COMPRESSION_ERR 413 /* error in imcompress routines */
# define DATA_DECOMPRESSION_ERR 414 /* error in imcompress routines */
# define NO_COMPRESSED_TILE 415 /* compressed tile doesn't exist */
#define BAD_DATE 420 /* error in date or time conversion */
#define PARSE_SYNTAX_ERR 431 /* syntax error in parser expression */
#define PARSE_BAD_TYPE 432 /* expression did not evaluate to desired type */
#define PARSE_LRG_VECTOR 433 /* vector result too large to return in array */
#define PARSE_NO_OUTPUT 434 /* data parser failed not sent an out column */
#define PARSE_BAD_COL 435 /* bad data encounter while parsing column */
#define PARSE_BAD_OUTPUT 436 /* Output file not of proper type */
#define ANGLE_TOO_BIG 501 /* celestial angle too large for projection */
#define BAD_WCS_VAL 502 /* bad celestial coordinate or pixel value */
#define WCS_ERROR 503 /* error in celestial coordinate calculation */
#define BAD_WCS_PROJ 504 /* unsupported type of celestial projection */
#define NO_WCS_KEY 505 /* celestial coordinate keywords not found */
#define APPROX_WCS_KEY 506 /* approximate WCS keywords were calculated */
#define NO_CLOSE_ERROR 999 /* special value used internally to switch off */
/* the error message from ffclos and ffchdu */
/*------- following error codes are used in the grparser.c file -----------*/
#define NGP_ERRBASE (360) /* base chosen so not to interfere with CFITSIO */
#define NGP_OK (0)
#define NGP_NO_MEMORY (NGP_ERRBASE + 0) /* malloc failed */
#define NGP_READ_ERR (NGP_ERRBASE + 1) /* read error from file */
#define NGP_NUL_PTR (NGP_ERRBASE + 2) /* null pointer passed as argument */
#define NGP_EMPTY_CURLINE (NGP_ERRBASE + 3) /* line read seems to be empty */
#define NGP_UNREAD_QUEUE_FULL (NGP_ERRBASE + 4) /* cannot unread more then 1 line (or single line twice) */
#define NGP_INC_NESTING (NGP_ERRBASE + 5) /* too deep include file nesting (inf. loop ?) */
#define NGP_ERR_FOPEN (NGP_ERRBASE + 6) /* fopen() failed, cannot open file */
#define NGP_EOF (NGP_ERRBASE + 7) /* end of file encountered */
#define NGP_BAD_ARG (NGP_ERRBASE + 8) /* bad arguments passed */
#define NGP_TOKEN_NOT_EXPECT (NGP_ERRBASE + 9) /* token not expected here */
/* The following exclusion if __CINT__ is defined is needed for ROOT */
#ifndef __CINT__
/* the following 3 lines are needed to support C++ compilers */
#ifdef __cplusplus
extern "C" {
#endif
#endif
/*---------------- FITS file URL parsing routines -------------*/
int DLLEXPORT fits_get_token(char **ptr, char *delimiter, char *token, int *isanumber);
char* DLLEXPORT fits_split_names(char *list);
int DLLEXPORT ffiurl(char *url, char *urltype, char *infile,
char *outfile, char *extspec, char *rowfilter,
char *binspec, char *colspec, int *status);
int DLLEXPORT ffrtnm(char *url, char *rootname, int *status);
int DLLEXPORT ffexist(const char *infile, int *exists, int *status);
int DLLEXPORT ffexts(char *extspec, int *extnum, char *extname, int *extvers,
int *hdutype, char *colname, char *rowexpress, int *status);
int DLLEXPORT ffextn(char *url, int *extension_num, int *status);
int DLLEXPORT ffurlt(fitsfile *fptr, char *urlType, int *status);
int DLLEXPORT ffbins(char *binspec, int *imagetype, int *haxis,
char colname[4][FLEN_VALUE], double *minin,
double *maxin, double *binsizein,
char minname[4][FLEN_VALUE], char maxname[4][FLEN_VALUE],
char binname[4][FLEN_VALUE], double *weight, char *wtname,
int *recip, int *status);
int DLLEXPORT ffbinr(char **binspec, char *colname, double *minin,
double *maxin, double *binsizein, char *minname,
char *maxname, char *binname, int *status);
int DLLEXPORT ffimport_file( char *filename, char **contents, int *status );
int DLLEXPORT ffrwrg( char *rowlist, long maxrows, int maxranges, int *numranges,
long *minrow, long *maxrow, int *status);
/*---------------- FITS file I/O routines -------------*/
int DLLEXPORT ffomem(fitsfile **fptr, const char *name, int mode, void **buffptr,
size_t *buffsize, size_t deltasize,
void *(*mem_realloc)(void *p, size_t newsize),
int *status);
int DLLEXPORT ffopen(fitsfile **fptr, const char *filename, int iomode, int *status);
int DLLEXPORT ffdopn(fitsfile **fptr, const char *filename, int iomode, int *status);
int DLLEXPORT fftopn(fitsfile **fptr, const char *filename, int iomode, int *status);
int DLLEXPORT ffiopn(fitsfile **fptr, const char *filename, int iomode, int *status);
int DLLEXPORT ffreopen(fitsfile *openfptr, fitsfile **newfptr, int *status);
int DLLEXPORT ffinit(fitsfile **fptr, const char *filename, int *status);
int DLLEXPORT ffimem(fitsfile **fptr, void **buffptr,
size_t *buffsize, size_t deltasize,
void *(*mem_realloc)(void *p, size_t newsize),
int *status);
int DLLEXPORT fftplt(fitsfile **fptr, const char *filename, const char *tempname,
int *status);
int DLLEXPORT ffflus(fitsfile *fptr, int *status);
int DLLEXPORT ffflsh(fitsfile *fptr, int clearbuf, int *status);
int DLLEXPORT ffclos(fitsfile *fptr, int *status);
int DLLEXPORT ffdelt(fitsfile *fptr, int *status);
int DLLEXPORT ffflnm(fitsfile *fptr, char *filename, int *status);
int DLLEXPORT ffflmd(fitsfile *fptr, int *filemode, int *status);
/*---------------- utility routines -------------*/
float DLLEXPORT ffvers(float *version);
void DLLEXPORT ffupch(char *string);
void DLLEXPORT ffgerr(int status, char *errtext);
void DLLEXPORT ffpmsg(const char *err_message);
void DLLEXPORT ffpmrk(void);
int DLLEXPORT ffgmsg(char *err_message);
void DLLEXPORT ffcmsg(void);
void DLLEXPORT ffcmrk(void);
void DLLEXPORT ffrprt(FILE *stream, int status);
void DLLEXPORT ffcmps(char *templt, char *colname, int casesen, int *match,
int *exact);
int DLLEXPORT fftkey(char *keyword, int *status);
int DLLEXPORT fftrec(char *card, int *status);
int DLLEXPORT ffnchk(fitsfile *fptr, int *status);
int DLLEXPORT ffkeyn(char *keyroot, int value, char *keyname, int *status);
int DLLEXPORT ffnkey(int value, char *keyroot, char *keyname, int *status);
int DLLEXPORT ffgkcl(char *card);
int DLLEXPORT ffdtyp(char *cval, char *dtype, int *status);
int DLLEXPORT ffpsvc(char *card, char *value, char *comm, int *status);
int DLLEXPORT ffgknm(char *card, char *name, int *length, int *status);
int DLLEXPORT ffgthd(char *tmplt, char *card, int *hdtype, int *status);
int DLLEXPORT ffasfm(char *tform, int *datacode, long *width, int *decim, int *status);
int DLLEXPORT ffbnfm(char *tform, int *datacode, long *repeat, long *width, int *status);
int DLLEXPORT ffgabc(int tfields, char **tform, int space, long *rowlen, long *tbcol,
int *status);
int DLLEXPORT fits_get_section_range(char **ptr,long *secmin,long *secmax,long *incre,
int *status);
/*----------------- write single keywords --------------*/
int DLLEXPORT ffpky(fitsfile *fptr, int datatype, char *keyname, void *value,
char *comm, int *status);
int DLLEXPORT ffprec(fitsfile *fptr, const char *card, int *status);
int DLLEXPORT ffpcom(fitsfile *fptr, const char *comm, int *status);
int DLLEXPORT ffpunt(fitsfile *fptr, char *keyname, char *unit, int *status);
int DLLEXPORT ffphis(fitsfile *fptr, const char *history, int *status);
int DLLEXPORT ffpdat(fitsfile *fptr, int *status);
int DLLEXPORT ffgstm(char *timestr, int *timeref, int *status);
int DLLEXPORT ffgsdt(int *day, int *month, int *year, int *status);
int DLLEXPORT ffdt2s(int year, int month, int day, char *datestr, int *status);
int DLLEXPORT fftm2s(int year, int month, int day, int hour, int minute, double second,
int decimals, char *datestr, int *status);
int DLLEXPORT ffs2dt(char *datestr, int *year, int *month, int *day, int *status);
int DLLEXPORT ffs2tm(char *datestr, int *year, int *month, int *day, int *hour,
int *minute, double *second, int *status);
int DLLEXPORT ffpkyu(fitsfile *fptr, char *keyname, char *comm, int *status);
int DLLEXPORT ffpkys(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffpkls(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffplsw(fitsfile *fptr, int *status);
int DLLEXPORT ffpkyl(fitsfile *fptr, char *keyname, int value, char *comm, int *status);
int DLLEXPORT ffpkyj(fitsfile *fptr, char *keyname, long value, char *comm, int *status);
int DLLEXPORT ffpkyf(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkye(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkyg(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkyd(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkyc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkym(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkfc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkfm(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
int DLLEXPORT ffpkyt(fitsfile *fptr, char *keyname, long intval, double frac, char *comm,
int *status);
int DLLEXPORT ffptdm( fitsfile *fptr, int colnum, int naxis, long naxes[], int *status);
/*----------------- write array of keywords --------------*/
int DLLEXPORT ffpkns(fitsfile *fptr, char *keyroot, int nstart, int nkey, char *value[],
char *comm[], int *status);
int DLLEXPORT ffpknl(fitsfile *fptr, char *keyroot, int nstart, int nkey, int *value,
char *comm[], int *status);
int DLLEXPORT ffpknj(fitsfile *fptr, char *keyroot, int nstart, int nkey, long *value,
char *comm[], int *status);
int DLLEXPORT ffpknf(fitsfile *fptr, char *keyroot, int nstart, int nkey, float *value,
int decim, char *comm[], int *status);
int DLLEXPORT ffpkne(fitsfile *fptr, char *keyroot, int nstart, int nkey, float *value,
int decim, char *comm[], int *status);
int DLLEXPORT ffpkng(fitsfile *fptr, char *keyroot, int nstart, int nkey, double *value,
int decim, char *comm[], int *status);
int DLLEXPORT ffpknd(fitsfile *fptr, char *keyroot, int nstart, int nkey, double *value,
int decim, char *comm[], int *status);
int DLLEXPORT ffcpky(fitsfile *infptr,fitsfile *outfptr,int incol,int outcol,
char *rootname, int *status);
/*----------------- write required header keywords --------------*/
int DLLEXPORT ffphps( fitsfile *fptr, int bitpix, int naxis, long naxes[], int *status);
int DLLEXPORT ffphpr( fitsfile *fptr, int simple, int bitpix, int naxis, long naxes[],
long pcount, long gcount, int extend, int *status);
int DLLEXPORT ffphtb(fitsfile *fptr, long naxis1, long naxis2, int tfields, char **ttype,
long *tbcol, char **tform, char **tunit, char *extname, int *status);
int DLLEXPORT ffphbn(fitsfile *fptr, long naxis2, int tfields, char **ttype,
char **tform, char **tunit, char *extname, long pcount, int *status);
/*----------------- write template keywords --------------*/
int DLLEXPORT ffpktp(fitsfile *fptr, const char *filename, int *status);
/*------------------ get header information --------------*/
int DLLEXPORT ffghsp(fitsfile *fptr, int *nexist, int *nmore, int *status);
int DLLEXPORT ffghps(fitsfile *fptr, int *nexist, int *position, int *status);
/*------------------ move position in header -------------*/
int DLLEXPORT ffmaky(fitsfile *fptr, int nrec, int *status);
int DLLEXPORT ffmrky(fitsfile *fptr, int nrec, int *status);
/*------------------ read single keywords -----------------*/
int DLLEXPORT ffgnxk(fitsfile *fptr, char **inclist, int ninc, char **exclist,
int nexc, char *card, int *status);
int DLLEXPORT ffgrec(fitsfile *fptr, int nrec, char *card, int *status);
int DLLEXPORT ffgcrd(fitsfile *fptr, char *keyname, char *card, int *status);
int DLLEXPORT ffgunt(fitsfile *fptr, char *keyname, char *unit, int *status);
int DLLEXPORT ffgkyn(fitsfile *fptr, int nkey, char *keyname, char *keyval, char *comm,
int *status);
int DLLEXPORT ffgkey(fitsfile *fptr, char *keyname, char *keyval, char *comm,
int *status);
int DLLEXPORT ffgky( fitsfile *fptr, int datatype, char *keyname, void *value,
char *comm, int *status);
int DLLEXPORT ffgkys(fitsfile *fptr, char *keyname, char *value, char *comm, int *status);
int DLLEXPORT ffgkls(fitsfile *fptr, char *keyname, char **value, char *comm, int *status)
;
int DLLEXPORT ffgkyl(fitsfile *fptr, char *keyname, int *value, char *comm, int *status);
int DLLEXPORT ffgkyj(fitsfile *fptr, char *keyname, long *value, char *comm, int *status);
int DLLEXPORT ffgkye(fitsfile *fptr, char *keyname, float *value, char *comm,int *status);
int DLLEXPORT ffgkyd(fitsfile *fptr, char *keyname, double *value,char *comm,int *status);
int DLLEXPORT ffgkyc(fitsfile *fptr, char *keyname, float *value, char *comm,int *status);
int DLLEXPORT ffgkym(fitsfile *fptr, char *keyname, double *value,char *comm,int *status);
int DLLEXPORT ffgkyt(fitsfile *fptr, char *keyname, long *ivalue, double *dvalue,
char *comm, int *status);
int DLLEXPORT ffgtdm(fitsfile *fptr, int colnum, int maxdim, int *naxis, long naxes[],
int *status);
int DLLEXPORT ffdtdm(fitsfile *fptr, char *tdimstr, int colnum, int maxdim,
int *naxis, long naxes[], int *status);
/*------------------ read array of keywords -----------------*/
int DLLEXPORT ffgkns(fitsfile *fptr, char *keyname, int nstart, int nmax, char *value[],
int *nfound, int *status);
int DLLEXPORT ffgknl(fitsfile *fptr, char *keyname, int nstart, int nmax, int *value,
int *nfound, int *status);
int DLLEXPORT ffgknj(fitsfile *fptr, char *keyname, int nstart, int nmax, long *value,
int *nfound, int *status);
int DLLEXPORT ffgkne(fitsfile *fptr, char *keyname, int nstart, int nmax, float *value,
int *nfound, int *status);
int DLLEXPORT ffgknd(fitsfile *fptr, char *keyname, int nstart, int nmax, double *value,
int *nfound, int *status);
int DLLEXPORT ffh2st(fitsfile *fptr, char **header, int *status);
int DLLEXPORT ffhdr2str( fitsfile *fptr, int exclude_comm, char **exclist,
int nexc, char **header, int *nkeys, int *status);
/*----------------- read required header keywords --------------*/
int DLLEXPORT ffghpr(fitsfile *fptr, int maxdim, int *simple, int *bitpix, int *naxis,
long naxes[], long *pcount, long *gcount, int *extend, int *status);
int DLLEXPORT ffghtb(fitsfile *fptr,int maxfield, long *naxis1, long *naxis2,
int *tfields, char **ttype, long *tbcol, char **tform, char **tunit,
char *extname, int *status);
int DLLEXPORT ffghbn(fitsfile *fptr, int maxfield, long *naxis2, int *tfields,
char **ttype, char **tform, char **tunit, char *extname,
long *pcount, int *status);
/*--------------------- update keywords ---------------*/
int DLLEXPORT ffuky(fitsfile *fptr, int datatype, char *keyname, void *value,
char *comm, int *status);
int DLLEXPORT ffucrd(fitsfile *fptr, char *keyname, char *card, int *status);
int DLLEXPORT ffukyu(fitsfile *fptr, char *keyname, char *comm, int *status);
int DLLEXPORT ffukys(fitsfile *fptr, char *keyname, char *value, char *comm, int *status);
int DLLEXPORT ffukls(fitsfile *fptr, char *keyname, char *value, char *comm, int *status);
int DLLEXPORT ffukyl(fitsfile *fptr, char *keyname, int value, char *comm, int *status);
int DLLEXPORT ffukyj(fitsfile *fptr, char *keyname, long value, char *comm, int *status);
int DLLEXPORT ffukyf(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffukye(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffukyg(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffukyd(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffukyc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffukym(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
int DLLEXPORT ffukfc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffukfm(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
/*--------------------- modify keywords ---------------*/
int DLLEXPORT ffmrec(fitsfile *fptr, int nkey, char *card, int *status);
int DLLEXPORT ffmcrd(fitsfile *fptr, char *keyname, char *card, int *status);
int DLLEXPORT ffmnam(fitsfile *fptr, char *oldname, char *newname, int *status);
int DLLEXPORT ffmcom(fitsfile *fptr, char *keyname, char *comm, int *status);
int DLLEXPORT ffmkyu(fitsfile *fptr, char *keyname, char *comm, int *status);
int DLLEXPORT ffmkys(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffmkls(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffmkyl(fitsfile *fptr, char *keyname, int value, char *comm, int *status);
int DLLEXPORT ffmkyj(fitsfile *fptr, char *keyname, long value, char *comm, int *status);
int DLLEXPORT ffmkyf(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkye(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkyg(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkyd(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkyc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkym(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkfc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffmkfm(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
/*--------------------- insert keywords ---------------*/
int DLLEXPORT ffirec(fitsfile *fptr, int nkey, char *card, int *status);
int DLLEXPORT ffikey(fitsfile *fptr, char *card, int *status);
int DLLEXPORT ffikyu(fitsfile *fptr, char *keyname, char *comm, int *status);
int DLLEXPORT ffikys(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffikls(fitsfile *fptr, char *keyname, char *value, char *comm,int *status);
int DLLEXPORT ffikyl(fitsfile *fptr, char *keyname, int value, char *comm, int *status);
int DLLEXPORT ffikyj(fitsfile *fptr, char *keyname, long value, char *comm, int *status);
int DLLEXPORT ffikyf(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffikye(fitsfile *fptr, char *keyname, float value, int decim, char *comm,
int *status);
int DLLEXPORT ffikyg(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffikyd(fitsfile *fptr, char *keyname, double value, int decim, char *comm,
int *status);
int DLLEXPORT ffikyc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffikym(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
int DLLEXPORT ffikfc(fitsfile *fptr, char *keyname, float *value, int decim, char *comm,
int *status);
int DLLEXPORT ffikfm(fitsfile *fptr, char *keyname, double *value, int decim, char *comm,
int *status);
/*--------------------- delete keywords ---------------*/
int DLLEXPORT ffdkey(fitsfile *fptr, char *keyname, int *status);
int DLLEXPORT ffdrec(fitsfile *fptr, int keypos, int *status);
/*--------------------- get HDU information -------------*/
int DLLEXPORT ffghdn(fitsfile *fptr, int *chdunum);
int DLLEXPORT ffghdt(fitsfile *fptr, int *exttype, int *status);
int DLLEXPORT ffghad(fitsfile *fptr, long *headstart, long *datastart, long *dataend,
int *status);
int DLLEXPORT ffghof(fitsfile *fptr, OFF_T *headstart, OFF_T *datastart, OFF_T *dataend,
int *status);
int DLLEXPORT ffgipr(fitsfile *fptr, int maxaxis, int *imgtype, int *naxis,
long *naxes, int *status);
int DLLEXPORT ffgidt(fitsfile *fptr, int *imgtype, int *status);
int DLLEXPORT ffgiet(fitsfile *fptr, int *imgtype, int *status);
int DLLEXPORT ffgidm(fitsfile *fptr, int *naxis, int *status);
int DLLEXPORT ffgisz(fitsfile *fptr, int nlen, long *naxes, int *status);
/*--------------------- HDU operations -------------*/
int DLLEXPORT ffmahd(fitsfile *fptr, int hdunum, int *exttype, int *status);
int DLLEXPORT ffmrhd(fitsfile *fptr, int hdumov, int *exttype, int *status);
int DLLEXPORT ffmnhd(fitsfile *fptr, int exttype, char *hduname, int hduvers,
int *status);
int DLLEXPORT ffthdu(fitsfile *fptr, int *nhdu, int *status);
int DLLEXPORT ffcrhd(fitsfile *fptr, int *status);
int DLLEXPORT ffcrim(fitsfile *fptr, int bitpix, int naxis, long *naxes, int *status);
int DLLEXPORT ffcrtb(fitsfile *fptr, int tbltype, long naxis2, int tfields, char **ttype,
char **tform, char **tunit, char *extname, int *status);
int DLLEXPORT ffiimg(fitsfile *fptr, int bitpix, int naxis, long *naxes, int *status);
int DLLEXPORT ffitab(fitsfile *fptr, long naxis1, long naxis2, int tfields, char **ttype,
long *tbcol, char **tform, char **tunit, char *extname, int *status);
int DLLEXPORT ffibin(fitsfile *fptr,long naxis2, int tfields, char **ttype, char **tform,
char **tunit, char *extname, long pcount, int *status);
int DLLEXPORT ffrsim(fitsfile *fptr, int bitpix, int naxis, long *naxes, int *status);
int DLLEXPORT ffdhdu(fitsfile *fptr, int *hdutype, int *status);
int DLLEXPORT ffcopy(fitsfile *infptr, fitsfile *outfptr, int morekeys, int *status);
int DLLEXPORT ffcpfl(fitsfile *infptr, fitsfile *outfptr, int prev, int cur, int follow,
int *status);
int DLLEXPORT ffcphd(fitsfile *infptr, fitsfile *outfptr, int *status);
int DLLEXPORT ffcpdt(fitsfile *infptr, fitsfile *outfptr, int *status);
int DLLEXPORT ffchfl(fitsfile *fptr, int *status);
int DLLEXPORT ffcdfl(fitsfile *fptr, int *status);
int DLLEXPORT ffrdef(fitsfile *fptr, int *status);
int DLLEXPORT ffhdef(fitsfile *fptr, int morekeys, int *status);
int DLLEXPORT ffpthp(fitsfile *fptr, long theap, int *status);
int DLLEXPORT ffcsum(fitsfile *fptr, long nrec, unsigned long *sum, int *status);
void DLLEXPORT ffesum(unsigned long sum, int complm, char *ascii);
unsigned long DLLEXPORT ffdsum(char *ascii, int complm, unsigned long *sum);
int DLLEXPORT ffpcks(fitsfile *fptr, int *status);
int DLLEXPORT ffupck(fitsfile *fptr, int *status);
int DLLEXPORT ffvcks(fitsfile *fptr, int *datastatus, int *hdustatus, int *status);
int DLLEXPORT ffgcks(fitsfile *fptr, unsigned long *datasum, unsigned long *hdusum,
int *status);
/*--------------------- define scaling or null values -------------*/
int DLLEXPORT ffpscl(fitsfile *fptr, double scale, double zero, int *status);
int DLLEXPORT ffpnul(fitsfile *fptr, long nulvalue, int *status);
int DLLEXPORT fftscl(fitsfile *fptr, int colnum, double scale, double zero, int *status);
int DLLEXPORT fftnul(fitsfile *fptr, int colnum, long nulvalue, int *status);
int DLLEXPORT ffsnul(fitsfile *fptr, int colnum, char *nulstring, int *status);
/*--------------------- get column information -------------*/
int DLLEXPORT ffgcno(fitsfile *fptr, int casesen, char *templt, int *colnum,
int *status);
int DLLEXPORT ffgcnn(fitsfile *fptr, int casesen, char *templt, char *colname,
int *colnum, int *status);
int DLLEXPORT ffgtcl(fitsfile *fptr, int colnum, int *typecode, long *repeat,
long *width, int *status);
int DLLEXPORT ffeqty(fitsfile *fptr, int colnum, int *typecode, long *repeat,
long *width, int *status);
int DLLEXPORT ffgncl(fitsfile *fptr, int *ncols, int *status);
int DLLEXPORT ffgnrw(fitsfile *fptr, long *nrows, int *status);
int DLLEXPORT ffgacl(fitsfile *fptr, int colnum, char *ttype, long *tbcol,
char *tunit, char *tform, double *tscal, double *tzero,
char *tnull, char *tdisp, int *status);
int DLLEXPORT ffgbcl(fitsfile *fptr, int colnum, char *ttype, char *tunit,
char *dtype, long *repeat, double *tscal, double *tzero,
long *tnull, char *tdisp, int *status);
int DLLEXPORT ffgrsz(fitsfile *fptr, long *nrows, int *status);
int DLLEXPORT ffgcdw(fitsfile *fptr, int colnum, int *width, int *status);
/*--------------------- read primary array or image elements -------------*/
int DLLEXPORT ffgpxv(fitsfile *fptr, int datatype, long *firstpix, long nelem,
void *nulval, void *array, int *anynul, int *status);
int DLLEXPORT ffgpxf(fitsfile *fptr, int datatype, long *firstpix, long nelem,
void *array, char *nullarray, int *anynul, int *status);
int DLLEXPORT ffgsv(fitsfile *fptr, int datatype, long *blc, long *trc, long *inc,
void *nulval, void *array, int *anynul, int *status);
int DLLEXPORT ffgpv(fitsfile *fptr, int datatype, long firstelem, long nelem,
void *nulval, void *array, int *anynul, int *status);
int DLLEXPORT ffgpf(fitsfile *fptr, int datatype, long firstelem, long nelem,
void *array, char *nullarray, int *anynul, int *status);
int DLLEXPORT ffgpvb(fitsfile *fptr, long group, long firstelem, long nelem, unsigned
char nulval, unsigned char *array, int *anynul, int *status);
int DLLEXPORT ffgpvsb(fitsfile *fptr, long group, long firstelem, long nelem, signed
char nulval, signed char *array, int *anynul, int *status);
int DLLEXPORT ffgpvui(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned short nulval, unsigned short *array, int *anynul,
int *status);
int DLLEXPORT ffgpvi(fitsfile *fptr, long group, long firstelem, long nelem,
short nulval, short *array, int *anynul, int *status);
int DLLEXPORT ffgpvuj(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned long nulval, unsigned long *array, int *anynul,
int *status);
int DLLEXPORT ffgpvj(fitsfile *fptr, long group, long firstelem, long nelem,
long nulval, long *array, int *anynul, int *status);
int DLLEXPORT ffgpvjj(fitsfile *fptr, long group, long firstelem, long nelem,
LONGLONG nulval, LONGLONG *array, int *anynul, int *status);
int DLLEXPORT ffgpvuk(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned int nulval, unsigned int *array, int *anynul, int *status);
int DLLEXPORT ffgpvk(fitsfile *fptr, long group, long firstelem, long nelem,
int nulval, int *array, int *anynul, int *status);
int DLLEXPORT ffgpve(fitsfile *fptr, long group, long firstelem, long nelem,
float nulval, float *array, int *anynul, int *status);
int DLLEXPORT ffgpvd(fitsfile *fptr, long group, long firstelem, long nelem,
double nulval, double *array, int *anynul, int *status);
int DLLEXPORT ffgpfb(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned char *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfsb(fitsfile *fptr, long group, long firstelem, long nelem,
signed char *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfui(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned short *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfi(fitsfile *fptr, long group, long firstelem, long nelem,
short *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfuj(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned long *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfj(fitsfile *fptr, long group, long firstelem, long nelem,
long *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfjj(fitsfile *fptr, long group, long firstelem, long nelem,
LONGLONG *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfuk(fitsfile *fptr, long group, long firstelem, long nelem,
unsigned int *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfk(fitsfile *fptr, long group, long firstelem, long nelem,
int *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfe(fitsfile *fptr, long group, long firstelem, long nelem,
float *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffgpfd(fitsfile *fptr, long group, long firstelem, long nelem,
double *array, char *nularray, int *anynul, int *status);
int DLLEXPORT ffg2db(fitsfile *fptr, long group, unsigned char nulval, long ncols,
long naxis1, long naxis2, unsigned char *array,
int *anynul, int *status);
int DLLEXPORT ffg2dsb(fitsfile *fptr, long group, signed char nulval, long ncols,
long naxis1, long naxis2, signed char *array,
int *anynul, int *status);
int DLLEXPORT ffg2dui(fitsfile *fptr, long group, unsigned short nulval, long ncols,
long naxis1, long naxis2, unsigned short *array,
int *anynul, int *status);
int DLLEXPORT ffg2di(fitsfile *fptr, long group, short nulval, long ncols,
long naxis1, long naxis2, short *array,
int *anynul, int *status);
int DLLEXPORT ffg2duj(fitsfile *fptr, long group, unsigned long nulval, long ncols,
long naxis1, long naxis2, unsigned long *array,
int *anynul, int *status);
int DLLEXPORT ffg2dj(fitsfile *fptr, long group, long nulval, long ncols,
long naxis1, long naxis2, long *array,
int *anynul, int *status);
int DLLEXPORT ffg2djj(fitsfile *fptr, long group, LONGLONG nulval, long ncols,
long naxis1, long naxis2, LONGLONG *array,
int *anynul, int *status);
int DLLEXPORT ffg2duk(fitsfile *fptr, long group, unsigned int nulval, long ncols,
long naxis1, long naxis2, unsigned int *array,
int *anynul, int *status);
int DLLEXPORT ffg2dk(fitsfile *fptr, long group, int nulval, long ncols,
long naxis1, long naxis2, int *array,
int *anynul, int *status);
int DLLEXPORT ffg2de(fitsfile *fptr, long group, float nulval, long ncols,
long naxis1, long naxis2, float *array,
int *anynul, int *status);
int DLLEXPORT ffg2dd(fitsfile *fptr, long group, double nulval, long ncols,
long naxis1, long naxis2, double *array,
int *anynul, int *status);
int DLLEXPORT ffg3db(fitsfile *fptr, long group, unsigned char nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
unsigned char *array, int *anynul, int *status);
int DLLEXPORT ffg3dsb(fitsfile *fptr, long group, signed char nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
signed char *array, int *anynul, int *status);
int DLLEXPORT ffg3dui(fitsfile *fptr, long group, unsigned short nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
unsigned short *array, int *anynul, int *status);
int DLLEXPORT ffg3di(fitsfile *fptr, long group, short nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
short *array, int *anynul, int *status);
int DLLEXPORT ffg3duj(fitsfile *fptr, long group, unsigned long nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
unsigned long *array, int *anynul, int *status);
int DLLEXPORT ffg3dj(fitsfile *fptr, long group, long nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
long *array, int *anynul, int *status);
int DLLEXPORT ffg3djj(fitsfile *fptr, long group, LONGLONG nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
LONGLONG *array, int *anynul, int *status);
int DLLEXPORT ffg3duk(fitsfile *fptr, long group, unsigned int nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
unsigned int *array, int *anynul, int *status);
int DLLEXPORT ffg3dk(fitsfile *fptr, long group, int nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
int *array, int *anynul, int *status);
int DLLEXPORT ffg3de(fitsfile *fptr, long group, float nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
float *array, int *anynul, int *status);
int DLLEXPORT ffg3dd(fitsfile *fptr, long group, double nulval, long ncols,
long nrows, long naxis1, long naxis2, long naxis3,
double *array, int *anynul, int *status);
int DLLEXPORT ffgsvb(fitsfile *fptr, int colnum, int naxis, long *naxes, long *blc,