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_rename_req ( LDAP *ld, char *dn, char *newrdn, char *newparent, 31*0Sstevel@tonic-gate int deleteoldrdn, LDAPControl **serverctrls) 32*0Sstevel@tonic-gate { 33*0Sstevel@tonic-gate BerElement *ber; 34*0Sstevel@tonic-gate int rc; 35*0Sstevel@tonic-gate 36*0Sstevel@tonic-gate /* 37*0Sstevel@tonic-gate * A modify rdn request looks like this: 38*0Sstevel@tonic-gate * ModifyRDNRequest ::= SEQUENCE { 39*0Sstevel@tonic-gate * entry LDAPDN, 40*0Sstevel@tonic-gate * newrdn RelativeLDAPDN, 41*0Sstevel@tonic-gate * deleteoldrdn BOOLEAN 42*0Sstevel@tonic-gate * newSuperior [0] LDAPDN OPTIONAL 43*0Sstevel@tonic-gate * } 44*0Sstevel@tonic-gate */ 45*0Sstevel@tonic-gate 46*0Sstevel@tonic-gate /* create a message to send */ 47*0Sstevel@tonic-gate if ( (ber = alloc_ber_with_options( ld )) == NULLBER ) { 48*0Sstevel@tonic-gate return( NULLBER ); 49*0Sstevel@tonic-gate } 50*0Sstevel@tonic-gate 51*0Sstevel@tonic-gate if ( ber_printf( ber, "{it{ssb", ++ld->ld_msgid, LDAP_REQ_MODRDN, dn, 52*0Sstevel@tonic-gate newrdn, deleteoldrdn ) == -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 (newparent) { 59*0Sstevel@tonic-gate if ( ber_printf( ber, "ts}", LDAP_TAG_NEWPARENT, newparent) == -1){ 60*0Sstevel@tonic-gate ld->ld_errno = LDAP_ENCODING_ERROR; 61*0Sstevel@tonic-gate ber_free( ber, 1 ); 62*0Sstevel@tonic-gate return( NULLBER ); 63*0Sstevel@tonic-gate } 64*0Sstevel@tonic-gate 65*0Sstevel@tonic-gate } else if ( ber_printf( ber, "}" ) == -1 ) { 66*0Sstevel@tonic-gate ld->ld_errno = LDAP_ENCODING_ERROR; 67*0Sstevel@tonic-gate ber_free( ber, 1 ); 68*0Sstevel@tonic-gate return( NULLBER ); 69*0Sstevel@tonic-gate } 70*0Sstevel@tonic-gate /* LDAPv3 */ 71*0Sstevel@tonic-gate /* Code controls if any */ 72*0Sstevel@tonic-gate if (serverctrls && serverctrls[0]) { 73*0Sstevel@tonic-gate if (ldap_controls_code(ber, serverctrls) != 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 } else if (ld->ld_srvctrls && ld->ld_srvctrls[0]) { 79*0Sstevel@tonic-gate /* Otherwise, is there any global server ctrls ? */ 80*0Sstevel@tonic-gate if (ldap_controls_code(ber, ld->ld_srvctrls) != LDAP_SUCCESS){ 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 87*0Sstevel@tonic-gate if ( ber_printf( ber, "}" ) == -1 ) { 88*0Sstevel@tonic-gate ld->ld_errno = LDAP_ENCODING_ERROR; 89*0Sstevel@tonic-gate ber_free( ber, 1 ); 90*0Sstevel@tonic-gate return( NULLBER ); 91*0Sstevel@tonic-gate } 92*0Sstevel@tonic-gate 93*0Sstevel@tonic-gate return (ber); 94*0Sstevel@tonic-gate } 95*0Sstevel@tonic-gate 96*0Sstevel@tonic-gate /* ldap_rename - Modify the name of an entry. 97*0Sstevel@tonic-gate * Parameters : 98*0Sstevel@tonic-gate * ld : LDAP descriptor. 99*0Sstevel@tonic-gate * dn : DN of the object to rename. 100*0Sstevel@tonic-gate * newrdn : New RDN to give to the entry. 101*0Sstevel@tonic-gate * newparent : the parent or superior entry. If NULL only RDN is changed. 102*0Sstevel@tonic-gate * "" means the root DN. 103*0Sstevel@tonic-gate * deleteoldrdn : Boolean to indicate wether or not to remove the old RDN value. 104*0Sstevel@tonic-gate * serverctrls : List of Server controls. 105*0Sstevel@tonic-gate * clientctrls : List of client controls. 106*0Sstevel@tonic-gate * msgidp : the msg id return if renamed succeded. 107*0Sstevel@tonic-gate */ 108*0Sstevel@tonic-gate 109*0Sstevel@tonic-gate int ldap_rename(LDAP *ld, char *dn, char *newrdn, char *newparent, int deleteoldrdn, 110*0Sstevel@tonic-gate LDAPControl ** serverctrls, LDAPControl **clientctrls, int *msgidp) 111*0Sstevel@tonic-gate { 112*0Sstevel@tonic-gate BerElement *ber; 113*0Sstevel@tonic-gate int rv; 114*0Sstevel@tonic-gate 115*0Sstevel@tonic-gate #ifdef _REENTRANT 116*0Sstevel@tonic-gate LOCK_LDAP(ld); 117*0Sstevel@tonic-gate #endif 118*0Sstevel@tonic-gate Debug( LDAP_DEBUG_TRACE, catgets(slapdcat, 1, 87, "ldap_rename\n"), 0, 0, 0 ); 119*0Sstevel@tonic-gate 120*0Sstevel@tonic-gate if ((ber = ldap_build_rename_req(ld, dn, newrdn, newparent, deleteoldrdn, serverctrls)) == NULLBER){ 121*0Sstevel@tonic-gate rv = ld->ld_errno; 122*0Sstevel@tonic-gate if (rv == LDAP_SUCCESS) 123*0Sstevel@tonic-gate rv = LDAP_OTHER; 124*0Sstevel@tonic-gate #ifdef _REENTRANT 125*0Sstevel@tonic-gate UNLOCK_LDAP(ld); 126*0Sstevel@tonic-gate #endif 127*0Sstevel@tonic-gate return (rv); 128*0Sstevel@tonic-gate } 129*0Sstevel@tonic-gate 130*0Sstevel@tonic-gate /* send the message */ 131*0Sstevel@tonic-gate rv = send_initial_request( ld, LDAP_REQ_MODRDN, dn, ber ); 132*0Sstevel@tonic-gate if (rv == -1) { 133*0Sstevel@tonic-gate rv = ld->ld_errno; 134*0Sstevel@tonic-gate if (rv == LDAP_SUCCESS){ 135*0Sstevel@tonic-gate rv = LDAP_OTHER; 136*0Sstevel@tonic-gate } 137*0Sstevel@tonic-gate 138*0Sstevel@tonic-gate #ifdef _REENTRANT 139*0Sstevel@tonic-gate UNLOCK_LDAP(ld); 140*0Sstevel@tonic-gate #endif 141*0Sstevel@tonic-gate return (rv); 142*0Sstevel@tonic-gate } 143*0Sstevel@tonic-gate 144*0Sstevel@tonic-gate *msgidp = rv; 145*0Sstevel@tonic-gate #ifdef _REENTRANT 146*0Sstevel@tonic-gate UNLOCK_LDAP(ld); 147*0Sstevel@tonic-gate #endif 148*0Sstevel@tonic-gate return (LDAP_SUCCESS); 149*0Sstevel@tonic-gate 150*0Sstevel@tonic-gate } 151*0Sstevel@tonic-gate 152*0Sstevel@tonic-gate 153*0Sstevel@tonic-gate int ldap_rename_s(LDAP *ld, char *dn, char *newrdn, char *newparent, int deleteoldrdn, 154*0Sstevel@tonic-gate LDAPControl ** serverctrls, LDAPControl **clientctrls) 155*0Sstevel@tonic-gate { 156*0Sstevel@tonic-gate int msgid; 157*0Sstevel@tonic-gate int retcode = LDAP_SUCCESS; 158*0Sstevel@tonic-gate LDAPMessage *res; 159*0Sstevel@tonic-gate 160*0Sstevel@tonic-gate if ((retcode = ldap_rename(ld, dn, newrdn, newparent, deleteoldrdn, serverctrls, clientctrls, &msgid)) != LDAP_SUCCESS) 161*0Sstevel@tonic-gate return (retcode); 162*0Sstevel@tonic-gate if (ldap_result(ld, msgid, 1, (struct timeval *)NULL, &res ) == -1) 163*0Sstevel@tonic-gate return (ld->ld_errno ); 164*0Sstevel@tonic-gate 165*0Sstevel@tonic-gate #ifdef _REENTRANT 166*0Sstevel@tonic-gate LOCK_LDAP(ld); 167*0Sstevel@tonic-gate #endif 168*0Sstevel@tonic-gate retcode = ldap_parse_result( ld, res, &ld->ld_errno, &ld->ld_matched, &ld->ld_error, 169*0Sstevel@tonic-gate &ld->ld_referrals, &ld->ld_ret_ctrls, 1); 170*0Sstevel@tonic-gate if (retcode == LDAP_SUCCESS) 171*0Sstevel@tonic-gate retcode = ld->ld_errno; 172*0Sstevel@tonic-gate #ifdef _REENTRANT 173*0Sstevel@tonic-gate UNLOCK_LDAP(ld); 174*0Sstevel@tonic-gate #endif 175*0Sstevel@tonic-gate return (retcode); 176*0Sstevel@tonic-gate } 177