ib-mgmt: update to 518083dc46963eb5fb48855acbe2b351ce7361f8
[mirror/winof/.git] / tools / infiniband-diags / src / ibsendtrap.c
1 /*
2  * Copyright (c) 2008 Lawrence Livermore National Security
3  * Copyright (c) 2009 Voltaire Inc.  All rights reserved.
4  * Copyright (c) 2009 HNR Consulting.  All rights reserved.
5  *
6  * Produced at Lawrence Livermore National Laboratory.
7  * Written by Ira Weiny <weiny2@llnl.gov>.
8  *
9  * This software is available to you under a choice of one of two
10  * licenses.  You may choose to be licensed under the terms of the GNU
11  * General Public License (GPL) Version 2, available from the file
12  * COPYING in the main directory of this source tree, or the
13  * OpenIB.org BSD license below:
14  *
15  *     Redistribution and use in source and binary forms, with or
16  *     without modification, are permitted provided that the following
17  *     conditions are met:
18  *
19  *      - Redistributions of source code must retain the above
20  *        copyright notice, this list of conditions and the following
21  *        disclaimer.
22  *
23  *      - Redistributions in binary form must reproduce the above
24  *        copyright notice, this list of conditions and the following
25  *        disclaimer in the documentation and/or other materials
26  *        provided with the distribution.
27  *
28  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
29  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
30  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
31  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
32  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
33  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
34  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
35  * SOFTWARE.
36  *
37  */
38
39 #include <stdlib.h>
40 #include <stdio.h>
41 #include <unistd.h>
42 #include <string.h>
43
44 #define _GNU_SOURCE
45 #include <getopt.h>
46
47 #include <infiniband/mad.h>
48 #include <iba/ib_types.h>
49
50 #include "ibdiag_common.h"
51
52 struct ibmad_port *srcport;
53 /* for local link integrity */
54 int error_port = 1;
55
56 static uint16_t get_node_type(ib_portid_t *port)
57 {
58         uint16_t node_type = IB_NODE_TYPE_CA;
59         uint8_t data[IB_SMP_DATA_SIZE];
60
61         if (smp_query_via(data, port, IB_ATTR_NODE_INFO, 0, 0, srcport))
62                 node_type = (uint16_t)mad_get_field(data, 0, IB_NODE_TYPE_F);
63         return node_type;
64 }
65
66 static void build_trap144(ib_mad_notice_attr_t * n, ib_portid_t *port)
67 {
68         n->generic_type = 0x80 | IB_NOTICE_TYPE_INFO;
69         n->g_or_v.generic.prod_type_lsb = cl_hton16(get_node_type(port));
70         n->g_or_v.generic.trap_num = cl_hton16(144);
71         n->issuer_lid = cl_hton16((uint16_t) port->lid);
72         n->data_details.ntc_144.lid = n->issuer_lid;
73         n->data_details.ntc_144.local_changes =
74             TRAP_144_MASK_OTHER_LOCAL_CHANGES;
75         n->data_details.ntc_144.change_flgs =
76             TRAP_144_MASK_NODE_DESCRIPTION_CHANGE;
77 }
78
79 static void build_trap129(ib_mad_notice_attr_t * n, ib_portid_t *port)
80 {
81         n->generic_type = 0x80 | IB_NOTICE_TYPE_URGENT;
82         n->g_or_v.generic.prod_type_lsb = cl_hton16(get_node_type(port));
83         n->g_or_v.generic.trap_num = cl_hton16(129);
84         n->issuer_lid = cl_hton16((uint16_t) port->lid);
85         n->data_details.ntc_129_131.lid = n->issuer_lid;
86         n->data_details.ntc_129_131.pad = 0;
87         n->data_details.ntc_129_131.port_num = (uint8_t) error_port;
88 }
89
90 static int send_trap(const char *name,
91                      void (*build) (ib_mad_notice_attr_t *, ib_portid_t *))
92 {
93         ib_portid_t sm_port;
94         ib_portid_t selfportid;
95         int selfport;
96         ib_rpc_t trap_rpc;
97         ib_mad_notice_attr_t notice;
98
99         if (ib_resolve_self_via(&selfportid, &selfport, NULL, srcport))
100                 IBERROR("can't resolve self");
101
102         if (ib_resolve_smlid_via(&sm_port, 0, srcport))
103                 IBERROR("can't resolve SM destination port");
104
105         memset(&trap_rpc, 0, sizeof(trap_rpc));
106         trap_rpc.mgtclass = IB_SMI_CLASS;
107         trap_rpc.method = IB_MAD_METHOD_TRAP;
108         trap_rpc.trid = mad_trid();
109         trap_rpc.attr.id = NOTICE;
110         trap_rpc.datasz = IB_SMP_DATA_SIZE;
111         trap_rpc.dataoffs = IB_SMP_DATA_OFFS;
112
113         memset(&notice, 0, sizeof(notice));
114         build(&notice, &selfportid);
115
116         return mad_send_via(&trap_rpc, &sm_port, NULL, &notice, srcport);
117 }
118
119 typedef struct _trap_def {
120         char *trap_name;
121         void (*build_func) (ib_mad_notice_attr_t *, ib_portid_t *);
122 } trap_def_t;
123
124 trap_def_t traps[3] = {
125         {"node_desc_change", build_trap144},
126         {"local_link_integrity", build_trap129},
127         {NULL, NULL}
128 };
129
130 int process_send_trap(char *trap_name)
131 {
132         int i;
133
134         for (i = 0; traps[i].trap_name; i++)
135                 if (strcmp(traps[i].trap_name, trap_name) == 0)
136                         return send_trap(trap_name, traps[i].build_func);
137         ibdiag_show_usage();
138         return 1;
139 }
140
141 int main(int argc, char **argv)
142 {
143         char usage_args[1024];
144         int mgmt_classes[2] = { IB_SMI_CLASS, IB_SMI_DIRECT_CLASS };
145         char *trap_name = NULL;
146         int i, n, rc;
147
148         n = sprintf(usage_args, "[<trap_name>] [<error_port>]\n"
149                     "\nArgument <trap_name> can be one of the following:\n");
150         for (i = 0; traps[i].trap_name; i++) {
151                 n += snprintf(usage_args + n, sizeof(usage_args) - n,
152                               "  %s\n", traps[i].trap_name);
153                 if (n >= sizeof(usage_args))
154                         exit(-1);
155         }
156         snprintf(usage_args + n, sizeof(usage_args) - n,
157                  "\n  default behavior is to send \"%s\"", traps[0].trap_name);
158
159         ibdiag_process_opts(argc, argv, NULL, "DLG", NULL, NULL,
160                             usage_args, NULL);
161
162         argc -= optind;
163         argv += optind;
164
165         trap_name = argv[0] ? argv[0] : traps[0].trap_name;
166
167         if (argc > 1)
168                 error_port = atoi(argv[1]);
169
170         madrpc_show_errors(1);
171
172         srcport = mad_rpc_open_port(ibd_ca, ibd_ca_port, mgmt_classes, 2);
173         if (!srcport)
174                 IBERROR("Failed to open '%s' port '%d'", ibd_ca, ibd_ca_port);
175
176         rc = process_send_trap(trap_name);
177         mad_rpc_close_port(srcport);
178         return rc;
179 }