/* * This file was generated automatically by ExtUtils::ParseXS version 2.18 from the * contents of User.xs. Do not edit this file, edit User.xs instead. * * ANY CHANGES MADE HERE WILL BE LOST! * */ #line 1 "User.xs" #include "modules/perl/mod_perl.h" static mod_perl_perl_dir_config *newPerlConfig(pool *p) { mod_perl_perl_dir_config *cld = (mod_perl_perl_dir_config *) palloc(p, sizeof (mod_perl_perl_dir_config)); cld->obj = Nullsv; cld->pclass = "Slash::Apache::User"; register_cleanup(p, cld, perl_perl_cmd_cleanup, null_cleanup); return cld; } static void *create_dir_config_sv (pool *p, char *dirname) { return newPerlConfig(p); } static void *create_srv_config_sv (pool *p, server_rec *s) { return newPerlConfig(p); } static void stash_mod_pointer (char *class, void *ptr) { SV *sv = newSV(0); sv_setref_pv(sv, NULL, (void*)ptr); hv_store(perl_get_hv("Apache::XS_ModuleConfig",TRUE), class, strlen(class), sv, FALSE); } static mod_perl_cmd_info cmd_info_SlashEnableENV = { "Slash::Apache::User::SlashEnableENV", "", }; static mod_perl_cmd_info cmd_info_SlashAuthAll = { "Slash::Apache::User::SlashAuthAll", "", }; static command_rec mod_cmds[] = { { "SlashEnableENV", perl_cmd_perl_FLAG, (void*)&cmd_info_SlashEnableENV, OR_ALL, FLAG, "Takes a flag that is either on or off (off by default)" }, { "SlashAuthAll", perl_cmd_perl_FLAG, (void*)&cmd_info_SlashAuthAll, OR_ALL, FLAG, "Takes a flag that is either on or off (off by default)" }, { NULL } }; module MODULE_VAR_EXPORT XS_Slash__Apache__User = { STANDARD_MODULE_STUFF, NULL, /* module initializer */ create_dir_config_sv, /* per-directory config creator */ NULL, /* dir config merger */ create_srv_config_sv, /* server config creator */ NULL, /* server config merger */ mod_cmds, /* command table */ NULL, /* [7] list of handlers */ NULL, /* [2] filename-to-URI translation */ NULL, /* [5] check/validate user_id */ NULL, /* [6] check user_id is valid *here* */ NULL, /* [4] check access by host address */ NULL, /* [7] MIME type checker/setter */ NULL, /* [8] fixups */ NULL, /* [10] logger */ NULL, /* [3] header parser */ NULL, /* process initializer */ NULL, /* process exit/cleanup */ NULL, /* [1] post read_request handling */ }; #define this_module "Slash/Apache/User.pm" static void remove_module_cleanup(void *data) { if (find_linked_module("Slash::Apache::User")) { /* need to remove the module so module index is reset */ remove_module(&XS_Slash__Apache__User); } if (data) { /* make sure BOOT section is re-run on restarts */ (void)hv_delete(GvHV(incgv), this_module, strlen(this_module), G_DISCARD); if (dowarn) { /* avoid subroutine redefined warnings */ perl_clear_symtab(gv_stashpv("Slash::Apache::User", FALSE)); } } } #ifndef PERL_UNUSED_VAR # define PERL_UNUSED_VAR(var) if (0) var = var #endif #line 108 "User.c" XS(XS_Slash__Apache__User_END); /* prototype to pass -Wmissing-prototypes */ XS(XS_Slash__Apache__User_END) { #ifdef dVAR dVAR; dXSARGS; #else dXSARGS; #endif if (items != 0) Perl_croak(aTHX_ "Usage: %s(%s)", "Slash::Apache::User::END", ""); PERL_UNUSED_VAR(cv); /* -W */ { #line 109 "User.xs" remove_module_cleanup(NULL); #line 124 "User.c" } XSRETURN_EMPTY; } #ifdef __cplusplus extern "C" #endif XS(boot_Slash__Apache__User); /* prototype to pass -Wmissing-prototypes */ XS(boot_Slash__Apache__User) { #ifdef dVAR dVAR; dXSARGS; #else dXSARGS; #endif char* file = __FILE__; PERL_UNUSED_VAR(cv); /* -W */ PERL_UNUSED_VAR(items); /* -W */ XS_VERSION_BOOTCHECK ; newXS("Slash::Apache::User::END", XS_Slash__Apache__User_END, file); /* Initialisation Section */ #line 99 "User.xs" XS_Slash__Apache__User.name = "Slash::Apache::User"; add_module(&XS_Slash__Apache__User); stash_mod_pointer("Slash::Apache::User", &XS_Slash__Apache__User); register_cleanup(perl_get_startup_pool(), (void *)1, remove_module_cleanup, null_cleanup); #line 157 "User.c" /* End of Initialisation Section */ XSRETURN_YES; }