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