]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/back-perl/init.c
Add a default case with assert() just in case.
[openldap] / servers / slapd / back-perl / init.c
index 80f366aea31b4f00a9e1ceaa726932447427179c..aafd9fd63959a3cde57a6077557d5e228bbdf68e 100644 (file)
@@ -36,7 +36,7 @@ ldap_pvt_thread_mutex_t       perl_interpreter_mutex;
 int back_perl_LTX_init_module(int argc, char *argv[]) {
     BackendInfo bi;
 
-    memset( &bi, 0, sizeof(bi) );
+    memset( &bi, '\0', sizeof(bi) );
     bi.bi_type = "perl";
     bi.bi_init = perl_back_initialize;
 
@@ -97,12 +97,8 @@ perl_back_initialize(
        bi->bi_extended = 0;
 
        bi->bi_acl_group = 0;
-
-#ifdef HAVE_CYRUS_SASL
-       bi->bi_sasl_authorize = 0;
-       bi->bi_sasl_getsecret = 0;
-       bi->bi_sasl_putsecret = 0;
-#endif /* HAVE_CYRUS_SASL */
+       bi->bi_acl_attribute = 0;
+       bi->bi_chk_referrals = 0;
 
        bi->bi_connection_init = 0;
        bi->bi_connection_destroy = 0;
@@ -125,7 +121,7 @@ perl_back_db_init(
 )
 {
        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 );