os/ossrv/genericopenlibs/liboil/src/liboilcpu-arm.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     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