Changeset 38440 for branches/eam_branches/ohana.20150429/src/opihi/cmd.data

Timestamp:

Jun 12, 2015, 5:22:34 PM (11 years ago)

Author:

eugene

Message:

merge updates from trunk

Location:

branches/eam_branches/ohana.20150429

Files:

• . (modified) (1 prop)
• src/opihi/cmd.data (modified) (1 prop)
• src/opihi/cmd.data/Makefile (modified) (1 diff)
• src/opihi/cmd.data/init.c (modified) (2 diffs)
• src/opihi/cmd.data/mslice.c (copied) (copied from trunk/Ohana/src/opihi/cmd.data/mslice.c )
• src/opihi/cmd.data/rd.c (modified) (3 diffs)

branches/eam_branches/ohana.20150429/src/opihi/cmd.data/Makefile

@@ -91 +91 @@
 $(SRC)/mget.$(ARCH).o           \
 $(SRC)/mget3d.$(ARCH).o         \
+$(SRC)/mslice.$(ARCH).o         \
 $(SRC)/minterpolate.$(ARCH).o   \
 $(SRC)/medimage.$(ARCH).o       \

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

@@ -82 +82 @@
 int mget             PROTO((int, char **));
 int mget3d           PROTO((int, char **));
+int mslice           PROTO((int, char **));
 int minterp          PROTO((int, char **));
 int medimage_command PROTO((int, char **));
@@ -248 +249 @@
   {1, "mget",         mget,             "extract a vector from an image"},
   {1, "mget3d",       mget3d,           "extract a vector from a 3D image"},
+  {1, "mslice",       mslice,           "extract an image plane from a 3D image"},
   {1, "imget",        mget,             "extract a vector from an image"},
   {1, "minterp",      minterp,          "interpolate image pixels"},

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

@@ -19 +19 @@
     remove_argument (N, &argc, argv);
     JustHead = TRUE;
+  }
+
+  int SwapRaw = FALSE;
+  if ((N = get_argument (argc, argv, "-swap-raw"))) {
+    remove_argument (N, &argc, argv);
+    SwapRaw = TRUE;
   }
 
@@ -176 +182 @@
   if (plane >= 0) {
     // we are requesting a specific plane (-1 : all data)
-    int tooFar = Nz ? (plane >= Nz) : (plane > Nz);
+    int tooFar = (Nz > 0) ? (plane >= Nz) : (plane > 0);
     if (tooFar) {
       gprint (GP_ERR, "-plane is too large: %d total planes\n", Nz);
@@ -249 +255 @@
   gfits_scan (&buf[0].header, "BLANK", "%d", 1, &blank);
 
+  if (SwapRaw) {
+    gfits_swap_raw (&buf[0].matrix);
+  }
+
   /** now - convert the matrix values to floats for internal use **/
   gfits_convert_format (&buf[0].header, &buf[0].matrix, -32, 1.0, 0.0, blank, gfits_get_unsign_mode());