10 #include <ac/unistd.h>
12 #include "ldap_defaults.h"
14 #include "../back-bdb2/back-bdb2.h"
20 static char *tailorfile;
21 static char *inputfile;
26 fprintf( stderr, "usage: %s -i inputfile [-d debuglevel] [-f configfile] [-n databasenumber]\n", name );
31 main( int argc, char **argv )
40 struct dbcache *db, *db2;
44 struct berval *vals[2];
46 tailorfile = SLAPD_DEFAULT_CONFIGFILE;
48 while ( (i = getopt( argc, argv, "d:f:i:n:" )) != EOF ) {
50 case 'd': /* turn on debugging */
51 ldap_debug = atoi( optarg );
54 case 'f': /* specify a tailor file */
55 tailorfile = strdup( optarg );
58 case 'i': /* input file */
59 inputfile = strdup( optarg );
62 case 'n': /* which config file db to index */
63 dbnum = atoi( optarg ) - 1;
71 if ( inputfile == NULL ) {
74 if ( freopen( inputfile, "r", stdin ) == NULL ) {
81 * initialize stuff and figure out which backend we're dealing with
84 slap_init(SLAP_TOOL_MODE, "ldif2id2children");
85 read_config( tailorfile );
88 for ( dbnum = 0; dbnum < nbackends; dbnum++ ) {
89 if ( strcasecmp( backends[dbnum].be_type, "bdb2" )
94 if ( dbnum == nbackends ) {
95 fprintf( stderr, "No bdb2 database found in config file\n" );
98 } else if ( dbnum < 0 || dbnum > (nbackends-1) ) {
99 fprintf( stderr, "Database number selected via -n is out of range\n" );
100 fprintf( stderr, "Must be in the range 1 to %d (number of databases in the config file)\n", nbackends );
102 } else if ( strcasecmp( backends[dbnum].be_type, "bdb2" ) != 0 ) {
103 fprintf( stderr, "Database number %d selected via -n is not an bdb2 database\n", dbnum );
108 be = &backends[dbnum];
110 /* disable write sync'ing */
111 li = (struct ldbminfo *) be->be_private;
112 li->li_dbcachewsync = 0;
115 * first, make the dn2id index
118 if ( (db = bdb2i_cache_open( be, "dn2id", BDB2_SUFFIX, LDBM_NEWDB ))
120 perror( "dn2id file" );
132 char *type, *val, *s;
136 ldbm_datum_init( key );
137 ldbm_datum_init( data );
139 if ( fgets( line, sizeof(line), stdin ) != NULL ) {
143 len = strlen( line );
144 while ( lcur + len + 1 > lmax ) {
146 buf = (char *) ch_realloc( buf, lmax );
148 strcpy( buf + lcur, line );
153 if ( line[0] == '\n' || stop && buf && *buf ) {
154 if ( *buf != '\n' ) {
155 if (isdigit((unsigned char) *buf)) {
162 while ( (linep = ldif_getline( &s )) != NULL ) {
164 if ( ldif_parse_line( linep, &type, &val,
166 Debug( LDAP_DEBUG_PARSE,
167 "bad line %d in entry ending at line %d ignored\n",
168 elineno, lineno, 0 );
172 if ( strcmp( type, "dn" ) == 0 )
176 if ( linep == NULL ) {
177 fprintf( stderr, "entry %ld has no dn\n",
180 (void) dn_normalize_case( val );
182 key.dsize = strlen( val ) + 1;
183 data.dptr = (char *) &id;
184 data.dsize = sizeof(ID);
185 if ( ldbm_store( db->dbc_db, key, data,
186 LDBM_REPLACE ) != 0 ) {
187 perror( "dn2id ldbm_store..." );
201 * next, make the id2children index
204 if ( (db2 = bdb2i_cache_open( be, "id2children", BDB2_SUFFIX,
205 LDBM_NEWDB )) == NULL ) {
206 perror( "id2children file" );
219 char *type, *val, *s, *dn;
225 ldbm_datum_init( key );
226 ldbm_datum_init( data );
228 if ( fgets( line, sizeof(line), stdin ) != NULL ) {
231 len = strlen( line );
232 while ( lcur + len + 1 > lmax ) {
234 buf = (char *) ch_realloc( buf, lmax );
236 strcpy( buf + lcur, line );
241 if ( line[0] == '\n' || stop && buf && *buf ) {
242 if ( * buf != '\n' ) {
245 while ( (linep = ldif_getline( &s )) != NULL ) {
246 if ( ldif_parse_line( linep, &type, &val,
248 Debug( LDAP_DEBUG_PARSE,
249 "bad line %d ignored\n",
254 if ( strcmp( type, "dn" ) == 0 )
258 if ( linep == NULL ) {
259 fprintf( stderr, "entry %ld has no dn\n",
262 if ( (dn = dn_parent( be, val ))
266 (void) dn_normalize_case( dn );
268 key.dsize = strlen( dn ) + 1;
270 data = ldbm_fetch( db->dbc_db,
273 if ( data.dptr == NULL ) {
274 (void) dn_normalize_case( val );
275 if ( ! be_issuffix( be,
277 Debug( LDAP_DEBUG_PARSE, "no parent \"%s\" of \"%s\"\n", dn, val, 0 );
284 (void) memcpy( (char *) &pid,
285 data.dptr, sizeof(ID) );
287 ldbm_datum_free( db->dbc_db, data);
290 sprintf( buf2, "%c%ld", EQ_PREFIX, pid );
292 key.dsize = strlen( buf2 ) + 1;
293 if ( bdb2i_idl_insert_key( be, db2, key, id )
295 perror( "bdb2i_idl_insert_key" );
307 bdb2i_cache_close( be, db2 );
308 bdb2i_cache_close( be, db );
311 slap_shutdown(dbnum);