1 /*
2 * Copyright (c) 2004-2007 Voltaire, Inc. All rights reserved.
3 * Copyright (c) 2002-2006 Mellanox Technologies LTD. All rights reserved.
4 * Copyright (c) 1996-2003 Intel Corporation. All rights reserved.
5 *
6 * This software is available to you under a choice of one of two
7 * licenses. You may choose to be licensed under the terms of the GNU
8 * General Public License (GPL) Version 2, available from the file
9 * COPYING in the main directory of this source tree, or the
10 * OpenIB.org BSD license below:
11 *
12 * Redistribution and use in source and binary forms, with or
13 * without modification, are permitted provided that the following
14 * conditions are met:
15 *
16 * - Redistributions of source code must retain the above
17 * copyright notice, this list of conditions and the following
18 * disclaimer.
19 *
20 * - Redistributions in binary form must reproduce the above
21 * copyright notice, this list of conditions and the following
22 * disclaimer in the documentation and/or other materials
23 * provided with the distribution.
24 *
25 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
26 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
27 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
28 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
29 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
30 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
31 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
32 * SOFTWARE.
33 *
34 */
35
36 #if HAVE_CONFIG_H
37 # include <config.h>
38 #endif /* HAVE_CONFIG_H */
39
40 #include <stdlib.h>
41 #include <complib/cl_debug.h>
42 #include <opensm/osm_db_pack.h>
43
__osm_pack_guid(uint64_t guid,char * p_guid_str)44 static inline void __osm_pack_guid(uint64_t guid, char *p_guid_str)
45 {
46 sprintf(p_guid_str, "0x%016" PRIx64, guid);
47 }
48
__osm_unpack_guid(char * p_guid_str)49 static inline uint64_t __osm_unpack_guid(char *p_guid_str)
50 {
51 return strtoull(p_guid_str, NULL, 0);
52 }
53
54 static inline void
__osm_pack_lids(uint16_t min_lid,uint16_t max_lid,char * p_lid_str)55 __osm_pack_lids(uint16_t min_lid, uint16_t max_lid, char *p_lid_str)
56 {
57 sprintf(p_lid_str, "0x%04x 0x%04x", min_lid, max_lid);
58 }
59
60 static inline int
__osm_unpack_lids(IN char * p_lid_str,OUT uint16_t * p_min_lid,OUT uint16_t * p_max_lid)61 __osm_unpack_lids(IN char *p_lid_str,
62 OUT uint16_t * p_min_lid, OUT uint16_t * p_max_lid)
63 {
64 unsigned long tmp;
65 char *p_next;
66 char *p_num;
67 char lids_str[24];
68
69 strncpy(lids_str, p_lid_str, 23);
70 lids_str[23] = '\0';
71 p_num = strtok_r(lids_str, " \t", &p_next);
72 if (!p_num)
73 return 1;
74 tmp = strtoul(p_num, NULL, 0);
75 CL_ASSERT(tmp < 0x10000);
76 *p_min_lid = (uint16_t) tmp;
77
78 p_num = strtok_r(NULL, " \t", &p_next);
79 if (!p_num)
80 return 1;
81 tmp = strtoul(p_num, NULL, 0);
82 CL_ASSERT(tmp < 0x10000);
83 *p_max_lid = (uint16_t) tmp;
84
85 return 0;
86 }
87
88 int
osm_db_guid2lid_guids(IN osm_db_domain_t * const p_g2l,OUT cl_qlist_t * p_guid_list)89 osm_db_guid2lid_guids(IN osm_db_domain_t * const p_g2l,
90 OUT cl_qlist_t * p_guid_list)
91 {
92 char *p_key;
93 cl_list_t keys;
94 osm_db_guid_elem_t *p_guid_elem;
95
96 cl_list_construct(&keys);
97 cl_list_init(&keys, 10);
98
99 if (osm_db_keys(p_g2l, &keys))
100 return 1;
101
102 while ((p_key = cl_list_remove_head(&keys)) != NULL) {
103 p_guid_elem =
104 (osm_db_guid_elem_t *) malloc(sizeof(osm_db_guid_elem_t));
105 CL_ASSERT(p_guid_elem != NULL);
106
107 p_guid_elem->guid = __osm_unpack_guid(p_key);
108 cl_qlist_insert_head(p_guid_list, &p_guid_elem->item);
109 }
110
111 cl_list_destroy(&keys);
112 return 0;
113 }
114
115 int
osm_db_guid2lid_get(IN osm_db_domain_t * const p_g2l,IN uint64_t guid,OUT uint16_t * p_min_lid,OUT uint16_t * p_max_lid)116 osm_db_guid2lid_get(IN osm_db_domain_t * const p_g2l,
117 IN uint64_t guid,
118 OUT uint16_t * p_min_lid, OUT uint16_t * p_max_lid)
119 {
120 char guid_str[20];
121 char *p_lid_str;
122 uint16_t min_lid, max_lid;
123
124 __osm_pack_guid(guid, guid_str);
125 p_lid_str = osm_db_lookup(p_g2l, guid_str);
126 if (!p_lid_str)
127 return 1;
128 if (__osm_unpack_lids(p_lid_str, &min_lid, &max_lid))
129 return 1;
130
131 if (p_min_lid)
132 *p_min_lid = min_lid;
133 if (p_max_lid)
134 *p_max_lid = max_lid;
135
136 return 0;
137 }
138
139 int
osm_db_guid2lid_set(IN osm_db_domain_t * const p_g2l,IN uint64_t guid,IN uint16_t min_lid,IN uint16_t max_lid)140 osm_db_guid2lid_set(IN osm_db_domain_t * const p_g2l,
141 IN uint64_t guid, IN uint16_t min_lid, IN uint16_t max_lid)
142 {
143 char guid_str[20];
144 char lid_str[16];
145
146 __osm_pack_guid(guid, guid_str);
147 __osm_pack_lids(min_lid, max_lid, lid_str);
148
149 return (osm_db_update(p_g2l, guid_str, lid_str));
150 }
151
osm_db_guid2lid_delete(IN osm_db_domain_t * const p_g2l,IN uint64_t guid)152 int osm_db_guid2lid_delete(IN osm_db_domain_t * const p_g2l, IN uint64_t guid)
153 {
154 char guid_str[20];
155 __osm_pack_guid(guid, guid_str);
156 return (osm_db_delete(p_g2l, guid_str));
157 }
158