arch/m68k-all/kernel/issuper.S

   1 /*****************************************************************************
   2
   3     NAME
   4 #include <proto/kernel.h>
   5
   6 AROS_LH0I(int, KrnIsSuper,
   7
   8     SYNOPSIS
   9
  10     LOCATION
  11         struct KernelBase *, KernelBase, 13, Kernel)
  12
  13     FUNCTION
  14         Determine if the caller is running in supervisor mode
  15
  16     INPUTS
  17         None
  18
  19     RESULT
  20         Nonzero for supervisor mode, zero for user mode
  21
  22     NOTES
  23         Callers should only test the return value against zero.
  24         Nonzero values may actually be different, since they
  25         may carry some private implementation-dependent information
  26         (like CPU privilege level, for example).
  27
  28     EXAMPLE
  29
  30     BUGS
  31
  32     SEE ALSO
  33
  34     INTERNALS
  35
  36 ******************************************************************************/
  37         #include "aros/m68k/asm.h"
  38
  39         .text
  40         .balign 4
  41         .globl  AROS_SLIB_ENTRY(KrnIsSuper,Kernel,13)
  42
  43 AROS_SLIB_ENTRY(KrnIsSuper,Kernel,13):
  44         movem.l %a5-%a6,%sp@-
  45         move.l  SysBase,%a6
  46         lea     1f,%a5
  47         jsr     %a6@(Supervisor)
  48         movem.l %sp@+,%a5-%a6
  49         rts
  50
  51 1:      move.w  %sp@,%d0
  52         and.l   #0x2000,%d0
  53         rte
  54