rom/exec/setintvector.c

   1 /*
   2     Copyright © 1995-2017, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Install an interrupt handler.
   6     Lang: english
   7 */
   8 #include <exec/execbase.h>
   9 #include <exec/interrupts.h>
  10 #include <proto/exec.h>
  11 #include <aros/libcall.h>
  12
  13 #include "exec_intern.h"
  14 #include "exec_debug.h"
  15 #include "exec_locks.h"
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20
  21         AROS_LH2(struct Interrupt *, SetIntVector,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(ULONG,              intNumber, D0),
  25         AROS_LHA(struct Interrupt *, interrupt, A1),
  26
  27 /*  LOCATION */
  28         struct ExecBase *, SysBase, 27, Exec)
  29
  30 /*  FUNCTION
  31
  32     INPUTS
  33
  34     RESULT
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43
  44     INTERNALS
  45
  46 ******************************************************************************/
  47 {
  48     AROS_LIBFUNC_INIT
  49     struct Interrupt *oldint;
  50     BOOL ishandler = intNumber <= 2 || (intNumber >= 6 && intNumber <= 12);
  51
  52     ExecLog(SysBase, EXECDEBUGF_EXCEPTHANDLER, "SetIntVector: Int %d, Interrupt %p\n", intNumber, interrupt);
  53
  54     EXEC_LOCK_LIST_WRITE_AND_DISABLE(&SysBase->IntrList);
  55
  56     oldint = (struct Interrupt *)SysBase->IntVects[intNumber].iv_Node;
  57     SysBase->IntVects[intNumber].iv_Node = ishandler ? (struct Node *)interrupt : NULL;
  58
  59     if (interrupt)
  60     {
  61         SysBase->IntVects[intNumber].iv_Data = interrupt->is_Data;
  62         SysBase->IntVects[intNumber].iv_Code = interrupt->is_Code;
  63     }
  64     else
  65     {
  66         SysBase->IntVects[intNumber].iv_Data = (APTR)~0;
  67         SysBase->IntVects[intNumber].iv_Code = (void *)~0;
  68     }
  69
  70     EXEC_UNLOCK_LIST_AND_ENABLE(&SysBase->IntrList);
  71
  72     return oldint;
  73
  74     AROS_LIBFUNC_EXIT
  75 } /* SetIntVector */