Changeset 16336 for trunk/ippScripts/scripts/ipp_serial_camera.pl

Timestamp:

Feb 6, 2008, 9:52:57 AM (18 years ago)

Author:

Paul Price

Message:

Adding outroot instead of workdir for chip and camera; adding verbose flags.

File:

• trunk/ippScripts/scripts/ipp_serial_camera.pl (modified) (3 diffs)

trunk/ippScripts/scripts/ipp_serial_camera.pl

@@ -13 +13 @@
 
 my ($dbname,                    # Database name to use
-    $workdir,                   # Working directory
+    $workdir_default,           # Default working directory
+    $verbose,                   # Verbose operations?
     $no_op,                     # No operations?
     $no_update,                 # No updating?
     );
 GetOptions(
-           'dbname|d=s' => \$dbname,
-           'workdir|w=s' => \$workdir,
+           'dbname=s' => \$dbname,
+           'workdir=s' => \$workdir_default,
+           'verbose' => \$verbose,
            'no-op' => \$no_op,
            'no-update' => \$no_update,
@@ -28 +30 @@
           -exitval => 3,
           ) unless defined $dbname;
+
+$workdir_default = `pwd` unless defined $workdir_default;
 
 my $mdcParser = PS::IPP::Metadata::Config->new; # Metadata config parser
@@ -52 +56 @@
     my $exp_tag = $item->{exp_tag};
     my $camera = $item->{camera};
+    my $workdir = $item->{workdir};
     
+    $workdir = $workdir_default unless (defined $workdir or $workdir ne "NULL");
+    my $outroot = $workdir . '/' . ${exp_tag} . '/' . ${exp_tag} . '.cm.' . ${cam_id};
+
     my $command = "$camera_exp --cam_id $cam_id --exp_tag $exp_tag --camera $camera --dbname $dbname";
+    $command .= " --verbose" if defined $verbose;
     $command .= " --no-op" if defined $no_op;
     $command .= " --no-update" if defined $no_update;