rom/exec/remintserver.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Remove an interrupt handler.
   6     Lang:
   7 */
   8 #include <aros/config.h>
   9 #include <exec/execbase.h>
  10 #include <exec/interrupts.h>
  11
  12 #if (AROS_FLAVOUR & AROS_FLAVOUR_NATIVE)
  13 #include <hardware/custom.h>
  14 #include <hardware/intbits.h>
  15 #endif
  16
  17 #include <proto/exec.h>
  18 #include <aros/libcall.h>
  19
  20 /*****************************************************************************
  21
  22     NAME */
  23
  24         AROS_LH2(void, RemIntServer,
  25
  26 /*  SYNOPSIS */
  27         AROS_LHA(ULONG,              intNumber, D0),
  28         AROS_LHA(struct Interrupt *, interrupt, A1),
  29
  30 /*  LOCATION */
  31         struct ExecBase *, SysBase, 29, Exec)
  32
  33 /*  FUNCTION
  34
  35     INPUTS
  36
  37     RESULT
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46
  47     INTERNALS
  48
  49 ******************************************************************************/
  50 {
  51     AROS_LIBFUNC_INIT
  52     struct List *list;
  53 #if (AROS_FLAVOUR & AROS_FLAVOUR_NATIVE)
  54     struct Custom *custom = (struct Custom *)(void **)0xdff000;
  55 #endif
  56
  57     list = (struct List *)SysBase->IntVects[intNumber].iv_Data;
  58
  59     Disable();
  60
  61     Remove((struct Node *)interrupt);
  62
  63 #if (AROS_FLAVOUR & AROS_FLAVOUR_NATIVE)
  64     if(list->lh_TailPred == (struct Node *)list)
  65     {
  66         /* disable interrupts if there are no more nodes on the list */
  67         custom->intena = (UWORD)((1<<intNumber));
  68     }
  69 #endif
  70
  71     Enable();
  72
  73     AROS_LIBFUNC_EXIT
  74 } /* RemIntServer */