Below is the list of changes that have just been committed into a local
5.1 repository of andrey. When andrey does a push these changes will
be propagated to the main repository and, within 24 hours after the
push, to the public repository.
For information on how to access the public repository
see http://dev.mysql.com/doc/mysql/en/installing-source-tree.html
ChangeSet
1.2234 06/04/10 00:53:56 andrey@lmy004. +17 -0
Fix for bug#17619 (Scheduler race conditions)
This is preliminary patch intended to be reviewed. This patch passes all existing tests but
is missing integration for evex_db_drop_events. Includes some corrections after discussion
with Konstantin.
sql/event_scheduler.h
1.1 06/04/10 00:53:46 andrey@lmy004. +301 -0
sql/event_scheduler.h
1.0 06/04/10 00:53:46 andrey@lmy004. +0 -0
BitKeeper file /work/mysql-5.1-bug17619-new/sql/event_scheduler.h
sql/event_scheduler.cc
1.1 06/04/10 00:53:45 andrey@lmy004. +2017 -0
sql/sql_yacc.yy
1.485 06/04/10 00:53:45 andrey@lmy004. +10 -0
- parse SHOW EVENTS TEST
sql/event_scheduler.cc
1.0 06/04/10 00:53:45 andrey@lmy004. +0 -0
BitKeeper file /work/mysql-5.1-bug17619-new/sql/event_scheduler.cc
sql/sql_parse.cc
1.535 06/04/10 00:53:44 andrey@lmy004. +31 -5
- run scheduler tests on SQLCOM_SHOW_EVENTS_TEST
- let kill_one_thread() return whether there was an error or not
and be silent if asked to be, makes it reusable in code that will send send_ok() on
its own.
sql/sql_lex.h
1.225 06/04/10 00:53:44 andrey@lmy004. +1 -1
add new command SQLCOM_SHOW_EVENTS_TEST, temporarily, for inside testing of the scheduler
sql/share/errmsg.txt
1.91 06/04/10 00:53:43 andrey@lmy004. +6 -0
add error messages for the scheduler
sql/set_var.cc
1.181 06/04/10 00:53:43 andrey@lmy004. +31 -1
- use the static member manager_working of Event_scheduler class,
capsulation is better
sql/mysql_priv.h
1.388 06/04/10 00:53:43 andrey@lmy004. +2 -1
let kill_one_thread() return whether there was an error or not
sql/lex.h
1.157 06/04/10 00:53:43 andrey@lmy004. +1 -0
- add TEST as TEST_SYM. Needed for SHOW EVENTS TEST which is temporary code for testing
the scheduler from inside the server with 1 command.
sql/event_timed.cc
1.48 06/04/10 00:53:43 andrey@lmy004. +144 -24
Event_timed::kill_thread() stub, to implemented later, used by the
current Event_scheduler_manager code
sql/event_priv.h
1.21 06/04/10 00:53:43 andrey@lmy004. +9 -37
export db_find_event() and db_create_event()
sql/event.h
1.28 06/04/10 00:53:42 andrey@lmy004. +38 -36
move sortcmp_lex_string() so it is visible in the newly implemented
Event_timed::same_name()
sql/event.cc
1.38 06/04/10 00:53:42 andrey@lmy004. +88 -255
export db_create_event() and db_find_event()
sql/Makefile.am
1.134 06/04/10 00:53:42 andrey@lmy004. +3 -3
add a new file event_scheduler.cc to the build
mysql-test/t/events.test
1.25 06/04/10 00:53:42 andrey@lmy004. +1 -11
fix test
mysql-test/r/events.result
1.30 06/04/10 00:53:42 andrey@lmy004. +2 -10
update result
BitKeeper/deleted/.del-event_executor.cc~f4a4645b973838ab
1.42 06/04/09 13:01:15 andrey@lmy004. +1 -968
Delete: sql/event_executor.cc
# This is a BitKeeper patch. What follows are the unified diffs for the
# set of deltas contained in the patch. The rest of the patch, the part
# that BitKeeper cares about, is below these diffs.
# User: andrey
# Host: lmy004.
# Root: /work/mysql-5.1-bug17619-new
--- 1.133/sql/Makefile.am 2006-03-20 21:16:49 +02:00
+++ 1.134/sql/Makefile.am 2006-04-10 00:53:42 +03:00
@@ -65,8 +65,8 @@ noinst_HEADERS = item.h item_func.h item
sp_head.h sp_pcontext.h sp_rcontext.h sp.h sp_cache.h \
parse_file.h sql_view.h sql_trigger.h \
sql_array.h sql_cursor.h event.h event_priv.h \
- sql_plugin.h authors.h sql_partition.h \
- partition_info.h partition_element.h
+ event_scheduler.h sql_plugin.h authors.h sql_partition.h \
+ partition_info.h partition_element.h event_scheduler.h
mysqld_SOURCES = sql_lex.cc sql_handler.cc sql_partition.cc \
item.cc item_sum.cc item_buff.cc item_func.cc \
item_cmpfunc.cc item_strfunc.cc item_timefunc.cc \
@@ -100,7 +100,7 @@ mysqld_SOURCES = sql_lex.cc sql_handler.
tztime.cc my_time.c my_user.c my_decimal.cc\
sp_head.cc sp_pcontext.cc sp_rcontext.cc sp.cc \
sp_cache.cc parse_file.cc sql_trigger.cc \
- event_executor.cc event.cc event_timed.cc \
+ event.cc event_timed.cc event_scheduler.cc\
sql_plugin.cc sql_binlog.cc \
handlerton.cc sql_tablespace.cc partition_info.cc
EXTRA_mysqld_SOURCES = ha_innodb.cc ha_berkeley.cc ha_archive.cc \
--- 1.156/sql/lex.h 2006-03-20 21:36:13 +02:00
+++ 1.157/sql/lex.h 2006-04-10 00:53:43 +03:00
@@ -521,6 +521,7 @@ static SYMBOL symbols[] = {
{ "TEMPORARY", SYM(TEMPORARY)},
{ "TEMPTABLE", SYM(TEMPTABLE_SYM)},
{ "TERMINATED", SYM(TERMINATED)},
+ { "TEST_EVENTS", SYM(TEST_EVENTS_SYM)},
{ "TEXT", SYM(TEXT_SYM)},
{ "THAN", SYM(THAN_SYM)},
{ "THEN", SYM(THEN_SYM)},
--- 1.387/sql/mysql_priv.h 2006-03-22 08:57:50 +02:00
+++ 1.388/sql/mysql_priv.h 2006-04-10 00:53:43 +03:00
@@ -83,7 +83,8 @@ char *sql_strmake_with_convert(const cha
CHARSET_INFO *from_cs,
uint32 max_res_length,
CHARSET_INFO *to_cs, uint32 *result_length);
-void kill_one_thread(THD *thd, ulong id, bool only_kill_query);
+uint kill_one_thread(THD *thd, ulong id, bool only_kill_query);
+void sql_kill(THD *thd, ulong id, bool only_kill_query);
bool net_request_file(NET* net, const char* fname);
char* query_table_status(THD *thd,const char *db,const char *table_name);
--- 1.224/sql/sql_lex.h 2006-03-20 21:39:47 +02:00
+++ 1.225/sql/sql_lex.h 2006-04-10 00:53:44 +03:00
@@ -111,7 +111,7 @@ enum enum_sql_command {
SQLCOM_SHOW_AUTHORS, SQLCOM_BINLOG_BASE64_EVENT,
SQLCOM_SHOW_PLUGINS,
SQLCOM_CREATE_EVENT, SQLCOM_ALTER_EVENT, SQLCOM_DROP_EVENT,
- SQLCOM_SHOW_CREATE_EVENT, SQLCOM_SHOW_EVENTS,
+ SQLCOM_SHOW_CREATE_EVENT, SQLCOM_SHOW_EVENTS, SQLCOM_SHOW_EVENTS_TEST,
/* This should be the last !!! */
--- 1.534/sql/sql_parse.cc 2006-03-21 14:10:09 +02:00
+++ 1.535/sql/sql_parse.cc 2006-04-10 00:53:44 +03:00
@@ -2030,7 +2030,7 @@ bool dispatch_command(enum enum_server_c
{
statistic_increment(thd->status_var.com_stat[SQLCOM_KILL], &LOCK_status);
ulong id=(ulong) uint4korr(packet);
- kill_one_thread(thd,id,false);
+ sql_kill(thd,id,false);
break;
}
case COM_SET_OPTION:
@@ -3860,6 +3860,13 @@ end_with_restore_list:
res= evex_show_create_event(thd, lex->spname, lex->et->definer);
break;
}
+#ifndef DBUG_OFF
+ case SQLCOM_SHOW_EVENTS_TEST:
+ {
+ res= Event_scheduler::tests_run(thd);
+ break;
+ }
+#endif
case SQLCOM_CREATE_FUNCTION: // UDF function
{
if (check_access(thd,INSERT_ACL,"mysql",0,1,0,0))
@@ -4099,7 +4106,7 @@ end_with_restore_list:
MYF(0));
goto error;
}
- kill_one_thread(thd, (ulong)it->val_int(), lex->type & ONLY_KILL_QUERY);
+ sql_kill(thd, (ulong)it->val_int(), lex->type & ONLY_KILL_QUERY);
break;
}
#ifndef NO_EMBEDDED_ACCESS_CHECKS
@@ -6860,19 +6867,21 @@ bool reload_acl_and_cache(THD *thd, ulon
return result;
}
+
/*
- kill on thread
+ kills a thread
SYNOPSIS
kill_one_thread()
thd Thread class
id Thread id
+ only_kill_query Should it kill the query or the connection
NOTES
This is written such that we have a short lock on LOCK_thread_count
*/
-void kill_one_thread(THD *thd, ulong id, bool only_kill_query)
+uint kill_one_thread(THD *thd, ulong id, bool only_kill_query)
{
THD *tmp;
uint error=ER_NO_SUCH_THREAD;
@@ -6902,7 +6911,24 @@ void kill_one_thread(THD *thd, ulong id,
pthread_mutex_unlock(&tmp->LOCK_delete);
}
- if (!error)
+ return error;
+}
+
+
+/*
+ kills a thread and sends response
+
+ SYNOPSIS
+ sql_kill()
+ thd Thread class
+ id Thread id
+ only_kill_query Should it kill the query or the connection
+*/
+
+void sql_kill(THD *thd, ulong id, bool only_kill_query)
+{
+ uint error;
+ if (!(error= kill_one_thread(thd, id, only_kill_query)))
send_ok(thd);
else
my_error(error, MYF(0), id);
--- 1.484/sql/sql_yacc.yy 2006-03-21 14:10:10 +02:00
+++ 1.485/sql/sql_yacc.yy 2006-04-10 00:53:45 +03:00
@@ -630,6 +630,7 @@ bool my_yyoverflow(short **a, YYSTYPE **
%token TEMPORARY
%token TEMPTABLE_SYM
%token TERMINATED
+%token TEST_EVENTS_SYM
%token TEXT_STRING
%token TEXT_SYM
%token TIMESTAMP
@@ -8150,6 +8151,15 @@ show_param:
if (prepare_schema_table(YYTHD, lex, 0, SCH_EVENTS))
YYABORT;
}
+ | TEST_EVENTS_SYM
+ {
+#ifndef DBUG_OFF
+ Lex->sql_command= SQLCOM_SHOW_EVENTS_TEST;
+#else
+ yyerror(ER(ER_SYNTAX_ERROR));
+ YYABORT;
+#endif
+ }
| TABLE_SYM STATUS_SYM opt_db wild_and_where
{
LEX *lex= Lex;
--- 1.29/mysql-test/r/events.result 2006-03-24 18:48:43 +02:00
+++ 1.30/mysql-test/r/events.result 2006-04-10 00:53:42 +03:00
@@ -260,10 +260,8 @@ ALTER TABLE mysql.event MODIFY db char(6
"This should work"
SHOW EVENTS;
Db Name Definer Type Execute at Interval value Interval field Starts Ends Status
-events_test intact_check root@localhost RECURRING NULL 10 HOUR # # ENABLED
+events_test intact_check root@localhost RECURRING NULL 10 HOUR # # ENABLED
ALTER TABLE mysql.event MODIFY db char(64) character set cp1251 default '';
-Warnings:
-Warning 1265 Data truncated for column 'db' at row 1
SELECT event_name FROM INFORMATION_SCHEMA.EVENTS;
ERROR HY000: Cannot load from mysql.event. Table probably corrupted. See error log.
ALTER TABLE mysql.event MODIFY db varchar(64) character set utf8 collate utf8_bin default '';
@@ -425,19 +423,13 @@ select get_lock("test_lock2_1", 20);
get_lock("test_lock2_1", 20)
1
create event закачка21 on schedule every 10 hour do select get_lock("test_lock2_1", 20);
-"Should see 2 processes, one locked on get_lock("
-"Shutting down the scheduler, it should wait for the running event"
-set global event_scheduler=0;
"Should have only 3 processes: the scheduler, our conn and the locked event"
show processlist;
Id User Host db Command Time State Info
# root localhost events_test Query # NULL show processlist
# event_scheduler localhost NULL Connect # Sleeping NULL
# root localhost events_test Connect # User lock select get_lock("test_lock2_1", 20)
-"Release the lock so the child process should finish. Hence the scheduler also"
-select release_lock("test_lock2_1");
-release_lock("test_lock2_1")
-1
+set global event_scheduler=0;
"Should have only our process now:"
show processlist;
Id User Host db Command Time State Info
--- 1.24/mysql-test/t/events.test 2006-03-17 12:01:35 +02:00
+++ 1.25/mysql-test/t/events.test 2006-04-10 00:53:42 +03:00
@@ -19,7 +19,6 @@ SET GLOBAL event_scheduler=1;
SHOW DATABASES LIKE 'db_x';
SHOW TABLES FROM db_x;
SET GLOBAL event_scheduler=0;
---sleep 1
connection priv_conn;
DROP EVENT e_x1;
DROP EVENT e_x2;
@@ -32,7 +31,6 @@ USE events_test;
# END: BUG #17289 Events: missing privilege check for drop database
#
SET GLOBAL event_scheduler=0;
---sleep 1
drop event if exists event1;
create event event1 on schedule every 15 minute starts now() ends date_add(now(), interval 5 hour) DO begin end;
alter event event1 rename to event2 enable;
@@ -378,18 +376,10 @@ set global event_scheduler=1;
select get_lock("test_lock2_1", 20);
create event закачка21 on schedule every 10 hour do select get_lock("test_lock2_1", 20);
--sleep 1
---echo "Should see 2 processes, one locked on get_lock("
-#--replace_column 1 # 6 #
-#show processlist;
---echo "Shutting down the scheduler, it should wait for the running event"
-set global event_scheduler=0;
---sleep 1
--echo "Should have only 3 processes: the scheduler, our conn and the locked event"
--replace_column 1 # 6 #
show processlist;
---echo "Release the lock so the child process should finish. Hence the scheduler also"
-select release_lock("test_lock2_1");
---sleep 1
+set global event_scheduler=0;
--echo "Should have only our process now:"
--replace_column 1 # 6 #
show processlist;
--- 1.37/sql/event.cc 2006-02-28 21:32:30 +02:00
+++ 1.38/sql/event.cc 2006-04-10 00:53:42 +03:00
@@ -38,23 +38,8 @@
ENABLED to DISABLED status change and this is safe for replicating. As well
an event may be deleted which is also safe for RBR.
- - Maybe move all allocations during parsing to evex_mem_root thus saving
- double parsing in evex_create_event!
-
- - If the server is killed (stopping) try to kill executing events?
-
- - What happens if one renames an event in the DB while it is in memory?
- Or even deleting it?
-
- - Consider using conditional variable when doing shutdown instead of
- waiting till all worker threads end.
-
- - Make Event_timed::get_show_create_event() work
-
- Add logging to file
- - Move comparison code to class Event_timed
-
Warning:
- For now parallel execution is not possible because the same sp_head cannot be
executed few times!!! There is still no lock attached to particular event.
@@ -65,7 +50,7 @@ Warning:
QUEUE EVEX_EQ_NAME;
MEM_ROOT evex_mem_root;
time_t mysql_event_last_create_time= 0L;
-
+ulong opt_event_executor;
static TABLE_FIELD_W_TYPE event_table_fields[EVEX_FIELD_COUNT] = {
{
@@ -186,30 +171,6 @@ LEX_STRING interval_type_to_name[] = {
};
-
-/*
- Inits the scheduler queue - prioritized queue from mysys/queue.c
-
- Synopsis
- evex_queue_init()
-
- queue - pointer the the memory to be initialized as queue. has to be
- allocated from the caller
-
- Notes
- During initialization the queue is sized for 30 events, and when is full
- will auto extent with 30.
-*/
-
-void
-evex_queue_init(EVEX_QUEUE_TYPE *queue)
-{
- if (init_queue_ex(queue, 30 /*num_el*/, 0 /*offset*/, 0 /*smallest_on_top*/,
- event_timed_compare_q, NULL, 30 /*auto_extent*/))
- sql_print_error("Insufficient memory to initialize executing queue.");
-}
-
-
/*
Compares 2 LEX strings regarding case.
@@ -257,14 +218,8 @@ int sortcmp_lex_string(LEX_STRING s, LEX
int
my_time_compare(TIME *a, TIME *b)
{
-
-#ifdef ENABLE_WHEN_WE_HAVE_MILLISECOND_IN_TIMESTAMPS
- my_ulonglong a_t= TIME_to_ulonglong_datetime(a)*100L + a->second_part;
- my_ulonglong b_t= TIME_to_ulonglong_datetime(b)*100L + b->second_part;
-#else
my_ulonglong a_t= TIME_to_ulonglong_datetime(a);
my_ulonglong b_t= TIME_to_ulonglong_datetime(b);
-#endif
if (a_t > b_t)
return 1;
@@ -276,31 +231,6 @@ my_time_compare(TIME *a, TIME *b)
/*
- Compares the execute_at members of 2 Event_timed instances
-
- Synopsis
- event_timed_compare()
-
- a - first Event_timed object
- b - second Event_timed object
-
- RETURNS:
- -1 - a->execute_at < b->execute_at
- 0 - a->execute_at == b->execute_at
- 1 - a->execute_at > b->execute_at
-
- Notes
- execute_at.second_part is not considered during comparison
-*/
-
-int
-event_timed_compare(Event_timed *a, Event_timed *b)
-{
- return my_time_compare(&a->execute_at, &b->execute_at);
-}
-
-
-/*
Compares the execute_at members of 2 Event_timed instances.
Used as callback for the prioritized queue when shifting
elements inside.
@@ -324,7 +254,8 @@ event_timed_compare(Event_timed *a, Even
int
event_timed_compare_q(void *vptr, byte* a, byte *b)
{
- return event_timed_compare((Event_timed *)a, (Event_timed *)b);
+ return my_time_compare(&((Event_timed *)a)->execute_at,
+ &((Event_timed *)b)->execute_at);
}
@@ -462,6 +393,72 @@ common_1_lev_code:
}
+static bool evex_mutexes_initted= true;
+
+/*
+ Inits the scheduler's structures.
+
+ Synopsis
+ init_events()
+
+ Returns
+ 0 OK
+ 1 Error
+*/
+
+int
+init_events()
+{
+ DBUG_ENTER("init_events");
+ evex_mutexes_initted= TRUE;
+ pthread_mutex_init(&Event_scheduler::LOCK_scheduler_object, MY_MUTEX_INIT_FAST);
+ if (opt_event_executor)
+ {
+ Event_scheduler *scheduler;
+ scheduler= Event_scheduler::get_instance(true);
+ if (!scheduler || scheduler->start())
+ {
+ sql_print_error("SCHEDULER: Error while starting");
+ DBUG_RETURN(1);
+ }
+ }
+ DBUG_RETURN(0);
+}
+
+
+/*
+ Cleans up scheduler's resources. Called at sever shutdown.
+
+ SYNOPSIS
+ shutdown_events()
+*/
+
+void
+shutdown_events()
+{
+ Event_scheduler *scheduler;
+ DBUG_ENTER("shutdown_events");
+
+ scheduler= Event_scheduler::get_instance(false);
+ if (scheduler)
+ scheduler->shutdown(Event_scheduler::EVENT_STOP_SYNC);
+
+ if (Event_scheduler::destroy())
+ {
+ DBUG_ASSERT(0);
+ sql_print_error("SCHEDULER: Trying to destroy while still running!");
+ }
+
+ if (evex_mutexes_initted)
+ {
+ evex_mutexes_initted= false;
+ pthread_mutex_destroy(&Event_scheduler::LOCK_scheduler_object);
+ }
+
+ DBUG_VOID_RETURN;
+}
+
+
/*
Open mysql.event table for read
@@ -721,7 +718,7 @@ trunc_err:
db_update_event. The name of the event is inside "et".
*/
-static int
+int
db_create_event(THD *thd, Event_timed *et, my_bool create_if_not,
uint *rows_affected)
{
@@ -954,7 +951,7 @@ err:
2) tbl is not closed at exit
*/
-static int
+int
db_find_event(THD *thd, sp_name *name, LEX_STRING *definer, Event_timed **ett,
TABLE *tbl, MEM_ROOT *root)
{
@@ -1011,147 +1008,6 @@ done:
/*
- Looks for a named event in mysql.event and then loads it from
- the table, compiles it and insert it into the cache.
-
- SYNOPSIS
- evex_load_and_compile_event()
- thd THD
- spn the name of the event to alter
- definer who is the owner
- use_lock whether to obtain a lock on LOCK_event_arrays or not
-
- RETURN VALUE
- 0 - OK
- < 0 - error (in this case underlying functions call my_error()).
-*/
-
-static int
-evex_load_and_compile_event(THD * thd, sp_name *spn, LEX_STRING definer,
- bool use_lock)
-{
- int ret= 0;
- MEM_ROOT *tmp_mem_root;
- Event_timed *ett;
- Open_tables_state backup;
-
- DBUG_ENTER("db_load_and_compile_event");
- DBUG_PRINT("enter", ("name: %*s", spn->m_name.length, spn->m_name.str));
-
- tmp_mem_root= thd->mem_root;
- thd->mem_root= &evex_mem_root;
-
- thd->reset_n_backup_open_tables_state(&backup);
- /* no need to use my_error() here because db_find_event() has done it */
- ret= db_find_event(thd, spn, &definer, &ett, NULL, NULL);
- thd->restore_backup_open_tables_state(&backup);
- if (ret)
- goto done;
-
- /*
- allocate on evex_mem_root. if you call without evex_mem_root
- then sphead will not be cleared!
- */
- if ((ret= ett->compile(thd, &evex_mem_root)))
- goto done;
-
- ett->compute_next_execution_time();
- if (use_lock)
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
-
- evex_queue_insert(&EVEX_EQ_NAME, (EVEX_PTOQEL) ett);
-
- /*
- There is a copy in the array which we don't need. sphead won't be
- destroyed.
- */
-
- if (use_lock)
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
-
-done:
- if (thd->mem_root != tmp_mem_root)
- thd->mem_root= tmp_mem_root;
-
- DBUG_RETURN(ret);
-}
-
-
-/*
- Removes from queue in memory the event which is identified by the tupple
- (db, name).
-
- SYNOPSIS
- evex_remove_from_cache()
-
- db - db name
- name - event name
- use_lock - whether to lock the mutex LOCK_event_arrays or not in case it
- has been already locked outside
- is_drop - if an event is currently being executed then we can also delete
- the Event_timed instance, so we alarm the event that it should
- drop itself if this parameter is set to TRUE. It's false on
- ALTER EVENT.
-
- RETURNS
- 0 OK (always)
-*/
-
-static int
-evex_remove_from_cache(LEX_STRING *db, LEX_STRING *name, bool use_lock,
- bool is_drop)
-{
- //ToDo : Add definer to the tuple (db, name) to become triple
- uint i;
- int ret= 0;
-
- DBUG_ENTER("evex_remove_from_cache");
- /*
- It is possible that 2 (or 1) pass(es) won't find the event in memory.
- The reason is that DISABLED events are not cached.
- */
-
- if (use_lock)
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
-
- for (i= 0; i < evex_queue_num_elements(EVEX_EQ_NAME); ++i)
- {
- Event_timed *et= evex_queue_element(&EVEX_EQ_NAME, i, Event_timed*);
- DBUG_PRINT("info", ("[%s.%s]==[%s.%s]?",db->str,name->str, et->dbname.str,
- et->name.str));
- if (!sortcmp_lex_string(*name, et->name, system_charset_info) &&
- !sortcmp_lex_string(*db, et->dbname, system_charset_info))
- {
- if (et->can_spawn_now())
- {
- DBUG_PRINT("evex_remove_from_cache", ("not running - free and delete"));
- et->free_sp();
- delete et;
- }
- else
- {
- DBUG_PRINT("evex_remove_from_cache",
- ("running.defer mem free. is_drop=%d", is_drop));
- et->flags|= EVENT_EXEC_NO_MORE;
- et->dropped= is_drop;
- }
- DBUG_PRINT("evex_remove_from_cache", ("delete from queue"));
- evex_queue_delete_element(&EVEX_EQ_NAME, i);
- /* ok, we have cleaned */
- ret= 0;
- goto done;
- }
- }
-
-done:
- if (use_lock)
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
-
- DBUG_RETURN(ret);
-}
-
-
-/*
The function exported to the world for creating of events.
SYNOPSIS
@@ -1172,6 +1028,7 @@ evex_create_event(THD *thd, Event_timed
uint *rows_affected)
{
int ret = 0;
+ Event_scheduler *mgr;
DBUG_ENTER("evex_create_event");
DBUG_PRINT("enter", ("name: %*s options:%d", et->name.length,
@@ -1182,13 +1039,9 @@ evex_create_event(THD *thd, Event_timed
rows_affected)))
goto done;
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- if (evex_is_running && et->status == MYSQL_EVENT_ENABLED)
- {
- sp_name spn(et->dbname, et->name);
- ret= evex_load_and_compile_event(thd, &spn, et->definer, true);
- }
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
+ if ((mgr= Event_scheduler::get_instance(false)) &&
+ (ret= (int) mgr->add_event(thd, et, true)))
+ my_error(ER_EVENT_ADD_TO_QUEUE_ERROR, MYF(0), ret);
done:
/* No need to close the table, it will be closed in sql_parse::do_command */
@@ -1217,7 +1070,7 @@ evex_update_event(THD *thd, Event_timed
uint *rows_affected)
{
int ret;
- bool need_second_pass= true;
+ Event_scheduler *mgr;
DBUG_ENTER("evex_update_event");
DBUG_PRINT("enter", ("name: %*s", et->name.length, et->name.str));
@@ -1230,26 +1083,10 @@ evex_update_event(THD *thd, Event_timed
if ((ret= db_update_event(thd, et, new_name)))
goto done;
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- if (!evex_is_running)
- UNLOCK_MUTEX_AND_BAIL_OUT(LOCK_evex_running, done);
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
- evex_remove_from_cache(&et->dbname, &et->name, false, false);
- if (et->status == MYSQL_EVENT_ENABLED)
- {
- if (new_name)
- ret= evex_load_and_compile_event(thd, new_name, et->definer, false);
- else
- {
- sp_name spn(et->dbname, et->name);
- ret= evex_load_and_compile_event(thd, &spn, et->definer, false);
- }
- if (ret == EVEX_COMPILE_ERROR)
- my_error(ER_EVENT_COMPILE_ERROR, MYF(0));
- }
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
+ if ((mgr= Event_scheduler::get_instance(false)) &&
+ (ret= (int) mgr->replace_event(thd, et, Event_scheduler::EVENT_STOP_SYNC)))
+ my_error(ER_EVENT_REPLACE_IN_QUEUE_ERROR, MYF(0), ret);
done:
DBUG_RETURN(ret);
@@ -1333,22 +1170,16 @@ int
evex_drop_event(THD *thd, Event_timed *et, bool drop_if_exists,
uint *rows_affected)
{
+ Event_scheduler *mgr;
int ret= 0;
DBUG_ENTER("evex_drop_event");
-
-
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- if (evex_is_running)
- ret= evex_remove_from_cache(&et->dbname, &et->name, true, true);
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- if (ret == 1)
- ret= 0;
- else if (ret == 0)
- ret= db_drop_event(thd, et, drop_if_exists, rows_affected);
- else
- my_error(ER_UNKNOWN_ERROR, MYF(0));
+ if (!(ret= db_drop_event(thd, et, drop_if_exists, rows_affected)))
+ {
+ if ((mgr= Event_scheduler::get_instance(false)) &&
+ (ret= mgr->drop_event(thd, et, Event_scheduler::EVENT_STOP_SYNC)))
+ my_error(ER_EVENT_DROP_FROM_QUEUE_ERROR, MYF(0), ret);
+ }
DBUG_RETURN(ret);
}
@@ -1456,6 +1287,7 @@ evex_show_create_event(THD *thd, sp_name
int
evex_drop_db_events(THD *thd, char *db)
{
+#if A0
TABLE *table;
READ_RECORD read_record_info;
int ret= 0;
@@ -1603,4 +1435,5 @@ end:
close_thread_tables(thd);
DBUG_RETURN(ret);
+#endif
}
--- 1.27/sql/event.h 2006-03-16 14:14:32 +02:00
+++ 1.28/sql/event.h 2006-04-10 00:53:42 +03:00
@@ -19,6 +19,7 @@
#include "sp.h"
#include "sp_head.h"
+#include "event_scheduler.h"
#define EVEX_OK SP_OK
#define EVEX_KEY_NOT_FOUND SP_KEY_NOT_FOUND
@@ -36,9 +37,11 @@
#define EVEX_BAD_PARAMS -21
#define EVEX_NOT_RUNNING -22
#define EVEX_MICROSECOND_UNSUP -23
+#define EVEX_CANT_KILL -24
#define EVENT_EXEC_NO_MORE (1L << 0)
#define EVENT_NOT_USED (1L << 1)
+#define EVENT_FREE_WHEN_FINISHED (1L << 2)
extern ulong opt_event_executor;
@@ -75,6 +78,8 @@ enum evex_table_field
EVEX_FIELD_COUNT /* a cool trick to count the number of fields :) */
} ;
+int sortcmp_lex_string(LEX_STRING s, LEX_STRING t, CHARSET_INFO *cs);
+
class Event_timed
{
Event_timed(const Event_timed &); /* Prevent use of these */
@@ -82,7 +87,9 @@ class Event_timed
my_bool in_spawned_thread;
ulong locked_by_thread_id;
my_bool running;
+ ulong thread_id;
pthread_mutex_t LOCK_running;
+ pthread_cond_t COND_finished;
bool status_changed;
bool last_executed_changed;
@@ -155,7 +162,7 @@ public:
Event_timed():in_spawned_thread(0),locked_by_thread_id(0),
- running(0), status_changed(false),
+ running(0), thread_id(0), status_changed(false),
last_executed_changed(false), expression(0), created(0),
modified(0), on_completion(MYSQL_EVENT_ON_COMPLETION_DROP),
status(MYSQL_EVENT_ENABLED), sphead(0), sql_mode(0),
@@ -164,6 +171,7 @@ public:
{
pthread_mutex_init(&this->LOCK_running, MY_MUTEX_INIT_FAST);
+ pthread_cond_init(&this->COND_finished, NULL);
init();
}
@@ -182,6 +190,7 @@ public:
deinit_mutexes()
{
pthread_mutex_destroy(&this->LOCK_running);
+ pthread_cond_destroy(&this->COND_finished);
}
int
@@ -232,10 +241,10 @@ public:
int
compile(THD *thd, MEM_ROOT *mem_root= NULL);
- my_bool
+ bool
is_running()
{
- my_bool ret;
+ bool ret;
VOID(pthread_mutex_lock(&this->LOCK_running));
ret= running;
@@ -275,7 +284,7 @@ public:
spawn_unlock(THD *thd);
int
- spawn_now(void * (*thread_func)(void*));
+ spawn_now(void * (*thread_func)(void*), void *arg);
void
spawn_thread_finish(THD *thd);
@@ -286,6 +295,16 @@ public:
delete sphead;
sphead= 0;
}
+
+ bool
+ has_equal_db(Event_timed *etn);
+
+ int
+ kill_thread(THD *thd);
+
+ void
+ set_thread_id(ulong tid) { thread_id= tid; }
+
protected:
bool
change_security_context(THD *thd, Security_context *s_ctx,
@@ -314,8 +333,6 @@ evex_open_event_table(THD *thd, enum thr
int
evex_show_create_event(THD *thd, sp_name *spn, LEX_STRING definer);
-int sortcmp_lex_string(LEX_STRING s, LEX_STRING t, CHARSET_INFO *cs);
-
int
event_reconstruct_interval_expression(String *buf,
interval_type interval,
@@ -331,38 +348,23 @@ init_events();
void
shutdown_events();
-
-// auxiliary
-int
-event_timed_compare(Event_timed **a, Event_timed **b);
-
-
+/* Compares only the name part of the identifier */
+bool
+event_timed_name_equal(Event_timed *et, LEX_STRING *name);
+
+/* Compares only the schema part of the identifier */
+bool
+event_timed_db_equal(Event_timed *et, LEX_STRING *db);
/*
-CREATE TABLE event (
- db char(64) CHARACTER SET utf8 COLLATE utf8_bin NOT NULL default '',
- name char(64) CHARACTER SET utf8 COLLATE utf8_bin NOT NULL default '',
- body longblob NOT NULL,
- definer char(77) CHARACTER SET utf8 COLLATE utf8_bin NOT NULL default '',
- execute_at DATETIME default NULL,
- interval_value int(11) default NULL,
- interval_field ENUM('YEAR','QUARTER','MONTH','DAY','HOUR','MINUTE','WEEK',
- 'SECOND','MICROSECOND', 'YEAR_MONTH','DAY_HOUR',
- 'DAY_MINUTE','DAY_SECOND',
- 'HOUR_MINUTE','HOUR_SECOND',
- 'MINUTE_SECOND','DAY_MICROSECOND',
- 'HOUR_MICROSECOND','MINUTE_MICROSECOND',
- 'SECOND_MICROSECOND') default NULL,
- created TIMESTAMP NOT NULL,
- modified TIMESTAMP NOT NULL,
- last_executed DATETIME default NULL,
- starts DATETIME default NULL,
- ends DATETIME default NULL,
- status ENUM('ENABLED','DISABLED') NOT NULL default 'ENABLED',
- on_completion ENUM('DROP','PRESERVE') NOT NULL default 'DROP',
- comment varchar(64) CHARACTER SET utf8 COLLATE utf8_bin NOT NULL default '',
- PRIMARY KEY (definer,db,name)
-) ENGINE=MyISAM DEFAULT CHARSET=utf8 COMMENT 'Events';
+ Compares only the definer part of the identifier. Use during DROP USER
+ to drop user's events. (Still not implemented)
*/
+bool
+event_timed_definer_equal(Event_timed *et, LEX_STRING *definer);
+
+/* Compares the whole identifier*/
+bool
+event_timed_identifier_equal(Event_timed *a, Event_timed *b);
#endif /* _EVENT_H_ */
--- 1.41/sql/event_executor.cc 2006-03-01 05:21:57 +02:00
+++ 1.42/BitKeeper/deleted/.del-event_executor.cc~f4a4645b973838ab 2006-04-09 13:01:15 +03:00
@@ -15,973 +15,6 @@
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
#include "event_priv.h"
-#include "event.h"
-#include "sp.h"
+#include "event_scheduler.h"
-#define WAIT_STATUS_READY 0
-#define WAIT_STATUS_EMPTY_QUEUE 1
-#define WAIT_STATUS_NEW_TOP_EVENT 2
-#define WAIT_STATUS_STOP_EXECUTOR 3
-
-/*
- Make this define DBUG_FAULTY_THR to be able to put breakpoints inside
- code used by the scheduler's thread(s). In this case user connections
- are not possible because the scheduler thread code is ran inside the
- main thread (no spawning takes place. If you want to debug client
- connection then start with --one-thread and make the define
- DBUG_FAULTY_THR !
-*/
-#define DBUG_FAULTY_THR2
-
-extern ulong thread_created;
-extern const char *my_localhost;
-extern pthread_attr_t connection_attrib;
-
-pthread_mutex_t LOCK_event_arrays, // mutex for when working with the queue
- LOCK_workers_count, // mutex for when inc/dec uint workers_count
- LOCK_evex_running; // mutes for managing bool evex_is_running
-
-
-bool evex_is_running= false;
-
-ulonglong evex_main_thread_id= 0;
-ulong opt_event_executor;
-my_bool event_executor_running_global_var;
-static my_bool evex_mutexes_initted= FALSE;
-static uint workers_count;
-
-static int
-evex_load_events_from_db(THD *thd);
-
-bool
-evex_print_warnings(THD *thd, Event_timed *et);
-
-/*
- TODO Andrey: Check for command line option whether to start
- the main thread or not.
-*/
-
-pthread_handler_t
-event_executor_worker(void *arg);
-
-pthread_handler_t
-event_executor_main(void *arg);
-
-
-/*
- Returns the seconds difference of 2 TIME structs
-
- SYNOPSIS
- evex_time_diff()
- a - TIME struct 1
- b - TIME struct 2
-
- Returns:
- the seconds difference
-*/
-
-static int
-evex_time_diff(TIME *a, TIME *b)
-{
- return sec_since_epoch_TIME(a) - sec_since_epoch_TIME(b);
-}
-
-
-/*
- Inits the mutexes used by the scheduler module
-
- SYNOPSIS
- evex_init_mutexes()
-
- NOTES
- The mutexes are :
- LOCK_event_arrays
- LOCK_workers_count
- LOCK_evex_running
-*/
-
-static void
-evex_init_mutexes()
-{
- if (evex_mutexes_initted)
- return;
-
- evex_mutexes_initted= TRUE;
- pthread_mutex_init(&LOCK_event_arrays, MY_MUTEX_INIT_FAST);
- pthread_mutex_init(&LOCK_workers_count, MY_MUTEX_INIT_FAST);
- pthread_mutex_init(&LOCK_evex_running, MY_MUTEX_INIT_FAST);
-
- event_executor_running_global_var= opt_event_executor;
-}
-
-extern TABLE_FIELD_W_TYPE mysql_db_table_fields[];
-extern time_t mysql_db_table_last_check;
-
-/*
- Opens mysql.db and mysql.user and checks whether
- 1. mysql.db has column Event_priv at column 20 (0 based);
- 2. mysql.user has column Event_priv at column 29 (0 based);
-
- Synopsis
- evex_check_system_tables()
-*/
-
-void
-evex_check_system_tables()
-{
- THD *thd= current_thd;
- TABLE_LIST tables;
- Open_tables_state backup;
-
- /* thd is 0x0 during boot of the server. Later it's !=0x0 */
- if (!thd)
- return;
-
- thd->reset_n_backup_open_tables_state(&backup);
-
- bzero((char*) &tables, sizeof(tables));
- tables.db= (char*) "mysql";
- tables.table_name= tables.alias= (char*) "db";
- tables.lock_type= TL_READ;
-
- if (simple_open_n_lock_tables(thd, &tables))
- sql_print_error("Cannot open mysql.db");
- else
- {
- table_check_intact(tables.table, MYSQL_DB_FIELD_COUNT, mysql_db_table_fields,
- &mysql_db_table_last_check,ER_CANNOT_LOAD_FROM_TABLE);
- close_thread_tables(thd);
- }
-
- bzero((char*) &tables, sizeof(tables));
- tables.db= (char*) "mysql";
- tables.table_name= tables.alias= (char*) "user";
- tables.lock_type= TL_READ;
-
- if (simple_open_n_lock_tables(thd, &tables))
- sql_print_error("Cannot open mysql.db");
- else
- {
- if (tables.table->s->fields < 29 ||
- strncmp(tables.table->field[29]->field_name,
- STRING_WITH_LEN("Event_priv")))
- sql_print_error("mysql.user has no `Event_priv` column at position 29");
-
- close_thread_tables(thd);
- }
-
- thd->restore_backup_open_tables_state(&backup);
-}
-
-
-/*
- Inits the scheduler. Called on server start and every time the scheduler
- is started with switching the event_scheduler global variable to TRUE
-
- SYNOPSIS
- init_events()
-
- NOTES
- Inits the mutexes used by the scheduler. Done at server start.
-*/
-
-int
-init_events()
-{
- pthread_t th;
- DBUG_ENTER("init_events");
-
- DBUG_PRINT("info",("Starting events main thread"));
-
- evex_check_system_tables();
-
- evex_init_mutexes();
-
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- evex_is_running= false;
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- if (event_executor_running_global_var)
- {
-#ifndef DBUG_FAULTY_THR
- /* TODO Andrey: Change the error code returned! */
- if (pthread_create(&th, &connection_attrib, event_executor_main,(void*)NULL))
- DBUG_RETURN(ER_SLAVE_THREAD);
-#else
- event_executor_main(NULL);
-#endif
- }
-
- DBUG_RETURN(0);
-}
-
-
-/*
- Cleans up scheduler memory. Called on server shutdown.
-
- SYNOPSIS
- shutdown_events()
-
- NOTES
- Destroys the mutexes.
-*/
-
-void
-shutdown_events()
-{
- DBUG_ENTER("shutdown_events");
-
- if (evex_mutexes_initted)
- {
- evex_mutexes_initted= FALSE;
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- pthread_mutex_destroy(&LOCK_event_arrays);
- pthread_mutex_destroy(&LOCK_workers_count);
- pthread_mutex_destroy(&LOCK_evex_running);
- }
- DBUG_VOID_RETURN;
-}
-
-
-/*
- Inits an scheduler thread handler, both the main and a worker
-
- SYNOPSIS
- init_event_thread()
- thd - the THD of the thread. Has to be allocated by the caller.
-
- NOTES
- 1. The host of the thead is my_localhost
- 2. thd->net is initted with NULL - no communication.
-
- Returns
- 0 - OK
- -1 - Error
-*/
-
-static int
-init_event_thread(THD* thd)
-{
- DBUG_ENTER("init_event_thread");
- thd->client_capabilities= 0;
- thd->security_ctx->master_access= 0;
- thd->security_ctx->db_access= 0;
- thd->security_ctx->host_or_ip= (char*)my_localhost;
- my_net_init(&thd->net, 0);
- thd->net.read_timeout = slave_net_timeout;
- thd->slave_thread= 0;
- thd->options|= OPTION_AUTO_IS_NULL;
- thd->client_capabilities= CLIENT_LOCAL_FILES;
- thd->real_id=pthread_self();
- VOID(pthread_mutex_lock(&LOCK_thread_count));
- thd->thread_id= thread_id++;
- VOID(pthread_mutex_unlock(&LOCK_thread_count));
-
- if (init_thr_lock() || thd->store_globals())
- {
- thd->cleanup();
- delete thd;
- DBUG_RETURN(-1);
- }
-
-#if !defined(__WIN__) && !defined(OS2) && !defined(__NETWARE__)
- sigset_t set;
- VOID(sigemptyset(&set)); // Get mask in use
- VOID(pthread_sigmask(SIG_UNBLOCK,&set,&thd->block_signals));
-#endif
-
- thd->proc_info= "Initialized";
- thd->version= refresh_version;
- thd->set_time();
- DBUG_RETURN(0);
-}
-
-
-/*
- This function waits till the time next event in the queue should be
- executed.
-
- Returns
- WAIT_STATUS_READY There is an event to be executed right now
- WAIT_STATUS_EMPTY_QUEUE No events or the last event was dropped.
- WAIT_STATUS_NEW_TOP_EVENT New event has entered the queue and scheduled
- on top. Restart ticking.
- WAIT_STATUS_STOP_EXECUTOR The thread was killed or SET global event_scheduler=0;
-*/
-
-static int
-executor_wait_till_next_event_exec(THD *thd)
-{
- Event_timed *et;
- TIME time_now;
- int t2sleep;
-
- DBUG_ENTER("executor_wait_till_next_event_exec");
- /*
- now let's see how much time to sleep, we know there is at least 1
- element in the queue.
- */
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
- if (!evex_queue_num_elements(EVEX_EQ_NAME))
- {
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- DBUG_RETURN(WAIT_STATUS_EMPTY_QUEUE);
- }
- et= evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*);
- DBUG_ASSERT(et);
- if (et->status == MYSQL_EVENT_DISABLED)
- {
- DBUG_PRINT("evex main thread",("Now it is disabled-exec no more"));
- if (et->dropped)
- et->drop(thd);
- delete et;
- evex_queue_delete_element(&EVEX_EQ_NAME, 0);// 0 is top, internally 1
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- sql_print_information("Event found disabled, dropping.");
- DBUG_RETURN(1);
- }
-
- DBUG_PRINT("evex main thread",("computing time to sleep till next exec"));
- /* set the internal clock of thd */
- thd->end_time();
- my_tz_UTC->gmt_sec_to_TIME(&time_now, thd->query_start());
- t2sleep= evex_time_diff(&et->execute_at, &time_now);
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
-
- DBUG_PRINT("evex main thread",("unlocked LOCK_event_arrays"));
- if (t2sleep > 0)
- {
- ulonglong modified= et->modified;
- /*
- We sleep t2sleep seconds but we check every second whether this thread
- has been killed, or there is a new candidate
- */
- while (t2sleep-- && !thd->killed && event_executor_running_global_var &&
- evex_queue_num_elements(EVEX_EQ_NAME) &&
- (evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*) == et &&
- evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*)->modified ==
- modified))
- {
- DBUG_PRINT("evex main thread",("will sleep a bit more."));
- my_sleep(1000000);
- }
- DBUG_PRINT("info",("saved_modified=%llu current=%llu", modified,
- evex_queue_num_elements(EVEX_EQ_NAME)?
- evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*)->modified:
- (ulonglong)~0));
- }
-
- int ret= WAIT_STATUS_READY;
- if (!evex_queue_num_elements(EVEX_EQ_NAME))
- ret= WAIT_STATUS_EMPTY_QUEUE;
- else if (evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*) != et)
- ret= WAIT_STATUS_NEW_TOP_EVENT;
- if (thd->killed && event_executor_running_global_var)
- ret= WAIT_STATUS_STOP_EXECUTOR;
-
- DBUG_RETURN(ret);
-}
-
-
-/*
- The main scheduler thread. Inits the priority queue on start and
- destroys it on thread shutdown. Forks child threads for every event
- execution. Sleeps between thread forking and does not do a busy wait.
-
- SYNOPSIS
- event_executor_main()
- arg unused
-
- NOTES
- 1. The host of the thead is my_localhost
- 2. thd->net is initted with NULL - no communication.
-
-*/
-
-pthread_handler_t
-event_executor_main(void *arg)
-{
- THD *thd; /* needs to be first for thread_stack */
- uint i=0, j=0;
- my_ulonglong cnt= 0;
-
- DBUG_ENTER("event_executor_main");
- DBUG_PRINT("event_executor_main", ("EVEX thread started"));
-
-
- /* init memory root */
- init_alloc_root(&evex_mem_root, MEM_ROOT_BLOCK_SIZE, MEM_ROOT_PREALLOC);
-
- /* needs to call my_thread_init(), otherwise we get a coredump in DBUG_ stuff*/
- my_thread_init();
-
- if (sizeof(my_time_t) != sizeof(time_t))
- {
- sql_print_error("SCHEDULER: sizeof(my_time_t) != sizeof(time_t) ."
- "The scheduler will not work correctly. Stopping.");
- DBUG_ASSERT(0);
- goto err_no_thd;
- }
-
- /* note that contructor of THD uses DBUG_ ! */
- if (!(thd = new THD))
- {
- sql_print_error("SCHEDULER: Cannot create THD for the main thread.");
- goto err_no_thd;
- }
- thd->thread_stack = (char*)&thd; // remember where our stack is
-
- pthread_detach_this_thread();
-
- if (init_event_thread(thd))
- goto finish;
-
- /*
- make this thread visible it has no vio -> show processlist won't see it
- unless it's marked as system thread
- */
- thd->system_thread= 1;
-
- VOID(pthread_mutex_lock(&LOCK_thread_count));
- threads.append(thd);
- thread_count++;
- thread_running++;
- VOID(pthread_mutex_unlock(&LOCK_thread_count));
-
- DBUG_PRINT("EVEX main thread", ("Initing events_queue"));
-
- /*
- eventually manifest that we are running, not to crashe because of
- usage of non-initialized memory structures.
- */
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
- evex_queue_init(&EVEX_EQ_NAME);
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- evex_is_running= true;
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- thd->security_ctx->user= my_strdup("event_scheduler", MYF(0));
-
- if (evex_load_events_from_db(thd))
- goto finish;
-
- evex_main_thread_id= thd->thread_id;
-
- sql_print_information("SCHEDULER: Main thread started");
- while (!thd->killed)
- {
- TIME time_now;
- Event_timed *et;
-
- cnt++;
- DBUG_PRINT("info", ("EVEX External Loop %d thd->k", cnt));
-
- thd->proc_info = "Sleeping";
- if (!event_executor_running_global_var)
- {
- sql_print_information("SCHEDULER: Asked to stop.");
- break;
- }
-
- if (!evex_queue_num_elements(EVEX_EQ_NAME))
- {
- my_sleep(1000000);// sleep 1s
- continue;
- }
-
-restart_ticking:
- switch (executor_wait_till_next_event_exec(thd)) {
- case WAIT_STATUS_READY: // time to execute the event on top
- DBUG_PRINT("evex main thread",("time to execute an event"));
- break;
- case WAIT_STATUS_EMPTY_QUEUE: // no more events
- DBUG_PRINT("evex main thread",("no more events"));
- continue;
- break;
- case WAIT_STATUS_NEW_TOP_EVENT: // new event on top in the queue
- DBUG_PRINT("evex main thread",("restart ticking"));
- goto restart_ticking;
- case WAIT_STATUS_STOP_EXECUTOR:
- sql_print_information("SCHEDULER: Asked to stop.");
- goto finish;
- break;
- default:
- DBUG_ASSERT(0);
- }
-
-
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
- thd->end_time();
- my_tz_UTC->gmt_sec_to_TIME(&time_now, thd->query_start());
-
- if (!evex_queue_num_elements(EVEX_EQ_NAME))
- {
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- DBUG_PRINT("evex main thread",("empty queue"));
- continue;
- }
- et= evex_queue_first_element(&EVEX_EQ_NAME, Event_timed*);
- DBUG_PRINT("evex main thread",("got event from the queue"));
-
- if (!et->execute_at_null && my_time_compare(&time_now,&et->execute_at) == -1)
- {
- DBUG_PRINT("evex main thread",("still not the time for execution"));
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- continue;
- }
-
- DBUG_PRINT("evex main thread",("it's right time"));
- if (et->status == MYSQL_EVENT_ENABLED)
- {
- int fork_ret_code;
-
- DBUG_PRINT("evex main thread", ("[%10s] this exec at [%llu]", et->name.str,
- TIME_to_ulonglong_datetime(&et->execute_at)));
- et->mark_last_executed(thd);
- if (et->compute_next_execution_time())
- {
- sql_print_error("SCHEDULER: Error while computing time of %s.%s . "
- "Disabling after execution.",
- et->dbname.str, et->name.str);
- et->status= MYSQL_EVENT_DISABLED;
- }
- DBUG_PRINT("evex main thread", ("[%10s] next exec at [%llu]", et->name.str,
- TIME_to_ulonglong_datetime(&et->execute_at)));
-
- et->update_fields(thd);
-#ifndef DBUG_FAULTY_THR
- thread_safe_increment(workers_count, &LOCK_workers_count);
- switch ((fork_ret_code= et->spawn_now(event_executor_worker))) {
- case EVENT_EXEC_CANT_FORK:
- thread_safe_decrement(workers_count, &LOCK_workers_count);
- sql_print_error("SCHEDULER: Problem while trying to create a thread");
- UNLOCK_MUTEX_AND_BAIL_OUT(LOCK_event_arrays, finish);
- case EVENT_EXEC_ALREADY_EXEC:
- thread_safe_decrement(workers_count, &LOCK_workers_count);
- sql_print_information("SCHEDULER: %s.%s in execution. Skip this time.",
- et->dbname.str, et->name.str);
- break;
- default:
- DBUG_ASSERT(!fork_ret_code);
- if (fork_ret_code)
- thread_safe_decrement(workers_count, &LOCK_workers_count);
- break;
- }
-#else
- event_executor_worker((void *) et);
-#endif
- /*
- 1. For one-time event : year is > 0 and expression is 0
- 2. For recurring, expression is != -=> check execute_at_null in this case
- */
- if ((et->execute_at.year && !et->expression) || et->execute_at_null)
- et->flags |= EVENT_EXEC_NO_MORE;
-
- if ((et->flags & EVENT_EXEC_NO_MORE) || et->status == MYSQL_EVENT_DISABLED)
- evex_queue_delete_element(&EVEX_EQ_NAME, 0);// 0 is top, internally 1
- else
- evex_queue_first_updated(&EVEX_EQ_NAME);
- }
- DBUG_PRINT("evex main thread",("unlocking"));
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- }/* while */
-finish:
-
- /* First manifest that this thread does not work and then destroy */
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- evex_is_running= false;
- evex_main_thread_id= 0;
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
-
- /*
- TODO: A better will be with a conditional variable
- */
- /*
- Read workers_count without lock, no need for locking.
- In the worst case we have to wait 1sec more.
- */
- sql_print_information("SCHEDULER: Stopping. Waiting for worker threads to finish.");
- while (1)
- {
- VOID(pthread_mutex_lock(&LOCK_workers_count));
- if (!workers_count)
- {
- VOID(pthread_mutex_unlock(&LOCK_workers_count));
- break;
- }
- VOID(pthread_mutex_unlock(&LOCK_workers_count));
- my_sleep(1000000);// 1s
- }
-
- /*
- First we free all objects ...
- Lock because a DROP DATABASE could be running in parallel and it locks on these
- */
- sql_print_information("SCHEDULER: Emptying the queue.");
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
- for (i= 0; i < evex_queue_num_elements(EVEX_EQ_NAME); ++i)
- {
- Event_timed *et= evex_queue_element(&EVEX_EQ_NAME, i, Event_timed*);
- et->free_sp();
- delete et;
- }
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- /* ... then we can thrash the whole queue at once */
- evex_queue_destroy(&EVEX_EQ_NAME);
-
- thd->proc_info = "Clearing";
- DBUG_ASSERT(thd->net.buff != 0);
- net_end(&thd->net); // destructor will not free it, because we are weird
- THD_CHECK_SENTRY(thd);
-
- pthread_mutex_lock(&LOCK_thread_count);
- thread_count--;
- thread_running--;
-#ifndef DBUG_FAULTY_THR
- THD_CHECK_SENTRY(thd);
- delete thd;
-#endif
- pthread_mutex_unlock(&LOCK_thread_count);
-
-
-err_no_thd:
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- evex_is_running= false;
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- free_root(&evex_mem_root, MYF(0));
- sql_print_information("SCHEDULER: Stopped.");
-
-#ifndef DBUG_FAULTY_THR
- my_thread_end();
- pthread_exit(0);
-#endif
- DBUG_RETURN(0); // Can't return anything here
-}
-
-
-/*
- Function that executes an event in a child thread. Setups the
- environment for the event execution and cleans after that.
-
- SYNOPSIS
- event_executor_worker()
- arg The Event_timed object to be processed
-*/
-
-pthread_handler_t
-event_executor_worker(void *event_void)
-{
- THD *thd; /* needs to be first for thread_stack */
- Event_timed *event = (Event_timed *) event_void;
- MEM_ROOT worker_mem_root;
-
- DBUG_ENTER("event_executor_worker");
-
- init_alloc_root(&worker_mem_root, MEM_ROOT_BLOCK_SIZE, MEM_ROOT_PREALLOC);
-
-#ifndef DBUG_FAULTY_THR
- my_thread_init();
-
- if (!(thd = new THD)) /* note that contructor of THD uses DBUG_ ! */
- {
- sql_print_error("SCHEDULER: Cannot create a THD structure in an worker.");
- goto err_no_thd;
- }
- thd->thread_stack = (char*)&thd; // remember where our stack is
- thd->mem_root= &worker_mem_root;
-
- pthread_detach_this_thread();
-
- if (init_event_thread(thd))
- goto err;
-
- thd->init_for_queries();
-
- /* make this thread visible it has no vio -> show processlist needs this flag */
- thd->system_thread= 1;
-
- VOID(pthread_mutex_lock(&LOCK_thread_count));
- threads.append(thd);
- thread_count++;
- thread_running++;
- VOID(pthread_mutex_unlock(&LOCK_thread_count));
-#else
- thd= current_thd;
-#endif
-
- thd->enable_slow_log= TRUE;
- {
- int ret;
- sql_print_information("SCHEDULER: Executing event %s.%s of %s [EXPR:%d]",
- event->dbname.str, event->name.str,
- event->definer.str, (int) event->expression);
-
- ret= event->execute(thd, &worker_mem_root);
-
- evex_print_warnings(thd, event);
- sql_print_information("SCHEDULER: Executed event %s.%s of %s [EXPR:%d]. "
- "RetCode=%d", event->dbname.str, event->name.str,
- event->definer.str, (int) event->expression, ret);
- if (ret == EVEX_COMPILE_ERROR)
- sql_print_information("SCHEDULER: COMPILE ERROR for event %s.%s of",
- event->dbname.str, event->name.str,
- event->definer.str);
- else if (ret == EVEX_MICROSECOND_UNSUP)
- sql_print_information("SCHEDULER: MICROSECOND is not supported");
- }
- event->spawn_thread_finish(thd);
-
-
-err:
- VOID(pthread_mutex_lock(&LOCK_thread_count));
-#ifndef DBUG_FAULTY_THR
- thread_count--;
- thread_running--;
- /*
- Some extra safety, which should not been needed (normally, event deletion
- should already have done these assignments (each event which sets these
- variables is supposed to set them to 0 before terminating)).
- */
- VOID(pthread_mutex_unlock(&LOCK_thread_count));
-
- thd->proc_info = "Clearing";
- DBUG_ASSERT(thd->net.buff != 0);
- net_end(&thd->net); // destructor will not free it, because we are weird
- THD_CHECK_SENTRY(thd);
-
- VOID(pthread_mutex_lock(&LOCK_thread_count));
- THD_CHECK_SENTRY(thd);
- delete thd;
-#endif
- VOID(pthread_mutex_unlock(&LOCK_thread_count));
-
-err_no_thd:
-
- free_root(&worker_mem_root, MYF(0));
- thread_safe_decrement(workers_count, &LOCK_workers_count);
-
-#ifndef DBUG_FAULTY_THR
- my_thread_end();
- pthread_exit(0);
-#endif
- DBUG_RETURN(0); // Can't return anything here
-}
-
-
-/*
- Loads all ENABLED events from mysql.event into the prioritized
- queue. Called during scheduler main thread initialization. Compiles
- the events. Creates Event_timed instances for every ENABLED event
- from mysql.event.
-
- SYNOPSIS
- evex_load_events_from_db()
- thd - Thread context. Used for memory allocation in some cases.
-
- RETURNS
- 0 OK
- !0 Error
-
- NOTES
- Reports the error to the console
-*/
-
-static int
-evex_load_events_from_db(THD *thd)
-{
- TABLE *table;
- READ_RECORD read_record_info;
- int ret= -1;
- uint count= 0;
-
- DBUG_ENTER("evex_load_events_from_db");
-
- if ((ret= evex_open_event_table(thd, TL_READ, &table)))
- {
- sql_print_error("SCHEDULER: Table mysql.event is damaged. Can not open.");
- DBUG_RETURN(SP_OPEN_TABLE_FAILED);
- }
-
- VOID(pthread_mutex_lock(&LOCK_event_arrays));
-
- init_read_record(&read_record_info, thd, table ,NULL,1,0);
- while (!(read_record_info.read_record(&read_record_info)))
- {
- Event_timed *et;
- if (!(et= new Event_timed))
- {
- DBUG_PRINT("evex_load_events_from_db", ("Out of memory"));
- ret= -1;
- goto end;
- }
- DBUG_PRINT("evex_load_events_from_db", ("Loading event from row."));
-
- if ((ret= et->load_from_row(&evex_mem_root, table)))
- {
- sql_print_error("SCHEDULER: Error while loading from mysql.event. "
- "Table probably corrupted");
- goto end;
- }
- if (et->status != MYSQL_EVENT_ENABLED)
- {
- DBUG_PRINT("evex_load_events_from_db",("%s is disabled",et->name.str));
- delete et;
- continue;
- }
-
- DBUG_PRINT("evex_load_events_from_db",
- ("Event %s loaded from row. Time to compile", et->name.str));
-
- switch (ret= et->compile(thd, &evex_mem_root)) {
- case EVEX_MICROSECOND_UNSUP:
- sql_print_error("SCHEDULER: mysql.event is tampered. MICROSECOND is not "
- "supported but found in mysql.event");
- goto end;
- case EVEX_COMPILE_ERROR:
- sql_print_error("SCHEDULER: Error while compiling %s.%s. Aborting load.",
- et->dbname.str, et->name.str);
- goto end;
- default:
- break;
- }
-
- /* let's find when to be executed */
- if (et->compute_next_execution_time())
- {
- sql_print_error("SCHEDULER: Error while computing execution time of %s.%s."
- " Skipping", et->dbname.str, et->name.str);
- continue;
- }
-
- DBUG_PRINT("evex_load_events_from_db", ("Adding to the exec list."));
-
- evex_queue_insert(&EVEX_EQ_NAME, (EVEX_PTOQEL) et);
- DBUG_PRINT("evex_load_events_from_db", ("%p %*s",
- et, et->name.length,et->name.str));
- count++;
- }
-
- ret= 0;
-
-end:
- VOID(pthread_mutex_unlock(&LOCK_event_arrays));
- end_read_record(&read_record_info);
-
- /* Force close to free memory */
- thd->version--;
-
- close_thread_tables(thd);
- if (!ret)
- sql_print_information("SCHEDULER: Loaded %d event%s", count, (count == 1)?"":"s");
- DBUG_PRINT("info", ("Status code %d. Loaded %d event(s)", ret, count));
-
- DBUG_RETURN(ret);
-}
-
-
-/*
- The update method of the global variable event_scheduler.
- If event_scheduler is switched from 0 to 1 then the scheduler main
- thread is started.
-
- SYNOPSIS
- event_executor_worker()
- thd - Thread context (unused)
- car - the new value
-
- Returns
- 0 OK (always)
-*/
-
-bool
-sys_var_event_executor::update(THD *thd, set_var *var)
-{
- /* here start the thread if not running. */
- DBUG_ENTER("sys_var_event_executor::update");
- VOID(pthread_mutex_lock(&LOCK_evex_running));
- *value= var->save_result.ulong_value;
-
- DBUG_PRINT("new_value", ("%d", *value));
- if ((my_bool) *value && !evex_is_running)
- {
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
- init_events();
- } else
- VOID(pthread_mutex_unlock(&LOCK_evex_running));
-
- DBUG_RETURN(0);
-}
-
-
-extern LEX_STRING warning_level_names[];
-
-typedef void (*sql_print_xxx_func)(const char *format, ...);
-static sql_print_xxx_func sql_print_xxx_handlers[3] =
-{
- sql_print_information,
- sql_print_warning,
- sql_print_error
-};
-
-
-/*
- Prints the stack of infos, warnings, errors from thd to
- the console so it can be fetched by the logs-into-tables and
- checked later.
-
- Synopsis
- evex_print_warnings
- thd - thread used during the execution of the event
- et - the event itself
-
- Returns
- 0 - OK (always)
-
-*/
-
-bool
-evex_print_warnings(THD *thd, Event_timed *et)
-{
- MYSQL_ERROR *err;
- DBUG_ENTER("evex_show_warnings");
- char msg_buf[1024];
- char prefix_buf[512];
- String prefix(prefix_buf, sizeof(prefix_buf), system_charset_info);
- prefix.length(0);
-
- List_iterator_fast<MYSQL_ERROR> it(thd->warn_list);
- while ((err= it++))
- {
- String err_msg(msg_buf, sizeof(msg_buf), system_charset_info);
- /* set it to 0 or we start adding at the end. That's the trick ;) */
- err_msg.length(0);
- if (!prefix.length())
- {
- prefix.append("SCHEDULER: [");
-
- append_identifier(thd,&prefix,et->definer_user.str,et->definer_user.length);
- prefix.append('@');
- append_identifier(thd,&prefix,et->definer_host.str,et->definer_host.length);
- prefix.append("][", 2);
- append_identifier(thd,&prefix, et->dbname.str, et->dbname.length);
- prefix.append('.');
- append_identifier(thd,&prefix, et->name.str, et->name.length);
- prefix.append("] ", 2);
- }
-
- err_msg.append(prefix);
- err_msg.append(err->msg, strlen(err->msg), system_charset_info);
- err_msg.append("]");
- DBUG_ASSERT(err->level < 3);
- (sql_print_xxx_handlers[err->level])("%*s", err_msg.length(), err_msg.c_ptr());
- }
-
-
- DBUG_RETURN(FALSE);
-}
--- 1.20/sql/event_priv.h 2006-02-28 19:33:25 +02:00
+++ 1.21/sql/event_priv.h 2006-04-10 00:53:43 +03:00
@@ -23,11 +23,6 @@
#define EVENT_EXEC_ALREADY_EXEC 1
#define EVENT_EXEC_CANT_FORK 2
-#define EVEX_USE_QUEUE
-
-#define UNLOCK_MUTEX_AND_BAIL_OUT(__mutex, __label) \
- { VOID(pthread_mutex_unlock(&__mutex)); goto __label; }
-
#define EVEX_DB_FIELD_LEN 64
#define EVEX_NAME_FIELD_LEN 64
#define EVEX_MAX_INTERVAL_VALUE 2147483647L
@@ -44,39 +39,16 @@ evex_db_find_event_by_name(THD *thd, con
int
event_timed_compare_q(void *vptr, byte* a, byte *b);
-int db_drop_event(THD *thd, Event_timed *et, bool drop_if_exists,
- uint *rows_affected);
-
-
-#define EXEC_QUEUE_QUEUE_NAME executing_queue
-#define EXEC_QUEUE_DARR_NAME evex_executing_queue
-
-
-#define EVEX_QUEUE_TYPE QUEUE
-#define EVEX_PTOQEL byte *
-
-#define EVEX_EQ_NAME executing_queue
-#define evex_queue_first_element(queue, __cast) ((__cast)queue_top(queue))
-#define evex_queue_element(queue, idx, __cast) ((__cast)queue_element(queue, idx))
-#define evex_queue_delete_element(queue, idx) queue_remove(queue, idx)
-#define evex_queue_destroy(queue) delete_queue(queue)
-#define evex_queue_first_updated(queue) queue_replaced(queue)
-#define evex_queue_insert(queue, element) queue_insert_safe(queue, element);
-
-
-
-void
-evex_queue_init(EVEX_QUEUE_TYPE *queue);
-
-#define evex_queue_num_elements(queue) queue.elements
+int
+db_drop_event(THD *thd, Event_timed *et, bool drop_if_exists,
+ uint *rows_affected);
+int
+db_find_event(THD *thd, sp_name *name, LEX_STRING *definer, Event_timed **ett,
+ TABLE *tbl, MEM_ROOT *root);
+int
+db_create_event(THD *thd, Event_timed *et, my_bool create_if_not,
+ uint *rows_affected);
-extern bool evex_is_running;
-extern MEM_ROOT evex_mem_root;
-extern pthread_mutex_t LOCK_event_arrays,
- LOCK_workers_count,
- LOCK_evex_running;
-extern ulonglong evex_main_thread_id;
-extern QUEUE EVEX_EQ_NAME;
#endif /* _EVENT_PRIV_H_ */
--- New file ---
+++ sql/event_scheduler.cc 06/04/10 00:53:45
/* Copyright (C) 2004-2005 MySQL AB
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
#include "event_priv.h"
#include "event.h"
/*
ToDo:
0. Fix evex_drop_db_events() in event.cc to integrate, forgot to integrate it :(
There is already Event_scheduler::drop_schema_events().
1. Use union { my_bool my_bool_value; long long_value; } sys_var_tmp;
for manager_working.
2. If var_update() returns error and goes to ::update() whether my_error()
will be called somewhere.
3. Move sys_var_event_executor::update(THD *thd, set_var *var) to set_var.cc
4. Talk to Alik to get a check for configure.in for my_time_t and time_t
5. Create the singleton during startup, discuss with Dmitri.
6. Refactor init_event_thread().
7. Look at guardian.h|cc to see its life cycle, has similarities according
to Kostja.
*/
#define CHECK_RUNNING(__ret_code) \
if (state != SCHEDULER_RUNNING) \
{ \
DBUG_PRINT("info", ("manager not running but %d. doing nothing", state)); \
pthread_mutex_unlock(&LOCK_scheduler_data); \
DBUG_RETURN(__ret_code); \
}
class Worker_thread_param
{
public:
Event_timed *et;
pthread_mutex_t LOCK_started;
pthread_cond_t COND_started;
Worker_thread_param(Event_timed *etn):et(etn)
{
pthread_mutex_init(&LOCK_started, MY_MUTEX_INIT_FAST);
pthread_cond_init(&COND_started, NULL);
}
~Worker_thread_param()
{
pthread_mutex_destroy(&LOCK_started);
pthread_cond_destroy(&COND_started);
}
};
Event_scheduler
*Event_scheduler::singleton= NULL;
pthread_mutex_t
Event_scheduler::LOCK_scheduler_object;
my_bool
Event_scheduler::manager_working= FALSE;
extern LEX_STRING warning_level_names[];
typedef void (*sql_print_xxx_func)(const char *format, ...);
static sql_print_xxx_func sql_print_xxx_handlers[3] =
{
sql_print_information,
sql_print_warning,
sql_print_error
};
/*
Prints the stack of infos, warnings, errors from thd to
the console so it can be fetched by the logs-into-tables and
checked later.
Synopsis
evex_print_warnings
thd - thread used during the execution of the event
et - the event itself
*/
void
evex_print_warnings(THD *thd, Event_timed *et)
{
MYSQL_ERROR *err;
DBUG_ENTER("evex_print_warnings");
char msg_buf[1024];
char prefix_buf[512];
String prefix(prefix_buf, sizeof(prefix_buf), system_charset_info);
prefix.length(0);
List_iterator_fast<MYSQL_ERROR> it(thd->warn_list);
while ((err= it++))
{
String err_msg(msg_buf, sizeof(msg_buf), system_charset_info);
/* set it to 0 or we start adding at the end. That's the trick ;) */
err_msg.length(0);
if (!prefix.length())
{
prefix.append("SCHEDULER: [");
append_identifier(thd, &prefix, et->definer_user.str,
et->definer_user.length);
prefix.append('@');
append_identifier(thd, &prefix, et->definer_host.str,
et->definer_host.length);
prefix.append("][", 2);
append_identifier(thd,&prefix, et->dbname.str, et->dbname.length);
prefix.append('.');
append_identifier(thd,&prefix, et->name.str, et->name.length);
prefix.append("] ", 2);
}
err_msg.append(prefix);
err_msg.append(err->msg, strlen(err->msg), system_charset_info);
err_msg.append("]");
DBUG_ASSERT(err->level < 3);
(sql_print_xxx_handlers[err->level])("%*s", err_msg.length(),
err_msg.c_ptr());
}
DBUG_VOID_RETURN;
}
extern const char *my_localhost;
/*
Inits an scheduler thread handler, both the main and a worker
SYNOPSIS
init_event_thread()
thd - the THD of the thread. Has to be allocated by the caller.
NOTES
1. The host of the thead is my_localhost
2. thd->net is initted with NULL - no communication.
Returns
0 OK
-1 Error
*/
static int
init_event_thread(THD* thd)
{
thd->thread_stack = (char*)thd; // remember where our stack is
DBUG_ENTER("init_event_thread");
thd->client_capabilities= 0;
thd->security_ctx->master_access= 0;
thd->security_ctx->db_access= 0;
thd->security_ctx->host_or_ip= (char*)my_localhost;
my_net_init(&thd->net, 0);
thd->net.read_timeout = slave_net_timeout;
thd->slave_thread= 0;
thd->options|= OPTION_AUTO_IS_NULL;
thd->client_capabilities= CLIENT_LOCAL_FILES;
thd->real_id=pthread_self();
VOID(pthread_mutex_lock(&LOCK_thread_count));
thd->thread_id= thread_id++;
threads.append(thd);
thread_count++;
thread_running++;
VOID(pthread_mutex_unlock(&LOCK_thread_count));
if (init_thr_lock() || thd->store_globals())
{
thd->cleanup();
delete thd;
DBUG_RETURN(-1);
}
#if !defined(__WIN__) && !defined(OS2) && !defined(__NETWARE__)
sigset_t set;
VOID(sigemptyset(&set)); // Get mask in use
VOID(pthread_sigmask(SIG_UNBLOCK,&set,&thd->block_signals));
#endif
thd->proc_info= "Initialized";
thd->version= refresh_version;
thd->set_time();
/*
Guarantees that we will see the thread in SHOW PROCESSLIST though its
vio is NULL.
*/
thd->system_thread= 1;
DBUG_RETURN(0);
}
/*
Inits the main manager thread and then calls Event_scheduler::run()
of arg.
SYNOPSIS
event_scheduler_run_proxy()
arg void* ptr to Event_scheduler
NOTES
1. The host of the thead is my_localhost
2. thd->net is initted with NULL - no communication.
3. The reason to have a proxy function is that it's not possible to
use a method as function to be executed in a spawned thread:
- our pthread_hander_t macro uses extern "C"
- separating thread setup from the real execution loop is also to be
considered good.
Returns
0 OK
-1 Error
*/
pthread_handler_t
event_scheduler_run_proxy(void *arg)
{
THD *thd= NULL; // needs to be first for thread_stack
Event_scheduler *event_scheduler= (Event_scheduler *) arg;
DBUG_ENTER("event_scheduler_run_proxy");
my_thread_init();
pthread_detach_this_thread();
/* note that contructor of THD uses DBUG_ ! */
if (!(thd = new THD) || init_event_thread(thd))
{
sql_print_error("SCHEDULER: Cannot init manager event thread.");
goto finish;
}
thd->security_ctx->user= my_strdup("event_scheduler", MYF(0));
sql_print_information("SCHEDULER: Manager thread booting");
event_scheduler->run(thd);
/*
NOTE: Don't touch `esm` after this point because we have notified the
thread which shuts us down that we have finished cleaning. In this
very moment a new manager thread could be started and a crash is not
welcome.
*/
THD_CHECK_SENTRY(thd);
finish:
/*
If we cannot create THD then don't decrease because we haven't touched
thread_count and thread_running in init_event_thread() which was never
called. In init_event_thread() thread_count and thread_running are
always increased even in the case the method returns an error.
*/
if (thd)
{
pthread_mutex_lock(&LOCK_thread_count);
thread_count--;
thread_running--;
pthread_mutex_unlock(&LOCK_thread_count);
thd->proc_info = "Clearing";
DBUG_ASSERT(thd->net.buff != 0);
net_end(&thd->net);
THD_CHECK_SENTRY(thd);
delete thd;
}
my_thread_end();
pthread_exit(0);
DBUG_RETURN(0); // Can't return anything here
}
/*
Function that executes an event in a child thread. Setups the
environment for the event execution and cleans after that.
SYNOPSIS
event_worker_thread()
arg The Event_timed object to be processed
*/
pthread_handler_t
event_worker_thread(void *arg)
{
THD *thd; /* needs to be first for thread_stack */
Worker_thread_param *param = (Worker_thread_param *) arg;
Event_timed *event= param->et;
MEM_ROOT worker_mem_root;
int ret;
bool startup_error= false;
DBUG_ENTER("event_worker_thread");
my_thread_init();
pthread_detach_this_thread();
if (!(thd = new THD) || init_event_thread(thd))
{
sql_print_error("SCHEDULER: Startup failure.");
startup_error= true;
event->spawn_thread_finish(thd);
}
else
event->set_thread_id(thd->thread_id);
/* Signal the manager thread that we have started successfully */
pthread_mutex_lock(¶m->LOCK_started);
pthread_cond_signal(¶m->COND_started);
pthread_mutex_unlock(¶m->LOCK_started);
if (!startup_error)
{
thd->init_for_queries();
thd->enable_slow_log= true;
if (Event_scheduler::register_worker_thread(thd->thread_id))
{
DBUG_PRINT("info", ("Manager not running. Could be an error"));
}
else
{
uint flags;
event->set_thread_id(thd->thread_id);
sql_print_information("SCHEDULER: Executing event %s.%s of %s [EXPR:%d]"
" in thread %lu",
event->dbname.str, event->name.str,
event->definer.str, (int) event->expression,
thd->thread_id);
ret= event->execute(thd, thd->mem_root);
evex_print_warnings(thd, event);
sql_print_information("SCHEDULER: Executed event %s.%s of %s [EXPR:%d]."
" RetCode=%d", event->dbname.str, event->name.str,
event->definer.str, (int) event->expression, ret);
if (ret == EVEX_COMPILE_ERROR)
sql_print_information("SCHEDULER: COMPILE ERROR for event %s.%s of %s",
event->dbname.str, event->name.str,
event->definer.str);
else if (ret == EVEX_MICROSECOND_UNSUP)
sql_print_information("SCHEDULER: MICROSECOND is not supported");
/*
Copy the flags because after spawn_thread_finish() it's unsafe to
touch `event`
*/
flags= event->flags;
/* This should be called always because it does some deinit work */
event->spawn_thread_finish(thd);
/*
If this flag is set it's safe to touch event because it's removed from
the in-memory queue and we hold the only reference
*/
if (flags & EVENT_FREE_WHEN_FINISHED)
delete event;
}
}
pthread_mutex_lock(&LOCK_thread_count);
thread_count--;
thread_running--;
pthread_mutex_unlock(&LOCK_thread_count);
if (Event_scheduler::deregister_worker_thread(thd->thread_id))
sql_print_information("SCHEDULER: Error during deregister_worker_thread()");
if (thd)
{
thd->proc_info = "Clearing";
DBUG_ASSERT(thd->net.buff != 0);
/* QQ: Is this needed THD::~THD does it too */
net_end(&thd->net);
THD_CHECK_SENTRY(thd);
DBUG_PRINT("info", ("Worker thread %lu exiting", thd->thread_id));
VOID(pthread_mutex_lock(&LOCK_thread_count));
delete thd;
VOID(pthread_mutex_unlock(&LOCK_thread_count));
}
my_thread_end();
pthread_exit(0);
DBUG_RETURN(0); // Can't return anything here
}
/*
Returns singleton instance of the class
Synopsis
Event_scheduler::get_instance()
implicit_create Whether to create a new instance if singleton is null
or just return null.
Returns
NULL Error
address Success
*/
Event_scheduler*
Event_scheduler::get_instance(bool implicit_create)
{
Event_scheduler *tmp= NULL;
DBUG_ENTER("Event_scheduler::init");
if (sizeof(my_time_t) != sizeof(time_t))
{
sql_print_error("SCHEDULER: sizeof(my_time_t) != sizeof(time_t) ."
"The scheduler will not work correctly. Stopping.");
DBUG_ASSERT(0);
DBUG_RETURN(NULL);
}
pthread_mutex_lock(&LOCK_scheduler_object);
if (!singleton && implicit_create && (tmp= new Event_scheduler))
{
if (tmp->init())
delete tmp;
else
singleton= tmp;
}
pthread_mutex_unlock(&LOCK_scheduler_object);
DBUG_RETURN(singleton);
}
/*
Initializes a scheduler object
Synopsis
Event_scheduler::init()
scheduler Event_scheduler object to initialize
Returns
false OK
true Error
*/
bool
Event_scheduler::init()
{
DBUG_ENTER("Event_scheduler::init");
DBUG_PRINT("enter", ("this=%p", this));
/* Check it rarely (when creating instance) but do check it */
check_system_tables();
if (pthread_mutex_init(&LOCK_scheduler_data, MY_MUTEX_INIT_FAST) ||
pthread_cond_init(&COND_new_work, NULL) ||
pthread_cond_init(&COND_started, NULL) ||
pthread_cond_init(&COND_shutdown, NULL) ||
pthread_cond_init(&COND_last_worker_exit, NULL) ||
pthread_mutex_init(&LOCK_last_worker_exit, MY_MUTEX_INIT_FAST))
{
sql_print_error("SCHEDULER: Unable to initalize mutexes or conditions");
DBUG_RETURN(true);
}
#ifndef DBUG_OFF
if (pthread_mutex_init(&LOCK_executed, MY_MUTEX_INIT_FAST) ||
pthread_cond_init(&COND_executed, NULL))
{
sql_print_error("SCHEDULER: Unable to initalize mutexes or conditions");
DBUG_RETURN(true);
}
#endif
/* init memory root */
init_alloc_root(&scheduler_root, MEM_ROOT_BLOCK_SIZE,
MEM_ROOT_PREALLOC);
if (init_queue_ex(&queue, 30 /*num_el*/, 0 /*offset*/, 0 /*smallest_on_top*/,
event_timed_compare_q, NULL, 30 /*auto_extent*/))
{
sql_print_error("SCHEDULER: Can't initialize queue executing queue");
DBUG_RETURN(true);
}
my_init_dynamic_array(&workers, sizeof(ulong), 50, 100);
state= SCHEDULER_INIT;
DBUG_RETURN(false);
}
/*
Adds an event to the scheduler queue
Synopsis
Event_scheduler::add_event()
et The event to add
Returns
EVENT_OP_OK OK or scheduler not working
EVENT_OP_LOAD_ERROR Error during loading from disk
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::add_event(THD *thd, Event_timed *et, bool check_existance)
{
enum event_manager_op_code res;
Event_timed *et_new;
DBUG_ENTER("Event_scheduler::add_event");
DBUG_PRINT("enter", ("thd=%p et=%p", thd, et));
pthread_mutex_lock(&LOCK_scheduler_data);
CHECK_RUNNING(EVENT_OP_OK);
if (check_existance && find_event(et, false))
{
res= EVENT_OP_ALREADY_EXISTS;
goto end;
}
/* We need to load the event on scheduler_root */
if (!(res= load_and_compile_event(thd, et, &et_new)))
{
queue_insert_safe(&queue, (byte *) et_new);
DBUG_PRINT("info", ("Sending COND_new_work"));
pthread_cond_signal(&COND_new_work);
}
end:
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(res);
}
/*
Drops an event from the scheduler queue
Synopsis
Event_scheduler::drop_event()
etn The event to drop
state Wait the event or kill&drop
Returns
FALSE OK (replaced or scheduler not working)
TRUE Failure
*/
bool
Event_scheduler::drop_event(THD *thd, Event_timed *et,
enum event_drop_mode drop_mode)
{
Event_timed *et_old;
DBUG_ENTER("Event_scheduler::drop_event");
DBUG_PRINT("enter", ("thd=%p et=%p drop_mode=%d lock=%p", thd, et, drop_mode,
&LOCK_scheduler_data));
pthread_mutex_lock(&LOCK_scheduler_data);
CHECK_RUNNING(false);
if (!(et_old= find_event(et, true)))
DBUG_PRINT("info", ("No such event found, probably DISABLED"));
pthread_mutex_unlock(&LOCK_scheduler_data);
/* See comments in ::replace_event() why this is split in two parts. */
if (et_old)
{
switch (et_old->kill_thread(thd)) {
case EVEX_CANT_KILL:
/* Don't delete but continue */
et_old->flags |= EVENT_FREE_WHEN_FINISHED;
break;
case 0:
/*
kill_thread() waits till the spawned thread finishes after it's
killed. Hence, we delete here memory which is no more referenced from
a running thread.
*/
delete et_old;
/*
We don't signal COND_new_work here because:
1. Even if the dropped event is on top of the queue this will not
move another one to be executed before the time the one on the
top (but could be at the same second as the dropped one)
2. If this was the last event on the queue, then pthread_cond_timedwait
in ::run() will finish and then see that the queue is empty and
call pthread_cond_wait(). Hence, no need to interrupt the blocked
::run() thread.
*/
break;
default:
DBUG_ASSERT(0);
}
}
DBUG_RETURN(false);
}
/*
Replaces an event in the scheduler queue
Synopsis
Event_scheduler::replace_event()
et The event to replace(add) into the queue
state Async or sync stopping
Returns
EVENT_OP_OK OK or scheduler not working
EVENT_OP_LOAD_ERROR Error during loading from disk
EVENT_OP_ALREADY_EXISTS Event already in the queue
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::replace_event(THD *thd, Event_timed *et,
enum event_drop_mode replace_mode)
{
enum event_manager_op_code res;
Event_timed *et_old, *et_new= NULL;
DBUG_ENTER("Event_scheduler::replace_event");
DBUG_PRINT("enter", ("thd=%p et=%p repl_mode=%d lock=%p", thd, et,
replace_mode, &LOCK_scheduler_data));
pthread_mutex_lock(&LOCK_scheduler_data);
CHECK_RUNNING(EVENT_OP_OK);
if (!(et_old= find_event(et, true)))
DBUG_PRINT("info", ("%s.%s not found cached, probably was DISABLED",
et->dbname.str, et->name.str));
/*
We need to load the event (it's strings but on the object itself)
on scheduler_root. et_new could be NULL :
1. Error occured
2. The replace is DISABLED so we don't load it into the queue.
*/
if (!(res= load_and_compile_event(thd, et, &et_new)))
{
queue_insert_safe(&queue, (byte *) et_new);
DBUG_PRINT("info", ("Sending COND_new_work"));
pthread_cond_signal(&COND_new_work);
}
else if (res == EVENT_OP_DISABLED_EVENT)
res= EVENT_OP_OK;
pthread_mutex_unlock(&LOCK_scheduler_data);
/*
We don't move this code above because a potential kill_thread will call
THD::awake(). Which in turn will try to acqure mysys_var->current_mutex,
which is LOCK_scheduler_data on which the COND_new_work in ::run() locks.
Hence, we try to acquire a lock which we have already acquired and we run
into an assert. Holding LOCK_scheduler_data however is not needed because
we don't touch any invariant of the manager anymore. ::drop_event() does
the same.
*/
if (et_old)
{
switch (et_old->kill_thread(thd)) {
case EVEX_CANT_KILL:
/* Don't delete but continue */
et_old->flags |= EVENT_FREE_WHEN_FINISHED;
break;
case 0:
/*
kill_thread() waits till the spawned thread finishes after it's
killed. Hence, we delete here memory which is no more referenced from
a running thread.
*/
delete et_old;
/*
We don't signal COND_new_work here because:
1. Even if the dropped event is on top of the queue this will not
move another one to be executed before the time the one on the
top (but could be at the same second as the dropped one)
2. If this was the last event on the queue, then pthread_cond_timedwait
in ::run() will finish and then see that the queue is empty and
call pthread_cond_wait(). Hence, no need to interrupt the blocked
::run() thread.
*/
break;
default:
DBUG_ASSERT(0);
}
}
DBUG_RETURN(res);
}
/*
Searches for an event in the scheduler queue
Synopsis
Event_scheduler::find_event()
etn The event to find
comparator The function to use for comparing
remove_from_q If found whether to remove from the Q
Returns
NULL Not found
otherwise Address
Notes
The caller should do the locking also the caller is responsible for
actual signalling in case an event is removed from the queue
(signalling COND_new_work for instance).
*/
Event_timed *
Event_scheduler::find_event(Event_timed *etn, bool remove_from_q)
{
uint i;
DBUG_ENTER("Event_scheduler::find_event");
for (i= 0; i < queue.elements; ++i)
{
Event_timed *et= (Event_timed *) queue_element(&queue, i);
DBUG_PRINT("info", ("[%s.%s]==[%s.%s]?", etn->dbname.str, etn->name.str,
et->dbname.str, et->name.str));
if (event_timed_identifier_equal(etn, et))
{
if (remove_from_q)
queue_remove(&queue, i);
DBUG_RETURN(et);
}
}
DBUG_RETURN(NULL);
}
/*
Drops all events from the in-memory queue and disk that match
certain pattern evaluated by a comparator function
Synopsis
Event_scheduler::drop_matching_events()
thd THD
pattern A pattern string
comparator The function to use for comparing
Returns
false OK
*/
bool
Event_scheduler::drop_matching_events(THD *thd, LEX_STRING *pattern,
bool (*comparator)(Event_timed *,LEX_STRING *))
{
uint i= 0;
DBUG_ENTER("Event_scheduler::drop_matching_events");
DBUG_PRINT("enter", ("pattern=%*s", pattern->length, pattern->str));
pthread_mutex_lock(&LOCK_scheduler_data);
while (i < queue.elements)
{
Event_timed *et= (Event_timed *) queue_element(&queue, i);
DBUG_PRINT("info", ("[%s.%s]?", et->dbname.str, et->name.str));
if (comparator(et, pattern))
{
/*
The queue is ordered. If we remove an element, then all elements after
it will shift one position to the left, if we imagine it as an array
from left to the right. In this case we should not increment the
counter and the (i < queue.elements) condition is ok.
*/
queue_remove(&queue, i);
et->drop(thd);
}
else
i++;
}
/*
Don't send COND_new_work because no need to wake up the manager thread.
When it wakes next time up it will recalculate how much more it should
sleep if the top of the queue has been changed by this method.
*/
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(false);
}
/*
Drops all events from the in-memory queue and disk that are from
certain schema.
Synopsis
Event_scheduler::drop_schema_events()
thd THD
db The schema name
Returns
false OK
*/
inline bool
Event_scheduler::drop_schema_events(THD *thd, LEX_STRING *schema)
{
return drop_matching_events(thd, schema, event_timed_db_equal);
}
extern pthread_attr_t connection_attrib;
/*
Starts the event scheduler
Synopsis
Event_scheduler::start()
Returns
EVENT_OP_OK OK
EVENT_OP_CANTFORK Cannot create a new thread
EVENT_OP_CANTSTART ::run() had problem booting
EVENT_OP_ALREADY_RUNNING Manager already running
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::start()
{
enum event_manager_op_code ret;
pthread_t th;
DBUG_ENTER("Event_scheduler::start");
pthread_mutex_lock(&LOCK_scheduler_data);
/* If already working or starting don't make another attempt */
if (state > SCHEDULER_INIT)
{
DBUG_PRINT("info", ("manager is already running or starting"));
ret= EVENT_OP_ALREADY_RUNNING;
goto finish;
}
/*
Now if another thread calls start it will bail-out because the branch
above will be executed. Thus no two or more child threads will be forked.
If the child thread cannot start for some reason then `state` is set
to SCHEDULER_CANTSTART and COND_started is also signaled. In this case we
set `state` back to SCHEDULER_INIT so another attempt to start the manager
can be made.
*/
state= SCHEDULER_STARTING;
manager_working= TRUE;
/* Fork */
if (pthread_create(&th, &connection_attrib, event_scheduler_run_proxy,
(void*)this))
{
DBUG_PRINT("error", ("cannot create a new thread"));
state= SCHEDULER_INIT;
ret= EVENT_OP_CANTFORK;
goto finish;
}
/* Wait till the child thread has booted (w/ or wo success) */
while (state != SCHEDULER_RUNNING && state != SCHEDULER_CANTSTART)
pthread_cond_wait(&COND_started, &LOCK_scheduler_data);
/*
If we cannot start for some reason then don't prohibit further attempts.
Set back to SCHEDULER_INIT.
*/
if (state == SCHEDULER_CANTSTART)
{
state= SCHEDULER_INIT;
manager_working= FALSE;
ret= EVENT_OP_CANTSTART;
goto finish;
}
ret= EVENT_OP_OK;
finish:
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(ret);
}
/*
The internal loop of the event scheduler
Synopsis
Event_scheduler::run()
Returns
FALSE OK
TRUE Failure
*/
bool
Event_scheduler::run(THD *thd)
{
int ret;
struct timespec abstime;
DBUG_ENTER("Event_scheduler::run");
DBUG_PRINT("enter",("thd=%p", thd));
/*
Load events from disk. `state` is currently SCHEDULER_STARTING. Hence,
there is no race between loading and add_event() because the latter
won't touch the queue until the state is not SCHEDULER_RUNNING, which is
set a bit later in this function.
*/
ret= load_events_from_db(thd);
pthread_mutex_lock(&LOCK_scheduler_data);
if (!ret)
{
thread_id= thd->thread_id;
state= SCHEDULER_RUNNING;
}
else
state= SCHEDULER_CANTSTART;
DBUG_PRINT("info", ("Sending back COND_started"));
pthread_cond_signal(&COND_started);
pthread_mutex_unlock(&LOCK_scheduler_data);
if (ret)
DBUG_RETURN(true);
sql_print_information("SCHEDULER: Manager thread started with id %lu",
thd->thread_id);
abstime.tv_nsec= 0;
while (!thd->killed)
{
TIME time_now_utc;
Event_timed *et;
my_bool tmp;
time_t now_utc;
pthread_mutex_lock(&LOCK_scheduler_data);
/* Wait in a loop protecting against catching spurious signals */
while (!queue.elements && (!thd->killed && state == SCHEDULER_RUNNING))
{
DBUG_PRINT("info", ("Entering condition because of empty queue"));
thd->enter_cond(&COND_new_work, &LOCK_scheduler_data, "Empty queue, sleeping");
pthread_cond_wait(&COND_new_work, &LOCK_scheduler_data);
DBUG_PRINT("info", ("Manager woke up. Hope we have events now. state=%d",
state));
/*
exit_cond does implicit mutex_unlock, we needed it locked if
1. we loop again
2. end the current loop and start doing calculations
*/
thd->exit_cond("");
pthread_mutex_lock(&LOCK_scheduler_data);
}
/* Guaranteed locked here */
if (state != SCHEDULER_RUNNING)
{
pthread_mutex_unlock(&LOCK_scheduler_data);
break;
}
et= (Event_timed *)queue_top(&queue);
/* Skip disabled events */
if (et->status != MYSQL_EVENT_ENABLED)
{
DBUG_ASSERT(0);
sql_print_error("SCHEDULER: Found a disabled event %*s.%*s in the queue",
et->dbname.length, et->dbname.str, et->name.length,
et->name.str);
queue_remove(&queue, 0);
/* ToDo check this again */
delete et;
pthread_mutex_unlock(&LOCK_scheduler_data);
continue;
}
thd->proc_info= (char *)"Computing";
DBUG_PRINT("evex manager",("computing time to sleep till next exec"));
/* This timestamp is in UTC */
abstime.tv_sec= sec_since_epoch_TIME(&et->execute_at);
thd->end_time();
if (abstime.tv_sec > thd->query_start())
{
/* Event trigger time is in the future */
thd->proc_info= (char *)"Sleep";
DBUG_PRINT("info", ("Going to sleep. Should wakeup after approx %d secs",
abstime.tv_sec - thd->query_start()));
DBUG_PRINT("info", ("Entering condition because waiting for activation"));
/*
Use THD::enter_cond()/exit_cond() or we won't be able to kill a
sleeping thread. Though ::shutdown() can do it by sending COND_new_work
an user can't by just issuing 'KILL x'; . In the latter case
pthread_cond_timedwait() will wait till `abstime`.
"Sleeping until next time"
*/
thd->enter_cond(&COND_new_work, &LOCK_scheduler_data, "Sleeping");
pthread_cond_timedwait(&COND_new_work, &LOCK_scheduler_data, &abstime);
DBUG_PRINT("info", ("Manager woke up. state is %d", state));
/*
If we get signal we should recalculate the whether it's the right time
because there could be :
1. Spurious wake-up
2. The top of the queue was changed (new one becase of add/drop/replace)
*/
/* This will do implicit pthread_mutex_unlock(&LOCK_scheduler_data) */
thd->exit_cond("");
}
else
{
thd->proc_info= (char *)"Executing";
/*
Execute the event. An error may occur if a thread cannot be forked.
In this case stop the manager.
We should enter ::execute_top() with locked LOCK_scheduler_data.
*/
int ret= execute_top(thd);
pthread_mutex_unlock(&LOCK_scheduler_data);
if (ret)
break;
}
}
end_loop:
thd->proc_info= (char *)"Cleaning";
pthread_mutex_lock(&LOCK_scheduler_data);
/*
It's possible that a user has used (SQL)COM_KILL. Hence set the appropriate
state because it is only set by ::shutdown().
*/
if (state != SCHEDULER_SHUTDOWN)
{
DBUG_PRINT("info", ("We got KILL but the but not from ::shutdown()"));
state= SCHEDULER_SHUTDOWN;
}
pthread_mutex_unlock(&LOCK_scheduler_data);
sql_print_information("SCHEDULER: Shutting down");
thd->proc_info= (char *)"Cleaning queue";
clean_queue(thd);
/* free mamager_root memory but don't destroy the root */
thd->proc_info= (char *)"Cleaning memory root";
free_root(&scheduler_root, MYF(0));
/*
We notify the waiting thread which shutdowns us that we have cleaned.
There are few more instructions to be executed in this pthread but
they don't affect manager structures thus it's safe to signal already
at this point.
*/
pthread_mutex_lock(&LOCK_scheduler_data);
thd->proc_info= (char *)"Sending shutdown signal";
DBUG_PRINT("info", ("Sending COND_shutdown"));
if (state == SCHEDULER_SHUTDOWN)
pthread_cond_signal(&COND_shutdown);
/*
Don't set state to SCHEDULER_STOPPED because ::start() checks
(state > SCHEDULER_INIT) to decide whether it can fork a new thread or return.
SCHEDULER_STOPPED is used by the dtor of Event_scheduler, thus
preventing a fork of a new thread while the manager object is being
destroyed.
*/
state= SCHEDULER_INIT;
/*
We set it here because ::run() can stop not only because of ::shutdown()
call but also because of `KILL x`
*/
manager_working= FALSE;
thread_id= 0;
sql_print_information("SCHEDULER: Stopped");
pthread_mutex_unlock(&LOCK_scheduler_data);
/* We have modified, we set back */
thd->query= NULL;
thd->query_length= 0;
DBUG_RETURN(false);
}
/*
Executes the top element of the queue. Auxiliary method for ::run().
Synopsis
Event_scheduler::execute_top()
Notes
NO locking is done. EXPECTED is that the caller should have locked
the queue (w/ LOCK_scheduler_data).
Returns
FALSE OK
TRUE Failure
*/
bool
Event_scheduler::execute_top(THD *thd)
{
int fork_ret_code;
DBUG_ENTER("Event_scheduler::execute_top");
DBUG_PRINT("enter", ("thd=%p", thd));
Event_timed *et= (Event_timed *)queue_top(&queue);
DBUG_PRINT("info", ("SCHEDULER: execute_at of %s is %lld", et->name.str,
TIME_to_ulonglong_datetime(&et->execute_at)));
et->mark_last_executed(thd);
if (et->compute_next_execution_time())
{
sql_print_error("SCHEDULER: Error while computing time of %s.%s . "
"Disabling after execution.",
et->dbname.str, et->name.str);
et->status= MYSQL_EVENT_DISABLED;
}
DBUG_PRINT("evex manager", ("[%10s] next exec at [%llu]", et->name.str,
TIME_to_ulonglong_datetime(&et->execute_at)));
et->update_fields(thd);
/*
1. For one-time event : year is > 0 and expression is 0
2. For recurring, expression is != -=> check execute_at_null in this case
*/
if ((et->execute_at.year && !et->expression) || et->execute_at_null)
et->flags |= EVENT_EXEC_NO_MORE;
if ((et->flags & EVENT_EXEC_NO_MORE) || et->status == MYSQL_EVENT_DISABLED)
queue_remove(&queue, 0);// 0 is top, internally 1
else
queue_replaced(&queue);
/* Is it good idea to pass a stack address ?*/
Worker_thread_param param(et);
pthread_mutex_lock(¶m.LOCK_started);
/*
We don't lock LOCK_scheduler_data fpr workers_increment() because it's a
pre-requisite for calling the current_method.
*/
workers_increment(thd->thread_id);
switch ((fork_ret_code= et->spawn_now(event_worker_thread, ¶m))) {
case EVENT_EXEC_CANT_FORK:
/*
We don't lock LOCK_scheduler_data here because it's a pre-requisite
for calling the current_method.
We pass 0 to workers_decrement() because there was no thread forked and
only workers_count should be updated but not the `workers` dynamic array
*/
workers_decrement(0);
sql_print_error("SCHEDULER: Problem while trying to create a thread");
DBUG_RETURN(true);
case EVENT_EXEC_ALREADY_EXEC:
/*
We don't lock LOCK_scheduler_data here because it's a pre-requisite
for calling the current_method.
We pass 0 to workers_decrement() because there was no thread forked and
only workers_count should be updated but not the `workers` dynamic array
*/
workers_decrement(0);
sql_print_information("SCHEDULER: %s.%s in execution. Skip this time.",
et->dbname.str, et->name.str);
break;
default:
DBUG_ASSERT(!fork_ret_code);
/*
We don't lock LOCK_scheduler_data here because it's a pre-requisite
for calling the current_method.
We pass 0 to workers_decrement() because there was no thread forked and
only workers_count should be updated but not the `workers` dynamic array
*/
if (unlikely(fork_ret_code))
workers_decrement(0);
else
{
/* Wait the forked thread to start */
pthread_cond_wait(¶m.COND_started, ¶m.LOCK_started);
#ifndef DBUG_OFF
pthread_mutex_lock(&LOCK_executed);
pthread_cond_signal(&COND_executed);
pthread_mutex_unlock(&LOCK_executed);
#endif
}
/*
param was allocated on the stack so no explicit delete as well as
in this moment it's no more used in the spawned thread so it's safe
to be deleted.
*/
break;
}
pthread_mutex_unlock(¶m.LOCK_started);
DBUG_RETURN(false);
}
/*
Cleans the scheduler's queue. Auxiliary method for ::run().
Synopsis
Event_scheduler::clean_queue()
*/
void
Event_scheduler::clean_queue(THD *thd)
{
uint i;
int ret;
DBUG_ENTER("Event_scheduler::clean_queue");
DBUG_PRINT("enter", ("thd=%p", thd));
pthread_mutex_lock(&LOCK_scheduler_data);
DBUG_PRINT("info", ("workers_count=%d workers.elements=%lu", workers_count,
workers.elements));
if (workers_count)
{
bool had_super= false;
/*
ToDo: This is a bit suboptimal because we try to kill everything, even
non-running events.
*/
for (i= 0; i < workers.elements; ++i)
DBUG_PRINT("info", ("working_thread#%d=%lu", i,
*dynamic_element(&workers, i, ulong*)));
/* We need temporarily SUPER_ACL to be able to kill our offsprings */
if (!(thd->security_ctx->master_access & SUPER_ACL))
thd->security_ctx->master_access|= SUPER_ACL;
else
had_super= true;
/*
Should be initialized to 0 because if workers_count is > 0 and
w.elements =0 then kill_one_thread won't be called. And the
do-while loop a bit later need it.
*/
ret= 0;
for (i= 0; i < workers.elements; ++i)
{
sql_print_information("SCHEDULER: Killing worker thread %lu",
*dynamic_element(&workers, i, ulong*));
if ((ret= kill_one_thread(thd, *dynamic_element(&workers, i, ulong*),
false)))
{
sql_print_error("SCHEDULER: Error while killing code=%d", ret);
break;
}
}
if (!had_super)
thd->security_ctx->master_access &= ~SUPER_ACL;
#ifndef DBUG_OFF
if (workers_count > workers.elements)
DBUG_PRINT("info", ("A thread was started but had not chance "
"to register itself"));
#endif
sql_print_information("SCHEDULER: Waiting for worker threads to finish");
/* Do it in a loop against spurious wakeups */
if (!ret)
{
do {
DBUG_PRINT("info", ("workers_count=%d", workers_count));
pthread_cond_wait(&COND_last_worker_exit, &LOCK_scheduler_data);
} while (workers_count);
DBUG_PRINT("info", ("Got COND_last_worker_exit from the last thread"));
}
}
pthread_mutex_unlock(&LOCK_scheduler_data);
delete_dynamic(&workers);
sql_print_information("SCHEDULER: Emptying the queue");
/* empty the queue */
for (i= 0; i < queue.elements; ++i)
{
Event_timed *et= (Event_timed *) queue_element(&queue, i);
et->free_sp();
delete et;
}
resize_queue(&queue, 0);
DBUG_VOID_RETURN;
}
/*
Shutdowns the event scheduler
Synopsis
Event_scheduler::shutdown()
state Wait the events or kill them immediately
Returns
EVENT_OP_OK OK
EVENT_OP_CANT_KILL Error during stopping of manager thread
EVENT_OP_NOT_RUNNING Manager not working
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::shutdown(enum event_drop_mode stop_mode)
{
int ret;
THD *thd= current_thd;
DBUG_ENTER("Event_scheduler::shutdown");
DBUG_PRINT("enter", ("thd=%p stop_mode=%d", current_thd, stop_mode));
pthread_mutex_lock(&LOCK_scheduler_data);
CHECK_RUNNING(EVENT_OP_NOT_RUNNING);
state= SCHEDULER_SHUTDOWN;
DBUG_PRINT("info", ("Manager thread has id %d", thread_id));
sql_print_information("SCHEDULER: Killing manager thread %lu", thread_id);
/*
Sending the COND_new_work to ::run() is a way to get this working without
race conditions. If we use kill_one_thread() it will call THD::awake() and
because in ::run() both THD::enter_cond()/::exit_cond() are used,
THD::awake() will try to lock LOCK_scheduler_data. If we unlock it before
then the pthread_cond_signal(COND_shutdown) could be signaled in ::run()
and we can miss the signal before we relock. A way is to use another mutex
for this shutdown procedure but better not.
*/
pthread_cond_signal(&COND_new_work);
/* Guarantee we don't catch spurious signals */
sql_print_information("SCHEDULER: Waiting the manager thread to reply");
while (state != SCHEDULER_INIT)
{
DBUG_PRINT("info", ("Waiting for COND_shutdown from the manager thread."
" Current value of state is %d . workers_count=%d", state,
workers_count));
pthread_cond_wait(&COND_shutdown, &LOCK_scheduler_data);
}
DBUG_PRINT("info", ("Manager thread has cleaned up. Set state to INIT"));
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(EVENT_OP_OK);
}
/*
Handles updates of @@event_scheduler
Synopsis
Event_scheduler::event_scheduler_var_update()
Returns
FALSE OK
TRUE Error
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::start_or_stop(my_bool new_value)
{
Event_scheduler *mgr;
enum event_manager_op_code res;
DBUG_ENTER("Event_scheduler::start_or_stop");
pthread_mutex_lock(&LOCK_scheduler_object);
if (new_value == Event_scheduler::manager_working)
{
DBUG_PRINT("info", ("The new value is the same as the old"));
pthread_mutex_unlock(&LOCK_scheduler_object);
DBUG_RETURN(EVENT_OP_OK);
}
/*
Don't use the traditional way like other static functions do,
namely lock LOCK_scheduler_object. If we get lock on LOCK_scheduler_object
and singleton is NULL and if the new value for the variable is `true`,
meaning we have to start the scheduler there is a deadlock because
::get_instance() locks also on LOCK_scheduler_object. Instead, just call
::get_instance() and it will create an object if it is not needed.
If setting the value to
*/
pthread_mutex_unlock(&LOCK_scheduler_object);
if (!(mgr= Event_scheduler::get_instance(true)))
DBUG_RETURN(EVENT_OP_CANT_INIT);
/*
::start()/::shutdown() will serialize the access. Both methods don't
allow parallel execution in them.
*/
DBUG_PRINT("info", ("%s the manager", new_value? "starting":"stopping"));
DBUG_RETURN(new_value? mgr->start():mgr->shutdown(EVENT_STOP_SYNC));
}
/*
Increments the number of running worker threads
Synopsis
Event_scheduler::workers_increment()
thd_id Newly started thread's id
NOTE
The caller should have locked LOCK_scheduler_data!
*/
void
Event_scheduler::workers_increment(ulong thd_id)
{
DBUG_ENTER("Event_scheduler::workers_increment");
DBUG_PRINT("info", ("state=%d", singleton->state));
DBUG_ASSERT(singleton->state == SCHEDULER_RUNNING);
++workers_count;
DBUG_PRINT("info", ("workers_count=%d", workers_count));
DBUG_VOID_RETURN;
}
/*
Decrements the number of running worker threads
Synopsis
Event_scheduler::workers_decrement()
thd_id The id of the thread that finishes. Pass 0
if the thread id is not known because the thread refused to
start (workers_decrement() failed after successful
workers_increment() call).
NOTE
The caller should have locked LOCK_scheduler_data!
*/
void
Event_scheduler::workers_decrement(ulong thd_id)
{
DBUG_ENTER("Event_scheduler::workers_decrement");
if (state == SCHEDULER_RUNNING || state == SCHEDULER_SHUTDOWN)
--workers_count;
DBUG_PRINT("info", ("workers_count=%d", workers_count));
DBUG_VOID_RETURN;
}
/*
Increments the number of running worker threads
Synopsis
Event_scheduler::register_worker_thread()
thd_id The id of the thread that starts
Returns
EVENT_OP_OK Ok
EVENT_OP_NOT_RUNNING Scheduler not working
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::register_worker_thread(ulong thd_id)
{
enum Event_scheduler::event_manager_op_code ret= EVENT_OP_OK;
Event_scheduler *scheduler;
DBUG_ENTER("Event_scheduler::register_worker_thread");
DBUG_PRINT("enter", ("thd=%p thd_id=%lu", current_thd, thd_id));
if ((scheduler= get_instance(false)))
{
pthread_mutex_lock(&scheduler->LOCK_scheduler_data);
if (scheduler->state > SCHEDULER_RUNNING)
{
/*
The scheduler was stopped while the thread that called this method
was starting. Return EVENT_OP_NOT_RUNNING.
*/
ret= EVENT_OP_NOT_RUNNING;
}
else
{
/*
Don't call singleton->workers_increment() because the count was already
incremented before pthread_create() was called.
*/
DBUG_PRINT("info", ("Adding %lu to the list of running events. "
"Current workers_count=%d", thd_id, scheduler->workers_count));
push_dynamic(&scheduler->workers, (gptr) &thd_id);
}
pthread_mutex_unlock(&scheduler->LOCK_scheduler_data);
}
else
ret= EVENT_OP_NOT_RUNNING;
DBUG_RETURN(ret);
}
/*
Decrements the number of running worker threads
Synopsis
Event_scheduler::deregister_worker_thread()
thd_id The id of the thread that finishes
Returns
EVENT_OP_OK Ok
EVENT_OP_NOT_RUNNING Scheduler not working
Note
If thd_id wasn't found no error is generated. Thus if
register_worker_thread() has failed for some reason it's safe to call
this method.
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::deregister_worker_thread(ulong thd_id)
{
enum Event_scheduler::event_manager_op_code ret= EVENT_OP_OK;
Event_scheduler *scheduler;
DBUG_ENTER("Event_scheduler::deregister_worker_thread");
DBUG_PRINT("enter", ("thd=%p thd_id=%lu", current_thd, thd_id));
if ((scheduler= get_instance(false)))
{
pthread_mutex_lock(&scheduler->LOCK_scheduler_data);
scheduler->workers_decrement(thd_id);
if (scheduler->state == SCHEDULER_RUNNING ||
scheduler->state == SCHEDULER_SHUTDOWN)
{
register uint i= 0;
register ulong tid= thd_id;
for (; i < scheduler->workers.elements; ++i)
if (*dynamic_element(&scheduler->workers, i, ulong*) == tid)
{
delete_dynamic_element(&scheduler->workers, i);
break;
}
}
/*
The numbers can be different if 2 threads are spawned but only 1
was executed and the second one is waiting. So w_c=1 and w.elements=0
for example is ok. We signal on scheduler->workers_count because this is
the way to determine if there are started threads. workers.elements
just keeps track of the thread ids. Registering happens after thread
was started and there could be some delay.
*/
DBUG_PRINT("info", ("workers_count=%d workers.elements=%lu",
scheduler->workers_count, scheduler->workers.elements));
if (scheduler->state == SCHEDULER_SHUTDOWN && !scheduler->workers_count)
{
DBUG_PRINT("info", ("Sending out COND_last_worker_exit"));
pthread_cond_signal(&scheduler->COND_last_worker_exit);
}
pthread_mutex_unlock(&scheduler->LOCK_scheduler_data);
}
else
ret= EVENT_OP_NOT_RUNNING;
DBUG_RETURN(ret);
}
/*
Returns the number of elements in the queue
Synopsis
Event_scheduler::events_count()
Returns
-1 Manager not working
>=0 Number of Event_timed objects in the queue
*/
int
Event_scheduler::events_count()
{
int n;
DBUG_ENTER("Event_scheduler::events_count");
pthread_mutex_lock(&LOCK_scheduler_data);
if (state == SCHEDULER_RUNNING)
n= queue.elements;
else
n= -1;
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(n);
}
/*
Looks for a named event in mysql.event and then loads it from
the table, compiles and inserts it into the cache.
SYNOPSIS
Event_scheduler::load_and_compile_event()
thd THD
etn The name of the event to load and compile on manager's root
etn_new The loaded event
RETURN VALUE
NULL Error during compile or the event is non-enabled.
otherwise Address
*/
enum Event_scheduler::event_manager_op_code
Event_scheduler::load_and_compile_event(THD *thd, Event_timed *etn,
Event_timed **etn_new)
{
int ret= 0;
MEM_ROOT *tmp_mem_root;
Event_timed *et_loaded= NULL;
Open_tables_state backup;
DBUG_ENTER("Event_scheduler::load_and_compile_event");
DBUG_PRINT("enter",("thd=%p name:%*s",thd,etn->name.length,etn->name.str));
thd->reset_n_backup_open_tables_state(&backup);
/* No need to use my_error() here because db_find_event() has done it */
{
sp_name spn(etn->dbname, etn->name);
ret= db_find_event(thd, &spn, &etn->definer, &et_loaded, NULL,
&scheduler_root);
}
thd->restore_backup_open_tables_state(&backup);
/* In this case no memory was allocated so we don't need to clean */
if (ret)
DBUG_RETURN(EVENT_OP_LOAD_ERROR);
if (et_loaded->status != MYSQL_EVENT_ENABLED)
{
/*
We don't load non-enabled events.
In db_find_event() `et_new` was allocated on the heap and not on
scheduler_root therefore we delete it here.
*/
delete et_loaded;
DBUG_RETURN(EVENT_OP_DISABLED_EVENT);
}
et_loaded->compute_next_execution_time();
*etn_new= et_loaded;
DBUG_RETURN(EVENT_OP_OK);
}
/*
Loads all ENABLED events from mysql.event into the prioritized
queue. Called during scheduler main thread initialization. Compiles
the events. Creates Event_timed instances for every ENABLED event
from mysql.event.
SYNOPSIS
Event_scheduler::load_events_from_db()
thd - Thread context. Used for memory allocation in some cases.
RETURNS
0 OK
!0 Error
NOTES
Reports the error to the console
*/
int
Event_scheduler::load_events_from_db(THD *thd)
{
TABLE *table;
READ_RECORD read_record_info;
int ret= -1;
uint count= 0;
DBUG_ENTER("evex_load_events_from_db");
DBUG_PRINT("enter", ("thd=%p", thd));
pthread_mutex_lock(&LOCK_scheduler_data);
if (state > SCHEDULER_STARTING)
{
DBUG_ASSERT(0);
sql_print_error("SCHEDULER: Trying to load events while already running.");
pthread_mutex_unlock(&LOCK_scheduler_data);
DBUG_RETURN(EVEX_GENERAL_ERROR);
}
pthread_mutex_unlock(&LOCK_scheduler_data);
if ((ret= evex_open_event_table(thd, TL_READ, &table)))
{
sql_print_error("SCHEDULER: Table mysql.event is damaged. Can not open.");
DBUG_RETURN(EVEX_OPEN_TABLE_FAILED);
}
init_read_record(&read_record_info, thd, table ,NULL,1,0);
while (!(read_record_info.read_record(&read_record_info)))
{
Event_timed *et;
if (!(et= new Event_timed))
{
DBUG_PRINT("load_events_from_db", ("Out of memory"));
ret= -1;
goto end;
}
DBUG_PRINT("load_events_from_db", ("Loading event from row."));
if ((ret= et->load_from_row(&scheduler_root, table)))
{
sql_print_error("SCHEDULER: Error while loading from mysql.event. "
"Table probably corrupted");
goto end;
}
if (et->status != MYSQL_EVENT_ENABLED)
{
DBUG_PRINT("load_events_from_db",("%s is disabled",et->name.str));
delete et;
continue;
}
DBUG_PRINT("load_events_from_db",
("Event %s loaded from row. Time to compile", et->name.str));
/* We load only on manager root just to check whether the body compiles */
switch (ret= et->compile(thd, &scheduler_root)) {
case EVEX_MICROSECOND_UNSUP:
sql_print_error("SCHEDULER: mysql.event is tampered. MICROSECOND is not "
"supported but found in mysql.event");
goto end;
case EVEX_COMPILE_ERROR:
sql_print_error("SCHEDULER: Error while compiling %s.%s. Aborting load.",
et->dbname.str, et->name.str);
goto end;
default:
/* Free it, it will be compiled again on the worker thread */
et->free_sp();
break;
}
/* let's find when to be executed */
if (et->compute_next_execution_time())
{
sql_print_error("SCHEDULER: Error while computing execution time of %s.%s."
" Skipping", et->dbname.str, et->name.str);
continue;
}
DBUG_PRINT("load_events_from_db", ("Adding to the exec list."));
queue_insert_safe(&queue, (byte *) et);
DBUG_PRINT("load_events_from_db", ("%p %*s",
et, et->name.length,et->name.str));
count++;
}
ret= 0;
end:
end_read_record(&read_record_info);
/* Force close to free memory */
thd->version--;
close_thread_tables(thd);
if (!ret)
sql_print_information("SCHEDULER: Loaded %d event%s", count, (count == 1)?"":"s");
DBUG_PRINT("info", ("Status code %d. Loaded %d event(s)", ret, count));
DBUG_RETURN(ret);
}
/*
Opens mysql.db and mysql.user and checks whether:
1. mysql.db has column Event_priv at column 20 (0 based);
2. mysql.user has column Event_priv at column 29 (0 based);
Synopsis
Event_scheduler::check_system_tables()
*/
void
Event_scheduler::check_system_tables()
{
THD *thd= current_thd;
TABLE_LIST tables;
bool not_used;
Open_tables_state backup;
/* thd is 0x0 during boot of the server. Later it's !=0x0 */
if (!thd)
return;
DBUG_ENTER("Event_scheduler::check_system_tables");
DBUG_PRINT("enter", ("thd=%p", thd));
thd->reset_n_backup_open_tables_state(&backup);
bzero((char*) &tables, sizeof(tables));
tables.db= (char*) "mysql";
tables.table_name= tables.alias= (char*) "db";
tables.lock_type= TL_READ;
if (simple_open_n_lock_tables(thd, &tables))
sql_print_error("Cannot open mysql.db");
else
{
table_check_intact(tables.table, MYSQL_DB_FIELD_COUNT, mysql_db_table_fields,
&mysql_db_table_last_check,ER_CANNOT_LOAD_FROM_TABLE);
close_thread_tables(thd);
}
bzero((char*) &tables, sizeof(tables));
tables.db= (char*) "mysql";
tables.table_name= tables.alias= (char*) "user";
tables.lock_type= TL_READ;
if (simple_open_n_lock_tables(thd, &tables))
sql_print_error("Cannot open mysql.db");
else
{
if (tables.table->s->fields < 29 ||
strncmp(tables.table->field[29]->field_name,
STRING_WITH_LEN("Event_priv")))
sql_print_error("mysql.user has no `Event_priv` column at position 29");
close_thread_tables(thd);
}
thd->restore_backup_open_tables_state(&backup);
DBUG_VOID_RETURN;
}
#ifndef DBUG_OFF
#define ERR_W_MSG(cond, msg) \
{ \
sql_print_information("Testing %s", msg); \
DBUG_PRINT("info",("Testing %s", msg)); \
protocol->prepare_for_resend(); \
protocol->store(msg, strlen(msg), system_charset_info); \
if (!(cond)){ \
protocol->store((char*)STRING_WITH_LEN("ERROR"), system_charset_info); \
ret= protocol->write(); \
goto err; \
} else {\
protocol->store((char*)STRING_WITH_LEN("OK"), system_charset_info); \
ret= protocol->write(); \
if (ret) \
goto err; \
} \
}
bool
Event_scheduler::tests_run(THD *thd)
{
Protocol *protocol= thd->protocol;
Event_scheduler *mgr;
List<Item> field_list;
int ret;
struct timespec abstime;
int exec_count=0;
DBUG_ENTER("evex_manager_tester");
field_list.push_back(new Item_empty_string("Test", 100));
field_list.push_back(new Item_empty_string("Result", 5));
if (protocol->send_fields(&field_list, Protocol::SEND_NUM_ROWS |
Protocol::SEND_EOF))
DBUG_RETURN(true);
Event_timed et;
et.dbname.str= (char *)"test";
et.dbname.length= strlen("test");
et.name.str= (char *)"event_name";
et.name.length= strlen("event_name");
et.definer.str= (char *)"root@localhost";
et.definer.length= strlen("root@localhost");
et.body.str= (char *) "select 1 from dual";
et.body.length= strlen("select 1 from dual");
et.expression= 3;
et.interval= INTERVAL_SECOND;
et.ends_null= true;
my_tz_UTC->gmt_sec_to_TIME(&et.starts, time(NULL) + 10);
Event_timed et2;
et2.dbname.str= (char *)"test";
et2.dbname.length= strlen("test");
et2.name.str= (char *)"event_name2";
et2.name.length= strlen("event_name2");
et2.definer.str= (char *)"root@localhost";
et2.definer.length= strlen("root@localhost");
et2.body.str= (char *) "select 2 from dual";
et2.body.length= strlen("select 2 from dual");
et2.expression= 5;
et2.interval= INTERVAL_SECOND;
et2.ends_null= true;
my_tz_UTC->gmt_sec_to_TIME(&et2.starts, time(NULL) + 15);
uint tmp;
/* Force new manager instantiation */
ERR_W_MSG(!Event_scheduler::destroy(), "Destroy old manager");
ERR_W_MSG(!Event_scheduler::singleton, "Old manager");
mgr= Event_scheduler::get_instance(true);
ERR_W_MSG(mgr, "Create new manager");
ERR_W_MSG((mgr->state == Event_scheduler::SCHEDULER_INIT),
"Test manager state ");
ERR_W_MSG(mgr->events_count() == -1, "Test count");
ERR_W_MSG(!db_create_event(thd, &et, false, &tmp),
"Create event on disk");
ERR_W_MSG(!mgr->start(), "Start manager");
mgr->add_event(thd, &et, false);
ERR_W_MSG(mgr->events_count() == 2, "Test count wo check");
mgr->add_event(thd, &et, true);
ERR_W_MSG(mgr->events_count() == 2, "Test count with check");
mgr->add_event(thd, &et, false);
ERR_W_MSG(mgr->events_count() == 3, "Test count wo check");
mgr->add_event(thd, &et2, true);
ERR_W_MSG(mgr->events_count() == 3, "Test count after add of et2");
ERR_W_MSG(!db_create_event(thd, &et2, false, &tmp),
"Create event et2 on disk");
mgr->add_event(thd, &et2, true);
ERR_W_MSG(mgr->events_count() == 4,
"Test count after add of et2 (again)");
mgr->drop_event(thd, &et, Event_scheduler::EVENT_STOP_SYNC);
ERR_W_MSG(mgr->events_count() == 3, "Test delete 1");
mgr->drop_event(thd, &et, Event_scheduler::EVENT_STOP_SYNC);
ERR_W_MSG(mgr->events_count() == 2, "Test delete 2");
mgr->drop_event(thd, &et, Event_scheduler::EVENT_STOP_SYNC);
ERR_W_MSG(mgr->events_count() == 1, "Test delete 3");
et2.body.str= (char *) "select 212 from dual";
et2.body.length= strlen("select 212 from dual");
mgr->replace_event(thd, &et2, Event_scheduler::EVENT_STOP_SYNC);
ERR_W_MSG(mgr->events_count() == 1, "Test delete 4");
/*
Here we will get an empty line because kill_one_thread() which is
used by ::shutdown() calls send_eof().
*/
ERR_W_MSG(!mgr->shutdown(EVENT_STOP_SYNC), "Shutdown the manager");
ERR_W_MSG(!et.drop(thd), "et.drop()");
ERR_W_MSG(!et2.drop(thd), "et2.drop()");
/* New test starting */
ERR_W_MSG(!mgr->start(), "Start manager again and sleep 2s");
ERR_W_MSG(mgr->start()==
Event_scheduler::EVENT_OP_ALREADY_RUNNING,
"Try to start again");
pthread_mutex_lock(&mgr->LOCK_executed);
ERR_W_MSG(!db_create_event(thd, &et, false, &tmp), "Disk Create event et1");
ERR_W_MSG(!db_create_event(thd, &et2, false, &tmp),"Disk Create event et2");
ERR_W_MSG(!mgr->add_event(thd, &et, true), "Add et to the queue, step 1");
ERR_W_MSG(mgr->events_count() == 1, "Add et to queue, step 2");
ERR_W_MSG(!mgr->add_event(thd, &et2, true), "Add et2 to the queue, step 1");
ERR_W_MSG(mgr->events_count() == 2, "Add et2 to the queue, step 2");
/* now there should be 2 events */
/* 16 sec test */
abstime.tv_nsec= 0;
abstime.tv_sec= time(NULL) + 13;
while (ETIMEDOUT != pthread_cond_timedwait(&mgr->COND_executed,
&mgr->LOCK_executed,
&abstime))
{
exec_count++;
sql_print_information("Exec_count=%d", exec_count);
}
pthread_mutex_unlock(&mgr->LOCK_executed);
sql_print_information("Exec_count=%d", exec_count);
ERR_W_MSG(exec_count == 8, "Execution count");
/*
Here we will get an empty line because kill_one_thread() which is
used by ::shutdown() calls send_eof().
*/
ERR_W_MSG(!mgr->shutdown(EVENT_STOP_SYNC), "Shutdown manager");
ERR_W_MSG(mgr->shutdown(EVENT_STOP_SYNC)==
Event_scheduler::EVENT_OP_NOT_RUNNING,
"Shutdown manager again for checking");
ERR_W_MSG(!Event_scheduler::destroy(), "Destroy new manager");
ERR_W_MSG(!Event_scheduler::singleton, "Singleton");
ERR_W_MSG(!et.drop(thd), "et.drop()");
ERR_W_MSG(!et2.drop(thd), "et2.drop()");
ERR_W_MSG(TRUE, "All Tests");
send_eof(thd);
DBUG_RETURN(false);
err:
mgr->shutdown(EVENT_STOP_SYNC);
Event_scheduler::destroy();
send_eof(thd);
DBUG_RETURN(true);
}
#endif
--- New file ---
+++ sql/event_scheduler.h 06/04/10 00:53:46
/* Copyright (C) 2004-2005 MySQL AB
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
#ifndef _EVENT_SCHEDULER_H_
#define _EVENT_SCHEDULER_H_
class THD;
typedef bool * (*event_timed_identifier_comparator)(Event_timed*, Event_timed*);
/*
Locking hierarchy:
->LOCK_executed (used for counting of forks together with COND_executed)
->LOCK_scheduler_object
--->LOCK_scheduler_data (protects `state`)
----->LOCK_workers_count (protects `workers_count`)
----->LOCK_last_worker_exit (for COND_last_worker_exit)
*/
class Event_scheduler
{
public:
/*
This mutex is public so we can initialize it during server startup.
The reason to initialize it there is that we use singleton and this
mutex guards creation and destruction of the singleton object.
*/
static pthread_mutex_t LOCK_scheduler_object;
/* Storage for @@event_scheduler */
static my_bool manager_working;
/* SYNC or ASYNC stop of running events */
enum event_drop_mode
{
EVENT_STOP_ASYNC = 1,
EVENT_STOP_SYNC =2
};
/* The life cycle of a manager */
enum event_manager_state
{
SCHEDULER_INIT= 0,
SCHEDULER_STARTING,
SCHEDULER_CANTSTART,
SCHEDULER_RUNNING,
SCHEDULER_SHUTDOWN,
SCHEDULER_STOPPED,
};
/* Return codes */
enum event_manager_op_code
{
EVENT_OP_OK= 0,
EVENT_OP_CANTFORK,
EVENT_OP_CANTSTART,
EVENT_OP_ALREADY_RUNNING,
EVENT_OP_NOT_RUNNING,
EVENT_OP_CANT_KILL,
EVENT_OP_CANT_INIT,
EVENT_OP_DISABLED_EVENT,
EVENT_OP_LOAD_ERROR,
EVENT_OP_ALREADY_EXISTS
};
/* Singleton access */
static Event_scheduler*
get_instance(bool implicit_create);
enum event_manager_op_code
add_event(THD *thd, Event_timed *et, bool check_existance);
bool
drop_event(THD *thd, Event_timed *et, enum event_drop_mode drop_mode);
enum event_manager_op_code
replace_event(THD *thd, Event_timed *et, enum event_drop_mode replace_mode);
/*
LOCKING PROTOCOL: Does not do any locking. The caller is responsible to
lock and signal.
*/
Event_timed *
find_event(Event_timed *etn, bool remove_from_q);
bool
trigger_event(THD *thd, Event_timed *etn) { DBUG_ASSERT(0);}
bool
drop_schema_events(THD *thd, LEX_STRING *schema);
bool
drop_user_events(THD *thd, LEX_STRING *definer) { DBUG_ASSERT(0);}
int
events_count();
enum event_manager_op_code
start();
bool
run(THD *thd);
enum event_manager_op_code
shutdown(enum event_drop_mode stop_mode);
/* Call this only at the end of the server. */
static bool
destroy()
{
pthread_mutex_lock(&LOCK_scheduler_object);
if (singleton && singleton->state == SCHEDULER_RUNNING)
{
/* the master thread should not be running */
DBUG_ASSERT(0);
return true;
}
delete singleton;
singleton= NULL;
pthread_mutex_unlock(&LOCK_scheduler_object);
return false;
}
static enum event_manager_op_code
start_or_stop(my_bool new_value);
static enum event_manager_op_code
register_worker_thread(ulong thd_id);
static enum event_manager_op_code
deregister_worker_thread(ulong thd_id);
#ifndef DBUG_OFF
static bool
tests_run(THD *thd);
pthread_cond_t COND_executed;
pthread_mutex_t LOCK_executed;
#endif
protected:
bool
init();
void
workers_increment(ulong thd_id);
void
workers_decrement(ulong thd_id);
/* helper functions */
bool
execute_top(THD *thd);
void
clean_queue(THD *thd);
static void
check_system_tables();
enum event_manager_op_code
Event_scheduler::load_and_compile_event(THD *thd, Event_timed *etn,
Event_timed **etn_new);
int
load_events_from_db(THD *thd);
bool
drop_matching_events(THD *thd, LEX_STRING *pattern,
bool (*)(Event_timed *,LEX_STRING *));
private:
/* Prevent use of these */
Event_scheduler(const Event_scheduler &);
void operator=(Event_scheduler &);
/* Singleton is used */
Event_scheduler():thread_id(0), workers_count(0)
{}
/*
LOCK PROCOTOL: Expects that this method is synchronized
*/
~Event_scheduler()
{
/* ToDo: Wait if there are elements on the queue */
pthread_mutex_lock(&LOCK_scheduler_data);
singleton->state= SCHEDULER_SHUTDOWN;
pthread_mutex_unlock(&LOCK_scheduler_data);
delete_queue(&queue);
pthread_cond_destroy(&COND_new_work);
pthread_cond_destroy(&COND_started);
#ifndef DBUG_OFF
pthread_cond_destroy(&COND_executed);
pthread_mutex_destroy(&LOCK_executed);
#endif
state= SCHEDULER_STOPPED;
pthread_mutex_destroy(&LOCK_scheduler_data);
}
/* Singleton instance */
static Event_scheduler *singleton;
/* This is the current status of the life-cycle of the manager. */
enum event_manager_state state;
/*
LOCK_scheduler_data is the mutex which protects the access to the manager's queue
as well as used when signalling COND_new_work, COND_started and
COND_shutdown.
*/
pthread_mutex_t LOCK_scheduler_data;
/* Complementing mutex for COND_last_worker_exit */
pthread_mutex_t LOCK_last_worker_exit;
/*
Holds the thread id of the executor thread or 0 if the executor is not
running. It is used by ::shutdown() to know which thread to kill with
kill_one_thread(). The latter wake ups a thread if it is waiting on a
conditional variable and sets thd->killed to non-zero.
*/
ulong thread_id;
/*
COND_new_work is a conditional used to signal that there is a change
of the queue that should inform the executor thread that new event should
be executed sooner than previously expected, because of add/replace event.
*/
pthread_cond_t COND_new_work;
/*
COND_started is a conditional used to synchronize the thread in which
::start() was called and the spawned thread. ::start() spawns a new thread
and then waits on COND_started but also checks when awaken that `state` is
either SCHEDULER_RUNNING or SCHEDULER_CANTSTART. Then it returns back.
*/
pthread_cond_t COND_started;
/*
COND_shutdown is a conditional very similar to COND_started in it usage but
is used during ::shutdown() call. ::shutdown() kills the executor thread and
then waits for COND_shutdown to be signalled by the latter. When this happens
and `state` is set back by the executor thread to SCHEDULER_INIT, to guarantee
protection against spurious wake-ups, ::shutdown() returns.
*/
pthread_cond_t COND_shutdown;
/*
COND_last_worker_exit is a conditional signaled by a worker thread when the
workers_count reaches 0. This notifies the manager thread that it shoud
continue with the clean up.
*/
pthread_cond_t COND_last_worker_exit;
/* The MEM_ROOT of the object */
MEM_ROOT scheduler_root;
/* The sorted queue with the Event_timed objects */
QUEUE queue;
/*
Number of running threads. It can differ from workers.elements because
workers_count is incremented before forking of a new thread to prevent
the following race condition:
1. Thread forked (and stops)
2. Manager shutdown and does not see the forked thread because it hasn't
called ::register_worker_thread() and frees the Event_timed object
3. The forked thread tries to access the Event_timed object
Intentionaly left int and not uint to catch errors with counting if any
occur.
*/
int workers_count;
/*
DYNAMIC_ARRAY which holds the id of the threads which are spawned, so we
can kill them during shutdown. Hence, no need to go over the whole list of
events in memory and ask everyone to kill itself, if running. Additional
gain is that an event can be run, with this code, in more than one threads
but in every thread the sp_head has to be compiled again, because it's not
reentrant and is tightly coupled to class THD.
*/
DYNAMIC_ARRAY workers;
};
#endif /* _EVENT_SCHEDULER_H_ */
--- 1.47/sql/event_timed.cc 2006-03-17 10:36:32 +02:00
+++ 1.48/sql/event_timed.cc 2006-04-10 00:53:43 +03:00
@@ -20,7 +20,6 @@
#include "sp.h"
-
extern int MYSQLparse(void *thd);
/*
@@ -927,7 +926,11 @@ Event_timed::compute_next_execution_time
goto ret;
}
ret:
-
+ sql_print_information("SCHEDULER: Next execution of %*s.%*s at "
+ "[%04d-%02d-%02d %02d:%02d:%02d UTC]",
+ dbname.length, dbname.str, name.length, name.str,
+ execute_at.year, execute_at.month, execute_at.day,
+ execute_at.hour, execute_at.minute, execute_at.second);
DBUG_RETURN(false);
err:
DBUG_RETURN(true);
@@ -1209,6 +1212,8 @@ Event_timed::execute(THD *thd, MEM_ROOT
VOID(pthread_mutex_lock(&this->LOCK_running));
running= false;
+ /* Will compile every time a new sp_head on different root */
+ free_sp();
VOID(pthread_mutex_unlock(&this->LOCK_running));
done:
@@ -1457,10 +1462,9 @@ extern pthread_attr_t connection_attrib;
*/
int
-Event_timed::spawn_now(void * (*thread_func)(void*))
+Event_timed::spawn_now(void * (*thread_func)(void*), void *arg)
{
int ret= EVENT_EXEC_STARTED;
- static uint exec_num= 0;
DBUG_ENTER("Event_timed::spawn_now");
DBUG_PRINT("info", ("[%s.%s]", dbname.str, name.str));
@@ -1469,19 +1473,12 @@ Event_timed::spawn_now(void * (*thread_f
{
pthread_t th;
in_spawned_thread= true;
- if (pthread_create(&th, &connection_attrib, thread_func, (void*)this))
+ if (pthread_create(&th, &connection_attrib, thread_func, arg))
{
DBUG_PRINT("info", ("problem while spawning thread"));
ret= EVENT_EXEC_CANT_FORK;
in_spawned_thread= false;
}
-#ifndef DBUG_OFF
- else
- {
- sql_print_information("SCHEDULER: Started thread %d", ++exec_num);
- DBUG_PRINT("info", ("thread spawned"));
- }
-#endif
}
else
{
@@ -1498,18 +1495,12 @@ void
Event_timed::spawn_thread_finish(THD *thd)
{
DBUG_ENTER("Event_timed::spawn_thread_finish");
- VOID(pthread_mutex_lock(&this->LOCK_running));
+ VOID(pthread_mutex_lock(&LOCK_running));
in_spawned_thread= false;
- if ((flags & EVENT_EXEC_NO_MORE) || status == MYSQL_EVENT_DISABLED)
- {
- DBUG_PRINT("info", ("%s exec no more. to drop=%d", name.str, dropped));
- if (dropped)
- drop(thd);
- VOID(pthread_mutex_unlock(&this->LOCK_running));
- delete this;
- DBUG_VOID_RETURN;
- }
- VOID(pthread_mutex_unlock(&this->LOCK_running));
+ DBUG_PRINT("info", ("Sending COND_finished for thread %d", thread_id));
+ thread_id= 0;
+ pthread_cond_signal(&COND_finished);
+ VOID(pthread_mutex_unlock(&LOCK_running));
DBUG_VOID_RETURN;
}
@@ -1527,7 +1518,7 @@ Event_timed::spawn_unlock(THD *thd)
{
int ret= 0;
VOID(pthread_mutex_lock(&this->LOCK_running));
- if (!in_spawned_thread)
+ if (in_spawned_thread)
{
if (locked_by_thread_id == thd->thread_id)
{
@@ -1545,4 +1536,133 @@ Event_timed::spawn_unlock(THD *thd)
}
VOID(pthread_mutex_unlock(&this->LOCK_running));
return ret;
+}
+
+
+/*
+ Kills a running event
+ Synopsis
+ Event_timed::kill_thread()
+
+ Returns
+ 0 OK
+ -1 EVEX_CANT_KILL
+ !0 Error
+*/
+
+int
+Event_timed::kill_thread(THD *thd)
+{
+ int ret= 0;
+ DBUG_ENTER("Event_timed::kill_thread");
+ pthread_mutex_lock(&LOCK_running);
+ DBUG_PRINT("info", ("thread_id=%lu", thread_id));
+
+ if (thread_id == thd->thread_id)
+ {
+ /*
+ We don't kill ourselves in cases like :
+ alter event e_43 do alter event e_43 do set @a = 4 because
+ we will never receive COND_finished.
+ */
+ DBUG_PRINT("info", ("It's not safe to kill ourselves in self altering queries"));
+ ret= EVEX_CANT_KILL;
+ }
+ else if (thread_id && !(ret= kill_one_thread(thd, thread_id, false)))
+ {
+ thd->enter_cond(&COND_finished, &LOCK_running, "Waiting for finished");
+ DBUG_PRINT("info", ("Waiting for COND_finished from thread %d", thread_id));
+ while (thread_id)
+ pthread_cond_wait(&COND_finished, &LOCK_running);
+
+ DBUG_PRINT("info", ("Got COND_finished"));
+ /* This will implicitly unlock LOCK_running. Hence we return before that */
+ thd->exit_cond("");
+
+ DBUG_RETURN(0);
+ }
+ else if (!thread_id && in_spawned_thread)
+ {
+ /*
+ Because the manager thread waits for the forked thread to update thread_id
+ this situation is impossible.
+ */
+ DBUG_ASSERT(0);
+ }
+ pthread_mutex_unlock(&LOCK_running);
+ DBUG_RETURN(ret);
+}
+
+
+/*
+ Checks whether two events have the same name
+
+ Synopsis
+ event_timed_name_equal()
+
+ Returns
+ true names are equal
+ false names are not equal
+*/
+
+bool
+event_timed_name_equal(Event_timed *et, LEX_STRING *name)
+{
+ return !sortcmp_lex_string(et->name, *name, system_charset_info);
+}
+
+
+/*
+ Checks whether two events are in the same schema
+
+ Synopsis
+ event_timed_db_equal()
+
+ Returns
+ true schemas are equal
+ false schemas are not equal
+*/
+
+bool
+event_timed_db_equal(Event_timed *et, LEX_STRING *db)
+{
+ return !sortcmp_lex_string(et->dbname, *db, system_charset_info);
+}
+
+
+/*
+ Checks whether two events have the same definer
+
+ Synopsis
+ event_timed_definer_equal()
+
+ Returns
+ true definers are equal
+ false definers are not equal
+*/
+
+bool
+event_timed_definer_equal(Event_timed *et, LEX_STRING *definer)
+{
+ return !sortcmp_lex_string(et->definer, *definer, system_charset_info);
+}
+
+
+/*
+ Checks whether two events are equal by identifiers
+
+ Synopsis
+ event_timed_identifier_equal()
+
+ Returns
+ true equal
+ false not equal
+*/
+
+bool
+event_timed_identifier_equal(Event_timed *a, Event_timed *b)
+{
+ return event_timed_name_equal(a, &b->name) &&
+ event_timed_db_equal(a, &b->dbname) &&
+ event_timed_definer_equal(a, &b->definer);
}
--- 1.90/sql/share/errmsg.txt 2006-03-20 22:41:16 +02:00
+++ 1.91/sql/share/errmsg.txt 2006-04-10 00:53:43 +03:00
@@ -5826,3 +5826,9 @@ ER_NDB_CANT_SWITCH_BINLOG_FORMAT
eng "The NDB cluster engine does not support changing the binlog format on the fly yet"
ER_PARTITION_NO_TEMPORARY
eng "Cannot create temporary table with partitions"
+ER_EVENT_ADD_TO_QUEUE_ERROR
+ eng "Error %d occured during insert into memory queue"
+ER_EVENT_REPLACE_IN_QUEUE_ERROR
+ eng "Error %d occured during replace in memory queue"
+ER_EVENT_DROP_FROM_QUEUE_ERROR
+ eng "Error %d occured during removal from memory queue"
--- 1.180/sql/set_var.cc 2006-03-21 11:54:21 +02:00
+++ 1.181/sql/set_var.cc 2006-04-10 00:53:43 +03:00
@@ -221,9 +221,11 @@ sys_var_long_ptr sys_delayed_insert_time
&delayed_insert_timeout);
sys_var_long_ptr sys_delayed_queue_size("delayed_queue_size",
&delayed_queue_size);
+
+#include "event_scheduler.h"
sys_var_event_executor sys_event_executor("event_scheduler",
(my_bool *)
- &event_executor_running_global_var);
+ &Event_scheduler::manager_working);
sys_var_long_ptr sys_expire_logs_days("expire_logs_days",
&expire_logs_days);
sys_var_bool_ptr sys_flush("flush", &myisam_flush);
@@ -3546,6 +3548,34 @@ byte *sys_var_thd_dbug::value_ptr(THD *t
DBUG_EXPLAIN(buf, sizeof(buf));
return (byte*) thd->strdup(buf);
}
+
+
+/*
+ The update method of the global variable event_scheduler.
+ If event_scheduler is switched from 0 to 1 then the scheduler main
+ thread is started and if from 1 to 0 the scheduler thread is stopped
+
+ SYNOPSIS
+ sys_var_event_executor::update()
+ thd Thread context (unused)
+ var The new value
+
+ Returns
+ 0 OK (always)
+*/
+
+bool
+sys_var_event_executor::update(THD *thd, set_var *var)
+{
+ enum Event_scheduler::event_manager_op_code res;
+ /* here start the thread if not running. */
+ DBUG_ENTER("sys_var_event_executor::update");
+
+ DBUG_PRINT("new_value", ("%d", (bool)var->save_result.ulong_value));
+ DBUG_RETURN((bool)Event_scheduler::
+ start_or_stop(var->save_result.ulong_value));
+}
+
/****************************************************************************
Used templates
| Thread |
|---|
| • bk commit into 5.1 tree (andrey:1.2234) BUG#17619 | ahristov | 9 Apr |
