10 #include <ac/unistd.h>
12 #include "ldap_defaults.h"
14 #include "../back-ldbm/back-ldbm.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 )
44 struct berval *vals[2];
46 ldbm_ignore_nextid_file = 1;
48 tailorfile = SLAPD_DEFAULT_CONFIGFILE;
50 while ( (i = getopt( argc, argv, "d:f:i:n:" )) != EOF ) {
52 case 'd': /* turn on debugging */
53 ldap_debug = atoi( optarg );
56 case 'f': /* specify a tailor file */
57 tailorfile = strdup( optarg );
60 case 'i': /* input file */
61 inputfile = strdup( optarg );
64 case 'n': /* which config file db to index */
65 dbnum = atoi( optarg ) - 1;
73 if ( inputfile == NULL ) {
76 if ( freopen( inputfile, "r", stdin ) == NULL ) {
83 * initialize stuff and figure out which backend we're dealing with
86 slap_init(SLAP_TOOL_MODE, "ldif2id2children");
87 read_config( tailorfile );
90 for ( dbnum = 0; dbnum < nbackends; dbnum++ ) {
91 if ( strcasecmp( backends[dbnum].be_type, "ldbm" )
96 if ( dbnum == nbackends ) {
97 fprintf( stderr, "No ldbm database found in config file\n" );
100 } else if ( dbnum < 0 || dbnum > (nbackends-1) ) {
101 fprintf( stderr, "Database number selected via -n is out of range\n" );
102 fprintf( stderr, "Must be in the range 1 to %d (number of databases in the config file)\n", nbackends );
104 } else if ( strcasecmp( backends[dbnum].be_type, "ldbm" ) != 0 ) {
105 fprintf( stderr, "Database number %d selected via -n is not an ldbm database\n", dbnum );
110 be = &backends[dbnum];
112 /* disable write sync'ing */
113 li = (struct ldbminfo *) be->be_private;
114 li->li_dbcachewsync = 0;
117 * first, make the dn2id index
120 if ( (db = ldbm_cache_open( be, "dn2id", LDBM_SUFFIX, LDBM_NEWDB ))
122 perror( "dn2id file" );
134 char *type, *val, *s;
138 ldbm_datum_init( key );
139 ldbm_datum_init( data );
141 if ( fgets( line, sizeof(line), stdin ) != NULL ) {
145 len = strlen( line );
146 while ( lcur + len + 1 > lmax ) {
148 buf = (char *) ch_realloc( buf, lmax );
150 strcpy( buf + lcur, line );
155 if ( line[0] == '\n' || stop && buf && *buf ) {
156 if ( *buf != '\n' ) {
157 if (isdigit((unsigned char) *buf)) {
164 while ( (linep = ldif_getline( &s )) != NULL ) {
166 if ( ldif_parse_line( linep, &type, &val,
168 Debug( LDAP_DEBUG_PARSE,
169 "bad line %d in entry ending at line %d ignored\n",
170 elineno, lineno, 0 );
174 if ( strcmp( type, "dn" ) == 0 )
178 if ( linep == NULL ) {
179 fprintf( stderr, "entry %ld has no dn\n",
182 (void) dn_normalize_case( val );
184 key.dsize = strlen( val ) + 1;
185 data.dptr = (char *) &id;
186 data.dsize = sizeof(ID);
187 if ( ldbm_store( db->dbc_db, key, data,
188 LDBM_REPLACE ) != 0 ) {
189 perror( "dn2id ldbm_store" );
203 * next, make the id2children index
206 if ( (db2 = ldbm_cache_open( be, "id2children", LDBM_SUFFIX,
207 LDBM_NEWDB )) == NULL ) {
208 perror( "id2children file" );
221 char *type, *val, *s, *dn;
227 ldbm_datum_init( key );
228 ldbm_datum_init( data );
230 if ( fgets( line, sizeof(line), stdin ) != NULL ) {
233 len = strlen( line );
234 while ( lcur + len + 1 > lmax ) {
236 buf = (char *) ch_realloc( buf, lmax );
238 strcpy( buf + lcur, line );
243 if ( line[0] == '\n' || stop && buf && *buf ) {
244 if ( * buf != '\n' ) {
247 while ( (linep = ldif_getline( &s )) != NULL ) {
248 if ( ldif_parse_line( linep, &type, &val,
250 Debug( LDAP_DEBUG_PARSE,
251 "bad line %d ignored\n",
256 if ( strcmp( type, "dn" ) == 0 )
260 if ( linep == NULL ) {
261 fprintf( stderr, "entry %ld has no dn\n",
264 if ( (dn = dn_parent( be, val ))
268 (void) dn_normalize_case( dn );
270 key.dsize = strlen( dn ) + 1;
272 data = ldbm_fetch( db->dbc_db,
275 if ( data.dptr == NULL ) {
276 (void) dn_normalize_case( val );
277 if ( ! be_issuffix( be,
279 Debug( LDAP_DEBUG_PARSE, "no parent \"%s\" of \"%s\"\n", dn, val, 0 );
286 (void) memcpy( (char *) &pid,
287 data.dptr, sizeof(ID) );
289 ldbm_datum_free( db->dbc_db, data);
292 sprintf( buf2, "%c%ld", EQ_PREFIX, pid );
294 key.dsize = strlen( buf2 ) + 1;
295 if ( idl_insert_key( be, db2, key, id )
297 perror( "idl_insert_key" );
309 ldbm_cache_close( be, db2 );
310 ldbm_cache_close( be, db );
313 slap_shutdown(dbnum);