odyssey/sources/backend.c

534 lines
14 KiB
C

/*
* Odyssey.
*
* Scalable PostgreSQL connection pooler.
*/
#include <stdlib.h>
#include <stdarg.h>
#include <stdint.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include <signal.h>
#include <machinarium.h>
#include <shapito.h>
#include "sources/macro.h"
#include "sources/version.h"
#include "sources/atomic.h"
#include "sources/util.h"
#include "sources/error.h"
#include "sources/list.h"
#include "sources/pid.h"
#include "sources/id.h"
#include "sources/logger.h"
#include "sources/daemon.h"
#include "sources/config.h"
#include "sources/config_reader.h"
#include "sources/msg.h"
#include "sources/global.h"
#include "sources/server.h"
#include "sources/server_pool.h"
#include "sources/client.h"
#include "sources/client_pool.h"
#include "sources/route_id.h"
#include "sources/route.h"
#include "sources/route_pool.h"
#include "sources/io.h"
#include "sources/instance.h"
#include "sources/router_cancel.h"
#include "sources/router.h"
#include "sources/system.h"
#include "sources/worker.h"
#include "sources/frontend.h"
#include "sources/backend.h"
#include "sources/auth.h"
#include "sources/tls.h"
#include "sources/cancel.h"
void od_backend_close(od_server_t *server)
{
assert(server->route == NULL);
assert(server->io == NULL);
assert(server->tls == NULL);
server->is_transaction = 0;
server->idle_time = 0;
shapito_key_init(&server->key);
shapito_key_init(&server->key_client);
od_server_free(server);
}
static inline int
od_backend_terminate(od_server_t *server, shapito_stream_t *stream)
{
shapito_stream_reset(stream);
int rc;
rc = shapito_fe_write_terminate(stream);
if (rc == -1)
return -1;
rc = od_write(server->io, stream);
if (rc == -1)
return -1;
return 0;
}
void od_backend_close_connection(od_server_t *server)
{
od_instance_t *instance = server->global->instance;
if (server->io == NULL)
return;
if (machine_connected(server->io)) {
shapito_stream_t *stream;
stream = shapito_cache_pop(&instance->stream_cache);
if (stream) {
od_backend_terminate(server, stream);
shapito_cache_push(&instance->stream_cache, stream);
}
}
machine_close(server->io);
machine_io_free(server->io);
server->io = NULL;
if (server->tls) {
machine_tls_free(server->tls);
server->tls = NULL;
}
}
void od_backend_error(od_server_t *server, char *context, char *data, int size)
{
od_instance_t *instance = server->global->instance;
shapito_fe_error_t error;
int rc;
rc = shapito_fe_read_error(&error, data, size);
if (rc == -1) {
od_error(&instance->logger, context, server->client, server,
"failed to parse error message from server");
return;
}
od_error(&instance->logger, context, server->client, server,
"%s %s %s",
error.severity,
error.code,
error.message);
if (error.detail) {
od_error(&instance->logger, context, server->client, server,
"DETAIL: %s", error.detail);
}
if (error.hint) {
od_error(&instance->logger, context, server->client, server,
"HINT: %s", error.hint);
}
od_server_stat_error(server);
}
int od_backend_ready(od_server_t *server, char *context,
char *data, int size)
{
od_instance_t *instance = server->global->instance;
int status;
int rc;
rc = shapito_fe_read_ready(&status, data, size);
if (rc == -1)
return -1;
if (status == 'I') {
/* no active transaction */
server->is_transaction = 0;
} else
if (status == 'T' || status == 'E') {
/* in active transaction or in interrupted
* transaction block */
server->is_transaction = 1;
}
/* update reply and tx counters and query time */
uint64_t query_time;
query_time = od_server_stat_reply(server);
if (! server->is_transaction)
od_server_stat_tx(server);
od_debug(&instance->logger, context, server->client, server,
"query time: %d microseconds",
query_time);
return 0;
}
static inline int
od_backend_startup(od_server_t *server, shapito_stream_t *stream)
{
od_instance_t *instance = server->global->instance;
od_route_t *route = server->route;
shapito_stream_reset(stream);
shapito_fe_arg_t argv[] = {
{ "user", 5 }, { route->id.user, route->id.user_len },
{ "database", 9 }, { route->id.database, route->id.database_len }
};
int rc;
rc = shapito_fe_write_startup_message(stream, 4, argv);
if (rc == -1)
return -1;
rc = od_write(server->io, stream);
if (rc == -1) {
od_error(&instance->logger, "startup", NULL, server,
"write error: %s",
machine_error(server->io));
return -1;
}
/* update request count and sync state */
od_server_stat_request(server, 1);
while (1) {
shapito_stream_reset(stream);
int rc;
rc = od_read(server->io, stream, UINT32_MAX);
if (rc == -1) {
od_error(&instance->logger, "startup", NULL, server,
"read error: %s",
machine_error(server->io));
return -1;
}
shapito_be_msg_t type = *stream->start;
od_debug(&instance->logger, "startup", NULL, server, "%s",
shapito_be_msg_to_string(type));
switch (type) {
case SHAPITO_BE_READY_FOR_QUERY:
od_backend_ready(server, "startup", stream->start,
shapito_stream_used(stream));
return 0;
case SHAPITO_BE_AUTHENTICATION:
rc = od_auth_backend(server, stream);
if (rc == -1)
return -1;
break;
case SHAPITO_BE_BACKEND_KEY_DATA:
rc = shapito_fe_read_key(&server->key, stream->start,
shapito_stream_used(stream));
if (rc == -1) {
od_error(&instance->logger, "startup", NULL, server,
"failed to parse BackendKeyData message");
return -1;
}
break;
case SHAPITO_BE_PARAMETER_STATUS:
{
char *name;
uint32_t name_len;
char *value;
uint32_t value_len;
rc = shapito_fe_read_parameter(stream->start,
shapito_stream_used(stream),
&name, &name_len,
&value, &value_len);
if (rc == -1) {
od_error(&instance->logger, "startup", NULL, server,
"failed to parse ParameterStatus message");
return -1;
}
rc = shapito_parameters_add(&server->params, name, name_len,
value, value_len);
if (rc == -1)
return -1;
break;
}
case SHAPITO_BE_NOTICE_RESPONSE:
break;
case SHAPITO_BE_ERROR_RESPONSE:
od_backend_error(server, "startup", stream->start,
shapito_stream_used(stream));
return -1;
default:
od_debug(&instance->logger, "startup", NULL, server,
"unexpected message: %s",
shapito_be_msg_to_string(type));
return -1;
}
}
return 0;
}
static inline int
od_backend_connect_to(od_server_t *server,
shapito_stream_t *stream,
od_configstorage_t *server_config,
char *context)
{
od_instance_t *instance = server->global->instance;
assert(server->io == NULL);
/* create io handle */
server->io = machine_io_create();
if (server->io == NULL)
return -1;
/* set network options */
machine_set_nodelay(server->io, instance->config.nodelay);
if (instance->config.keepalive > 0)
machine_set_keepalive(server->io, 1, instance->config.keepalive);
int rc;
rc = machine_set_readahead(server->io, instance->config.readahead);
if (rc == -1) {
od_error(&instance->logger, context, NULL, server,
"failed to set readahead");
return -1;
}
/* set tls options */
if (server_config->tls_mode != OD_TLS_DISABLE) {
server->tls = od_tls_backend(server_config);
if (server->tls == NULL)
return -1;
}
/* resolve server address */
char port[16];
od_snprintf(port, sizeof(port), "%d", server_config->port);
struct addrinfo *ai = NULL;
rc = machine_getaddrinfo(server_config->host, port, NULL, &ai, 0);
if (rc != 0) {
od_error(&instance->logger, context, NULL, server,
"failed to resolve %s:%d",
server_config->host,
server_config->port);
return -1;
}
assert(ai != NULL);
/* connect to server */
rc = machine_connect(server->io, ai->ai_addr, UINT32_MAX);
freeaddrinfo(ai);
if (rc == -1) {
od_error(&instance->logger, context, server->client, server,
"failed to connect to %s:%d",
server_config->host,
server_config->port);
return -1;
}
/* do tls handshake */
if (server_config->tls_mode != OD_TLS_DISABLE) {
rc = od_tls_backend_connect(server, &instance->logger, stream, server_config);
if (rc == -1)
return -1;
}
return 0;
}
int od_backend_connect(od_server_t *server, shapito_stream_t *stream,
char *context)
{
od_instance_t *instance = server->global->instance;
od_route_t *route = server->route;
assert(route != NULL);
od_configstorage_t *server_config;
server_config = route->config->storage;
/* connect to server */
int rc;
rc = od_backend_connect_to(server, stream, server_config, context);
if (rc == -1)
return -1;
/* log server connection */
if (instance->config.log_session) {
od_log(&instance->logger, context, server->client, server,
"new server connection %s:%d",
server_config->host,
server_config->port);
}
/* send startup and do initial configuration */
rc = od_backend_startup(server, stream);
return rc;
}
int od_backend_connect_cancel(od_server_t *server,
shapito_stream_t *stream,
od_configstorage_t *server_config,
shapito_key_t *key)
{
od_instance_t *instance = server->global->instance;
/* connect to server */
int rc;
rc = od_backend_connect_to(server, stream, server_config, "cancel");
if (rc == -1)
return -1;
/* send cancel request */
shapito_stream_reset(stream);
rc = shapito_fe_write_cancel(stream, key->key_pid, key->key);
if (rc == -1)
return -1;
rc = od_write(server->io, stream);
if (rc == -1) {
od_error(&instance->logger, "cancel", NULL, NULL,
"write error: %s",
machine_error(server->io));
}
return 0;
}
int od_backend_ready_wait(od_server_t *server, shapito_stream_t *stream,
char *context, int count,
uint32_t time_ms)
{
od_instance_t *instance = server->global->instance;
int ready = 0;
for (;;)
{
shapito_stream_reset(stream);
int rc;
rc = od_read(server->io, stream, time_ms);
if (rc == -1) {
if (! machine_timedout()) {
od_error(&instance->logger, context, server->client, server,
"read error: %s",
machine_error(server->io));
}
return -1;
}
shapito_be_msg_t type = *stream->start;
od_debug(&instance->logger, context, server->client, server, "%s",
shapito_be_msg_to_string(type));
if (type == SHAPITO_BE_ERROR_RESPONSE) {
od_backend_error(server, context, stream->start,
shapito_stream_used(stream));
continue;
}
if (type == SHAPITO_BE_PARAMETER_STATUS) {
char *name;
uint32_t name_len;
char *value;
uint32_t value_len;
rc = shapito_fe_read_parameter(stream->start,
shapito_stream_used(stream),
&name, &name_len,
&value, &value_len);
if (rc == -1) {
od_error(&instance->logger, context, server->client, server,
"failed to parse ParameterStatus message");
return -1;
}
/* update parameter */
rc = shapito_parameters_update(&server->params, name, name_len,
value, value_len);
if (rc == -1)
return -1;
od_debug(&instance->logger, context, server->client, server,
"%.*s = %.*s",
name_len, name, value_len, value);
continue;
}
if (type == SHAPITO_BE_READY_FOR_QUERY) {
od_backend_ready(server, context, stream->start,
shapito_stream_used(stream));
ready++;
if (ready == count)
break;
}
}
return 0;
}
int od_backend_query(od_server_t *server, shapito_stream_t *stream,
char *context,
char *query, int len)
{
od_instance_t *instance = server->global->instance;
shapito_stream_reset(stream);
int rc;
rc = shapito_fe_write_query(stream, query, len);
if (rc == -1)
return -1;
rc = od_write(server->io, stream);
if (rc == -1) {
od_error(&instance->logger, context, server->client, server,
"write error: %s",
machine_error(server->io));
return -1;
}
/* update server sync state and stats */
od_server_stat_request(server, 1);
rc = od_backend_ready_wait(server, stream, context, 1, UINT32_MAX);
return rc;
}
int
od_backend_deploy(od_server_t *server, char *context,
char *request, int request_size)
{
od_instance_t *instance = server->global->instance;
int rc;
switch (*request) {
case SHAPITO_BE_PARAMETER_STATUS:
{
char *name;
uint32_t name_len;
char *value;
uint32_t value_len;
rc = shapito_fe_read_parameter(request, request_size,
&name, &name_len, &value, &value_len);
if (rc == -1) {
od_error(&instance->logger, context, server->client, server,
"failed to parse ParameterStatus message");
return -1;
}
/* update parameter */
rc = shapito_parameters_update(&server->params, name, name_len,
value, value_len);
if (rc == -1)
return -1;
od_debug(&instance->logger, context, server->client, server,
"(deploy) %.*s = %.*s",
name_len, name, value_len, value);
break;
}
case SHAPITO_BE_ERROR_RESPONSE:
od_backend_error(server, context, request, request_size);
break;
case SHAPITO_BE_READY_FOR_QUERY:
rc = od_backend_ready(server, context, request, request_size);
if (rc == -1)
return -1;
server->deploy_sync--;
break;
}
return 0;
}
int od_backend_deploy_wait(od_server_t *server, shapito_stream_t *stream,
char *context, uint32_t time_ms)
{
od_instance_t *instance = server->global->instance;
while (server->deploy_sync > 0) {
shapito_stream_reset(stream);
int rc;
rc = od_read(server->io, stream, time_ms);
if (rc == -1) {
if (! machine_timedout()) {
od_error(&instance->logger, context, server->client, server,
"read error: %s",
machine_error(server->io));
}
return -1;
}
rc = od_backend_deploy(server, context, stream->start,
shapito_stream_used(stream));
if (rc == -1)
return -1;
}
return 0;
}