Skip to content
Snippets Groups Projects
ldapmodify.c 24.4 KiB
Newer Older
  • Learn to ignore specific revisions
  • Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    /* $OpenLDAP$ */
    /*
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
     * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
     * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
     */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    /* ldapmodify.c - generic program to modify or add entries using LDAP */
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include "portable.h"
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include <stdio.h>
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    #include <ac/stdlib.h>
    #include <ac/ctype.h>
    #include <ac/string.h>
    #include <ac/unistd.h>
    
    #ifdef HAVE_SYS_STAT_H
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include <sys/stat.h>
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #endif
    
    #ifdef HAVE_SYS_FILE_H
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include <sys/file.h>
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #endif
    #ifdef HAVE_FCNTL_H
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include <fcntl.h>
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #endif
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include <ldap.h>
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include "lutil.h"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include "lutil_ldap.h"
    #include "ldif.h"
    #include "ldap_defaults.h"
    #include "ldap_log.h"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include "ldap_pvt.h"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #include "common.h"
    
    
    static int	ldapadd, force = 0;
    static char *rejfile = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static LDAP	*ld = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    #define LDAPMOD_MAXLINE		4096
    
    /* strings found in replog/LDIF entries (mostly lifted from slurpd/slurp.h) */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_VERSION_STR		"version"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_REPLICA_STR		"replica"
    #define T_DN_STR		"dn"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_CONTROL_STR		"control"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_CHANGETYPESTR         "changetype"
    #define T_ADDCTSTR		"add"
    #define T_MODIFYCTSTR		"modify"
    #define T_DELETECTSTR		"delete"
    #define T_MODRDNCTSTR		"modrdn"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_MODDNCTSTR		"moddn"
    #define T_RENAMECTSTR		"rename"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_MODOPADDSTR		"add"
    #define T_MODOPREPLACESTR	"replace"
    #define T_MODOPDELETESTR	"delete"
    #define T_MODSEPSTR		"-"
    #define T_NEWRDNSTR		"newrdn"
    #define T_DELETEOLDRDNSTR	"deleteoldrdn"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #define T_NEWSUPSTR		"newsuperior"
    
    
    static int process_ldif_rec LDAP_P(( char *rbuf, int count ));
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static int parse_ldif_control LDAP_P(( char *line, LDAPControl ***pctrls ));
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static void addmodifyop LDAP_P((
    	LDAPMod ***pmodsp, int modop,
    	const char *attr,
    	struct berval *value ));
    static int domodify LDAP_P((
    	const char *dn,
    	LDAPMod **pmods,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        LDAPControl **pctrls,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	int newentry ));
    static int dodelete LDAP_P((
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	const char *dn,
        LDAPControl **pctrls ));
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static int dorename LDAP_P((
    	const char *dn,
    	const char *newrdn,
    	const char *newsup,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	int deleteoldrdn,
        LDAPControl **pctrls ));
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static char *read_one_record LDAP_P(( FILE *fp ));
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    void
    usage( void )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
        fprintf( stderr,
    "Add or modify entries from an LDAP server\n\n"
    "usage: %s [options]\n"
    "	The list of desired operations are read from stdin or from the file\n"
    "	specified by \"-f file\".\n"
    "Add or modify options:\n"
    "  -a         add values (default%s)\n"
    "  -F         force all changes records to be used\n"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    "  -S file    write skipped modifications to `file'\n"
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	         , prog, (ldapadd ? "" : " is to replace") );
    	tool_common_usage();
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        exit( EXIT_FAILURE );
    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    const char options[] = "aFrS:"
    	"cCd:D:e:f:h:H:IkKMnO:p:P:QR:U:vVw:WxX:y:Y:Z";
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    int
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    handle_private_option( int i )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	switch ( i ) {
    #if 0
    		char	*control, *cvalue;
    		int		crit;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	case 'E': /* modify controls */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if( protocol == LDAP_VERSION2 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			fprintf( stderr, "%s: -E incompatible with LDAPv%d\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    				prog, protocol );
    			exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    
    		/* should be extended to support comma separated list of
    		 *	[!]key[=value] parameters, e.g.  -E !foo,bar=567
    		 */
    
    		crit = 0;
    		cvalue = NULL;
    		if( optarg[0] == '!' ) {
    			crit = 1;
    			optarg++;
    		}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		control = ber_strdup( optarg );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if ( (cvalue = strchr( control, '=' )) != NULL ) {
    			*cvalue++ = '\0';
    		}
    		fprintf( stderr, "Invalid modify control name: %s\n", control );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		usage();
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #endif
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	case 'a':	/* add */
    	    ldapadd = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    break;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	case 'F':	/* force all changes records to be used */
    	    force = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    break;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	case 'r':	/* replace (obsolete) */
    		break;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	case 'S':	/* skipped modifications to file */
    		if( rejfile != NULL ) {
    			fprintf( stderr, "%s: -S previously specified\n", prog );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		rejfile = ber_strdup( optarg );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		break;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	default:
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		return 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	return 1;
    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    int
    main( int argc, char **argv )
    {
        char		*rbuf, *start, *rejbuf = NULL;
        FILE		*fp, *rejfp;
    	char		*matched_msg, *error_msg;
    	int		rc, retval;
    	int count, len;
    
        prog = lutil_progname( "ldapmodify", argc, argv );
    
    	/* strncmp instead of strcmp since NT binaries carry .exe extension */
        ldapadd = ( strncasecmp( prog, "ldapadd", sizeof("ldapadd")-1 ) == 0 );
    
        /* Print usage when no parameters */
        if( argc < 2 ) usage();
    
    	tool_args( argc, argv );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    	if ( argc != optind )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	usage();
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( rejfile != NULL ) {
    	if (( rejfp = fopen( rejfile, "w" )) == NULL ) {
    	    perror( rejfile );
    	    return( EXIT_FAILURE );
    	}
        } else {
    	rejfp = NULL;
        }
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( infile != NULL ) {
    	if (( fp = fopen( infile, "r" )) == NULL ) {
    	    perror( infile );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    return( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
        } else {
    	fp = stdin;
        }
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( debug )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		ldif_debug = debug;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	ld = tool_conn_setup( not, 0 );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( !not ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( pw_file || want_bindpw ) {
    		if ( pw_file ) {
    			rc = lutil_get_filed_password( pw_file, &passwd );
    			if( rc ) return EXIT_FAILURE;
    		} else {
    			passwd.bv_val = getpassphrase( "Enter LDAP Password: " );
    			passwd.bv_len = passwd.bv_val ? strlen( passwd.bv_val ) : 0;
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	tool_bind( ld );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( authzid || manageDSAit || noop )
    		tool_server_controls( ld, NULL, 0 );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    	count = 0;
    
    	retval = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while (( rc == 0 || contoper ) &&
    		( rbuf = read_one_record( fp )) != NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	count++;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    	start = rbuf;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( rejfp ) {
    		len = strlen( rbuf );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if (( rejbuf = (char *)ber_memalloc( len+1 )) == NULL ) {
    			perror( "malloc" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			exit( EXIT_FAILURE );
    		}
    		memcpy( rejbuf, rbuf, len+1 );
    	}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        rc = process_ldif_rec( start, count );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    	if ( rc )
    		retval = rc;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( rc && rejfp ) {
    		fprintf(rejfp, "# Error: %s (%d)", ldap_err2string(rc), rc);
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		matched_msg = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		ldap_get_option(ld, LDAP_OPT_MATCHED_DN, &matched_msg);
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if ( matched_msg != NULL ) {
    			if ( *matched_msg != '\0' )
    				fprintf( rejfp, ", matched DN: %s", matched_msg );
    			ldap_memfree( matched_msg );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		error_msg = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		ldap_get_option(ld, LDAP_OPT_ERROR_STRING, &error_msg);
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if ( error_msg != NULL ) {
    			if ( *error_msg != '\0' )
    				fprintf( rejfp, ", additional info: %s", error_msg );
    			ldap_memfree( error_msg );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    		fprintf( rejfp, "\n%s\n", rejbuf );
    	}
    		if (rejfp) 
    			free( rejbuf );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		free( rbuf );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
        if ( !not ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		ldap_unbind( ld );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( rejfp != NULL ) {
    	    fclose( rejfp );
        }
    
    
        return( retval );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    }
    
    
    static int
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    process_ldif_rec( char *rbuf, int count )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        char	*line, *dn, *type, *newrdn, *newsup, *p;
        int		rc, linenum, modop, replicaport;
        int		expect_modop, expect_sep, expect_ct, expect_newrdn, expect_newsup;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        int		expect_deleteoldrdn, deleteoldrdn;
        int		saw_replica, use_record, new_entry, delete_entry, got_all;
        LDAPMod	**pmods;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	int version;
    	struct berval val;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        LDAPControl **pctrls;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        new_entry = ldapadd;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        rc = got_all = saw_replica = delete_entry = modop = expect_modop = 0;
        expect_deleteoldrdn = expect_newrdn = expect_newsup = 0;
    	expect_sep = expect_ct = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        linenum = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	version = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        deleteoldrdn = 1;
        use_record = force;
        pmods = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        pctrls = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        dn = newrdn = newsup = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while ( rc == 0 && ( line = ldif_getline( &rbuf )) != NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	++linenum;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( expect_sep && strcasecmp( line, T_MODSEPSTR ) == 0 ) {
    	    expect_sep = 0;
    	    expect_ct = 1;
    	    continue;
    	}
    	
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( ldif_parse_line( line, &type, &val.bv_val, &val.bv_len ) < 0 ) {
    	    fprintf( stderr, "%s: invalid format (line %d) entry: \"%s\"\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    prog, linenum, dn == NULL ? "" : dn );
    	    rc = LDAP_PARAM_ERROR;
    	    break;
    	}
    
    	if ( dn == NULL ) {
    	    if ( !use_record && strcasecmp( type, T_REPLICA_STR ) == 0 ) {
    		++saw_replica;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if (( p = strchr( val.bv_val, ':' )) == NULL ) {
    		    replicaport = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		} else {
    		    *p++ = '\0';
    		    replicaport = atoi( p );
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if ( ldaphost != NULL && strcasecmp( val.bv_val, ldaphost ) == 0 &&
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			replicaport == ldapport ) {
    		    use_record = 1;
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    } else if ( count == 1 && linenum == 1 && 
    			strcasecmp( type, T_VERSION_STR ) == 0 )
    		{
    			if( val.bv_len == 0 || atoi(val.bv_val) != 1 ) {
    		    	fprintf( stderr, "%s: invalid version %s, line %d (ignored)\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			   	prog, val.bv_val, linenum );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			}
    			version++;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    } else if ( strcasecmp( type, T_DN_STR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if (( dn = ber_strdup( val.bv_val )) == NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    perror( "strdup" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    		expect_ct = 1;
    	    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    goto end_line;	/* skip all lines until we see "dn:" */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    	if ( expect_ct ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
            
            /* Check for "control" tag after dn and before changetype. */
            if (strcasecmp(type, T_CONTROL_STR) == 0) {
                /* Parse and add it to the list of controls */
                rc = parse_ldif_control( line, &pctrls );
                if (rc != 0) {
    		    	fprintf( stderr, "%s: Error processing %s line, line %d: %s\n",
    			   	prog, T_CONTROL_STR, linenum, ldap_err2string(rc) );
                }
                goto end_line;
            }
            
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    expect_ct = 0;
    	    if ( !use_record && saw_replica ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		printf( "%s: skipping change record for entry: %s\n"
    			"\t(LDAP host/port does not match replica: lines)\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			prog, dn );
    		free( dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		ber_memfree( type );
    		ber_memfree( val.bv_val );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		return( 0 );
    	    }
    
    	    if ( strcasecmp( type, T_CHANGETYPESTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #ifdef LIBERAL_CHANGETYPE_MODOP
    		/* trim trailing spaces (and log warning ...) */
    
    		int icnt;
    		for ( icnt = val.bv_len; --icnt > 0; ) {
    		    if ( !isspace( (unsigned char) val.bv_val[icnt] ) ) {
    			break;
    		    }
    		}
    
    		if ( ++icnt != val.bv_len ) {
    		    fprintf( stderr, "%s: illegal trailing space after \"%s: %s\" trimmed (line %d of entry \"%s\")\n",
    			    prog, T_CHANGETYPESTR, val.bv_val, linenum, dn );
    		    val.bv_val[icnt] = '\0';
    		}
    #endif /* LIBERAL_CHANGETYPE_MODOP */
    
    		if ( strcasecmp( val.bv_val, T_MODIFYCTSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			new_entry = 0;
    			expect_modop = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		} else if ( strcasecmp( val.bv_val, T_ADDCTSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			new_entry = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		} else if ( strcasecmp( val.bv_val, T_MODRDNCTSTR ) == 0
    			|| strcasecmp( val.bv_val, T_MODDNCTSTR ) == 0
    			|| strcasecmp( val.bv_val, T_RENAMECTSTR ) == 0)
    		{
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    expect_newrdn = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		} else if ( strcasecmp( val.bv_val, T_DELETECTSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    got_all = delete_entry = 1;
    		} else {
    		    fprintf( stderr,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			    "%s:  unknown %s \"%s\" (line %d of entry \"%s\")\n",
    			    prog, T_CHANGETYPESTR, val.bv_val, linenum, dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    rc = LDAP_PARAM_ERROR;
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		goto end_line;
    	    } else if ( ldapadd ) {		/*  missing changetype => add */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		new_entry = 1;
    		modop = LDAP_MOD_ADD;
    	    } else {
    		expect_modop = 1;	/* missing changetype => modify */
    	    }
    	}
    
    	if ( expect_modop ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    #ifdef LIBERAL_CHANGETYPE_MODOP
    	    /* trim trailing spaces (and log warning ...) */
    	    
    	    int icnt;
    	    for ( icnt = val.bv_len; --icnt > 0; ) {
    		if ( !isspace( (unsigned char) val.bv_val[icnt] ) ) {
    		    break;
    		}
    	    }
    	    
    	    if ( ++icnt != val.bv_len ) {
    		fprintf( stderr, "%s: illegal trailing space after \"%s: %s\" trimmed (line %d of entry \"%s\")\n",
        			prog, type, val.bv_val, linenum, dn );
    		val.bv_val[icnt] = '\0';
    	    }
    #endif /* LIBERAL_CHANGETYPE_MODOP */
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    expect_modop = 0;
    	    expect_sep = 1;
    	    if ( strcasecmp( type, T_MODOPADDSTR ) == 0 ) {
    		modop = LDAP_MOD_ADD;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		goto end_line;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    } else if ( strcasecmp( type, T_MODOPREPLACESTR ) == 0 ) {
    		modop = LDAP_MOD_REPLACE;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		addmodifyop( &pmods, modop, val.bv_val, NULL );
    		goto end_line;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    } else if ( strcasecmp( type, T_MODOPDELETESTR ) == 0 ) {
    		modop = LDAP_MOD_DELETE;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		addmodifyop( &pmods, modop, val.bv_val, NULL );
    		goto end_line;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    } else {	/* no modify op:  use default */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		modop = ldapadd ? LDAP_MOD_ADD : LDAP_MOD_REPLACE;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    }
    	}
    
    	if ( expect_newrdn ) {
    	    if ( strcasecmp( type, T_NEWRDNSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			if (( newrdn = ber_strdup( val.bv_val )) == NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    perror( "strdup" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    		expect_deleteoldrdn = 1;
    		expect_newrdn = 0;
    	    } else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		fprintf( stderr, "%s: expecting \"%s:\" but saw \"%s:\" (line %d of entry \"%s\")\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			prog, T_NEWRDNSTR, type, linenum, dn );
    		rc = LDAP_PARAM_ERROR;
    	    }
    	} else if ( expect_deleteoldrdn ) {
    	    if ( strcasecmp( type, T_DELETEOLDRDNSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		deleteoldrdn = ( *val.bv_val == '0' ) ? 0 : 1;
    		expect_deleteoldrdn = 0;
    		expect_newsup = 1;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		got_all = 1;
    	    } else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		fprintf( stderr, "%s: expecting \"%s:\" but saw \"%s:\" (line %d of entry \"%s\")\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			prog, T_DELETEOLDRDNSTR, type, linenum, dn );
    		rc = LDAP_PARAM_ERROR;
    	    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else if ( expect_newsup ) {
    	    if ( strcasecmp( type, T_NEWSUPSTR ) == 0 ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if (( newsup = ber_strdup( val.bv_val )) == NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    perror( "strdup" );
    		    exit( EXIT_FAILURE );
    		}
    		expect_newsup = 0;
    	    } else {
    		fprintf( stderr, "%s: expecting \"%s:\" but saw \"%s:\" (line %d of entry \"%s\")\n",
    			prog, T_NEWSUPSTR, type, linenum, dn );
    		rc = LDAP_PARAM_ERROR;
    	    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else if ( got_all ) {
    	    fprintf( stderr,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    "%s: extra lines at end (line %d of entry \"%s\")\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    prog, linenum, dn );
    	    rc = LDAP_PARAM_ERROR;
    	} else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		addmodifyop( &pmods, modop, type, &val );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    end_line:
    	ber_memfree( type );
    	ber_memfree( val.bv_val );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if( linenum == 0 ) {
    		return 0;
    	}
    
    	if( version && linenum == 1 ) {
    		return 0;
    	}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        /* If default controls are set (as with -M option) and controls are
           specified in the LDIF file, we must add the default controls to
           the list of controls sent with the ldap operation.
        */
        if ( rc == 0 ) {
            if (pctrls) {
                LDAPControl **defctrls = NULL;   /* Default server controls */
                LDAPControl **newctrls = NULL;
                ldap_get_option(ld, LDAP_OPT_SERVER_CONTROLS, &defctrls);
                if (defctrls) {
                    int npc=0;                  /* Number of LDIF controls */
                    int ndefc=0;                /* Number of default controls */
                    while (pctrls[npc])         /* Count LDIF controls */
                        npc++; 
                    while (defctrls[ndefc])     /* Count default controls */
                        ndefc++;
                    newctrls = ber_memrealloc(pctrls, (npc+ndefc+1)*sizeof(LDAPControl*));
                    if (newctrls == NULL)
                        rc = LDAP_NO_MEMORY;
                    else {
                        int i;
                        pctrls = newctrls;
                        for (i=npc; i<npc+ndefc; i++) {
                            pctrls[i] = ldap_control_dup(defctrls[i-npc]);
                            if (pctrls[i] == NULL) {
                                rc = LDAP_NO_MEMORY;
                                break;
                            }
                        }
                        pctrls[npc+ndefc] = NULL;
                    }
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
                    ldap_controls_free(defctrls);  /* Must be freed by library */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( rc == 0 ) {
    	if ( delete_entry ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    rc = dodelete( dn, pctrls );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else if ( newrdn != NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    rc = dorename( dn, newrdn, newsup, deleteoldrdn, pctrls );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    rc = domodify( dn, pmods, pctrls, new_entry );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    	if ( rc == LDAP_SUCCESS ) {
    	    rc = 0;
    	}
        }
    
        if ( dn != NULL ) {
    	free( dn );
        }
        if ( newrdn != NULL ) {
    	free( newrdn );
        }
        if ( pmods != NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	ldap_mods_free( pmods, 1 );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if (pctrls != NULL) {
            ldap_controls_free( pctrls );
        }
    
        return( rc );
    }
    
    /* Parse an LDIF control line of the form
          control:  oid  [true/false]  [: value]              or
          control:  oid  [true/false]  [:: base64-value]      or
          control:  oid  [true/false]  [:< url]
       The control is added to the list of controls in *ppctrls.
    */      
    static int
    parse_ldif_control( char *line, 
                        LDAPControl ***ppctrls )
    {
        char *oid = NULL;
        int criticality = 0;   /* Default is false if not present */
        char *type=NULL;
        char *val = NULL;
        ber_len_t value_len = 0;
        int i, rc=0;
        char *s, *oidStart, *pcolon;
        LDAPControl *newctrl = NULL;
        LDAPControl **pctrls = NULL;
    
        if (ppctrls) {
            pctrls = *ppctrls;
        }
        s = line + strlen(T_CONTROL_STR);  /* Skip over "control" */
        pcolon = s;                        /* Save this position for later */
        if (*s++ != ':')                   /* Make sure colon follows */
            return ( LDAP_PARAM_ERROR );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while (*s && isspace((unsigned char)*s))
    		s++;                           /* Skip white space before OID */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
        /* OID should come next. Validate and extract it. */
        if (*s == 0)
            return ( LDAP_PARAM_ERROR );
        oidStart = s;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while (isdigit((unsigned char)*s) || *s == '.')
    		s++;                           /* OID should be digits or . */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if (s == oidStart) 
            return ( LDAP_PARAM_ERROR );   /* OID was not present */
        if (*s) {                          /* End of OID should be space or NULL */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
            if (!isspace((unsigned char)*s))
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
                return ( LDAP_PARAM_ERROR ); /* else OID contained invalid chars */
            *s++ = 0;                    /* Replace space with null to terminate */
        }
    
        
        oid = ber_strdup(oidStart);
        if (oid == NULL)
            return ( LDAP_NO_MEMORY );
    
        /* Optional Criticality field is next. */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while (*s && isspace((unsigned char)*s))
    		s++;                         /* Skip white space before criticality */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if (strncasecmp(s, "true", 4) == 0) {
            criticality = 1;
            s += 4;
        } 
        else if (strncasecmp(s, "false", 5) == 0) {
            criticality = 0;
            s += 5;
        }
    
        /* Optional value field is next */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while (*s && isspace((unsigned char)*s))
    		s++;                         /* Skip white space before value */
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if (*s) {
            if (*s != ':') {           /* If value is present, must start with : */
                rc = LDAP_PARAM_ERROR;
                goto cleanup;
            }
    
            /* Shift value down over OID and criticality so it's in the form
                 control: value
                 control:: base64-value
                 control:< url
               Then we can use ldif_parse_line to extract and decode the value
            */
            while ( (*pcolon++ = *s++) != 0)     /* Shift value */
                ;
            rc = ldif_parse_line(line, &type, &val, &value_len);
            if (type)  ber_memfree(type);   /* Don't need this field*/
            if (rc < 0) {
                rc = LDAP_PARAM_ERROR;
                goto cleanup;
            }
        }
    
        /* Create a new LDAPControl structure. */
        newctrl = (LDAPControl *)ber_memalloc(sizeof(LDAPControl));
        if ( newctrl == NULL ) {
            rc = LDAP_NO_MEMORY;
            goto cleanup;
        }
        newctrl->ldctl_oid = oid;
        oid = NULL;
        newctrl->ldctl_iscritical = criticality;
        newctrl->ldctl_value.bv_len = value_len;
        newctrl->ldctl_value.bv_val = val;
        val = NULL;
    
        /* Add the new control to the passed-in list of controls. */
        i = 0;
        if (pctrls) {
            while ( pctrls[i] )      /* Count the # of controls passed in */
                i++;
        }
        /* Allocate 1 more slot for the new control and 1 for the NULL. */
        pctrls = (LDAPControl **)ber_memrealloc(pctrls, (i+2)*(sizeof(LDAPControl *)));
        if (pctrls == NULL) {
            rc = LDAP_NO_MEMORY;
            goto cleanup;
        }
        pctrls[i] = newctrl;
        newctrl = NULL;
        pctrls[i+1] = NULL;
        *ppctrls = pctrls;
    
    cleanup:
        if (newctrl) {
            if (newctrl->ldctl_oid)
                ber_memfree(newctrl->ldctl_oid);
            if (newctrl->ldctl_value.bv_val)
                ber_memfree(newctrl->ldctl_value.bv_val);
            ber_memfree(newctrl);
        }
        if (val)
            ber_memfree(val);
        if (oid)
            ber_memfree(oid);
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        return( rc );
    }
    
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    static void
    addmodifyop(
    	LDAPMod ***pmodsp,
    	int modop,
    	const char *attr,
    	struct berval *val )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	LDAPMod		**pmods;
    	int			i, j;
    
    	pmods = *pmodsp;
    	modop |= LDAP_MOD_BVALUES;
    
    	i = 0;
    	if ( pmods != NULL ) {
    		for ( ; pmods[ i ] != NULL; ++i ) {
    			if ( strcasecmp( pmods[ i ]->mod_type, attr ) == 0 &&
    				pmods[ i ]->mod_op == modop )
    			{
    				break;
    			}
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( pmods == NULL || pmods[ i ] == NULL ) {
    		if (( pmods = (LDAPMod **)ber_memrealloc( pmods, (i + 2) *
    			sizeof( LDAPMod * ))) == NULL )
    		{
    			perror( "realloc" );
    			exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		*pmodsp = pmods;
    		pmods[ i + 1 ] = NULL;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		pmods[ i ] = (LDAPMod *)ber_memcalloc( 1, sizeof( LDAPMod ));
    		if ( pmods[ i ] == NULL ) {
    			perror( "calloc" );
    			exit( EXIT_FAILURE );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		pmods[ i ]->mod_op = modop;
    		pmods[ i ]->mod_type = ber_strdup( attr );
    		if ( pmods[ i ]->mod_type == NULL ) {
    			perror( "strdup" );
    			exit( EXIT_FAILURE );
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if ( val != NULL ) {
    		j = 0;
    		if ( pmods[ i ]->mod_bvalues != NULL ) {
    			for ( ; pmods[ i ]->mod_bvalues[ j ] != NULL; ++j ) {
    				/* Empty */;
    			}
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		pmods[ i ]->mod_bvalues = (struct berval **) ber_memrealloc(
    			pmods[ i ]->mod_bvalues, (j + 2) * sizeof( struct berval * ));
    		if ( pmods[ i ]->mod_bvalues == NULL ) {
    			perror( "ber_realloc" );
    			exit( EXIT_FAILURE );
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		pmods[ i ]->mod_bvalues[ j + 1 ] = NULL;
    		pmods[ i ]->mod_bvalues[ j ] = ber_bvdup( val );
    		if ( pmods[ i ]->mod_bvalues[ j ] == NULL ) {
    			perror( "ber_bvdup" );
    			exit( EXIT_FAILURE );
    		}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    }
    
    
    static int
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    domodify(
    	const char *dn,
    	LDAPMod **pmods,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        LDAPControl **pctrls,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	int newentry )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
        int			i, j, k, notascii, op;
        struct berval	*bvp;
    
    
    Howard Chu's avatar
    Howard Chu committed
    	if ( dn == NULL ) {
    	fprintf( stderr, _("%s: no DN specified\n"), prog );
    	return( LDAP_PARAM_ERROR );
    	}
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( pmods == NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	fprintf( stderr, "%s: no attributes to change or add (entry=\"%s\")\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		prog, dn );
    	return( LDAP_PARAM_ERROR );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        } 
    
        for ( i = 0; pmods[ i ] != NULL; ++i ) {
    	op = pmods[ i ]->mod_op & ~LDAP_MOD_BVALUES;
    	if( op == LDAP_MOD_ADD && ( pmods[i]->mod_bvalues == NULL )) {
    		fprintf( stderr,
    			"%s: attribute \"%s\" has no values (entry=\"%s\")\n",
    			prog, pmods[i]->mod_type, dn );
    		return LDAP_PARAM_ERROR;
    	}
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
        if ( verbose ) {
    	for ( i = 0; pmods[ i ] != NULL; ++i ) {
    	    op = pmods[ i ]->mod_op & ~LDAP_MOD_BVALUES;
    	    printf( "%s %s:\n", op == LDAP_MOD_REPLACE ?
    		    "replace" : op == LDAP_MOD_ADD ?
    		    "add" : "delete", pmods[ i ]->mod_type );
    	    if ( pmods[ i ]->mod_bvalues != NULL ) {
    		for ( j = 0; pmods[ i ]->mod_bvalues[ j ] != NULL; ++j ) {
    		    bvp = pmods[ i ]->mod_bvalues[ j ];
    		    notascii = 0;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		    for ( k = 0; (unsigned long) k < bvp->bv_len; ++k ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			if ( !isascii( bvp->bv_val[ k ] )) {
    			    notascii = 1;
    			    break;
    			}
    		    }
    		    if ( notascii ) {
    			printf( "\tNOT ASCII (%ld bytes)\n", bvp->bv_len );
    		    } else {
    			printf( "\t%s\n", bvp->bv_val );
    		    }
    		}
    	    }
    	}
        }
    
        if ( newentry ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	printf( "%sadding new entry \"%s\"\n", not ? "!" : "", dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        } else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	printf( "%smodifying entry \"%s\"\n", not ? "!" : "", dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
        if ( !not ) {
    	if ( newentry ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    i = ldap_add_ext_s( ld, dn, pmods, pctrls, NULL );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	    i = ldap_modify_ext_s( ld, dn, pmods, pctrls, NULL );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	}
    	if ( i != LDAP_SUCCESS ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		/* print error message about failed update including DN */
    		fprintf( stderr, "%s: update failed: %s\n", prog, dn );
    		ldap_perror( ld, newentry ? "ldap_add" : "ldap_modify" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else if ( verbose ) {
    	    printf( "modify complete\n" );
    	}
        } else {
    	i = LDAP_SUCCESS;
        }
    
        putchar( '\n' );
    
        return( i );
    }
    
    
    static int
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    dodelete(
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	const char *dn,
        LDAPControl **pctrls )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
        int	rc;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        printf( "%sdeleting entry \"%s\"\n", not ? "!" : "", dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( !not ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if (( rc = ldap_delete_ext_s( ld, dn, pctrls, NULL )) != LDAP_SUCCESS ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		fprintf( stderr, "%s: delete failed: %s\n", prog, dn );
    		ldap_perror( ld, "ldap_delete" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else if ( verbose ) {
    	    printf( "delete complete" );
    	}
        } else {
    	rc = LDAP_SUCCESS;
        }
    
        putchar( '\n' );
    
        return( rc );
    }
    
    
    static int
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    dorename(
    	const char *dn,
    	const char *newrdn,
    	const char* newsup,
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	int deleteoldrdn,
        LDAPControl **pctrls )
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    {
        int	rc;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    
        printf( "%smodifying rdn of entry \"%s\"\n", not ? "!" : "", dn );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        if ( verbose ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	printf( "\tnew RDN: \"%s\" (%skeep existing values)\n",
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		newrdn, deleteoldrdn ? "do not " : "" );
        }
        if ( !not ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	if (( rc = ldap_rename_s( ld, dn, newrdn, newsup, deleteoldrdn, pctrls, NULL ))
    		!= LDAP_SUCCESS ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		fprintf( stderr, "%s: rename failed: %s\n", prog, dn );
    		ldap_perror( ld, "ldap_modrdn" );
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    	} else {
    	    printf( "modrdn completed\n" );
    	}
        } else {
    	rc = LDAP_SUCCESS;
        }
    
        putchar( '\n' );
    
        return( rc );
    }
    
    
    static char *
    read_one_record( FILE *fp )
    {
        char        *buf, line[ LDAPMOD_MAXLINE ];
        int		lcur, lmax;
    
        lcur = lmax = 0;
        buf = NULL;
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        while ( fgets( line, sizeof(line), fp ) != NULL ) {
        	int len = strlen( line );
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    		if( len < 2 || ( len == 2 && *line == '\r' )) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			if( buf == NULL ) {
    				continue;
    			} else {
    				break;
    			}
    		}
    
    		if ( lcur + len + 1 > lmax ) {
    			lmax = LDAPMOD_MAXLINE
    				* (( lcur + len + 1 ) / LDAPMOD_MAXLINE + 1 );
    
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    			if (( buf = (char *)ber_memrealloc( buf, lmax )) == NULL ) {
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
    				perror( "realloc" );
    				exit( EXIT_FAILURE );
    			}
    		}
    
    		strcpy( buf + lcur, line );
    		lcur += len;
    
    Kurt Zeilenga's avatar
    Kurt Zeilenga committed
        }
    
        return( buf );
    }