For CAs query performance counters only for single ports by lid and port
number, and not whole node with 'all ports' option.
Signed-off-by: Sasha Khapyorsky <[EMAIL PROTECTED]>
---
infiniband-diags/scripts/ibcheckerrors.in | 32 ++++++++++------------------
1 files changed, 12 insertions(+), 20 deletions(-)
diff --git a/infiniband-diags/scripts/ibcheckerrors.in
b/infiniband-diags/scripts/ibcheckerrors.in
index cac2475..5cfabc6 100644
--- a/infiniband-diags/scripts/ibcheckerrors.in
+++ b/infiniband-diags/scripts/ibcheckerrors.in
@@ -79,15 +79,15 @@ echo "$text" | awk '
BEGIN {
ne=0
}
-function check_node(lid)
+function check_node(lid, port)
{
nodechecked=1
if (system("'$IBPATH'/ibchecknode '"$ca_info"' '$gflags' '$verbose' "
lid)) {
ne++
- badnode=1
+ print "\n# " ntype ": nodeguid 0x" nodeguid " failed"
return
}
- if (system("'$IBPATH'/ibcheckerrs '"$ca_info"' '$gflags' '$verbose'
'$brief' " lid " 255"))
+ if (system("'$IBPATH'/ibcheckerrs '"$ca_info"' '$gflags' '$verbose'
'$brief' " lid " " port))
nodeerr=1;
}
@@ -105,30 +105,22 @@ function check_node(lid)
lid = substr($0, index($0, "port 0 lid ") + 11)
lid = substr(lid, 1, index(lid, " ") - 1)
- check_node(lid)
+ check_node(lid, 255)
}
/^\[/ {
nports++
port = $1
- if (!nodechecked) {
- lid = substr($0, index($0, " lid ") + 5)
- lid = substr(lid, 1, index(lid, " ") - 1)
- check_node(lid)
- }
- if (badnode) {
- print "\n# " ntype ": nodeguid 0x" nodeguid " failed"
- next
- }
sub("\\(.*\\)", "", port)
gsub("[\\[\\]]", "", port)
- if (nodeerr)
- if (system("'$IBPATH'/ibcheckerrs '"$ca_info"'
'$gflags' '$verbose' '$brief' " lid " " port)) {
- if (!'$v' && oldlid != lid) {
- print "# Checked " ntype ": nodeguid
0x" nodeguid " with failure"
- oldlid = lid
- }
+ if (ntype != "Switch") {
+ lid = substr($0, index($0, " lid ") + 5)
+ lid = substr(lid, 1, index(lid, " ") - 1)
+ check_node(lid, port)
+ if (nodeerr)
pcnterr++;
- }
+ } else if (nodeerr &&
+ system("'$IBPATH'/ibcheckerrs '"$ca_info"' '$gflags'
'$verbose' '$brief' " lid " " port))
+ pcnterr++;
}
/^ib/ {print $0; next}
--
1.5.3.rc2.29.gc4640f
_______________________________________________
ewg mailing list
ewg@lists.openfabrics.org
http://lists.openfabrics.org/cgi-bin/mailman/listinfo/ewg
