workbench/libs/muimaster/mui_freeclass.c

   1 /*
   2     Copyright © 2002-2003, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <string.h>
   7
   8 #include <proto/muimaster.h>
   9 #include <proto/intuition.h>
  10 #include <proto/exec.h>
  11
  12 #include "muimaster_intern.h"
  13 #include "support_classes.h"
  14 #include "debug.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19         AROS_LH1(VOID, MUI_FreeClass,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(Class *, cl, A0),
  23
  24 /*  LOCATION */
  25         struct Library *, MUIMasterBase, 14, MUIMaster)
  26
  27 /*  FUNCTION
  28         Frees a class returned by MUI_GetClass().
  29
  30     INPUTS
  31         cl - The pointer to the class.
  32
  33     RESULT
  34         VOID - The function always succeed: if the class can't be
  35
  36     NOTES
  37         This function is obsolete, DO NOT use it.
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44         MUI_GetClass(), MUI_CreateCustomClass(), MUI_DeleteCustomClass()
  45
  46     INTERNALS
  47
  48     HISTORY
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53     AROS_LIBBASE_EXT_DECL(struct MUIMasterBase *, MUIMasterBase)
  54
  55     ObtainSemaphore(&MUIMB(MUIMasterBase)->ZuneSemaphore);
  56
  57     /* CLF_INLIST tells us that this class is a builtin class */
  58     if (cl->cl_Flags & CLF_INLIST)
  59     {
  60         Class *super = cl->cl_Super;
  61
  62         if (--cl->cl_Dispatcher.h_Data == 0)
  63         {
  64             ZUNE_RemoveBuiltinClass(cl, MUIMasterBase);
  65
  66             if (FreeClass(cl))
  67             {
  68                 CloseLibrary(MUIMasterBase);
  69                 if (strcmp(super->cl_ID, ROOTCLASS) != 0)
  70                     MUI_FreeClass(super);
  71             }
  72             else
  73             {
  74                 /* Re-add the class to the list since freeing it failed */
  75                 ZUNE_AddBuiltinClass(cl, MUIMasterBase);
  76
  77                 /* And also increase the reference counter again */
  78                 cl->cl_Dispatcher.h_Data++;
  79             }
  80         }
  81
  82         ReleaseSemaphore(&MUIMB(MUIMasterBase)->ZuneSemaphore);
  83     }
  84     else
  85     {
  86         ReleaseSemaphore(&MUIMB(MUIMasterBase)->ZuneSemaphore);
  87
  88         CloseLibrary((struct Library *)cl->cl_Dispatcher.h_Data);
  89     }
  90
  91     AROS_LIBFUNC_EXIT
  92
  93 } /* MUIA_FreeClass */