Changeset 4680 for trunk/Ohana/src/delstar/src/image-db.c

Timestamp:

Jul 30, 2005, 9:14:00 AM (21 years ago)

Author:

eugene

Message:

adjust to use match DVO catalog access methods

File:

• trunk/Ohana/src/delstar/src/image-db.c (modified) (3 diffs)

trunk/Ohana/src/delstar/src/image-db.c

@@ -7 +7 @@
 static int dbstate = LCK_UNLOCK;
 
+static Header header;
+static Image *image = NULL;
+static int   Nimage;
+
 FILE *GetDB (int *state) {
   *state = dbstate;
   return (f);
+}
+
+Image *GetImages (int *nimage) {
+  *nimage = Nimage;
+  return (image);
+}
+
+int SetImages (Image *new, int Nnew) {
+  Nimage = Nnew;
+  image  =  new;
+  fits_modify (&header, "NIMAGES", "%d", 1, Nimage);
+  return (TRUE);
 }
 
@@ -23 +39 @@
   va_start (argp, format);
   vfprintf (stderr, formatplus, argp);
-  free (formatplus);
   va_end (argp);
 
@@ -37 +52 @@
   f = fsetlockfile (ImageCat, 3600.0, LOCK, &dbstate);
   if (f == NULL) {
-    fprintf (stderr, "ERROR: can't lock image catalog\n");
-    exit (1);
+    Shutdown ("ERROR: can't lock image catalog");
+  }
+  if (dbstate == LCK_EMPTY) {
+    Shutdown ("ERROR: database is empty");
   }
   fseek (f, 0, SEEK_SET);
 }
 
-void unlock_image_db (Image *image) {
+int load_image_db () {
+
+  int nimage;
+
+  /* read header */
+  fseek (f, 0, SEEK_SET);
+  if (!fits_fread_header (f, &header)) {
+    Shutdown ("can't read image catalog %s", ImageCat);
+  }
+  fseek (f, header.size, SEEK_SET); 
+
+  Nimage = 0;
+  fits_scan (&header, "NIMAGES", "%d", 1, &Nimage);
+  ALLOCATE (image, Image, Nimage);
+
+  nimage = Fread (image, sizeof(Image), Nimage, f, "image");
+  if (nimage != Nimage) {
+    Shutdown ("error reading images from db file");
+  }
+  
+  return (TRUE);
+}
+
+int save_image_db () {
+
+  int status;
+  char line[1024];
+  mode_t mode;
+
+  /* use cp to make backup copy */
+  sprintf (line, "cp %s %s~", ImageCat, ImageCat);
+  status = system (line);
+  if (status) {
+    Shutdown ("ERROR: unable to create %s~, exiting", ImageCat);
+  }
+  mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH;
+  sprintf (line, "%s~", ImageCat);
+  chmod (line, mode);
+
+  /* update header */
+  fits_modify (&header, "NIMAGES", "%d", 1, Nimage);
+
+  /* write out data to already opened file */
+  fseek (f, 0, SEEK_SET);
+  Fwrite (header.buffer, 1, header.size, f, "char");
+  Fwrite (image, sizeof(Image), Nimage, f, "image");
+
+  return (TRUE);
+}
+
+void unlock_image_db () {
 
   mode_t mode;
-
-  /* protect wimage from interrupt signals */
-  if (MODE == M_IMAGE) {
-    SetProtect (TRUE);
-    wimage (image); 
-    SetProtect (FALSE);
-  }
 
   fclearlockfile (ImageCat, f, LOCK, &dbstate);