Async queries do not work with Embedded server

This is because mysql_send_query() client function is synchronous and waits
for results when connection is to Embedded server. So asynchronous support
via mysql_send_query() is not supported for Embedded server.

So do not allow to create asynchronous queries within Embedded server.

Author: pali

dbdimp.c

@@ -2786,6 +2786,11 @@ IV mariadb_db_do6(SV *dbh, imp_dbh_t *imp_dbh, SV *statement_sv, SV *attribs, I3
 
   if (async)
   {
+    if (imp_dbh->is_embedded)
+    {
+      mariadb_dr_do_error(dbh, CR_UNKNOWN_ERROR, "Async option not supported for Embedded server", "HY000");
+      return -2;
+    }
     if (disable_fallback_for_server_prepare)
     {
       mariadb_dr_do_error(dbh, ER_UNSUPPORTED_PS, "Async option not supported with server side prepare", "HY000");
@@ -3963,6 +3968,11 @@ mariadb_st_prepare_sv(
     (void)hv_stores(processed, "mariadb_async", &PL_sv_yes);
     svp = MARIADB_DR_ATTRIB_GET_SVPS(attribs, "mariadb_async");
     if(svp && SvTRUE(*svp)) {
+        if (imp_dbh->is_embedded)
+        {
+          mariadb_dr_do_error(sth, CR_UNKNOWN_ERROR, "Async option not supported for Embedded server", "HY000");
+          return 0;
+        }
         imp_sth->is_async = TRUE;
         if (imp_sth->disable_fallback_for_server_prepare)
         {

lib/DBD/MariaDB.pm

@@ -731,7 +731,6 @@ my %odbc_info_constants = (
     169 => 127,                                # SQL_AGGREGATE_FUNCTIONS
     117 => 0,                                  # SQL_ALTER_DOMAIN
      86 => 3,                                  # SQL_ALTER_TABLE
-  10021 => 2,                                  # SQL_ASYNC_MODE
     120 => 2,                                  # SQL_BATCH_ROW_COUNT
     121 => 2,                                  # SQL_BATCH_SUPPORT
      82 => 0,                                  # SQL_BOOKMARK_PERSISTENCE
@@ -905,6 +904,7 @@ my %odbc_info_constants = (
 );
 
 my %odbc_info_subs = (
+  10021 => sub { $_[0]->FETCH('mariadb_hostinfo') eq 'Embedded' ? 0 : 2 },                                                                # SQL_ASYNC_MODE
       2 => sub { "DBI:MariaDB:" . $_[0]->{Name} },                                                                                        # SQL_DATA_SOURCE_NAME
      17 => sub { ($_[0]->FETCH('mariadb_serverinfo') =~ /MariaDB|-maria-/) ? 'MariaDB' : 'MySQL' },                                       # SQL_DBMS_NAME
      18 => sub { my $ver = $_[0]->FETCH('mariadb_serverversion'); sprintf("%02u.%02u.%02u00", $ver/10000, ($ver%10000)/100, $ver%100) },  # SQL_DBMS_VER