Changeset 35162 for trunk/Ohana/src/libfits

Timestamp:

Feb 13, 2013, 11:06:10 AM (13 years ago)

Author:

eugene

Message:

FtableToImage was failing to allocate enough memory for the new table to fill the FITS block

Location:

trunk/Ohana/src/libfits

Files:

• include/gfitsio.h (modified) (1 diff)
• matrix/F_matrix.c (modified) (1 diff)

trunk/Ohana/src/libfits/include/gfitsio.h

@@ -123 +123 @@
 off_t   gfits_data_size                PROTO((Header *header));
 off_t   gfits_data_min_size            PROTO((Header *header));
+off_t   gfits_data_pad_size            PROTO((off_t rawsize));
 int     gfits_extended_to_primary      PROTO((Header *header, int simple, char *comment));
 int     gfits_primary_to_extended      PROTO((Header *header, char *exttype, char *comment));

trunk/Ohana/src/libfits/matrix/F_matrix.c

@@ -43 +43 @@
   return (size);
 }
+
+off_t gfits_data_pad_size (off_t rawsize) {
+  
+  off_t Nrec, size;
+
+  /* round up to next complete block */
+  if (rawsize % FT_RECORD_SIZE) {
+    Nrec = 1 + (int) (rawsize / FT_RECORD_SIZE);
+    size = FT_RECORD_SIZE * Nrec;
+  }
+
+  return (size);
+}