Changeset 30316

Timestamp:

Jan 20, 2011, 10:26:35 AM (15 years ago)

Author:

bills

Message:

add subroutines to convert a path to a destreak path (SR_) or recovery path (REC_)

File:

• trunk/PS-IPP-Config/lib/PS/IPP/Config.pm (modified) (1 diff)

trunk/PS-IPP-Config/lib/PS/IPP/Config.pm

@@ -1048 +1048 @@
 }
 
+sub magic_filename
+{
+    my $file = shift;
+    my $prefix = shift;
+    my $dirname = dirname($file);
+    my $base = basename($file);
+
+    return "$dirname/$prefix$base";
+}
+
+sub destreaked_filename
+{
+    my $self  = shift;
+    my $file  = shift;
+
+    return magic_filename($file, "SR_");
+}
+sub recovery_filename
+{
+    my $self  = shift;
+    my $file  = shift;
+
+    return magic_filename($file, "REC_");
+}
+
 # Return an EXTNAME From the EXTNAME.RULE table in the camera configuration
 sub extname_rule