int
citrusleaf_info_auth(as_cluster *cluster, char *hostname, short port, char *names, char **values, int timeout_ms)
{
int rv = -1;
as_vector sockaddr_in_v;
as_vector_inita(&sockaddr_in_v, sizeof(struct sockaddr_in), 5);
if (! as_lookup(NULL, hostname, port, true, &sockaddr_in_v)) {
goto Done;
}
for (uint32_t i = 0; i < sockaddr_in_v.size; i++)
{
struct sockaddr_in* sa_in = as_vector_get(&sockaddr_in_v, i);
if (0 == citrusleaf_info_host_auth(cluster, sa_in, names, values, timeout_ms, true, /* check bounds */ true)) {
rv = 0;
goto Done;
}
}
Done:
as_vector_destroy(&sockaddr_in_v);
return(rv);
}
as_status
aerospike_query_role(aerospike* as, as_error* err, const as_policy_admin* policy, const char* role_name, as_role** role)
{
uint8_t buffer[AS_STACK_BUF_SIZE];
uint8_t* p = buffer + 8;
p = as_admin_write_header(p, QUERY_ROLES, 1);
p = as_admin_write_field_string(p, ROLE, role_name);
as_vector list;
as_vector_inita(&list, sizeof(as_role*), 1);
as_status status = as_admin_read_list(as, err, policy, buffer, p, as_parse_roles, &list);
if (status == AEROSPIKE_OK) {
if (list.size == 1) {
*role = as_vector_get_ptr(&list, 0);
}
else if (list.size <= 0) {
*role = 0;
as_free_roles(&list, 0);
}
else {
*role = as_vector_get_ptr(&list, 0);
// Delete excess users.
as_free_roles(&list, 1);
}
}
else {
*role = 0;
as_free_roles(&list, 0);
}
return status;
}
static void
as_cluster_find_nodes_to_add(as_cluster* cluster, as_vector* /* <as_host> */ friends, as_vector* /* <as_node*> */ nodes_to_add)
{
as_error err;
as_error_init(&err);
as_vector addresses;
as_vector_inita(&addresses, sizeof(struct sockaddr_in), 5);
as_node_info node_info;
for (uint32_t i = 0; i < friends->size; i++) {
as_host* friend = as_vector_get(friends, i);
as_vector_clear(&addresses);
as_status status = as_lookup(&err, friend->name, friend->port, &addresses);
if (status != AEROSPIKE_OK) {
as_log_warn("%s %s", as_error_string(status), err.message);
continue;
}
for (uint32_t i = 0; i < addresses.size; i++) {
struct sockaddr_in* addr = as_vector_get(&addresses, i);
status = as_lookup_node(cluster, &err, addr, &node_info);
if (status == AEROSPIKE_OK) {
as_node* node = as_cluster_find_node(cluster->nodes, nodes_to_add, node_info.name);
if (node) {
// Duplicate node name found. This usually occurs when the server
// services list contains both internal and external IP addresses
// for the same node. Add new host to list of alias filters
// and do not add new node.
as_close(node_info.fd);
as_address* a = as_node_get_address_full(node);
as_log_info("Node %s:%d already exists with nodeid %s and address %s:%d",
friend->name, friend->port, node->name, a->name,
(int)cf_swap_from_be16(a->addr.sin_port));
node->friends++;
as_node_add_address(node, friend, addr);
continue;
}
node = as_node_create(cluster, friend, addr, &node_info);
as_address* a = as_node_get_address_full(node);
as_log_info("Add node %s %s:%d", node_info.name, a->name, (int)cf_swap_from_be16(a->addr.sin_port));
as_vector_append(nodes_to_add, &node);
}
else {
as_log_warn("Failed to connect to friend %s:%d. %s %s", friend->name, friend->port, as_error_string(status), err.message);
}
}
/**
* Send an info request to a specific host. The response must be freed by the caller on success.
*
* ~~~~~~~~~~{.c}
* char * res = NULL;
* if ( aerospike_info_host(&as, &err, NULL, "127.0.0.1", 3000, "info", &res) != AEROSPIKE_OK ) {
* // handle error
* }
* else {
* // handle response
* free(res);
* res = NULL;
* }
* ~~~~~~~~~~
*
* @param as The aerospike instance to use for this operation.
* @param err The as_error to be populated if an error occurs.
* @param policy The policy to use for this operation. If NULL, then the default policy will be used.
* @param addr The IP address or hostname to send the request to.
* @param port The port to send the request to.
* @param req The info request to send.
* @param res The response from the node. The response will be a NULL terminated string, allocated by the function, and must be freed by the caller.
*
* @return AEROSPIKE_OK on success. Otherwise an error.
*
* @ingroup info_operations
*/
as_status aerospike_info_host(
aerospike * as, as_error * err, const as_policy_info * policy,
const char * addr, uint16_t port, const char * req,
char ** res)
{
as_error_reset(err);
if (! policy) {
policy = &as->config.policies.info;
}
as_vector sockaddr_in_v;
as_vector_inita(&sockaddr_in_v, sizeof(struct sockaddr_in), 5);
as_status status = as_lookup(NULL, err, (char*)addr, port, &sockaddr_in_v);
if (status) {
as_vector_destroy(&sockaddr_in_v);
return status;
}
uint64_t deadline = as_socket_deadline(policy->timeout);
as_cluster* cluster = as->cluster;
status = AEROSPIKE_ERR_CLUSTER;
bool loop = true;
for (uint32_t i = 0; i < sockaddr_in_v.size && loop; i++) {
struct sockaddr_in* sa_in = as_vector_get(&sockaddr_in_v, i);
status = as_info_command_host(cluster, err, sa_in, (char*)req, policy->send_as_is, deadline, res);
switch (status) {
case AEROSPIKE_OK:
case AEROSPIKE_ERR_TIMEOUT:
case AEROSPIKE_ERR_INDEX_FOUND:
case AEROSPIKE_ERR_INDEX_NOT_FOUND:
loop = false;
break;
default:
break;
}
}
as_vector_destroy(&sockaddr_in_v);
return status;
}
as_status
aerospike_query_user(aerospike* as, as_error* err, const as_policy_admin* policy, const char* user_name, as_user** user)
{
as_error_reset(err);
if (! user_name) {
user_name = as->cluster->user;
if (! user_name) {
return AEROSPIKE_INVALID_USER;
}
}
uint8_t buffer[AS_STACK_BUF_SIZE];
uint8_t* p = buffer + 8;
p = as_admin_write_header(p, QUERY_USERS, 1);
p = as_admin_write_field_string(p, USER, user_name);
as_vector list;
as_vector_inita(&list, sizeof(as_user*), 1);
as_status status = as_admin_read_list(as, err, policy, buffer, p, as_parse_users, &list);
if (status == AEROSPIKE_OK) {
if (list.size == 1) {
*user = as_vector_get_ptr(&list, 0);
}
else if (list.size <= 0) {
*user = 0;
as_free_users(&list, 0);
}
else {
*user = as_vector_get_ptr(&list, 0);
// Delete excess users.
as_free_users(&list, 1);
}
}
else {
*user = 0;
as_free_users(&list, 0);
}
return status;
}
int
aerospike_query_user(aerospike* as, const as_policy_admin* policy, const char* user, as_user_roles** user_roles)
{
if (! user) {
user = as->cluster->user;
}
uint8_t buffer[STACK_BUF_SZ];
uint8_t* p = buffer + 8;
p = write_header(p, QUERY_USERS, 1);
p = write_field_string(p, USER, user);
as_vector users;
as_vector_inita(&users, sizeof(as_user_roles*), 1);
int status = as_read_users(as, policy, buffer, p, &users);
if (status == 0) {
if (users.size == 1) {
*user_roles = as_vector_get_ptr(&users, 0);
}
else if (users.size <= 0) {
*user_roles = 0;
as_free_users(&users, 0);
}
else {
*user_roles = as_vector_get_ptr(&users, 0);
// Delete excess users.
as_free_users(&users, 1);
}
}
else {
*user_roles = 0;
as_free_users(&users, 0);
}
return status;
}
static as_status
as_cluster_seed_nodes(as_cluster* cluster, as_error* err, bool enable_warnings)
{
// Add all nodes at once to avoid copying entire array multiple times.
as_vector nodes_to_add;
as_vector_inita(&nodes_to_add, sizeof(as_node*), 64);
as_vector addresses;
as_vector_inita(&addresses, sizeof(struct sockaddr_in), 5);
as_node_info node_info;
as_error error_local;
as_error_init(&error_local); // AEROSPIKE_ERR_TIMEOUT doesn't come with a message; make sure it's initialized.
as_status status = AEROSPIKE_OK;
as_seeds* seeds = as_seeds_reserve(cluster);
for (uint32_t i = 0; i < seeds->size; i++) {
as_seed* seed = &seeds->array[i];
as_vector_clear(&addresses);
status = as_lookup(&error_local, seed->name, seed->port, &addresses);
if (status != AEROSPIKE_OK) {
if (enable_warnings) {
as_log_warn("Failed to lookup %s:%d. %s %s", seed->name, seed->port, as_error_string(status), error_local.message);
}
continue;
}
for (uint32_t i = 0; i < addresses.size; i++) {
struct sockaddr_in* addr = as_vector_get(&addresses, i);
status = as_lookup_node(cluster, &error_local, addr, &node_info);
if (status == AEROSPIKE_OK) {
as_host host;
if (as_strncpy(host.name, seed->name, sizeof(host.name))) {
as_log_warn("Hostname has been truncated: %s", host.name);
}
host.port = seed->port;
as_node* node = as_cluster_find_node_in_vector(&nodes_to_add, node_info.name);
if (node) {
as_close(node_info.fd);
as_node_add_address(node, &host, addr);
}
else {
node = as_node_create(cluster, &host, addr, &node_info);
as_address* a = as_node_get_address_full(node);
as_log_info("Add node %s %s:%d", node->name, a->name, (int)cf_swap_from_be16(a->addr.sin_port));
as_vector_append(&nodes_to_add, &node);
}
}
else {
if (enable_warnings) {
as_log_warn("Failed to connect to seed %s:%d. %s %s", seed->name, seed->port, as_error_string(status), error_local.message);
}
}
}
}
as_seeds_release(seeds);
if (nodes_to_add.size > 0) {
as_cluster_add_nodes(cluster, &nodes_to_add);
status = AEROSPIKE_OK;
}
else {
status = as_error_set_message(err, AEROSPIKE_ERR_CLIENT, "Failed to seed cluster");
}
as_vector_destroy(&nodes_to_add);
as_vector_destroy(&addresses);
return status;
}
static as_status
as_lookup_node(as_cluster* cluster, as_error* err, struct sockaddr_in* addr, as_node_info* node_info)
{
uint64_t deadline = as_socket_deadline(cluster->conn_timeout_ms);
int fd;
as_status status = as_info_create_socket(cluster, err, addr, deadline, &fd);
if (status) {
return status;
}
char* response = 0;
status = as_info_command(err, fd, "node\nfeatures\n", true, deadline, 0, &response);
if (status) {
as_close(fd);
return status;
}
as_vector values;
as_vector_inita(&values, sizeof(as_name_value), 2);
as_info_parse_multi_response(response, &values);
if (values.size != 2) {
goto Error;
}
as_name_value* nv = as_vector_get(&values, 0);
char* node_name = nv->value;
if (node_name == 0 || *node_name == 0) {
goto Error;
}
as_strncpy(node_info->name, node_name, AS_NODE_NAME_SIZE);
node_info->fd = fd;
nv = as_vector_get(&values, 1);
char* features = nv->value;
if (features == 0) {
goto Error;
}
char* begin = features;
char* end = begin;
uint8_t has_batch_index = 0;
uint8_t has_replicas_all = 0;
uint8_t has_double = 0;
uint8_t has_geo = 0;
while (*begin && ! (has_batch_index &&
has_replicas_all &&
has_double &&
has_geo)) {
while (*end) {
if (*end == ';') {
*end++ = 0;
break;
}
end++;
}
if (strcmp(begin, "batch-index") == 0) {
has_batch_index = 1;
}
if (strcmp(begin, "replicas-all") == 0) {
has_replicas_all = 1;
}
if (strcmp(begin, "float") == 0) {
has_double = 1;
}
if (strcmp(begin, "geo") == 0) {
has_geo = 1;
}
begin = end;
}
node_info->has_batch_index = has_batch_index;
node_info->has_replicas_all = has_replicas_all;
node_info->has_double = has_double;
node_info->has_geo = has_geo;
cf_free(response);
return AEROSPIKE_OK;
Error: {
char addr_name[INET_ADDRSTRLEN];
as_socket_address_name(addr, addr_name);
as_error_update(err, status, "Invalid node info response from %s: %s", addr_name, response);
cf_free(response);
as_close(fd);
return AEROSPIKE_ERR_CLIENT;
}
}
/**
* @return AEROSPIKE_OK if successful. Otherwise an error occurred.
*/
as_status aerospike_udf_list(
aerospike * as, as_error * err, const as_policy_info * policy,
as_udf_files * files)
{
as_error_reset(err);
if (! policy) {
policy = &as->config.policies.info;
}
char* response = 0;
as_status status = aerospike_info_any(as, err, policy, "udf-list", &response);
if (status) {
return status;
}
// response := udf-list\tfilename=<name>,hash=<hash>,type=<type>;[filename=<name>...]
char* p = strchr(response, '\t');
if (!p) {
as_error_update(err, AEROSPIKE_ERR_PARAM, "Invalid udf-list response: %s", response);
free(response);
return AEROSPIKE_ERR_PARAM;
}
p++;
uint32_t capacity = (files->capacity <= 0) ? 500 : files->capacity;
as_vector ptrs;
as_vector_inita(&ptrs, sizeof(as_udf_file_ptr), capacity);
as_udf_file_ptr ptr = {0,0,0};
char* token = p;
while (*p) {
switch (*p) {
case '=':
*p++ = 0;
as_udf_parse_file(token, p, &ptr);
break;
case ',':
*p++ = 0;
token = p;
break;
case ';':
*p++ = 0;
token = p;
as_vector_append(&ptrs, &ptr);
ptr.name = 0;
ptr.hash = 0;
ptr.type = 0;
break;
default:
p++;
break;
}
}
if (files->capacity == 0 && files->entries == NULL) {
as_udf_files_init(files, ptrs.size);
}
uint32_t limit = ptrs.size < files->capacity ? ptrs.size : files->capacity;
files->size = limit;
for (uint32_t i = 0; i < limit; i++) {
as_udf_file_ptr* ptr = as_vector_get(&ptrs, i);
as_udf_file* file = &files->entries[i];
if (ptr->name) {
as_strncpy(file->name, ptr->name, AS_UDF_FILE_NAME_SIZE);
}
else {
file->name[0] = 0;
}
if (ptr->hash) {
// The hash is not null terminated, so normal strncpy is appropriate here.
// strncpy will also pad zeroes if hash size is incorrect.
strncpy((char*)file->hash, ptr->hash, AS_UDF_FILE_HASH_SIZE);
}
else {
file->hash[0] = 0;
}
file->type = AS_UDF_TYPE_LUA;
file->content._free = false;
file->content.size = 0;
file->content.capacity = 0;
file->content.bytes = NULL;
}
as_vector_destroy(&ptrs);
free(response);
return AEROSPIKE_OK;
}
