char const *fr_app_io_socket_name(TALLOC_CTX *ctx, fr_app_io_t const *app_io,
fr_ipaddr_t const *src_ipaddr, int src_port,
fr_ipaddr_t const *dst_ipaddr, int dst_port)
{
char dst_buf[128], src_buf[128];
/*
* Get our name.
*/
if (fr_ipaddr_is_inaddr_any(dst_ipaddr)) {
if (dst_ipaddr->af == AF_INET) {
strlcpy(dst_buf, "*", sizeof(dst_buf));
} else {
rad_assert(dst_ipaddr->af == AF_INET6);
strlcpy(dst_buf, "::", sizeof(dst_buf));
}
} else {
fr_value_box_snprint(dst_buf, sizeof(dst_buf), fr_box_ipaddr(*dst_ipaddr), 0);
}
if (!src_ipaddr) {
return talloc_typed_asprintf(ctx, "proto_%s server %s port %u",
app_io->name, dst_buf, dst_port);
}
fr_value_box_snprint(src_buf, sizeof(src_buf), fr_box_ipaddr(*src_ipaddr), 0);
return talloc_typed_asprintf(ctx, "proto_%s from client %s port %u to server %s port %u",
app_io->name, src_buf, src_port, dst_buf, dst_port);
}
/** Initialise a new outbound connection
*
* @param[out] fd_out Where to write the new file descriptor.
* @param[in] uctx A #rlm_logtee_thread_t.
*/
static fr_connection_state_t _logtee_conn_init(int *fd_out, void *uctx)
{
rlm_logtee_thread_t *t = talloc_get_type_abort(uctx, rlm_logtee_thread_t);
rlm_logtee_t const *inst = t->inst;
int fd = -1;
switch (inst->log_dst) {
case LOGTEE_DST_UNIX:
DEBUG2("Opening UNIX socket at \"%s\"", inst->unix_sock.path);
fd = fr_socket_client_unix(inst->unix_sock.path, true);
if (fd < 0) return FR_CONNECTION_STATE_FAILED;
break;
case LOGTEE_DST_TCP:
DEBUG2("Opening TCP connection to %pV:%u",
fr_box_ipaddr(inst->tcp.dst_ipaddr), inst->tcp.port);
fd = fr_socket_client_tcp(NULL, &inst->tcp.dst_ipaddr, inst->tcp.port, true);
if (fd < 0) return FR_CONNECTION_STATE_FAILED;
break;
case LOGTEE_DST_UDP:
DEBUG2("Opening UDP connection to %pV:%u",
fr_box_ipaddr(inst->udp.dst_ipaddr), inst->udp.port);
fd = fr_socket_client_udp(NULL, NULL, &inst->udp.dst_ipaddr, inst->udp.port, true);
if (fd < 0) return FR_CONNECTION_STATE_FAILED;
break;
/*
* Are not connection oriented destinations
*/
case LOGTEE_DST_INVALID:
case LOGTEE_DST_FILE:
rad_assert(0);
return FR_CONNECTION_STATE_FAILED;
}
*fd_out = fd;
return FR_CONNECTION_STATE_CONNECTING;
}
/** Return the node that is currently servicing a particular key
*
*
*/
static xlat_action_t redis_node_xlat(TALLOC_CTX *ctx, fr_cursor_t *out,
REQUEST *request, void const *xlat_inst,
UNUSED void *xlat_thread_inst,
fr_value_box_t **in)
{
rlm_redis_t const *inst = talloc_get_type_abort_const(*((void const * const *)xlat_inst),
rlm_redis_t);
fr_redis_cluster_key_slot_t const *key_slot;
fr_redis_cluster_node_t const *node;
fr_ipaddr_t ipaddr;
uint16_t port;
char const *p;
char *q;
char const *key;
size_t key_len;
unsigned long idx = 0;
fr_value_box_t *vb;
if (!in) {
REDEBUG("Missing key");
return XLAT_ACTION_FAIL;
}
if (fr_value_box_list_concat(ctx, *in, in, FR_TYPE_STRING, true) < 0) {
RPEDEBUG("Failed concatenating input");
return XLAT_ACTION_FAIL;
}
key = p = (*in)->vb_strvalue;
p = strchr(p, ' '); /* Look for index */
if (p) {
key_len = p - key;
idx = strtoul(p, &q, 10);
if (q == p) {
REDEBUG("Tailing garbage after node index");
return XLAT_ACTION_FAIL;
}
} else {
key_len = (*in)->vb_length;
}
key_slot = fr_redis_cluster_slot_by_key(inst->cluster, request, (uint8_t const *)key, key_len);
if (idx == 0) {
node = fr_redis_cluster_master(inst->cluster, key_slot);
} else {
node = fr_redis_cluster_slave(inst->cluster, key_slot, idx - 1);
}
if (!node) {
RDEBUG2("No node available for this key slot");
return XLAT_ACTION_DONE;
}
if ((fr_redis_cluster_ipaddr(&ipaddr, node) < 0) || (fr_redis_cluster_port(&port, node) < 0)) {
REDEBUG("Failed retrieving node information");
return XLAT_ACTION_FAIL;
}
MEM(vb = fr_value_box_alloc_null(ctx));
fr_value_box_asprintf(vb, vb, NULL, false, "%pV:%u", fr_box_ipaddr(ipaddr), port);
fr_cursor_append(out, vb);
return XLAT_ACTION_DONE;
}
