1 /*

     2  * LIBOIL - Library of Optimized Inner Loops

     3  * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>

     4  * All rights reserved.

     5  *

     6  * Redistribution and use in source and binary forms, with or without

     7  * modification, are permitted provided that the following conditions

     8  * are met:

     9  * 1. Redistributions of source code must retain the above copyright

    10  *    notice, this list of conditions and the following disclaimer.

    11  * 2. Redistributions in binary form must reproduce the above copyright

    12  *    notice, this list of conditions and the following disclaimer in the

    13  *    documentation and/or other materials provided with the distribution.

    14  * 

    15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR

    16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED

    17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

    18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,

    19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES

    20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR

    21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)

    22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,

    23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING

    24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE

    25  * POSSIBILITY OF SUCH DAMAGE.

    26  */

    27 

    28 #ifdef HAVE_CONFIG_H

    29 #include "config.h"

    30 #endif

    31 #include <liboil/liboilfunction.h>

    32 #include <liboil/liboildebug.h>

    33 #include <liboil/liboilcpu.h>

    34 #include <liboil/liboilfault.h>

    35 #include <liboil/liboilutils.h>

    36 

    37 #include <unistd.h>

    38 #include <fcntl.h>

    39 #include <stdlib.h>

    40 #include <string.h>

    41 #include <stdio.h>

    42 #include <setjmp.h>

    43 #include <signal.h>

    44 #include <sys/time.h>

    45 #include <time.h>

    46 

    47 /***** arm *****/

    48 

    49 //#ifdef __arm__		

    50 #if 0

    51 static unsigned long

    52 oil_profile_stamp_xscale(void)

    53 {

    54   unsigned int ts;

    55   __asm__ __volatile__ (

    56       "  mrc p14, 0, %0, c1, c0, 0 \n"

    57       : "=r" (ts));

    58   return ts;

    59 }

    60 #endif

    61 

    62 static void

    63 oil_cpu_arm_getflags_cpuinfo (char *cpuinfo)

    64 {

    65   char *cpuinfo_flags;

    66   char **flags;

    67   char **f;

    68 

    69   cpuinfo_flags = get_cpuinfo_line(cpuinfo, "Features");

    70   if (cpuinfo_flags == NULL) {

    71     free (cpuinfo);

    72     return;

    73   }

    74 

    75   flags = strsplit(cpuinfo_flags);

    76   for (f = flags; *f; f++) {

    77     if (strcmp (*f, "edsp") == 0) {

    78       OIL_DEBUG ("cpu feature %s", *f);

    79       oil_cpu_flags |= OIL_IMPL_FLAG_EDSP;

    80     }

    81     if (strcmp (*f, "vfp") == 0) {

    82       OIL_DEBUG ("cpu feature %s", *f);

    83       oil_cpu_flags |= OIL_IMPL_FLAG_VFP;

    84     }

    85 

    86     free (*f);

    87   }

    88   free (flags);

    89   free (cpuinfo_flags);

    90 }

    91 

    92 static char *

    93 get_proc_cpuinfo (void)

    94 {

    95   char *cpuinfo;

    96   int fd;

    97   int n;

    98 

    99   cpuinfo = malloc(4096);

   100   if (cpuinfo == NULL) return NULL;

   101 

   102   fd = open("/proc/cpuinfo", O_RDONLY);

   103   if (fd < 0) {

   104     free (cpuinfo);

   105     return NULL;

   106   }

   107 

   108   n = read(fd, cpuinfo, 4095);

   109   if (n < 0) {

   110     free (cpuinfo);

   111     close (fd);

   112     return NULL;

   113   }

   114   cpuinfo[n] = 0;

   115 

   116   close (fd);

   117 

   118   return cpuinfo;

   119 }

   120 #ifdef __SYMBIAN32__

   121 EXPORT_C

   122 #endif

   123 void

   124 oil_cpu_detect_arch(void)

   125 {

   126 #ifdef __linux__

   127   int arm_implementer = 0;

   128   int arm_arch;

   129   char *cpuinfo;

   130   char *s;

   131 

   132   cpuinfo = get_proc_cpuinfo();

   133   if (cpuinfo == NULL) return;

   134 

   135   s = get_cpuinfo_line(cpuinfo, "CPU implementer");

   136   if (s) {

   137     arm_implementer = strtoul (s, NULL, 0);

   138     free(s);

   139   }

   140 

   141   switch(arm_implementer) {

   142     case 0x69: /* Intel */

   143     case 0x41: /* ARM */

   144       /* ARM chips are known to not have timestamping available from 

   145        * user space */

   146       break;

   147     default:

   148       break;

   149   }

   150 

   151   s = get_cpuinfo_line(cpuinfo, "CPU architecture");

   152   if (s) {

   153     arm_arch = strtoul (s, NULL, 0);

   154     if (arm_arch >= 6)

   155       oil_cpu_flags |= OIL_IMPL_FLAG_ARM6;

   156     free(s);

   157   }

   158 

   159   oil_cpu_arm_getflags_cpuinfo (cpuinfo);

   160   free (cpuinfo);

   161 #endif

   162 }

   163 //#endif   

   164 

   165