Changeset 29951

Timestamp:

Dec 6, 2010, 12:26:58 PM (15 years ago)

Author:

rhenders

Message:

Added multiple constructors for clarity

File:

• trunk/tools/czartool/Plotter.pm (modified) (2 diffs)

trunk/tools/czartool/Plotter.pm

@@ -10 +10 @@
 my @allStages = ("burntool", "chip", "cam", "fake", "warp", "stack", "diff", "magic", "magicDS", "dist");
 
-
-###########################################################################
-#
-# Constructor
+###########################################################################
+#
+# Main constructor with all arguments
 #
 ###########################################################################
@@ -30 +29 @@
     return $self;
 }
+
+###########################################################################
+#
+# Constructor sending all plots to file
+#
+###########################################################################
+sub new_file {
+    my $class = shift;
+    my $self = {
+        _gpc1Db => shift,
+        _czarDb => shift,
+        _outputPath => shift,
+        _save_temps => shift,
+                                                    };
+
+    $self->{_dateFormat} = "%Y%m%d-%H%M%S";
+    $self->{_outputFormat} = "png font \"/usr/share/fonts/corefonts/arial.ttf\" 8"; # TODO path needs to be in config
+
+        bless $self, $class;
+    return $self;
+}
+
+###########################################################################
+#
+# Constructor sending all plots to an X window
+#
+###########################################################################
+sub new_display {
+    my $class = shift;
+    my $self = {
+        _gpc1Db => shift,
+        _czarDb => shift,
+        _save_temps => shift,
+    };
+
+    $self->{_dateFormat} = "%Y%m%d-%H%M%S";
+    $self->{_outputFormat} = "X11";
+    $self->{_outputPath} = undef;
+
+    bless $self, $class;
+    return $self;
+}
+
+
 
 ###########################################################################