]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/schemaparse.c
Bug fix for new sockbuf code under NT. Added mutex protection against
[openldap] / servers / slapd / schemaparse.c
index f624b5dce81f7168727767ea399266d8fd9b8066..99eaa3a5e18ce08ff8067a6249696871f927c924 100644 (file)
@@ -1,6 +1,7 @@
 /* schemaparse.c - routines to parse config file objectclass definitions */
+/* $OpenLDAP$ */
 /*
- * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 
 
 int    global_schemacheck = 1; /* schemacheck on is default */
 
+#ifndef SLAPD_SCHEMA_NOT_COMPAT
 static void            oc_usage_old(void) LDAP_GCCATTR((noreturn));
+#endif
 static void            oc_usage(void)     LDAP_GCCATTR((noreturn));
 static void            at_usage(void)     LDAP_GCCATTR((noreturn));
 
 static char *const err2text[] = {
        "",
        "Out of memory",
-       "Objectclass not found",
-       "Attribute type not found",
-       "Duplicate objectclass",
-       "Duplicate attributetype",
-       "Duplicate syntax",
-       "Duplicate matchingrule",
+       "ObjectClass not found",
+       "AttributeType not found",
+       "Duplicate objectClass",
+       "Duplicate attributeType",
+       "Duplicate ldapSyntax",
+       "Duplicate matchingRule",
        "OID or name required",
-       "Syntax or superior required",
-       "Matchingrule not found",
+       "SYNTAX or SUPerior required",
+       "MatchingRule not found",
        "Syntax not found",
        "Syntax required"
 };
@@ -47,6 +50,7 @@ scherr2str(int code)
        }
 }
 
+#ifndef SLAPD_SCHEMA_NOT_COMPAT
 void
 parse_oc_old(
     Backend    *be,
@@ -67,7 +71,12 @@ parse_oc_old(
        oc->oc_names = ch_calloc( 2, sizeof(char *) );
        oc->oc_names[0] = ch_strdup( argv[1] );
        oc->oc_names[1] = NULL;
+
        if ( strcasecmp( oc->oc_names[0], "top" ) ) {
+               /*
+                * no way to distinguish "auxiliary" from "structural"
+                * This may lead to future problems.
+                */
                oc->oc_kind = LDAP_SCHEMA_STRUCTURAL;
        }
        for ( i = 2; i < argc; i++ ) {
@@ -111,38 +120,35 @@ parse_oc_old(
         * out of thin air.
         */
        if ( oc->oc_at_oids_must ) {
-               namep = oc->oc_at_oids_must;
-               while ( *namep ) {
+               for( namep = oc->oc_at_oids_must; *namep ; namep++ ) {
                        code = at_fake_if_needed( *namep );
                        if ( code ) {
-                               fprintf( stderr, "%s: line %d: %s %s\n",
+                               fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
                                         fname, lineno, scherr2str(code), *namep);
                                exit( EXIT_FAILURE );
                        }
-                       namep++;
                }
        }
        if ( oc->oc_at_oids_may ) {
-               namep = oc->oc_at_oids_may;
-               while ( *namep ) {
+               for( namep = oc->oc_at_oids_may; *namep; namep++ ) {
                        code = at_fake_if_needed( *namep );
                        if ( code ) {
-                               fprintf( stderr, "%s: line %d: %s %s\n",
+                               fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
                                         fname, lineno, scherr2str(code), *namep);
                                exit( EXIT_FAILURE );
                        }
-                       namep++;
                }
        }
        
        code = oc_add(oc,&err);
        if ( code ) {
-               fprintf( stderr, "%s: line %d: %s %s\n",
+               fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
                         fname, lineno, scherr2str(code), err);
                exit( EXIT_FAILURE );
        }
        ldap_memfree(oc);
 }
+#endif
 
 /* OID Macros */
 
@@ -172,31 +178,38 @@ static char *
 find_oidm(char *oid)
 {
        OidMacro *om;
-       char *new;
-       int pos, suflen;
 
        /* OID macros must start alpha */
-       if ( !isdigit( *oid ) )
-       {
-           for (om = om_list; om; om=om->next)
-           {
-               if ((pos = dscompare(om->name, oid, ':')))
-               {
-                       suflen = strlen(oid + pos);
-                       new = ch_calloc(1, om->oidlen + suflen + 1);
-                       strcpy(new, om->oid);
-                       if (suflen)
-                       {
-                               suflen = om->oidlen;
-                               new[suflen++] = '.';
-                               strcpy(new+suflen, oid+pos+1);
+       if ( isdigit( *oid ) )  {
+               return oid;
+       }
+
+    for (om = om_list; om; om=om->som_next) {
+               char **names = om->som_names;
+
+               if( names == NULL ) {
+                       continue;
+               }
+
+               for( ; *names != NULL ; names++ ) {
+                       int pos = dscompare(*names, oid, ':');
+
+                       if( pos ) {
+                               int suflen = strlen(oid + pos);
+                               char *new = ch_calloc(1,
+                                       om->som_oid.bv_len + suflen + 1);
+                               strcpy(new, om->som_oid.bv_val);
+
+                               if( suflen ) {
+                                       suflen = om->som_oid.bv_len;
+                                       new[suflen++] = '.';
+                                       strcpy(new+suflen, oid+pos+1);
+                               }
+                               return new;
                        }
-                       return new;
                }
-           }
-           return NULL;
        }
-       return oid;
+       return NULL;
 }
 
 void
@@ -207,26 +220,43 @@ parse_oidm(
     char       **argv
 )
 {
+       char *oid;
        OidMacro *om;
 
-       if (argc != 3)
-       {
-usage:         fprintf( stderr, "ObjectIdentifier <name> <oid>\n");
+       if (argc != 3) {
+               fprintf( stderr, "%s: line %d: too many arguments\n",
+                       fname, lineno );
+usage: fprintf( stderr, "\tObjectIdentifier <name> <oid>\n");
+               exit( EXIT_FAILURE );
+       }
+
+       oid = find_oidm( argv[1] );
+       if( oid != NULL ) {
+               fprintf( stderr,
+                       "%s: line %d: "
+                       "ObjectIdentifier \"%s\" previously defined \"%s\"",
+                       fname, lineno, argv[1], oid );
                exit( EXIT_FAILURE );
        }
+
        om = (OidMacro *) ch_malloc( sizeof(OidMacro) );
-       om->name = ch_strdup( argv[1] );
-       om->oid = find_oidm( argv[2] );
-       if (!om->oid)
-       {
+
+       om->som_names = NULL;
+       charray_add( &om->som_names, argv[1] );
+       om->som_oid.bv_val = find_oidm( argv[2] );
+
+       if (!om->som_oid.bv_val) {
                fprintf( stderr, "%s: line %d: OID %s not recognized\n",
                        fname, lineno, argv[2] );
                goto usage;
        }
-       if (om->oid == argv[2])
-               om->oid = ch_strdup( argv[2] );
-       om->oidlen = strlen( om->oid );
-       om->next = om_list;
+
+       if (om->som_oid.bv_val == argv[2]) {
+               om->som_oid.bv_val = ch_strdup( argv[2] );
+       }
+
+       om->som_oid.bv_len = strlen( om->som_oid.bv_val );
+       om->som_next = om_list;
        om_list = om;
 }
 
@@ -243,39 +273,32 @@ parse_oc(
        const char      *err;
        char            *oid = NULL;
 
-       /* Kludge for OIDmacros. If the numericOid field starts nonnumeric
-        * look for and expand a macro. The macro's place in the input line
-        * will be replaced with a field of '0's to keep ldap_str2objectclass
-        * happy. The actual oid will be swapped into place afterward.
-        */
-       if ( !isdigit( *argv[2] ))
-       {
-               oid = find_oidm(argv[2]);
-               if (!oid)
-               {
-                       fprintf(stderr, "%s: line %d: OID %s not recognized\n",
-                               fname, lineno, argv[2]);
-                       exit( EXIT_FAILURE );
-               }
-               if (oid != argv[2])
-                       memset(strstr(line, argv[2]), '0', strlen(argv[2]));
-               else
-                       oid = NULL;
-       }
-       oc = ldap_str2objectclass(line,&code,&err);
+       oc = ldap_str2objectclass(line,&code,&err,LDAP_SCHEMA_ALLOW_ALL);
        if ( !oc ) {
                fprintf( stderr, "%s: line %d: %s before %s\n",
                         fname, lineno, ldap_scherr2str(code), err );
                oc_usage();
        }
-       if (oid)
-       {
-               ldap_memfree(oc->oc_oid);
-               oc->oc_oid = oid;
+       if ( oc->oc_oid ) {
+               if ( !isdigit( oc->oc_oid[0] )) {
+                       /* Expand OID macros */
+                       oid = find_oidm( oc->oc_oid );
+                       if ( !oid ) {
+                               fprintf(stderr,
+                                       "%s: line %d: OID %s not recognized\n",
+                                       fname, lineno, oc->oc_oid);
+                               exit( EXIT_FAILURE );
+                       }
+                       if ( oid != oc->oc_oid ) {
+                               ldap_memfree( oc->oc_oid );
+                               oc->oc_oid = oid;
+                       }
+               }
        }
+       /* oc->oc_oid == NULL will be an error someday */
        code = oc_add(oc,&err);
        if ( code ) {
-               fprintf( stderr, "%s: line %d: %s %s\n",
+               fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
                         fname, lineno, scherr2str(code), err);
                exit( EXIT_FAILURE );
        }
@@ -299,6 +322,7 @@ oc_usage( void )
        exit( EXIT_FAILURE );
 }
 
+#ifndef SLAPD_SCHEMA_NOT_COMPAT
 static void
 oc_usage_old( void )
 {
@@ -307,6 +331,7 @@ oc_usage_old( void )
        fprintf( stderr, "                [ allows <attrlist> ]\n" );
        exit( EXIT_FAILURE );
 }
+#endif
 
 static void
 at_usage( void )
@@ -348,25 +373,12 @@ parse_at(
        char            *oid = NULL;
        char            *soid = NULL;
 
-       /* Kludge for OIDmacros. If the numericOid field starts nonnumeric
-        * look for and expand a macro. The macro's place in the input line
-        * will be replaced with a field of '0's to keep ldap_str2attr
-        * happy. The actual oid will be swapped into place afterward.
-        */
-       if ( !isdigit( *argv[2] ))
-       {
-               oid = find_oidm(argv[2]);
-               if (!oid)
-               {
-                       fprintf(stderr, "%s: line %d: OID %s not recognized\n",
-                               fname, lineno, argv[2]);
-                       exit( EXIT_FAILURE );
-               }
-               if (oid != argv[2])
-                       memset(strstr(line, argv[2]), '0', strlen(argv[2]));
-               else
-                       oid = NULL;
-       }
+       /* Kludge for OIDmacros for syntaxes. If the syntax field starts
+        * nonnumeric, look for and expand a macro. The macro's place in
+        * the input line will be replaced with a field of '0's to keep
+        * ldap_str2attributetype happy. The actual oid will be swapped
+        * into place afterwards.
+        */
        for (; argv[3]; argv++)
        {
                if (!strcasecmp(argv[3], "syntax") &&
@@ -386,17 +398,29 @@ parse_at(
                        break;
                }
        }
-       at = ldap_str2attributetype(line,&code,&err);
+       at = ldap_str2attributetype(line,&code,&err,LDAP_SCHEMA_ALLOW_ALL);
        if ( !at ) {
                fprintf( stderr, "%s: line %d: %s before %s\n",
                         fname, lineno, ldap_scherr2str(code), err );
                at_usage();
        }
-       if (oid)
-       {
-               ldap_memfree(at->at_oid);
-               at->at_oid = oid;
+       if ( at->at_oid ) {
+               if ( !isdigit( at->at_oid[0] )) {
+                       /* Expand OID macros */
+                       oid = find_oidm( at->at_oid );
+                       if ( !oid ) {
+                               fprintf(stderr,
+                                       "%s: line %d: OID %s not recognized\n",
+                                       fname, lineno, at->at_oid);
+                               exit( EXIT_FAILURE );
+                       }
+                       if ( oid != at->at_oid ) {
+                               ldap_memfree( at->at_oid );
+                               at->at_oid = oid;
+                       }
+               }
        }
+       /* at->at_oid == NULL will be an error someday */
        if (soid)
        {
                ldap_memfree(at->at_syntax_oid);
@@ -404,7 +428,7 @@ parse_at(
        }
        code = at_add(at,&err);
        if ( code ) {
-               fprintf( stderr, "%s: line %d: %s %s\n",
+               fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
                         fname, lineno, scherr2str(code), err);
                exit( EXIT_FAILURE );
        }