Changeset 38338 for branches/eam_branches/ohana.20150429/src/opihi/cmd.data/rd.c

Timestamp:

May 30, 2015, 1:48:51 PM (11 years ago)

Author:

eugene

Message:

testing rd wd for compress

File:

• branches/eam_branches/ohana.20150429/src/opihi/cmd.data/rd.c (modified) (2 diffs)

branches/eam_branches/ohana.20150429/src/opihi/cmd.data/rd.c

@@ -192 +192 @@
     ftable.header[0].buffer = NULL;
     gfits_copy_header (&buf[0].header, ftable.header);
+
     if (!gfits_fread_ftable_data (f, &ftable, FALSE)) { fprintf (stderr, "problem reading compressed image table data\n"); fclose (f); return FALSE; }
+    fprintf (stderr, "rd 1: ");
+    for (i = 0; i < 32; i++) {
+      fprintf (stderr, "0x%0hhx ", ftable.buffer[i]);
+    }
+    fprintf (stderr, "\n");
+  
     if (!gfits_byteswap_varlength_column (&ftable, 1)) { fprintf (stderr, "problem doing byteswap on compressed image metadata column\n"); fclose (f); gfits_free_table (&ftable); return FALSE; }
+    fprintf (stderr, "rd 2: ");
+    for (i = 0; i < 32; i++) {
+      fprintf (stderr, "0x%0hhx ", ftable.buffer[i]);
+    }
+    fprintf (stderr, "\n");
+
     if (!gfits_uncompress_image (&buf[0].header, &buf[0].matrix, &ftable)) { fprintf (stderr, "problem uncompressing the image data\n"); fclose (f); gfits_free_table (&ftable); return FALSE; }
 
@@ -199 +212 @@
     gfits_extended_to_primary (&buf[0].header, TRUE, "Standard FITS");
     gfits_free_table (&ftable);
+
+    status = TRUE;
     // XXX this currently does not work for a cube (we get a cube back, not a specific plane)
   } else {