Added auto-location of config file to scripts tool-scripts

[hermes] / guc-clients / assignphone

diff --git a/guc-clients/assignphone b/guc-clients/assignphone
index 91b10a9d32184f25b1736691e4664e0fd8be1235..4b06f66eb6f56678e798d87c598d1825c0961d65 100755 (executable)
--- a/guc-clients/assignphone
+++ b/guc-clients/assignphone
@@ -13,7 +13,7 @@ my $api_key;
 
 my $help;
 my $username;
-my $configfile;
+my $configfile = undef;
 my $dryrun = 0;
 my ($g_ua, $session, $api_key, $auth_key, $data, $domain);
 my ($user, $sipuser, $mac);
@@ -23,6 +23,14 @@ my $config = AppConfig->new({ CREATE => 1 });
 $config->define("api_url=s");
 $config->define("api_keyfile=s");
 
+foreach ( 
+       "/usr/local/etc/hermes/hermes_config",
+       "/usr/local/etc/hermes/config",
+       "/etc/hermes/config",
+       $ENV{"HOME"} . "/.hermes/config",
+       $ENV{"HOME"} . "/.hermes_config",
+) { $configfile = $_ if ( -f $_ ); }
+
 GetOptions(
        "help"          => \$help,
        "macaddress=s"  => \$mac,