More system schema checks

[openldap] / servers / slapd / schema.c

diff --git a/servers/slapd/schema.c b/servers/slapd/schema.c
index 3318ee1aa9a829a322eca67a1180d003e5e0c9aa..469de9a2b44f2ae6967dad2c94339fd5d069ef1b 100644 (file)
--- a/servers/slapd/schema.c
+++ b/servers/slapd/schema.c
@@ -1,7 +1,7 @@
 /* schema.c - routines to manage schema definitions */
 /* $OpenLDAP$ */
 /*
- * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 
@@ -19,36 +19,71 @@
 
 #if defined( SLAPD_SCHEMA_DN )
 
-void
-schema_info( Connection *conn, Operation *op, char **attrs, int attrsonly )
+int
+schema_info( Entry **entry, const char **text )
 {
+       AttributeDescription *ad_structuralObjectClass
+               = slap_schema.si_ad_structuralObjectClass;
+       AttributeDescription *ad_objectClass
+               = slap_schema.si_ad_objectClass;
+
        Entry           *e;
-       struct berval   val;
-       struct berval   *vals[2];
+       struct berval   vals[2];
 
-       vals[0] = &val;
-       vals[1] = NULL;
+       vals[1].bv_val = NULL;
 
        e = (Entry *) ch_calloc( 1, sizeof(Entry) );
 
        e->e_attrs = NULL;
-       e->e_dn = ch_strdup( SLAPD_SCHEMA_DN );
-       e->e_ndn = ch_strdup( SLAPD_SCHEMA_DN );
-       (void) dn_normalize( e->e_ndn );
+       ber_str2bv( SLAPD_SCHEMA_DN, sizeof(SLAPD_SCHEMA_DN)-1, 1, &e->e_name);
+       (void) dnNormalize2( NULL, &e->e_name, &e->e_nname );
        e->e_private = NULL;
 
+       vals[0].bv_val = "subentry";
+       vals[0].bv_len = sizeof("subentry")-1;
+       attr_merge( e, ad_structuralObjectClass, vals );
+
+       vals[0].bv_val = "top";
+       vals[0].bv_len = sizeof("top")-1;
+       attr_merge( e, ad_objectClass, vals );
+
+       vals[0].bv_val = "subentry";
+       vals[0].bv_len = sizeof("subentry")-1;
+       attr_merge( e, ad_objectClass, vals );
+
+       vals[0].bv_val = "subschema";
+       vals[0].bv_len = sizeof("subschema")-1;
+       attr_merge( e, ad_objectClass, vals );
+
+       vals[0].bv_val = "extensibleObject";
+       vals[0].bv_len = sizeof("extensibleObject")-1;
+       attr_merge( e, ad_objectClass, vals );
+
        {
-               char *rdn = ch_strdup( SLAPD_SCHEMA_DN );
-               val.bv_val = strchr( rdn, '=' );
+               int rc;
+               AttributeDescription *desc = NULL;
+               struct berval rdn = { sizeof(SLAPD_SCHEMA_DN)-1,
+                       SLAPD_SCHEMA_DN };
+               vals[0].bv_val = strchr( rdn.bv_val, '=' );
+
+               if( vals[0].bv_val == NULL ) {
+                       *text = "improperly configured subschema subentry";
+                       return LDAP_OTHER;
+               }
 
-               if( val.bv_val != NULL ) {
-                       *val.bv_val = '\0';
-                       val.bv_len = strlen( ++val.bv_val );
+               vals[0].bv_val++;
+               vals[0].bv_len = rdn.bv_len - (vals[0].bv_val - rdn.bv_val);
+               rdn.bv_len -= vals[0].bv_len + 1;
 
-                       attr_merge( e, rdn, vals );
+               rc = slap_bv2ad( &rdn, &desc, text );
+
+               if( rc != LDAP_SUCCESS ) {
+                       entry_free( e );
+                       *text = "improperly configured subschema subentry";
+                       return LDAP_OTHER;
                }
 
-               free( rdn );
+               attr_merge( e, desc, vals );
        }
 
        if ( syn_schema_info( e ) 
@@ -58,33 +93,11 @@ schema_info( Connection *conn, Operation *op, char **attrs, int attrsonly )
        {
                /* Out of memory, do something about it */
                entry_free( e );
-               send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR,
-                       NULL, NULL, NULL, NULL );
-               return;
+               *text = "out of memory";
+               return LDAP_OTHER;
        }
        
-       val.bv_val = "top";
-       val.bv_len = sizeof("top")-1;
-       attr_merge( e, "objectClass", vals );
-
-       val.bv_val = "LDAPsubentry";
-       val.bv_len = sizeof("LDAPsubentry")-1;
-       attr_merge( e, "objectClass", vals );
-
-       val.bv_val = "subschema";
-       val.bv_len = sizeof("subschema")-1;
-       attr_merge( e, "objectClass", vals );
-
-       val.bv_val = "extensibleObject";
-       val.bv_len = sizeof("extensibleObject")-1;
-       attr_merge( e, "objectClass", vals );
-
-       send_search_entry( &backends[0], conn, op,
-               e, attrs, attrsonly, NULL );
-       send_search_result( conn, op, LDAP_SUCCESS,
-               NULL, NULL, NULL, NULL, 1 );
-
-       entry_free( e );
+       *entry = e;
+       return LDAP_SUCCESS;
 }
 #endif
-