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
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<title>WCSLIB 4.8.2: fitshdr.h Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
</head><body>
<!-- Generated by Doxygen 1.5.6 -->
<div class="navigation" id="top">
<div class="tabs">
<ul>
<li><a href="index.html"><span>Main Page</span></a></li>
<li><a href="pages.html"><span>Related Pages</span></a></li>
<li><a href="annotated.html"><span>Data Structures</span></a></li>
<li class="current"><a href="files.html"><span>Files</span></a></li>
</ul>
</div>
<h1>fitshdr.h</h1><a href="fitshdr_8h.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*============================================================================</span>
<a name="l00002"></a>00002 <span class="comment"></span>
<a name="l00003"></a>00003 <span class="comment"> WCSLIB 4.8 - an implementation of the FITS WCS standard.</span>
<a name="l00004"></a>00004 <span class="comment"> Copyright (C) 1995-2011, Mark Calabretta</span>
<a name="l00005"></a>00005 <span class="comment"></span>
<a name="l00006"></a>00006 <span class="comment"> This file is part of WCSLIB.</span>
<a name="l00007"></a>00007 <span class="comment"></span>
<a name="l00008"></a>00008 <span class="comment"> WCSLIB is free software: you can redistribute it and/or modify it under the</span>
<a name="l00009"></a>00009 <span class="comment"> terms of the GNU Lesser General Public License as published by the Free</span>
<a name="l00010"></a>00010 <span class="comment"> Software Foundation, either version 3 of the License, or (at your option)</span>
<a name="l00011"></a>00011 <span class="comment"> any later version.</span>
<a name="l00012"></a>00012 <span class="comment"></span>
<a name="l00013"></a>00013 <span class="comment"> WCSLIB is distributed in the hope that it will be useful, but WITHOUT ANY</span>
<a name="l00014"></a>00014 <span class="comment"> WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS</span>
<a name="l00015"></a>00015 <span class="comment"> FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for</span>
<a name="l00016"></a>00016 <span class="comment"> more details.</span>
<a name="l00017"></a>00017 <span class="comment"></span>
<a name="l00018"></a>00018 <span class="comment"> You should have received a copy of the GNU Lesser General Public License</span>
<a name="l00019"></a>00019 <span class="comment"> along with WCSLIB. If not, see <http://www.gnu.org/licenses/>.</span>
<a name="l00020"></a>00020 <span class="comment"></span>
<a name="l00021"></a>00021 <span class="comment"> Correspondence concerning WCSLIB may be directed to:</span>
<a name="l00022"></a>00022 <span class="comment"> Internet email: mcalabre@atnf.csiro.au</span>
<a name="l00023"></a>00023 <span class="comment"> Postal address: Dr. Mark Calabretta</span>
<a name="l00024"></a>00024 <span class="comment"> Australia Telescope National Facility, CSIRO</span>
<a name="l00025"></a>00025 <span class="comment"> PO Box 76</span>
<a name="l00026"></a>00026 <span class="comment"> Epping NSW 1710</span>
<a name="l00027"></a>00027 <span class="comment"> AUSTRALIA</span>
<a name="l00028"></a>00028 <span class="comment"></span>
<a name="l00029"></a>00029 <span class="comment"> Author: Mark Calabretta, Australia Telescope National Facility</span>
<a name="l00030"></a>00030 <span class="comment"> http://www.atnf.csiro.au/~mcalabre/index.html</span>
<a name="l00031"></a>00031 <span class="comment"> $Id: fitshdr.h,v 4.8.1.1 2011/08/15 08:07:06 cal103 Exp cal103 $</span>
<a name="l00032"></a>00032 <span class="comment">*=============================================================================</span>
<a name="l00033"></a>00033 <span class="comment">*</span>
<a name="l00034"></a>00034 <span class="comment">* The Flexible Image Transport System (FITS), a data format widely used in</span>
<a name="l00035"></a>00035 <span class="comment">* astronomy for data interchange and archive, is described in</span>
<a name="l00036"></a>00036 <span class="comment">*</span>
<a name="l00037"></a>00037 <span class="comment">* "Definition of The Flexible Image Transport System (FITS)",</span>
<a name="l00038"></a>00038 <span class="comment">* Hanisch, R.J., Farris, A., Greisen, E.W., et al. 2001, A&A, 376, 359</span>
<a name="l00039"></a>00039 <span class="comment">*</span>
<a name="l00040"></a>00040 <span class="comment">* which formalizes NOST 100-2.0, a document produced by the NASA/Science</span>
<a name="l00041"></a>00041 <span class="comment">* Office of Standards and Technology, see http://fits.gsfc.nasa.gov.</span>
<a name="l00042"></a>00042 <span class="comment">*</span>
<a name="l00043"></a>00043 <span class="comment">* Refer to the README file provided with WCSLIB for an overview of the</span>
<a name="l00044"></a>00044 <span class="comment">* library.</span>
<a name="l00045"></a>00045 <span class="comment">*</span>
<a name="l00046"></a>00046 <span class="comment">*</span>
<a name="l00047"></a>00047 <span class="comment">* Summary of the fitshdr routines</span>
<a name="l00048"></a>00048 <span class="comment">* -------------------------------</span>
<a name="l00049"></a>00049 <span class="comment">* fitshdr() is a generic FITS header parser provided to handle keyrecords that</span>
<a name="l00050"></a>00050 <span class="comment">* are ignored by the WCS header parsers, wcspih() and wcsbth(). Typically the</span>
<a name="l00051"></a>00051 <span class="comment">* latter may be set to remove WCS keyrecords from a header leaving fitshdr()</span>
<a name="l00052"></a>00052 <span class="comment">* to handle the remainder.</span>
<a name="l00053"></a>00053 <span class="comment">*</span>
<a name="l00054"></a>00054 <span class="comment">*</span>
<a name="l00055"></a>00055 <span class="comment">* fitshdr() - FITS header parser routine</span>
<a name="l00056"></a>00056 <span class="comment">* --------------------------------------</span>
<a name="l00057"></a>00057 <span class="comment">* fitshdr() parses a character array containing a FITS header, extracting</span>
<a name="l00058"></a>00058 <span class="comment">* all keywords and their values into an array of fitskey structs.</span>
<a name="l00059"></a>00059 <span class="comment">*</span>
<a name="l00060"></a>00060 <span class="comment">* Given:</span>
<a name="l00061"></a>00061 <span class="comment">* header const char []</span>
<a name="l00062"></a>00062 <span class="comment">* Character array containing the (entire) FITS header,</span>
<a name="l00063"></a>00063 <span class="comment">* for example, as might be obtained conveniently via the</span>
<a name="l00064"></a>00064 <span class="comment">* CFITSIO routine fits_hdr2str().</span>
<a name="l00065"></a>00065 <span class="comment">*</span>
<a name="l00066"></a>00066 <span class="comment">* Each header "keyrecord" (formerly "card image")</span>
<a name="l00067"></a>00067 <span class="comment">* consists of exactly 80 7-bit ASCII printing characters</span>
<a name="l00068"></a>00068 <span class="comment">* in the range 0x20 to 0x7e (which excludes NUL, BS,</span>
<a name="l00069"></a>00069 <span class="comment">* TAB, LF, FF and CR) especially noting that the</span>
<a name="l00070"></a>00070 <span class="comment">* keyrecords are NOT null-terminated.</span>
<a name="l00071"></a>00071 <span class="comment">*</span>
<a name="l00072"></a>00072 <span class="comment">* nkeyrec int Number of keyrecords in header[].</span>
<a name="l00073"></a>00073 <span class="comment">*</span>
<a name="l00074"></a>00074 <span class="comment">* nkeyids int Number of entries in keyids[].</span>
<a name="l00075"></a>00075 <span class="comment">*</span>
<a name="l00076"></a>00076 <span class="comment">* Given and returned:</span>
<a name="l00077"></a>00077 <span class="comment">* keyids struct fitskeyid []</span>
<a name="l00078"></a>00078 <span class="comment">* While all keywords are extracted from the header,</span>
<a name="l00079"></a>00079 <span class="comment">* keyids[] provides a convienient way of indexing them.</span>
<a name="l00080"></a>00080 <span class="comment">* The fitskeyid struct contains three members;</span>
<a name="l00081"></a>00081 <span class="comment">* fitskeyid::name must be set by the user while</span>
<a name="l00082"></a>00082 <span class="comment">* fitskeyid::count and fitskeyid::name are returned by</span>
<a name="l00083"></a>00083 <span class="comment">* fitshdr(). All matched keywords will have their</span>
<a name="l00084"></a>00084 <span class="comment">* fitskey::keyno member negated.</span>
<a name="l00085"></a>00085 <span class="comment">*</span>
<a name="l00086"></a>00086 <span class="comment">* Returned:</span>
<a name="l00087"></a>00087 <span class="comment">* nreject int* Number of header keyrecords rejected for syntax</span>
<a name="l00088"></a>00088 <span class="comment">* errors.</span>
<a name="l00089"></a>00089 <span class="comment">*</span>
<a name="l00090"></a>00090 <span class="comment">* keys struct fitskey**</span>
<a name="l00091"></a>00091 <span class="comment">* Pointer to an array of nkeyrec fitskey structs</span>
<a name="l00092"></a>00092 <span class="comment">* containing all keywords and keyvalues extracted from</span>
<a name="l00093"></a>00093 <span class="comment">* the header.</span>
<a name="l00094"></a>00094 <span class="comment">*</span>
<a name="l00095"></a>00095 <span class="comment">* Memory for the array is allocated by fitshdr() and</span>
<a name="l00096"></a>00096 <span class="comment">* this must be freed by the user by invoking free() on</span>
<a name="l00097"></a>00097 <span class="comment">* the array.</span>
<a name="l00098"></a>00098 <span class="comment">*</span>
<a name="l00099"></a>00099 <span class="comment">* Function return value:</span>
<a name="l00100"></a>00100 <span class="comment">* int Status return value:</span>
<a name="l00101"></a>00101 <span class="comment">* 0: Success.</span>
<a name="l00102"></a>00102 <span class="comment">* 1: Null fitskey pointer passed.</span>
<a name="l00103"></a>00103 <span class="comment">* 2: Memory allocation failed.</span>
<a name="l00104"></a>00104 <span class="comment">* 3: Fatal error returned by Flex parser.</span>
<a name="l00105"></a>00105 <span class="comment">*</span>
<a name="l00106"></a>00106 <span class="comment">* Notes:</span>
<a name="l00107"></a>00107 <span class="comment">* 1: Keyword parsing is done in accordance with the syntax defined by</span>
<a name="l00108"></a>00108 <span class="comment">* NOST 100-2.0, noting the following points in particular:</span>
<a name="l00109"></a>00109 <span class="comment">*</span>
<a name="l00110"></a>00110 <span class="comment">* a: Sect. 5.1.2.1 specifies that keywords be left-justified in columns</span>
<a name="l00111"></a>00111 <span class="comment">* 1-8, blank-filled with no embedded spaces, composed only of the</span>
<a name="l00112"></a>00112 <span class="comment">* ASCII characters ABCDEFGHJKLMNOPQRSTUVWXYZ0123456789-_</span>
<a name="l00113"></a>00113 <span class="comment">*</span>
<a name="l00114"></a>00114 <span class="comment">* fitshdr() accepts any characters in columns 1-8 but flags keywords</span>
<a name="l00115"></a>00115 <span class="comment">* that do not conform to standard syntax.</span>
<a name="l00116"></a>00116 <span class="comment">*</span>
<a name="l00117"></a>00117 <span class="comment">* b: Sect. 5.1.2.2 defines the "value indicator" as the characters "= "</span>
<a name="l00118"></a>00118 <span class="comment">* occurring in columns 9 and 10. If these are absent then the</span>
<a name="l00119"></a>00119 <span class="comment">* keyword has no value and columns 9-80 may contain any ASCII text</span>
<a name="l00120"></a>00120 <span class="comment">* (but see note 2 for CONTINUE keyrecords). This is copied to the</span>
<a name="l00121"></a>00121 <span class="comment">* comment member of the fitskey struct.</span>
<a name="l00122"></a>00122 <span class="comment">*</span>
<a name="l00123"></a>00123 <span class="comment">* c: Sect. 5.1.2.3 states that a keyword may have a null (undefined)</span>
<a name="l00124"></a>00124 <span class="comment">* value if the value/comment field, columns 11-80, consists entirely</span>
<a name="l00125"></a>00125 <span class="comment">* of spaces, possibly followed by a comment.</span>
<a name="l00126"></a>00126 <span class="comment">*</span>
<a name="l00127"></a>00127 <span class="comment">* d: Sect. 5.1.1 states that trailing blanks in a string keyvalue are</span>
<a name="l00128"></a>00128 <span class="comment">* not significant and the parser always removes them. A string</span>
<a name="l00129"></a>00129 <span class="comment">* containing nothing but blanks will be replaced with a single</span>
<a name="l00130"></a>00130 <span class="comment">* blank.</span>
<a name="l00131"></a>00131 <span class="comment">*</span>
<a name="l00132"></a>00132 <span class="comment">* Sect. 5.2.1 also states that a quote character (') in a string</span>
<a name="l00133"></a>00133 <span class="comment">* value is to be represented by two successive quote characters and</span>
<a name="l00134"></a>00134 <span class="comment">* the parser removes the repeated quote.</span>
<a name="l00135"></a>00135 <span class="comment">*</span>
<a name="l00136"></a>00136 <span class="comment">* e: The parser recognizes free-format character (NOST 100-2.0,</span>
<a name="l00137"></a>00137 <span class="comment">* Sect. 5.2.1), integer (Sect. 5.2.3), and floating-point values</span>
<a name="l00138"></a>00138 <span class="comment">* (Sect. 5.2.4) for all keywords.</span>
<a name="l00139"></a>00139 <span class="comment">*</span>
<a name="l00140"></a>00140 <span class="comment">* f: Sect. 5.2.3 offers no comment on the size of an integer keyvalue</span>
<a name="l00141"></a>00141 <span class="comment">* except indirectly in limiting it to 70 digits. The parser will</span>
<a name="l00142"></a>00142 <span class="comment">* translates an integer keyvalue to a 32-bit signed integer if it</span>
<a name="l00143"></a>00143 <span class="comment">* lies in the range -2147483648 to +2147483647, otherwise it</span>
<a name="l00144"></a>00144 <span class="comment">* interprets it as a 64-bit signed integer if possible, or else a</span>
<a name="l00145"></a>00145 <span class="comment">* "very long" integer (see fitskey::type).</span>
<a name="l00146"></a>00146 <span class="comment">*</span>
<a name="l00147"></a>00147 <span class="comment">* g: END not followed by 77 blanks is not considered to be a legitimate</span>
<a name="l00148"></a>00148 <span class="comment">* end keyrecord.</span>
<a name="l00149"></a>00149 <span class="comment">*</span>
<a name="l00150"></a>00150 <span class="comment">* 2: The parser supports a generalization of the OGIP Long String Keyvalue</span>
<a name="l00151"></a>00151 <span class="comment">* Convention (v1.0) whereby strings may be continued onto successive</span>
<a name="l00152"></a>00152 <span class="comment">* header keyrecords. A keyrecord contains a segment of a continued</span>
<a name="l00153"></a>00153 <span class="comment">* string if and only if</span>
<a name="l00154"></a>00154 <span class="comment">*</span>
<a name="l00155"></a>00155 <span class="comment">* a: it contains the pseudo-keyword CONTINUE,</span>
<a name="l00156"></a>00156 <span class="comment">*</span>
<a name="l00157"></a>00157 <span class="comment">* b: columns 9 and 10 are both blank,</span>
<a name="l00158"></a>00158 <span class="comment">*</span>
<a name="l00159"></a>00159 <span class="comment">* c: columns 11 to 80 contain what would be considered a valid string</span>
<a name="l00160"></a>00160 <span class="comment">* keyvalue, including optional keycomment, if column 9 had contained</span>
<a name="l00161"></a>00161 <span class="comment">* '=',</span>
<a name="l00162"></a>00162 <span class="comment">*</span>
<a name="l00163"></a>00163 <span class="comment">* d: the previous keyrecord contained either a valid string keyvalue or</span>
<a name="l00164"></a>00164 <span class="comment">* a valid CONTINUE keyrecord.</span>
<a name="l00165"></a>00165 <span class="comment">*</span>
<a name="l00166"></a>00166 <span class="comment">* If any of these conditions is violated, the keyrecord is considered in</span>
<a name="l00167"></a>00167 <span class="comment">* isolation.</span>
<a name="l00168"></a>00168 <span class="comment">*</span>
<a name="l00169"></a>00169 <span class="comment">* Syntax errors in keycomments in a continued string are treated more</span>
<a name="l00170"></a>00170 <span class="comment">* permissively than usual; the '/' delimiter may be omitted provided that</span>
<a name="l00171"></a>00171 <span class="comment">* parsing of the string keyvalue is not compromised. However, the</span>
<a name="l00172"></a>00172 <span class="comment">* FITSHDR_COMMENT status bit will be set for the keyrecord (see</span>
<a name="l00173"></a>00173 <span class="comment">* fitskey::status).</span>
<a name="l00174"></a>00174 <span class="comment">*</span>
<a name="l00175"></a>00175 <span class="comment">* As for normal strings, trailing blanks in a continued string are not</span>
<a name="l00176"></a>00176 <span class="comment">* significant.</span>
<a name="l00177"></a>00177 <span class="comment">*</span>
<a name="l00178"></a>00178 <span class="comment">* In the OGIP convention "the '&' character is used as the last non-blank</span>
<a name="l00179"></a>00179 <span class="comment">* character of the string to indicate that the string is (probably)</span>
<a name="l00180"></a>00180 <span class="comment">* continued on the following keyword". This additional syntax is not</span>
<a name="l00181"></a>00181 <span class="comment">* required by fitshdr(), but if '&' does occur as the last non-blank</span>
<a name="l00182"></a>00182 <span class="comment">* character of a continued string keyvalue then it will be removed, along</span>
<a name="l00183"></a>00183 <span class="comment">* with any trailing blanks. However, blanks that occur before the '&'</span>
<a name="l00184"></a>00184 <span class="comment">* will be preserved.</span>
<a name="l00185"></a>00185 <span class="comment">*</span>
<a name="l00186"></a>00186 <span class="comment">*</span>
<a name="l00187"></a>00187 <span class="comment">* fitskeyid struct - Keyword indexing</span>
<a name="l00188"></a>00188 <span class="comment">* -----------------------------------</span>
<a name="l00189"></a>00189 <span class="comment">* fitshdr() uses the fitskeyid struct to return indexing information for</span>
<a name="l00190"></a>00190 <span class="comment">* specified keywords. The struct contains three members, the first of which,</span>
<a name="l00191"></a>00191 <span class="comment">* fitskeyid::name, must be set by the user with the remainder returned by</span>
<a name="l00192"></a>00192 <span class="comment">* fitshdr().</span>
<a name="l00193"></a>00193 <span class="comment">*</span>
<a name="l00194"></a>00194 <span class="comment">* char name[12]:</span>
<a name="l00195"></a>00195 <span class="comment">* (Given) Name of the required keyword. This is to be set by the user;</span>
<a name="l00196"></a>00196 <span class="comment">* the '.' character may be used for wildcarding. Trailing blanks will be</span>
<a name="l00197"></a>00197 <span class="comment">* replaced with nulls.</span>
<a name="l00198"></a>00198 <span class="comment">*</span>
<a name="l00199"></a>00199 <span class="comment">* int count:</span>
<a name="l00200"></a>00200 <span class="comment">* (Returned) The number of matches found for the keyword.</span>
<a name="l00201"></a>00201 <span class="comment">*</span>
<a name="l00202"></a>00202 <span class="comment">* int idx[2]:</span>
<a name="l00203"></a>00203 <span class="comment">* (Returned) Indices into keys[], the array of fitskey structs returned by</span>
<a name="l00204"></a>00204 <span class="comment">* fitshdr(). Note that these are 0-relative array indices, not keyrecord</span>
<a name="l00205"></a>00205 <span class="comment">* numbers.</span>
<a name="l00206"></a>00206 <span class="comment">*</span>
<a name="l00207"></a>00207 <span class="comment">* If the keyword is found in the header the first index will be set to the</span>
<a name="l00208"></a>00208 <span class="comment">* array index of its first occurrence, otherwise it will be set to -1.</span>
<a name="l00209"></a>00209 <span class="comment">*</span>
<a name="l00210"></a>00210 <span class="comment">* If multiples of the keyword are found, the second index will be set to</span>
<a name="l00211"></a>00211 <span class="comment">* the array index of its last occurrence, otherwise it will be set to -1.</span>
<a name="l00212"></a>00212 <span class="comment">*</span>
<a name="l00213"></a>00213 <span class="comment">*</span>
<a name="l00214"></a>00214 <span class="comment">* fitskey struct - Keyword/value information</span>
<a name="l00215"></a>00215 <span class="comment">* ------------------------------------------</span>
<a name="l00216"></a>00216 <span class="comment">* fitshdr() returns an array of fitskey structs, each of which contains the</span>
<a name="l00217"></a>00217 <span class="comment">* result of parsing one FITS header keyrecord. All members of the fitskey</span>
<a name="l00218"></a>00218 <span class="comment">* struct are returned by fitshdr(), none are given by the user.</span>
<a name="l00219"></a>00219 <span class="comment">*</span>
<a name="l00220"></a>00220 <span class="comment">* int keyno</span>
<a name="l00221"></a>00221 <span class="comment">* (Returned) Keyrecord number (1-relative) in the array passed as input to</span>
<a name="l00222"></a>00222 <span class="comment">* fitshdr(). This will be negated if the keyword matched any specified in</span>
<a name="l00223"></a>00223 <span class="comment">* the keyids[] index.</span>
<a name="l00224"></a>00224 <span class="comment">*</span>
<a name="l00225"></a>00225 <span class="comment">* int keyid</span>
<a name="l00226"></a>00226 <span class="comment">* (Returned) Index into the first entry in keyids[] with which the</span>
<a name="l00227"></a>00227 <span class="comment">* keyrecord matches, else -1.</span>
<a name="l00228"></a>00228 <span class="comment">*</span>
<a name="l00229"></a>00229 <span class="comment">* int status</span>
<a name="l00230"></a>00230 <span class="comment">* (Returned) Status flag bit-vector for the header keyrecord employing the</span>
<a name="l00231"></a>00231 <span class="comment">* following bit masks defined as preprocessor macros:</span>
<a name="l00232"></a>00232 <span class="comment">*</span>
<a name="l00233"></a>00233 <span class="comment">* - FITSHDR_KEYWORD: Illegal keyword syntax.</span>
<a name="l00234"></a>00234 <span class="comment">* - FITSHDR_KEYVALUE: Illegal keyvalue syntax.</span>
<a name="l00235"></a>00235 <span class="comment">* - FITSHDR_COMMENT: Illegal keycomment syntax.</span>
<a name="l00236"></a>00236 <span class="comment">* - FITSHDR_KEYREC: Illegal keyrecord, e.g. an END keyrecord with</span>
<a name="l00237"></a>00237 <span class="comment">* trailing text.</span>
<a name="l00238"></a>00238 <span class="comment">* - FITSHDR_TRAILER: Keyrecord following a valid END keyrecord.</span>
<a name="l00239"></a>00239 <span class="comment">*</span>
<a name="l00240"></a>00240 <span class="comment">* The header keyrecord is syntactically correct if no bits are set.</span>
<a name="l00241"></a>00241 <span class="comment">*</span>
<a name="l00242"></a>00242 <span class="comment">* char keyword[12]</span>
<a name="l00243"></a>00243 <span class="comment">* (Returned) Keyword name, null-filled for keywords of less than eight</span>
<a name="l00244"></a>00244 <span class="comment">* characters (trailing blanks replaced by nulls).</span>
<a name="l00245"></a>00245 <span class="comment">*</span>
<a name="l00246"></a>00246 <span class="comment">* Use</span>
<a name="l00247"></a>00247 <span class="comment">*</span>
<a name="l00248"></a>00248 <span class="comment">= sprintf(dst, "%.8s", keyword)</span>
<a name="l00249"></a>00249 <span class="comment">*</span>
<a name="l00250"></a>00250 <span class="comment">* to copy it to a character array with null-termination, or</span>
<a name="l00251"></a>00251 <span class="comment">*</span>
<a name="l00252"></a>00252 <span class="comment">= sprintf(dst, "%8.8s", keyword)</span>
<a name="l00253"></a>00253 <span class="comment">*</span>
<a name="l00254"></a>00254 <span class="comment">* to blank-fill to eight characters followed by null-termination.</span>
<a name="l00255"></a>00255 <span class="comment">*</span>
<a name="l00256"></a>00256 <span class="comment">* int type</span>
<a name="l00257"></a>00257 <span class="comment">* (Returned) Keyvalue data type:</span>
<a name="l00258"></a>00258 <span class="comment">* - 0: No keyvalue.</span>
<a name="l00259"></a>00259 <span class="comment">* - 1: Logical, represented as int.</span>
<a name="l00260"></a>00260 <span class="comment">* - 2: 32-bit signed integer.</span>
<a name="l00261"></a>00261 <span class="comment">* - 3: 64-bit signed integer (see below).</span>
<a name="l00262"></a>00262 <span class="comment">* - 4: Very long integer (see below).</span>
<a name="l00263"></a>00263 <span class="comment">* - 5: Floating point (stored as double).</span>
<a name="l00264"></a>00264 <span class="comment">* - 6: Integer complex (stored as double[2]).</span>
<a name="l00265"></a>00265 <span class="comment">* - 7: Floating point complex (stored as double[2]).</span>
<a name="l00266"></a>00266 <span class="comment">* - 8: String.</span>
<a name="l00267"></a>00267 <span class="comment">* - 8+10*n: Continued string (described below and in fitshdr() note 2).</span>
<a name="l00268"></a>00268 <span class="comment">*</span>
<a name="l00269"></a>00269 <span class="comment">* A negative type indicates that a syntax error was encountered when</span>
<a name="l00270"></a>00270 <span class="comment">* attempting to parse a keyvalue of the particular type.</span>
<a name="l00271"></a>00271 <span class="comment">*</span>
<a name="l00272"></a>00272 <span class="comment">* Comments on particular data types:</span>
<a name="l00273"></a>00273 <span class="comment">* - 64-bit signed integers lie in the range</span>
<a name="l00274"></a>00274 <span class="comment">*</span>
<a name="l00275"></a>00275 <span class="comment">= (-9223372036854775808 <= int64 < -2147483648) ||</span>
<a name="l00276"></a>00276 <span class="comment">= (+2147483647 < int64 <= +9223372036854775807)</span>
<a name="l00277"></a>00277 <span class="comment">*</span>
<a name="l00278"></a>00278 <span class="comment">* A native 64-bit data type may be defined via preprocessor macro</span>
<a name="l00279"></a>00279 <span class="comment">* WCSLIB_INT64 defined in wcsconfig.h, e.g. as 'long long int'; this</span>
<a name="l00280"></a>00280 <span class="comment">* will be typedef'd to 'int64' here. If WCSLIB_INT64 is not set, then</span>
<a name="l00281"></a>00281 <span class="comment">* int64 is typedef'd to int[3] instead and fitskey::keyvalue is to be</span>
<a name="l00282"></a>00282 <span class="comment">* computed as</span>
<a name="l00283"></a>00283 <span class="comment">*</span>
<a name="l00284"></a>00284 <span class="comment">= ((keyvalue.k[2]) * 1000000000 +</span>
<a name="l00285"></a>00285 <span class="comment">= keyvalue.k[1]) * 1000000000 +</span>
<a name="l00286"></a>00286 <span class="comment">= keyvalue.k[0]</span>
<a name="l00287"></a>00287 <span class="comment">*</span>
<a name="l00288"></a>00288 <span class="comment">* and may reported via</span>
<a name="l00289"></a>00289 <span class="comment">*</span>
<a name="l00290"></a>00290 <span class="comment">= if (keyvalue.k[2]) {</span>
<a name="l00291"></a>00291 <span class="comment">= printf("%d%09d%09d", keyvalue.k[2], abs(keyvalue.k[1]),</span>
<a name="l00292"></a>00292 <span class="comment">= abs(keyvalue.k[0]));</span>
<a name="l00293"></a>00293 <span class="comment">= } else {</span>
<a name="l00294"></a>00294 <span class="comment">= printf("%d%09d", keyvalue.k[1], abs(keyvalue.k[0]));</span>
<a name="l00295"></a>00295 <span class="comment">= }</span>
<a name="l00296"></a>00296 <span class="comment">*</span>
<a name="l00297"></a>00297 <span class="comment">* where keyvalue.k[0] and keyvalue.k[1] range from -999999999 to</span>
<a name="l00298"></a>00298 <span class="comment">* +999999999.</span>
<a name="l00299"></a>00299 <span class="comment">*</span>
<a name="l00300"></a>00300 <span class="comment">* - Very long integers, up to 70 decimal digits in length, are encoded</span>
<a name="l00301"></a>00301 <span class="comment">* in keyvalue.l as an array of int[8], each of which stores 9 decimal</span>
<a name="l00302"></a>00302 <span class="comment">* digits. fitskey::keyvalue is to be computed as</span>
<a name="l00303"></a>00303 <span class="comment">*</span>
<a name="l00304"></a>00304 <span class="comment">= (((((((keyvalue.l[7]) * 1000000000 +</span>
<a name="l00305"></a>00305 <span class="comment">= keyvalue.l[6]) * 1000000000 +</span>
<a name="l00306"></a>00306 <span class="comment">= keyvalue.l[5]) * 1000000000 +</span>
<a name="l00307"></a>00307 <span class="comment">= keyvalue.l[4]) * 1000000000 +</span>
<a name="l00308"></a>00308 <span class="comment">= keyvalue.l[3]) * 1000000000 +</span>
<a name="l00309"></a>00309 <span class="comment">= keyvalue.l[2]) * 1000000000 +</span>
<a name="l00310"></a>00310 <span class="comment">= keyvalue.l[1]) * 1000000000 +</span>
<a name="l00311"></a>00311 <span class="comment">= keyvalue.l[0]</span>
<a name="l00312"></a>00312 <span class="comment">*</span>
<a name="l00313"></a>00313 <span class="comment">* - Continued strings are not reconstructed, they remain split over</span>
<a name="l00314"></a>00314 <span class="comment">* successive fitskey structs in the keys[] array returned by</span>
<a name="l00315"></a>00315 <span class="comment">* fitshdr(). fitskey::keyvalue data type, 8 + 10n, indicates the</span>
<a name="l00316"></a>00316 <span class="comment">* segment number, n, in the continuation.</span>
<a name="l00317"></a>00317 <span class="comment">*</span>
<a name="l00318"></a>00318 <span class="comment">* int padding</span>
<a name="l00319"></a>00319 <span class="comment">* (An unused variable inserted for alignment purposes only.)</span>
<a name="l00320"></a>00320 <span class="comment">*</span>
<a name="l00321"></a>00321 <span class="comment">* union keyvalue</span>
<a name="l00322"></a>00322 <span class="comment">* (Returned) A union comprised of</span>
<a name="l00323"></a>00323 <span class="comment">*</span>
<a name="l00324"></a>00324 <span class="comment">* - fitskey::i,</span>
<a name="l00325"></a>00325 <span class="comment">* - fitskey::k,</span>
<a name="l00326"></a>00326 <span class="comment">* - fitskey::l,</span>
<a name="l00327"></a>00327 <span class="comment">* - fitskey::f,</span>
<a name="l00328"></a>00328 <span class="comment">* - fitskey::c,</span>
<a name="l00329"></a>00329 <span class="comment">* - fitskey::s,</span>
<a name="l00330"></a>00330 <span class="comment">*</span>
<a name="l00331"></a>00331 <span class="comment">* used by the fitskey struct to contain the value associated with a</span>
<a name="l00332"></a>00332 <span class="comment">* keyword.</span>
<a name="l00333"></a>00333 <span class="comment">*</span>
<a name="l00334"></a>00334 <span class="comment">* int i</span>
<a name="l00335"></a>00335 <span class="comment">* (Returned) Logical (fitskey::type == 1) and 32-bit signed integer</span>
<a name="l00336"></a>00336 <span class="comment">* (fitskey::type == 2) data types in the fitskey::keyvalue union.</span>
<a name="l00337"></a>00337 <span class="comment">*</span>
<a name="l00338"></a>00338 <span class="comment">* int64 k</span>
<a name="l00339"></a>00339 <span class="comment">* (Returned) 64-bit signed integer (fitskey::type == 3) data type in the</span>
<a name="l00340"></a>00340 <span class="comment">* fitskey::keyvalue union.</span>
<a name="l00341"></a>00341 <span class="comment">*</span>
<a name="l00342"></a>00342 <span class="comment">* int l[8]</span>
<a name="l00343"></a>00343 <span class="comment">* (Returned) Very long integer (fitskey::type == 4) data type in the</span>
<a name="l00344"></a>00344 <span class="comment">* fitskey::keyvalue union.</span>
<a name="l00345"></a>00345 <span class="comment">*</span>
<a name="l00346"></a>00346 <span class="comment">* double f</span>
<a name="l00347"></a>00347 <span class="comment">* (Returned) Floating point (fitskey::type == 5) data type in the</span>
<a name="l00348"></a>00348 <span class="comment">* fitskey::keyvalue union.</span>
<a name="l00349"></a>00349 <span class="comment">*</span>
<a name="l00350"></a>00350 <span class="comment">* double c[2]</span>
<a name="l00351"></a>00351 <span class="comment">* (Returned) Integer and floating point complex (fitskey::type == 6 || 7)</span>
<a name="l00352"></a>00352 <span class="comment">* data types in the fitskey::keyvalue union.</span>
<a name="l00353"></a>00353 <span class="comment">*</span>
<a name="l00354"></a>00354 <span class="comment">* char s[72]</span>
<a name="l00355"></a>00355 <span class="comment">* (Returned) Null-terminated string (fitskey::type == 8) data type in the</span>
<a name="l00356"></a>00356 <span class="comment">* fitskey::keyvalue union.</span>
<a name="l00357"></a>00357 <span class="comment">*</span>
<a name="l00358"></a>00358 <span class="comment">* int ulen</span>
<a name="l00359"></a>00359 <span class="comment">* (Returned) Where a keycomment contains a units string in the standard</span>
<a name="l00360"></a>00360 <span class="comment">* form, e.g. [m/s], the ulen member indicates its length, inclusive of</span>
<a name="l00361"></a>00361 <span class="comment">* square brackets. Otherwise ulen is zero.</span>
<a name="l00362"></a>00362 <span class="comment">*</span>
<a name="l00363"></a>00363 <span class="comment">* char comment[84]</span>
<a name="l00364"></a>00364 <span class="comment">* (Returned) Keycomment, i.e. comment associated with the keyword or, for</span>
<a name="l00365"></a>00365 <span class="comment">* keyrecords rejected because of syntax errors, the compete keyrecord</span>
<a name="l00366"></a>00366 <span class="comment">* itself with null-termination.</span>
<a name="l00367"></a>00367 <span class="comment">*</span>
<a name="l00368"></a>00368 <span class="comment">* Comments are null-terminated with trailing spaces removed. Leading</span>
<a name="l00369"></a>00369 <span class="comment">* spaces are also removed from keycomments (i.e. those immediately</span>
<a name="l00370"></a>00370 <span class="comment">* following the '/' character), but not from COMMENT or HISTORY keyrecords</span>
<a name="l00371"></a>00371 <span class="comment">* or keyrecords without a value indicator ("= " in columns 9-80).</span>
<a name="l00372"></a>00372 <span class="comment">*</span>
<a name="l00373"></a>00373 <span class="comment">*</span>
<a name="l00374"></a>00374 <span class="comment">* Global variable: const char *fitshdr_errmsg[] - Status return messages</span>
<a name="l00375"></a>00375 <span class="comment">* ----------------------------------------------------------------------</span>
<a name="l00376"></a>00376 <span class="comment">* Error messages to match the status value returned from each function.</span>
<a name="l00377"></a>00377 <span class="comment">*</span>
<a name="l00378"></a>00378 <span class="comment">*===========================================================================*/</span>
<a name="l00379"></a>00379
<a name="l00380"></a>00380 <span class="preprocessor">#ifndef WCSLIB_FITSHDR</span>
<a name="l00381"></a>00381 <span class="preprocessor"></span><span class="preprocessor">#define WCSLIB_FITSHDR</span>
<a name="l00382"></a>00382 <span class="preprocessor"></span>
<a name="l00383"></a>00383 <span class="preprocessor">#include "wcsconfig.h"</span>
<a name="l00384"></a>00384
<a name="l00385"></a>00385 <span class="preprocessor">#ifdef __cplusplus</span>
<a name="l00386"></a>00386 <span class="preprocessor"></span><span class="keyword">extern</span> <span class="stringliteral">"C"</span> {
<a name="l00387"></a>00387 <span class="preprocessor">#endif</span>
<a name="l00388"></a>00388 <span class="preprocessor"></span>
<a name="l00389"></a><a class="code" href="fitshdr_8h.html#42bdf2e2f36d1dee9e06732c75a8ff89">00389</a> <span class="preprocessor">#define FITSHDR_KEYWORD 0x01</span>
<a name="l00390"></a><a class="code" href="fitshdr_8h.html#5077485c3de4b7bca55698eb66110a76">00390</a> <span class="preprocessor"></span><span class="preprocessor">#define FITSHDR_KEYVALUE 0x02</span>
<a name="l00391"></a><a class="code" href="fitshdr_8h.html#6400ad537ecfd565fb39a574831edf41">00391</a> <span class="preprocessor"></span><span class="preprocessor">#define FITSHDR_COMMENT 0x04</span>
<a name="l00392"></a><a class="code" href="fitshdr_8h.html#9361fbafbbbba777da623fc3b9e96d2e">00392</a> <span class="preprocessor"></span><span class="preprocessor">#define FITSHDR_KEYREC 0x08</span>
<a name="l00393"></a><a class="code" href="fitshdr_8h.html#705c7c2c9700367e0e8b82d5033e6fa3">00393</a> <span class="preprocessor"></span><span class="preprocessor">#define FITSHDR_CARD 0x08 </span><span class="comment">/* Alias for backwards compatibility. */</span>
<a name="l00394"></a><a class="code" href="fitshdr_8h.html#8393f26f643097bb78326a85b4e2e7a4">00394</a> <span class="preprocessor">#define FITSHDR_TRAILER 0x10</span>
<a name="l00395"></a>00395 <span class="preprocessor"></span>
<a name="l00396"></a>00396
<a name="l00397"></a>00397 <span class="keyword">extern</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="fitshdr_8h.html#d966ed3fefd26c9546ec078171e3940b" title="Status return messages.">fitshdr_errmsg</a>[];
<a name="l00398"></a>00398
<a name="l00399"></a>00399 <span class="preprocessor">#ifdef WCSLIB_INT64</span>
<a name="l00400"></a>00400 <span class="preprocessor"></span> <span class="keyword">typedef</span> WCSLIB_INT64 <a class="code" href="fitshdr_8h.html#88ab82d73e5c2607f0a40af8917fffe1" title="64-bit signed integer data type.">int64</a>;
<a name="l00401"></a>00401 <span class="preprocessor">#else</span>
<a name="l00402"></a><a class="code" href="fitshdr_8h.html#88ab82d73e5c2607f0a40af8917fffe1">00402</a> <span class="preprocessor"></span> <span class="keyword">typedef</span> <span class="keywordtype">int</span> int64[3];
<a name="l00403"></a>00403 <span class="preprocessor">#endif</span>
<a name="l00404"></a>00404 <span class="preprocessor"></span>
<a name="l00405"></a>00405
<a name="l00406"></a>00406 <span class="comment">/* Struct used for indexing the keywords. */</span>
<a name="l00407"></a><a class="code" href="structfitskeyid.html">00407</a> <span class="keyword">struct </span><a class="code" href="structfitskeyid.html" title="Keyword indexing.">fitskeyid</a> {
<a name="l00408"></a><a class="code" href="structfitskeyid.html#9c19a56e7a92c1728bebd92e5370b9c7">00408</a> <span class="keywordtype">char</span> <a class="code" href="structfitskeyid.html#9c19a56e7a92c1728bebd92e5370b9c7">name</a>[12]; <span class="comment">/* Keyword name, null-terminated. */</span>
<a name="l00409"></a><a class="code" href="structfitskeyid.html#b20aa3220d9994d02a1791e35dc91a56">00409</a> <span class="keywordtype">int</span> <a class="code" href="structfitskeyid.html#b20aa3220d9994d02a1791e35dc91a56">count</a>; <span class="comment">/* Number of occurrences of keyword. */</span>
<a name="l00410"></a><a class="code" href="structfitskeyid.html#8c8c5a6be67ef57333e80e71f320b62e">00410</a> <span class="keywordtype">int</span> <a class="code" href="structfitskeyid.html#8c8c5a6be67ef57333e80e71f320b62e">idx</a>[2]; <span class="comment">/* Indices into fitskey array. */</span>
<a name="l00411"></a>00411 };
<a name="l00412"></a>00412
<a name="l00413"></a>00413 <span class="comment">/* Size of the fitskeyid struct in int units, used by the Fortran wrappers. */</span>
<a name="l00414"></a><a class="code" href="fitshdr_8h.html#23868c17c44dc94add97438092d3058c">00414</a> <span class="preprocessor">#define KEYIDLEN (sizeof(struct fitskeyid)/sizeof(int))</span>
<a name="l00415"></a>00415 <span class="preprocessor"></span>
<a name="l00416"></a>00416
<a name="l00417"></a>00417 <span class="comment">/* Struct used for storing FITS keywords. */</span>
<a name="l00418"></a><a class="code" href="structfitskey.html">00418</a> <span class="keyword">struct </span><a class="code" href="structfitskey.html" title="Keyword/value information.">fitskey</a> {
<a name="l00419"></a><a class="code" href="structfitskey.html#43de42050c7e0232c9f7c5a28bfede4b">00419</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#43de42050c7e0232c9f7c5a28bfede4b">keyno</a>; <span class="comment">/* Header keyrecord sequence number (1-rel).*/</span>
<a name="l00420"></a><a class="code" href="structfitskey.html#f5bd77eb6d318c562bfe650f6784eb5f">00420</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#f5bd77eb6d318c562bfe650f6784eb5f">keyid</a>; <span class="comment">/* Index into fitskeyid[]. */</span>
<a name="l00421"></a><a class="code" href="structfitskey.html#935a63ff3aa2c0403ed8eee1a94662e7">00421</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#935a63ff3aa2c0403ed8eee1a94662e7">status</a>; <span class="comment">/* Header keyrecord status bit flags. */</span>
<a name="l00422"></a><a class="code" href="structfitskey.html#48b4ff24100b6ada4fd184d5c3d55eec">00422</a> <span class="keywordtype">char</span> <a class="code" href="structfitskey.html#48b4ff24100b6ada4fd184d5c3d55eec">keyword</a>[12]; <span class="comment">/* Keyword name, null-filled. */</span>
<a name="l00423"></a><a class="code" href="structfitskey.html#dbc83643fe92fd44408a6d62dbaf87b1">00423</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#dbc83643fe92fd44408a6d62dbaf87b1">type</a>; <span class="comment">/* Keyvalue type (see above). */</span>
<a name="l00424"></a><a class="code" href="structfitskey.html#42413fd1f1f3117a4bc4c0599c2c3889">00424</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#42413fd1f1f3117a4bc4c0599c2c3889">padding</a>; <span class="comment">/* (Dummy inserted for alignment purposes.) */</span>
<a name="l00425"></a>00425 <span class="keyword">union </span>{
<a name="l00426"></a><a class="code" href="structfitskey.html#88e62afbb23808ae484b8734bb1685b9">00426</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#88e62afbb23808ae484b8734bb1685b9">i</a>; <span class="comment">/* 32-bit integer and logical values. */</span>
<a name="l00427"></a><a class="code" href="structfitskey.html#f1a8fb88bc5d4ba60f9f12d0885c360e">00427</a> int64 <a class="code" href="structfitskey.html#f1a8fb88bc5d4ba60f9f12d0885c360e">k</a>; <span class="comment">/* 64-bit integer values. */</span>
<a name="l00428"></a><a class="code" href="structfitskey.html#68ab074cc13a9e0be1583ee93aa0db6b">00428</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#68ab074cc13a9e0be1583ee93aa0db6b">l</a>[8]; <span class="comment">/* Very long signed integer values. */</span>
<a name="l00429"></a><a class="code" href="structfitskey.html#e6f81da89b09d92db5258191a1a9354b">00429</a> <span class="keywordtype">double</span> <a class="code" href="structfitskey.html#e6f81da89b09d92db5258191a1a9354b">f</a>; <span class="comment">/* Floating point values. */</span>
<a name="l00430"></a><a class="code" href="structfitskey.html#413484cd565be07b4adc75ed53c4ace7">00430</a> <span class="keywordtype">double</span> <a class="code" href="structfitskey.html#413484cd565be07b4adc75ed53c4ace7">c</a>[2]; <span class="comment">/* Complex values. */</span>
<a name="l00431"></a><a class="code" href="structfitskey.html#aa0b63820fb73086d2f55ea9687d8126">00431</a> <span class="keywordtype">char</span> <a class="code" href="structfitskey.html#aa0b63820fb73086d2f55ea9687d8126">s</a>[72]; <span class="comment">/* String values, null-terminated. */</span>
<a name="l00432"></a>00432 } <a class="code" href="structfitskey.html#a914a7430a2746de8ceb641321842784">keyvalue</a>; <span class="comment">/* Keyvalue. */</span>
<a name="l00433"></a><a class="code" href="structfitskey.html#d50ff3c9166c43e1fe0542b18a216ee1">00433</a> <span class="keywordtype">int</span> <a class="code" href="structfitskey.html#d50ff3c9166c43e1fe0542b18a216ee1">ulen</a>; <span class="comment">/* Length of units string. */</span>
<a name="l00434"></a><a class="code" href="structfitskey.html#4fe936ed7df47a073c049f4fe1528ba2">00434</a> <span class="keywordtype">char</span> <a class="code" href="structfitskey.html#4fe936ed7df47a073c049f4fe1528ba2">comment</a>[84]; <span class="comment">/* Comment (or keyrecord), null-terminated. */</span>
<a name="l00435"></a>00435 };
<a name="l00436"></a>00436
<a name="l00437"></a>00437 <span class="comment">/* Size of the fitskey struct in int units, used by the Fortran wrappers. */</span>
<a name="l00438"></a><a class="code" href="fitshdr_8h.html#e6ae55940dfdf1155736df656d83a7cd">00438</a> <span class="preprocessor">#define KEYLEN (sizeof(struct fitskey)/sizeof(int))</span>
<a name="l00439"></a>00439 <span class="preprocessor"></span>
<a name="l00440"></a>00440
<a name="l00441"></a>00441 <span class="keywordtype">int</span> <a class="code" href="fitshdr_8h.html#ebb4607327b6db35b468517328f67878" title="FITS header parser routine.">fitshdr</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> header[], <span class="keywordtype">int</span> nkeyrec, <span class="keywordtype">int</span> nkeyids,
<a name="l00442"></a>00442 <span class="keyword">struct</span> <a class="code" href="structfitskeyid.html" title="Keyword indexing.">fitskeyid</a> keyids[], <span class="keywordtype">int</span> *nreject, <span class="keyword">struct</span> <a class="code" href="structfitskey.html" title="Keyword/value information.">fitskey</a> **keys);
<a name="l00443"></a>00443
<a name="l00444"></a>00444
<a name="l00445"></a>00445 <span class="preprocessor">#ifdef __cplusplus</span>
<a name="l00446"></a>00446 <span class="preprocessor"></span>}
<a name="l00447"></a>00447 <span class="preprocessor">#endif</span>
<a name="l00448"></a>00448 <span class="preprocessor"></span>
<a name="l00449"></a>00449 <span class="preprocessor">#endif </span><span class="comment">/* WCSLIB_FITSHDR */</span>
</pre></div></div>
<hr size="1"><address style="text-align: right;"><small>Generated on Tue Oct 4 19:02:30 2011 for WCSLIB 4.8.2 by
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.5.6 </small></address>
</body>
</html>
|
