ib-mgmt: update to 518083dc46963eb5fb48855acbe2b351ce7361f8
[mirror/winof/.git] / tools / infiniband-diags / src / ibstat.c
1 /*
2  * Copyright (c) 2004-2008 Voltaire Inc.  All rights reserved.
3  *
4  * This software is available to you under a choice of one of two
5  * licenses.  You may choose to be licensed under the terms of the GNU
6  * General Public License (GPL) Version 2, available from the file
7  * COPYING in the main directory of this source tree, or the
8  * OpenIB.org BSD license below:
9  *
10  *     Redistribution and use in source and binary forms, with or
11  *     without modification, are permitted provided that the following
12  *     conditions are met:
13  *
14  *      - Redistributions of source code must retain the above
15  *        copyright notice, this list of conditions and the following
16  *        disclaimer.
17  *
18  *      - Redistributions in binary form must reproduce the above
19  *        copyright notice, this list of conditions and the following
20  *        disclaimer in the documentation and/or other materials
21  *        provided with the distribution.
22  *
23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30  * SOFTWARE.
31  *
32  */
33
34 #define _GNU_SOURCE
35
36 #if HAVE_CONFIG_H
37 #  include <config.h>
38 #endif /* HAVE_CONFIG_H */
39
40 #include <inttypes.h>
41 #include <string.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <getopt.h>
45 #include <netinet/in.h>
46
47 #include <infiniband/umad.h>
48 #include <infiniband/mad.h>
49
50 #include <ibdiag_common.h>
51
52 static char *node_type_str[] = {
53         "???",
54         "CA",
55         "Switch",
56         "Router",
57         "iWARP RNIC"
58 };
59
60 static void
61 ca_dump(umad_ca_t *ca)
62 {
63         if (!ca->node_type)
64                 return;
65         printf("%s '%s'\n", ((unsigned)ca->node_type <= IB_NODE_MAX ? node_type_str[ca->node_type] : "???"), ca->ca_name);
66         printf("\t%s type: %s\n", ((unsigned)ca->node_type <= IB_NODE_MAX ? node_type_str[ca->node_type] : "???"),ca->ca_type);
67         printf("\tNumber of ports: %d\n", ca->numports);
68         printf("\tFirmware version: %s\n", ca->fw_ver);
69         printf("\tHardware version: %s\n", ca->hw_ver);
70         printf("\tNode GUID: 0x%016llx\n", (long long unsigned)ntohll(ca->node_guid));
71         printf("\tSystem image GUID: 0x%016llx\n", (long long unsigned)ntohll(ca->system_guid));
72 }
73
74 static char *port_state_str[] = {
75         "???",
76         "Down",
77         "Initializing",
78         "Armed",
79         "Active"
80 };
81
82 static char *port_phy_state_str[] = {
83         "No state change",
84         "Sleep",
85         "Polling",
86         "Disabled",
87         "PortConfigurationTraining",
88         "LinkUp",
89         "LinkErrorRecovery",
90         "PhyTest"
91 };
92
93 static int
94 port_dump(umad_port_t *port, int alone)
95 {
96         char *pre = "";
97         char *hdrpre = "";
98
99         if (!port)
100                 return -1;
101
102         if (!alone) {
103                 pre = "         ";
104                 hdrpre = "      ";
105         }
106
107         printf("%sPort %d:\n", hdrpre, port->portnum);
108         printf("%sState: %s\n", pre, (unsigned)port->state <= 4 ? port_state_str[port->state] : "???");
109         printf("%sPhysical state: %s\n", pre, (unsigned)port->state <= 7 ? port_phy_state_str[port->phys_state] : "???");
110         printf("%sRate: %d\n", pre, port->rate);
111         printf("%sBase lid: %d\n", pre, port->base_lid);
112         printf("%sLMC: %d\n", pre, port->lmc);
113         printf("%sSM lid: %d\n", pre, port->sm_lid);
114         printf("%sCapability mask: 0x%08x\n", pre, ntohl(port->capmask));
115         printf("%sPort GUID: 0x%016llx\n", pre, (long long unsigned)ntohll(port->port_guid));
116         return 0;
117 }
118
119 static int
120 ca_stat(char *ca_name, int portnum, int no_ports)
121 {
122         umad_ca_t ca;
123         int r;
124
125         if ((r = umad_get_ca(ca_name, &ca)) < 0)
126                 return r;
127
128         if (!ca.node_type)
129                 return 0;
130
131         if (!no_ports && portnum >= 0) {
132                 if (portnum > ca.numports || !ca.ports[portnum]) {
133                         IBWARN("%s: '%s' has no port number %d - max (%d)",
134                                 ((unsigned)ca.node_type <= IB_NODE_MAX ? node_type_str[ca.node_type] : "???"),
135                                 ca_name, portnum, ca.numports);
136                         return -1;
137                 }
138                 printf("%s: '%s'\n", ((unsigned)ca.node_type <= IB_NODE_MAX ? node_type_str[ca.node_type] : "???"), ca.ca_name);
139                 port_dump(ca.ports[portnum], 1);
140                 return 0;
141         }
142
143         /* print ca header */
144         ca_dump(&ca);
145
146         if (no_ports)
147                 return 0;
148
149         for (portnum = 0; portnum <= ca.numports; portnum++)
150                 port_dump(ca.ports[portnum], 0);
151
152         return 0;
153 }
154
155 static int
156 ports_list(char names[][UMAD_CA_NAME_LEN], int n)
157 {
158         uint64_t guids[64];
159         int found, ports, i;
160
161         for (i = 0, found = 0; i < n && found < 64; i++) {
162                 if ((ports = umad_get_ca_portguids(names[i], guids + found, 64 - found)) < 0)
163                         return -1;
164                 found += ports;
165         }
166
167         for (i = 0; i < found; i++)
168                 if (guids[i])
169                         printf("0x%016llx\n", (long long unsigned)ntohll(guids[i]));
170         return found;
171 }
172
173 static int list_only, short_format, list_ports;
174
175 static int process_opt(void *context, int ch, char *optarg)
176 {
177         switch (ch) {
178         case 'l':
179                 list_only++;
180                 break;
181         case 's':
182                 short_format++;
183                 break;
184         case 'p':
185                 list_ports++;
186                 break;
187         default:
188                 return -1;
189         }
190         return 0;
191 }
192
193 int main(int argc, char *argv[])
194 {
195         char names[UMAD_MAX_DEVICES][UMAD_CA_NAME_LEN];
196         int dev_port = -1;
197         int n, i;
198
199         const struct ibdiag_opt opts[] = {
200                 { "list_of_cas", 'l', 0, NULL, "list all IB devices" },
201                 { "short", 's', 0, NULL, "short output" },
202                 { "port_list", 'p', 0, NULL, "show port list" },
203                 { 0 }
204         };
205         char usage_args[] = "<ca_name> [portnum]";
206         const char *usage_examples[] = {
207                 "-l       # list all IB devices",
208                 "mthca0 2 # stat port 2 of 'mthca0'",
209                 NULL
210         };
211
212         ibdiag_process_opts(argc, argv, NULL, "sDGLCPte", opts, process_opt,
213                             usage_args, usage_examples);
214
215         argc -= optind;
216         argv += optind;
217
218         if (argc > 1)
219                 dev_port = strtol(argv[1], 0, 0);
220
221         if (umad_init() < 0)
222                 IBPANIC("can't init UMAD library");
223
224         if ((n = umad_get_cas_names(names, UMAD_MAX_DEVICES)) < 0)
225                 IBPANIC("can't list IB device names");
226
227         if (argc) {
228                 for (i = 0; i < n; i++)
229                         if (!strncmp(names[i], argv[0], sizeof names[i]))
230                                 break;
231                 if (i >= n)
232                         IBPANIC("'%s' IB device can't be found", argv[0]);
233
234                 strncpy(names[i], argv[0], sizeof names[i]);
235                 n = 1;
236         }
237
238         if (list_ports) {
239                 if (ports_list(names, n) < 0)
240                         IBPANIC("can't list ports");
241                 return 0;
242         }
243
244         if (!list_only && argc) {
245                 if (ca_stat(argv[0], dev_port, short_format) < 0)
246                         IBPANIC("stat of IB device '%s' failed", argv[0]);
247                 return 0;
248         }
249
250         for (i = 0; i < n; i++) {
251                 if (list_only)
252                         printf("%s\n", names[i]);
253                 else
254                         if (ca_stat(names[i], -1, short_format) < 0)
255                                 IBPANIC("stat of IB device '%s' failed", names[i]);
256         }
257
258         return 0;
259 }