Changeset 38367 for branches/eam_branches/ohana.20150429/src/opihi/cmd.data/read_vectors.c

Timestamp:

Jun 4, 2015, 5:44:39 PM (11 years ago)

Author:

eugene

Message:

need to provide non-swapping options to handle compression

File:

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

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

@@ -522 +522 @@
 
     dump_cmp_table (&table, "rd cmp");
+
+    int Nfields;
+    if (!gfits_scan (&header, "TFIELDS", "%d", 1, &Nfields)) ESCAPE ("cannot find TFIELDS in header");
+    for (i = 0; i < Nfields; i++) {
+      gfits_byteswap_varlength_column (&table, i+1);
+    }
     if (!gfits_uncompress_table (&table, &rawtable)) ESCAPE ("failed to uncompress table");
     dump_raw_table (&rawtable, "rd raw");
@@ -541 +547 @@
     if (Binary) {
       if (!gfits_get_bintable_column_type (outheader, argv[i], type, &Nval)) ESCAPE ("requested field not found");
-      if (!gfits_get_bintable_column (outheader, outtable, argv[i], &data)) ESCAPE ("error reading data from specified field");
+      if (!gfits_get_bintable_column_raw (outheader, outtable, argv[i], &data, IsCompressed)) ESCAPE ("error reading data from specified field");
     } else {
       if (!gfits_get_table_column_type (outheader, argv[i], type)) ESCAPE ("requested field not found");