arch/arm-all/dos/probecpu.c

   1 /*
   2     Copyright © 2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Obtain ARM CPU information for ELF loader
   6     Lang: english
   7 */
   8
   9 #define DEBUG 1
  10
  11 #include <aros/debug.h>
  12 #include <aros/symbolsets.h>
  13 #include <resources/processor.h>
  14 #include <proto/processor.h>
  15
  16 #include "dos_intern.h"
  17
  18 static ULONG ProbeCPU(struct IntDosBase *base)
  19 {
  20     APTR ProcessorBase = OpenResource("processor.resource");
  21
  22     base->arm_Arch   = CPUFAMILY_ARM_3;
  23     base->arm_VFP    = FALSE;
  24     base->arm_VFP_v3 = FALSE;
  25
  26     if (ProcessorBase)
  27     {
  28         GetCPUInfoTags(GCIT_Family       , &base->arm_Arch,
  29                        GCIT_SupportsVFP  , &base->arm_VFP,
  30                        GCIT_SupportsVFPv3, &base->arm_VFP_v3,
  31                        TAG_DONE);
  32     }
  33
  34     D(bug("[DOS] CPU architecture: %d [VFP support: %d, VFPv3 support: %d]\n", base->arm_Arch, base->arm_VFP, base->arm_VFP_v3));
  35
  36     return TRUE;
  37 }
  38
  39 ADD2INITLIB(ProbeCPU, 0);