usage(const char *s)
{
fprintf(stderr,
- "Usage: %s [options]\n"
- " -D binddn\tbind dn\tREQUIRED\n"
+ "Usage: %s [options] dn\n"
+ " -A\t\tprompt for old password\n"
+ " -a secret\told password\n"
+ " -D binddn\tbind dn\n"
" -d level\tdebugging level\n"
" -h host\tldap server (default: localhost)\n"
" -n\t\tmake no modifications\n"
" -p port\tldap port\n"
+ " -S\t\tprompt for new password\n"
" -s secret\tnew password\n"
" -v\t\tincrease verbosity\n"
" -W\t\tprompt for bind password\n"
main( int argc, char *argv[] )
{
int rc;
+ char *ldaphost = NULL;
+
+ char *dn = NULL;
char *binddn = NULL;
+
char *bindpw = NULL;
- char *ldaphost = NULL;
char *newpw = NULL;
+ char *oldpw = NULL;
+
+ int want_bindpw = 0;
+ int want_newpw = 0;
+ int want_oldpw = 0;
+
int noupdates = 0;
- int i, j;
+ int i;
int ldapport = 0;
int debug = 0;
int version = -1;
- int want_bindpw = 0;
LDAP *ld;
- struct berval cred;
struct berval *bv = NULL;
- BerElement *ber;
char *retoid;
struct berval *retdata;
usage (argv[0]);
while( (i = getopt( argc, argv,
- "D:d:h:np:s:vWw:" )) != EOF )
+ "Aa:D:d:h:np:Ss:vWw:" )) != EOF )
{
switch (i) {
+ case 'A': /* prompt for oldr password */
+ want_oldpw++;
+ break;
+ case 'a': /* old password (secret) */
+ oldpw = strdup (optarg);
+
+ {
+ char* p;
+
+ for( p = optarg; *p == '\0'; p++ ) {
+ *p = '*';
+ }
+ }
+ break;
case 'D': /* bind distinguished name */
binddn = strdup (optarg);
break;
ldapport = strtol( optarg, NULL, 10 );
break;
+ case 'S': /* prompt for user password */
+ want_newpw++;
+ break;
+
case 's': /* new password (secret) */
newpw = strdup (optarg);
+
+ {
+ char* p;
+
+ for( p = optarg; *p == '\0'; p++ ) {
+ *p = '*';
+ }
+ }
break;
case 'v': /* verbose */
case 'w': /* bind password */
bindpw = strdup (optarg);
+
{
char* p;
}
}
- if( newpw == NULL ) {
+ if( argc - optind != 1 ) {
+ usage( argv[0] );
+ }
+
+ dn = strdup( argv[optind] );
+
+ if( want_oldpw && oldpw == NULL ) {
+ /* prompt for old password */
+ char *ckoldpw;
+ newpw = strdup(getpass("Old password: "));
+ ckoldpw = getpass("Re-enter old password: ");
+
+ if( strncmp( oldpw, ckoldpw, strlen(oldpw) )) {
+ fprintf( stderr, "passwords do not match\n" );
+ return EXIT_FAILURE;
+ }
+ }
+
+ if( want_newpw && newpw == NULL ) {
/* prompt for new password */
char *cknewpw;
newpw = strdup(getpass("New password: "));
}
}
- if( binddn == NULL ) {
- fprintf( stderr, "no bind DN specified\n" );
- return EXIT_FAILURE;
+ if( binddn == NULL && dn != NULL ) {
+ binddn = dn;
+ dn = NULL;
+
+ if( bindpw == NULL ) bindpw = oldpw;
}
- /* handle bind password */
- if (want_bindpw) {
+ if (want_bindpw && bindpw == NULL ) {
+ /* handle bind password */
fprintf( stderr, "Bind DN: %s\n", binddn );
bindpw = strdup( getpass("Enter bind password: "));
}
return EXIT_FAILURE;
}
- /* build change password control */
- ber = ber_alloc_t( LBER_USE_DER );
+ if( dn != NULL || oldpw != NULL || newpw != NULL ) {
+ /* build change password control */
+ BerElement *ber = ber_alloc_t( LBER_USE_DER );
- if( ber == NULL ) {
- perror( "ber_alloc_t" );
- ldap_unbind( ld );
- return EXIT_FAILURE;
- }
+ if( ber == NULL ) {
+ perror( "ber_alloc_t" );
+ ldap_unbind( ld );
+ return EXIT_FAILURE;
+ }
- ber_printf( ber, "{es}",
- (ber_int_t) 0,
- newpw );
+ ber_printf( ber, "{" /*}*/ );
- rc = ber_flatten( ber, &bv );
+ if( dn != NULL ) {
+ ber_printf( ber, "ts",
+ LDAP_TAG_EXOP_X_MODIFY_PASSWD_ID, dn );
+ free(dn);
+ }
- if( rc < 0 ) {
- perror( "ber_flatten" );
- ldap_unbind( ld );
- return EXIT_FAILURE;
- }
+ if( oldpw != NULL ) {
+ ber_printf( ber, "ts",
+ LDAP_TAG_EXOP_X_MODIFY_PASSWD_NEW, oldpw );
+ free(oldpw);
+ }
- ber_free( ber, 1 );
+ if( newpw != NULL ) {
+ ber_printf( ber, "ts",
+ LDAP_TAG_EXOP_X_MODIFY_PASSWD_NEW, newpw );
+ free(newpw);
+ }
+
+ ber_printf( ber, /*{*/ "}" );
+
+ rc = ber_flatten( ber, &bv );
+
+ if( rc < 0 ) {
+ perror( "ber_flatten" );
+ ldap_unbind( ld );
+ return EXIT_FAILURE;
+ }
+
+ ber_free( ber, 1 );
+ }
rc = ldap_extended_operation_s( ld,
LDAP_EXOP_X_MODIFY_PASSWD, bv,
ber_bvfree( bv );
+ if( retdata != NULL ) {
+ ber_tag_t tag;
+ char *s;
+ BerElement *ber = ber_init( retdata );
+
+ if( ber == NULL ) {
+ perror( "ber_init" );
+ ldap_unbind( ld );
+ return EXIT_FAILURE;
+ }
+
+ /* we should check the tag */
+ tag = ber_scanf( ber, "{a}", &s);
+
+ if( tag == LBER_ERROR ) {
+ perror( "ber_scanf" );
+ } else {
+ printf("New password: %s\n", s);
+ free( s );
+ }
+
+ ber_free( ber, 1 );
+ }
+
if ( rc != LDAP_SUCCESS ) {
ldap_perror( ld, "ldap_extended_operation" );
ldap_unbind( ld );