From 1bfcb4b03915b951392d3c36483b7ce84ba5a6e3 Mon Sep 17 00:00:00 2001 From: Mark Valence Date: Mon, 12 Jun 2000 01:35:15 +0000 Subject: [PATCH] Added .regex, .base, .one, .subtree, and .children "style" modifiers. --- servers/slapd/acl.c | 205 ++++++++++++++++++++++++++------ servers/slapd/aclparse.c | 246 +++++++++++++++++++++++++++------------ servers/slapd/slap.h | 15 +++ 3 files changed, 352 insertions(+), 114 deletions(-) diff --git a/servers/slapd/acl.c b/servers/slapd/acl.c index c9b4d41df3..d93d1c3ef4 100644 --- a/servers/slapd/acl.c +++ b/servers/slapd/acl.c @@ -33,6 +33,7 @@ static slap_control_t acl_mask( #ifdef SLAPD_ACI_ENABLED static int aci_mask( Backend *be, + Connection *conn, Operation *op, Entry *e, AttributeDescription *desc, @@ -213,6 +214,8 @@ acl_get( regmatch_t *matches ) { const char *attr; + int dnlen, patlen; + assert( e != NULL ); assert( count != NULL ); @@ -231,20 +234,67 @@ acl_get( a = a->acl_next; } + dnlen = strlen(e->e_ndn); + for ( ; a != NULL; a = a->acl_next ) { (*count) ++; if (a->acl_dn_pat != NULL) { - Debug( LDAP_DEBUG_ACL, "=> dnpat: [%d] %s nsub: %d\n", - *count, a->acl_dn_pat, (int) a->acl_dn_re.re_nsub ); + if ( a->acl_dn_style == ACL_STYLE_REGEX ) { + Debug( LDAP_DEBUG_ACL, "=> dnpat: [%d] %s nsub: %d\n", + *count, a->acl_dn_pat, (int) a->acl_dn_re.re_nsub ); - if (regexec(&a->acl_dn_re, e->e_ndn, nmatch, matches, 0)) { - continue; + if (regexec(&a->acl_dn_re, e->e_ndn, nmatch, matches, 0)) + continue; } else { - Debug( LDAP_DEBUG_ACL, "=> acl_get: [%d] matched\n", - *count, 0, 0); + Debug( LDAP_DEBUG_ACL, "=> dn: [%d] %s\n", + *count, a->acl_dn_pat, 0 ); + + patlen = strlen( a->acl_dn_pat ); + if ( dnlen < patlen ) + continue; + + if ( a->acl_dn_style == ACL_STYLE_BASE ) { + /* base dn -- entire object DN must match */ + if ( dnlen != patlen ) + continue; + + } else if ( a->acl_dn_style == ACL_STYLE_ONE ) { + char *rdn; + int rdnlen = -1; + + if ( dnlen <= patlen ) + continue; + + if ( e->e_ndn[dnlen - patlen - 1] != ',' ) + continue; + + rdn = dn_rdn( NULL, e->e_ndn ); + if ( rdn != NULL ) { + rdnlen = strlen( rdn ); + ch_free( rdn ); + } + if ( rdnlen != dnlen - patlen - 1 ) + continue; + + } else if ( a->acl_dn_style == ACL_STYLE_SUBTREE ) { + if ( dnlen > patlen && e->e_ndn[dnlen - patlen - 1] != ',' ) + continue; + + } else if ( a->acl_dn_style == ACL_STYLE_CHILDREN ) { + if ( dnlen <= patlen ) + continue; + if ( e->e_ndn[dnlen - patlen - 1] != ',' ) + continue; + } + + if ( strcmp( a->acl_dn_pat, e->e_ndn + dnlen - patlen ) != 0 ) + continue; } + + Debug( LDAP_DEBUG_ACL, "=> acl_get: [%d] matched\n", + *count, 0, 0 ); } if ( a->acl_filter != NULL ) { @@ -295,7 +345,7 @@ acl_mask( regmatch_t *matches ) { - int i; + int i, odnlen, patlen; Access *b; #ifdef LDAP_DEBUG char accessmaskbuf[ACCESSMASK_MAXLEN]; @@ -348,13 +398,62 @@ acl_mask( continue; } - } else if ( strcmp( b->a_dn_pat, "*" ) != 0 ) { - int ret = regex_matches( b->a_dn_pat, - op->o_ndn, e->e_ndn, matches ); + } else if ( b->a_dn_style == ACL_STYLE_REGEX ) { + if ( strcmp( b->a_dn_pat, "*" ) != 0 ) { + int ret = regex_matches( b->a_dn_pat, + op->o_ndn, e->e_ndn, matches ); + + if( ret == 0 ) { + continue; + } + } + + } else { + if ( e->e_dn == NULL ) + continue; - if( ret == 0 ) { + patlen = strlen( b->a_dn_pat ); + odnlen = strlen( op->o_ndn ); + if ( odnlen < patlen ) continue; + + if ( b->a_dn_style == ACL_STYLE_BASE ) { + /* base dn -- entire object DN must match */ + if ( odnlen != patlen ) + continue; + + } else if ( b->a_dn_style == ACL_STYLE_ONE ) { + char *rdn; + int rdnlen = -1; + + if ( odnlen <= patlen ) + continue; + + if ( op->o_ndn[odnlen - patlen - 1] != ',' ) + continue; + + rdn = dn_rdn( NULL, op->o_ndn ); + if ( rdn != NULL ) { + rdnlen = strlen( rdn ); + ch_free( rdn ); + } + if ( rdnlen != odnlen - patlen - 1 ) + continue; + + } else if ( b->a_dn_style == ACL_STYLE_SUBTREE ) { + if ( odnlen > patlen && op->o_ndn[odnlen - patlen - 1] != ',' ) + continue; + + } else if ( b->a_dn_style == ACL_STYLE_CHILDREN ) { + if ( odnlen <= patlen ) + continue; + if ( op->o_ndn[odnlen - patlen - 1] != ',' ) + continue; } + + if ( strcmp( b->a_dn_pat, op->o_ndn + odnlen - patlen ) != 0 ) + continue; + } } @@ -362,11 +461,17 @@ acl_mask( Debug( LDAP_DEBUG_ACL, "<= check a_sockurl_pat: %s\n", b->a_sockurl_pat, 0, 0 ); - if ( strcmp( b->a_sockurl_pat, "*" ) != 0 && - !regex_matches( b->a_sockurl_pat, conn->c_listener_url, - e->e_ndn, matches ) ) - { - continue; + if ( strcmp( b->a_sockurl_pat, "*" ) != 0) { + if ( b->a_sockurl_style == ACL_STYLE_REGEX) { + if (!regex_matches( b->a_sockurl_pat, conn->c_listener_url, + e->e_ndn, matches ) ) + { + continue; + } + } else { + if ( strcasecmp( b->a_sockurl_pat, conn->c_listener_url ) == 0 ) + continue; + } } } @@ -374,11 +479,17 @@ acl_mask( Debug( LDAP_DEBUG_ACL, "<= check a_domain_pat: %s\n", b->a_domain_pat, 0, 0 ); - if ( strcmp( b->a_domain_pat, "*" ) != 0 && - !regex_matches( b->a_domain_pat, conn->c_peer_domain, - e->e_ndn, matches ) ) - { - continue; + if ( strcmp( b->a_domain_pat, "*" ) != 0) { + if ( b->a_domain_style == ACL_STYLE_REGEX) { + if (!regex_matches( b->a_domain_pat, conn->c_peer_domain, + e->e_ndn, matches ) ) + { + continue; + } + } else { + if ( strcasecmp( b->a_domain_pat, conn->c_peer_domain ) == 0 ) + continue; + } } } @@ -386,11 +497,17 @@ acl_mask( Debug( LDAP_DEBUG_ACL, "<= check a_peername_path: %s\n", b->a_peername_pat, 0, 0 ); - if ( strcmp( b->a_peername_pat, "*" ) != 0 && - !regex_matches( b->a_peername_pat, conn->c_peer_name, - e->e_ndn, matches ) ) - { - continue; + if ( strcmp( b->a_peername_pat, "*" ) != 0) { + if ( b->a_peername_style == ACL_STYLE_REGEX) { + if (!regex_matches( b->a_peername_pat, conn->c_peer_name, + e->e_ndn, matches ) ) + { + continue; + } + } else { + if ( strcasecmp( b->a_peername_pat, conn->c_peer_name ) == 0 ) + continue; + } } } @@ -398,11 +515,17 @@ acl_mask( Debug( LDAP_DEBUG_ACL, "<= check a_sockname_path: %s\n", b->a_sockname_pat, 0, 0 ); - if ( strcmp( b->a_sockname_pat, "*" ) != 0 && - !regex_matches( b->a_sockname_pat, conn->c_sock_name, - e->e_ndn, matches ) ) - { - continue; + if ( strcmp( b->a_sockname_pat, "*" ) != 0) { + if ( b->a_sockname_style == ACL_STYLE_REGEX) { + if (!regex_matches( b->a_sockname_pat, conn->c_sock_name, + e->e_ndn, matches ) ) + { + continue; + } + } else { + if ( strcasecmp( b->a_sockname_pat, conn->c_sock_name ) == 0 ) + continue; + } } } @@ -458,10 +581,15 @@ acl_mask( * the values in the attribute group */ /* see if asker is listed in dnattr */ - string_expand(buf, sizeof(buf), b->a_group_pat, e->e_ndn, matches); - if ( dn_normalize(buf) == NULL ) { - /* did not expand to a valid dn */ - continue; + if ( b->a_group_style != ACL_STYLE_REGEX ) { + string_expand(buf, sizeof(buf), b->a_group_pat, e->e_ndn, matches); + if ( dn_normalize(buf) == NULL ) { + /* did not expand to a valid dn */ + continue; + } + } else { + strncpy( buf, b->a_group_pat, sizeof(buf) - 1 ); + buf[sizeof(buf) - 1] = 0; } if (backend_group(be, e, buf, op->o_ndn, @@ -511,7 +639,7 @@ acl_mask( * rights given by the acis. */ for ( i = 0; at->a_vals[i] != NULL; i++ ) { - if (aci_mask( be, op, + if (aci_mask( be, conn, op, e, desc, val, at->a_vals[i], matches, &grant, &deny ) != 0) { @@ -1002,6 +1130,7 @@ done: static int aci_mask( Backend *be, + Connection *conn, Operation *op, Entry *e, AttributeDescription *desc, @@ -1014,8 +1143,8 @@ aci_mask( { struct berval bv, perms, sdn; char *subjdn; - int rc, i; - char *attr; + int rc; + char *attr = desc->ad_cname->bv_val; /* parse an aci of the form: oid#scope#action;rights;attr;rights;attr$action;rights;attr;rights;attr#dnType#subjectDN diff --git a/servers/slapd/aclparse.c b/servers/slapd/aclparse.c index 55a6d04fc9..8d64d9aad8 100644 --- a/servers/slapd/aclparse.c +++ b/servers/slapd/aclparse.c @@ -92,7 +92,7 @@ parse_acl( ) { int i; - char *left, *right; + char *left, *right, *style; AccessControl *a; Access *b; int rc; @@ -134,6 +134,14 @@ parse_acl( } split( argv[i], '=', &left, &right ); + split( left, '.', &left, &style ); + + if ( right == NULL || *right == '\0' ) { + fprintf( stderr, + "%s: line %d: missing \"=\" in (or value after) \"%s\" in to clause\n", + fname, lineno, left ); + acl_usage(); + } if ( strcasecmp( left, "dn" ) == 0 ) { if( a->acl_dn_pat != NULL ) { @@ -144,40 +152,49 @@ parse_acl( acl_usage(); } - if ( right == NULL ) { - fprintf( stderr, - "%s: line %d: missing \"=\" in \"%s\" in to clause\n", - fname, lineno, left ); - acl_usage(); - } + if ( style == NULL || *style == '\0' + || strcasecmp( style, "regex" ) == 0 ) + { + a->acl_dn_style = ACL_STYLE_REGEX; + if ( strcmp(right, "*") == 0 + || strcmp(right, ".*") == 0 + || strcmp(right, ".*$") == 0 + || strcmp(right, "^.*") == 0 + || strcmp(right, "^.*$$") == 0 + || strcmp(right, ".*$$") == 0 + || strcmp(right, "^.*$$") == 0 ) + { + a->acl_dn_pat = ch_strdup( "*" ); - if( *right == '\0' ) { - a->acl_dn_pat = ch_strdup("anonymous"); + } else { + a->acl_dn_pat = ch_strdup( right ); + } + } else if ( strcasecmp( style, "base" ) == 0 ) { + a->acl_dn_style = ACL_STYLE_BASE; + a->acl_dn_pat = ch_strdup( right ); - } else if ( strcmp(right, "*") == 0 - || strcmp(right, ".*") == 0 - || strcmp(right, ".*$") == 0 - || strcmp(right, "^.*") == 0 - || strcmp(right, "^.*$$") == 0 - || strcmp(right, ".*$$") == 0 - || strcmp(right, "^.*$$") == 0 ) - { - a->acl_dn_pat = ch_strdup( "*" ); + } else if ( strcasecmp( style, "one" ) == 0 ) { + a->acl_dn_style = ACL_STYLE_ONE; + a->acl_dn_pat = ch_strdup( right ); - } else { + } else if ( strcasecmp( style, "subtree" ) == 0 ) { + a->acl_dn_style = ACL_STYLE_SUBTREE; a->acl_dn_pat = ch_strdup( right ); + + } else if ( strcasecmp( style, "children" ) == 0 ) { + a->acl_dn_style = ACL_STYLE_CHILDREN; + a->acl_dn_pat = ch_strdup( right ); + + } else { + fprintf( stderr, + "%s: line %d: unknown dn style \"%s\" in to clause\n", + fname, lineno, style ); + acl_usage(); } continue; } - if ( right == NULL || *right == '\0' ) { - fprintf( stderr, - "%s: line %d: missing \"=\" in (or value after) \"%s\" in to clause\n", - fname, lineno, left ); - acl_usage(); - } - if ( strcasecmp( left, "filter" ) == 0 ) { if ( (a->acl_filter = str2filter( right )) == NULL ) { @@ -208,15 +225,21 @@ parse_acl( } if( a->acl_dn_pat != NULL ) { - int e = regcomp( &a->acl_dn_re, a->acl_dn_pat, - REG_EXTENDED | REG_ICASE ); - if ( e ) { - char buf[512]; - regerror( e, &a->acl_dn_re, buf, sizeof(buf) ); - fprintf( stderr, - "%s: line %d: regular expression \"%s\" bad because of %s\n", - fname, lineno, right, buf ); - acl_usage(); + if ( a->acl_dn_style != ACL_STYLE_REGEX ) + { + dn_normalize(a->acl_dn_pat); + + } else { + int e = regcomp( &a->acl_dn_re, a->acl_dn_pat, + REG_EXTENDED | REG_ICASE ); + if ( e ) { + char buf[512]; + regerror( e, &a->acl_dn_re, buf, sizeof(buf) ); + fprintf( stderr, + "%s: line %d: regular expression \"%s\" bad because of %s\n", + fname, lineno, right, buf ); + acl_usage(); + } } } @@ -247,7 +270,30 @@ parse_acl( /* get */ for ( ; i < argc; i++ ) { char *pat; + slap_style_t sty = ACL_STYLE_REGEX; + split( argv[i], '=', &left, &right ); + split( left, '.', &left, &style ); + if ( style == NULL || *style == '\0' + || strcasecmp( style, "regex" ) == 0 ) + { + sty = ACL_STYLE_REGEX; + } else if ( strcasecmp( style, "exact" ) == 0 ) { + sty = ACL_STYLE_BASE; + } else if ( strcasecmp( style, "base" ) == 0 ) { + sty = ACL_STYLE_BASE; + } else if ( strcasecmp( style, "one" ) == 0 ) { + sty = ACL_STYLE_ONE; + } else if ( strcasecmp( style, "subtree" ) == 0 ) { + sty = ACL_STYLE_SUBTREE; + } else if ( strcasecmp( style, "children" ) == 0 ) { + sty = ACL_STYLE_CHILDREN; + } else { + fprintf( stderr, + "%s: line %d: unknown style \"%s\" in by clause\n", + fname, lineno, style ); + acl_usage(); + } if ( strcasecmp( argv[i], "*" ) == 0 ) { pat = ch_strdup( "*" ); @@ -262,39 +308,50 @@ parse_acl( pat = ch_strdup( "users" ); } else if ( strcasecmp( left, "dn" ) == 0 ) { - if( right == NULL ) { - /* no '=' */ - pat = ch_strdup( "users" ); - - } else if (*right == '\0' ) { - /* dn="" */ - pat = ch_strdup( "anonymous" ); - - } else if ( strcmp( right, "*" ) == 0 ) { - /* dn=* */ - /* any or users? users for now */ - pat = ch_strdup( "users" ); - - } else if ( strcmp( right, ".+" ) == 0 - || strcmp( right, "^.+" ) == 0 - || strcmp( right, ".+$" ) == 0 - || strcmp( right, "^.+$" ) == 0 - || strcmp( right, ".+$$" ) == 0 - || strcmp( right, "^.+$$" ) == 0 ) - { - pat = ch_strdup( "users" ); - - } else if ( strcmp( right, ".*" ) == 0 - || strcmp( right, "^.*" ) == 0 - || strcmp( right, ".*$" ) == 0 - || strcmp( right, "^.*$" ) == 0 - || strcmp( right, ".*$$" ) == 0 - || strcmp( right, "^.*$$" ) == 0 ) - { - pat = ch_strdup( "*" ); + if ( sty == ACL_STYLE_REGEX ) { + b->a_dn_style = ACL_STYLE_REGEX; + if( right == NULL ) { + /* no '=' */ + pat = ch_strdup( "users" ); + + } else if (*right == '\0' ) { + /* dn="" */ + pat = ch_strdup( "anonymous" ); + + } else if ( strcmp( right, "*" ) == 0 ) { + /* dn=* */ + /* any or users? users for now */ + pat = ch_strdup( "users" ); + + } else if ( strcmp( right, ".+" ) == 0 + || strcmp( right, "^.+" ) == 0 + || strcmp( right, ".+$" ) == 0 + || strcmp( right, "^.+$" ) == 0 + || strcmp( right, ".+$$" ) == 0 + || strcmp( right, "^.+$$" ) == 0 ) + { + pat = ch_strdup( "users" ); + + } else if ( strcmp( right, ".*" ) == 0 + || strcmp( right, "^.*" ) == 0 + || strcmp( right, ".*$" ) == 0 + || strcmp( right, "^.*$" ) == 0 + || strcmp( right, ".*$$" ) == 0 + || strcmp( right, "^.*$$" ) == 0 ) + { + pat = ch_strdup( "*" ); + + } else { + regtest(fname, lineno, right); + pat = ch_strdup( right ); + } + } else if ( right == NULL || *right == '\0' ) { + fprintf( stderr, + "%s: line %d: missing \"=\" in (or value after) \"%s\" in by clause\n", + fname, lineno, left ); + acl_usage(); } else { - regtest(fname, lineno, right); pat = ch_strdup( right ); } @@ -311,6 +368,9 @@ parse_acl( } b->a_dn_pat = pat; + b->a_dn_style = sty; + if ( sty != ACL_STYLE_REGEX ) + dn_normalize(pat); continue; } @@ -346,6 +406,13 @@ parse_acl( continue; } + if (sty != ACL_STYLE_REGEX && sty != ACL_STYLE_BASE) { + fprintf( stderr, + "%s: line %d: inappropriate style \"%s\" in by clause\n", + fname, lineno, style ); + acl_usage(); + } + if ( strncasecmp( left, "group", sizeof("group")-1 ) == 0 ) { char *name = NULL; char *value = NULL; @@ -367,8 +434,14 @@ parse_acl( } } - regtest(fname, lineno, right); - b->a_group_pat = ch_strdup( right ); + b->a_group_style = sty; + if (sty == ACL_STYLE_REGEX) { + regtest(fname, lineno, right); + b->a_group_pat = ch_strdup( right ); + } else { + b->a_group_pat = ch_strdup( right ); + dn_normalize(b->a_group_pat); + } if (value && *value) { b->a_group_oc = oc_find( value ); @@ -480,7 +553,10 @@ parse_acl( acl_usage(); } - regtest(fname, lineno, right); + b->a_peername_style = sty; + if (sty == ACL_STYLE_REGEX) { + regtest(fname, lineno, right); + } b->a_peername_pat = ch_strdup( right ); continue; } @@ -493,7 +569,10 @@ parse_acl( acl_usage(); } - regtest(fname, lineno, right); + b->a_sockname_style = sty; + if (sty == ACL_STYLE_REGEX) { + regtest(fname, lineno, right); + } b->a_sockname_pat = ch_strdup( right ); continue; } @@ -506,7 +585,10 @@ parse_acl( acl_usage(); } - regtest(fname, lineno, right); + b->a_domain_style = sty; + if (sty == ACL_STYLE_REGEX) { + regtest(fname, lineno, right); + } b->a_domain_pat = ch_strdup( right ); continue; } @@ -519,7 +601,10 @@ parse_acl( acl_usage(); } - regtest(fname, lineno, right); + b->a_sockurl_style = sty; + if (sty == ACL_STYLE_REGEX) { + regtest(fname, lineno, right); + } b->a_sockurl_pat = ch_strdup( right ); continue; } @@ -957,6 +1042,15 @@ str2access( const char *str ) #ifdef LDAP_DEBUG +static char *style_strings[5] = { + "regex", + "base", + "one", + "subtree", + "children" + }; + + static void print_access( Access *b ) { @@ -973,7 +1067,7 @@ print_access( Access *b ) fprintf( stderr, " %s", b->a_dn_pat ); } else { - fprintf( stderr, " dn=%s", b->a_dn_pat ); + fprintf( stderr, " dn.%s=%s", style_strings[b->a_dn_style], b->a_dn_pat ); } } @@ -982,7 +1076,7 @@ print_access( Access *b ) } if ( b->a_group_pat != NULL ) { - fprintf( stderr, " group: %s", b->a_group_pat ); + fprintf( stderr, " group=%s", b->a_group_pat ); if ( b->a_group_oc ) { fprintf( stderr, " objectClass: %s", @@ -1045,8 +1139,8 @@ print_acl( Backend *be, AccessControl *a ) if ( a->acl_dn_pat != NULL ) { to++; - fprintf( stderr, " dn=%s\n", - a->acl_dn_pat ); + fprintf( stderr, " dn.%s=%s\n", + style_strings[a->acl_dn_style], a->acl_dn_pat ); } if ( a->acl_filter != NULL ) { diff --git a/servers/slapd/slap.h b/servers/slapd/slap.h index ff4d1211da..5a7bf3582e 100644 --- a/servers/slapd/slap.h +++ b/servers/slapd/slap.h @@ -573,6 +573,14 @@ typedef enum slap_control_e { ACL_BREAK } slap_control_t; +typedef enum slap_style_e { + ACL_STYLE_REGEX, + ACL_STYLE_BASE, + ACL_STYLE_ONE, + ACL_STYLE_SUBTREE, + ACL_STYLE_CHILDREN +} slap_style_t; + typedef unsigned long slap_access_mask_t; /* the "by" part */ @@ -638,14 +646,19 @@ typedef struct slap_access { slap_access_mask_t a_mask; + slap_style_t a_dn_style; char *a_dn_pat; AttributeDescription *a_dn_at; int a_dn_self; + slap_style_t a_peername_style; char *a_peername_pat; + slap_style_t a_sockname_style; char *a_sockname_pat; + slap_style_t a_domain_style; char *a_domain_pat; + slap_style_t a_sockurl_style; char *a_sockurl_pat; #ifdef SLAPD_ACI_ENABLED @@ -653,6 +666,7 @@ typedef struct slap_access { #endif /* ACL Groups */ + slap_style_t a_group_style; char *a_group_pat; ObjectClass *a_group_oc; AttributeDescription *a_group_at; @@ -664,6 +678,7 @@ typedef struct slap_access { typedef struct slap_acl { /* "to" part: the entries this acl applies to */ Filter *acl_filter; + slap_style_t acl_dn_style; regex_t acl_dn_re; char *acl_dn_pat; char **acl_attrs; -- 2.39.5