]> git.sur5r.net Git - openldap/blobdiff - clients/tools/ldappasswd.c
fix previous commit (ITS#3905)
[openldap] / clients / tools / ldappasswd.c
index e3f9c187e113868d7ef934bcb9563f10cf001a0a..31556695c0f310e4bbeeb7a6566bfc41ff59d7ec 100644 (file)
@@ -1,7 +1,36 @@
+/* ldappasswd -- a tool for change LDAP passwords */
 /* $OpenLDAP$ */
-/*
- * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
- * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
+/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
+ *
+ * Copyright 1998-2005 The OpenLDAP Foundation.
+ * Portions Copyright 1998-2003 Kurt D. Zeilenga.
+ * Portions Copyright 1998-2001 Net Boolean Incorporated.
+ * Portions Copyright 2001-2003 IBM Corporation.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted only as authorized by the OpenLDAP
+ * Public License.
+ *
+ * A copy of this license is available in the file LICENSE in the
+ * top-level directory of the distribution or, alternatively, at
+ * <http://www.OpenLDAP.org/license.html>.
+ */
+/* Portions Copyright (c) 1992-1996 Regents of the University of Michigan.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that this notice is preserved and that due credit is given
+ * to the University of Michigan at Ann Arbor.  The name of the
+ * University may not be used to endorse or promote products derived
+ * from this software without specific prior written permission.  This
+ * software is provided ``as is'' without express or implied warranty.
+ */
+/* ACKNOWLEDGEMENTS:
+ * The original ldappasswd(1) tool was developed by Dave Storey (F5
+ * Network), based on other OpenLDAP client tools (which are, of
+ * course, based on U-MICH LDAP).  This version was rewritten
+ * by Kurt D. Zeilenga (based on other OpenLDAP client tools).
  */
 
 #include "portable.h"
 #include "common.h"
 
 
-static char    *newpw = NULL;
-static char    *oldpw = NULL;
+static struct berval newpw = { 0, NULL };
+static struct berval oldpw = { 0, NULL };
+
 static int   want_newpw = 0;
 static int   want_oldpw = 0;
 
+static char *oldpwfile = NULL;
+static char *newpwfile = NULL;
 
 void
 usage( void )
 {
-       fprintf(stderr,
-"Change password of an LDAP user\n\n"
-"usage: %s [options] [user]\n"
-"  user: the autentication identity, commonly a DN\n"
-"Password change options:\n"
-"  -a secret  old password\n"
-"  -A         prompt for old password\n"
-"  -s secret  new password\n"
-"  -S         prompt for new password\n"
-               , prog );
+       fprintf( stderr, _("Change password of an LDAP user\n\n"));
+       fprintf( stderr,_("usage: %s [options] [user]\n"), prog);
+       fprintf( stderr, _("  user: the authentication identity, commonly a DN\n"));
+       fprintf( stderr, _("Password change options:\n"));
+       fprintf( stderr, _("  -a secret  old password\n"));
+       fprintf( stderr, _("  -A         prompt for old password\n"));
+       fprintf( stderr, _("  -t file    read file for old password\n"));
+       fprintf( stderr, _("  -s secret  new password\n"));
+       fprintf( stderr, _("  -S         prompt for new password\n"));
+       fprintf( stderr, _("  -T file    read file for new password\n"));
        tool_common_usage();
        exit( EXIT_FAILURE );
 }
 
 
-const char options[] = "a:As:S" "Cd:D:e:h:H:InO:p:QR:U:vw:WxX:Y:Z";
+const char options[] = "a:As:St:T:"
+       "d:D:e:h:H:InO:p:QR:U:vVw:WxX:y:Y:Z";
 
 int
 handle_private_option( int i )
 {
        switch ( i ) {
 #if 0
+       case 'E': /* passwd extensions */ {
                int             crit;
                char    *control, *cvalue;
-       case 'E': /* passwd controls */
-               if( version == LDAP_VERSION2 ) {
-                       fprintf( stderr, "%s: -E incompatible with LDAPv%d\n",
-                                prog, version );
+               if( protocol == LDAP_VERSION2 ) {
+                       fprintf( stderr, _("%s: -E incompatible with LDAPv%d\n"),
+                                prog, protocol );
                        exit( EXIT_FAILURE );
                }
 
@@ -79,19 +112,20 @@ handle_private_option( int i )
                if ( (cvalue = strchr( control, '=' )) != NULL ) {
                        *cvalue++ = '\0';
                }
-               fprintf( stderr, "Invalid passwd control name: %s\n", control );
+               fprintf( stderr, _("Invalid passwd extension name: %s\n"), control );
                usage();
+               }
 #endif
 
        case 'a':       /* old password (secret) */
-               oldpw = strdup (optarg);
-
+               oldpw.bv_val = strdup( optarg );
                {
                        char* p;
                        for( p = optarg; *p != '\0'; p++ ) {
                                *p = '\0';
                        }
                }
+               oldpw.bv_len = strlen( oldpw.bv_val );
                break;
 
        case 'A':       /* prompt for old password */
@@ -99,19 +133,28 @@ handle_private_option( int i )
                break;
 
        case 's':       /* new password (secret) */
-               newpw = strdup (optarg);
+               newpw.bv_val = strdup (optarg);
                {
                        char* p;
                        for( p = optarg; *p != '\0'; p++ ) {
                                *p = '\0';
                        }
                }
+               newpw.bv_len = strlen( newpw.bv_val );
                break;
 
        case 'S':       /* prompt for user password */
                want_newpw++;
                break;
 
+       case 't':
+               oldpwfile = optarg;
+               break;
+
+       case 'T':
+               newpwfile = optarg;
+               break;
+
        default:
                return 0;
        }
@@ -126,7 +169,8 @@ main( int argc, char *argv[] )
        char    *user = NULL;
 
        LDAP           *ld = NULL;
-       struct berval *bv = NULL;
+       struct berval bv = {0, NULL};
+       BerElement  *ber = NULL;
 
        int id, code = LDAP_OTHER;
        LDAPMessage *res;
@@ -134,10 +178,11 @@ main( int argc, char *argv[] )
        char    *retoid = NULL;
        struct berval *retdata = NULL;
 
-    prog = lutil_progname( "ldappasswd", argc, argv );
+    tool_init();
+       prog = lutil_progname( "ldappasswd", argc, argv );
 
        /* LDAPv3 only */
-       version = LDAP_VERSION3;
+       protocol = LDAP_VERSION3;
 
        tool_args( argc, argv );
 
@@ -149,37 +194,65 @@ main( int argc, char *argv[] )
                user = NULL;
        }
 
-       if( want_oldpw && oldpw == NULL ) {
+       if( oldpwfile ) {
+               rc = lutil_get_filed_password( oldpwfile, &oldpw );
+               if( rc ) {
+                       rc = EXIT_FAILURE;
+                       goto done;
+               }
+       }
+
+       if( want_oldpw && oldpw.bv_val == NULL ) {
                /* prompt for old password */
                char *ckoldpw;
-               oldpw = strdup(getpassphrase("Old password: "));
-               ckoldpw = getpassphrase("Re-enter old password: ");
+               oldpw.bv_val = strdup(getpassphrase(_("Old password: ")));
+               ckoldpw = getpassphrase(_("Re-enter old password: "));
 
-               if( oldpw== NULL || ckoldpw == NULL ||
-                       strcmp( oldpw, ckoldpw ))
+               if( oldpw.bv_val == NULL || ckoldpw == NULL ||
+                       strcmp( oldpw.bv_val, ckoldpw ))
                {
-                       fprintf( stderr, "passwords do not match\n" );
-                       return EXIT_FAILURE;
+                       fprintf( stderr, _("passwords do not match\n") );
+                       rc = EXIT_FAILURE;
+                       goto done;
+               }
+
+               oldpw.bv_len = strlen( oldpw.bv_val );
+       }
+
+       if( newpwfile ) {
+               rc = lutil_get_filed_password( newpwfile, &newpw );
+               if( rc ) {
+                       rc = EXIT_FAILURE;
+                       goto done;
                }
        }
 
-       if( want_newpw && newpw == NULL ) {
+       if( want_newpw && newpw.bv_val == NULL ) {
                /* prompt for new password */
                char *cknewpw;
-               newpw = strdup(getpassphrase("New password: "));
-               cknewpw = getpassphrase("Re-enter new password: ");
+               newpw.bv_val = strdup(getpassphrase(_("New password: ")));
+               cknewpw = getpassphrase(_("Re-enter new password: "));
 
-               if( newpw== NULL || cknewpw == NULL ||
-                       strcmp( newpw, cknewpw ))
+               if( newpw.bv_val == NULL || cknewpw == NULL ||
+                       strcmp( newpw.bv_val, cknewpw ))
                {
-                       fprintf( stderr, "passwords do not match\n" );
-                       return EXIT_FAILURE;
+                       fprintf( stderr, _("passwords do not match\n") );
+                       rc = EXIT_FAILURE;
+                       goto done;
                }
+
+               newpw.bv_len = strlen( newpw.bv_val );
        }
 
-       if (want_bindpw && passwd.bv_val == NULL ) {
-               /* handle bind password */
-               passwd.bv_val = strdup( getpassphrase("Enter bind password: "));
+       if ( pw_file ) {
+               rc = lutil_get_filed_password( pw_file, &passwd );
+               if( rc ) {
+                       rc = EXIT_FAILURE;
+                       goto done;
+               }
+
+       } else if ( want_bindpw ) {
+               passwd.bv_val = getpassphrase( _("Enter LDAP Password: ") );
                passwd.bv_len = passwd.bv_val ? strlen( passwd.bv_val ) : 0;
        }
 
@@ -187,17 +260,18 @@ main( int argc, char *argv[] )
 
        tool_bind( ld );
 
-       if ( authzid || manageDSAit || noop )
+       if ( assertion || authzid || manageDSAit || noop ) {
                tool_server_controls( ld, NULL, 0 );
+       }
 
-       if( user != NULL || oldpw != NULL || newpw != NULL ) {
+       if( user != NULL || oldpw.bv_val != NULL || newpw.bv_val != NULL ) {
                /* build change password control */
-               BerElement *ber = ber_alloc_t( LBER_USE_DER );
+               ber = ber_alloc_t( LBER_USE_DER );
 
                if( ber == NULL ) {
                        perror( "ber_alloc_t" );
-                       ldap_unbind( ld );
-                       return EXIT_FAILURE;
+                       rc = EXIT_FAILURE;
+                       goto done;
                }
 
                ber_printf( ber, "{" /*}*/ );
@@ -208,77 +282,93 @@ main( int argc, char *argv[] )
                        free(user);
                }
 
-               if( oldpw != NULL ) {
-                       ber_printf( ber, "ts",
-                               LDAP_TAG_EXOP_MODIFY_PASSWD_OLD, oldpw );
-                       free(oldpw);
+               if( oldpw.bv_val != NULL ) {
+                       ber_printf( ber, "tO",
+                               LDAP_TAG_EXOP_MODIFY_PASSWD_OLD, &oldpw );
+                       free(oldpw.bv_val);
                }
 
-               if( newpw != NULL ) {
-                       ber_printf( ber, "ts",
-                               LDAP_TAG_EXOP_MODIFY_PASSWD_NEW, newpw );
-                       free(newpw);
+               if( newpw.bv_val != NULL ) {
+                       ber_printf( ber, "tO",
+                               LDAP_TAG_EXOP_MODIFY_PASSWD_NEW, &newpw );
+                       free(newpw.bv_val);
                }
 
                ber_printf( ber, /*{*/ "N}" );
 
-               rc = ber_flatten( ber, &bv );
+               rc = ber_flatten2( ber, &bv, 0 );
 
                if( rc < 0 ) {
-                       perror( "ber_flatten" );
-                       ldap_unbind( ld );
-                       return EXIT_FAILURE;
+                       perror( "ber_flatten2" );
+                       rc = EXIT_FAILURE;
+                       goto done;
                }
-
-               ber_free( ber, 1 );
        }
 
        if ( not ) {
                rc = LDAP_SUCCESS;
-               goto skip;
+               goto done;
        }
 
        rc = ldap_extended_operation( ld,
-               LDAP_EXOP_MODIFY_PASSWD, bv, 
+               LDAP_EXOP_MODIFY_PASSWD, bv.bv_val ? &bv : NULL
                NULL, NULL, &id );
 
-       ber_bvfree( bv );
+       ber_free( ber, 1 );
 
        if( rc != LDAP_SUCCESS ) {
                ldap_perror( ld, "ldap_extended_operation" );
-               ldap_unbind( ld );
-               return EXIT_FAILURE;
+               rc = EXIT_FAILURE;
+               goto done;
        }
 
-       rc = ldap_result( ld, LDAP_RES_ANY, LDAP_MSG_ALL, NULL, &res );
-       if ( rc < 0 ) {
-               ldap_perror( ld, "ldappasswd: ldap_result" );
-               return rc;
+       for ( ; ; ) {
+               struct timeval  tv;
+
+               if ( tool_check_abandon( ld, id ) ) {
+                       return LDAP_CANCELLED;
+               }
+
+               tv.tv_sec = 0;
+               tv.tv_usec = 100000;
+
+               rc = ldap_result( ld, LDAP_RES_ANY, LDAP_MSG_ALL, &tv, &res );
+               if ( rc < 0 ) {
+                       ldap_perror( ld, "ldappasswd: ldap_result" );
+                       return rc;
+               }
+
+               if ( rc != 0 ) {
+                       break;
+               }
        }
 
-       rc = ldap_parse_result( ld, res, &code, &matcheddn, &text, &refs, NULL, 0 );
+       rc = ldap_parse_result( ld, res,
+               &code, &matcheddn, &text, &refs, NULL, 0 );
 
        if( rc != LDAP_SUCCESS ) {
                ldap_perror( ld, "ldap_parse_result" );
-               return rc;
+               rc = EXIT_FAILURE;
+               goto done;
        }
 
        rc = ldap_parse_extended_result( ld, res, &retoid, &retdata, 1 );
 
        if( rc != LDAP_SUCCESS ) {
                ldap_perror( ld, "ldap_parse_result" );
-               return rc;
+               rc = EXIT_FAILURE;
+               goto done;
        }
 
        if( retdata != NULL ) {
                ber_tag_t tag;
                char *s;
-               BerElement *ber = ber_init( retdata );
+               ber = ber_init( retdata );
 
                if( ber == NULL ) {
                        perror( "ber_init" );
-                       ldap_unbind( ld );
-                       return EXIT_FAILURE;
+                       rc = EXIT_FAILURE;
+                       goto done;
                }
 
                /* we should check the tag */
@@ -287,7 +377,7 @@ main( int argc, char *argv[] )
                if( tag == LBER_ERROR ) {
                        perror( "ber_scanf" );
                } else {
-                       printf("New password: %s\n", s);
+                       printf(_("New password: %s\n"), s);
                        free( s );
                }
 
@@ -295,20 +385,20 @@ main( int argc, char *argv[] )
        }
 
        if( verbose || code != LDAP_SUCCESS || matcheddn || text || refs ) {
-               printf( "Result: %s (%d)\n", ldap_err2string( code ), code );
+               printf( _("Result: %s (%d)\n"), ldap_err2string( code ), code );
 
                if( text && *text ) {
-                       printf( "Additional info: %s\n", text );
+                       printf( _("Additional info: %s\n"), text );
                }
 
                if( matcheddn && *matcheddn ) {
-                       printf( "Matched DN: %s\n", matcheddn );
+                       printf( _("Matched DN: %s\n"), matcheddn );
                }
 
                if( refs ) {
                        int i;
                        for( i=0; refs[i]; i++ ) {
-                               printf("Referral: %s\n", refs[i] );
+                               printf(_("Referral: %s\n"), refs[i] );
                        }
                }
        }
@@ -319,9 +409,11 @@ main( int argc, char *argv[] )
        ber_memfree( retoid );
        ber_bvfree( retdata );
 
-skip:
-       /* disconnect from server */
-       ldap_unbind (ld);
+       rc = ( code == LDAP_SUCCESS ) ? EXIT_SUCCESS : EXIT_FAILURE;
 
-       return code == LDAP_SUCCESS ? EXIT_SUCCESS : EXIT_FAILURE;
+done:
+       /* disconnect from server */
+       tool_unbind( ld ); 
+       tool_destroy();
+       return rc;
 }