git:ser_modules: - socket support - sr-dev

17 Jul 2009

Module: sip-router
Branch: ser_modules
Commit: 36e77b35c20518c84f169a4092ca34c4908e81da
URL:    http://git.sip-router.org/cgi-bin/gitweb.cgi/sip-router/?a=commit;h=36e77b35...
Author: Tomas Mandys tomas.mandys@iptel.org
Committer: Tomas Mandys tomas.mandys@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 = ();

    