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

   1 /* ava.c - routines for dealing with attribute value assertions */
   2 /* $OpenLDAP$ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 1998-2004 The OpenLDAP Foundation.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted only as authorized by the OpenLDAP
  10  * Public License.
  11  *
  12  * A copy of this license is available in the file LICENSE in the
  13  * top-level directory of the distribution or, alternatively, at
  14  * <http://www.OpenLDAP.org/license.html>.
  15  */
  16 /* Portions Copyright (c) 1995 Regents of the University of Michigan.
  17  * All rights reserved.
  18  *
  19  * Redistribution and use in source and binary forms are permitted
  20  * provided that this notice is preserved and that due credit is given
  21  * to the University of Michigan at Ann Arbor. The name of the University
  22  * may not be used to endorse or promote products derived from this
  23  * software without specific prior written permission. This software
  24  * is provided ``as is'' without express or implied warranty.
  25  */
  26
  27 #include "portable.h"
  28
  29 #include <stdio.h>
  30
  31 #include <ac/string.h>
  32 #include <ac/socket.h>
  33
  34 #include "slap.h"
  35
  36
  37 void
  38 ava_free(
  39         Operation *op,
  40         AttributeAssertion *ava,
  41         int     freeit )
  42 {
  43         op->o_tmpfree( ava->aa_value.bv_val, op->o_tmpmemctx );
  44         if ( freeit ) op->o_tmpfree( (char *) ava, op->o_tmpmemctx );
  45 }
  46
  47 int
  48 get_ava(
  49         Operation *op,
  50         BerElement      *ber,
  51         AttributeAssertion      **ava,
  52         unsigned usage,
  53         const char **text )
  54 {
  55         int rc;
  56         ber_tag_t rtag;
  57         struct berval type, value;
  58         AttributeAssertion *aa;
  59
  60         rtag = ber_scanf( ber, "{mm}", &type, &value );
  61
  62         if( rtag == LBER_ERROR ) {
  63 #ifdef NEW_LOGGING
  64                 LDAP_LOG( FILTER, ERR, "get_ava:  ber_scanf failure\n", 0, 0, 0 );
  65 #else
  66                 Debug( LDAP_DEBUG_ANY, "  get_ava ber_scanf\n", 0, 0, 0 );
  67 #endif
  68                 *text = "Error decoding attribute value assertion";
  69                 return SLAPD_DISCONNECT;
  70         }
  71
  72         aa = op->o_tmpalloc( sizeof( AttributeAssertion ), op->o_tmpmemctx );
  73         aa->aa_desc = NULL;
  74         aa->aa_value.bv_val = NULL;
  75
  76         rc = slap_bv2ad( &type, &aa->aa_desc, text );
  77
  78         if( rc != LDAP_SUCCESS ) {
  79 #ifdef NEW_LOGGING
  80                 LDAP_LOG( FILTER, ERR,
  81                 "get_ava: unknown attributeType %s\n", type.bv_val, 0, 0 );
  82 #else
  83                 Debug( LDAP_DEBUG_FILTER,
  84                 "get_ava: unknown attributeType %s\n", type.bv_val, 0, 0 );
  85 #endif
  86                 op->o_tmpfree( aa, op->o_tmpmemctx );
  87                 return rc;
  88         }
  89
  90         rc = asserted_value_validate_normalize(
  91                 aa->aa_desc, ad_mr(aa->aa_desc, usage),
  92                 usage, &value, &aa->aa_value, text, op->o_tmpmemctx );
  93
  94         if( rc != LDAP_SUCCESS ) {
  95 #ifdef NEW_LOGGING
  96                 LDAP_LOG( FILTER, ERR,
  97                 "get_ava: illegal value for attributeType %s\n", type.bv_val, 0, 0 );
  98 #else
  99                 Debug( LDAP_DEBUG_FILTER,
 100                 "get_ava: illegal value for attributeType %s\n", type.bv_val, 0, 0 );
 101 #endif
 102                 op->o_tmpfree( aa, op->o_tmpmemctx );
 103                 return rc;
 104         }
 105
 106         *ava = aa;
 107         return LDAP_SUCCESS;
 108 }