/*
* Copyright (c) 2004-2009 Voltaire, Inc. All rights reserved.
* Copyright (c) 2002-2011 Mellanox Technologies LTD. All rights reserved.
* Copyright (c) 1996-2003 Intel Corporation. All rights reserved.
* Copyright (c) 2008 Xsigo Systems Inc. All rights reserved.
* Copyright (c) 2009 System Fabric Works, Inc. All rights reserved.
* Copyright (c) 2009 HNR Consulting. All rights reserved.
* Copyright (c) 2009-2015 ZIH, TU Dresden, Federal Republic of Germany. All rights reserved.
* Copyright (c) 2013 Oracle and/or its affiliates. All rights reserved.
* Copyright (C) 2012-2017 Tokyo Institute of Technology. All rights reserved.
*
* This software is available to you under a choice of one of two
* licenses. You may choose to be licensed under the terms of the GNU
* General Public License (GPL) Version 2, available from the file
* COPYING in the main directory of this source tree, or the
* OpenIB.org BSD license below:
*
* Redistribution and use in source and binary forms, with or
* without modification, are permitted provided that the following
* conditions are met:
*
* - Redistributions of source code must retain the above
* copyright notice, this list of conditions and the following
* disclaimer.
*
* - Redistributions in binary form must reproduce the above
* copyright notice, this list of conditions and the following
* disclaimer in the documentation and/or other materials
* provided with the distribution.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
* BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
* ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
* SOFTWARE.
*
*/
/*
* Abstract:
* Implementation of osm_subn_t.
* This object represents an IBA subnet.
* This object is part of the opensm family of objects.
*/
#if HAVE_CONFIG_H
# include <config.h>
#endif /* HAVE_CONFIG_H */
#include <string.h>
#include <stdio.h>
#include <stdarg.h>
#include <limits.h>
#include <errno.h>
#include <ctype.h>
#include <complib/cl_debug.h>
#include <complib/cl_log.h>
#include <opensm/osm_file_ids.h>
#define FILE_ID OSM_FILE_SUBNET_C
#include <opensm/osm_subnet.h>
#include <opensm/osm_opensm.h>
#include <opensm/osm_log.h>
#include <opensm/osm_madw.h>
#include <opensm/osm_port.h>
#include <opensm/osm_switch.h>
#include <opensm/osm_remote_sm.h>
#include <opensm/osm_partition.h>
#include <opensm/osm_node.h>
#include <opensm/osm_guid.h>
#include <opensm/osm_multicast.h>
#include <opensm/osm_inform.h>
#include <opensm/osm_console.h>
#include <opensm/osm_perfmgr.h>
#include <opensm/osm_congestion_control.h>
#include <opensm/osm_event_plugin.h>
#include <opensm/osm_qos_policy.h>
#include <opensm/osm_service.h>
#include <opensm/osm_db.h>
#include <opensm/osm_db_pack.h>
static const char null_str[] = "(null)";
#define OPT_OFFSET(opt) offsetof(osm_subn_opt_t, opt)
#define ARR_SIZE(a) (sizeof(a)/sizeof((a)[0]))
typedef struct opt_rec {
const char *name;
unsigned long opt_offset;
void (*parse_fn)(osm_subn_t *p_subn, char *p_key, char *p_val_str,
void *p_val1, void *p_val2,
void (*)(osm_subn_t *, void *));
void (*setup_fn)(osm_subn_t *p_subn, void *p_val);
int can_update;
} opt_rec_t;
static const char *module_name_str[] = {
"main.c",
"osm_console.c",
"osm_console_io.c",
"osm_db_files.c",
"osm_db_pack.c",
"osm_drop_mgr.c",
"osm_dump.c",
"osm_event_plugin.c",
"osm_guid_info_rcv.c",
"osm_guid_mgr.c",
"osm_helper.c",
"osm_inform.c",
"osm_lid_mgr.c",
"osm_lin_fwd_rcv.c",
"osm_link_mgr.c",
"osm_log.c",
"osm_mad_pool.c",
"osm_mcast_fwd_rcv.c",
"osm_mcast_mgr.c",
"osm_mcast_tbl.c",
"osm_mcm_port.c",
"osm_mesh.c",
"osm_mlnx_ext_port_info_rcv.c",
"osm_mtree.c",
"osm_multicast.c",
"osm_node.c",
"osm_node_desc_rcv.c",
"osm_node_info_rcv.c",
"osm_opensm.c",
"osm_perfmgr.c",
"osm_perfmgr_db.c",
"osm_pkey.c",
"osm_pkey_mgr.c",
"osm_pkey_rcv.c",
"osm_port.c",
"osm_port_info_rcv.c",
"osm_prtn.c",
"osm_prtn_config.c",
"osm_qos.c",
"osm_qos_parser_l.c",
"osm_qos_parser_y.c",
"osm_qos_policy.c",
"osm_remote_sm.c",
"osm_req.c",
"osm_resp.c",
"osm_router.c",
"osm_sa.c",
"osm_sa_class_port_info.c",
"osm_sa_guidinfo_record.c",
"osm_sa_informinfo.c",
"osm_sa_lft_record.c",
"osm_sa_link_record.c",
"osm_sa_mad_ctrl.c",
"osm_sa_mcmember_record.c",
"osm_sa_mft_record.c",
"osm_sa_multipath_record.c",
"osm_sa_node_record.c",
"osm_sa_path_record.c",
"osm_sa_pkey_record.c",
"osm_sa_portinfo_record.c",
"osm_sa_service_record.c",
"osm_sa_slvl_record.c",
"osm_sa_sminfo_record.c",
"osm_sa_sw_info_record.c",
"osm_sa_vlarb_record.c",
"osm_service.c",
"osm_slvl_map_rcv.c",
"osm_sm.c",
"osm_sminfo_rcv.c",
"osm_sm_mad_ctrl.c",
"osm_sm_state_mgr.c",
"osm_state_mgr.c",
"osm_subnet.c",
"osm_sw_info_rcv.c",
"osm_switch.c",
"osm_torus.c",
"osm_trap_rcv.c",
"osm_ucast_cache.c",
"osm_ucast_dnup.c",
"osm_ucast_file.c",
"osm_ucast_ftree.c",
"osm_ucast_lash.c",
"osm_ucast_mgr.c",
"osm_ucast_updn.c",
"osm_vendor_ibumad.c",
"osm_vl15intf.c",
"osm_vl_arb_rcv.c",
"st.c",
"osm_ucast_dfsssp.c",
"osm_congestion_control.c",
"osm_ucast_nue.c",
/* Add new module names here ... */
/* FILE_ID define in those modules must be identical to index here */
/* last FILE_ID is currently 90 */
};
#define MOD_NAME_STR_UNKNOWN_VAL (ARR_SIZE(module_name_str))
static int find_module_name(const char *name, uint8_t *file_id)
{
uint8_t i;
for (i = 0; i < MOD_NAME_STR_UNKNOWN_VAL; i++) {
if (strcmp(name, module_name_str[i]) == 0) {
if (file_id)
*file_id = i;
return 0;
}
}
return 1;
}
static void log_report(const char *fmt, ...)
{
char buf[128];
va_list args;
va_start(args, fmt);
vsnprintf(buf, sizeof(buf), fmt, args);
va_end(args);
printf("%s", buf);
cl_log_event("OpenSM", CL_LOG_INFO, buf, NULL, 0);
}
static void log_config_value(char *name, const char *fmt, ...)
{
char buf[128];
va_list args;
unsigned n;
va_start(args, fmt);
n = snprintf(buf, sizeof(buf), " Loading Cached Option:%s = ", name);
if (n > sizeof(buf))
n = sizeof(buf);
n += vsnprintf(buf + n, sizeof(buf) - n, fmt, args);
if (n > sizeof(buf) - 2)
n = sizeof(buf) - 2;
snprintf(buf + n, sizeof(buf) - n, "\n");
va_end(args);
printf("%s", buf);
cl_log_event("OpenSM", CL_LOG_INFO, buf, NULL, 0);
}
static void opts_setup_log_flags(osm_subn_t *p_subn, void *p_val)
{
p_subn->p_osm->log.level = *((uint8_t *) p_val);
}
static void opts_setup_force_log_flush(osm_subn_t *p_subn, void *p_val)
{
p_subn->p_osm->log.flush = *((boolean_t *) p_val);
}
static void opts_setup_accum_log_file(osm_subn_t *p_subn, void *p_val)
{
p_subn->p_osm->log.accum_log_file = *((boolean_t *) p_val);
}
static void opts_setup_log_max_size(osm_subn_t *p_subn, void *p_val)
{
uint32_t log_max_size = *((uint32_t *) p_val);
p_subn->p_osm->log.max_size = (unsigned long)log_max_size << 20; /* convert from MB to bytes */
}
static void opts_setup_sminfo_polling_timeout(osm_subn_t *p_subn, void *p_val)
{
osm_sm_t *p_sm = &p_subn->p_osm->sm;
uint32_t sminfo_polling_timeout = *((uint32_t *) p_val);
cl_timer_stop(&p_sm->polling_timer);
cl_timer_start(&p_sm->polling_timer, sminfo_polling_timeout);
}
static void opts_setup_sm_priority(osm_subn_t *p_subn, void *p_val)
{
osm_sm_t *p_sm = &p_subn->p_osm->sm;
uint8_t sm_priority = *((uint8_t *) p_val);
osm_set_sm_priority(p_sm, sm_priority);
}
static int opts_strtoul(uint32_t *val, IN char *p_val_str,
IN char *p_key, uint32_t max_value)
{
char *endptr;
unsigned long int tmp_val;
errno = 0;
tmp_val = strtoul(p_val_str, &endptr, 0);
*val = tmp_val;
if (*p_val_str == '\0' || *endptr != '\0') {
log_report("-E- Parsing error in field %s, expected "
"numeric input received: %s\n", p_key, p_val_str);
return -1;
}
if (tmp_val > max_value ||
((tmp_val == ULONG_MAX) && errno == ERANGE)) {
log_report("-E- Parsing error in field %s, value out of range\n", p_key);
return -1;
}
return 0;
}
static int opts_strtoull(uint64_t *val, IN char *p_val_str,
IN char *p_key, uint64_t max_value)
{
char *endptr;
unsigned long long int tmp_val;
errno = 0;
tmp_val = strtoull(p_val_str, &endptr, 0);
*val = tmp_val;
if (*p_val_str == '\0' || *endptr != '\0') {
log_report("-E- Parsing error in field %s, expected "
"numeric input received: %s\n", p_key, p_val_str);
return -1;
}
if (tmp_val > max_value || (tmp_val == ULLONG_MAX && errno == ERANGE)) {
log_report("-E- Parsing error in field %s, value out of range\n", p_key);
return -1;
}
return 0;
}
static void opts_parse_net64(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint64_t *p_val1 = p_v1, *p_val2 = p_v2;
uint64_t val;
if (opts_strtoull(&val, p_val_str, p_key, UINT64_MAX))
return;
if (cl_hton64(val) != *p_val1) {
log_config_value(p_key, "0x%016" PRIx64, val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = cl_ntoh64(val);
}
}
static void opts_parse_uint32(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint32_t *p_val1 = p_v1, *p_val2 = p_v2;
uint32_t val;
if (opts_strtoul(&val, p_val_str, p_key, UINT32_MAX))
return;
if (val != *p_val1) {
log_config_value(p_key, "%u", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = val;
}
}
static void opts_parse_net32(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint32_t *p_val1 = p_v1, *p_val2 = p_v2;
uint32_t val;
if (opts_strtoul(&val, p_val_str, p_key, UINT32_MAX))
return;
if (cl_hton32(val) != *p_val1) {
log_config_value(p_key, "%u", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = cl_hton32(val);
}
}
static void opts_parse_int32(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
int32_t *p_val1 = p_v1, *p_val2 = p_v2;
int32_t val = strtol(p_val_str, NULL, 0);
if (val != *p_val1) {
log_config_value(p_key, "%d", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = val;
}
}
static void opts_parse_uint16(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint16_t *p_val1 = p_v1, *p_val2 = p_v2;
uint32_t tmp_val;
if (opts_strtoul(&tmp_val, p_val_str, p_key, UINT16_MAX))
return;
uint16_t val = (uint16_t) tmp_val;
if (val != *p_val1) {
log_config_value(p_key, "%u", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = val;
}
}
static void opts_parse_net16(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint16_t *p_val1 = p_v1, *p_val2 = p_v2;
uint32_t tmp_val;
if (opts_strtoul(&tmp_val, p_val_str, p_key, UINT16_MAX))
return;
uint16_t val = (uint16_t) tmp_val;
if (cl_hton16(val) != *p_val1) {
log_config_value(p_key, "0x%04x", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = cl_hton16(val);
}
}
static void opts_parse_uint8(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint8_t *p_val1 = p_v1, *p_val2 = p_v2;
uint32_t tmp_val;
if (opts_strtoul(&tmp_val, p_val_str, p_key, UINT8_MAX))
return;
uint8_t val = (uint8_t) tmp_val;
if (val != *p_val1) {
log_config_value(p_key, "%u", val);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = val;
}
}
static void opts_parse_boolean(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
boolean_t *p_val1 = p_v1, *p_val2 = p_v2;
boolean_t val;
if (!p_val_str)
return;
if (strcmp("TRUE", p_val_str))
val = FALSE;
else
val = TRUE;
if (val != *p_val1) {
log_config_value(p_key, "%s", p_val_str);
if (pfn)
pfn(p_subn, &val);
*p_val1 = *p_val2 = val;
}
}
static void opts_parse_charp(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
char **p_val1 = p_v1, **p_val2 = p_v2;
const char *current_str = *p_val1 ? *p_val1 : null_str;
if (p_val_str && strcmp(p_val_str, current_str)) {
char *new;
log_config_value(p_key, "%s", p_val_str);
/* special case the "(null)" string */
new = strcmp(null_str, p_val_str) ? strdup(p_val_str) : NULL;
if (pfn)
pfn(p_subn, new);
if (*p_val1 && *p_val1 != *p_val2)
free(*p_val1);
if (*p_val2)
free(*p_val2);
*p_val1 = *p_val2 = new;
}
}
static void opts_parse_256bit(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
uint8_t *p_val1 = p_v1, *p_val2 = p_v2;
uint8_t val[IB_CC_PORT_MASK_DATA_SIZE] = { 0 };
char tmpbuf[3] = { 0 };
uint8_t tmpint;
int numdigits = 0;
int startindex;
char *strptr = p_val_str;
char *ptr;
int i;
/* parse like it's hypothetically a 256 bit integer code
*
* store "big endian"
*/
if (!strncmp(strptr, "0x", 2) || !strncmp(strptr, "0X", 2))
strptr+=2;
for (ptr = strptr; *ptr; ptr++) {
if (!isxdigit(*ptr)) {
log_report("invalid hex digit in bitmask\n");
return;
}
numdigits++;
}
if (!numdigits) {
log_report("invalid length bitmask\n");
return;
}
/* max of 2 hex chars per byte */
if (numdigits > IB_CC_PORT_MASK_DATA_SIZE * 2)
numdigits = IB_CC_PORT_MASK_DATA_SIZE * 2;
startindex = IB_CC_PORT_MASK_DATA_SIZE - ((numdigits - 1) / 2) - 1;
if (numdigits % 2) {
memcpy(tmpbuf, strptr, 1);
strptr += 1;
}
else {
memcpy(tmpbuf, strptr, 2);
strptr += 2;
}
tmpint = strtoul(tmpbuf, NULL, 16);
val[startindex] = tmpint;
for (i = (startindex + 1); i < IB_CC_PORT_MASK_DATA_SIZE; i++) {
memcpy(tmpbuf, strptr, 2);
strptr += 2;
tmpint = strtoul(tmpbuf, NULL, 16);
val[i] = tmpint;
}
if (memcmp(val, p_val1, IB_CC_PORT_MASK_DATA_SIZE)) {
log_config_value(p_key, "%s", p_val_str);
if (pfn)
pfn(p_subn, val);
memcpy(p_val1, val, IB_CC_PORT_MASK_DATA_SIZE);
memcpy(p_val2, val, IB_CC_PORT_MASK_DATA_SIZE);
}
}
static void opts_parse_cct_entry(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cct_entry_t *p_cct1 = p_v1, *p_cct2 = p_v2;
osm_cct_entry_t cct;
char buf[512] = { 0 };
char *ptr;
strncpy(buf, p_val_str, 511);
if (!(ptr = strchr(buf, ':'))) {
log_report("invalid CCT entry\n");
return;
}
*ptr = '\0';
ptr++;
cct.shift = strtoul(buf, NULL, 0);
cct.multiplier = strtoul(ptr, NULL, 0);
if (cct.shift != p_cct1->shift
|| cct.multiplier != p_cct1->multiplier) {
log_config_value(p_key, "%s", p_val_str);
if (pfn)
pfn(p_subn, &cct);
p_cct1->shift = p_cct2->shift = cct.shift;
p_cct1->multiplier = p_cct2->multiplier = cct.multiplier;
}
}
static void opts_parse_cc_cct(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cct_t *p_val1 = p_v1, *p_val2 = p_v2;
const char *current_str = p_val1->input_str ? p_val1->input_str : null_str;
if (p_val_str && strcmp(p_val_str, current_str)) {
osm_cct_t newcct;
char *new;
unsigned int len = 0;
char *lasts;
char *tok;
char *ptr;
/* special case the "(null)" string */
new = strcmp(null_str, p_val_str) ? strdup(p_val_str) : NULL;
if (!new) {
log_config_value(p_key, "%s", p_val_str);
if (pfn)
pfn(p_subn, NULL);
memset(p_val1->entries, '\0', sizeof(p_val1->entries));
memset(p_val2->entries, '\0', sizeof(p_val2->entries));
p_val1->entries_len = p_val2->entries_len = 0;
p_val1->input_str = p_val2->input_str = NULL;
return;
}
memset(&newcct, '\0', sizeof(newcct));
tok = strtok_r(new, ",", &lasts);
while (tok && len < OSM_CCT_ENTRY_MAX) {
if (!(ptr = strchr(tok, ':'))) {
log_report("invalid CCT entry\n");
free(new);
return;
}
*ptr = '\0';
ptr++;
newcct.entries[len].shift = strtoul(tok, NULL, 0);
newcct.entries[len].multiplier = strtoul(ptr, NULL, 0);
len++;
tok = strtok_r(NULL, ",", &lasts);
}
free(new);
newcct.entries_len = len;
newcct.input_str = strdup(p_val_str);
log_config_value(p_key, "%s", p_val_str);
if (pfn)
pfn(p_subn, &newcct);
if (p_val1->input_str && p_val1->input_str != p_val2->input_str)
free(p_val1->input_str);
if (p_val2->input_str)
free(p_val2->input_str);
memcpy(p_val1->entries, newcct.entries, sizeof(newcct.entries));
memcpy(p_val2->entries, newcct.entries, sizeof(newcct.entries));
p_val1->entries_len = p_val2->entries_len = newcct.entries_len;
p_val1->input_str = p_val2->input_str = newcct.input_str;
}
}
static int parse_ca_cong_common(char *p_val_str, uint8_t *sl, unsigned int *val_offset) {
char *new, *lasts, *sl_str, *val_str;
uint8_t sltmp;
new = strcmp(null_str, p_val_str) ? strdup(p_val_str) : NULL;
if (!new)
return -1;
sl_str = strtok_r(new, " \t", &lasts);
val_str = strtok_r(NULL, " \t", &lasts);
if (!val_str) {
log_report("value must be specified in addition to SL\n");
free(new);
return -1;
}
sltmp = strtoul(sl_str, NULL, 0);
if (sltmp >= IB_CA_CONG_ENTRY_DATA_SIZE) {
log_report("invalid SL specified\n");
free(new);
return -1;
}
*sl = sltmp;
*val_offset = (unsigned int)(val_str - new);
free(new);
return 0;
}
static void opts_parse_ccti_timer(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cacongestion_entry_t *p_val1 = p_v1, *p_val2 = p_v2;
unsigned int val_offset = 0;
uint8_t sl = 0;
if (parse_ca_cong_common(p_val_str, &sl, &val_offset) < 0)
return;
opts_parse_net16(p_subn, p_key, p_val_str + val_offset,
&p_val1[sl].ccti_timer,
&p_val2[sl].ccti_timer,
pfn);
}
static void opts_parse_ccti_increase(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cacongestion_entry_t *p_val1 = p_v1, *p_val2 = p_v2;
unsigned int val_offset = 0;
uint8_t sl = 0;
if (parse_ca_cong_common(p_val_str, &sl, &val_offset) < 0)
return;
opts_parse_uint8(p_subn, p_key, p_val_str + val_offset,
&p_val1[sl].ccti_increase,
&p_val2[sl].ccti_increase,
pfn);
}
static void opts_parse_trigger_threshold(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cacongestion_entry_t *p_val1 = p_v1, *p_val2 = p_v2;
unsigned int val_offset = 0;
uint8_t sl = 0;
if (parse_ca_cong_common(p_val_str, &sl, &val_offset) < 0)
return;
opts_parse_uint8(p_subn, p_key, p_val_str + val_offset,
&p_val1[sl].trigger_threshold,
&p_val2[sl].trigger_threshold,
pfn);
}
static void opts_parse_ccti_min(IN osm_subn_t *p_subn, IN char *p_key,
IN char *p_val_str, void *p_v1, void *p_v2,
void (*pfn)(osm_subn_t *, void *))
{
osm_cacongestion_entry_t *p_val1 = p_v1, *p_val2 = p_v2;
unsigned int val_offset = 0;
uint8_t sl = 0;
if (parse_ca_cong_common(p_val_str, &sl, &val_offset) < 0)
return;
opts_parse_uint8(p_subn, p_key, p_val_str + val_offset,
&p_val1[sl].ccti_min,
&p_val2[sl].ccti_min,
pfn);
}
static const opt_rec_t opt_tbl[] = {
{ "guid", OPT_OFFSET(guid), opts_parse_net64, NULL, 0 },
{ "m_key", OPT_OFFSET(m_key), opts_parse_net64, NULL, 1 },
{ "sm_key", OPT_OFFSET(sm_key), opts_parse_net64, NULL, 1 },
{ "sa_key", OPT_OFFSET(sa_key), opts_parse_net64, NULL, 1 },
{ "subnet_prefix", OPT_OFFSET(subnet_prefix), opts_parse_net64, NULL, 0 },
{ "m_key_lease_period", OPT_OFFSET(m_key_lease_period), opts_parse_net16, NULL, 1 },
{ "m_key_protection_level", OPT_OFFSET(m_key_protect_bits), opts_parse_uint8, NULL, 1 },
{ "m_key_lookup", OPT_OFFSET(m_key_lookup), opts_parse_boolean, NULL, 1 },
{ "sweep_interval", OPT_OFFSET(sweep_interval), opts_parse_uint32, NULL, 1 },
{ "max_wire_smps", OPT_OFFSET(max_wire_smps), opts_parse_uint32, NULL, 1 },
{ "max_wire_smps2", OPT_OFFSET(max_wire_smps2), opts_parse_uint32, NULL, 1 },
{ "max_smps_timeout", OPT_OFFSET(max_smps_timeout), opts_parse_uint32, NULL, 1 },
{ "console", OPT_OFFSET(console), opts_parse_charp, NULL, 0 },
{ "console_port", OPT_OFFSET(console_port), opts_parse_uint16, NULL, 0 },
{ "transaction_timeout", OPT_OFFSET(transaction_timeout), opts_parse_uint32, NULL, 0 },
{ "transaction_retries", OPT_OFFSET(transaction_retries), opts_parse_uint32, NULL, 0 },
{ "long_transaction_timeout", OPT_OFFSET(long_transaction_timeout), opts_parse_uint32, NULL, 0 },
{ "max_msg_fifo_timeout", OPT_OFFSET(max_msg_fifo_timeout), opts_parse_uint32, NULL, 1 },
{ "sm_priority", OPT_OFFSET(sm_priority), opts_parse_uint8, opts_setup_sm_priority, 1 },
{ "lmc", OPT_OFFSET(lmc), opts_parse_uint8, NULL, 0 },
{ "lmc_esp0", OPT_OFFSET(lmc_esp0), opts_parse_boolean, NULL, 0 },
{ "max_op_vls", OPT_OFFSET(max_op_vls), opts_parse_uint8, NULL, 1 },
{ "force_link_speed", OPT_OFFSET(force_link_speed), opts_parse_uint8, NULL, 1 },
{ "force_link_speed_ext", OPT_OFFSET(force_link_speed_ext), opts_parse_uint8, NULL, 1 },
{ "force_link_width", OPT_OFFSET(force_link_width), opts_parse_uint8, NULL, 1 },
{ "fdr10", OPT_OFFSET(fdr10), opts_parse_uint8, NULL, 1 },
{ "reassign_lids", OPT_OFFSET(reassign_lids), opts_parse_boolean, NULL, 1 },
{ "ignore_other_sm", OPT_OFFSET(ignore_other_sm), opts_parse_boolean, NULL, 1 },
{ "single_thread", OPT_OFFSET(single_thread), opts_parse_boolean, NULL, 0 },
{ "disable_multicast", OPT_OFFSET(disable_multicast), opts_parse_boolean, NULL, 1 },
{ "subnet_timeout", OPT_OFFSET(subnet_timeout), opts_parse_uint8, NULL, 1 },
{ "packet_life_time", OPT_OFFSET(packet_life_time), opts_parse_uint8, NULL, 1 },
{ "vl_stall_count", OPT_OFFSET(vl_stall_count), opts_parse_uint8, NULL, 1 },
{ "leaf_vl_stall_count", OPT_OFFSET(leaf_vl_stall_count), opts_parse_uint8, NULL, 1 },
{ "head_of_queue_lifetime", OPT_OFFSET(head_of_queue_lifetime), opts_parse_uint8, NULL, 1 },
{ "leaf_head_of_queue_lifetime", OPT_OFFSET(leaf_head_of_queue_lifetime), opts_parse_uint8, NULL, 1 },
{ "local_phy_errors_threshold", OPT_OFFSET(local_phy_errors_threshold), opts_parse_uint8, NULL, 1 },
{ "overrun_errors_threshold", OPT_OFFSET(overrun_errors_threshold), opts_parse_uint8, NULL, 1 },
{ "use_mfttop", OPT_OFFSET(use_mfttop), opts_parse_boolean, NULL, 1},
{ "sminfo_polling_timeout", OPT_OFFSET(sminfo_polling_timeout), opts_parse_uint32, opts_setup_sminfo_polling_timeout, 1 },
{ "polling_retry_number", OPT_OFFSET(polling_retry_number), opts_parse_uint32, NULL, 1 },
{ "force_heavy_sweep", OPT_OFFSET(force_heavy_sweep), opts_parse_boolean, NULL, 1 },
{ "port_prof_ignore_file", OPT_OFFSET(port_prof_ignore_file), opts_parse_charp, NULL, 0 },
{ "hop_weights_file", OPT_OFFSET(hop_weights_file), opts_parse_charp, NULL, 0 },
{ "dimn_ports_file", OPT_OFFSET(port_search_ordering_file), opts_parse_charp, NULL, 0 },
{ "port_search_ordering_file", OPT_OFFSET(port_search_ordering_file), opts_parse_charp, NULL, 0 },
{ "port_profile_switch_nodes", OPT_OFFSET(port_profile_switch_nodes), opts_parse_boolean, NULL, 1 },
{ "sweep_on_trap", OPT_OFFSET(sweep_on_trap), opts_parse_boolean, NULL, 1 },
{ "routing_engine", OPT_OFFSET(routing_engine_names), opts_parse_charp, NULL, 0 },
{ "avoid_throttled_links", OPT_OFFSET(avoid_throttled_links), opts_parse_boolean, NULL, 0 },
{ "connect_roots", OPT_OFFSET(connect_roots), opts_parse_boolean, NULL, 1 },
{ "use_ucast_cache", OPT_OFFSET(use_ucast_cache), opts_parse_boolean, NULL, 0 },
{ "log_file", OPT_OFFSET(log_file), opts_parse_charp, NULL, 0 },
{ "log_max_size", OPT_OFFSET(log_max_size), opts_parse_uint32, opts_setup_log_max_size, 1 },
{ "log_flags", OPT_OFFSET(log_flags), opts_parse_uint8, opts_setup_log_flags, 1 },
{ "force_log_flush", OPT_OFFSET(force_log_flush), opts_parse_boolean, opts_setup_force_log_flush, 1 },
{ "accum_log_file", OPT_OFFSET(accum_log_file), opts_parse_boolean, opts_setup_accum_log_file, 1 },
{ "partition_config_file", OPT_OFFSET(partition_config_file), opts_parse_charp, NULL, 0 },
{ "no_partition_enforcement", OPT_OFFSET(no_partition_enforcement), opts_parse_boolean, NULL, 1 },
{ "part_enforce", OPT_OFFSET(part_enforce), opts_parse_charp, NULL, 1 },
{ "allow_both_pkeys", OPT_OFFSET(allow_both_pkeys), opts_parse_boolean, NULL, 0 },
{ "keep_pkey_indexes", OPT_OFFSET(keep_pkey_indexes), opts_parse_boolean, NULL, 1 },
{ "sm_assigned_guid", OPT_OFFSET(sm_assigned_guid), opts_parse_uint8, NULL, 1 },
{ "qos", OPT_OFFSET(qos), opts_parse_boolean, NULL, 1 },
{ "qos_policy_file", OPT_OFFSET(qos_policy_file), opts_parse_charp, NULL, 0 },
{ "suppress_sl2vl_mad_status_errors", OPT_OFFSET(suppress_sl2vl_mad_status_errors), opts_parse_boolean, NULL, 1 },
{ "dump_files_dir", OPT_OFFSET(dump_files_dir), opts_parse_charp, NULL, 0 },
{ "lid_matrix_dump_file", OPT_OFFSET(lid_matrix_dump_file), opts_parse_charp, NULL, 0 },
{ "lfts_file", OPT_OFFSET(lfts_file), opts_parse_charp, NULL, 0 },
{ "root_guid_file", OPT_OFFSET(root_guid_file), opts_parse_charp, NULL, 0 },
{ "cn_guid_file", OPT_OFFSET(cn_guid_file), opts_parse_charp, NULL, 0 },
{ "io_guid_file", OPT_OFFSET(io_guid_file), opts_parse_charp, NULL, 0 },
{ "port_shifting", OPT_OFFSET(port_shifting), opts_parse_boolean, NULL, 1 },
{ "scatter_ports", OPT_OFFSET(scatter_ports), opts_parse_uint32, NULL, 1 },
{ "max_reverse_hops", OPT_OFFSET(max_reverse_hops), opts_parse_uint16, NULL, 0 },
{ "ids_guid_file", OPT_OFFSET(ids_guid_file), opts_parse_charp, NULL, 0 },
{ "guid_routing_order_file", OPT_OFFSET(guid_routing_order_file), opts_parse_charp, NULL, 0 },
{ "guid_routing_order_no_scatter", OPT_OFFSET(guid_routing_order_no_scatter), opts_parse_boolean, NULL, 0 },
{ "sa_db_file", OPT_OFFSET(sa_db_file), opts_parse_charp, NULL, 0 },
{ "sa_db_dump", OPT_OFFSET(sa_db_dump), opts_parse_boolean, NULL, 1 },
{ "torus_config", OPT_OFFSET(torus_conf_file), opts_parse_charp, NULL, 1 },
{ "do_mesh_analysis", OPT_OFFSET(do_mesh_analysis), opts_parse_boolean, NULL, 1 },
{ "exit_on_fatal", OPT_OFFSET(exit_on_fatal), opts_parse_boolean, NULL, 1 },
{ "honor_guid2lid_file", OPT_OFFSET(honor_guid2lid_file), opts_parse_boolean, NULL, 1 },
{ "daemon", OPT_OFFSET(daemon), opts_parse_boolean, NULL, 0 },
{ "sm_inactive", OPT_OFFSET(sm_inactive), opts_parse_boolean, NULL, 1 },
{ "babbling_port_policy", OPT_OFFSET(babbling_port_policy), opts_parse_boolean, NULL, 1 },
{ "drop_event_subscriptions", OPT_OFFSET(drop_event_subscriptions), opts_parse_boolean, NULL, 1 },
{ "ipoib_mcgroup_creation_validation", OPT_OFFSET(ipoib_mcgroup_creation_validation), opts_parse_boolean, NULL, 1 },
{ "mcgroup_join_validation", OPT_OFFSET(mcgroup_join_validation), opts_parse_boolean, NULL, 1 },
{ "use_original_extended_sa_rates_only", OPT_OFFSET(use_original_extended_sa_rates_only), opts_parse_boolean, NULL, 1 },
{ "use_optimized_slvl", OPT_OFFSET(use_optimized_slvl), opts_parse_boolean, NULL, 1 },
{ "fsync_high_avail_files", OPT_OFFSET(fsync_high_avail_files), opts_parse_boolean, NULL, 1 },
#ifdef ENABLE_OSM_PERF_MGR
{ "perfmgr", OPT_OFFSET(perfmgr), opts_parse_boolean, NULL, 0 },
{ "perfmgr_redir", OPT_OFFSET(perfmgr_redir), opts_parse_boolean, NULL, 0 },
{ "perfmgr_sweep_time_s", OPT_OFFSET(perfmgr_sweep_time_s), opts_parse_uint16, NULL, 0 },
{ "perfmgr_max_outstanding_queries", OPT_OFFSET(perfmgr_max_outstanding_queries), opts_parse_uint32, NULL, 0 },
{ "perfmgr_ignore_cas", OPT_OFFSET(perfmgr_ignore_cas), opts_parse_boolean, NULL, 0 },
{ "event_db_dump_file", OPT_OFFSET(event_db_dump_file), opts_parse_charp, NULL, 0 },
{ "perfmgr_rm_nodes", OPT_OFFSET(perfmgr_rm_nodes), opts_parse_boolean, NULL, 0 },
{ "perfmgr_log_errors", OPT_OFFSET(perfmgr_log_errors), opts_parse_boolean, NULL, 0 },
{ "perfmgr_query_cpi", OPT_OFFSET(perfmgr_query_cpi), opts_parse_boolean, NULL, 0 },
{ "perfmgr_xmit_wait_log", OPT_OFFSET(perfmgr_xmit_wait_log), opts_parse_boolean, NULL, 0 },
{ "perfmgr_xmit_wait_threshold", OPT_OFFSET(perfmgr_xmit_wait_threshold), opts_parse_uint32, NULL, 0 },
#endif /* ENABLE_OSM_PERF_MGR */
{ "event_plugin_name", OPT_OFFSET(event_plugin_name), opts_parse_charp, NULL, 0 },
{ "event_plugin_options", OPT_OFFSET(event_plugin_options), opts_parse_charp, NULL, 0 },
{ "node_name_map_name", OPT_OFFSET(node_name_map_name), opts_parse_charp, NULL, 0 },
{ "qos_max_vls", OPT_OFFSET(qos_options.max_vls), opts_parse_uint32, NULL, 1 },
{ "qos_high_limit", OPT_OFFSET(qos_options.high_limit), opts_parse_int32, NULL, 1 },
{ "qos_vlarb_high", OPT_OFFSET(qos_options.vlarb_high), opts_parse_charp, NULL, 1 },
{ "qos_vlarb_low", OPT_OFFSET(qos_options.vlarb_low), opts_parse_charp, NULL, 1 },
{ "qos_sl2vl", OPT_OFFSET(qos_options.sl2vl), opts_parse_charp, NULL, 1 },
{ "qos_ca_max_vls", OPT_OFFSET(qos_ca_options.max_vls), opts_parse_uint32, NULL, 1 },
{ "qos_ca_high_limit", OPT_OFFSET(qos_ca_options.high_limit), opts_parse_int32, NULL, 1 },
{ "qos_ca_vlarb_high", OPT_OFFSET(qos_ca_options.vlarb_high), opts_parse_charp, NULL, 1 },
{ "qos_ca_vlarb_low", OPT_OFFSET(qos_ca_options.vlarb_low), opts_parse_charp, NULL, 1 },
{ "qos_ca_sl2vl", OPT_OFFSET(qos_ca_options.sl2vl), opts_parse_charp, NULL, 1 },
{ "qos_sw0_max_vls", OPT_OFFSET(qos_sw0_options.max_vls), opts_parse_uint32, NULL, 1 },
{ "qos_sw0_high_limit", OPT_OFFSET(qos_sw0_options.high_limit), opts_parse_int32, NULL, 1 },
{ "qos_sw0_vlarb_high", OPT_OFFSET(qos_sw0_options.vlarb_high), opts_parse_charp, NULL, 1 },
{ "qos_sw0_vlarb_low", OPT_OFFSET(qos_sw0_options.vlarb_low), opts_parse_charp, NULL, 1 },
{ "qos_sw0_sl2vl", OPT_OFFSET(qos_sw0_options.sl2vl), opts_parse_charp, NULL, 1 },
{ "qos_swe_max_vls", OPT_OFFSET(qos_swe_options.max_vls), opts_parse_uint32, NULL, 1 },
{ "qos_swe_high_limit", OPT_OFFSET(qos_swe_options.high_limit), opts_parse_int32, NULL, 1 },
{ "qos_swe_vlarb_high", OPT_OFFSET(qos_swe_options.vlarb_high), opts_parse_charp, NULL, 1 },
{ "qos_swe_vlarb_low", OPT_OFFSET(qos_swe_options.vlarb_low), opts_parse_charp, NULL, 1 },
{ "qos_swe_sl2vl", OPT_OFFSET(qos_swe_options.sl2vl), opts_parse_charp, NULL, 1 },
{ "qos_rtr_max_vls", OPT_OFFSET(qos_rtr_options.max_vls), opts_parse_uint32, NULL, 1 },
{ "qos_rtr_high_limit", OPT_OFFSET(qos_rtr_options.high_limit), opts_parse_int32, NULL, 1 },
{ "qos_rtr_vlarb_high", OPT_OFFSET(qos_rtr_options.vlarb_high), opts_parse_charp, NULL, 1 },
{ "qos_rtr_vlarb_low", OPT_OFFSET(qos_rtr_options.vlarb_low), opts_parse_charp, NULL, 1 },
{ "qos_rtr_sl2vl", OPT_OFFSET(qos_rtr_options.sl2vl), opts_parse_charp, NULL, 1 },
{ "congestion_control", OPT_OFFSET(congestion_control), opts_parse_boolean, NULL, 1 },
{ "cc_key", OPT_OFFSET(cc_key), opts_parse_net64, NULL, 0},
{ "cc_max_outstanding_mads", OPT_OFFSET(cc_max_outstanding_mads), opts_parse_uint32, NULL, 0 },
{ "cc_sw_cong_setting_control_map", OPT_OFFSET(cc_sw_cong_setting_control_map), opts_parse_net32, NULL, 1},
{ "cc_sw_cong_setting_victim_mask", OPT_OFFSET(cc_sw_cong_setting_victim_mask), opts_parse_256bit, NULL, 1},
{ "cc_sw_cong_setting_credit_mask", OPT_OFFSET(cc_sw_cong_setting_credit_mask), opts_parse_256bit, NULL, 1},
{ "cc_sw_cong_setting_threshold", OPT_OFFSET(cc_sw_cong_setting_threshold), opts_parse_uint8, NULL, 1},
{ "cc_sw_cong_setting_packet_size", OPT_OFFSET(cc_sw_cong_setting_packet_size), opts_parse_uint8, NULL, 1},
{ "cc_sw_cong_setting_credit_starvation_threshold", OPT_OFFSET(cc_sw_cong_setting_credit_starvation_threshold), opts_parse_uint8, NULL, 1},
{ "cc_sw_cong_setting_credit_starvation_return_delay", OPT_OFFSET(cc_sw_cong_setting_credit_starvation_return_delay), opts_parse_cct_entry, NULL, 1},
{ "cc_sw_cong_setting_marking_rate", OPT_OFFSET(cc_sw_cong_setting_marking_rate), opts_parse_net16, NULL, 1},
{ "cc_ca_cong_setting_port_control", OPT_OFFSET(cc_ca_cong_setting_port_control), opts_parse_net16, NULL, 1},
{ "cc_ca_cong_setting_control_map", OPT_OFFSET(cc_ca_cong_setting_control_map), opts_parse_net16, NULL, 1},
{ "cc_ca_cong_setting_ccti_timer", OPT_OFFSET(cc_ca_cong_entries), opts_parse_ccti_timer, NULL, 1},
{ "cc_ca_cong_setting_ccti_increase", OPT_OFFSET(cc_ca_cong_entries), opts_parse_ccti_increase, NULL, 1},
{ "cc_ca_cong_setting_trigger_threshold", OPT_OFFSET(cc_ca_cong_entries), opts_parse_trigger_threshold, NULL, 1},
{ "cc_ca_cong_setting_ccti_min", OPT_OFFSET(cc_ca_cong_entries), opts_parse_ccti_min, NULL, 1},
{ "cc_cct", OPT_OFFSET(cc_cct), opts_parse_cc_cct, NULL, 1},
{ "enable_quirks", OPT_OFFSET(enable_quirks), opts_parse_boolean, NULL, 1 },
{ "no_clients_rereg", OPT_OFFSET(no_clients_rereg), opts_parse_boolean, NULL, 1 },
{ "prefix_routes_file", OPT_OFFSET(prefix_routes_file), opts_parse_charp, NULL, 0 },
{ "consolidate_ipv6_snm_req", OPT_OFFSET(consolidate_ipv6_snm_req), opts_parse_boolean, NULL, 1 },
{ "lash_start_vl", OPT_OFFSET(lash_start_vl), opts_parse_uint8, NULL, 1 },
{ "sm_sl", OPT_OFFSET(sm_sl), opts_parse_uint8, NULL, 1 },
{ "nue_max_num_vls", OPT_OFFSET(nue_max_num_vls), opts_parse_uint8, NULL, 1 },
{ "nue_include_switches", OPT_OFFSET(nue_include_switches), opts_parse_boolean, NULL, 0 },
{ "log_prefix", OPT_OFFSET(log_prefix), opts_parse_charp, NULL, 1 },
{ "per_module_logging_file", OPT_OFFSET(per_module_logging_file), opts_parse_charp, NULL, 0 },
{ "quasi_ftree_indexing", OPT_OFFSET(quasi_ftree_indexing), opts_parse_boolean, NULL, 1 },
{0}
};
static int compar_mgids(const void *m1, const void *m2)
{
return memcmp(m1, m2, sizeof(ib_gid_t));
}
static void subn_validate_g2m(osm_subn_t *p_subn)
{
cl_qlist_t guids;
osm_db_guid_elem_t *p_item;
uint64_t mkey;
boolean_t valid_entry;
OSM_LOG_ENTER(&(p_subn->p_osm->log));
cl_qlist_init(&guids);
if (osm_db_guid2mkey_guids(p_subn->p_g2m, &guids)) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR, "ERR 7506: "
"could not get mkey guid list\n");
goto Exit;
}
while ((p_item = (osm_db_guid_elem_t *) cl_qlist_remove_head(&guids))
!= (osm_db_guid_elem_t *) cl_qlist_end(&guids)) {
valid_entry = TRUE;
if (p_item->guid == 0) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7507: found invalid zero guid");
valid_entry = FALSE;
} else if (osm_db_guid2mkey_get(p_subn->p_g2m, p_item->guid,
&mkey)) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7508: could not get mkey for guid:0x%016"
PRIx64 "\n", p_item->guid);
valid_entry = FALSE;
}
if (valid_entry == FALSE) {
if (osm_db_guid2mkey_delete(p_subn->p_g2m,
p_item->guid))
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7509: failed to delete entry for "
"guid:0x%016" PRIx64 "\n",
p_item->guid);
}
free(p_item);
}
Exit:
OSM_LOG_EXIT(&(p_subn->p_osm->log));
}
static void subn_validate_neighbor(osm_subn_t *p_subn)
{
cl_qlist_t entries;
osm_db_neighbor_elem_t *p_item;
boolean_t valid_entry;
uint64_t guid;
uint8_t port;
OSM_LOG_ENTER(&(p_subn->p_osm->log));
cl_qlist_init(&entries);
if (osm_db_neighbor_guids(p_subn->p_neighbor, &entries)) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR, "ERR 7512: "
"could not get neighbor entry list\n");
goto Exit;
}
while ((p_item =
(osm_db_neighbor_elem_t *) cl_qlist_remove_head(&entries))
!= (osm_db_neighbor_elem_t *) cl_qlist_end(&entries)) {
valid_entry = TRUE;
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_DEBUG,
"Validating neighbor for guid:0x%016" PRIx64
", port %d\n",
p_item->guid, p_item->portnum);
if (p_item->guid == 0) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7513: found invalid zero guid\n");
valid_entry = FALSE;
} else if (p_item->portnum == 0) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7514: found invalid zero port for "
"guid: 0x%016" PRIx64 "\n",
p_item->guid);
valid_entry = FALSE;
} else if (osm_db_neighbor_get(p_subn->p_neighbor,
p_item->guid, p_item->portnum,
&guid, &port)) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7515: could not find neighbor for "
"guid: 0x%016" PRIx64 ", port %d\n",
p_item->guid, p_item->portnum);
valid_entry = FALSE;
} else if (guid == 0) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7516: found invalid neighbor "
"zero guid for guid: 0x%016" PRIx64
", port %d\n",
p_item->guid, p_item->portnum);
valid_entry = FALSE;
} else if (port == 0) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7517: found invalid neighbor "
"zero port for guid: 0x%016" PRIx64
", port %d\n",
p_item->guid, p_item->portnum);
valid_entry = FALSE;
} else if (osm_db_neighbor_get(p_subn->p_neighbor,
guid, port, &guid, &port) ||
guid != p_item->guid || port != p_item->portnum) {
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7518: neighbor does not point "
"back at us (guid: 0x%016" PRIx64
", port %d)\n",
p_item->guid, p_item->portnum);
valid_entry = FALSE;
}
if (valid_entry == FALSE) {
if (osm_db_neighbor_delete(p_subn->p_neighbor,
p_item->guid,
p_item->portnum))
OSM_LOG(&(p_subn->p_osm->log), OSM_LOG_ERROR,
"ERR 7519: failed to delete entry for "
"guid:0x%016" PRIx64 " port:%u\n",
p_item->guid, p_item->portnum);
}
free(p_item);
}
Exit:
OSM_LOG_EXIT(&(p_subn->p_osm->log));
}
void osm_subn_construct(IN osm_subn_t * p_subn)
{
memset(p_subn, 0, sizeof(*p_subn));
cl_ptr_vector_construct(&p_subn->port_lid_tbl);
cl_qmap_init(&p_subn->sw_guid_tbl);
cl_qmap_init(&p_subn->node_guid_tbl);
cl_qmap_init(&p_subn->port_guid_tbl);
cl_qmap_init(&p_subn->alias_port_guid_tbl);
cl_qmap_init(&p_subn->assigned_guids_tbl);
cl_qmap_init(&p_subn->sm_guid_tbl);
cl_qlist_init(&p_subn->sa_sr_list);
cl_qlist_init(&p_subn->sa_infr_list);
cl_qlist_init(&p_subn->alias_guid_list);
cl_qlist_init(&p_subn->prefix_routes_list);
cl_qmap_init(&p_subn->rtr_guid_tbl);
cl_qmap_init(&p_subn->prtn_pkey_tbl);
cl_fmap_init(&p_subn->mgrp_mgid_tbl, compar_mgids);
}
static void subn_destroy_qos_options(osm_qos_options_t *opt)
{
free(opt->vlarb_high);
free(opt->vlarb_low);
free(opt->sl2vl);
}
static void subn_opt_destroy(IN osm_subn_opt_t * p_opt)
{
free(p_opt->console);
free(p_opt->port_prof_ignore_file);
free(p_opt->hop_weights_file);
free(p_opt->port_search_ordering_file);
free(p_opt->routing_engine_names);
free(p_opt->log_file);
free(p_opt->partition_config_file);
free(p_opt->qos_policy_file);
free(p_opt->dump_files_dir);
free(p_opt->part_enforce);
free(p_opt->lid_matrix_dump_file);
free(p_opt->lfts_file);
free(p_opt->root_guid_file);
free(p_opt->cn_guid_file);
free(p_opt->io_guid_file);
free(p_opt->ids_guid_file);
free(p_opt->guid_routing_order_file);
free(p_opt->sa_db_file);
free(p_opt->torus_conf_file);
#ifdef ENABLE_OSM_PERF_MGR
free(p_opt->event_db_dump_file);
#endif /* ENABLE_OSM_PERF_MGR */
free(p_opt->event_plugin_name);
free(p_opt->event_plugin_options);
free(p_opt->node_name_map_name);
free(p_opt->prefix_routes_file);
free(p_opt->log_prefix);
free(p_opt->per_module_logging_file);
subn_destroy_qos_options(&p_opt->qos_options);
subn_destroy_qos_options(&p_opt->qos_ca_options);
subn_destroy_qos_options(&p_opt->qos_sw0_options);
subn_destroy_qos_options(&p_opt->qos_swe_options);
subn_destroy_qos_options(&p_opt->qos_rtr_options);
free(p_opt->cc_cct.input_str);
}
void osm_subn_destroy(IN osm_subn_t * p_subn)
{
int i;
osm_node_t *p_node, *p_next_node;
osm_assigned_guids_t *p_assigned_guids, *p_next_assigned_guids;
osm_alias_guid_t *p_alias_guid, *p_next_alias_guid;
osm_port_t *p_port, *p_next_port;
osm_switch_t *p_sw, *p_next_sw;
osm_remote_sm_t *p_rsm, *p_next_rsm;
osm_prtn_t *p_prtn, *p_next_prtn;
osm_infr_t *p_infr, *p_next_infr;
osm_svcr_t *p_svcr, *p_next_svcr;
/* it might be a good idea to de-allocate all known objects */
p_next_node = (osm_node_t *) cl_qmap_head(&p_subn->node_guid_tbl);
while (p_next_node !=
(osm_node_t *) cl_qmap_end(&p_subn->node_guid_tbl)) {
p_node = p_next_node;
p_next_node = (osm_node_t *) cl_qmap_next(&p_node->map_item);
osm_node_delete(&p_node);
}
p_next_assigned_guids = (osm_assigned_guids_t *) cl_qmap_head(&p_subn->assigned_guids_tbl);
while (p_next_assigned_guids !=
(osm_assigned_guids_t *) cl_qmap_end(&p_subn->assigned_guids_tbl)) {
p_assigned_guids = p_next_assigned_guids;
p_next_assigned_guids = (osm_assigned_guids_t *) cl_qmap_next(&p_assigned_guids->map_item);
osm_assigned_guids_delete(&p_assigned_guids);
}
p_next_alias_guid = (osm_alias_guid_t *) cl_qmap_head(&p_subn->alias_port_guid_tbl);
while (p_next_alias_guid !=
(osm_alias_guid_t *) cl_qmap_end(&p_subn->alias_port_guid_tbl)) {
p_alias_guid = p_next_alias_guid;
p_next_alias_guid = (osm_alias_guid_t *) cl_qmap_next(&p_alias_guid->map_item);
osm_alias_guid_delete(&p_alias_guid);
}
while (cl_qlist_count(&p_subn->alias_guid_list))
osm_guid_work_obj_delete((osm_guidinfo_work_obj_t *) cl_qlist_remove_head(&p_subn->alias_guid_list));
p_next_port = (osm_port_t *) cl_qmap_head(&p_subn->port_guid_tbl);
while (p_next_port !=
(osm_port_t *) cl_qmap_end(&p_subn->port_guid_tbl)) {
p_port = p_next_port;
p_next_port = (osm_port_t *) cl_qmap_next(&p_port->map_item);
osm_port_delete(&p_port);
}
p_next_sw = (osm_switch_t *) cl_qmap_head(&p_subn->sw_guid_tbl);
while (p_next_sw != (osm_switch_t *) cl_qmap_end(&p_subn->sw_guid_tbl)) {
p_sw = p_next_sw;
p_next_sw = (osm_switch_t *) cl_qmap_next(&p_sw->map_item);
osm_switch_delete(&p_sw);
}
p_next_rsm = (osm_remote_sm_t *) cl_qmap_head(&p_subn->sm_guid_tbl);
while (p_next_rsm !=
(osm_remote_sm_t *) cl_qmap_end(&p_subn->sm_guid_tbl)) {
p_rsm = p_next_rsm;
p_next_rsm = (osm_remote_sm_t *) cl_qmap_next(&p_rsm->map_item);
free(p_rsm);
}
p_next_prtn = (osm_prtn_t *) cl_qmap_head(&p_subn->prtn_pkey_tbl);
while (p_next_prtn !=
(osm_prtn_t *) cl_qmap_end(&p_subn->prtn_pkey_tbl)) {
p_prtn = p_next_prtn;
p_next_prtn = (osm_prtn_t *) cl_qmap_next(&p_prtn->map_item);
osm_prtn_delete(p_subn, &p_prtn);
}
cl_fmap_remove_all(&p_subn->mgrp_mgid_tbl);
for (i = 0; i <= p_subn->max_mcast_lid_ho - IB_LID_MCAST_START_HO;
i++)
if (p_subn->mboxes[i])
osm_mgrp_box_delete(p_subn->mboxes[i]);
p_next_infr = (osm_infr_t *) cl_qlist_head(&p_subn->sa_infr_list);
while (p_next_infr !=
(osm_infr_t *) cl_qlist_end(&p_subn->sa_infr_list)) {
p_infr = p_next_infr;
p_next_infr = (osm_infr_t *) cl_qlist_next(&p_infr->list_item);
osm_infr_delete(p_infr);
}
p_next_svcr = (osm_svcr_t *) cl_qlist_head(&p_subn->sa_sr_list);
while (p_next_svcr !=
(osm_svcr_t *) cl_qlist_end(&p_subn->sa_sr_list)) {
p_svcr = p_next_svcr;
p_next_svcr = (osm_svcr_t *) cl_qlist_next(&p_svcr->list_item);
osm_svcr_delete(p_svcr);
}
cl_ptr_vector_destroy(&p_subn->port_lid_tbl);
osm_qos_policy_destroy(p_subn->p_qos_policy);
while (!cl_is_qlist_empty(&p_subn->prefix_routes_list)) {
cl_list_item_t *item = cl_qlist_remove_head(&p_subn->prefix_routes_list);
free(item);
}
subn_opt_destroy(&p_subn->opt);
free(p_subn->opt.file_opts);
}
ib_api_status_t osm_subn_init(IN osm_subn_t * p_subn, IN osm_opensm_t * p_osm,
IN const osm_subn_opt_t * p_opt)
{
cl_status_t status;
p_subn->p_osm = p_osm;
status = cl_ptr_vector_init(&p_subn->port_lid_tbl,
OSM_SUBNET_VECTOR_MIN_SIZE,
OSM_SUBNET_VECTOR_GROW_SIZE);
if (status != CL_SUCCESS)
return status;
status = cl_ptr_vector_set_capacity(&p_subn->port_lid_tbl,
OSM_SUBNET_VECTOR_CAPACITY);
if (status != CL_SUCCESS)
return status;
/*
LID zero is not valid. NULL out this entry for the
convenience of other code.
*/
cl_ptr_vector_set(&p_subn->port_lid_tbl, 0, NULL);
p_subn->opt = *p_opt;
p_subn->max_ucast_lid_ho = IB_LID_UCAST_END_HO;
p_subn->max_mcast_lid_ho = IB_LID_MCAST_END_HO;
p_subn->min_ca_mtu = IB_MAX_MTU;
p_subn->min_ca_rate = IB_PATH_RECORD_RATE_300_GBS;
p_subn->min_data_vls = IB_MAX_NUM_VLS - 1;
p_subn->min_sw_data_vls = IB_MAX_NUM_VLS - 1;
p_subn->ignore_existing_lfts = TRUE;
/* we assume master by default - so we only need to set it true if STANDBY */
p_subn->coming_out_of_standby = FALSE;
p_subn->sweeping_enabled = TRUE;
p_subn->last_sm_port_state = 1;
/* Initialize the guid2mkey database */
p_subn->p_g2m = osm_db_domain_init(&(p_osm->db), "guid2mkey");
if (!p_subn->p_g2m) {
OSM_LOG(&(p_osm->log), OSM_LOG_ERROR, "ERR 7510: "
"Error initializing Guid-to-MKey persistent database\n");
return IB_ERROR;
}
if (osm_db_restore(p_subn->p_g2m)) {
#ifndef __WIN__
/*
* When Windows is BSODing, it might corrupt files that
* were previously opened for writing, even if the files
* are closed, so we might see corrupted guid2mkey file.
*/
if (p_subn->opt.exit_on_fatal) {
osm_log(&(p_osm->log), OSM_LOG_SYS,
"FATAL: Error restoring Guid-to-Mkey "
"persistent database\n");
return IB_ERROR;
} else
#endif
OSM_LOG(&(p_osm->log), OSM_LOG_ERROR,
"ERR 7511: Error restoring Guid-to-Mkey "
"persistent database\n");
}
subn_validate_g2m(p_subn);
/* Initialize the neighbor database */
p_subn->p_neighbor = osm_db_domain_init(&(p_osm->db), "neighbors");
if (!p_subn->p_neighbor) {
OSM_LOG(&(p_osm->log), OSM_LOG_ERROR, "ERR 7520: Error "
"initializing neighbor link persistent database\n");
return IB_ERROR;
}
if (osm_db_restore(p_subn->p_neighbor)) {
#ifndef __WIN__
/*
* When Windows is BSODing, it might corrupt files that
* were previously opened for writing, even if the files
* are closed, so we might see corrupted neighbors file.
*/
if (p_subn->opt.exit_on_fatal) {
osm_log(&(p_osm->log), OSM_LOG_SYS,
"FATAL: Error restoring neighbor link "
"persistent database\n");
return IB_ERROR;
} else
#endif
OSM_LOG(&(p_osm->log), OSM_LOG_ERROR,
"ERR 7521: Error restoring neighbor link "
"persistent database\n");
}
subn_validate_neighbor(p_subn);
return IB_SUCCESS;
}
osm_port_t *osm_get_port_by_mad_addr(IN osm_log_t * p_log,
IN const osm_subn_t * p_subn,
IN osm_mad_addr_t * p_mad_addr)
{
osm_port_t *port = osm_get_port_by_lid(p_subn, p_mad_addr->dest_lid);
if (!port)
OSM_LOG(p_log, OSM_LOG_ERROR, "ERR 7504: "
"Lid is out of range: %u\n",
cl_ntoh16(p_mad_addr->dest_lid));
return port;
}
ib_api_status_t osm_get_gid_by_mad_addr(IN osm_log_t * p_log,
IN const osm_subn_t * p_subn,
IN osm_mad_addr_t * p_mad_addr,
OUT ib_gid_t * p_gid)
{
const osm_port_t *p_port;
if (p_gid == NULL) {
OSM_LOG(p_log, OSM_LOG_ERROR, "ERR 7505: "
"Provided output GID is NULL\n");
return IB_INVALID_PARAMETER;
}
p_port = osm_get_port_by_mad_addr(p_log, p_subn, p_mad_addr);
if (!p_port)
return IB_INVALID_PARAMETER;
p_gid->unicast.interface_id = p_port->p_physp->port_guid;
p_gid->unicast.prefix = p_subn->opt.subnet_prefix;
return IB_SUCCESS;
}
osm_physp_t *osm_get_physp_by_mad_addr(IN osm_log_t * p_log,
IN const osm_subn_t * p_subn,
IN osm_mad_addr_t * p_mad_addr)
{
osm_port_t *p_port;
p_port = osm_get_port_by_mad_addr(p_log, p_subn, p_mad_addr);
if (!p_port)
return NULL;
return p_port->p_physp;
}
osm_switch_t *osm_get_switch_by_guid(IN const osm_subn_t * p_subn,
IN ib_net64_t guid)
{
osm_switch_t *p_switch;
p_switch = (osm_switch_t *) cl_qmap_get(&(p_subn->sw_guid_tbl), guid);
if (p_switch == (osm_switch_t *) cl_qmap_end(&(p_subn->sw_guid_tbl)))
p_switch = NULL;
return p_switch;
}
osm_node_t *osm_get_node_by_guid(IN osm_subn_t const *p_subn, IN ib_net64_t guid)
{
osm_node_t *p_node;
p_node = (osm_node_t *) cl_qmap_get(&(p_subn->node_guid_tbl), guid);
if (p_node == (osm_node_t *) cl_qmap_end(&(p_subn->node_guid_tbl)))
p_node = NULL;
return p_node;
}
osm_port_t *osm_get_port_by_guid(IN osm_subn_t const *p_subn, IN ib_net64_t guid)
{
osm_port_t *p_port;
p_port = (osm_port_t *) cl_qmap_get(&(p_subn->port_guid_tbl), guid);
if (p_port == (osm_port_t *) cl_qmap_end(&(p_subn->port_guid_tbl)))
p_port = NULL;
return p_port;
}
osm_alias_guid_t *osm_get_alias_guid_by_guid(IN osm_subn_t const *p_subn,
IN ib_net64_t guid)
{
osm_alias_guid_t *p_alias_guid;
p_alias_guid = (osm_alias_guid_t *) cl_qmap_get(&(p_subn->alias_port_guid_tbl), guid);
if (p_alias_guid == (osm_alias_guid_t *) cl_qmap_end(&(p_subn->alias_port_guid_tbl)))
return NULL;
return p_alias_guid;
}
osm_port_t *osm_get_port_by_alias_guid(IN osm_subn_t const *p_subn,
IN ib_net64_t guid)
{
osm_alias_guid_t *p_alias_guid;
p_alias_guid = osm_get_alias_guid_by_guid(p_subn, guid);
if (!p_alias_guid)
return NULL;
return p_alias_guid->p_base_port;
}
osm_assigned_guids_t *osm_assigned_guids_new(IN const ib_net64_t port_guid,
IN const uint32_t num_guids)
{
osm_assigned_guids_t *p_assigned_guids;
p_assigned_guids = calloc(1, sizeof(*p_assigned_guids) +
sizeof(ib_net64_t) * (num_guids - 1));
if (p_assigned_guids)
p_assigned_guids->port_guid = port_guid;
return p_assigned_guids;
}
void osm_assigned_guids_delete(IN OUT osm_assigned_guids_t ** pp_assigned_guids)
{
free(*pp_assigned_guids);
*pp_assigned_guids = NULL;
}
osm_assigned_guids_t *osm_get_assigned_guids_by_guid(IN osm_subn_t const *p_subn,
IN ib_net64_t port_guid)
{
osm_assigned_guids_t *p_assigned_guids;
p_assigned_guids = (osm_assigned_guids_t *) cl_qmap_get(&(p_subn->assigned_guids_tbl), port_guid);
if (p_assigned_guids == (osm_assigned_guids_t *) cl_qmap_end(&(p_subn->assigned_guids_tbl)))
return NULL;
return p_assigned_guids;
}
osm_port_t *osm_get_port_by_lid_ho(IN osm_subn_t const * subn, IN uint16_t lid)
{
if (lid < cl_ptr_vector_get_size(&subn->port_lid_tbl))
return cl_ptr_vector_get(&subn->port_lid_tbl, lid);
return NULL;
}
osm_mgrp_t *osm_get_mgrp_by_mgid(IN osm_subn_t * subn, IN ib_gid_t * mgid)
{
osm_mgrp_t *mgrp;
mgrp = (osm_mgrp_t *)cl_fmap_get(&subn->mgrp_mgid_tbl, mgid);
if (mgrp != (osm_mgrp_t *)cl_fmap_end(&subn->mgrp_mgid_tbl))
return mgrp;
return NULL;
}
int is_mlnx_ext_port_info_supported(ib_net32_t vendid, ib_net16_t devid)
{
uint32_t vendid_ho;
uint16_t devid_ho;
devid_ho = cl_ntoh16(devid);
if ((devid_ho >= 0xc738 && devid_ho <= 0xc73b) ||
devid_ho == 0xc839 || devid_ho == 0xcb20 ||
devid_ho == 0xcf08 || devid_ho == 0xcf09 || devid_ho == 0xd2f0)
return 1;
if (devid_ho >= 0x1003 && devid_ho <= 0x101b)
return 1;
if (devid_ho == 0xa2d2)
return 1;
vendid_ho = cl_ntoh32(vendid);
if (vendid_ho == 0x119f) {
/* Bull Switch-X */
if (devid_ho == 0x1b02 || devid_ho == 0x1b50)
return 1;
/* Bull Switch-IB/IB2 */
if (devid_ho == 0x1ba0 ||
(devid_ho >= 0x1bd0 && devid_ho <= 0x1bd5))
return 1;
/* Bull Quantum */
if (devid_ho == 0x1bf0)
return 1;
/* Bull Connect-X3 */
if (devid_ho == 0x1b33 || devid_ho == 0x1b73 ||
devid_ho == 0x1b40 || devid_ho == 0x1b41 ||
devid_ho == 0x1b60 || devid_ho == 0x1b61)
return 1;
/* Bull Connect-IB */
if (devid_ho == 0x1b83 ||
devid_ho == 0x1b93 || devid_ho == 0x1b94)
return 1;
/* Bull Connect-X4, Sequana HDR and HDR100 */
if (devid_ho == 0x1bb4 || devid_ho == 0x1bb5 ||
(devid_ho >= 0x1bc4 && devid_ho <= 0x1bc6))
return 1;
}
return 0;
}
static void subn_init_qos_options(osm_qos_options_t *opt, osm_qos_options_t *f)
{
opt->max_vls = 0;
opt->high_limit = -1;
if (opt->vlarb_high)
free(opt->vlarb_high);
opt->vlarb_high = NULL;
if (opt->vlarb_low)
free(opt->vlarb_low);
opt->vlarb_low = NULL;
if (opt->sl2vl)
free(opt->sl2vl);
opt->sl2vl = NULL;
if (f)
memcpy(f, opt, sizeof(*f));
}
void osm_subn_set_default_opt(IN osm_subn_opt_t * p_opt)
{
memset(p_opt, 0, sizeof(osm_subn_opt_t));
p_opt->guid = 0;
p_opt->m_key = OSM_DEFAULT_M_KEY;
p_opt->sm_key = OSM_DEFAULT_SM_KEY;
p_opt->sa_key = OSM_DEFAULT_SA_KEY;
p_opt->subnet_prefix = IB_DEFAULT_SUBNET_PREFIX;
p_opt->m_key_lease_period = 0;
p_opt->m_key_protect_bits = 0;
p_opt->m_key_lookup = TRUE;
p_opt->sweep_interval = OSM_DEFAULT_SWEEP_INTERVAL_SECS;
p_opt->max_wire_smps = OSM_DEFAULT_SMP_MAX_ON_WIRE;
p_opt->max_wire_smps2 = p_opt->max_wire_smps;
p_opt->console = strdup(OSM_DEFAULT_CONSOLE);
p_opt->console_port = OSM_DEFAULT_CONSOLE_PORT;
p_opt->transaction_timeout = OSM_DEFAULT_TRANS_TIMEOUT_MILLISEC;
p_opt->transaction_retries = OSM_DEFAULT_RETRY_COUNT;
p_opt->long_transaction_timeout = OSM_DEFAULT_LONG_TRANS_TIMEOUT_MILLISEC;
p_opt->max_smps_timeout = 1000 * p_opt->transaction_timeout *
p_opt->transaction_retries;
/* by default we will consider waiting for 50x transaction timeout normal */
p_opt->max_msg_fifo_timeout = 50 * OSM_DEFAULT_TRANS_TIMEOUT_MILLISEC;
p_opt->sm_priority = OSM_DEFAULT_SM_PRIORITY;
p_opt->lmc = OSM_DEFAULT_LMC;
p_opt->lmc_esp0 = FALSE;
p_opt->max_op_vls = OSM_DEFAULT_MAX_OP_VLS;
p_opt->force_link_speed = IB_LINK_SPEED_SET_LSS;
p_opt->force_link_speed_ext = IB_LINK_SPEED_EXT_SET_LSES;
p_opt->force_link_width = IB_LINK_WIDTH_SET_LWS;
p_opt->fdr10 = 1;
p_opt->reassign_lids = FALSE;
p_opt->ignore_other_sm = FALSE;
p_opt->single_thread = FALSE;
p_opt->disable_multicast = FALSE;
p_opt->force_log_flush = FALSE;
p_opt->subnet_timeout = OSM_DEFAULT_SUBNET_TIMEOUT;
p_opt->packet_life_time = OSM_DEFAULT_SWITCH_PACKET_LIFE;
p_opt->vl_stall_count = OSM_DEFAULT_VL_STALL_COUNT;
p_opt->leaf_vl_stall_count = OSM_DEFAULT_LEAF_VL_STALL_COUNT;
p_opt->head_of_queue_lifetime = OSM_DEFAULT_HEAD_OF_QUEUE_LIFE;
p_opt->leaf_head_of_queue_lifetime =
OSM_DEFAULT_LEAF_HEAD_OF_QUEUE_LIFE;
p_opt->local_phy_errors_threshold = OSM_DEFAULT_ERROR_THRESHOLD;
p_opt->overrun_errors_threshold = OSM_DEFAULT_ERROR_THRESHOLD;
p_opt->use_mfttop = TRUE;
p_opt->sminfo_polling_timeout =
OSM_SM_DEFAULT_POLLING_TIMEOUT_MILLISECS;
p_opt->polling_retry_number = OSM_SM_DEFAULT_POLLING_RETRY_NUMBER;
p_opt->force_heavy_sweep = FALSE;
p_opt->log_flags = OSM_LOG_DEFAULT_LEVEL;
p_opt->honor_guid2lid_file = FALSE;
p_opt->daemon = FALSE;
p_opt->sm_inactive = FALSE;
p_opt->babbling_port_policy = FALSE;
p_opt->drop_event_subscriptions = FALSE;
p_opt->ipoib_mcgroup_creation_validation = TRUE;
p_opt->mcgroup_join_validation = TRUE;
p_opt->use_original_extended_sa_rates_only = FALSE;
p_opt->use_optimized_slvl = FALSE;
p_opt->fsync_high_avail_files = TRUE;
#ifdef ENABLE_OSM_PERF_MGR
p_opt->perfmgr = FALSE;
p_opt->perfmgr_redir = TRUE;
p_opt->perfmgr_sweep_time_s = OSM_PERFMGR_DEFAULT_SWEEP_TIME_S;
p_opt->perfmgr_max_outstanding_queries =
OSM_PERFMGR_DEFAULT_MAX_OUTSTANDING_QUERIES;
p_opt->perfmgr_ignore_cas = FALSE;
p_opt->event_db_dump_file = NULL; /* use default */
p_opt->perfmgr_rm_nodes = TRUE;
p_opt->perfmgr_log_errors = TRUE;
p_opt->perfmgr_query_cpi = TRUE;
p_opt->perfmgr_xmit_wait_log = FALSE;
p_opt->perfmgr_xmit_wait_threshold = OSM_PERFMGR_DEFAULT_XMIT_WAIT_THRESHOLD;
#endif /* ENABLE_OSM_PERF_MGR */
p_opt->event_plugin_name = NULL;
p_opt->event_plugin_options = NULL;
p_opt->node_name_map_name = NULL;
p_opt->dump_files_dir = getenv("OSM_TMP_DIR");
if (!p_opt->dump_files_dir || !(*p_opt->dump_files_dir))
p_opt->dump_files_dir = strdup(OSM_DEFAULT_TMP_DIR);
else
p_opt->dump_files_dir = strdup(p_opt->dump_files_dir);
p_opt->log_file = strdup(OSM_DEFAULT_LOG_FILE);
p_opt->log_max_size = 0;
p_opt->partition_config_file = strdup(OSM_DEFAULT_PARTITION_CONFIG_FILE);
p_opt->no_partition_enforcement = FALSE;
p_opt->part_enforce = strdup(OSM_PARTITION_ENFORCE_BOTH);
p_opt->allow_both_pkeys = FALSE;
p_opt->keep_pkey_indexes = TRUE;
p_opt->sm_assigned_guid = 0;
p_opt->qos = FALSE;
p_opt->qos_policy_file = strdup(OSM_DEFAULT_QOS_POLICY_FILE);
p_opt->suppress_sl2vl_mad_status_errors = FALSE;
p_opt->accum_log_file = TRUE;
p_opt->port_prof_ignore_file = NULL;
p_opt->hop_weights_file = NULL;
p_opt->port_search_ordering_file = NULL;
p_opt->port_profile_switch_nodes = FALSE;
p_opt->sweep_on_trap = TRUE;
p_opt->use_ucast_cache = FALSE;
p_opt->routing_engine_names = NULL;
p_opt->avoid_throttled_links = FALSE;
p_opt->connect_roots = FALSE;
p_opt->lid_matrix_dump_file = NULL;
p_opt->lfts_file = NULL;
p_opt->root_guid_file = NULL;
p_opt->cn_guid_file = NULL;
p_opt->io_guid_file = NULL;
p_opt->port_shifting = FALSE;
p_opt->scatter_ports = OSM_DEFAULT_SCATTER_PORTS;
p_opt->max_reverse_hops = 0;
p_opt->ids_guid_file = NULL;
p_opt->guid_routing_order_file = NULL;
p_opt->guid_routing_order_no_scatter = FALSE;
p_opt->sa_db_file = NULL;
p_opt->sa_db_dump = FALSE;
p_opt->torus_conf_file = strdup(OSM_DEFAULT_TORUS_CONF_FILE);
p_opt->do_mesh_analysis = FALSE;
p_opt->exit_on_fatal = TRUE;
p_opt->congestion_control = FALSE;
p_opt->cc_key = OSM_DEFAULT_CC_KEY;
p_opt->cc_max_outstanding_mads = OSM_CC_DEFAULT_MAX_OUTSTANDING_QUERIES;
p_opt->enable_quirks = FALSE;
p_opt->no_clients_rereg = FALSE;
p_opt->prefix_routes_file = strdup(OSM_DEFAULT_PREFIX_ROUTES_FILE);
p_opt->consolidate_ipv6_snm_req = FALSE;
p_opt->lash_start_vl = 0;
p_opt->sm_sl = OSM_DEFAULT_SL;
p_opt->nue_max_num_vls = 1;
p_opt->nue_include_switches = FALSE;
p_opt->log_prefix = NULL;
p_opt->per_module_logging_file = strdup(OSM_DEFAULT_PER_MOD_LOGGING_CONF_FILE);
subn_init_qos_options(&p_opt->qos_options, NULL);
subn_init_qos_options(&p_opt->qos_ca_options, NULL);
subn_init_qos_options(&p_opt->qos_sw0_options, NULL);
subn_init_qos_options(&p_opt->qos_swe_options, NULL);
subn_init_qos_options(&p_opt->qos_rtr_options, NULL);
p_opt->cc_cct.entries_len = 0;
p_opt->cc_cct.input_str = NULL;
p_opt->quasi_ftree_indexing = FALSE;
}
static char *clean_val(char *val)
{
char *p = val;
/* clean leading spaces */
while (isspace(*p))
p++;
val = p;
if (!*val)
return val;
/* clean trailing spaces */
p = val + strlen(val) - 1;
while (p > val && isspace(*p))
p--;
p[1] = '\0';
/* clean quotas */
if ((*val == '\"' && *p == '\"') || (*val == '\'' && *p == '\'')) {
val++;
*p-- = '\0';
}
return val;
}
static int subn_dump_qos_options(FILE * file, const char *set_name,
const char *prefix, osm_qos_options_t * opt)
{
return fprintf(file, "# %s\n"
"%s_max_vls %u\n"
"%s_high_limit %d\n"
"%s_vlarb_high %s\n"
"%s_vlarb_low %s\n"
"%s_sl2vl %s\n",
set_name,
prefix, opt->max_vls,
prefix, opt->high_limit,
prefix, opt->vlarb_high,
prefix, opt->vlarb_low, prefix, opt->sl2vl);
}
static ib_api_status_t append_prefix_route(IN osm_subn_t * p_subn,
uint64_t prefix, uint64_t guid)
{
osm_prefix_route_t *route;
route = malloc(sizeof *route);
if (! route) {
OSM_LOG(&p_subn->p_osm->log, OSM_LOG_ERROR, "out of memory");
return IB_ERROR;
}
route->prefix = cl_hton64(prefix);
route->guid = cl_hton64(guid);
cl_qlist_insert_tail(&p_subn->prefix_routes_list, &route->list_item);
return IB_SUCCESS;
}
static ib_api_status_t parse_prefix_routes_file(IN osm_subn_t * p_subn)
{
osm_log_t *log = &p_subn->p_osm->log;
FILE *fp;
char buf[1024];
int line = 0;
int errors = 0;
while (!cl_is_qlist_empty(&p_subn->prefix_routes_list)) {
cl_list_item_t *item = cl_qlist_remove_head(&p_subn->prefix_routes_list);
free(item);
}
fp = fopen(p_subn->opt.prefix_routes_file, "r");
if (! fp) {
if (errno == ENOENT)
return IB_SUCCESS;
OSM_LOG(log, OSM_LOG_ERROR, "fopen(%s) failed: %s",
p_subn->opt.prefix_routes_file, strerror(errno));
return IB_ERROR;
}
while (fgets(buf, sizeof buf, fp) != NULL) {
char *p_prefix, *p_guid, *p_extra, *p_last, *p_end;
uint64_t prefix, guid;
line++;
if (errors > 10)
break;
p_prefix = strtok_r(buf, " \t\n", &p_last);
if (! p_prefix)
continue; /* ignore blank lines */
if (*p_prefix == '#')
continue; /* ignore comment lines */
p_guid = strtok_r(NULL, " \t\n", &p_last);
if (! p_guid) {
OSM_LOG(log, OSM_LOG_ERROR, "%s:%d: missing GUID\n",
p_subn->opt.prefix_routes_file, line);
errors++;
continue;
}
p_extra = strtok_r(NULL, " \t\n", &p_last);
if (p_extra && *p_extra != '#') {
OSM_LOG(log, OSM_LOG_INFO, "%s:%d: extra tokens ignored\n",
p_subn->opt.prefix_routes_file, line);
}
if (strcmp(p_prefix, "*") == 0)
prefix = 0;
else {
prefix = strtoull(p_prefix, &p_end, 16);
if (*p_end != '\0') {
OSM_LOG(log, OSM_LOG_ERROR, "%s:%d: illegal prefix: %s\n",
p_subn->opt.prefix_routes_file, line, p_prefix);
errors++;
continue;
}
}
if (strcmp(p_guid, "*") == 0)
guid = 0;
else {
guid = strtoull(p_guid, &p_end, 16);
if (*p_end != '\0' && *p_end != '#') {
OSM_LOG(log, OSM_LOG_ERROR, "%s:%d: illegal GUID: %s\n",
p_subn->opt.prefix_routes_file, line, p_guid);
errors++;
continue;
}
}
if (append_prefix_route(p_subn, prefix, guid) != IB_SUCCESS) {
errors++;
break;
}
}
fclose(fp);
return (errors == 0) ? IB_SUCCESS : IB_ERROR;
}
static ib_api_status_t insert_per_module_debug(IN osm_subn_t * p_subn,
char *mod_name,
osm_log_level_t level)
{
uint8_t index;
if (find_module_name(mod_name, &index)) {
OSM_LOG(&p_subn->p_osm->log, OSM_LOG_ERROR,
"Module name %s not found\n", mod_name);
return IB_ERROR;
}
osm_set_log_per_module(&p_subn->p_osm->log, index, level);
return IB_SUCCESS;
}
static ib_api_status_t parse_per_mod_logging_file(IN osm_subn_t * p_subn)
{
osm_log_t *log = &p_subn->p_osm->log;
FILE *fp;
char buf[1024];
int line = 0;
int errors = 0;
osm_reset_log_per_module(log);
if (p_subn->opt.per_module_logging_file == NULL)
return IB_SUCCESS;
fp = fopen(p_subn->opt.per_module_logging_file, "r");
if (!fp) {
if (errno == ENOENT)
return IB_SUCCESS;
OSM_LOG(log, OSM_LOG_ERROR, "fopen(%s) failed: %s",
p_subn->opt.per_module_logging_file, strerror(errno));
return IB_ERROR;
}
while (fgets(buf, sizeof buf, fp) != NULL) {
char *p_mod_name, *p_level, *p_extra, *p_last;
osm_log_level_t level;
line++;
if (errors > 10)
break;
p_mod_name = strtok_r(buf, " =,\t\n", &p_last);
if (!p_mod_name)
continue; /* ignore blank lines */
if (*p_mod_name == '#')
continue; /* ignore comment lines */
p_level = strtok_r(NULL, " \t\n", &p_last);
if (!p_level) {
OSM_LOG(log, OSM_LOG_ERROR, "%s:%d: missing log level\n",
p_subn->opt.per_module_logging_file, line);
errors++;
continue;
}
p_extra = strtok_r(NULL, " \t\n", &p_last);
if (p_extra && *p_extra != '#') {
OSM_LOG(log, OSM_LOG_INFO, "%s:%d: extra tokens ignored\n",
p_subn->opt.per_module_logging_file, line);
}
level = strtoul(p_level, NULL, 0);
if (insert_per_module_debug(p_subn, p_mod_name, level) != IB_SUCCESS) {
errors++;
break;
}
}
fclose(fp);
return (errors == 0) ? IB_SUCCESS : IB_ERROR;
}
static void subn_verify_max_vls(unsigned *max_vls, const char *prefix)
{
if (!*max_vls || *max_vls > 15) {
if (*max_vls)
log_report(" Invalid Cached Option: %s_max_vls=%u: "
"Using Default = %u\n",
prefix, *max_vls, OSM_DEFAULT_QOS_MAX_VLS);
*max_vls = 0;
}
}
static void subn_verify_high_limit(int *high_limit, const char *prefix)
{
if (*high_limit < 0 || *high_limit > 255) {
if (*high_limit > 255)
log_report(" Invalid Cached Option: %s_high_limit=%d: "
"Using Default: %d\n",
prefix, *high_limit,
OSM_DEFAULT_QOS_HIGH_LIMIT);
*high_limit = -1;
}
}
static void subn_verify_vlarb(char **vlarb, const char *prefix,
const char *suffix)
{
char *str, *tok, *end, *ptr;
int count = 0;
if (*vlarb == NULL)
return;
str = strdup(*vlarb);
tok = strtok_r(str, ",\n", &ptr);
while (tok) {
char *vl_str, *weight_str;
vl_str = tok;
weight_str = strchr(tok, ':');
if (weight_str) {
long vl, weight;
*weight_str = '\0';
weight_str++;
vl = strtol(vl_str, &end, 0);
if (*end)
log_report(" Warning: Cached Option "
"%s_vlarb_%s:vl=%s"
" improperly formatted\n",
prefix, suffix, vl_str);
else if (vl < 0 || vl > 14)
log_report(" Warning: Cached Option "
"%s_vlarb_%s:vl=%ld out of range\n",
prefix, suffix, vl);
weight = strtol(weight_str, &end, 0);
if (*end)
log_report(" Warning: Cached Option "
"%s_vlarb_%s:weight=%s "
"improperly formatted\n",
prefix, suffix, weight_str);
else if (weight < 0 || weight > 255)
log_report(" Warning: Cached Option "
"%s_vlarb_%s:weight=%ld "
"out of range\n",
prefix, suffix, weight);
} else
log_report(" Warning: Cached Option "
"%s_vlarb_%s:vl:weight=%s "
"improperly formatted\n",
prefix, suffix, tok);
count++;
tok = strtok_r(NULL, ",\n", &ptr);
}
if (count > 64)
log_report(" Warning: Cached Option %s_vlarb_%s: > 64 listed:"
" excess vl:weight pairs will be dropped\n",
prefix, suffix);
free(str);
}
static void subn_verify_sl2vl(char **sl2vl, const char *prefix)
{
char *str, *tok, *end, *ptr;
int count = 0;
if (*sl2vl == NULL)
return;
str = strdup(*sl2vl);
tok = strtok_r(str, ",\n", &ptr);
while (tok) {
long vl = strtol(tok, &end, 0);
if (*end)
log_report(" Warning: Cached Option %s_sl2vl:vl=%s "
"improperly formatted\n", prefix, tok);
else if (vl < 0 || vl > 15)
log_report(" Warning: Cached Option %s_sl2vl:vl=%ld "
"out of range\n", prefix, vl);
count++;
tok = strtok_r(NULL, ",\n", &ptr);
}
if (count < 16)
log_report(" Warning: Cached Option %s_sl2vl: < 16 VLs "
"listed\n", prefix);
else if (count > 16)
log_report(" Warning: Cached Option %s_sl2vl: > 16 listed: "
"excess VLs will be dropped\n", prefix);
free(str);
}
static void subn_verify_qos_set(osm_qos_options_t *set, const char *prefix)
{
subn_verify_max_vls(&set->max_vls, prefix);
subn_verify_high_limit(&set->high_limit, prefix);
subn_verify_vlarb(&set->vlarb_low, prefix, "low");
subn_verify_vlarb(&set->vlarb_high, prefix, "high");
subn_verify_sl2vl(&set->sl2vl, prefix);
}
int osm_subn_verify_config(IN osm_subn_opt_t * p_opts)
{
if (p_opts->lmc > 7) {
log_report(" Invalid Cached Option Value:lmc = %u:"
"Using Default:%u\n", p_opts->lmc, OSM_DEFAULT_LMC);
p_opts->lmc = OSM_DEFAULT_LMC;
}
if (15 < p_opts->sm_priority) {
log_report(" Invalid Cached Option Value:sm_priority = %u:"
"Using Default:%u\n",
p_opts->sm_priority, OSM_DEFAULT_SM_PRIORITY);
p_opts->sm_priority = OSM_DEFAULT_SM_PRIORITY;
}
if ((IB_LINK_SPEED_SET_LSS < p_opts->force_link_speed) ||
(p_opts->force_link_speed > IB_LINK_SPEED_2_5_5_OR_10 &&
p_opts->force_link_speed < IB_LINK_SPEED_SET_LSS)) {
log_report(" Invalid Cached Option Value:force_link_speed = %u:"
"Using Default:%u\n", p_opts->force_link_speed,
IB_LINK_SPEED_SET_LSS);
p_opts->force_link_speed = IB_LINK_SPEED_SET_LSS;
}
if ((IB_LINK_SPEED_EXT_SET_LSES < p_opts->force_link_speed_ext) ||
(p_opts->force_link_speed_ext > IB_LINK_SPEED_EXT_14_25_OR_50 &&
p_opts->force_link_speed_ext < IB_LINK_SPEED_EXT_DISABLE)) {
log_report(" Invalid Cached Option Value:force_link_speed_ext = %u:"
"Using Default:%u\n", p_opts->force_link_speed_ext,
IB_LINK_SPEED_EXT_SET_LSES);
p_opts->force_link_speed_ext = IB_LINK_SPEED_EXT_SET_LSES;
}
if ((IB_LINK_WIDTH_SET_LWS < p_opts->force_link_width) ||
(p_opts->force_link_width > IB_LINK_WIDTH_1X_2X_4X_8X_OR_12X &&
p_opts->force_link_width < IB_LINK_WIDTH_SET_LWS)) {
log_report(" Invalid Cached Option Value:force_link_width = %u:"
"Using Default:%u\n", p_opts->force_link_width,
IB_LINK_WIDTH_SET_LWS);
p_opts->force_link_width = IB_LINK_WIDTH_SET_LWS;
}
if (2 < p_opts->fdr10) {
log_report(" Invalid Cached Option Value:fdr10 = %u:"
"Using Default:%u\n", p_opts->fdr10, 1);
p_opts->fdr10 = 1;
}
if (p_opts->max_wire_smps == 0)
p_opts->max_wire_smps = 0x7FFFFFFF;
else if (p_opts->max_wire_smps > 0x7FFFFFFF) {
log_report(" Invalid Cached Option Value: max_wire_smps = %u,"
" Using Default: %u\n",
p_opts->max_wire_smps, OSM_DEFAULT_SMP_MAX_ON_WIRE);
p_opts->max_wire_smps = OSM_DEFAULT_SMP_MAX_ON_WIRE;
}
if (p_opts->max_wire_smps2 > 0x7FFFFFFF) {
log_report(" Invalid Cached Option Value: max_wire_smps2 = %u,"
" Using Default: %u",
p_opts->max_wire_smps2, p_opts->max_wire_smps);
p_opts->max_wire_smps2 = p_opts->max_wire_smps;
}
if (p_opts->long_transaction_timeout < p_opts->transaction_timeout) {
log_report(" Invalid Cached Option Value: long_transaction_timeout = %u,"
" Using transaction_timeout: %u",
p_opts->long_transaction_timeout, p_opts->transaction_timeout);
p_opts->long_transaction_timeout = p_opts->transaction_timeout;
}
if (strcmp(p_opts->console, OSM_DISABLE_CONSOLE)
&& strcmp(p_opts->console, OSM_LOCAL_CONSOLE)
#ifdef ENABLE_OSM_CONSOLE_LOOPBACK
&& strcmp(p_opts->console, OSM_LOOPBACK_CONSOLE)
#endif
#ifdef ENABLE_OSM_CONSOLE_SOCKET
&& strcmp(p_opts->console, OSM_REMOTE_CONSOLE)
#endif
) {
log_report(" Invalid Cached Option Value:console = %s"
", Using Default:%s\n",
p_opts->console, OSM_DEFAULT_CONSOLE);
free(p_opts->console);
p_opts->console = strdup(OSM_DEFAULT_CONSOLE);
}
if (p_opts->no_partition_enforcement == TRUE) {
strcpy(p_opts->part_enforce, OSM_PARTITION_ENFORCE_OFF);
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_OFF;
} else {
if (strcmp(p_opts->part_enforce, OSM_PARTITION_ENFORCE_BOTH) == 0)
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_BOTH;
else if (strcmp(p_opts->part_enforce, OSM_PARTITION_ENFORCE_IN) == 0)
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_IN;
else if (strcmp(p_opts->part_enforce, OSM_PARTITION_ENFORCE_OUT) == 0)
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_OUT;
else if (strcmp(p_opts->part_enforce, OSM_PARTITION_ENFORCE_OFF) == 0)
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_OFF;
else {
log_report(" Invalid Cached Option Value:part_enforce = %s"
", Using Default:%s\n",
p_opts->part_enforce, OSM_PARTITION_ENFORCE_BOTH);
strcpy(p_opts->part_enforce, OSM_PARTITION_ENFORCE_BOTH);
p_opts->part_enforce_enum = OSM_PARTITION_ENFORCE_TYPE_BOTH;
}
}
if (p_opts->qos) {
subn_verify_qos_set(&p_opts->qos_options, "qos");
subn_verify_qos_set(&p_opts->qos_ca_options, "qos_ca");
subn_verify_qos_set(&p_opts->qos_sw0_options, "qos_sw0");
subn_verify_qos_set(&p_opts->qos_swe_options, "qos_swe");
subn_verify_qos_set(&p_opts->qos_rtr_options, "qos_rtr");
}
#ifdef ENABLE_OSM_PERF_MGR
if (p_opts->perfmgr_sweep_time_s < 1) {
log_report(" Invalid Cached Option Value:perfmgr_sweep_time_s "
"= %u Using Default:%u\n",
p_opts->perfmgr_sweep_time_s,
OSM_PERFMGR_DEFAULT_SWEEP_TIME_S);
p_opts->perfmgr_sweep_time_s = OSM_PERFMGR_DEFAULT_SWEEP_TIME_S;
}
if (p_opts->perfmgr_max_outstanding_queries < 1) {
log_report(" Invalid Cached Option Value:"
"perfmgr_max_outstanding_queries = %u"
" Using Default:%u\n",
p_opts->perfmgr_max_outstanding_queries,
OSM_PERFMGR_DEFAULT_MAX_OUTSTANDING_QUERIES);
p_opts->perfmgr_max_outstanding_queries =
OSM_PERFMGR_DEFAULT_MAX_OUTSTANDING_QUERIES;
}
#endif
if (p_opts->m_key_protect_bits > 3) {
log_report(" Invalid Cached Option Value:"
"m_key_protection_level = %u Setting to %u "
"instead\n", p_opts->m_key_protect_bits, 2);
p_opts->m_key_protect_bits = 2;
}
if (p_opts->m_key_protect_bits && p_opts->m_key_lease_period) {
if (!p_opts->sweep_interval) {
log_report(" Sweep disabled with protected mkey "
"leases in effect; re-enabling sweeping "
"with interval %u\n",
cl_ntoh16(p_opts->m_key_lease_period) - 1);
p_opts->sweep_interval =
cl_ntoh16(p_opts->m_key_lease_period) - 1;
}
if (p_opts->sweep_interval >=
cl_ntoh16(p_opts->m_key_lease_period)) {
log_report(" Sweep interval %u >= mkey lease period "
"%u. Setting lease period to %u\n",
p_opts->sweep_interval,
cl_ntoh16(p_opts->m_key_lease_period),
p_opts->sweep_interval + 1);
p_opts->m_key_lease_period =
cl_hton16(p_opts->sweep_interval + 1);
}
}
return 0;
}
int osm_subn_parse_conf_file(const char *file_name, osm_subn_opt_t * p_opts)
{
char line[1024];
FILE *opts_file;
char *p_key, *p_val, *pound_sign;
const opt_rec_t *r;
void *p_field1, *p_field2;
int token_matched;
opts_file = fopen(file_name, "r");
if (!opts_file) {
if (errno == ENOENT)
return 1;
printf("cannot open file \'%s\': %s\n",
file_name, strerror(errno));
return -1;
}
printf(" Reading Cached Option File: %s\n", file_name);
p_opts->config_file = file_name;
if (!p_opts->file_opts && !(p_opts->file_opts = malloc(sizeof(*p_opts)))) {
fclose(opts_file);
return -1;
}
memcpy(p_opts->file_opts, p_opts, sizeof(*p_opts));
p_opts->file_opts->file_opts = NULL;
while (fgets(line, 1023, opts_file) != NULL) {
pound_sign = strchr(line,'#');
token_matched = 0;
/* Truncate any comments. */
if (pound_sign)
*pound_sign = '\0';
/* get the first token */
p_key = strtok_r(line, " \t\n", &p_val);
if (!p_key)
continue;
p_val = clean_val(p_val);
for (r = opt_tbl; r->name; r++) {
if (strcmp(r->name, p_key))
continue;
token_matched = 1;
p_field1 = (void *)p_opts->file_opts + r->opt_offset;
p_field2 = (void *)p_opts + r->opt_offset;
/* don't call setup function first time */
r->parse_fn(NULL, p_key, p_val, p_field1, p_field2,
NULL);
break;
}
if (!token_matched)
log_report(" Unrecognized token: \"%s\"\n", p_key);
}
fclose(opts_file);
osm_subn_verify_config(p_opts);
return 0;
}
int osm_subn_rescan_conf_files(IN osm_subn_t * p_subn)
{
char line[1024];
osm_subn_opt_t *p_opts = &p_subn->opt;
const opt_rec_t *r;
FILE *opts_file;
char *p_key, *p_val, *pound_sign;
void *p_field1, *p_field2;
int token_matched;
if (!p_opts->config_file)
return 0;
opts_file = fopen(p_opts->config_file, "r");
if (!opts_file) {
if (errno == ENOENT)
return 1;
OSM_LOG(&p_subn->p_osm->log, OSM_LOG_ERROR,
"cannot open file \'%s\': %s\n",
p_opts->config_file, strerror(errno));
return -1;
}
subn_init_qos_options(&p_opts->qos_options,
&p_opts->file_opts->qos_options);
subn_init_qos_options(&p_opts->qos_ca_options,
&p_opts->file_opts->qos_ca_options);
subn_init_qos_options(&p_opts->qos_sw0_options,
&p_opts->file_opts->qos_sw0_options);
subn_init_qos_options(&p_opts->qos_swe_options,
&p_opts->file_opts->qos_swe_options);
subn_init_qos_options(&p_opts->qos_rtr_options,
&p_opts->file_opts->qos_rtr_options);
while (fgets(line, 1023, opts_file) != NULL) {
pound_sign = strchr(line,'#');
token_matched = 0;
/* Truncate any comments. */
if (pound_sign)
*pound_sign = '\0';
/* get the first token */
p_key = strtok_r(line, " \t\n", &p_val);
if (!p_key)
continue;
p_val = clean_val(p_val);
for (r = opt_tbl; r->name; r++) {
if (strcmp(r->name, p_key))
continue;
token_matched = 1;
if (!r->can_update)
continue;
p_field1 = (void *)p_opts->file_opts + r->opt_offset;
p_field2 = (void *)p_opts + r->opt_offset;
r->parse_fn(p_subn, p_key, p_val, p_field1, p_field2,
r->setup_fn);
break;
}
if (!token_matched)
log_report(" Unrecognized token: \"%s\"\n", p_key);
}
fclose(opts_file);
osm_subn_verify_config(p_opts);
parse_prefix_routes_file(p_subn);
parse_per_mod_logging_file(p_subn);
return 0;
}
void osm_subn_output_conf(FILE *out, IN osm_subn_opt_t * p_opts)
{
int cacongoutputcount = 0;
int i;
fprintf(out,
"#\n# DEVICE ATTRIBUTES OPTIONS\n#\n"
"# The port GUID on which the OpenSM is running\n"
"guid 0x%016" PRIx64 "\n\n"
"# M_Key value sent to all ports qualifying all Set(PortInfo)\n"
"m_key 0x%016" PRIx64 "\n\n"
"# The lease period used for the M_Key on this subnet in [sec]\n"
"m_key_lease_period %u\n\n"
"# The protection level used for the M_Key on this subnet\n"
"m_key_protection_level %u\n\n"
"# If TRUE, SM tries to determine the m_key of unknown ports from guid2mkey file\n"
"# If FALSE, SM won't try to determine the m_key of unknown ports.\n"
"# Preconfigured m_key will be used instead\n"
"m_key_lookup %s\n\n"
"# SM_Key value of the SM used for SM authentication\n"
"sm_key 0x%016" PRIx64 "\n\n"
"# SM_Key value to qualify rcv SA queries as 'trusted'\n"
"sa_key 0x%016" PRIx64 "\n\n"
"# Note that for both values above (sm_key and sa_key)\n"
"# OpenSM version 3.2.1 and below used the default value '1'\n"
"# in a host byte order, it is fixed now but you may need to\n"
"# change the values to interoperate with old OpenSM running\n"
"# on a little endian machine.\n\n"
"# Subnet prefix used on this subnet\n"
"subnet_prefix 0x%016" PRIx64 "\n\n"
"# The LMC value used on this subnet\n"
"lmc %u\n\n"
"# lmc_esp0 determines whether LMC value used on subnet is used for\n"
"# enhanced switch port 0. If TRUE, LMC value for subnet is used for\n"
"# ESP0. Otherwise, LMC value for ESP0s is 0.\n"
"lmc_esp0 %s\n\n"
"# sm_sl determines SMSL used for SM/SA communication\n"
"sm_sl %u\n\n"
"# The code of maximal time a packet can live in a switch\n"
"# The actual time is 4.096usec * 2^<packet_life_time>\n"
"# The value 0x14 disables this mechanism\n"
"packet_life_time 0x%02x\n\n"
"# The number of sequential packets dropped that cause the port\n"
"# to enter the VLStalled state. The result of setting this value to\n"
"# zero is undefined.\n"
"vl_stall_count 0x%02x\n\n"
"# The number of sequential packets dropped that cause the port\n"
"# to enter the VLStalled state. This value is for switch ports\n"
"# driving a CA or router port. The result of setting this value\n"
"# to zero is undefined.\n"
"leaf_vl_stall_count 0x%02x\n\n"
"# The code of maximal time a packet can wait at the head of\n"
"# transmission queue.\n"
"# The actual time is 4.096usec * 2^<head_of_queue_lifetime>\n"
"# The value 0x14 disables this mechanism\n"
"head_of_queue_lifetime 0x%02x\n\n"
"# The maximal time a packet can wait at the head of queue on\n"
"# switch port connected to a CA or router port\n"
"leaf_head_of_queue_lifetime 0x%02x\n\n"
"# Limit the maximal operational VLs\n"
"max_op_vls %u\n\n"
"# Force PortInfo:LinkSpeedEnabled on switch ports\n"
"# If 0, don't modify PortInfo:LinkSpeedEnabled on switch port\n"
"# Otherwise, use value for PortInfo:LinkSpeedEnabled on switch port\n"
"# Values are (IB Spec 1.2.1, 14.2.5.6 Table 146 \"PortInfo\")\n"
"# 1: 2.5 Gbps\n"
"# 3: 2.5 or 5.0 Gbps\n"
"# 5: 2.5 or 10.0 Gbps\n"
"# 7: 2.5 or 5.0 or 10.0 Gbps\n"
"# 2,4,6,8-14 Reserved\n"
"# Default 15: set to PortInfo:LinkSpeedSupported\n"
"force_link_speed %u\n\n"
"# Force PortInfo:LinkSpeedExtEnabled on ports\n"
"# If 0, don't modify PortInfo:LinkSpeedExtEnabled on port\n"
"# Otherwise, use value for PortInfo:LinkSpeedExtEnabled on port\n"
"# Values are (MgtWG RefIDs #4722 and #9366)\n"
"# 1: 14.0625 Gbps\n"
"# 2: 25.78125 Gbps\n"
"# 3: 14.0625 Gbps or 25.78125 Gbps\n"
"# 4: 53.125 Gbps\n"
"# 5: 14.0625 Gbps or 53.125 Gbps\n"
"# 6: 25.78125 Gbps or 53.125 Gbps\n"
"# 7: 14.0625 Gbps, 25.78125 Gbps or 53.125 Gbps\n"
"# 30: Disable extended link speeds\n"
"# Default 31: set to PortInfo:LinkSpeedExtSupported\n"
"force_link_speed_ext %u\n\n"
"# Force PortInfo:LinkWidthEnabled on switch ports\n"
"# If 0, don't modify PortInfo:LinkWidthEnabled on switch port\n"
"# Otherwise, use value for PortInfo:LinkWidthEnabled on switch port\n"
"# Values are (IB Spec 1.2.1, 14.2.5.6 Table 146 \"PortInfo\"\n"
"# augmented by MgtWG RefIDs #9306-9309)\n"
"# 1: 1x\n"
"# 2: 4x\n"
"# 3: 1x or 4x\n"
"# 4: 8x\n"
"# 5: 1x or 8x\n"
"# 6: 4x or 8x\n"
"# 7: 1x or 4x or 8x\n"
"# 8: 12x\n"
"# 9: 1x or 12x\n"
"# 10: 4x or 12x\n"
"# 11: 1x or 4x or 12x\n"
"# 12: 8x or 12x\n"
"# 13: 1x or 8x or 12x\n"
"# 14: 4x or 8x or 12x\n"
"# 15: 1x or 4x or 8x or 12x\n"
"# 16: 2x\n"
"# 17: 1x or 2x\n"
"# 18: 2x or 4x\n"
"# 19: 1x or 2x or 4x\n"
"# 20: 2x or 8x\n"
"# 21: 1x or 2x or 8x\n"
"# 22: 2x or 4x or 8x\n"
"# 23: 1x or 2x or 4x or 8x\n"
"# 24: 2x or 12x\n"
"# 25: 1x or 2x or 12x\n"
"# 26: 2x or 4x or 12x\n"
"# 27: 1x or 2x or 4x or 12x\n"
"# 28: 2x or 8x or 12x\n"
"# 29: 1x or 2x or 8x or 12x\n"
"# 30: 2x or 4x or 8x or 12x\n"
"# 31: 1x or 2x or 4x or 8x or 12x\n"
"# 32-254 Reserved\n"
"# Default 255: set to PortInfo:LinkWidthSupported\n"
"force_link_width %u\n\n"
"# FDR10 on ports on devices that support FDR10\n"
"# Values are:\n"
"# 0: don't use fdr10 (no MLNX ExtendedPortInfo MADs)\n"
"# Default 1: enable fdr10 when supported\n"
"# 2: disable fdr10 when supported\n"
"fdr10 %u\n\n"
"# The subnet_timeout code that will be set for all the ports\n"
"# The actual timeout is 4.096usec * 2^<subnet_timeout>\n"
"subnet_timeout %u\n\n"
"# Threshold of local phy errors for sending Trap 129\n"
"local_phy_errors_threshold 0x%02x\n\n"
"# Threshold of credit overrun errors for sending Trap 130\n"
"overrun_errors_threshold 0x%02x\n\n"
"# Use SwitchInfo:MulticastFDBTop if advertised in PortInfo:CapabilityMask\n"
"use_mfttop %s\n\n",
cl_ntoh64(p_opts->guid),
cl_ntoh64(p_opts->m_key),
cl_ntoh16(p_opts->m_key_lease_period),
p_opts->m_key_protect_bits,
p_opts->m_key_lookup ? "TRUE" : "FALSE",
cl_ntoh64(p_opts->sm_key),
cl_ntoh64(p_opts->sa_key),
cl_ntoh64(p_opts->subnet_prefix),
p_opts->lmc,
p_opts->lmc_esp0 ? "TRUE" : "FALSE",
p_opts->sm_sl,
p_opts->packet_life_time,
p_opts->vl_stall_count,
p_opts->leaf_vl_stall_count,
p_opts->head_of_queue_lifetime,
p_opts->leaf_head_of_queue_lifetime,
p_opts->max_op_vls,
p_opts->force_link_speed,
p_opts->force_link_speed_ext,
p_opts->force_link_width,
p_opts->fdr10,
p_opts->subnet_timeout,
p_opts->local_phy_errors_threshold,
p_opts->overrun_errors_threshold,
p_opts->use_mfttop ? "TRUE" : "FALSE");
fprintf(out,
"#\n# PARTITIONING OPTIONS\n#\n"
"# Partition configuration file to be used\n"
"partition_config_file %s\n\n"
"# Disable partition enforcement by switches (DEPRECATED)\n"
"# This option is DEPRECATED. Please use part_enforce instead\n"
"no_partition_enforcement %s\n\n"
"# Partition enforcement type (for switches)\n"
"# Values are both, out, in and off\n"
"# Default is both (outbound and inbound enforcement)\n"
"part_enforce %s\n\n"
"# Allow both full and limited membership on the same partition\n"
"allow_both_pkeys %s\n\n"
"# Keep current and take into account old pkey indexes\n"
"# during calculation of physical ports pkey tables\n"
"keep_pkey_indexes %s\n\n"
"# SM assigned GUID byte where GUID is formed from OpenFabrics OUI\n"
"# followed by 40 bits xy 00 ab cd ef where xy is the SM assigned GUID byte\n"
"# and ab cd ef is an SM autogenerated 24 bits\n"
"# SM assigned GUID byte should be configured as subnet unique\n"
"sm_assigned_guid 0x%02x\n\n",
p_opts->partition_config_file,
p_opts->no_partition_enforcement ? "TRUE" : "FALSE",
p_opts->part_enforce,
p_opts->allow_both_pkeys ? "TRUE" : "FALSE",
p_opts->keep_pkey_indexes ? "TRUE" : "FALSE",
p_opts->sm_assigned_guid);
fprintf(out,
"#\n# SWEEP OPTIONS\n#\n"
"# The number of seconds between subnet sweeps (0 disables it)\n"
"sweep_interval %u\n\n"
"# If TRUE cause all lids to be reassigned\n"
"reassign_lids %s\n\n"
"# If TRUE forces every sweep to be a heavy sweep\n"
"force_heavy_sweep %s\n\n"
"# If TRUE every trap 128 and 144 will cause a heavy sweep.\n"
"# NOTE: successive identical traps (>10) are suppressed\n"
"sweep_on_trap %s\n\n",
p_opts->sweep_interval,
p_opts->reassign_lids ? "TRUE" : "FALSE",
p_opts->force_heavy_sweep ? "TRUE" : "FALSE",
p_opts->sweep_on_trap ? "TRUE" : "FALSE");
fprintf(out,
"#\n# ROUTING OPTIONS\n#\n"
"# If TRUE count switches as link subscriptions\n"
"port_profile_switch_nodes %s\n\n",
p_opts->port_profile_switch_nodes ? "TRUE" : "FALSE");
fprintf(out,
"# Name of file with port guids to be ignored by port profiling\n"
"port_prof_ignore_file %s\n\n", p_opts->port_prof_ignore_file ?
p_opts->port_prof_ignore_file : null_str);
fprintf(out,
"# The file holding routing weighting factors per output port\n"
"hop_weights_file %s\n\n",
p_opts->hop_weights_file ? p_opts->hop_weights_file : null_str);
fprintf(out,
"# The file holding non-default port order per switch for routing\n"
"port_search_ordering_file %s\n\n",
p_opts->port_search_ordering_file ?
p_opts->port_search_ordering_file : null_str);
fprintf(out,
"# Routing engine\n"
"# Multiple routing engines can be specified separated by\n"
"# commas so that specific ordering of routing algorithms will\n"
"# be tried if earlier routing engines fail.\n"
"# Supported engines: minhop, updn, dnup, file, ftree, lash,\n"
"# dor, torus-2QoS, nue, dfsssp, sssp\n"
"routing_engine %s\n\n", p_opts->routing_engine_names ?
p_opts->routing_engine_names : null_str);
fprintf(out,
"# Routing engines will avoid throttled switch-to-switch links\n"
"# (supported by: nue, dfsssp, sssp; use FALSE if unsure)\n"
"avoid_throttled_links %s\n\n",
p_opts->avoid_throttled_links ? "TRUE" : "FALSE");
fprintf(out,
"# Connect roots (use FALSE if unsure)\n"
"connect_roots %s\n\n",
p_opts->connect_roots ? "TRUE" : "FALSE");
fprintf(out,
"# Use unicast routing cache (use FALSE if unsure)\n"
"use_ucast_cache %s\n\n",
p_opts->use_ucast_cache ? "TRUE" : "FALSE");
fprintf(out,
"# Lid matrix dump file name\n"
"lid_matrix_dump_file %s\n\n", p_opts->lid_matrix_dump_file ?
p_opts->lid_matrix_dump_file : null_str);
fprintf(out,
"# LFTs file name\nlfts_file %s\n\n",
p_opts->lfts_file ? p_opts->lfts_file : null_str);
fprintf(out,
"# The file holding the root node guids (for fat-tree or Up/Down)\n"
"# One guid in each line\nroot_guid_file %s\n\n",
p_opts->root_guid_file ? p_opts->root_guid_file : null_str);
fprintf(out,
"# The file holding the fat-tree compute node guids\n"
"# One guid in each line\ncn_guid_file %s\n\n",
p_opts->cn_guid_file ? p_opts->cn_guid_file : null_str);
fprintf(out,
"# The file holding the fat-tree I/O node guids\n"
"# One guid in each line.\n"
"# If only io_guid file is provided, the rest of nodes\n"
"# are considered as compute nodes.\n"
"io_guid_file %s\n\n",
p_opts->io_guid_file ? p_opts->io_guid_file : null_str);
fprintf(out,
"# If TRUE enables alternative indexing policy for ftree routing\n"
"# in quasi-ftree topologies that can improve shift-pattern support.\n"
"# The switch indexing starts from root switch and leaf switches\n"
"# are termination points of BFS algorithm\n"
"# If FALSE, the indexing starts from leaf switch (default)\n"
"quasi_ftree_indexing %s\n\n",
p_opts->quasi_ftree_indexing ? "TRUE" : "FALSE");
fprintf(out,
"# Number of reverse hops allowed for I/O nodes\n"
"# Used for connectivity between I/O nodes connected to Top Switches\nmax_reverse_hops %d\n\n",
p_opts->max_reverse_hops);
fprintf(out,
"# The file holding the node ids which will be used by"
" Up/Down algorithm instead\n# of GUIDs (one guid and"
" id in each line)\nids_guid_file %s\n\n",
p_opts->ids_guid_file ? p_opts->ids_guid_file : null_str);
fprintf(out,
"# The file holding guid routing order guids (for MinHop and Up/Down)\n"
"guid_routing_order_file %s\n\n",
p_opts->guid_routing_order_file ? p_opts->guid_routing_order_file : null_str);
fprintf(out,
"# Do mesh topology analysis (for LASH algorithm)\n"
"do_mesh_analysis %s\n\n",
p_opts->do_mesh_analysis ? "TRUE" : "FALSE");
fprintf(out,
"# Starting VL for LASH algorithm\n"
"lash_start_vl %u\n\n",
p_opts->lash_start_vl);
fprintf(out,
"# Maximum number of VLs for Nue routing algorithm (default: 1; to enforce\n"
"# deadlock-freedom even if QoS is not enabled). Set to 0 if Nue should\n"
"# automatically determine and choose maximum supported by the fabric, or\n"
"# any integer >= 1 (then Nue uses min(max_supported,nue_max_num_vls)\n"
"nue_max_num_vls %u\n\n",
p_opts->nue_max_num_vls);
fprintf(out,
"# If TRUE, then Nue assumes that switches will send/receive\n"
"# data traffic, too, and hence their paths are included in\n"
"# the deadlock-avoidance calculation (use FALSE if unsure)\n"
"nue_include_switches %s\n\n",
p_opts->nue_include_switches ? "TRUE" : "FALSE");
fprintf(out,
"# Port Shifting (use FALSE if unsure)\n"
"port_shifting %s\n\n",
p_opts->port_shifting ? "TRUE" : "FALSE");
fprintf(out,
"# Assign ports in a random order instead of round-robin\n"
"# If zero disable (default), otherwise use the value as a random seed\n"
"scatter_ports %d\n\n",
p_opts->scatter_ports);
fprintf(out,
"# Don't use scatter for ports defined in\n"
"# guid_routing_order file\n"
"guid_routing_order_no_scatter %s\n\n",
p_opts->guid_routing_order_no_scatter ? "TRUE" : "FALSE");
fprintf(out,
"# SA database file name\nsa_db_file %s\n\n",
p_opts->sa_db_file ? p_opts->sa_db_file : null_str);
fprintf(out,
"# If TRUE causes OpenSM to dump SA database at the end of\n"
"# every light sweep, regardless of the verbosity level\n"
"sa_db_dump %s\n\n",
p_opts->sa_db_dump ? "TRUE" : "FALSE");
fprintf(out,
"# Torus-2QoS configuration file name\ntorus_config %s\n\n",
p_opts->torus_conf_file ? p_opts->torus_conf_file : null_str);
fprintf(out,
"#\n# HANDOVER - MULTIPLE SMs OPTIONS\n#\n"
"# SM priority used for deciding who is the master\n"
"# Range goes from 0 (lowest priority) to 15 (highest).\n"
"sm_priority %u\n\n"
"# If TRUE other SMs on the subnet should be ignored\n"
"ignore_other_sm %s\n\n"
"# Timeout in [msec] between two polls of active master SM\n"
"sminfo_polling_timeout %u\n\n"
"# Number of failing polls of remote SM that declares it dead\n"
"polling_retry_number %u\n\n"
"# If TRUE honor the guid2lid file when coming out of standby\n"
"# state, if such file exists and is valid\n"
"honor_guid2lid_file %s\n\n",
p_opts->sm_priority,
p_opts->ignore_other_sm ? "TRUE" : "FALSE",
p_opts->sminfo_polling_timeout,
p_opts->polling_retry_number,
p_opts->honor_guid2lid_file ? "TRUE" : "FALSE");
fprintf(out,
"#\n# TIMING AND THREADING OPTIONS\n#\n"
"# Maximum number of SMPs sent in parallel\n"
"max_wire_smps %u\n\n"
"# Maximum number of timeout based SMPs allowed to be outstanding\n"
"# A value less than or equal to max_wire_smps disables this mechanism\n"
"max_wire_smps2 %u\n\n"
"# The timeout in [usec] used for sending SMPs above max_wire_smps limit\n"
"# and below max_wire_smps2 limit\n"
"max_smps_timeout %u\n\n"
"# The maximum time in [msec] allowed for a transaction to complete\n"
"transaction_timeout %u\n\n"
"# The maximum number of retries allowed for a transaction to complete\n"
"transaction_retries %u\n\n"
"# The maximum time in [msec] allowed for a \"long\" transacrion to complete\n"
"# Currently, long transaction is only set of optimized SL2VLMappingTable\n"
"long_transaction_timeout %u\n\n"
"# Maximal time in [msec] a message can stay in the incoming message queue.\n"
"# If there is more than one message in the queue and the last message\n"
"# stayed in the queue more than this value, any SA request will be\n"
"# immediately be dropped but BUSY status is not currently returned.\n"
"max_msg_fifo_timeout %u\n\n"
"# Use a single thread for handling SA queries\n"
"single_thread %s\n\n",
p_opts->max_wire_smps,
p_opts->max_wire_smps2,
p_opts->max_smps_timeout,
p_opts->transaction_timeout,
p_opts->transaction_retries,
p_opts->long_transaction_timeout,
p_opts->max_msg_fifo_timeout,
p_opts->single_thread ? "TRUE" : "FALSE");
fprintf(out,
"#\n# MISC OPTIONS\n#\n"
"# Daemon mode\n"
"daemon %s\n\n"
"# SM Inactive\n"
"sm_inactive %s\n\n"
"# Babbling Port Policy\n"
"babbling_port_policy %s\n\n"
"# Drop event subscriptions (InformInfo and ServiceRecord) on port removal and SM coming out of STANDBY\n"
"drop_event_subscriptions %s\n\n"
"# Validate IPoIB non-broadcast group creation parameters against\n"
"# broadcast group parameters per IETF RFC 4391 (default TRUE)\n"
"ipoib_mcgroup_creation_validation %s\n\n"
"# Validate multicast join parameters against multicast group\n"
"# parameters when MC group already exists\n"
"mcgroup_join_validation %s\n\n"
"# Use original extended SA rates only\n"
"# The original extended SA rates are up through 300 Gbps (12x EDR)\n"
"# Set to TRUE for subnets with old kernels/drivers that don't understand\n"
"# the new SA rates for 2x link width and/or HDR link speed (19-22)\n"
"# default is FALSE\n"
"use_original_extended_sa_rates_only %s\n\n"
"# Use Optimized SLtoVLMapping programming if supported by device\n"
"use_optimized_slvl %s\n\n"
"# Sync in memory files used for high availability with storage\n"
"fsync_high_avail_files %s\n\n",
p_opts->daemon ? "TRUE" : "FALSE",
p_opts->sm_inactive ? "TRUE" : "FALSE",
p_opts->babbling_port_policy ? "TRUE" : "FALSE",
p_opts->drop_event_subscriptions ? "TRUE" : "FALSE",
p_opts->ipoib_mcgroup_creation_validation ? "TRUE" : "FALSE",
p_opts->mcgroup_join_validation ? "TRUE" : "FALSE",
p_opts->use_original_extended_sa_rates_only ? "TRUE" : "FALSE",
p_opts->use_optimized_slvl ? "TRUE" : "FALSE",
p_opts->fsync_high_avail_files ? "TRUE" : "FALSE");
#ifdef ENABLE_OSM_PERF_MGR
fprintf(out,
"#\n# Performance Manager Options\n#\n"
"# perfmgr enable\n"
"# PerfMgr is enabled if TRUE and disabled if FALSE (default FALSE)\n"
"perfmgr %s\n\n"
"# redirection enable\n"
"# Redirection supported if TRUE and not supported if FALSE (default TRUE)\n"
"perfmgr_redir %s\n\n"
"# sweep time in seconds (default %u seconds)\n"
"perfmgr_sweep_time_s %u\n\n"
"# Max outstanding queries (default %u)\n"
"perfmgr_max_outstanding_queries %u\n\n"
"# Ignore CAs on sweep (default FALSE)\n"
"perfmgr_ignore_cas %s\n\n"
"# Remove missing nodes from DB (default TRUE)\n"
"perfmgr_rm_nodes %s\n\n"
"# Log error counters to opensm.log (default TRUE)\n"
"perfmgr_log_errors %s\n\n"
"# Query PerfMgt Get(ClassPortInfo) for extended capabilities\n"
"# Extended capabilities include 64 bit extended counters\n"
"# and transmit wait support (default TRUE)\n"
"perfmgr_query_cpi %s\n\n"
"# Log xmit_wait errors (default FALSE)\n"
"perfmgr_xmit_wait_log %s\n\n"
"# If logging xmit_wait's; set threshold (default %u)\n"
"perfmgr_xmit_wait_threshold %u\n\n"
,
p_opts->perfmgr ? "TRUE" : "FALSE",
p_opts->perfmgr_redir ? "TRUE" : "FALSE",
OSM_PERFMGR_DEFAULT_SWEEP_TIME_S,
p_opts->perfmgr_sweep_time_s,
OSM_PERFMGR_DEFAULT_MAX_OUTSTANDING_QUERIES,
p_opts->perfmgr_max_outstanding_queries,
p_opts->perfmgr_ignore_cas ? "TRUE" : "FALSE",
p_opts->perfmgr_rm_nodes ? "TRUE" : "FALSE",
p_opts->perfmgr_log_errors ? "TRUE" : "FALSE",
p_opts->perfmgr_query_cpi ? "TRUE" : "FALSE",
p_opts->perfmgr_xmit_wait_log ? "TRUE" : "FALSE",
OSM_PERFMGR_DEFAULT_XMIT_WAIT_THRESHOLD,
p_opts->perfmgr_xmit_wait_threshold);
fprintf(out,
"#\n# Event DB Options\n#\n"
"# Dump file to dump the events to\n"
"event_db_dump_file %s\n\n", p_opts->event_db_dump_file ?
p_opts->event_db_dump_file : null_str);
#endif /* ENABLE_OSM_PERF_MGR */
fprintf(out,
"#\n# Event Plugin Options\n#\n"
"# Event plugin name(s)\n"
"event_plugin_name %s\n\n"
"# Options string that would be passed to the plugin(s)\n"
"event_plugin_options %s\n\n",
p_opts->event_plugin_name ?
p_opts->event_plugin_name : null_str,
p_opts->event_plugin_options ?
p_opts->event_plugin_options : null_str);
fprintf(out,
"#\n# Node name map for mapping node's to more descriptive node descriptions\n"
"# (man ibnetdiscover for more information)\n#\n"
"node_name_map_name %s\n\n", p_opts->node_name_map_name ?
p_opts->node_name_map_name : null_str);
fprintf(out,
"#\n# DEBUG FEATURES\n#\n"
"# The log flags used\n"
"log_flags 0x%02x\n\n"
"# Force flush of the log file after each log message\n"
"force_log_flush %s\n\n"
"# Log file to be used\n"
"log_file %s\n\n"
"# Limit the size of the log file in MB. If overrun, log is restarted\n"
"log_max_size %u\n\n"
"# If TRUE will accumulate the log over multiple OpenSM sessions\n"
"accum_log_file %s\n\n"
"# Per module logging configuration file\n"
"# Each line in config file contains <module_name><separator><log_flags>\n"
"# where module_name is file name including .c\n"
"# separator is either = , space, or tab\n"
"# log_flags is the same flags as used in the coarse/overall logging\n"
"per_module_logging_file %s\n\n"
"# The directory to hold the file OpenSM dumps\n"
"dump_files_dir %s\n\n"
"# If TRUE enables new high risk options and hardware specific quirks\n"
"enable_quirks %s\n\n"
"# If TRUE disables client reregistration\n"
"no_clients_rereg %s\n\n"
"# If TRUE OpenSM should disable multicast support and\n"
"# no multicast routing is performed if TRUE\n"
"disable_multicast %s\n\n"
"# If TRUE opensm will exit on fatal initialization issues\n"
"exit_on_fatal %s\n\n" "# console [off|local"
#ifdef ENABLE_OSM_CONSOLE_LOOPBACK
"|loopback"
#endif
#ifdef ENABLE_OSM_CONSOLE_SOCKET
"|socket]\n"
#else
"]\n"
#endif
"console %s\n\n"
"# Telnet port for console (default %d)\n"
"console_port %d\n\n",
p_opts->log_flags,
p_opts->force_log_flush ? "TRUE" : "FALSE",
p_opts->log_file,
p_opts->log_max_size,
p_opts->accum_log_file ? "TRUE" : "FALSE",
p_opts->per_module_logging_file ?
p_opts->per_module_logging_file : null_str,
p_opts->dump_files_dir,
p_opts->enable_quirks ? "TRUE" : "FALSE",
p_opts->no_clients_rereg ? "TRUE" : "FALSE",
p_opts->disable_multicast ? "TRUE" : "FALSE",
p_opts->exit_on_fatal ? "TRUE" : "FALSE",
p_opts->console,
OSM_DEFAULT_CONSOLE_PORT, p_opts->console_port);
fprintf(out,
"#\n# QoS OPTIONS\n#\n"
"# Enable QoS setup\n"
"qos %s\n\n"
"# QoS policy file to be used\n"
"qos_policy_file %s\n\n"
"# Suppress QoS MAD status errors\n"
"suppress_sl2vl_mad_status_errors %s\n\n",
p_opts->qos ? "TRUE" : "FALSE", p_opts->qos_policy_file,
p_opts->suppress_sl2vl_mad_status_errors ? "TRUE" : "FALSE");
subn_dump_qos_options(out,
"QoS default options", "qos",
&p_opts->qos_options);
fprintf(out, "\n");
subn_dump_qos_options(out,
"QoS CA options", "qos_ca",
&p_opts->qos_ca_options);
fprintf(out, "\n");
subn_dump_qos_options(out,
"QoS Switch Port 0 options", "qos_sw0",
&p_opts->qos_sw0_options);
fprintf(out, "\n");
subn_dump_qos_options(out,
"QoS Switch external ports options", "qos_swe",
&p_opts->qos_swe_options);
fprintf(out, "\n");
subn_dump_qos_options(out,
"QoS Router ports options", "qos_rtr",
&p_opts->qos_rtr_options);
fprintf(out, "\n");
fprintf(out,
"#\n# Congestion Control OPTIONS (EXPERIMENTAL)\n#\n\n"
"# Enable Congestion Control Configuration\n"
"congestion_control %s\n\n"
"# CCKey to use when configuring congestion control\n"
"# note that this does not configure a new CCkey, only the CCkey to use\n"
"cc_key 0x%016" PRIx64 "\n\n"
"# Congestion Control Max outstanding MAD\n"
"cc_max_outstanding_mads %u\n\n",
p_opts->congestion_control ? "TRUE" : "FALSE",
cl_ntoh64(p_opts->cc_key),
p_opts->cc_max_outstanding_mads);
fprintf(out,
"#\n# Congestion Control SwitchCongestionSetting options\n#\n"
"# Control Map - bitmask indicating which of the following are to be used\n"
"# bit 0 - victim mask\n"
"# bit 1 - credit mask\n"
"# bit 2 - threshold + packet size\n"
"# bit 3 - credit starvation threshold + return delay valid\n"
"# bit 4 - marking rate valid\n"
"cc_sw_cong_setting_control_map 0x%X\n\n",
cl_ntoh32(p_opts->cc_sw_cong_setting_control_map));
fprintf(out,
"# Victim Mask - 256 bit mask representing switch ports, mark packets with FECN\n"
"# whether they are the source or victim of congestion\n"
"# bit 0 - port 0 (enhanced port)\n"
"# bit 1 - port 1\n"
"# ...\n"
"# bit 254 - port 254\n"
"# bit 255 - reserved\n"
"cc_sw_cong_setting_victim_mask 0x");
for (i = 0; i < IB_CC_PORT_MASK_DATA_SIZE; i++)
fprintf(out, "%02X", p_opts->cc_sw_cong_setting_victim_mask[i]);
fprintf(out, "\n\n");
fprintf(out,
"# Credit Mask - 256 bit mask representing switch ports to apply credit starvation\n"
"# bit 0 - port 0 (enhanced port)\n"
"# bit 1 - port 1\n"
"# ...\n"
"# bit 254 - port 254\n"
"# bit 255 - reserved\n"
"cc_sw_cong_setting_credit_mask 0x");
for (i = 0; i < IB_CC_PORT_MASK_DATA_SIZE; i++)
fprintf(out, "%02X", p_opts->cc_sw_cong_setting_credit_mask[i]);
fprintf(out, "\n\n");
fprintf(out,
"# Threshold - value indicating aggressiveness of congestion marking\n"
"# 0x0 - none, 0x1 - loose, ..., 0xF - aggressive\n"
"cc_sw_cong_setting_threshold 0x%02X\n\n"
"# Packet Size - any packet less than this size will not be marked with a FECN\n"
"# units are in credits\n"
"cc_sw_cong_setting_packet_size %u\n\n"
"# Credit Starvation Threshold - value indicating aggressiveness of credit starvation\n"
"# 0x0 - none, 0x1 - loose, ..., 0xF - aggressive\n"
"cc_sw_cong_setting_credit_starvation_threshold 0x%02X\n\n"
"# Credit Starvation Return Delay - in CCT entry shift:multiplier format, see IB spec\n"
"cc_sw_cong_setting_credit_starvation_return_delay %u:%u\n\n"
"# Marking Rate - mean number of packets between markings\n"
"cc_sw_cong_setting_marking_rate %u\n\n",
p_opts->cc_sw_cong_setting_threshold,
p_opts->cc_sw_cong_setting_packet_size,
p_opts->cc_sw_cong_setting_credit_starvation_threshold,
p_opts->cc_sw_cong_setting_credit_starvation_return_delay.shift,
p_opts->cc_sw_cong_setting_credit_starvation_return_delay.multiplier,
cl_ntoh16(p_opts->cc_sw_cong_setting_marking_rate));
fprintf(out,
"#\n# Congestion Control CA Congestion Setting options\n#\n"
"# Port Control\n"
"# bit 0 = 0, QP based congestion control\n"
"# bit 0 = 1, SL/port based congestion control\n"
"cc_ca_cong_setting_port_control 0x%04X\n\n"
"# Control Map - 16 bit bitmask indicating which SLs should be configured\n"
"cc_ca_cong_setting_control_map 0x%04X\n\n",
cl_ntoh16(p_opts->cc_ca_cong_setting_port_control),
cl_ntoh16(p_opts->cc_ca_cong_setting_control_map));
fprintf(out,
"#\n# CA Congestion Setting Entries\n#\n"
"# Each of congestion control settings below configures the CA Congestion\n"
"# Settings for an individual SL. The SL must be specified before the value.\n"
"# These options may be specified multiple times to configure different values\n"
"# for different SLs.\n"
"#\n"
"# ccti timer - when expires decrements 1 from the CCTI\n"
"# ccti increase - number to be added to the table index on receipt of a BECN\n"
"# trigger threshold - when the ccti is equal to this, an event is logged\n"
"# ccti min - the minimum value for the ccti. This imposes a minimum rate\n"
"# on the injection rate\n\n");
for (i = 0; i < IB_CA_CONG_ENTRY_DATA_SIZE; i++) {
/* Don't output unless one of the settings has been set, there's no need
* to output 16 chunks of this with all defaults of 0 */
if (p_opts->cc_ca_cong_entries[i].ccti_timer
|| p_opts->cc_ca_cong_entries[i].ccti_increase
|| p_opts->cc_ca_cong_entries[i].trigger_threshold
|| p_opts->cc_ca_cong_entries[i].ccti_min) {
fprintf(out,
"# SL = %u\n"
"cc_ca_cong_setting_ccti_timer %u %u\n"
"cc_ca_cong_setting_ccti_increase %u %u\n"
"cc_ca_cong_setting_trigger_threshold %u %u\n"
"cc_ca_cong_setting_ccti_min %u %u\n\n",
i,
i,
cl_ntoh16(p_opts->cc_ca_cong_entries[i].ccti_timer),
i,
p_opts->cc_ca_cong_entries[i].ccti_increase,
i,
p_opts->cc_ca_cong_entries[i].trigger_threshold,
i,
p_opts->cc_ca_cong_entries[i].ccti_min);
cacongoutputcount++;
}
}
/* If by chance all the CA Cong Settings are default, output at least 1 chunk
* for illustration */
if (!cacongoutputcount)
fprintf(out,
"# SL = 0\n"
"cc_ca_cong_setting_ccti_timer 0 %u\n"
"cc_ca_cong_setting_ccti_increase 0 %u\n"
"cc_ca_cong_setting_trigger_threshold 0 %u\n"
"cc_ca_cong_setting_ccti_min 0 %u\n\n",
cl_ntoh16(p_opts->cc_ca_cong_entries[0].ccti_timer),
p_opts->cc_ca_cong_entries[0].ccti_increase,
p_opts->cc_ca_cong_entries[0].trigger_threshold,
p_opts->cc_ca_cong_entries[0].ccti_min);
fprintf(out,
"#\n# Congestion Control Table\n#\n"
"# Comma separated list of CCT entries representing CCT.\n"
"# Format is shift:multipler,shift_multiplier,shift:multiplier,...\n"
"cc_cct ");
if (!p_opts->cc_cct.entries_len) {
fprintf(out, "%s\n", null_str);
}
else {
fprintf(out, "%u:%u",
p_opts->cc_cct.entries[0].shift,
p_opts->cc_cct.entries[0].multiplier);
for (i = 1; i < p_opts->cc_cct.entries_len; i++) {
fprintf(out, ",%u:%u",
p_opts->cc_cct.entries[i].shift,
p_opts->cc_cct.entries[i].multiplier);
}
fprintf(out, "\n");
}
fprintf(out, "\n");
fprintf(out,
"# Prefix routes file name\n"
"prefix_routes_file %s\n\n",
p_opts->prefix_routes_file);
fprintf(out,
"#\n# IPv6 Solicited Node Multicast (SNM) Options\n#\n"
"consolidate_ipv6_snm_req %s\n\n",
p_opts->consolidate_ipv6_snm_req ? "TRUE" : "FALSE");
fprintf(out, "# Log prefix\nlog_prefix %s\n\n", p_opts->log_prefix);
/* optional string attributes ... */
}
int osm_subn_write_conf_file(char *file_name, IN osm_subn_opt_t * p_opts)
{
FILE *opts_file;
opts_file = fopen(file_name, "w");
if (!opts_file) {
printf("cannot open file \'%s\' for writing: %s\n",
file_name, strerror(errno));
return -1;
}
osm_subn_output_conf(opts_file, p_opts);
fclose(opts_file);
return 0;
}