xref: /onnv-gate/usr/src/lib/libldap4/common/extop.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  *
3*0Sstevel@tonic-gate  * Copyright %G% Sun Microsystems, Inc.
4*0Sstevel@tonic-gate  * All Rights Reserved
5*0Sstevel@tonic-gate  *
6*0Sstevel@tonic-gate  *
7*0Sstevel@tonic-gate  * Comments:
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  */
10*0Sstevel@tonic-gate 
11*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
12*0Sstevel@tonic-gate 
13*0Sstevel@tonic-gate #include <stdio.h>
14*0Sstevel@tonic-gate #include <string.h>
15*0Sstevel@tonic-gate 
16*0Sstevel@tonic-gate #ifdef MACOS
17*0Sstevel@tonic-gate #include "macos.h"
18*0Sstevel@tonic-gate #endif /* MACOS */
19*0Sstevel@tonic-gate 
20*0Sstevel@tonic-gate #if !defined( MACOS ) && !defined( DOS )
21*0Sstevel@tonic-gate #include <sys/types.h>
22*0Sstevel@tonic-gate #include <sys/socket.h>
23*0Sstevel@tonic-gate #endif
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate #include "lber.h"
26*0Sstevel@tonic-gate #include "ldap.h"
27*0Sstevel@tonic-gate #include "ldap-private.h"
28*0Sstevel@tonic-gate #include "ldap-int.h"
29*0Sstevel@tonic-gate 
30*0Sstevel@tonic-gate BerElement * ldap_build_extended_operation_req(LDAP *ld, char *exoid, struct berval *exdata, LDAPControl ** serverctrls)
31*0Sstevel@tonic-gate {
32*0Sstevel@tonic-gate 	BerElement *ber;
33*0Sstevel@tonic-gate 	int rv;
34*0Sstevel@tonic-gate 
35*0Sstevel@tonic-gate 	/* an extended operation request looks like this:
36*0Sstevel@tonic-gate 	 * ExtendedRequest ::= [APPLICATION 23] SEQUENCE {
37*0Sstevel@tonic-gate 	 *		requestName		[0] LDAPOID,
38*0Sstevel@tonic-gate 	 *		requestValue	[1] OCTECT STRING OPTIONAL
39*0Sstevel@tonic-gate 	 * }
40*0Sstevel@tonic-gate 	 */
41*0Sstevel@tonic-gate 	if ( (ber = alloc_ber_with_options( ld )) == NULLBER ) {
42*0Sstevel@tonic-gate 		ld->ld_errno = LDAP_NO_MEMORY;
43*0Sstevel@tonic-gate 		return( NULLBER );
44*0Sstevel@tonic-gate 	}
45*0Sstevel@tonic-gate 
46*0Sstevel@tonic-gate 	if ( ber_printf( ber, "{it{ts", ++ld->ld_msgid, LDAP_REQ_EXTENDED, LDAP_TAG_EXT_NAME, exoid ) == -1 ) {
47*0Sstevel@tonic-gate 		ld->ld_errno = LDAP_ENCODING_ERROR;
48*0Sstevel@tonic-gate 		ber_free( ber, 1 );
49*0Sstevel@tonic-gate 		return( NULLBER );
50*0Sstevel@tonic-gate 	}
51*0Sstevel@tonic-gate 
52*0Sstevel@tonic-gate 	if (exdata && (ber_printf(ber, "to", LDAP_TAG_EXT_VAL, exdata->bv_val, exdata->bv_len) == -1 )) {
53*0Sstevel@tonic-gate 		ld->ld_errno = LDAP_ENCODING_ERROR;
54*0Sstevel@tonic-gate 		ber_free( ber, 1 );
55*0Sstevel@tonic-gate 		return( NULLBER );
56*0Sstevel@tonic-gate 	}
57*0Sstevel@tonic-gate 
58*0Sstevel@tonic-gate 	if ( ber_printf( ber, "}" ) == -1 ) {
59*0Sstevel@tonic-gate 		ld->ld_errno = LDAP_ENCODING_ERROR;
60*0Sstevel@tonic-gate 		ber_free( ber, 1 );
61*0Sstevel@tonic-gate 		return( NULLBER );
62*0Sstevel@tonic-gate 	}
63*0Sstevel@tonic-gate 	/* LDAPv3 */
64*0Sstevel@tonic-gate 	/* Code controls if any */
65*0Sstevel@tonic-gate 	if (serverctrls && serverctrls[0]) {
66*0Sstevel@tonic-gate 		if (ldap_controls_code(ber, serverctrls) != LDAP_SUCCESS){
67*0Sstevel@tonic-gate 			ld->ld_errno = LDAP_ENCODING_ERROR;
68*0Sstevel@tonic-gate 			ber_free( ber, 1 );
69*0Sstevel@tonic-gate 			return( NULLBER );
70*0Sstevel@tonic-gate 		}
71*0Sstevel@tonic-gate 	} else if (ld->ld_srvctrls && ld->ld_srvctrls[0]) {
72*0Sstevel@tonic-gate 		/* Otherwise, is there any global server ctrls ? */
73*0Sstevel@tonic-gate 		if (ldap_controls_code(ber, ld->ld_srvctrls) != LDAP_SUCCESS){
74*0Sstevel@tonic-gate 			ld->ld_errno = LDAP_ENCODING_ERROR;
75*0Sstevel@tonic-gate 			ber_free( ber, 1 );
76*0Sstevel@tonic-gate 			return( NULLBER );
77*0Sstevel@tonic-gate 		}
78*0Sstevel@tonic-gate 	}
79*0Sstevel@tonic-gate 
80*0Sstevel@tonic-gate 	if ( ber_printf( ber, "}" ) == -1 ) {
81*0Sstevel@tonic-gate 		ld->ld_errno = LDAP_ENCODING_ERROR;
82*0Sstevel@tonic-gate 		ber_free( ber, 1 );
83*0Sstevel@tonic-gate 		return( NULLBER );
84*0Sstevel@tonic-gate 	}
85*0Sstevel@tonic-gate 
86*0Sstevel@tonic-gate 	return (ber);
87*0Sstevel@tonic-gate }
88*0Sstevel@tonic-gate 
89*0Sstevel@tonic-gate /* ldap_extended_operation - initiate an ldap extended operation.
90*0Sstevel@tonic-gate  * Parameters :
91*0Sstevel@tonic-gate  *   ld : LDAP descriptor.
92*0Sstevel@tonic-gate  *   exoid : OID of the request.
93*0Sstevel@tonic-gate  *   exdata : Arbitrary data required by the operation.
94*0Sstevel@tonic-gate  *   serverctrls : List of server controls.
95*0Sstevel@tonic-gate  *   clientctrls : List of client controls.
96*0Sstevel@tonic-gate  *   msgidp : msg id returned if operation succeeded.
97*0Sstevel@tonic-gate  * Returns LDAP_SUCCESS or error code.
98*0Sstevel@tonic-gate  */
99*0Sstevel@tonic-gate 
100*0Sstevel@tonic-gate int ldap_extended_operation(LDAP *ld, char *exoid, struct berval *exdata,
101*0Sstevel@tonic-gate 							LDAPControl **serverctrls, LDAPControl **clientctrls, int *msgidp)
102*0Sstevel@tonic-gate {
103*0Sstevel@tonic-gate 	BerElement	*ber;
104*0Sstevel@tonic-gate 	int rv;
105*0Sstevel@tonic-gate 
106*0Sstevel@tonic-gate #ifdef _REENTRANT
107*0Sstevel@tonic-gate         LOCK_LDAP(ld);
108*0Sstevel@tonic-gate #endif
109*0Sstevel@tonic-gate 	Debug( LDAP_DEBUG_TRACE, catgets(slapdcat, 1, 242, "ldap_extended_operation\n"), 0, 0, 0 );
110*0Sstevel@tonic-gate 
111*0Sstevel@tonic-gate 	if (( ber = ldap_build_extended_operation_req( ld, exoid, exdata, serverctrls)) == NULLBER ) {
112*0Sstevel@tonic-gate 		rv = ld->ld_errno;
113*0Sstevel@tonic-gate 		if (rv == LDAP_SUCCESS)
114*0Sstevel@tonic-gate 			rv = LDAP_OTHER;
115*0Sstevel@tonic-gate #ifdef _REENTRANT
116*0Sstevel@tonic-gate 		UNLOCK_LDAP(ld);
117*0Sstevel@tonic-gate #endif
118*0Sstevel@tonic-gate 		return( rv);
119*0Sstevel@tonic-gate 	}
120*0Sstevel@tonic-gate 
121*0Sstevel@tonic-gate 	/* send the message */
122*0Sstevel@tonic-gate 	rv = send_initial_request( ld, LDAP_REQ_EXTENDED, NULL, ber );
123*0Sstevel@tonic-gate 	if (rv == -1) {
124*0Sstevel@tonic-gate 		rv = ld->ld_errno;
125*0Sstevel@tonic-gate 		if (rv == LDAP_SUCCESS){
126*0Sstevel@tonic-gate 			rv = LDAP_OTHER;
127*0Sstevel@tonic-gate 		}
128*0Sstevel@tonic-gate #ifdef _REENTRANT
129*0Sstevel@tonic-gate 		UNLOCK_LDAP(ld);
130*0Sstevel@tonic-gate #endif
131*0Sstevel@tonic-gate 		return (rv);
132*0Sstevel@tonic-gate 	}
133*0Sstevel@tonic-gate 
134*0Sstevel@tonic-gate 	*msgidp = rv;
135*0Sstevel@tonic-gate #if _REENTRANT
136*0Sstevel@tonic-gate 	UNLOCK_LDAP(ld);
137*0Sstevel@tonic-gate #endif
138*0Sstevel@tonic-gate 	return ( LDAP_SUCCESS );
139*0Sstevel@tonic-gate }
140*0Sstevel@tonic-gate 
141*0Sstevel@tonic-gate 
142*0Sstevel@tonic-gate int ldap_extended_operation_s(LDAP *ld, char *exoid, struct berval *exdata,
143*0Sstevel@tonic-gate 							  LDAPControl **serverctrls, LDAPControl **clientctrls,
144*0Sstevel@tonic-gate 							  char **retoidp, struct berval **retdatap)
145*0Sstevel@tonic-gate {
146*0Sstevel@tonic-gate 	int msgid;
147*0Sstevel@tonic-gate 	int retcode;
148*0Sstevel@tonic-gate 	LDAPMessage *res = NULL;
149*0Sstevel@tonic-gate 
150*0Sstevel@tonic-gate 	if ((retcode = ldap_extended_operation(ld, exoid, exdata, serverctrls, clientctrls, &msgid)) != LDAP_SUCCESS)
151*0Sstevel@tonic-gate 		return (retcode);
152*0Sstevel@tonic-gate 	if (ldap_result(ld, msgid, 1, (struct timeval *)NULL, &res ) == -1)
153*0Sstevel@tonic-gate 		return (ld->ld_errno );
154*0Sstevel@tonic-gate 
155*0Sstevel@tonic-gate 	return (ldap_parse_extended_result(ld, res, retoidp, retdatap, 1));
156*0Sstevel@tonic-gate }
157