openldap/servers/slapd/schemaparse.c

284 lines
6.5 KiB
C
Raw Normal View History

1998-08-09 08:43:13 +08:00
/* schemaparse.c - routines to parse config file objectclass definitions */
/* $OpenLDAP$ */
1999-08-07 07:07:46 +08:00
/*
2003-01-04 04:20:47 +08:00
* Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
1999-08-07 07:07:46 +08:00
* COPYING RESTRICTIONS APPLY, see COPYRIGHT file
*/
1998-08-09 08:43:13 +08:00
1998-10-25 09:41:42 +08:00
#include "portable.h"
1998-08-09 08:43:13 +08:00
#include <stdio.h>
1998-10-25 09:41:42 +08:00
#include <ac/ctype.h>
1998-10-25 09:41:42 +08:00
#include <ac/string.h>
#include <ac/socket.h>
1998-08-09 08:43:13 +08:00
#include "slap.h"
1999-05-28 22:27:07 +08:00
#include "ldap_schema.h"
1998-08-09 08:43:13 +08:00
int global_schemacheck = 1; /* schemacheck ON is default */
1998-08-09 08:43:13 +08:00
static void oc_usage(void);
static void at_usage(void);
1998-08-09 08:43:13 +08:00
static char *const err2text[] = {
"Success",
1999-05-28 22:27:07 +08:00
"Out of memory",
2000-05-28 03:21:28 +08:00
"ObjectClass not found",
2002-07-27 14:08:51 +08:00
"user-defined ObjectClass includes operational attributes",
"user-defined ObjectClass has inappropriate SUPerior",
"Duplicate objectClass",
2000-05-28 03:21:28 +08:00
"AttributeType not found",
"AttributeType inappropriate matching rule",
"AttributeType inappropriate USAGE",
"AttributeType inappropriate SUPerior",
"AttributeType SYNTAX or SUPerior required",
2000-05-28 03:21:28 +08:00
"Duplicate attributeType",
"MatchingRule not found",
"MatchingRule incomplete",
"Duplicate matchingRule",
1999-06-15 20:28:54 +08:00
"Syntax not found",
"Duplicate ldapSyntax",
"OID or name required",
2001-06-08 06:47:02 +08:00
"Qualifier not supported",
"Invalid NAME",
"OID could not be expanded",
"Duplicate Content Rule",
"Content Rule not for STRUCTURAL object class",
"Content Rule AUX contains non-AUXILIARY object class"
"Content Rule attribute type list contains duplicate"
1999-05-28 22:27:07 +08:00
};
char *
scherr2str(int code)
{
2002-06-21 04:48:19 +08:00
if ( code < 0 || SLAP_SCHERR_LAST <= code ) {
return "Unknown error";
1999-05-28 22:27:07 +08:00
} else {
return err2text[code];
}
}
2001-06-08 06:47:02 +08:00
/* check schema descr validity */
int slap_valid_descr( const char *descr )
{
int i=0;
if( !DESC_LEADCHAR( descr[i] ) ) {
return 0;
}
while( descr[++i] ) {
if( !DESC_CHAR( descr[i] ) ) {
return 0;
}
}
return 1;
}
1999-05-28 22:27:07 +08:00
/* OID Macros */
/* String compare with delimiter check. Return 0 if not
* matched, otherwise return length matched.
*/
int
1999-08-21 03:00:44 +08:00
dscompare(const char *s1, const char *s2, char delim)
{
1999-08-21 03:00:44 +08:00
const char *orig = s1;
while (*s1++ == *s2++)
if (!s1[-1]) break;
--s1;
--s2;
if (!*s1 && (!*s2 || *s2 == delim))
return s1 - orig;
return 0;
}
#ifdef SLAP_EXTENDED_SCHEMA
static void
cr_usage( void )
{
fprintf( stderr,
"DITContentRuleDescription = \"(\" whsp\n"
" numericoid whsp ; StructuralObjectClass identifier\n"
" [ \"NAME\" qdescrs ]\n"
" [ \"DESC\" qdstring ]\n"
" [ \"OBSOLETE\" whsp ]\n"
" [ \"AUX\" oids ] ; Auxiliary ObjectClasses\n"
" [ \"MUST\" oids ] ; AttributeTypes\n"
" [ \"MAY\" oids ] ; AttributeTypes\n"
" [ \"NOT\" oids ] ; AttributeTypes\n"
" whsp \")\"\n" );
}
int
parse_cr(
const char *fname,
int lineno,
char *line,
char **argv
)
{
LDAPContentRule *cr;
int code;
const char *err;
cr = ldap_str2contentrule(line, &code, &err, LDAP_SCHEMA_ALLOW_ALL );
if ( !cr ) {
fprintf( stderr, "%s: line %d: %s before %s\n",
fname, lineno, ldap_scherr2str(code), err );
cr_usage();
return 1;
}
if ( cr->cr_oid == NULL ) {
fprintf( stderr,
"%s: line %d: Content rule has no OID\n",
fname, lineno );
cr_usage();
return 1;
}
code = cr_add(cr,1,&err);
if ( code ) {
fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
fname, lineno, scherr2str(code), err);
return 1;
}
ldap_memfree(cr);
return 0;
}
#endif
int
1999-05-28 22:27:07 +08:00
parse_oc(
1999-08-21 03:00:44 +08:00
const char *fname,
1999-05-28 22:27:07 +08:00
int lineno,
char *line,
char **argv
1999-05-28 22:27:07 +08:00
)
{
LDAPObjectClass *oc;
1999-05-28 22:27:07 +08:00
int code;
const char *err;
1999-05-28 22:27:07 +08:00
oc = ldap_str2objectclass(line, &code, &err, LDAP_SCHEMA_ALLOW_ALL );
1999-05-28 22:27:07 +08:00
if ( !oc ) {
fprintf( stderr, "%s: line %d: %s before %s\n",
fname, lineno, ldap_scherr2str(code), err );
oc_usage();
return 1;
1999-05-28 22:27:07 +08:00
}
2001-10-11 02:15:30 +08:00
if ( oc->oc_oid == NULL ) {
fprintf( stderr,
"%s: line %d: objectclass has no OID\n",
fname, lineno );
oc_usage();
return 1;
}
code = oc_add(oc,1,&err);
1999-05-28 22:27:07 +08:00
if ( code ) {
2000-05-28 03:21:28 +08:00
fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
1999-05-28 22:27:07 +08:00
fname, lineno, scherr2str(code), err);
return 1;
1999-05-28 22:27:07 +08:00
}
1999-05-28 22:27:07 +08:00
ldap_memfree(oc);
return 0;
1998-08-09 08:43:13 +08:00
}
static void
oc_usage( void )
1999-05-28 22:27:07 +08:00
{
fprintf( stderr,
"ObjectClassDescription = \"(\" whsp\n"
" numericoid whsp ; ObjectClass identifier\n"
" [ \"NAME\" qdescrs ]\n"
" [ \"DESC\" qdstring ]\n"
" [ \"OBSOLETE\" whsp ]\n"
" [ \"SUP\" oids ] ; Superior ObjectClasses\n"
" [ ( \"ABSTRACT\" / \"STRUCTURAL\" / \"AUXILIARY\" ) whsp ]\n"
" ; default structural\n"
" [ \"MUST\" oids ] ; AttributeTypes\n"
" [ \"MAY\" oids ] ; AttributeTypes\n"
" whsp \")\"\n" );
1999-05-28 22:27:07 +08:00
}
static void
at_usage( void )
{
fprintf( stderr, "%s%s%s",
"AttributeTypeDescription = \"(\" whsp\n"
" numericoid whsp ; AttributeType identifier\n"
" [ \"NAME\" qdescrs ] ; name used in AttributeType\n"
" [ \"DESC\" qdstring ] ; description\n"
" [ \"OBSOLETE\" whsp ]\n"
" [ \"SUP\" woid ] ; derived from this other\n"
" ; AttributeType\n",
" [ \"EQUALITY\" woid ] ; Matching Rule name\n"
" [ \"ORDERING\" woid ] ; Matching Rule name\n"
" [ \"SUBSTR\" woid ] ; Matching Rule name\n"
" [ \"SYNTAX\" whsp noidlen whsp ] ; see section 4.3\n"
" [ \"SINGLE-VALUE\" whsp ] ; default multi-valued\n"
" [ \"COLLECTIVE\" whsp ] ; default not collective\n",
" [ \"NO-USER-MODIFICATION\" whsp ]; default user modifiable\n"
" [ \"USAGE\" whsp AttributeUsage ]; default userApplications\n"
" ; userApplications\n"
" ; directoryOperation\n"
" ; distributedOperation\n"
" ; dSAOperation\n"
" whsp \")\"\n");
1999-05-28 22:27:07 +08:00
}
int
1999-05-28 22:27:07 +08:00
parse_at(
1999-08-21 03:00:44 +08:00
const char *fname,
1999-05-28 22:27:07 +08:00
int lineno,
char *line,
char **argv
1999-05-28 22:27:07 +08:00
)
{
LDAPAttributeType *at;
1999-05-28 22:27:07 +08:00
int code;
const char *err;
1999-05-28 22:27:07 +08:00
at = ldap_str2attributetype( line, &code, &err, LDAP_SCHEMA_ALLOW_ALL );
1999-05-28 22:27:07 +08:00
if ( !at ) {
fprintf( stderr, "%s: line %d: %s before %s\n",
fname, lineno, ldap_scherr2str(code), err );
at_usage();
return 1;
1999-05-28 22:27:07 +08:00
}
2001-10-11 02:15:30 +08:00
if ( at->at_oid == NULL ) {
fprintf( stderr,
"%s: line %d: attributeType has no OID\n",
fname, lineno );
at_usage();
return 1;
}
/* operational attributes should be defined internally */
if ( at->at_usage ) {
fprintf( stderr, "%s: line %d: attribute type \"%s\" is operational\n",
fname, lineno, at->at_oid );
return 1;
}
1999-05-28 22:27:07 +08:00
code = at_add(at,&err);
if ( code ) {
2000-05-28 03:21:28 +08:00
fprintf( stderr, "%s: line %d: %s: \"%s\"\n",
1999-05-28 22:27:07 +08:00
fname, lineno, scherr2str(code), err);
return 1;
1999-05-28 22:27:07 +08:00
}
ldap_memfree(at);
return 0;
1999-05-28 22:27:07 +08:00
}