#include <ac/socket.h>
*/
+
+
#include <EXTERN.h>
#include <perl.h>
-
#include "slap.h"
#include "perl_back.h"
+
PerlInterpreter *perl_interpreter = NULL;
ldap_pvt_thread_mutex_t perl_interpreter_mutex;
+#ifdef SLAPD_PERL_DYNAMIC
+#include <gmodule.h>
+
+G_MODULE_EXPORT void init_module(int argc, char *argv[]) {
+ BackendInfo bi;
+
+ memset( &bi, 0, sizeof(bi) );
+ bi.bi_type = "perl";
+ bi.bi_init = perl_back_initialize;
+
+ backend_add(&bi);
+}
+
+#endif /* SLAPD_PERL_DYNAMIC */
+
/**********************************************************
*
bi->bi_op_delete = perl_back_delete;
bi->bi_op_abandon = 0;
-#ifdef SLAPD_ACLGROUPS
bi->bi_acl_group = 0;
-#endif
+
+ bi->bi_connection_init = 0;
+ bi->bi_connection_destroy = 0;
return 0;
}
)
{
be->be_private = (PerlBackend *) ch_malloc( sizeof(PerlBackend) );
- memset(&be->be_private, 0, sizeof(PerlBackend));
+ memset( be->be_private, 0, sizeof(PerlBackend));
Debug( LDAP_DEBUG_TRACE, "perl backend db init\n", 0, 0, 0 );