arch/arm-native/kernel/getsystemattr.c

   1 /*
   2     Copyright © 1995-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6 */
   7
   8 #include <aros/kernel.h>
   9 #include <exec/execbase.h>
  10 #include <proto/exec.h>
  11
  12 #include "kernel_intern.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <proto/kernel.h>
  18
  19         AROS_LH1(intptr_t, KrnGetSystemAttr,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(uint32_t, id, D0),
  23
  24 /*  LOCATION */
  25         struct KernelBase *, KernelBase, 29, Kernel)
  26
  27 /*  FUNCTION
  28         Get value of internal system attributes.
  29         Currently defined attributes are:
  30
  31           KATTR_Architecture [.G] (char *)        - Name of architecture the kernel built for.
  32
  33           KATTR_PeripheralBase [.G] IPTR   - IO Base address for ARM peripherals
  34
  35     INPUTS
  36         id - ID of the attribute to get
  37
  38     RESULT
  39         Value of the attribute
  40
  41     NOTES
  42
  43     EXAMPLE
  44
  45     BUGS
  46
  47     SEE ALSO
  48
  49     INTERNALS
  50
  51 ******************************************************************************/
  52 {
  53     AROS_LIBFUNC_INIT
  54
  55     switch (id)
  56     {
  57     case KATTR_Architecture:
  58         return (intptr_t)"arm-raspi";
  59
  60     case KATTR_PeripheralBase:
  61         return (intptr_t)__arm_arosintern.ARMI_PeripheralBase;
  62
  63     default:
  64         return -1;
  65     }
  66
  67     AROS_LIBFUNC_EXIT
  68 }