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         { "supportedFeatures", NULL, NULL, NULL,
 179                 offsetof(struct slap_internal_schema, si_ad_supportedFeatures) },
 180
 181         /* subschema subentry attributes */
 182         { "attributeTypes", NULL, NULL, NULL,
 183                 offsetof(struct slap_internal_schema, si_ad_attributeTypes) },
 184         { "ldapSyntaxes", NULL, NULL, NULL,
 185                 offsetof(struct slap_internal_schema, si_ad_ldapSyntaxes) },
 186         { "matchingRules", NULL, NULL, NULL,
 187                 offsetof(struct slap_internal_schema, si_ad_matchingRules) },
 188         { "objectClasses", NULL, NULL, NULL,
 189                 offsetof(struct slap_internal_schema, si_ad_objectClasses) },
 190
 191         /* knowledge information */
 192         { "aliasedObjectName", NULL, NULL, NULL,
 193                 offsetof(struct slap_internal_schema, si_ad_aliasedObjectName) },
 194         { "ref", NULL, NULL, NULL,
 195                 offsetof(struct slap_internal_schema, si_ad_ref) },
 196
 197         /* access control internals */
 198         { "entry", NULL, NULL, NULL,
 199                 offsetof(struct slap_internal_schema, si_ad_entry) },
 200         { "children", NULL, NULL, NULL,
 201                 offsetof(struct slap_internal_schema, si_ad_children) },
 202 #ifdef SLAPD_ACI_ENABLED
 203         { "OpenLDAPaci", NULL, NULL, NULL,
 204                 offsetof(struct slap_internal_schema, si_ad_aci) },
 205 #endif
 206
 207         { "userPassword", NULL, NULL, NULL,
 208                 offsetof(struct slap_internal_schema, si_ad_userPassword) },
 209         { "authPassword", NULL, NULL, NULL,
 210                 offsetof(struct slap_internal_schema, si_ad_authPassword) },
 211 #ifdef LDAP_API_FEATURE_X_OPENLDAP_V2_KBIND
 212         { "krbName", NULL, NULL, NULL,
 213                 offsetof(struct slap_internal_schema, si_ad_krbName) },
 214 #endif
 215
 216         { NULL, NULL, NULL, NULL, 0 }
 217 };
 218
 219 static AttributeType slap_at_undefined = {
 220         "UNDEFINED", /* cname */
 221         { "1.1.1", NULL, NULL, 1, NULL,
 222                 NULL, NULL, NULL, NULL,
 223                 0, 0, 0, 1, 3 },
 224         NULL, /* sup */
 225         NULL, /* subtypes */
 226         NULL, NULL, NULL, NULL, /* matching rules */
 227         NULL, /* syntax (this may need to be defined) */
 228         NULL  /* next */
 229 };
 230
 231 struct slap_schema_mr_map {
 232         char *ssmm_name;
 233         size_t ssmm_offset;
 234 } mr_map[] = {
 235         { "distinguishedNameMatch",
 236                 offsetof(struct slap_internal_schema, si_mr_distinguishedNameMatch) },
 237         { "integerMatch",
 238                 offsetof(struct slap_internal_schema, si_mr_integerMatch) },
 239         { NULL, 0 }
 240 };
 241
 242 struct slap_schema_syn_map {
 243         char *sssm_name;
 244         size_t sssm_offset;
 245 } syn_map[] = {
 246         { "1.3.6.1.4.1.1466.115.121.1.12",
 247                 offsetof(struct slap_internal_schema, si_syn_distinguishedName) },
 248         { "1.3.6.1.4.1.1466.115.121.1.27",
 249                 offsetof(struct slap_internal_schema, si_syn_integer) },
 250         { NULL, 0 }
 251 };
 252
 253 int
 254 schema_prep( void )
 255 {
 256         int i;
 257         /* we should only be called once after schema_init() was called */
 258         assert( schema_init_done == 1 );
 259
 260         for( i=0; oc_map[i].ssom_name; i++ ) {
 261                 ObjectClass ** ocp = (ObjectClass **)
 262                         &(((char *) &slap_schema)[oc_map[i].ssom_offset]);
 263
 264                 *ocp = oc_find( oc_map[i].ssom_name );
 265
 266                 if( *ocp == NULL ) {
 267                         fprintf( stderr,
 268                                 "No objectClass \"%s\" defined in schema\n",
 269                                 oc_map[i].ssom_name );
 270                         return LDAP_OBJECT_CLASS_VIOLATION;
 271                 }
 272         }
 273
 274         for( i=0; ad_map[i].ssam_name; i++ ) {
 275                 int rc;
 276                 const char *text;
 277
 278                 AttributeDescription ** adp = (AttributeDescription **)
 279                         &(((char *) &slap_schema)[ad_map[i].ssam_offset]);
 280
 281                 *adp = NULL;
 282
 283                 rc = slap_str2ad( ad_map[i].ssam_name, adp, &text );
 284
 285                 if( rc != LDAP_SUCCESS ) {
 286                         fprintf( stderr,
 287                                 "No attribute \"%s\" defined in schema\n",
 288                                 ad_map[i].ssam_name );
 289                         return rc;
 290                 }
 291
 292                 if( ad_map[i].ssam_match ) {
 293                         /* install custom matching routine */
 294                         (*adp)->ad_type->sat_equality->smr_match = ad_map[i].ssam_match;
 295                 }
 296         }
 297
 298         slap_at_undefined.sat_syntax = syn_find( SLAPD_OCTETSTRING_SYNTAX );
 299         if( slap_at_undefined.sat_syntax == NULL ) {
 300                 fprintf( stderr,
 301                         "No octetString syntax \"" SLAPD_OCTETSTRING_SYNTAX "\"\n" );
 302                 return LDAP_INVALID_SYNTAX;
 303         }
 304         slap_schema.si_at_undefined = &slap_at_undefined;
 305
 306         for( i=0; mr_map[i].ssmm_name; i++ ) {
 307                 MatchingRule ** mrp = (MatchingRule **)
 308                         &(((char *) &slap_schema)[mr_map[i].ssmm_offset]);
 309
 310                 *mrp = mr_find( mr_map[i].ssmm_name );
 311
 312                 if( *mrp == NULL ) {
 313                         fprintf( stderr,
 314                                 "No matching rule \"%s\" defined in schema\n",
 315                                 mr_map[i].ssmm_name );
 316                         return LDAP_INAPPROPRIATE_MATCHING;
 317                 }
 318         }
 319
 320         for( i=0; syn_map[i].sssm_name; i++ ) {
 321                 Syntax ** synp = (Syntax **)
 322                         &(((char *) &slap_schema)[syn_map[i].sssm_offset]);
 323
 324                 *synp = syn_find( syn_map[i].sssm_name );
 325
 326                 if( *synp == NULL ) {
 327                         fprintf( stderr,
 328                                 "No syntax \"%s\" defined in schema\n",
 329                                 syn_map[i].sssm_name );
 330                         return LDAP_INVALID_SYNTAX;
 331                 }
 332         }
 333
 334         ++schema_init_done;
 335         return LDAP_SUCCESS;
 336 }