Changeset 7 for trunk/klask

Timestamp:

Jan 14, 2008, 5:22:36 PM (16 years ago)

Author:

g7moreau

Message:

• Add SWITCH_DB global parameter

File:

• trunk/klask (modified) (5 diffs)

trunk/klask

@@ -14 +14 @@
 
 our $KLASK_DB  = '/var/cache/klask/klaskdb';
+our $KLASK_SW  = '/var/cache/klask/switchdb';
 our $KLASK_CFG = '/etc/klask.conf';
 
@@ -916 +917 @@
       };
       
-   YAML::DumpFile("/var/cache/klask/switchdb", $switch_connection);
+   YAML::DumpFile("$KLASK_SW", $switch_connection);
    }
 
@@ -941 +942 @@
 sub cmd_exportsw_txt {
 
-   my $switch_connection = YAML::LoadFile("/var/cache/klask/switchdb");
+   my $switch_connection = YAML::LoadFile("$KLASK_SW");
 
    my %db_switch_output_port       = %{$switch_connection->{output_port}};
@@ -976 +977 @@
 sub cmd_exportsw_dot {
 
-   my $switch_connection = YAML::LoadFile("/var/cache/klask/switchdb");
+   my $switch_connection = YAML::LoadFile("$KLASK_SW");
    
    my %db_switch_output_port       = %{$switch_connection->{output_port}};
@@ -1186 +1187 @@
  /etc/klask.conf
  /var/cache/klask/klaskdb
-
+ /var/cache/klask/switchdb
 
 =head1 SEE ALSO