Changeset 39360 for trunk/Ohana/src/opihi/cmd.data

Timestamp:

Feb 18, 2016, 5:36:58 PM (10 years ago)

Author:

eugene

Message:

add support for ntile option in fits output compression

Location:

trunk/Ohana/src/opihi/cmd.data

Files:

• read_vectors.c (modified) (2 diffs)
• write_vectors.c (modified) (2 diffs)

trunk/Ohana/src/opihi/cmd.data/read_vectors.c

@@ -2 +2 @@
 int dump_raw_table (FTable *table, char *message);
 int dump_cmp_table (FTable *table, char *message);
+void gfits_uncompress_timing ();
 
 FILE *f = (FILE *) NULL;
@@ -594 +595 @@
     }
     if (!gfits_uncompress_table (&table, &rawtable)) ESCAPE ("failed to uncompress table\n");
+    gfits_uncompress_timing ();
+
     dump_raw_table (&rawtable, "rd raw");
 

trunk/Ohana/src/opihi/cmd.data/write_vectors.c

@@ -74 +74 @@
       fprintf (stderr, "NOTE: write_vectors -compress has no effect on non-FITS\n");
     }
+  }
+
+  int Ntile = 0;
+  if ((N = get_argument (argc, argv, "-compress-Ntile"))) {
+    remove_argument (N, &argc, argv);
+    Ntile = atoi(argv[N]);
+    remove_argument (N, &argc, argv);
   }
 
@@ -117 +124 @@
 
   if (FITS) {
-    int status = WriteVectorTableFITS (argv[1], FITS, vec, Nvec, append, compress, format);
+    int status = WriteVectorTableFITS (argv[1], FITS, vec, Nvec, append, compress, format, Ntile);
     free (vec);
     return status;