>From 76499fd3eef2ec847e9967e10f87eb8ecbbfc97d Mon Sep 17 00:00:00 2001 From: Ira K. Weiny <[EMAIL PROTECTED]> Date: Fri, 18 Jan 2008 11:46:27 -0800 Subject: [PATCH] infiniband-diags/scripts/IBswcountlimits.pm: clean up long lines
Signed-off-by: Ira K. Weiny <[EMAIL PROTECTED]>
---
infiniband-diags/scripts/IBswcountlimits.pm | 30 ++++++++++++++++----------
1 files changed, 18 insertions(+), 12 deletions(-)
diff --git a/infiniband-diags/scripts/IBswcountlimits.pm
b/infiniband-diags/scripts/IBswcountlimits.pm
index aed10fc..6985750 100755
--- a/infiniband-diags/scripts/IBswcountlimits.pm
+++ b/infiniband-diags/scripts/IBswcountlimits.pm
@@ -295,9 +295,10 @@ sub get_link_ends
my $rem_port = $3;
my $rem_desc = $4;
my $rem_lid = $5;
- $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => "", loc_desc => $desc,
- loc_sw_lid => $loc_sw_lid,
- rem_guid => "0x$rem_guid", rem_lid => $rem_lid, rem_port =>
$rem_port, rem_ext_port => "", rem_desc => $rem_desc };
+ $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => "",
+ loc_desc => $desc, loc_sw_lid => $loc_sw_lid,
+ rem_guid => "0x$rem_guid", rem_lid => $rem_lid,
+ rem_port => $rem_port, rem_ext_port => "", rem_desc =>
$rem_desc };
}
if ($line =~ /^\[(\d+)\]\[ext
(\d+)\]\s+\"[HSR]-(.+)\"\[(\d+)\]\(.+\)\s+#.*\"(.*)\"\.* lid (\d+).*/)
{
@@ -307,9 +308,10 @@ sub get_link_ends
my $rem_port = $4;
my $rem_desc = $5;
my $rem_lid = $6;
- $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => $loc_ext_port, loc_desc => $desc,
- loc_sw_lid => $loc_sw_lid,
- rem_guid => "0x$rem_guid", rem_lid => $rem_lid, rem_port =>
$rem_port, rem_ext_port => "", rem_desc => $rem_desc };
+ $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => $loc_ext_port,
+ loc_desc => $desc, loc_sw_lid => $loc_sw_lid,
+ rem_guid => "0x$rem_guid", rem_lid => $rem_lid,
+ rem_port => $rem_port, rem_ext_port => "", rem_desc =>
$rem_desc };
}
if ($line =~ /^\[(\d+)\]\s+\"[HSR]-(.+)\"\[(\d+)\]\[ext
(\d+)\]\(.+\)\s+#.*\"(.*)\"\.* lid (\d+).*/)
{
@@ -319,9 +321,11 @@ sub get_link_ends
my $rem_ext_port = $4;
my $rem_desc = $5;
my $rem_lid = $6;
- $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => "", loc_desc => $desc,
- loc_sw_lid => $loc_sw_lid,
- rem_guid => "0x$rem_guid", rem_lid => $rem_lid, rem_port =>
$rem_port, rem_ext_port => $rem_ext_port, rem_desc => $rem_desc };
+ $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => "",
+ loc_desc => $desc, loc_sw_lid => $loc_sw_lid,
+ rem_guid => "0x$rem_guid", rem_lid => $rem_lid,
+ rem_port => $rem_port, rem_ext_port => $rem_ext_port,
+ rem_desc => $rem_desc };
}
if ($line =~ /^\[(\d+)\]\[ext (\d+)\]\s+\"[HSR]-(.+)\"\[(\d+)\]\[ext
(\d+)\]\(.+\)\s+#.*\"(.*)\"\.* lid (\d+).*/)
{
@@ -332,9 +336,11 @@ sub get_link_ends
my $rem_ext_port = $5;
my $rem_desc = $6;
my $rem_lid = $7;
- $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => $loc_ext_port, loc_desc => $desc,
- loc_sw_lid => $loc_sw_lid,
- rem_guid => "0x$rem_guid", rem_lid => $rem_lid, rem_port =>
$rem_port, rem_ext_port => $rem_ext_port, rem_desc => $rem_desc };
+ $rec = { loc_guid => "0x$guid", loc_port => $loc_port,
loc_ext_port => $loc_ext_port,
+ loc_desc => $desc, loc_sw_lid => $loc_sw_lid,
+ rem_guid => "0x$rem_guid", rem_lid => $rem_lid,
+ rem_port => $rem_port, rem_ext_port => $rem_ext_port,
+ rem_desc => $rem_desc };
}
if ($rec)
{
--
1.5.1
0001-infiniband-diags-scripts-IBswcountlimits.pm-clean-u.patch
Description: Binary data
_______________________________________________ general mailing list [email protected] http://lists.openfabrics.org/cgi-bin/mailman/listinfo/general To unsubscribe, please visit http://openib.org/mailman/listinfo/openib-general
