git.sur5r.net Git - openldap/blob - libraries/libldap/add.c

   1 /* $OpenLDAP$ */
   2 /*
   3  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 /*  Portions
   7  *  Copyright (c) 1990 Regents of the University of Michigan.
   8  *  All rights reserved.
   9  *
  10  *  add.c
  11  */
  12
  13 /*
  14  * An add request looks like this:
  15  *      AddRequest ::= SEQUENCE {
  16  *              entry   DistinguishedName,
  17  *              attrs   SEQUENCE OF SEQUENCE {
  18  *                      type    AttributeType,
  19  *                      values  SET OF AttributeValue
  20  *              }
  21  *      }
  22  */
  23
  24 #include "portable.h"
  25
  26 #include <stdio.h>
  27
  28 #include <ac/socket.h>
  29 #include <ac/string.h>
  30 #include <ac/time.h>
  31
  32 #include "ldap-int.h"
  33
  34 /*
  35  * ldap_add - initiate an ldap add operation.  Parameters:
  36  *
  37  *      ld              LDAP descriptor
  38  *      dn              DN of the entry to add
  39  *      mods            List of attributes for the entry.  This is a null-
  40  *                      terminated array of pointers to LDAPMod structures.
  41  *                      only the type and values in the structures need be
  42  *                      filled in.
  43  *
  44  * Example:
  45  *      LDAPMod *attrs[] = {
  46  *                      { 0, "cn", { "babs jensen", "babs", 0 } },
  47  *                      { 0, "sn", { "jensen", 0 } },
  48  *                      { 0, "objectClass", { "person", 0 } },
  49  *                      0
  50  *              }
  51  *      msgid = ldap_add( ld, dn, attrs );
  52  */
  53 int
  54 ldap_add( LDAP *ld, LDAP_CONST char *dn, LDAPMod **attrs )
  55 {
  56         int rc;
  57         int msgid;
  58
  59         rc = ldap_add_ext( ld, dn, attrs, NULL, NULL, &msgid );
  60
  61         if ( rc != LDAP_SUCCESS )
  62                 return -1;
  63
  64         return msgid;
  65 }
  66
  67
  68 /*
  69  * ldap_add_ext - initiate an ldap extended add operation.  Parameters:
  70  *
  71  *      ld              LDAP descriptor
  72  *      dn              DN of the entry to add
  73  *      mods            List of attributes for the entry.  This is a null-
  74  *                      terminated array of pointers to LDAPMod structures.
  75  *                      only the type and values in the structures need be
  76  *                      filled in.
  77  *      sctrl   Server Controls
  78  *      cctrl   Client Controls
  79  *      msgidp  Message ID pointer
  80  *
  81  * Example:
  82  *      LDAPMod *attrs[] = {
  83  *                      { 0, "cn", { "babs jensen", "babs", 0 } },
  84  *                      { 0, "sn", { "jensen", 0 } },
  85  *                      { 0, "objectClass", { "person", 0 } },
  86  *                      0
  87  *              }
  88  *      rc = ldap_add_ext( ld, dn, attrs, NULL, NULL, &msgid );
  89  */
  90 int
  91 ldap_add_ext(
  92         LDAP *ld,
  93         LDAP_CONST char *dn,
  94         LDAPMod **attrs,
  95         LDAPControl **sctrls,
  96         LDAPControl **cctrls,
  97         int     *msgidp )
  98 {
  99         BerElement      *ber;
 100         int             i, rc;
 101
 102         Debug( LDAP_DEBUG_TRACE, "ldap_add\n", 0, 0, 0 );
 103         assert( ld != NULL );
 104         assert( LDAP_VALID( ld ) );
 105         assert( dn != NULL );
 106         assert( msgidp != NULL );
 107
 108         /* create a message to send */
 109         if ( (ber = ldap_alloc_ber_with_options( ld )) == NULL ) {
 110                 ld->ld_errno = LDAP_NO_MEMORY;
 111                 return ld->ld_errno;
 112         }
 113
 114         rc = ber_printf( ber, "{it{s{", /* '}}}' */
 115                 ++ld->ld_msgid, LDAP_REQ_ADD, dn );
 116
 117         if ( rc == -1 ) {
 118                 ld->ld_errno = LDAP_ENCODING_ERROR;
 119                 ber_free( ber, 1 );
 120                 return ld->ld_errno;
 121         }
 122
 123         /* for each attribute in the entry... */
 124         for ( i = 0; attrs[i] != NULL; i++ ) {
 125                 if ( ( attrs[i]->mod_op & LDAP_MOD_BVALUES) != 0 ) {
 126                         rc = ber_printf( ber, "{s[V]N}", attrs[i]->mod_type,
 127                             attrs[i]->mod_bvalues );
 128                 } else {
 129                         rc = ber_printf( ber, "{s[v]N}", attrs[i]->mod_type,
 130                             attrs[i]->mod_values );
 131                 }
 132                 if ( rc == -1 ) {
 133                         ld->ld_errno = LDAP_ENCODING_ERROR;
 134                         ber_free( ber, 1 );
 135                         return ld->ld_errno;
 136                 }
 137         }
 138
 139         if ( ber_printf( ber, /*{{*/ "N}N}" ) == -1 ) {
 140                 ld->ld_errno = LDAP_ENCODING_ERROR;
 141                 ber_free( ber, 1 );
 142                 return ld->ld_errno;
 143         }
 144
 145         /* Put Server Controls */
 146         if( ldap_int_put_controls( ld, sctrls, ber ) != LDAP_SUCCESS ) {
 147                 ber_free( ber, 1 );
 148                 return ld->ld_errno;
 149         }
 150
 151         if ( ber_printf( ber, /*{*/ "N}" ) == -1 ) {
 152                 ld->ld_errno = LDAP_ENCODING_ERROR;
 153                 ber_free( ber, 1 );
 154                 return ld->ld_errno;
 155         }
 156
 157         /* send the message */
 158         *msgidp = ldap_send_initial_request( ld, LDAP_REQ_ADD, dn, ber );
 159
 160         if(*msgidp < 0)
 161                 return ld->ld_errno;
 162
 163         return LDAP_SUCCESS;
 164 }
 165
 166 int
 167 ldap_add_ext_s(
 168         LDAP *ld,
 169         LDAP_CONST char *dn,
 170         LDAPMod **attrs,
 171         LDAPControl **sctrls,
 172         LDAPControl **cctrls )
 173 {
 174         int             msgid, rc;
 175         LDAPMessage     *res;
 176
 177         rc = ldap_add_ext( ld, dn, attrs, sctrls, cctrls, &msgid );
 178
 179         if ( rc != LDAP_SUCCESS )
 180                 return( rc );
 181
 182         if ( ldap_result( ld, msgid, 1, (struct timeval *) NULL, &res ) == -1 )
 183                 return( ld->ld_errno );
 184
 185         return( ldap_result2error( ld, res, 1 ) );
 186 }
 187
 188 int
 189 ldap_add_s( LDAP *ld, LDAP_CONST char *dn, LDAPMod **attrs )
 190 {
 191         return ldap_add_ext_s( ld, dn, attrs, NULL, NULL );
 192 }
 193