Changeset 29060 for branches/sc_branches/trunkTest/Ohana/src/relastro/src/load_images.c

Timestamp:

Aug 26, 2010, 9:18:39 AM (16 years ago)

Author:

Serge CHASTEL

Message:

Merging trunk in branch

Location:

branches/sc_branches/trunkTest

Files:

• . (modified) (1 prop)
• Ohana (modified) (1 prop)
• Ohana/src/relastro/src/load_images.c (modified) (2 diffs)

branches/sc_branches/trunkTest/Ohana/src/relastro/src/load_images.c

@@ -33 +33 @@
   // convert database table to internal structure
   image = gfits_table_get_Image (&db[0].ftable, &Nimage, &db[0].swapped);
+  if (!image) {
+      fprintf (stderr, "ERROR: failed to read images\n");
+      exit (2);
+  }
+
   MARKTIME("  convert image table: %f sec\n", dtime);
 
@@ -52 +57 @@
   return (skylist);
 }
+
+int reload_images (FITS_DB *db) {
+
+  Image     *image;
+  off_t     Nimage, Nx, i;
+  VTable    *vtable;
+
+  image = getimages (&Nimage);
+
+  vtable = &db[0].vtable;
+
+  gfits_scan (vtable[0].header, "NAXIS1", OFF_T_FMT, 1,  &Nx);
+  for (i = 0; i < Nimage; i++) {
+    memcpy (vtable[0].buffer[i], &image[i], Nx);
+  }
+  return (TRUE);
+}