Changeset 9437 for trunk/psModules/src/camera/pmFPAfileIO.c

Timestamp:

Oct 9, 2006, 3:04:45 PM (20 years ago)

Author:

magnier

Message:

fleshing out support for detselect

File:

• trunk/psModules/src/camera/pmFPAfileIO.c (modified) (7 diffs)

trunk/psModules/src/camera/pmFPAfileIO.c

@@ -36 +36 @@
 
     bool status;
-    char *extra;
     char *mode = NULL;
     char *readMode = "r";
@@ -76 +75 @@
     // indirect filenames
     if (!strcasecmp (file->filename, "@FILES")) {
+        char *extra = pmFPAfileNameFromRule (file->filextra, file, view);
+        if (extra == NULL) {
+            psError(PS_ERR_IO, false, "error converting extrule to name %s\n", file->extrule);
+            return false;
+        }
+
         psFree (file->filename);
-        extra = pmFPAfileNameFromRule (file->filextra, file, view);
         file->filename = psMetadataLookupStr (&status, file->names, extra);
-        psFree (extra);
+
         if (file->filename == NULL) {
             psError(PS_ERR_IO, true, "filename lookup error (@FILES) for %s : %s\n", file->filextra, extra);
+            psFree (extra);
             return false;
         }
         // psMetadataLookupStr just returns a view, file->filename must be protected
         psMemIncrRefCounter (file->filename);
-    }
+        psFree (extra);
+    }
+
+    // get name from detrend database
+    // extrule expands to yield the class_id
+    // filextra contains the desired -det_id detID -iteration iter string
     if (!strcasecmp (file->filename, "@DETDB")) {
+        char *extra = pmFPAfileNameFromRule (file->extrule, file, view);
+        if (extra == NULL) {
+            psError(PS_ERR_IO, false, "error converting extrule to name %s\n", file->extrule);
+            return false;
+        }
+        psTrace ("pmFPAfile", 6, "looking for detrend (%s, %s)\n", file->filextra, extra);
+
         psFree (file->filename);
-        extra = pmFPAfileNameFromRule (file->extrule, file, view);
-        psTrace ("pmFPAfile", 6, "looking for detrend (%s, %s)\n", file->filextra, extra);
+
         file->filename = pmDetrendFile (file->filextra, extra);
+        if (file->filename == NULL) {
+            psError(PS_ERR_IO, false, "failed to find a valid detrend image for detID %s : classID %s\n", file->filextra, extra);
+            psFree (extra);
+            return false;
+        }
+
+        // XXXX this is very ad-hoc
+        // XXXX prepend the value config[WORKDIR] to the filename...
+        char *workdir = psMetadataLookupStr (NULL, config->site, "WORKDIR");
+        if (workdir) {
+            psStringPrepend (&file->filename, "%s/", workdir);
+        }
+
         psTrace ("pmFPAfile", 6, "got detrend file %s\n", file->filename);
         psFree (extra);
-        if (file->filename == NULL) {
-            psError(PS_ERR_IO, true, "filename lookup error (@DETBD) for %s : %s\n", file->filextra, extra);
-            return false;
-        }
     }
     // if () "neb://" -> get from neb...
@@ -571 +596 @@
     PS_ASSERT_PTR_NON_NULL(view, false);
 
-    bool status = true;
     psMetadata *files = config->files;
 
-    // attempt to perform all create, read, write
+    // attempt to perform all create, read, write, close operations
     psMetadataItem *item = NULL;
     psMetadataIterator *iter = psMetadataIteratorAlloc (files, PS_LIST_HEAD, NULL);
@@ -584 +608 @@
             if (!pmFPAfileRead (file, view, config)) {
                 psError(PS_ERR_IO, false, "failed READ in FPA_BEFORE block for %s", file->name);
-                status = false;
+                goto failure;
             }
             if (!pmFPAfileCreate(file, view)) {
                 psError(PS_ERR_IO, false, "failed CREATE in FPA_BEFORE block for %s", file->name);
-                status = false;
+                goto failure;
             }
             break;
@@ -594 +618 @@
             if (!pmFPAfileWrite (file, view, config)) {
                 psError(PS_ERR_IO, false, "failed WRITE in FPA_AFTER block for %s", file->name);
-                status = false;
+                goto failure;
             }
             if (!pmFPAfileClose(file, view)) {
                 psError(PS_ERR_IO, false, "failed CLOSE in FPA_AFTER block for %s", file->name);
-                status = false;
+                goto failure;
             }
             break;
@@ -617 +641 @@
             if (!pmFPAfileFreeData(file, view)) {
                 psError(PS_ERR_IO, false, "failed FREE in FPA_AFTER block for %s", file->name);
-                status = false;
+                goto failure;
             }
             break;
@@ -625 +649 @@
     }
     psFree (iter);
-    return status;
-}
-
+    return true;
+
+failure:
+    psFree (iter);
+    return false;
+}
+