11 #include "ldapconfig.h"
13 #include "../back-ldbm/back-ldbm.h"
19 static char *tailorfile;
20 static char *inputfile;
25 fprintf( stderr, "usage: %s -i inputfile [-d debuglevel] [-f configfile] [-n databasenumber]\n", name );
30 main( int argc, char **argv )
32 int i, cargc, indb, stop, status;
34 char *defargv[MAXARGS];
41 struct dbcache *db, *db2;
45 struct berval *vals[2];
46 Avlnode *avltypes = NULL;
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' ) {
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 key.dptr = dn_normalize_case( val );
183 key.dsize = strlen( val ) + 1;
184 data.dptr = (char *) &id;
185 data.dsize = sizeof(ID);
186 if ( ldbm_store( db->dbc_db, key, data,
187 LDBM_REPLACE ) != 0 ) {
188 perror( "dn2id ldbm_store" );
202 * next, make the id2children index
205 if ( (db2 = ldbm_cache_open( be, "id2children", LDBM_SUFFIX,
206 LDBM_NEWDB )) == NULL ) {
207 perror( "id2children file" );
220 char *type, *val, *s, *dn;
226 ldbm_datum_init( key );
227 ldbm_datum_init( data );
229 if ( fgets( line, sizeof(line), stdin ) != NULL ) {
232 len = strlen( line );
233 while ( lcur + len + 1 > lmax ) {
235 buf = (char *) ch_realloc( buf, lmax );
237 strcpy( buf + lcur, line );
242 if ( line[0] == '\n' || stop && buf && *buf ) {
243 if ( * buf != '\n' ) {
246 while ( (linep = ldif_getline( &s )) != NULL ) {
247 if ( ldif_parse_line( linep, &type, &val,
249 Debug( LDAP_DEBUG_PARSE,
250 "bad line %d ignored\n",
255 if ( strcmp( type, "dn" ) == 0 )
259 if ( linep == NULL ) {
260 fprintf( stderr, "entry %ld has no dn\n",
263 if ( (dn = dn_parent( be, val ))
268 dn_normalize_case( dn );
269 key.dsize = strlen( dn ) + 1;
271 data = ldbm_fetch( db->dbc_db,
274 if ( data.dptr == NULL ) {
275 dn_normalize_case( val );
276 if ( ! be_issuffix( be,
278 Debug( LDAP_DEBUG_PARSE, "no parent \"%s\" of \"%s\"\n", dn, val, 0 );
285 (void) memcpy( (char *) &pid,
286 data.dptr, sizeof(ID) );
288 ldbm_datum_free( db->dbc_db, data);
291 sprintf( buf2, "%c%ld", EQ_PREFIX, pid );
293 key.dsize = strlen( buf2 ) + 1;
294 if ( idl_insert_key( be, db2, key, id )
296 perror( "idl_insert_key" );
307 slap_shutdown(dbnum);