xref: /netbsd-src/external/bsd/openldap/dist/clients/tools/ldapmodrdn.c (revision 404fbe5fb94ca1e054339640cabb2801ce52dd30)
1 /* ldapmodrdn.c - generic program to modify an entry's RDN using LDAP */
2 /* $OpenLDAP: pkg/ldap/clients/tools/ldapmodrdn.c,v 1.116.2.4 2008/02/11 23:26:38 kurt Exp $ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 1998-2008 The OpenLDAP Foundation.
6  * Portions Copyright 1998-2003 Kurt D. Zeilenga.
7  * Portions Copyright 1998-2001 Net Boolean Incorporated.
8  * Portions Copyright 2001-2003 IBM Corporation.
9  * All rights reserved.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted only as authorized by the OpenLDAP
13  * Public License.
14  *
15  * A copy of this license is available in the file LICENSE in the
16  * top-level directory of the distribution or, alternatively, at
17  * <http://www.OpenLDAP.org/license.html>.
18  */
19 /* Portions Copyright 1999, Juan C. Gomez, All rights reserved.
20  * This software is not subject to any license of Silicon Graphics
21  * Inc. or Purdue University.
22  *
23  * Redistribution and use in source and binary forms are permitted
24  * without restriction or fee of any kind as long as this notice
25  * is preserved.
26  */
27 /* Portions Copyright (c) 1992-1996 Regents of the University of Michigan.
28  * All rights reserved.
29  *
30  * Redistribution and use in source and binary forms are permitted
31  * provided that this notice is preserved and that due credit is given
32  * to the University of Michigan at Ann Arbor.  The name of the
33  * University may not be used to endorse or promote products derived
34  * from this software without specific prior written permission.  This
35  * software is provided ``as is'' without express or implied warranty.
36  */
37 /* ACKNOWLEDGEMENTS:
38  * This work was originally developed by the University of Michigan
39  * (as part of U-MICH LDAP).  Additional significant contributors
40  * include:
41  *    Kurt D. Zeilenga
42  *    Juan C Gomez
43  */
44 
45 
46 #include "portable.h"
47 
48 #include <stdio.h>
49 
50 #include <ac/stdlib.h>
51 
52 #include <ac/ctype.h>
53 #include <ac/string.h>
54 #include <ac/unistd.h>
55 #include <ac/socket.h>
56 #include <ac/time.h>
57 
58 #include <ldap.h>
59 #include "lutil.h"
60 #include "lutil_ldap.h"
61 #include "ldap_defaults.h"
62 
63 #include "common.h"
64 
65 
66 static char	*newSuperior = NULL;
67 static int   remove_old_RDN = 0;
68 
69 
70 static int domodrdn(
71     LDAP	*ld,
72     char	*dn,
73     char	*rdn,
74     char	*newSuperior,
75     int		remove );	/* flag: remove old RDN */
76 
77 void
78 usage( void )
79 {
80 	fprintf( stderr, _("Rename LDAP entries\n\n"));
81 	fprintf( stderr, _("usage: %s [options] [dn rdn]\n"), prog);
82 	fprintf( stderr, _("	dn rdn: If given, rdn will replace the RDN of the entry specified by DN\n"));
83 	fprintf( stderr, _("		If not given, the list of modifications is read from stdin or\n"));
84 	fprintf( stderr, _("		from the file specified by \"-f file\" (see man page).\n"));
85 	fprintf( stderr, _("Rename options:\n"));
86 	fprintf( stderr, _("  -r         remove old RDN\n"));
87 	fprintf( stderr, _("  -s newsup  new superior entry\n"));
88 	tool_common_usage();
89 	exit( EXIT_FAILURE );
90 }
91 
92 
93 const char options[] = "rs:"
94 	"cd:D:e:f:h:H:IMnO:o:p:P:QR:U:vVw:WxX:y:Y:Z";
95 
96 int
97 handle_private_option( int i )
98 {
99 	switch ( i ) {
100 #if 0
101 		int crit;
102 		char *control, *cvalue;
103 	case 'E': /* modrdn extensions */
104 		if( protocol == LDAP_VERSION2 ) {
105 			fprintf( stderr, _("%s: -E incompatible with LDAPv%d\n"),
106 				prog, version );
107 			exit( EXIT_FAILURE );
108 		}
109 
110 		/* should be extended to support comma separated list of
111 		 *	[!]key[=value] parameters, e.g.  -E !foo,bar=567
112 		 */
113 
114 		crit = 0;
115 		cvalue = NULL;
116 		if( optarg[0] == '!' ) {
117 			crit = 1;
118 			optarg++;
119 		}
120 
121 		control = strdup( optarg );
122 		if ( (cvalue = strchr( control, '=' )) != NULL ) {
123 			*cvalue++ = '\0';
124 		}
125 		fprintf( stderr, _("Invalid modrdn extension name: %s\n"), control );
126 		usage();
127 #endif
128 
129 	case 'r':	/* remove old RDN */
130 	    remove_old_RDN++;
131 	    break;
132 
133 	case 's':	/* newSuperior */
134 		if( protocol == LDAP_VERSION2 ) {
135 			fprintf( stderr, _("%s: -X incompatible with LDAPv%d\n"),
136 				prog, protocol );
137 			exit( EXIT_FAILURE );
138 		}
139 	    newSuperior = strdup( optarg );
140 	    protocol = LDAP_VERSION3;
141 	    break;
142 
143 	default:
144 		return 0;
145 	}
146 	return 1;
147 }
148 
149 
150 int
151 main(int argc, char **argv)
152 {
153     char		*entrydn = NULL, *rdn = NULL, buf[ 4096 ];
154     FILE		*fp;
155     LDAP		*ld;
156 	int		rc, retval, havedn;
157 
158     tool_init( TOOL_MODRDN );
159     prog = lutil_progname( "ldapmodrdn", argc, argv );
160 
161 	tool_args( argc, argv );
162 
163     havedn = 0;
164     if (argc - optind == 2) {
165 	if (( rdn = strdup( argv[argc - 1] )) == NULL ) {
166 	    perror( "strdup" );
167 	    return( EXIT_FAILURE );
168 	}
169         if (( entrydn = strdup( argv[argc - 2] )) == NULL ) {
170 	    perror( "strdup" );
171 	    return( EXIT_FAILURE );
172         }
173 	++havedn;
174     } else if ( argc - optind != 0 ) {
175 	fprintf( stderr, _("%s: invalid number of arguments (%d), only two allowed\n"), prog, argc-optind );
176 	usage();
177     }
178 
179     if ( infile != NULL ) {
180 	if (( fp = fopen( infile, "r" )) == NULL ) {
181 	    perror( infile );
182 	    return( EXIT_FAILURE );
183 	}
184     } else {
185 	fp = stdin;
186     }
187 
188 	ld = tool_conn_setup( 0, 0 );
189 
190 	if ( pw_file || want_bindpw ) {
191 		if ( pw_file ) {
192 			rc = lutil_get_filed_password( pw_file, &passwd );
193 			if( rc ) return EXIT_FAILURE;
194 		} else {
195 			passwd.bv_val = getpassphrase( _("Enter LDAP Password: ") );
196 			passwd.bv_len = passwd.bv_val ? strlen( passwd.bv_val ) : 0;
197 		}
198 	}
199 
200 	tool_bind( ld );
201 
202 	tool_server_controls( ld, NULL, 0 );
203 
204     retval = rc = 0;
205     if (havedn)
206 	retval = domodrdn( ld, entrydn, rdn, newSuperior, remove_old_RDN );
207     else while ((rc == 0 || contoper) && fgets(buf, sizeof(buf), fp) != NULL) {
208 	if ( *buf != '\n' ) {	/* blank lines optional, skip */
209 	    buf[ strlen( buf ) - 1 ] = '\0';	/* remove nl */
210 
211 	    if ( havedn ) {	/* have DN, get RDN */
212 		if (( rdn = strdup( buf )) == NULL ) {
213                     perror( "strdup" );
214                     return( EXIT_FAILURE );
215 		}
216 		rc = domodrdn(ld, entrydn, rdn, newSuperior, remove_old_RDN );
217 		if ( rc != 0 )
218 			retval = rc;
219 		havedn = 0;
220 	    } else if ( !havedn ) {	/* don't have DN yet */
221 	        if (( entrydn = strdup( buf )) == NULL ) {
222 		    perror( "strdup" );
223 		    return( EXIT_FAILURE );
224 	        }
225 		++havedn;
226 	    }
227 	}
228     }
229 
230 	tool_unbind( ld );
231 	tool_destroy();
232     return( retval );
233 }
234 
235 static int domodrdn(
236     LDAP	*ld,
237     char	*dn,
238     char	*rdn,
239     char	*newSuperior,
240     int		remove ) /* flag: remove old RDN */
241 {
242 	int rc, code, id;
243 	char *matcheddn=NULL, *text=NULL, **refs=NULL;
244 	LDAPControl **ctrls = NULL;
245 	LDAPMessage *res;
246 
247     if ( verbose ) {
248 		printf( _("Renaming \"%s\"\n"), dn );
249 		printf( _("\tnew rdn=\"%s\" (%s old rdn)\n"),
250 			rdn, remove ? _("delete") : _("keep") );
251 		if( newSuperior != NULL ) {
252 			printf(_("\tnew parent=\"%s\"\n"), newSuperior);
253 		}
254 	}
255 
256 	if( dont ) return LDAP_SUCCESS;
257 
258 	rc = ldap_rename( ld, dn, rdn, newSuperior, remove,
259 		NULL, NULL, &id );
260 
261 	if ( rc != LDAP_SUCCESS ) {
262 		fprintf( stderr, "%s: ldap_rename: %s (%d)\n",
263 			prog, ldap_err2string( rc ), rc );
264 		return rc;
265 	}
266 
267 	for ( ; ; ) {
268 		struct timeval	tv = { 0, 0 };
269 
270 		if ( tool_check_abandon( ld, id ) ) {
271 			return LDAP_CANCELLED;
272 		}
273 
274 		tv.tv_sec = 0;
275 		tv.tv_usec = 100000;
276 
277 		rc = ldap_result( ld, LDAP_RES_ANY, LDAP_MSG_ALL, &tv, &res );
278 		if ( rc < 0 ) {
279 			tool_perror( "ldap_result", rc, NULL, NULL, NULL, NULL );
280 			return rc;
281 		}
282 
283 		if ( rc != 0 ) {
284 			break;
285 		}
286 	}
287 
288 	rc = ldap_parse_result( ld, res, &code, &matcheddn, &text, &refs, &ctrls, 1 );
289 
290 	if( rc != LDAP_SUCCESS ) {
291 		fprintf( stderr, "%s: ldap_parse_result: %s (%d)\n",
292 			prog, ldap_err2string( rc ), rc );
293 		return rc;
294 	}
295 
296 	if( verbose || code != LDAP_SUCCESS ||
297 		(matcheddn && *matcheddn) || (text && *text) || (refs && *refs) )
298 	{
299 		printf( _("Rename Result: %s (%d)\n"),
300 			ldap_err2string( code ), code );
301 
302 		if( text && *text ) {
303 			printf( _("Additional info: %s\n"), text );
304 		}
305 
306 		if( matcheddn && *matcheddn ) {
307 			printf( _("Matched DN: %s\n"), matcheddn );
308 		}
309 
310 		if( refs ) {
311 			int i;
312 			for( i=0; refs[i]; i++ ) {
313 				printf(_("Referral: %s\n"), refs[i] );
314 			}
315 		}
316 	}
317 
318 	if (ctrls) {
319 		tool_print_ctrls( ld, ctrls );
320 		ldap_controls_free( ctrls );
321     }
322 
323 	ber_memfree( text );
324 	ber_memfree( matcheddn );
325 	ber_memvfree( (void **) refs );
326 
327 	return code;
328 }
329