]> git.sur5r.net Git - openldap/blob - clients/tools/ldapmodrdn.c
add "What Failed?" LDAP control (ITS#5784)
[openldap] / clients / tools / ldapmodrdn.c
1 /* ldapmodrdn.c - generic program to modify an entry's RDN using LDAP */
2 /* $OpenLDAP$ */
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 }