Files
rmodb/src/db_query.c
2020-10-09 10:08:13 +01:00

550 lines
14 KiB
C

#include <stdlib.h>
#include <stdio.h>
#include <errno.h>
#include <string.h>
#include <mysql.h>
#include "db_query.h"
#include "db_connection.h"
#include "db_column.h"
#include "db_value.h"
#include "db_where-builder.h"
#include "strext.h"
#ifndef SQL_DEBUG_COLOUR
# define SQL_DEBUG_COLOUR 36
#endif
#ifndef SQL_DEBUG_MAX_LEN
# define SQL_DEBUG_MAX_LEN 512
#endif
uint64_t simpleQuery(struct stored_conn_t *sconn, const char *qry, size_t qry_len)
{
#if defined DEBUG || defined SQL_DEBUG
printf("\x1b[%dm" "QRY: %.*s%s" "\x1b[0m" "\n",
SQL_DEBUG_COLOUR,
SQL_DEBUG_MAX_LEN, qry,
(qry_len > SQL_DEBUG_MAX_LEN ? "..." : "")
);
#endif
char *old_ptr;
if (mysql_real_query(SQCONN(sconn), qry, qry_len) != 0) {
fprintf(
stderr, "[%d]mysql_real_query: (%d) %s\n",
__LINE__, mysql_errno(SQCONN(sconn)), mysql_error(SQCONN(sconn))
);
return (uint64_t)-1;
}
if (sconn->last_qry_alloc < qry_len + 1) {
old_ptr = sconn->last_qry;
sconn->last_qry = realloc(sconn->last_qry, qry_len + 1);
if (sconn->last_qry == 0) {
sconn->last_qry = old_ptr;
fprintf(stderr, "[%d]malloc: (%d) %s\n", __LINE__, errno, strerror(errno));
return (uint64_t)-1;
}
sconn->last_qry_alloc = qry_len + 1;
}
memcpy(sconn->last_qry, qry, qry_len);
sconn->last_qry[qry_len] = '\0';
sconn->last_qry_len = qry_len;
sconn->num_queries++;
return mysql_insert_id(SQCONN(sconn));
}
uint64_t tableQuery(struct stored_conn_t *sconn, const char *qry, size_t qry_len, int scalar_result,
struct column_data_t ***col_data_ptr, size_t *n_cols)
{
my_ulonglong insertId;
my_ulonglong n_rows;
MYSQL_RES *result;
MYSQL_ROW row;
unsigned long *lens;
int failed = 0;
struct column_data_t **col_data;
insertId = simpleQuery(sconn, qry, qry_len);
if (insertId == (uint64_t)-1) {
return insertId;
}
*n_cols = mysql_field_count(SQCONN(sconn));
if (scalar_result && (*n_cols) > 1) {
fprintf(
stderr,
"[%d]tableQuery: Scalar result expected, got %ul columns. Using first column value\n",
__LINE__, (unsigned int)*n_cols
);
(*n_cols) = 1;
}
if (*n_cols == 0) {
return insertId;
}
result = mysql_store_result(SQCONN(sconn));
if (result == NULL) {
fprintf(
stderr, "[%d]mysql_real_query: (%d) %s\n",
__LINE__, mysql_errno(SQCONN(sconn)), mysql_error(SQCONN(sconn))
);
return (uint64_t)-1;
}
col_data = (struct column_data_t **)malloc(sizeof(struct column_data_t *) * *n_cols);
if (col_data == NULL) {
fprintf(stderr, "[%d]malloc: (%d) %s\n", __LINE__, errno, strerror(errno));
mysql_free_result(result);
return insertId;
}
memset(col_data, 0, sizeof(struct column_data_t *) * *n_cols);
n_rows = mysql_num_rows(result);
if (scalar_result && n_rows > 1) {
fprintf(stderr, "[%d]tableQuery: WARN: scalar_result expects 1 row, "
"%llu rows returned from query. Using first result only\n", __LINE__, n_rows);
n_rows = 1;
}
for (unsigned int i = 0; i < *n_cols; i++) {
*(col_data + i) = createColumnFromResult(sconn, result, n_rows);
if (*(col_data + i) == 0) {
failed++;
}
}
if (failed > 0) {
for (unsigned int i = 0; i < *n_cols; i++) {
if (*(col_data + i) != 0) {
freeColumn(*(col_data + i));
}
}
free(col_data);
mysql_free_result(result);
return insertId;
}
for (my_ulonglong r = 0; r < n_rows; r++) {
row = mysql_fetch_row(result);
lens = mysql_fetch_lengths(result);
if (row == NULL) {
fprintf(
stderr, "[%d]mysql_fetch_row: (%d) %s\n",
__LINE__, mysql_errno(SQCONN(sconn)), mysql_error(SQCONN(sconn))
);
return insertId;
}
for (unsigned int c = 0; c < *n_cols; c++) {
struct column_data_t *col = (*(col_data + c));
if (setColumnValueFromResult(col, r, *(row + c), *(lens + c)) < 0) {
failed++;
}
}
if (failed > 0) {
r = n_rows;
}
}
if (failed > 0) {
freeColumns(col_data, *n_cols);
mysql_free_result(result);
return insertId;
}
mysql_free_result(result);
*col_data_ptr = col_data;
return n_rows;
}
int scalarInt(struct stored_conn_t *sconn, const char *qry, size_t qry_len, int default_value)
{
struct column_data_t **col_data;
size_t n_cols;
uint64_t n_rows = tableQuery(sconn, qry, qry_len, 1, &col_data, &n_cols);
if (n_rows == (uint64_t)-1) {
freeColumns(col_data, n_cols);
return default_value;
}
if (n_rows > 0) {
if (!((*col_data)->isNullable && columnRowIsNull(*col_data, 0))) {
default_value = *((*col_data)->data.ptr_int32);
}
}
freeColumns(col_data, n_cols);
return default_value;
}
unsigned int scalarUInt(struct stored_conn_t *sconn, const char *qry, size_t qry_len,
unsigned int default_value)
{
struct column_data_t **col_data;
size_t n_cols;
uint64_t n_rows = tableQuery(sconn, qry, qry_len, 1, &col_data, &n_cols);
if (n_rows == (uint64_t)-1) {
return default_value;
}
if (n_rows > 0) {
if (!((*col_data)->isNullable && columnRowIsNull(*col_data, 0))) {
default_value = *((*col_data)->data.ptr_uint32);
}
}
freeColumns(col_data, n_cols);
return default_value;
}
double scalarReal(struct stored_conn_t *sconn, const char *qry, size_t qry_len,
double default_value)
{
struct column_data_t **col_data;
size_t n_cols;
uint64_t n_rows = tableQuery(sconn, qry, qry_len, 1, &col_data, &n_cols);
if (n_rows == (uint64_t)-1) {
return default_value;
}
if (n_rows > 0) {
if (!((*col_data)->isNullable && columnRowIsNull(*col_data, 0))) {
default_value = *((*col_data)->data.ptr_double);
}
}
freeColumns(col_data, n_cols);
return default_value;
}
char scalarChar(struct stored_conn_t *sconn, const char *qry, size_t qry_len, char default_value)
{
struct column_data_t **col_data;
size_t n_cols;
uint64_t n_rows = tableQuery(sconn, qry, qry_len, 1, &col_data, &n_cols);
if (n_rows == (uint64_t)-1) {
return default_value;
}
if (n_rows > 0) {
if (!((*col_data)->isNullable && columnRowIsNull(*col_data, 0))) {
default_value = *((*col_data)->data.ptr_str)[0];
}
}
freeColumns(col_data, n_cols);
return default_value;
}
char *scalarString(struct stored_conn_t *sconn, const char *qry, size_t qry_len,
char *default_value)
{
struct column_data_t **col_data;
size_t n_cols, len;
char *retval = NULL;
uint64_t n_rows = tableQuery(sconn, qry, qry_len, 1, &col_data, &n_cols);
if (n_rows == (uint64_t)-1) {
return default_value;
}
if (n_rows > 0) {
if (!((*col_data)->isNullable && columnRowIsNull(*col_data, 0))) {
if (strmemcpy(*((*col_data)->data.ptr_str), (*col_data)->data_lens[0], &retval, &len) != 0) {
retval = NULL;
}
}
}
freeColumns(col_data, n_cols);
return retval;
}
int64_t countQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len, where_builder *wb)
{
char *qry;
size_t qry_len;
int qry_ret;
str_builder *sb;
if ((sb = strbld_create()) == 0) {
return -1;
}
strbld_str(sb, "SELECT COUNT(*) AS `C` FROM ", 0);
escapeTableName_sb(sb, table, table_len);
compileWhereBuilder_sb(sb, wb, 1);
if (strbld_finalize_or_destroy(&sb, &qry, &qry_len) != 0) {
return -1;
}
qry_ret = scalarInt(sconn, qry, qry_len, 0);
free(qry);
return qry_ret;
}
int64_t updateQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len,
const char *set, size_t set_len, where_builder *wb)
{
str_builder *sb;
char *qry;
size_t qry_len;
uint64_t qry_ret;
if ((sb = strbld_create()) == 0) {
return -1;
}
strbld_str(sb, "UPDATE ", 7);
escapeTableName_sb(sb, table, table_len);
strbld_str(sb, " SET ", 4);
strbld_str(sb, set, set_len);
compileWhereBuilder_sb(sb, wb, 1);
if (strbld_finalize_or_destroy(&sb, &qry, &qry_len) != 0) {
return -1;
}
qry_ret = simpleQuery(sconn, qry, qry_len);
free(qry);
// Query failure
if (qry_ret == (uint64_t)-1) {
return -1;
}
return qry_ret == 0;
}
int64_t deleteQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len, where_builder *wb)
{
str_builder *sb;
char *qry;
size_t qry_len;
uint64_t qry_ret;
if ((sb = strbld_create()) == 0) {
return -1;
}
strbld_str(sb, "DELETE FROM ", 12);
escapeTableName_sb(sb, table, table_len);
compileWhereBuilder_sb(sb, wb, 1);
if (strbld_finalize_or_destroy(&sb, &qry, &qry_len) != 0) {
return -1;
}
qry_ret = simpleQuery(sconn, qry, qry_len);
free(qry);
if (qry_ret == (uint64_t)-1) {
return -1;
}
return qry_ret == 0;
}
int64_t updateByIdQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len, const char *set, size_t set_len,
const char *id_col, unsigned int id)
{
return updateQuery(sconn, table, table_len, set, set_len, where(0, id_col, EQ, TYPE_ID, 1, id));
}
int64_t deleteByIdQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len, const char *id_col, unsigned int id)
{
return deleteQuery(sconn, table, table_len, where(0, id_col, EQ, TYPE_ID, 1, id));
}
int64_t softDeleteByIdQuery(struct stored_conn_t *sconn,
const char *table, size_t table_len,
const char *id_col, unsigned int id)
{
char *set;
size_t set_len;
int64_t qry_ret;
columnSetValueStr(&set, &set_len, "deleted", TYPE_RAW, 2, "CURRENT_TIMESTAMP()", 19);
qry_ret = updateByIdQuery(sconn, table, table_len, set, set_len, id_col, id);
free(set);
return qry_ret;
}
int64_t syncIdMap(struct stored_conn_t *sconn, const char *table, size_t table_len,
const char *primary_col, const char *map_col,
unsigned int primary_id, size_t n_maps, unsigned int *map_ids)
{
str_builder *sb;
char *qry;
size_t qry_len;
int64_t qry_ret;
size_t idx;
qry_ret = deleteByIdQuery(sconn, table, table_len, primary_col, primary_id);
if (qry_ret != 1) {
return qry_ret;
}
if ((sb = strbld_create()) == 0) {
return -1;
}
strbld_str(sb, "INSERT INTO ", 12);
escapeTableName_sb(sb, table, table_len);
strbld_str(sb, " (", 2);
escapeColumnName_sb(sb, 0, 0, primary_col, 0);
strbld_char(sb, ',');
escapeColumnName_sb(sb, 0, 0, map_col, 0);
strbld_str(sb, ") VALUES ", 9);
for (idx = 0; idx < n_maps; idx++) {
strbld_char(sb, '(');
db_value_sb(sb, TYPE_ID, 1, primary_id);
strbld_char(sb, ',');
db_value_sb(sb, TYPE_ID, 1, *(map_ids + idx));
strbld_char(sb, ')');
if ((idx + 1) < n_maps) {
strbld_char(sb, ',');
}
}
if (strbld_finalize_or_destroy(&sb, &qry, &qry_len) != 0) {
return -1;
}
if (simpleQuery(sconn, qry, qry_len) == (uint64_t)-1) {
qry_ret = -1;
} else {
qry_ret = 1;
}
free(qry);
return 1;
}
int64_t syncIdMap_va(struct stored_conn_t *sconn, const char *table, size_t table_len,
const char *primary_col, const char *map_col,
unsigned int primary_id, size_t n_maps, va_list args)
{
unsigned int *map_ids;
size_t idx;
int64_t ret_val;
if ((map_ids = (unsigned int *)malloc(sizeof(unsigned int) * n_maps)) == 0) {
return -1;
}
for (idx = 0; idx < n_maps; idx++) {
*(map_ids + idx) = va_arg(args, unsigned int);
}
ret_val = syncIdMap(sconn, table, table_len, primary_col, map_col, primary_id, n_maps, map_ids);
free(map_ids);
return ret_val;
}
int64_t hasIdMap(struct stored_conn_t *sconn, const char *table, size_t table_len,
const char *primary_col, const char *map_col,
unsigned int primary_id, unsigned int map_id)
{
int64_t qry_ret;
qry_ret = countQuery(
sconn,
table, table_len,
whereAnd(
where(table, primary_col, EQ, TYPE_ID, 1, primary_id),
where(table, map_col, EQ, TYPE_ID, 1, map_id)
)
);
return qry_ret > 0;
}
int64_t addIdMap(struct stored_conn_t *sconn, const char *table, size_t table_len,
const char *primary_col, const char *map_col,
unsigned int primary_id, unsigned int map_id)
{
str_builder *sb;
char *qry;
size_t qry_len;
uint64_t qry_ret;
if ((sb = strbld_create()) == 0) {
return -1;
}
strbld_str(sb, "INSERT INTO ", 12);
escapeTableName_sb(sb, table, table_len);
strbld_char(sb, ' ');
strbld_char(sb, '(');
escapeColumnName_sb(sb, 0, 0, primary_col, 0);
strbld_char(sb, ',');
escapeColumnName_sb(sb, 0, 0, map_col, 0);
strbld_str(sb, ") VALUES (", 10);
db_value_sb(sb, TYPE_ID, 1, primary_id);
strbld_char(sb, ',');
db_value_sb(sb, TYPE_ID, 1, map_id);
strbld_str(sb, ") ON DUPLICATE KEY UPDATE ", 0);
columnSetValueStr_sb(sb, primary_col, TYPE_ID, 1, primary_id);
if (strbld_finalize_or_destroy(&sb, &qry, &qry_len) != 0) {
return -1;
}
qry_ret = simpleQuery(sconn, qry, qry_len);
free(qry);
// Query error
if (qry_ret == (uint64_t)-1) {
return -1;
}
return qry_ret == 0;
}
int64_t removeIdMap(struct stored_conn_t *sconn, const char *table, size_t table_len,
const char *primary_col, const char *map_col,
unsigned int primary_id, unsigned int map_id)
{
int64_t qry_ret;
qry_ret = deleteQuery(
sconn,
table, table_len,
whereAnd(
where(0, primary_col, EQ, TYPE_ID, 1, primary_id),
where(0, map_col, EQ, TYPE_ID, 1, map_id)
)
);
return qry_ret;
}