/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2009 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#include <dlfcn.h>
#include <meta.h>
#include <metadyn.h>
#include <sdssc.h>
#define SDSSC_PATH SDSSC_CL_LIBDIR "/sc/libsds_sc.so"
static func_table_t dl_table[] = {
{ "_sdssc_version", (void **)&sdssc_version },
{ "_sdssc_create_begin", (void **)&sdssc_create_begin },
{ "_sdssc_mo_create_begin", (void **)&sdssc_mo_create_begin },
{ "_sdssc_create_end", (void **)&sdssc_create_end },
{ "_sdssc_delete_begin", (void **)&sdssc_delete_begin },
{ "_sdssc_delete_end", (void **)&sdssc_delete_end },
{ "_sdssc_get_index", (void **)&sdssc_get_index },
{ "_sdssc_add_hosts", (void **)&sdssc_add_hosts },
{ "_sdssc_delete_hosts", (void **)&sdssc_delete_hosts },
{ "_sdssc_get_primary_host", (void **)&sdssc_get_primary_host },
{ "_sdssc_cmd_proxy", (void **)&sdssc_cmd_proxy },
{ "_sdssc_getnodelist", (void **)&sdssc_getnodelist },
{ "_sdssc_freenodelist", (void **)&sdssc_freenodelist },
{ "_sdssc_binddevs", (void **)&sdssc_binddevs },
{ "_sdssc_bindclusterdevs", (void **)&sdssc_bindclusterdevs },
{ "_sdssc_gettransportbynode", (void **)&sdssc_gettransportbynode },
{ "_sdssc_free_mdcerr_list", (void **)&sdssc_free_mdcerr_list },
{ "_sdssc_property_get", (void **)&sdssc_property_get },
{ "_sdssc_property_set", (void **)&sdssc_property_set },
{ "_sdssc_get_services", (void **)&sdssc_get_services },
{ "_sdssc_get_services_free", (void **)&sdssc_get_services_free },
{ "_sdssc_suspend", (void **)&sdssc_suspend },
{ "_sdssc_convert_cluster_path",
(void **)&sdssc_convert_cluster_path },
{ "_sdssc_convert_ctd_path",
(void **)&sdssc_convert_ctd_path },
{ "_sdssc_convert_path_free",
(void **)&sdssc_convert_path_free },
{ "_sdssc_notify_service", (void **)&sdssc_notify_service },
{ "_sdssc_cm_nm2nid", (void **)&sdssc_cm_nm2nid },
{ "_sdssc_cm_sr_nm2nid", (void **)&sdssc_cm_sr_nm2nid },
{ "_sdssc_cm_nid2nm", (void **)&sdssc_cm_nid2nm },
{ "_sdssc_cm_sr_nid2nm", (void **)&sdssc_cm_sr_nid2nm },
{ "_sdssc_get_priv_ipaddr", (void **)&sdssc_get_priv_ipaddr },
{ (char *)0, (void **)0 }
};
static rval_e
just_dup_string(const char *source, char **dest)
{
*dest = strdup(source);
return (SDSSC_OKAY);
}
static void
free_dup_string(char *source)
{
free(source);
}
/*
* not_bound -- routine to always return NOT_BOUND
*/
static rval_e
not_bound(void)
{
return (SDSSC_NOT_BOUND);
}
/*
* not_bound_error -- routine to always return SDSSC_NOT_BOUND_ERROR since
* routine is not bound. This is used when using an older version
* of libsdssc that doesn't support MN disksets. When an MN specific
* routine is called (such as sdssc_mo_create_set) an SDSSC_NOT_BOUND_ERROR
* will be returned.
*/
static rval_e
not_bound_error(void)
{
return (SDSSC_NOT_BOUND_ERROR);
}
/*
* set_common_routine -- set cluster interface routines to return NOT_BOUND
*/
static void
set_common_routine()
{
func_table_p f;
for (f = dl_table; f->fptr != (void *)0; f++) {
if (strcmp(f->fname, "_sdssc_convert_cluster_path") == 0) {
*f->fptr = (void *)&just_dup_string;
} else if (strcmp(f->fname, "_sdssc_free_convert_cluster_path")
== 0) {
*f->fptr = (void *)&free_dup_string;
} else {
*f->fptr = (void *)&not_bound;
}
}
}
/*
* sdssc_bind_library -- entry point which resolves all cluster interface pts.
*/
rval_e
sdssc_bind_library(void)
{
void *dp;
int (*lb)();
func_table_p ftp;
static int initialised = 0;
/*
* If already bound then just return okay so this routine
* becomes idempotent. If this check isn't made then we'll
* fail when calling the "_bind_library" function because
* dcs_initialize() can only be called once.
* If not bound first time we try it again.
*/
if (initialised && (void *)sdssc_version != (void *)not_bound) {
return (SDSSC_OKAY);
}
initialised = 1;
if ((dp = dlopen(SDSSC_PATH, RTLD_LAZY)) == NULL) {
set_common_routine();
return (SDSSC_NOT_BOUND);
} else {
/*
* Allow the binding library to initialize state if
* necessary. Currently this calls the DCS initialize()
* routine which checks to see if we're part of a cluster.
*/
if ((lb = (int (*)())dlsym(dp, "_bind_library")) != NULL) {
if (lb() != 0) {
set_common_routine();
return (SDSSC_NOT_BOUND);
}
}
/*
* Load 'em up. Pick up the function address and store
* the values in the global pointers for other routines
* to use.
*/
for (ftp = dl_table; ftp->fptr != (void *)0; ftp++) {
if ((*ftp->fptr = dlsym(dp, ftp->fname)) == NULL) {
/*
* If old libsdssc library is there, then
* _sdssc_mo_create_begin is not yet supported.
*/
if (strcmp(ftp->fname,
"_sdssc_mo_create_begin") == 0) {
*ftp->fptr = (void *)&not_bound_error;
continue;
}
/*
* If this routine fails to find a single
* entry point that it's expecting
* (except _sdssc_mo_create_begin) then
* setup non-sdssc stubs routines
* as function pointers.
*/
set_common_routine();
return (SDSSC_ERROR);
}
}
return (SDSSC_OKAY);
}
}