Changeset 18794

Timestamp:

Jul 30, 2008, 2:35:42 PM (18 years ago)

Author:

Paul Price

Message:

I don't think there really is supposed to be an exposure-level fake script.

Location:

trunk

Files:

• ippScripts/Build.PL (modified) (1 diff)
• ippScripts/scripts/fake_exp.pl (deleted)
• ippTasks/fake.pro (modified) (4 diffs)

trunk/ippScripts/Build.PL

@@ -48 +48 @@
         scripts/camera_exp.pl
         scripts/fake_imfile.pl
-        scripts/fake_exp.pl
         scripts/warp_overlap.pl
         scripts/warp_skycell.pl

trunk/ippTasks/fake.pro

@@ -7 +7 @@
 
 book init fakePendingImfile
-book init fakePendingExp
 
 macro fake.status
   book listbook fakePendingImfile
-  book listbook fakePendingExp
 end
 
 macro fake.reset
   book init fakePendingImfile
-  book init fakePendingExp
 end
 
@@ -24 +21 @@
   end
   task fake.imfile.run
-    active true
-  end
-  task fake.exp.load
-    active true
-  end
-  task fake.exp.run
     active true
   end
@@ -41 +32 @@
     active false
   end
-  task fake.exp.load
-    active false
-  end
-  task fake.exp.run
-    active false
-  end
 end
 
 # this variable will cycle through the known database names
 $fakeImfile_DB = 0
-$fakeExp_DB = 0
 
 # select images ready for fake analysis
@@ -171 +155 @@
 
 
-
-
-# select exposures ready for fake analysis
-# new entries are added to fakePendingExp
-# skip already-present entries
-task           fake.exp.load
-  host         local
-
-  periods      -poll $LOADPOLL
-  periods      -exec $LOADEXEC
-  periods      -timeout 30
-  npending     1
-
-  stdout NULL
-  stderr $LOGDIR/fake.exp.log
-
-  task.exec
-    if ($DB:n == 0)
-      option DEFAULT
-      command faketool -pendingexp -limit 20
-    else
-      # save the DB name for the exit tasks
-      option $DB:$fakeExp_DB
-      command faketool -pendingexp -limit 20 -dbname $DB:$fakeExp_DB
-      $fakeExp_DB ++
-      if ($fakeExp_DB >= $DB:n) set fakeExp_DB = 0
-    end
-  end
-
-  # success
-  task.exit    0
-    # convert 'stdout' to book format
-    ipptool2book stdout fakePendingExp -key fake_id -uniq -setword dbname $options:0 -setword pantaskState INIT
-    if ($VERBOSE > 2)
-      book listbook fakePendingExp
-    end
-
-    # delete existing entries in the appropriate pantaskStates
-    process_cleanup fakePendingExp
-  end
-
-  # locked list
-  task.exit    default
-    showcommand failure
-  end
-
-  # operation times out?
-  task.exit    timeout
-    showcommand timeout
-  end
-end
-
-# run the fake_exp.pl script on pending images
-task           fake.exp.run
-  periods      -poll $RUNPOLL
-  periods      -exec $RUNEXEC
-  periods      -timeout 60
-
-  task.exec
-    book npages fakePendingExp -var N
-    if ($N == 0) break
-    if ($NETWORK == 0) break
-    
-    # look for new exposures in fakePendingExp (pantaskState == INIT)
-    book getpage fakePendingExp 0 -var pageName -key pantaskState INIT
-    if ("$pageName" == "NULL") break
-
-    book setword fakePendingExp $pageName pantaskState RUN
-    book getword fakePendingExp $pageName camera -var CAMERA
-    book getword fakePendingExp $pageName exp_id -var EXP_ID
-    book getword fakePendingExp $pageName exp_tag -var EXP_TAG
-    book getword fakePendingExp $pageName fake_id -var FAKE_ID
-    book getword fakePendingExp $pageName workdir -var WORKDIR_TEMPLATE
-    book getword fakePendingExp $pageName dbname -var DBNAME
-    book getword fakePendingExp $pageName reduction -var REDUCTION
-
-    # specify choice of local or remote host based on camera and fake
-    set.host.for.camera $CAMERA FPA
-
-    # set the WORKDIR variable
-    set.workdir.by.camera $CAMERA FPA $WORKDIR_TEMPLATE $default_host WORKDIR
-
-    ## generate outroot specific to this exposure (& chip)
-    sprintf outroot "%s/%s/%s.fk.%s" $WORKDIR $EXP_TAG $EXP_TAG $FAKE_ID
-
-    stderr $LOGDIR/fake.exp.log
-    stderr $LOGDIR/fake.exp.log
-
-    $run = fake_exp.pl --exp_id $EXP_ID --fake_id $FAKE_ID --camera $CAMERA --outroot $outroot
-    if ("$REDUCTION" != "NULL")
-      $run = $run --reduction $REDUCTION
-    end
-    add_standard_args run
-
-    # save the pageName for future reference below
-    options $pageName
-
-    # create the command line
-    if ($VERBOSE > 1)
-      echo command $run
-    end
-    command $run
-  end
-
-  # default exit status
-  task.exit    default
-    process_exit fakePendingExp $options:0 $JOB_STATUS
-  end
-
-  # operation timed out?
-  task.exit    timeout
-    showcommand timeout
-    book setword fakePendingExp $options:0 pantaskState TIMEOUT
-  end
-end