void PPDropCollection::do_execute()
{
tuple_cell tc;
xqp_tuple t(1);
name.op->next(t);
if (t.is_eos()) throw USER_EXCEPTION(SE1071);
tc = name.get(t);
if (!tc.is_atomic() || tc.get_atomic_type() != xs_string)
throw USER_EXCEPTION(SE1071);
name.op->next(t);
if (!t.is_eos()) throw USER_EXCEPTION(SE1071);
tc = tuple_cell::make_sure_light_atomic(tc);
local_lock_mrg->put_lock_on_collection(tc.get_str_mem());
auth_for_drop_object(tc.get_str_mem(), "collection", false);
delete_collection(tc.get_str_mem());
}
int main( void )
{
int i;
/* holds both command characters */
char command[ 2 ];
/* set up the three libraries */
struct Ordered_container* lib_title = OC_create_container( comp_Record_by_title );
struct Ordered_container* lib_ID = OC_create_container( comp_Record_by_ID );
struct Ordered_container* catalog = OC_create_container( comp_Collection_by_name );
for ( ; ; )
{
printf( "\nEnter command: " );
/* load the command chars */
for ( i = 0 ; i < 2; ++i)
{
command[ i ] = get_command_char();
}
switch ( command[ 0 ] )
{
case 'f' :/* find (records only)*/
switch ( command[ 1 ] )
{
case 'r' :
find_record_print( lib_title );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'p' : /* print */
switch ( command[ 1 ] )
{
case 'r' :
print_record( lib_ID );
break;
case 'L':
print_containter( lib_title, "Library", "records", (void (*)(void*))print_Record );
break;
case 'C':
/* print_catalog( catalog ); */
print_containter( catalog, "Catalog", "collections", (void (*)(void*))print_Collection );
break;
case 'a': /* allocation */
print_allocation( lib_title, lib_ID, catalog );
break;
case 'c':
print_collection_main( catalog );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'm': /* modify (rating only) */
switch ( command[ 1 ] )
{
case 'r':
modify_rating( lib_ID );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'a' : /* add */
switch ( command[ 1 ] )
{
case 'r' :
add_record( lib_title, lib_ID );
break;
case 'c':
add_coll( catalog );
break;
case 'm':
add_member( lib_ID , catalog );
break;
case 'a': /* allocation */
/* throw error */
print_error_clear( "Unrecognized command!\n");
break;
default:
break;
}
break;
case 'd': /* delete */
switch ( command[ 1 ] )
{
case 'r' :
delete_record( lib_title, lib_ID, catalog );
break;
case 'c':
delete_collection( catalog );
break;
case 'm':
remove_member( lib_ID , catalog );
break;
case 'a': /* allocation */
/* throw error */
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'c': /* clear */
switch ( command[ 1 ] )
{
case 'L':
clear_library( lib_title, lib_ID, catalog, "All records deleted\n" );
break;
case 'C':
clear_container( catalog, ( void(*)(void*) )destroy_Collection, "All collections deleted\n" );
break;
case 'A':
clear_all(lib_title, lib_ID, catalog, "All data deleted\n" );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 's': /* save */
switch ( command[ 1 ] ) {
case 'A':
save_all_to_file( lib_title, catalog );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'r': /* restore */
switch ( command[ 1 ] ) {
case 'A':
load_from_file( lib_title, lib_ID, catalog );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
break;
case 'q':
switch ( command[ 1 ] )
{
case 'q':
/* clean up memory */
quit( lib_title, lib_ID, catalog );
break;
default:
print_error_clear( "Unrecognized command!\n");
break;
}
default:
/* throw error for bad input */
print_error_clear( "Unrecognized command!\n");
break;
}
}
return 0;
}
