/*

  File: acl_free.c

  Copyright (C) 1999, 2000

  Andreas Gruenbacher <a.gruenbacher@bestbits.at>

  This program is free software; you can redistribute it and/or

  modify it under the terms of the GNU Lesser General Public

  License as published by the Free Software Foundation; either

  version 2.1 of the License, or (at your option) any later version.

  This program is distributed in the hope that it will be useful,

  but WITHOUT ANY WARRANTY; without even the implied warranty of

  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

  Lesser General Public License for more details.

  You should have received a copy of the GNU Lesser General Public

  License along with this library; if not, write to the Free Software

  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

*/

#include "config.h"

#include "libacl.h"

void

__acl_free_acl_obj(acl_obj *acl_obj_p)

{

	acl_entry_obj *entry_obj_p;

	while (acl_obj_p->anext != (acl_entry_obj *)acl_obj_p) {

		entry_obj_p = acl_obj_p->anext;

		acl_obj_p->anext = acl_obj_p->anext->enext;

		free_obj_p(entry_obj_p);

	}

	free(acl_obj_p->aprealloc);

	free_obj_p(acl_obj_p);

}

/* 23.4.12 */

int

acl_free(void *obj_p)

{

	obj_prefix *int_p = ((obj_prefix *)obj_p)-1;

	if (!obj_p || !int_p) {

		errno = EINVAL;

		return -1;

	}

	switch(int_p->p_magic) {

		case acl_MAGIC:

			__acl_free_acl_obj((acl_obj *)int_p);

			return 0;

		case qualifier_MAGIC:

		case string_MAGIC:

			free_obj_p(int_p);

			return 0;

		case acl_entry_MAGIC:

		case acl_permset_MAGIC:

#ifdef LIBACL_DEBUG

			fprintf(stderr, "object (magic=0x%X) "

			        "at %p cannot be freed\n",

				int_p->p_magic, int_p);

#endif

			break;

		default:

#ifdef LIBACL_DEBUG

			fprintf(stderr, "invalid object (magic=0x%X) "

			        "at %p\n", int_p->p_magic, int_p);

#endif

			break;

	}

	errno = EINVAL;

	return -1;

}