static void
_midgard_query_select_execute (MidgardExecutable *iface, gboolean async, GError **error)
{
g_return_if_fail (iface != NULL);
MidgardQuerySelect *self = MIDGARD_QUERY_SELECT (iface);
MidgardQueryExecutor *executor = MIDGARD_QUERY_EXECUTOR (self);
GError *err = NULL;
midgard_validable_validate (MIDGARD_VALIDABLE (self), &err);
if (err) {
g_propagate_error (error, err);
return;
}
MidgardDBObjectClass *klass = executor->priv->storage->priv->klass;
MidgardConnection *mgd = executor->priv->mgd;
GdaConnection *cnc = mgd->priv->connection;
GdaSqlStatement *sql_stm;
GdaSqlStatementSelect *sss;
sql_stm = gda_sql_statement_new (GDA_SQL_STATEMENT_SELECT);
sss = (GdaSqlStatementSelect*) sql_stm->contents;
g_assert (GDA_SQL_ANY_PART (sss)->type == GDA_SQL_ANY_STMT_SELECT);
MIDGARD_QUERY_EXECUTOR (self)->priv->stmt = sql_stm;
sss->from = gda_sql_select_from_new (GDA_SQL_ANY_PART (sss));
/* Initialize top base expresion and operation with default AND operator type */
GdaSqlExpr *base_where = gda_sql_expr_new (GDA_SQL_ANY_PART (sss));
GdaSqlOperation *base_operation = gda_sql_operation_new (GDA_SQL_ANY_PART (base_where));
base_operation->operator_type = GDA_SQL_OPERATOR_TYPE_AND;
base_where->cond = base_operation;
gda_sql_statement_select_take_where_cond (sql_stm, base_where);
/* Create targets (FROM) */
GdaSqlSelectTarget *s_target = gda_sql_select_target_new (GDA_SQL_ANY_PART (sss->from));
s_target->table_name = g_strdup (midgard_core_class_get_table (klass));
s_target->as = g_strdup_printf ("t%d", ++MIDGARD_QUERY_EXECUTOR (self)->priv->tableid);
MIDGARD_QUERY_EXECUTOR (self)->priv->table_alias = g_strdup (s_target->as);
gda_sql_select_from_take_new_target (sss->from, s_target);
/* Set target expression */
GdaSqlExpr *texpr = gda_sql_expr_new (GDA_SQL_ANY_PART (s_target));
GValue *tval = g_new0 (GValue, 1);
g_value_init (tval, G_TYPE_STRING);
g_value_set_string (tval, s_target->table_name);
texpr->value = tval;
s_target->expr = texpr;
/* Add fields for all properties registered per class (SELECT a,b,c...) */
klass->dbpriv->add_fields_to_select_statement (klass, mgd, sss, s_target->as);
GdaSqlExpr *where = sss->where_cond;
GdaSqlOperation *operation = where->cond;
/* Add joins, LEFT JOIN tbl2 ON... */
__query_select_add_joins (MIDGARD_QUERY_SELECT (self), operation, &err);
if (err) {
g_propagate_error (error, err);
goto return_false;
}
/* Add constraints' conditions (WHERE a=1, b=2...) */
if (MIDGARD_QUERY_EXECUTOR (self)->priv->constraint) {
MIDGARD_QUERY_CONSTRAINT_SIMPLE_GET_INTERFACE (MIDGARD_QUERY_EXECUTOR (self)->priv->constraint)->priv->add_conditions_to_statement (MIDGARD_QUERY_EXECUTOR (self), MIDGARD_QUERY_EXECUTOR (self)->priv->constraint, sql_stm, base_where, &err);
if (err) {
g_propagate_error (error, err);
goto return_false;
}
if (MIDGARD_QUERY_EXECUTOR (self)->priv->n_constraints == 1)
__add_second_dummy_constraint (sss, operation);
/* Add dummy constraint if operation has only one operand */
if (operation->operands && (g_slist_length (operation->operands) == 1))
__add_dummy_constraint (sss, operation);
} else {
/* no constraints, add dummy '1=1 AND 0<1' to satisfy top constraint group */
__add_dummy_constraint (sss, operation);
__add_second_dummy_constraint (sss, operation);
}
/* Add orders , ORDER BY t1.field... */
if (!__query_select_add_orders (executor, &err)) {
if (err)
g_propagate_error (error, err);
goto return_false;
}
/* Exclude deleted */
if (MGD_DBCLASS_METADATA_CLASS (klass) && !executor->priv->include_deleted)
__add_exclude_deleted_constraints (executor, sss, operation, klass);
/* Add limit, LIMIT x */
if (executor->priv->limit > 0) {
GdaSqlExpr *limit_expr = gda_sql_expr_new (GDA_SQL_ANY_PART (sss));
GValue *limit_val = g_new0 (GValue, 1);
g_value_init (limit_val, G_TYPE_STRING);
g_value_take_string (limit_val, g_strdup_printf ("%d", executor->priv->limit));
limit_expr->value = limit_val;
sss->limit_count = limit_expr;
}
/* Add offset, OFFSET x */
if (executor->priv->offset >= 0) {
GdaSqlExpr *offset_expr = gda_sql_expr_new (GDA_SQL_ANY_PART (sss));
GValue *offset_val = g_new0 (GValue, 1);
g_value_init (offset_val, G_TYPE_STRING);
g_value_take_string (offset_val, g_strdup_printf ("%d", executor->priv->offset));
offset_expr->value = offset_val;
sss->limit_offset = offset_expr;
}
/* Check structure */
if (!gda_sql_statement_check_structure (sql_stm, &err)) {
g_set_error (error, MIDGARD_EXECUTION_ERROR, MIDGARD_EXECUTION_ERROR_INTERNAL,
"Can't build SELECT statement: %s)", err && err->message ? err->message : _("Unknown reason"));
if (err)
g_clear_error (&err);
goto return_false;
}
/* Create statement */
GdaStatement *stmt = gda_statement_new ();
g_object_set (G_OBJECT (stmt), "structure", sql_stm, NULL);
gda_sql_statement_free (sql_stm);
sql_stm = NULL;
if (MGD_CNC_DEBUG (mgd)) {
gchar *debug_sql = gda_connection_statement_to_sql (cnc, stmt, NULL, GDA_STATEMENT_SQL_PRETTY, NULL, NULL);
g_debug ("QuerySelect: %s", debug_sql);
g_free (debug_sql);
}
/* execute statement */
GdaDataModel *model = NULL;
midgard_executable_execution_start (MIDGARD_EXECUTABLE(self));
model = gda_connection_statement_execute_select (cnc, stmt, NULL, &err);
g_object_unref (stmt);
if (!model && !err) {
g_set_error (error, MIDGARD_EXECUTION_ERROR, MIDGARD_EXECUTION_ERROR_INTERNAL,
"Execute error - Unknown reason, underlying error is NULL");
goto return_false;
}
if (err) {
g_set_error (error, MIDGARD_EXECUTION_ERROR, MIDGARD_EXECUTION_ERROR_INTERNAL,
"Execute error - %s", err->message);
g_error_free (err);
goto return_false;
}
executor->priv->results_count = gda_data_model_get_n_rows (model);
if (executor->priv->resultset && G_IS_OBJECT (executor->priv->resultset))
g_object_unref (G_OBJECT (executor->priv->resultset));
executor->priv->resultset = (gpointer) model;
return;
return_false:
if (sql_stm)
gda_sql_statement_free (sql_stm);
return;
}
/*
* @prov may be NULL
*/
static guint
do_a_test (GdaServerProvider *prov, GdaSqlParser *parser)
{
guint nfailed = 0;
GdaStatement *stmt;
GdaSet *params;
gchar *sql;
GError *error = NULL;
/* SQL parsed as an INSERT statement */
sql = "INSERT INTO tstest VALUES (##ts::timestamp, ##time::time)";
stmt = gda_sql_parser_parse_string (parser, sql, NULL, &error);
if (!stmt) {
g_print ("Failed to parse [%s]: %s\n", sql, error && error->message ? error->message : "No detail");
g_clear_error (&error);
nfailed ++;
goto endtest;
}
g_assert (gda_statement_get_statement_type (stmt) == GDA_SQL_STATEMENT_INSERT);
if (! gda_statement_get_parameters (stmt, ¶ms, &error)) {
g_print ("Failed to obtain parameters: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
nfailed ++;
goto endtest;
}
if (! gda_set_set_holder_value (params, &error, "ts", &ts)) {
g_print ("Failed to bind 'ts' parameter: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (! gda_set_set_holder_value (params, &error, "time", >)) {
g_print ("Failed to bind 'time' parameter: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
GdaConnection *cnc = NULL;
if (prov) {
cnc = gda_connection_new_from_string (gda_server_provider_get_name (prov), "DB_NAME=dummy;HOST=dummy", NULL,
GDA_CONNECTION_OPTIONS_NONE, &error);
if (!cnc) {
g_print ("Failed to create GdaConnection object: %s\n",
error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
}
gchar *expected;
expected = "('@@@@@@@@@@ 17:10:23+2', '16:09:22-3')";
if (cnc)
sql = gda_connection_statement_to_sql (cnc, stmt, params, 0, NULL, &error);
else
sql = gda_statement_to_sql_extended (stmt, NULL, params, 0, NULL, &error);
if (!sql) {
g_print ("Failed to render as SQL: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (!string_equal_to_template (sql, expected)) {
g_print ("Wrong rendered SQL: [%s] instead of [%s]\n", sql, expected);
g_object_unref (stmt);
g_object_unref (params);
g_free (sql);
nfailed ++;
goto endtest;
}
g_free (sql);
expected = "('@@@@@@@@@@ 15:10:23', '19:09:22')";
if (cnc)
sql = gda_connection_statement_to_sql (cnc, stmt, params, GDA_STATEMENT_SQL_TIMEZONE_TO_GMT, NULL, &error);
else
sql = gda_statement_to_sql_extended (stmt, NULL, params, GDA_STATEMENT_SQL_TIMEZONE_TO_GMT, NULL, &error);
if (!sql) {
g_print ("Failed to render as SQL: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (!string_equal_to_template (sql, expected)) {
g_print ("Wrong rendered SQL for GMT timezone: [%s] instead of [%s]\n", sql, expected);
g_object_unref (stmt);
g_object_unref (params);
g_free (sql);
nfailed ++;
goto endtest;
}
g_free (sql);
/* SQL not parsed as a valid statement */
sql = "AAAA (##ts::timestamp, ##time::time)";
stmt = gda_sql_parser_parse_string (parser, sql, NULL, &error);
if (!stmt) {
g_print ("Failed to parse [%s]: %s\n", sql, error && error->message ? error->message : "No detail");
g_clear_error (&error);
nfailed ++;
goto endtest;
}
g_assert (gda_statement_get_statement_type (stmt) == GDA_SQL_STATEMENT_UNKNOWN);
if (! gda_statement_get_parameters (stmt, ¶ms, &error)) {
g_print ("Failed to obtain parameters: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
nfailed ++;
goto endtest;
}
if (! gda_set_set_holder_value (params, &error, "ts", &ts)) {
g_print ("Failed to bind 'ts' parameter: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (! gda_set_set_holder_value (params, &error, "time", >)) {
g_print ("Failed to bind 'time' parameter: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
expected = "('@@@@@@@@@@ 17:10:23+2', '16:09:22-3')";
if (cnc)
sql = gda_connection_statement_to_sql (cnc, stmt, params, 0, NULL, &error);
else
sql = gda_statement_to_sql_extended (stmt, NULL, params, 0, NULL, &error);
if (!sql) {
g_print ("Failed to render as SQL: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (!string_equal_to_template (sql, expected)) {
g_print ("Wrong rendered SQL: [%s] instead of [%s]\n", sql, expected);
g_object_unref (stmt);
g_object_unref (params);
g_free (sql);
nfailed ++;
goto endtest;
}
g_free (sql);
expected = "('@@@@@@@@@@ 15:10:23', '19:09:22')";
if (cnc)
sql = gda_connection_statement_to_sql (cnc, stmt, params, GDA_STATEMENT_SQL_TIMEZONE_TO_GMT, NULL, &error);
else
sql = gda_statement_to_sql_extended (stmt, NULL, params, GDA_STATEMENT_SQL_TIMEZONE_TO_GMT, NULL, &error);
if (!sql) {
g_print ("Failed to render as SQL: %s\n", error && error->message ? error->message : "No detail");
g_clear_error (&error);
g_object_unref (stmt);
g_object_unref (params);
nfailed ++;
goto endtest;
}
if (!string_equal_to_template (sql, expected)) {
g_print ("Wrong rendered SQL for GMT timezone: [%s] instead of [%s]\n", sql, expected);
g_object_unref (stmt);
g_object_unref (params);
g_free (sql);
nfailed ++;
goto endtest;
}
g_free (sql);
endtest:
return nfailed;
}
