2 * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
3 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6 * Copyright (c) 1993, 1994 Regents of the University of Michigan.
9 * Redistribution and use in source and binary forms are permitted
10 * provided that this notice is preserved and that due credit is given
11 * to the University of Michigan at Ann Arbor. The name of the University
12 * may not be used to endorse or promote products derived from this
13 * software without specific prior written permission. This software
14 * is provided ``as is'' without express or implied warranty.
16 * searchpref.c: search preferences library routines for LDAP clients
17 * 17 May 1994 by Gordon Good
26 #include <ac/string.h>
28 #include <ac/unistd.h>
30 #ifdef HAVE_SYS_FILE_H
39 static void free_searchobj LDAP_P(( struct ldap_searchobj *so ));
40 static int read_next_searchobj LDAP_P(( char **bufp, long *blenp,
41 struct ldap_searchobj **sop, int soversion ));
44 static const char *const sobjoptions[] = {
50 static const unsigned long sobjoptvals[] = {
51 LDAP_SEARCHOBJ_OPT_INTERNAL,
56 ldap_init_searchprefs( char *file, struct ldap_searchobj **solistp )
63 if (( fp = fopen( file, "r" )) == NULL ) {
64 return( LDAP_SEARCHPREF_ERR_FILE );
67 if ( fseek( fp, 0L, SEEK_END ) != 0 ) { /* move to end to get len */
69 return( LDAP_SEARCHPREF_ERR_FILE );
74 if ( fseek( fp, 0L, SEEK_SET ) != 0 ) { /* back to start of file */
76 return( LDAP_SEARCHPREF_ERR_FILE );
79 if (( buf = LDAP_MALLOC( (size_t)len )) == NULL ) {
81 return( LDAP_SEARCHPREF_ERR_MEM );
84 rlen = fread( buf, 1, (size_t)len, fp );
88 if ( rlen != len && !eof ) { /* error: didn't get the whole file */
90 return( LDAP_SEARCHPREF_ERR_FILE );
93 rc = ldap_init_searchprefs_buf( buf, rlen, solistp );
101 ldap_init_searchprefs_buf( char *buf, long buflen,
102 struct ldap_searchobj **solistp )
104 int rc = -1, version;
106 struct ldap_searchobj *prevso, *so;
108 *solistp = prevso = NULL;
110 if ( next_line_tokens( &buf, &buflen, &toks ) != 2 ||
111 strcasecmp( toks[ 0 ], "version" ) != 0 ) {
112 free_strarray( toks );
113 return( LDAP_SEARCHPREF_ERR_SYNTAX );
115 version = atoi( toks[ 1 ] );
116 free_strarray( toks );
117 if ( version != LDAP_SEARCHPREF_VERSION &&
118 version != LDAP_SEARCHPREF_VERSION_ZERO ) {
119 return( LDAP_SEARCHPREF_ERR_VERSION );
122 while ( buflen > 0 && ( rc = read_next_searchobj( &buf, &buflen, &so,
123 version )) == 0 && so != NULL ) {
124 if ( prevso == NULL ) {
127 prevso->so_next = so;
133 ldap_free_searchprefs( *solistp );
142 ldap_free_searchprefs( struct ldap_searchobj *solist )
144 struct ldap_searchobj *so, *nextso;
146 if ( solist != NULL ) {
147 for ( so = solist; so != NULL; so = nextso ) {
148 nextso = so->so_next;
149 free_searchobj( so );
152 /* XXX XXX need to do some work here */
157 free_searchobj( struct ldap_searchobj *so )
160 if ( so->so_objtypeprompt != NULL ) {
161 LDAP_FREE( so->so_objtypeprompt );
163 if ( so->so_prompt != NULL ) {
164 LDAP_FREE( so->so_prompt );
166 if ( so->so_filterprefix != NULL ) {
167 LDAP_FREE( so->so_filterprefix );
169 if ( so->so_filtertag != NULL ) {
170 LDAP_FREE( so->so_filtertag );
172 if ( so->so_defaultselectattr != NULL ) {
173 LDAP_FREE( so->so_defaultselectattr );
175 if ( so->so_defaultselecttext != NULL ) {
176 LDAP_FREE( so->so_defaultselecttext );
178 if ( so->so_salist != NULL ) {
179 struct ldap_searchattr *sa, *nextsa;
180 for ( sa = so->so_salist; sa != NULL; sa = nextsa ) {
181 nextsa = sa->sa_next;
182 if ( sa->sa_attrlabel != NULL ) {
183 LDAP_FREE( sa->sa_attrlabel );
185 if ( sa->sa_attr != NULL ) {
186 LDAP_FREE( sa->sa_attr );
188 if ( sa->sa_selectattr != NULL ) {
189 LDAP_FREE( sa->sa_selectattr );
191 if ( sa->sa_selecttext != NULL ) {
192 LDAP_FREE( sa->sa_selecttext );
197 if ( so->so_smlist != NULL ) {
198 struct ldap_searchmatch *sm, *nextsm;
199 for ( sm = so->so_smlist; sm != NULL; sm = nextsm ) {
200 nextsm = sm->sm_next;
201 if ( sm->sm_matchprompt != NULL ) {
202 LDAP_FREE( sm->sm_matchprompt );
204 if ( sm->sm_filter != NULL ) {
205 LDAP_FREE( sm->sm_filter );
216 struct ldap_searchobj *
217 ldap_first_searchobj( struct ldap_searchobj *solist )
223 struct ldap_searchobj *
224 ldap_next_searchobj( struct ldap_searchobj *solist, struct ldap_searchobj *so )
226 return( so == NULL ? so : so->so_next );
232 read_next_searchobj( char **bufp, long *blenp, struct ldap_searchobj **sop,
237 struct ldap_searchobj *so;
238 struct ldap_searchattr **sa;
239 struct ldap_searchmatch **sm;
244 * Object type prompt comes first
246 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
247 free_strarray( toks );
248 return( tokcnt == 0 ? 0 : LDAP_SEARCHPREF_ERR_SYNTAX );
251 if (( so = (struct ldap_searchobj *)LDAP_CALLOC( 1,
252 sizeof( struct ldap_searchobj ))) == NULL ) {
253 free_strarray( toks );
254 return( LDAP_SEARCHPREF_ERR_MEM );
256 so->so_objtypeprompt = toks[ 0 ];
257 LDAP_FREE( (char *)toks );
260 * if this is post-version zero, options come next
262 if ( soversion > LDAP_SEARCHPREF_VERSION_ZERO ) {
263 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) < 1 ) {
264 free_strarray( toks );
265 ldap_free_searchprefs( so );
266 return( LDAP_SEARCHPREF_ERR_SYNTAX );
268 for ( i = 0; toks[ i ] != NULL; ++i ) {
269 for ( j = 0; sobjoptions[ j ] != NULL; ++j ) {
270 if ( strcasecmp( toks[ i ], sobjoptions[ j ] ) == 0 ) {
271 so->so_options |= sobjoptvals[ j ];
275 free_strarray( toks );
279 * "Fewer choices" prompt is next
281 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
282 free_strarray( toks );
283 ldap_free_searchprefs( so );
284 return( LDAP_SEARCHPREF_ERR_SYNTAX );
286 so->so_prompt = toks[ 0 ];
287 LDAP_FREE( (char *)toks );
290 * Filter prefix for "More Choices" searching is next
292 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
293 free_strarray( toks );
294 ldap_free_searchprefs( so );
295 return( LDAP_SEARCHPREF_ERR_SYNTAX );
297 so->so_filterprefix = toks[ 0 ];
298 LDAP_FREE( (char *)toks );
301 * "Fewer Choices" filter tag comes next
303 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
304 free_strarray( toks );
305 ldap_free_searchprefs( so );
306 return( LDAP_SEARCHPREF_ERR_SYNTAX );
308 so->so_filtertag = toks[ 0 ];
309 LDAP_FREE( (char *)toks );
312 * Selection (disambiguation) attribute comes next
314 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
315 free_strarray( toks );
316 ldap_free_searchprefs( so );
317 return( LDAP_SEARCHPREF_ERR_SYNTAX );
319 so->so_defaultselectattr = toks[ 0 ];
320 LDAP_FREE( (char *)toks );
323 * Label for selection (disambiguation) attribute
325 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
326 free_strarray( toks );
327 ldap_free_searchprefs( so );
328 return( LDAP_SEARCHPREF_ERR_SYNTAX );
330 so->so_defaultselecttext = toks[ 0 ];
331 LDAP_FREE( (char *)toks );
334 * Search scope is next
336 if (( tokcnt = next_line_tokens( bufp, blenp, &toks )) != 1 ) {
337 free_strarray( toks );
338 ldap_free_searchprefs( so );
339 return( LDAP_SEARCHPREF_ERR_SYNTAX );
341 if ( !strcasecmp(toks[ 0 ], "subtree" )) {
342 so->so_defaultscope = LDAP_SCOPE_SUBTREE;
343 } else if ( !strcasecmp(toks[ 0 ], "onelevel" )) {
344 so->so_defaultscope = LDAP_SCOPE_ONELEVEL;
345 } else if ( !strcasecmp(toks[ 0 ], "base" )) {
346 so->so_defaultscope = LDAP_SCOPE_BASE;
348 ldap_free_searchprefs( so );
349 return( LDAP_SEARCHPREF_ERR_SYNTAX );
351 free_strarray( toks );
355 * "More Choices" search option list comes next
357 sa = &( so->so_salist );
358 while (( tokcnt = next_line_tokens( bufp, blenp, &toks )) > 0 ) {
360 free_strarray( toks );
361 ldap_free_searchprefs( so );
362 return( LDAP_SEARCHPREF_ERR_SYNTAX );
364 if (( *sa = ( struct ldap_searchattr * ) LDAP_CALLOC( 1,
365 sizeof( struct ldap_searchattr ))) == NULL ) {
366 free_strarray( toks );
367 ldap_free_searchprefs( so );
368 return( LDAP_SEARCHPREF_ERR_MEM );
370 ( *sa )->sa_attrlabel = toks[ 0 ];
371 ( *sa )->sa_attr = toks[ 1 ];
372 ( *sa )->sa_selectattr = toks[ 3 ];
373 ( *sa )->sa_selecttext = toks[ 4 ];
374 /* Deal with bitmap */
375 ( *sa )->sa_matchtypebitmap = 0;
376 for ( i = strlen( toks[ 2 ] ) - 1, j = 0; i >= 0; i--, j++ ) {
377 if ( toks[ 2 ][ i ] == '1' ) {
378 ( *sa )->sa_matchtypebitmap |= (1 << j);
381 LDAP_FREE( toks[ 2 ] );
382 LDAP_FREE( ( char * ) toks );
383 sa = &(( *sa )->sa_next);
388 * Match types are last
390 sm = &( so->so_smlist );
391 while (( tokcnt = next_line_tokens( bufp, blenp, &toks )) > 0 ) {
393 free_strarray( toks );
394 ldap_free_searchprefs( so );
395 return( LDAP_SEARCHPREF_ERR_SYNTAX );
397 if (( *sm = ( struct ldap_searchmatch * ) LDAP_CALLOC( 1,
398 sizeof( struct ldap_searchmatch ))) == NULL ) {
399 free_strarray( toks );
400 ldap_free_searchprefs( so );
401 return( LDAP_SEARCHPREF_ERR_MEM );
403 ( *sm )->sm_matchprompt = toks[ 0 ];
404 ( *sm )->sm_filter = toks[ 1 ];
405 LDAP_FREE( ( char * ) toks );
406 sm = &(( *sm )->sm_next );