ib_api_status_t osm_pkey_tbl_get_block_and_idx(IN osm_pkey_tbl_t * p_pkey_tbl,
IN uint16_t * p_pkey,
OUT uint16_t * p_block_idx,
OUT uint8_t * p_pkey_idx)
{
uint16_t num_of_blocks;
uint16_t block_index;
ib_pkey_table_t *block;
CL_ASSERT(p_block_idx != NULL);
CL_ASSERT(p_pkey_idx != NULL);
num_of_blocks = (uint16_t) cl_ptr_vector_get_size(&p_pkey_tbl->blocks);
for (block_index = 0; block_index < num_of_blocks; block_index++) {
block = osm_pkey_tbl_block_get(p_pkey_tbl, block_index);
if ((block->pkey_entry <= p_pkey) &&
(p_pkey <
block->pkey_entry + IB_NUM_PKEY_ELEMENTS_IN_BLOCK)) {
*p_block_idx = block_index;
*p_pkey_idx = (uint8_t) (p_pkey - block->pkey_entry);
return IB_SUCCESS;
}
}
return IB_NOT_FOUND;
}
static void sa_pkey_create(IN osm_sa_t * sa, IN osm_physp_t * p_physp,
IN osm_pkey_search_ctxt_t * p_ctxt,
IN uint16_t block)
{
osm_pkey_item_t *p_rec_item;
uint16_t lid;
ib_pkey_table_t *tbl;
OSM_LOG_ENTER(sa->p_log);
p_rec_item = malloc(sizeof(*p_rec_item));
if (p_rec_item == NULL) {
OSM_LOG(sa->p_log, OSM_LOG_ERROR, "ERR 4602: "
"rec_item alloc failed\n");
goto Exit;
}
if (p_physp->p_node->node_info.node_type != IB_NODE_TYPE_SWITCH)
lid = p_physp->port_info.base_lid;
else
lid = osm_node_get_base_lid(p_physp->p_node, 0);
OSM_LOG(sa->p_log, OSM_LOG_DEBUG,
"New P_Key table for: port 0x%016" PRIx64
", lid %u, port %u Block:%u\n",
cl_ntoh64(osm_physp_get_port_guid(p_physp)),
cl_ntoh16(lid), osm_physp_get_port_num(p_physp), block);
memset(p_rec_item, 0, sizeof(*p_rec_item));
p_rec_item->rec.lid = lid;
p_rec_item->rec.block_num = block;
p_rec_item->rec.port_num = osm_physp_get_port_num(p_physp);
/* FIXME: There are ninf.PartitionCap or swinf.PartitionEnforcementCap
pkey entries so everything in that range is a valid block number
even if opensm is not using it. Return 0. However things outside
that range should return no entries.. Not sure how to figure that
here? The range of pkey_tbl can be less than the cap, so
this falsely triggers. */
tbl = osm_pkey_tbl_block_get(osm_physp_get_pkey_tbl(p_physp), block);
if (tbl)
p_rec_item->rec.pkey_tbl = *tbl;
cl_qlist_insert_tail(p_ctxt->p_list, &p_rec_item->list_item);
Exit:
OSM_LOG_EXIT(sa->p_log);
}
/** ===========================================================================
*/
static void extract_host_port(osm_port_t *p_port, uint64_t *p_pkey_base_offset,
uint64_t *p_pkey_offset, uint64_t *p_port_offset,
uint64_t *p_link_offset,
struct ssa_db_extract *p_ssa_db)
{
const osm_pkey_tbl_t *p_pkey_tbl;
const ib_pkey_table_t *block;
osm_physp_t *p_physp = p_port->p_physp;
ib_net16_t pkey;
uint16_t block_index, pkey_idx;
p_pkey_tbl = osm_physp_get_pkey_tbl(p_physp);
for (block_index = 0; block_index < p_pkey_tbl->used_blocks;
block_index++) {
block = osm_pkey_tbl_block_get(p_pkey_tbl, block_index);
if (!block)
continue;
for (pkey_idx = 0; pkey_idx < IB_NUM_PKEY_ELEMENTS_IN_BLOCK;
pkey_idx++) {
pkey = block->pkey_entry[pkey_idx];
if (ib_pkey_is_invalid(pkey))
continue;
p_ssa_db->p_pkey_tbl[*p_pkey_base_offset + *p_pkey_offset] = pkey;
*p_pkey_offset = *p_pkey_offset + 1;
}
}
if (*p_pkey_offset >= SSA_EXTRACT_PKEYS_MAX) {
ssa_log_err(SSA_LOG_DEFAULT,
"ERROR - truncating number of pkeys "
"from %d to %d (maximum) for LID %u\n",
*p_pkey_offset, SSA_EXTRACT_PKEYS_MAX - 1,
ntohs(osm_physp_get_base_lid(p_physp)));
*p_pkey_offset = SSA_EXTRACT_PKEYS_MAX - 1;
}
extract_port(p_physp, NULL, htonll(*p_pkey_base_offset * sizeof(pkey)),
htons(*p_pkey_offset * sizeof(pkey)),
p_port_offset, p_ssa_db);
if (!osm_physp_get_remote(p_physp))
return;
extract_link(p_physp, NULL, p_link_offset, p_ssa_db);
}
static void
__osm_sa_pkey_create(IN osm_sa_t * sa,
IN osm_physp_t * const p_physp,
IN osm_pkey_search_ctxt_t * const p_ctxt,
IN uint16_t block)
{
osm_pkey_item_t *p_rec_item;
uint16_t lid;
ib_api_status_t status = IB_SUCCESS;
OSM_LOG_ENTER(sa->p_log);
p_rec_item = malloc(sizeof(*p_rec_item));
if (p_rec_item == NULL) {
OSM_LOG(sa->p_log, OSM_LOG_ERROR, "ERR 4602: "
"rec_item alloc failed\n");
status = IB_INSUFFICIENT_RESOURCES;
goto Exit;
}
if (p_physp->p_node->node_info.node_type != IB_NODE_TYPE_SWITCH)
lid = p_physp->port_info.base_lid;
else
lid = osm_node_get_base_lid(p_physp->p_node, 0);
OSM_LOG(sa->p_log, OSM_LOG_DEBUG,
"New P_Key table for: port 0x%016" PRIx64
", lid %u, port %u Block:%u\n",
cl_ntoh64(osm_physp_get_port_guid(p_physp)),
cl_ntoh16(lid), osm_physp_get_port_num(p_physp), block);
memset(p_rec_item, 0, sizeof(*p_rec_item));
p_rec_item->rec.lid = lid;
p_rec_item->rec.block_num = block;
p_rec_item->rec.port_num = osm_physp_get_port_num(p_physp);
p_rec_item->rec.pkey_tbl =
*(osm_pkey_tbl_block_get(osm_physp_get_pkey_tbl(p_physp), block));
cl_qlist_insert_tail(p_ctxt->p_list, &p_rec_item->list_item);
Exit:
OSM_LOG_EXIT(sa->p_log);
}
/** ===========================================================================
*/
static void extract_switch_port(osm_port_t *p_port, uint64_t *p_pkey_base_offset,
uint64_t *p_pkey_offset, uint64_t *p_port_offset,
uint64_t *p_link_offset,
struct ssa_db_extract *p_ssa_db)
{
osm_node_t *p_node = p_port->p_physp->p_node;
const osm_pkey_tbl_t *p_pkey_tbl;
const ib_pkey_table_t *block;
osm_physp_t *p_physp;
uint32_t i;
ib_net16_t pkey;
uint16_t lid_ho, block_index, pkey_idx;
for (i = 0; i < p_node->physp_tbl_size; i++) {
p_physp = osm_node_get_physp_ptr(p_node, i);
if (!p_physp)
continue;
/* TODO: add filtering for down ports */
if (i == 0) {
lid_ho = ntohs(osm_physp_get_base_lid(p_physp));
p_pkey_tbl = osm_physp_get_pkey_tbl(p_physp);
for (block_index = 0; block_index < p_pkey_tbl->used_blocks;
block_index++) {
block = osm_pkey_tbl_block_get(p_pkey_tbl, block_index);
if (!block)
continue;
for (pkey_idx = 0; pkey_idx < IB_NUM_PKEY_ELEMENTS_IN_BLOCK;
pkey_idx++) {
pkey = block->pkey_entry[pkey_idx];
if (ib_pkey_is_invalid(pkey))
continue;
p_ssa_db->p_pkey_tbl[*p_pkey_base_offset + *p_pkey_offset] = pkey;
*p_pkey_offset = *p_pkey_offset + 1;
}
}
if (*p_pkey_offset >= SSA_EXTRACT_PKEYS_MAX) {
ssa_log_err(SSA_LOG_DEFAULT,
"ERROR - truncating number of pkeys "
"from %d to %d (maximum) for LID %u\n",
*p_pkey_offset, SSA_EXTRACT_PKEYS_MAX - 1, lid_ho);
*p_pkey_offset = SSA_EXTRACT_PKEYS_MAX - 1;
}
extract_port(p_physp, &lid_ho,
htonll(*p_pkey_base_offset * sizeof(pkey)),
htons(*p_pkey_offset * sizeof(pkey)),
p_port_offset, p_ssa_db);
} else {
extract_port(p_physp, &lid_ho, 0, 0, p_port_offset,
p_ssa_db);
}
if (!osm_physp_get_remote(p_physp))
continue;
extract_link(p_physp, &lid_ho, p_link_offset, p_ssa_db);
}
}
