1 #ifndef __PERL_SIGNALS_H 2 #define __PERL_SIGNALS_H 3 4 void perl_signal_args_to_c(void (*callback)(void *, void **), void *cb_arg, 5 int signal_id, SV **args, size_t n_args); 6 7 void perl_signal_add_full(const char *signal, SV *func, int priority); 8 9 void perl_signal_remove(const char *signal, SV *func); 10 /* remove all signals used by script */ 11 void perl_signal_remove_script(PERL_SCRIPT_REC *script); 12 13 void perl_command_bind_to(const char *cmd, const char *category, 14 SV *func, int priority); 15 #define perl_command_bind_first(cmd, category, func) \ 16 perl_command_bind_to(cmd, category, func, 0) 17 #define perl_command_bind(cmd, category, func) \ 18 perl_command_bind_to(cmd, category, func, 1) 19 #define perl_command_bind_last(cmd, category, func) \ 20 perl_command_bind_to(cmd, category, func, 2) 21 22 void perl_command_unbind(const char *cmd, SV *func); 23 24 void perl_command_runsub(const char *cmd, const char *data, 25 SERVER_REC *server, WI_ITEM_REC *item); 26 27 void perl_signal_register(const char *signal, const char **args); 28 29 void perl_signals_start(void); 30 void perl_signals_stop(void); 31 32 void perl_signals_init(void); 33 void perl_signals_deinit(void); 34 35 #endif 36