git.sur5r.net Git - openldap/blob - servers/slapd/schema_prep.c

   1 /* schema_init.c - init builtin schema */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
   5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   6  */
   7
   8 #include "portable.h"
   9
  10 #include <stdio.h>
  11
  12 #include <ac/ctype.h>
  13 #include <ac/string.h>
  14 #include <ac/socket.h>
  15
  16 #include "slap.h"
  17 #include "ldap_pvt.h"
  18 #include "ldap_pvt_uc.h"
  19
  20 int schema_init_done = 0;
  21
  22 struct slap_internal_schema slap_schema;
  23
  24 #define objectClassIndexer NULL
  25 #define objectClassFilter NULL
  26
  27 static int
  28 objectClassMatch(
  29         int *matchp,
  30         slap_mask_t flags,
  31         Syntax *syntax,
  32         MatchingRule *mr,
  33         struct berval *value,
  34         void *assertedValue )
  35 {
  36         struct berval *a = (struct berval *) assertedValue;
  37         ObjectClass *oc = oc_find( value->bv_val );
  38         ObjectClass *asserted = oc_find( a->bv_val );
  39
  40         if( asserted == NULL ) {
  41                 if( OID_LEADCHAR( *a->bv_val ) ) {
  42                         /* OID form, return FALSE */
  43                         *matchp = 1;
  44                         return LDAP_SUCCESS;
  45                 }
  46
  47                 /* desc form, return undefined */
  48                 return SLAPD_COMPARE_UNDEFINED;
  49         }
  50
  51         if ( oc == NULL ) {
  52                 /* unrecognized stored value */
  53                 return SLAPD_COMPARE_UNDEFINED;
  54         }
  55
  56         if( flags & SLAP_MR_MODIFY_MATCHING ) {
  57                 *matchp = ( asserted != oc );
  58         } else {
  59                 *matchp = !is_object_subclass( asserted, oc );
  60         }
  61
  62 #if 0
  63 #ifdef NEW_LOGGING
  64         LDAP_LOG(( "schema", LDAP_LEVEL_ENTRY,
  65                    "objectClassMatch(%s, %s) = %d\n",
  66                    value->bv_val, a->bv_val, *matchp ));
  67 #else
  68         Debug( LDAP_DEBUG_TRACE, "objectClassMatch(%s,%s) = %d\n",
  69                 value->bv_val, a->bv_val, *matchp );
  70 #endif
  71
  72 #endif
  73
  74         return LDAP_SUCCESS;
  75 }
  76
  77 #define structuralObjectClassIndexer NULL
  78 #define structuralObjectClassFilter NULL
  79
  80 static int
  81 structuralObjectClassMatch(
  82         int *matchp,
  83         slap_mask_t flags,
  84         Syntax *syntax,
  85         MatchingRule *mr,
  86         struct berval *value,
  87         void *assertedValue )
  88 {
  89         struct berval *a = (struct berval *) assertedValue;
  90         ObjectClass *oc = oc_find( value->bv_val );
  91         ObjectClass *asserted = oc_find( a->bv_val );
  92
  93         if( asserted == NULL ) {
  94                 if( OID_LEADCHAR( *a->bv_val ) ) {
  95                         /* OID form, return FALSE */
  96                         *matchp = 1;
  97                         return LDAP_SUCCESS;
  98                 }
  99
 100                 /* desc form, return undefined */
 101                 return SLAPD_COMPARE_UNDEFINED;
 102         }
 103
 104         if ( oc == NULL ) {
 105                 /* unrecognized stored value */
 106                 return SLAPD_COMPARE_UNDEFINED;
 107         }
 108
 109         *matchp = ( asserted != oc );
 110
 111 #if 0
 112 #ifdef NEW_LOGGING
 113         LDAP_LOG(( "schema", LDAP_LEVEL_ENTRY,
 114                    "structuralObjectClassMatch( %s, %s ) = %d\n",
 115                    value->bv_val, a->bv_val, *matchp ));
 116 #else
 117         Debug( LDAP_DEBUG_TRACE, "structuralObjectClassMatch(%s,%s) = %d\n",
 118                 value->bv_val, a->bv_val, *matchp );
 119 #endif
 120
 121 #endif
 122
 123         return LDAP_SUCCESS;
 124 }
 125
 126 struct slap_schema_oc_map {
 127         char *ssom_name;
 128         size_t ssom_offset;
 129 } oc_map[] = {
 130         { "top", offsetof(struct slap_internal_schema, si_oc_top) },
 131         { "extensibleObject", offsetof(struct slap_internal_schema, si_oc_extensibleObject) },
 132         { "alias", offsetof(struct slap_internal_schema, si_oc_alias) },
 133         { "referral", offsetof(struct slap_internal_schema, si_oc_referral) },
 134         { "LDAProotDSE", offsetof(struct slap_internal_schema, si_oc_rootdse) },
 135         { "LDAPsubentry", offsetof(struct slap_internal_schema, si_oc_subentry) },
 136         { "subschema", offsetof(struct slap_internal_schema, si_oc_subschema) },
 137         { NULL, 0 }
 138 };
 139
 140 struct slap_schema_ad_map {
 141         char *ssam_name;
 142         slap_mr_match_func *ssam_match;
 143         slap_mr_indexer_func *ssam_indexer;
 144         slap_mr_filter_func *ssam_filter;
 145         size_t ssam_offset;
 146 } ad_map[] = {
 147         { "objectClass",
 148                 objectClassMatch, objectClassIndexer, objectClassFilter,
 149                 offsetof(struct slap_internal_schema, si_ad_objectClass) },
 150         { "structuralObjectClass",
 151                 structuralObjectClassMatch,
 152                 structuralObjectClassIndexer, structuralObjectClassFilter,
 153                 offsetof(struct slap_internal_schema, si_ad_structuralObjectClass) },
 154
 155         /* user entry operational attributes */
 156         { "creatorsName", NULL, NULL, NULL,
 157                 offsetof(struct slap_internal_schema, si_ad_creatorsName) },
 158         { "createTimestamp", NULL, NULL, NULL,
 159                 offsetof(struct slap_internal_schema, si_ad_createTimestamp) },
 160         { "modifiersName", NULL, NULL, NULL,
 161                 offsetof(struct slap_internal_schema, si_ad_modifiersName) },
 162         { "modifyTimestamp", NULL, NULL, NULL,
 163                 offsetof(struct slap_internal_schema, si_ad_modifyTimestamp) },
 164         { "subschemaSubentry", NULL, NULL, NULL,
 165                 offsetof(struct slap_internal_schema, si_ad_subschemaSubentry) },
 166
 167         /* root DSE attributes */
 168         { "namingContexts", NULL, NULL, NULL,
 169                 offsetof(struct slap_internal_schema, si_ad_namingContexts) },
 170         { "supportedControl", NULL, NULL, NULL,
 171                 offsetof(struct slap_internal_schema, si_ad_supportedControl) },
 172         { "supportedExtension", NULL, NULL, NULL,
 173                 offsetof(struct slap_internal_schema, si_ad_supportedExtension) },
 174         { "supportedLDAPVersion", NULL, NULL, NULL,
 175                 offsetof(struct slap_internal_schema, si_ad_supportedLDAPVersion) },
 176         { "supportedSASLMechanisms", NULL, NULL, NULL,
 177                 offsetof(struct slap_internal_schema, si_ad_supportedSASLMechanisms) },
 178
 179         /* subschema subentry attributes */
 180         { "attributeTypes", NULL, NULL, NULL,
 181                 offsetof(struct slap_internal_schema, si_ad_attributeTypes) },
 182         { "ldapSyntaxes", NULL, NULL, NULL,
 183                 offsetof(struct slap_internal_schema, si_ad_ldapSyntaxes) },
 184         { "matchingRules", NULL, NULL, NULL,
 185                 offsetof(struct slap_internal_schema, si_ad_matchingRules) },
 186         { "objectClasses", NULL, NULL, NULL,
 187                 offsetof(struct slap_internal_schema, si_ad_objectClasses) },
 188
 189         /* knowledge information */
 190         { "aliasedObjectName", NULL, NULL, NULL,
 191                 offsetof(struct slap_internal_schema, si_ad_aliasedObjectName) },
 192         { "ref", NULL, NULL, NULL,
 193                 offsetof(struct slap_internal_schema, si_ad_ref) },
 194
 195         /* access control internals */
 196         { "entry", NULL, NULL, NULL,
 197                 offsetof(struct slap_internal_schema, si_ad_entry) },
 198         { "children", NULL, NULL, NULL,
 199                 offsetof(struct slap_internal_schema, si_ad_children) },
 200 #ifdef SLAPD_ACI_ENABLED
 201         { "OpenLDAPaci", NULL, NULL, NULL,
 202                 offsetof(struct slap_internal_schema, si_ad_aci) },
 203 #endif
 204
 205         { "userPassword", NULL, NULL, NULL,
 206                 offsetof(struct slap_internal_schema, si_ad_userPassword) },
 207         { "authPassword", NULL, NULL, NULL,
 208                 offsetof(struct slap_internal_schema, si_ad_authPassword) },
 209 #ifdef LDAP_API_FEATURE_X_OPENLDAP_V2_KBIND
 210         { "krbName", NULL, NULL, NULL,
 211                 offsetof(struct slap_internal_schema, si_ad_krbName) },
 212 #endif
 213
 214         { NULL, NULL, NULL, NULL, 0 }
 215 };
 216
 217 static AttributeType slap_at_undefined = {
 218         "UNDEFINED", /* cname */
 219         { "1.1.1", NULL, NULL, 1, NULL,
 220                 NULL, NULL, NULL, NULL,
 221                 0, 0, 0, 1, 3 },
 222         NULL, /* sup */
 223         NULL, /* subtypes */
 224         NULL, NULL, NULL, NULL, /* matching rules */
 225         NULL, /* syntax (this may need to be defined) */
 226         NULL  /* next */
 227 };
 228
 229 int
 230 schema_prep( void )
 231 {
 232         int i;
 233         /* we should only be called once after schema_init() was called */
 234         assert( schema_init_done == 1 );
 235
 236         for( i=0; oc_map[i].ssom_name; i++ ) {
 237                 ObjectClass ** ocp = (ObjectClass **)
 238                         &(((char *) &slap_schema)[oc_map[i].ssom_offset]);
 239
 240                 *ocp = oc_find( oc_map[i].ssom_name );
 241
 242                 if( *ocp == NULL ) {
 243                         fprintf( stderr,
 244                                 "No objectClass \"%s\" defined in schema\n",
 245                                 oc_map[i].ssom_name );
 246                         return LDAP_OBJECT_CLASS_VIOLATION;
 247                 }
 248         }
 249
 250         for( i=0; ad_map[i].ssam_name; i++ ) {
 251                 int rc;
 252                 const char *text;
 253
 254                 AttributeDescription ** adp = (AttributeDescription **)
 255                         &(((char *) &slap_schema)[ad_map[i].ssam_offset]);
 256
 257                 *adp = NULL;
 258
 259                 rc = slap_str2ad( ad_map[i].ssam_name, adp, &text );
 260
 261                 if( rc != LDAP_SUCCESS ) {
 262                         fprintf( stderr,
 263                                 "No attribute \"%s\" defined in schema\n",
 264                                 ad_map[i].ssam_name );
 265                         return rc;
 266                 }
 267
 268                 if( ad_map[i].ssam_match ) {
 269                         /* install custom matching routine */
 270                         (*adp)->ad_type->sat_equality->smr_match = ad_map[i].ssam_match;
 271                 }
 272         }
 273
 274         slap_at_undefined.sat_syntax = syn_find( SLAPD_OCTETSTRING_SYNTAX );
 275         if( slap_at_undefined.sat_syntax == NULL ) {
 276                 fprintf( stderr,
 277                         "No octetString syntax \"" SLAPD_OCTETSTRING_SYNTAX "\"\n" );
 278                 return LDAP_INVALID_SYNTAX;
 279         }
 280         slap_schema.si_at_undefined = &slap_at_undefined;
 281
 282         ++schema_init_done;
 283         return LDAP_SUCCESS;
 284 }