libibmad: updated based on merge feedback
[mirror/winof/.git] / ulp / libibmad / src / resolve.c
1 /*
2  * Copyright (c) 2004-2006 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 #if HAVE_CONFIG_H
35 #  include <config.h>
36 #endif /* HAVE_CONFIG_H */
37
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41
42 #include <infiniband/umad.h>
43 #include <mad.h>
44
45 #undef DEBUG
46 #define DEBUG   if (ibdebug)    IBWARN
47
48 int
49 ib_resolve_smlid_via(ib_portid_t *sm_id, int timeout, const void *srcport)
50 {
51         ib_portid_t self = {0};
52         uint8_t portinfo[64];
53         int lid;
54
55         memset(sm_id, 0, sizeof(*sm_id));
56
57         if (!smp_query_via(portinfo, &self, IB_ATTR_PORT_INFO,
58                            0, 0, srcport))
59                 return -1;
60
61         mad_decode_field(portinfo, IB_PORT_SMLID_F, &lid);
62
63         return ib_portid_set(sm_id, lid, 0, 0);
64 }
65
66 int
67 ib_resolve_smlid(ib_portid_t *sm_id, int timeout)
68 {
69         return ib_resolve_smlid_via(sm_id, timeout, NULL);
70 }
71
72 int
73 ib_resolve_guid_via(ib_portid_t *portid, uint64_t *guid, ib_portid_t *sm_id, int timeout, const void *srcport)
74 {
75         ib_portid_t sm_portid;
76         char buf[IB_SA_DATA_SIZE] = {0};
77
78         if (!sm_id) {
79                 sm_id = &sm_portid;
80                 if (ib_resolve_smlid_via(sm_id, timeout, srcport) < 0)
81                         return -1;
82         }
83         if (*(uint64_t*)&portid->gid == 0)
84                 mad_set_field64(portid->gid, 0, IB_GID_PREFIX_F, IB_DEFAULT_SUBN_PREFIX);
85         if (guid)
86                 mad_set_field64(portid->gid, 0, IB_GID_GUID_F, *guid);
87
88         if ((portid->lid = ib_path_query_via(srcport, portid->gid, portid->gid, sm_id, buf)) < 0)
89                 return -1;
90
91         return 0;
92 }
93
94 int
95 ib_resolve_portid_str_via(ib_portid_t *portid, char *addr_str, int dest_type, ib_portid_t *sm_id, const void *srcport)
96 {
97         uint64_t guid;
98         int lid;
99         char *routepath;
100         ib_portid_t selfportid = {0};
101         int selfport = 0;
102
103         switch (dest_type) {
104         case IB_DEST_LID:
105                 lid = strtol(addr_str, 0, 0);
106                 if (!IB_LID_VALID(lid))
107                         return -1;
108                 return ib_portid_set(portid, lid, 0, 0);
109
110         case IB_DEST_DRPATH:
111                 if (str2drpath(&portid->drpath, addr_str, 0, 0) < 0)
112                         return -1;
113                 return 0;
114
115         case IB_DEST_GUID:
116                 if (!(guid = strtoull(addr_str, 0, 0)))
117                         return -1;
118
119                 /* keep guid in portid? */
120                 return ib_resolve_guid_via(portid, &guid, sm_id, 0, srcport);
121
122         case IB_DEST_DRSLID:
123                 lid = strtol(addr_str, &routepath, 0);
124                 routepath++;
125                 if (!IB_LID_VALID(lid))
126                         return -1;
127                 ib_portid_set(portid, lid, 0, 0);
128
129                 /* handle DR parsing and set DrSLID to local lid */
130                 if (ib_resolve_self_via(&selfportid, &selfport, 0, srcport) < 0)
131                         return -1;
132                 if (str2drpath(&portid->drpath, routepath, selfportid.lid, 0) < 0)
133                         return -1;
134                 return 0;
135
136         default:
137                 IBWARN("bad dest_type %d", dest_type);
138         }
139
140         return -1;
141 }
142
143 int
144 ib_resolve_portid_str(ib_portid_t *portid, char *addr_str, int dest_type, ib_portid_t *sm_id)
145 {
146         return ib_resolve_portid_str_via(portid, addr_str, dest_type,
147                                          sm_id, NULL);
148 }
149
150 int
151 ib_resolve_self_via(ib_portid_t *portid, int *portnum, ibmad_gid_t *gid,
152                     const void *srcport)
153 {
154         ib_portid_t self = {0};
155         uint8_t portinfo[64];
156         uint8_t nodeinfo[64];
157         uint64_t guid, prefix;
158
159         if (!smp_query_via(nodeinfo, &self, IB_ATTR_NODE_INFO, 0, 0, srcport))
160                 return -1;
161
162         if (!smp_query_via(portinfo, &self, IB_ATTR_PORT_INFO, 0, 0, srcport))
163                 return -1;
164
165         mad_decode_field(portinfo, IB_PORT_LID_F, &portid->lid);
166         mad_decode_field(portinfo, IB_PORT_GID_PREFIX_F, &prefix);
167         mad_decode_field(nodeinfo, IB_NODE_PORT_GUID_F, &guid);
168
169         if (portnum)
170                 mad_decode_field(nodeinfo, IB_NODE_LOCAL_PORT_F, portnum);
171         if (gid) {
172                 mad_encode_field(*gid, IB_GID_PREFIX_F, &prefix);
173                 mad_encode_field(*gid, IB_GID_GUID_F, &guid);
174         }
175         return 0;
176 }
177
178 int
179 ib_resolve_self(ib_portid_t *portid, int *portnum, ibmad_gid_t *gid)
180 {
181         return ib_resolve_self_via (portid, portnum, gid, NULL);
182 }