View | Details | Raw Unified
Collapse All | Expand All

(-) a/libapol/apol_tcl_fc.c (-4 / +4 lines)
 Lines 178-193    Link Here  
 */
 */
static int Apol_Search_FC_Index_DB(ClientData clientData, Tcl_Interp *interp, int argc, CONST char *argv[])
static int Apol_Search_FC_Index_DB(ClientData clientData, Tcl_Interp *interp, int argc, CONST char *argv[])
{	
{	
#ifndef LIBSEFS
 
	Tcl_SetResult(interp, "You need to build apol with libsefs to use this feature!", TCL_STATIC);
 
	return TCL_ERROR;
 
#else		
	sefs_search_keys_t search_keys;
	sefs_search_keys_t search_keys;
	CONST char **object_classes = NULL, **types = NULL, **users = NULL,
	CONST char **object_classes = NULL, **types = NULL, **users = NULL,
	    **ranges, **paths = NULL;
	    **ranges, **paths = NULL;
	int retval = TCL_ERROR;
	int retval = TCL_ERROR;
	Tcl_Obj *result_obj = Tcl_NewListObj(0, NULL);
	Tcl_Obj *result_obj = Tcl_NewListObj(0, NULL);

            

              
#ifndef LIBSEFS

              
            

            

              
	Tcl_SetResult(interp, "You need to build apol with libsefs to use this feature!", TCL_STATIC);

              
            

            

              
	return TCL_ERROR;

              
            

            

              
#else		

              
            

        
	memset(&search_keys, 0, sizeof(search_keys));
	memset(&search_keys, 0, sizeof(search_keys));

        
	if (argc != 10) {
	if (argc != 10) {

        
		Tcl_SetResult(interp, "Need a list of users, list of types, list of object classes, list of ranges, list of paths, user_regex, type_regex, range_regex, and path_regex", TCL_STATIC);
		Tcl_SetResult(interp, "Need a list of users, list of types, list of object classes, list of ranges, list of paths, user_regex, type_regex, range_regex, and path_regex", TCL_STATIC);