mirror of
https://git.openldap.org/openldap/openldap.git
synced 2024-12-21 03:10:25 +08:00
122 lines
2.6 KiB
C
122 lines
2.6 KiB
C
/* testavl.c - Test Tim Howes AVL code */
|
|
/* $OpenLDAP$ */
|
|
/*
|
|
* Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
|
|
* COPYING RESTRICTIONS APPLY, see COPYRIGHT file
|
|
*/
|
|
|
|
#include "portable.h"
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <ac/stdlib.h>
|
|
#include <ac/string.h>
|
|
|
|
#define AVL_INTERNAL
|
|
#define AVL_NONREENTRANT
|
|
#include "avl.h"
|
|
|
|
static void ravl_print LDAP_P(( Avlnode *root, int depth ));
|
|
static void myprint LDAP_P(( Avlnode *root ));
|
|
|
|
int
|
|
main( int argc, char **argv )
|
|
{
|
|
Avlnode *tree = NULL;
|
|
char command[ 10 ];
|
|
char name[ 80 ];
|
|
char *p;
|
|
|
|
printf( "> " );
|
|
while ( fgets( command, sizeof( command ), stdin ) != NULL ) {
|
|
switch( *command ) {
|
|
case 'n': /* new tree */
|
|
( void ) avl_free( tree, (AVL_FREE) free );
|
|
tree = NULL;
|
|
break;
|
|
case 'p': /* print */
|
|
( void ) myprint( tree );
|
|
break;
|
|
case 't': /* traverse with first, next */
|
|
#ifdef AVL_NONREENTRANT
|
|
printf( "***\n" );
|
|
for ( p = (char * ) avl_getfirst( tree );
|
|
p != NULL;
|
|
p = (char *) avl_getnext())
|
|
printf( "%s\n", p );
|
|
printf( "***\n" );
|
|
#else
|
|
printf( "*** reentrant interface not implemented ***" );
|
|
#endif
|
|
break;
|
|
case 'f': /* find */
|
|
printf( "data? " );
|
|
if ( fgets( name, sizeof( name ), stdin ) == NULL )
|
|
exit( EXIT_SUCCESS );
|
|
name[ strlen( name ) - 1 ] = '\0';
|
|
if ( (p = (char *) avl_find( tree, name, (AVL_CMP) strcmp ))
|
|
== NULL )
|
|
printf( "Not found.\n\n" );
|
|
else
|
|
printf( "%s\n\n", p );
|
|
break;
|
|
case 'i': /* insert */
|
|
printf( "data? " );
|
|
if ( fgets( name, sizeof( name ), stdin ) == NULL )
|
|
exit( EXIT_SUCCESS );
|
|
name[ strlen( name ) - 1 ] = '\0';
|
|
if ( avl_insert( &tree, strdup( name ), (AVL_CMP) strcmp,
|
|
avl_dup_error ) != 0 )
|
|
printf( "\nNot inserted!\n" );
|
|
break;
|
|
case 'd': /* delete */
|
|
printf( "data? " );
|
|
if ( fgets( name, sizeof( name ), stdin ) == NULL )
|
|
exit( EXIT_SUCCESS );
|
|
name[ strlen( name ) - 1 ] = '\0';
|
|
if ( avl_delete( &tree, name, (AVL_CMP) strcmp ) == NULL )
|
|
printf( "\nNot found!\n" );
|
|
break;
|
|
case 'q': /* quit */
|
|
exit( EXIT_SUCCESS );
|
|
break;
|
|
case '\n':
|
|
break;
|
|
default:
|
|
printf("Commands: insert, delete, print, new, quit\n");
|
|
}
|
|
|
|
printf( "> " );
|
|
}
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
static void ravl_print( Avlnode *root, int depth )
|
|
{
|
|
int i;
|
|
|
|
if ( root == 0 )
|
|
return;
|
|
|
|
ravl_print( root->avl_right, depth+1 );
|
|
|
|
for ( i = 0; i < depth; i++ )
|
|
printf( " " );
|
|
printf( "%s %d\n", (char *) root->avl_data, root->avl_bf );
|
|
|
|
ravl_print( root->avl_left, depth+1 );
|
|
}
|
|
|
|
static void myprint( Avlnode *root )
|
|
{
|
|
printf( "********\n" );
|
|
|
|
if ( root == 0 )
|
|
printf( "\tNULL\n" );
|
|
else
|
|
ravl_print( root, 0 );
|
|
|
|
printf( "********\n" );
|
|
}
|