1 /*
2 * The contents of this file are subject to the Netscape Public
3 * License Version 1.1 (the "License"); you may not use this file
4 * except in compliance with the License. You may obtain a copy of
5 * the License at http://www.mozilla.org/NPL/
6 *
7 * Software distributed under the License is distributed on an "AS
8 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
9 * implied. See the License for the specific language governing
10 * rights and limitations under the License.
11 *
12 * The Original Code is Mozilla Communicator client code, released
13 * March 31, 1998.
14 *
15 * The Initial Developer of the Original Code is Netscape
16 * Communications Corporation. Portions created by Netscape are
17 * Copyright (C) 1998-1999 Netscape Communications Corporation. All
18 * Rights Reserved.
19 *
20 * Contributor(s):
21 */
22 /*
23 * Copyright (c) 1990 Regents of the University of Michigan.
24 * All rights reserved.
25 */
26 /*
27 * add.c
28 */
29
30 #if 0
31 #ifndef lint
32 static char copyright[] = "@(#) Copyright (c) 1990 Regents of the University of Michigan.\nAll rights reserved.\n";
33 #endif
34 #endif
35
36 #include "ldap-int.h"
37
38 /*
39 * ldap_add - initiate an ldap add operation. Parameters:
40 *
41 * ld LDAP descriptor
42 * dn DN of the entry to add
43 * mods List of attributes for the entry. This is a null-
44 * terminated array of pointers to LDAPMod structures.
45 * only the type and values in the structures need be
46 * filled in.
47 *
48 * Example:
49 * LDAPMod *attrs[] = {
50 * { 0, "cn", { "babs jensen", "babs", 0 } },
51 * { 0, "sn", { "jensen", 0 } },
52 * { 0, "objectClass", { "person", 0 } },
53 * 0
54 * }
55 * msgid = ldap_add( ld, dn, attrs );
56 */
57 int
58 LDAP_CALL
ldap_add(LDAP * ld,const char * dn,LDAPMod ** attrs)59 ldap_add( LDAP *ld, const char *dn, LDAPMod **attrs )
60 {
61 int msgid;
62
63 LDAPDebug( LDAP_DEBUG_TRACE, "ldap_add\n", 0, 0, 0 );
64
65 if ( ldap_add_ext( ld, dn, attrs, NULL, NULL, &msgid )
66 == LDAP_SUCCESS ) {
67 return( msgid );
68 } else {
69 return( -1 ); /* error is in ld handle */
70 }
71 }
72
73
74 /*
75 * LDAPv3 extended add.
76 * Returns an LDAP error code.
77 */
78 int
79 LDAP_CALL
ldap_add_ext(LDAP * ld,const char * dn,LDAPMod ** attrs,LDAPControl ** serverctrls,LDAPControl ** clientctrls,int * msgidp)80 ldap_add_ext( LDAP *ld, const char *dn, LDAPMod **attrs,
81 LDAPControl **serverctrls, LDAPControl **clientctrls, int *msgidp )
82 {
83 BerElement *ber;
84 int i, rc, lderr;
85
86 /*
87 * An add request looks like this:
88 * AddRequest ::= SEQUENCE {
89 * entry DistinguishedName,
90 * attrs SEQUENCE OF SEQUENCE {
91 * type AttributeType,
92 * values SET OF AttributeValue
93 * }
94 * }
95 */
96
97 LDAPDebug( LDAP_DEBUG_TRACE, "ldap_add_ext\n", 0, 0, 0 );
98
99 if ( !NSLDAPI_VALID_LDAP_POINTER( ld )) {
100 return( LDAP_PARAM_ERROR );
101 }
102
103 if ( !NSLDAPI_VALID_LDAPMESSAGE_POINTER( msgidp ))
104 {
105 LDAP_SET_LDERRNO( ld, LDAP_PARAM_ERROR, NULL, NULL );
106 return( LDAP_PARAM_ERROR );
107 }
108 if ( !NSLDAPI_VALID_NONEMPTY_LDAPMOD_ARRAY( attrs )
109 || msgidp == NULL ) {
110 lderr = LDAP_PARAM_ERROR;
111 LDAP_SET_LDERRNO( ld, lderr, NULL, NULL );
112 return( lderr );
113 }
114
115 if ( dn == NULL ) {
116 dn = "";
117 }
118
119 LDAP_MUTEX_LOCK( ld, LDAP_MSGID_LOCK );
120 *msgidp = ++ld->ld_msgid;
121 LDAP_MUTEX_UNLOCK( ld, LDAP_MSGID_LOCK );
122
123 /* see if we should add to the cache */
124 if ( ld->ld_cache_on && ld->ld_cache_add != NULL ) {
125 LDAP_MUTEX_LOCK( ld, LDAP_CACHE_LOCK );
126 if ( (rc = (ld->ld_cache_add)( ld, *msgidp, LDAP_REQ_ADD, dn,
127 attrs )) != 0 ) {
128 *msgidp = rc;
129 LDAP_MUTEX_UNLOCK( ld, LDAP_CACHE_LOCK );
130 return( LDAP_SUCCESS );
131 }
132 LDAP_MUTEX_UNLOCK( ld, LDAP_CACHE_LOCK );
133 }
134
135 /* create a message to send */
136 if (( lderr = nsldapi_alloc_ber_with_options( ld, &ber ))
137 != LDAP_SUCCESS ) {
138 return( lderr );
139 }
140
141 if ( ber_printf( ber, "{it{s{", *msgidp, LDAP_REQ_ADD, dn )
142 == -1 ) {
143 lderr = LDAP_ENCODING_ERROR;
144 LDAP_SET_LDERRNO( ld, lderr, NULL, NULL );
145 ber_free( ber, 1 );
146 return( lderr );
147 }
148
149 /* for each attribute in the entry... */
150 for ( i = 0; attrs[i] != NULL; i++ ) {
151 if ( ( attrs[i]->mod_op & LDAP_MOD_BVALUES) != 0 ) {
152 rc = ber_printf( ber, "{s[V]}", attrs[i]->mod_type,
153 attrs[i]->mod_bvalues );
154 } else {
155 rc = ber_printf( ber, "{s[v]}", attrs[i]->mod_type,
156 attrs[i]->mod_values );
157 }
158 if ( rc == -1 ) {
159 lderr = LDAP_ENCODING_ERROR;
160 LDAP_SET_LDERRNO( ld, lderr, NULL, NULL );
161 ber_free( ber, 1 );
162 return( lderr );
163 }
164 }
165
166 if ( ber_printf( ber, "}}" ) == -1 ) {
167 lderr = LDAP_ENCODING_ERROR;
168 LDAP_SET_LDERRNO( ld, lderr, NULL, NULL );
169 ber_free( ber, 1 );
170 return( lderr );
171 }
172
173 if (( lderr = nsldapi_put_controls( ld, serverctrls, 1, ber ))
174 != LDAP_SUCCESS ) {
175 ber_free( ber, 1 );
176 return( lderr );
177 }
178
179 /* send the message */
180 rc = nsldapi_send_initial_request( ld, *msgidp, LDAP_REQ_ADD,
181 (char *) dn, ber );
182 *msgidp = rc;
183 return( rc < 0 ? LDAP_GET_LDERRNO( ld, NULL, NULL ) : LDAP_SUCCESS );
184 }
185
186 int
187 LDAP_CALL
ldap_add_s(LDAP * ld,const char * dn,LDAPMod ** attrs)188 ldap_add_s( LDAP *ld, const char *dn, LDAPMod **attrs )
189 {
190 return( ldap_add_ext_s( ld, dn, attrs, NULL, NULL ));
191 }
192
193 int LDAP_CALL
ldap_add_ext_s(LDAP * ld,const char * dn,LDAPMod ** attrs,LDAPControl ** serverctrls,LDAPControl ** clientctrls)194 ldap_add_ext_s( LDAP *ld, const char *dn, LDAPMod **attrs,
195 LDAPControl **serverctrls, LDAPControl **clientctrls )
196 {
197 int err, msgid;
198 LDAPMessage *res;
199
200 if (( err = ldap_add_ext( ld, dn, attrs, serverctrls, clientctrls,
201 &msgid )) != LDAP_SUCCESS ) {
202 return( err );
203 }
204
205 if ( ldap_result( ld, msgid, 1, (struct timeval *)NULL, &res ) == -1 ) {
206 return( LDAP_GET_LDERRNO( ld, NULL, NULL ) );
207 }
208
209 return( ldap_result2error( ld, res, 1 ) );
210 }
211