[sr-dev] git:ser_modules: - socket support

[Andrei Pelinescu-Onciul]

Module: sip-router
Branch: ser_modules
Commit: 36e77b35c20518c84f169a4092ca34c4908e81da
URL:    http://git.sip-router.org/cgi-bin/gitweb.cgi/sip-router/?a=commit;h=36e77b35c20518c84f169a4092ca34c4908e81da

Author: Tomas Mandys <tomas.mandys at iptel.org>
Committer: Tomas Mandys <tomas.mandys at iptel.org>
Date:   Wed Jul 15 23:02:15 2009 +0000

- socket support

---

 .../iptrtpproxy/examples/clean_rtpproxy_attrs      |   18 ++++++++++++++++--
 1 files changed, 16 insertions(+), 2 deletions(-)

diff --git a/modules_s/iptrtpproxy/examples/clean_rtpproxy_attrs b/modules_s/iptrtpproxy/examples/clean_rtpproxy_attrs
index e034d5f..bd755a5 100755
--- a/modules_s/iptrtpproxy/examples/clean_rtpproxy_attrs
+++ b/modules_s/iptrtpproxy/examples/clean_rtpproxy_attrs
@@ -23,6 +23,8 @@ my $defmysqluser = 'ser';
 my $mysqluser = $defmysqluser;
 my $defmysqlpassword = 'heslo';
 my $mysqlpassword = $defmysqlpassword;
+my $defmysqlsock = "";
+my $mysqlsock = $defmysqlsock;
 
 use Config::IniFiles;
 
@@ -81,9 +83,10 @@ $scriptName =~ s!^.*/!!;
 
 sub printUsage {
 	print "$scriptName, Version: $version\n";
-	print "usage: $scriptName [-f <iptrtpproxy_config>] [-v] [-h] [-H <db_host>] [-D <db_name>] [-u <db_user>] [-p <db_password>]\n";
+	print "usage: $scriptName [-f <iptrtpproxy_config>] [-v] [-h] [-H <db_host>] [-S <db_sock>] [-D <db_name>] [-u <db_user>] [-p <db_password>]\n";
 	print "  iptrtpproxy_config .. iptrtpproxy_helper config, default: $defConfigFile\n";
 	print "  db_host .. database MYSQL  host, default: $defmysqlhost\n";
+	print "  db_sock .. MYSQL socket, default: $defmysqlsock\n";
 	print "  db_name .. database name, default: $defmysqldb\n";
 	print "  db_user .. database user, default: $defmysqluser\n";
 	$_ = substr $defmysqlpassword, 1, length($defmysqlpassword)-2;
@@ -138,6 +141,14 @@ while ($#ARGV >= 0) {
 		} else {
 			$mysqlhost = shift(@ARGV);
 		}
+	} elsif ($arg eq '-S') {
+		if ($#ARGV < 0) {
+			print STDERR "ERROR: socket required\n";
+			&printUsage();
+			exit(1);
+		} else {
+			$mysqlsock = shift(@ARGV);
+		}
 	} elsif ($arg eq '-v') {
 		$verbose++;
 	} elsif ($arg eq '-h') {
@@ -153,7 +164,10 @@ while ($#ARGV >= 0) {
 dbg "Verbose: $verbose";
 
 dbg "Connecting: mysql://$mysqluser\@$mysqlhost/$mysqldb";
-myexit("Cannot connect database", 2) unless my $dbh = DBI->connect("dbi:mysql:database=$mysqldb;host=$mysqlhost", $mysqluser, $mysqlpassword);
+myexit("Cannot connect database", 2) unless my $dbh = DBI->connect("dbi:mysql:database=$mysqldb".
+	($mysqlhost?";host=$mysqlhost":'').
+	($mysqlsock?";mysql_socket=$mysqlsock":'')
+	, $mysqluser, $mysqlpassword);
 
 dbg "Reading rtpproxy_attrs";
 my %attrs = ();