/*

  * LIBOIL - Library of Optimized Inner Loops

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

  * All rights reserved.

  *

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

  * modification, are permitted provided that the following conditions

  * are met:

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

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

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

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

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

  * 

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

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

  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

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

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

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

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

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

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

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

  * POSSIBILITY OF SUCH DAMAGE.

  */

 //Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 

 #ifdef HAVE_CONFIG_H

 #include "config.h"

 #endif

 #include <liboil/liboilfunction.h>

 #include <liboil/liboildebug.h>

 #include <liboil/liboilcpu.h>

 #include <liboil/liboilfault.h>

 #include <liboil/liboilutils.h>

 #ifdef HAVE_UNISTD_H

 #include <unistd.h>

 #endif

 #include <fcntl.h>

 #include <stdlib.h>

 #include <string.h>

 #include <stdio.h>

 #include <setjmp.h>

 #include <signal.h>

 #ifdef HAVE_SYS_TIME_H

 #include <sys/time.h>

 #endif

 #include <time.h>

 #if defined(__FreeBSD__)

 #include <sys/types.h>

 #include <sys/sysctl.h>

 #endif

 #ifdef __sun

 #include <sys/auxv.h>

 #endif

 /**

  * SECTION:liboilcpu

  * @title: CPU

  * @short_description: Check the capabilities of the current CPU

  *

  */

 //void oil_cpu_detect_arch(void);

 unsigned long oil_cpu_flags;

 extern unsigned long (*_oil_profile_stamp)(void);

 #ifdef HAVE_GETTIMEOFDAY

 static unsigned long

 oil_profile_stamp_gtod (void)

 {

   struct timeval tv;

   gettimeofday(&tv,NULL);

   return 1000000*(unsigned long)tv.tv_sec + (unsigned long)tv.tv_usec;

 }

 #endif

 #if defined(HAVE_CLOCK_GETTIME) && defined(HAVE_MONOTONIC_CLOCK)

 static unsigned long

 oil_profile_stamp_clock_gettime (void)

 {

   struct timespec ts;

   clock_gettime (CLOCK_MONOTONIC, &ts);

   return 1000000000*ts.tv_sec + ts.tv_nsec;

 }

 #endif

 static unsigned long

 oil_profile_stamp_zero (void)

 {

   return 0;

 }

 #ifdef __SYMBIAN32__

 #endif

 void

 _oil_cpu_init (void)

 {

   const char *envvar;

   oil_cpu_detect_arch();

   envvar = getenv ("OIL_CPU_FLAGS");

   if (envvar != NULL) {

     char *end = NULL;

     unsigned long flags;

     flags = strtoul (envvar, &end, 0);

     if (end > envvar) {

       oil_cpu_flags = flags;

     }

     OIL_INFO ("cpu flags from environment %08lx", oil_cpu_flags);

   }

   OIL_INFO ("cpu flags %08lx", oil_cpu_flags);

 #if defined(HAVE_CLOCK_GETTIME) && defined(HAVE_MONOTONIC_CLOCK)

   if (_oil_profile_stamp == NULL) {

     _oil_profile_stamp = oil_profile_stamp_clock_gettime;

     OIL_INFO("Using clock_gettime() as a timestamp function.");

   }

 #endif

 #ifdef HAVE_GETTIMEOFDAY

   if (_oil_profile_stamp == NULL) {

     _oil_profile_stamp = oil_profile_stamp_gtod;

     OIL_WARNING("Using gettimeofday() as a timestamp function.");

   }

 #endif

   if (_oil_profile_stamp == NULL) {

     _oil_profile_stamp = oil_profile_stamp_zero;

     OIL_ERROR("No timestamping function.  This is kinda bad.");

   }

 }

 /**

  * oil_cpu_get_flags:

  *

  * Returns a bitmask containing the available CPU features.

  *

  * Returns: the CPU features.

  */

 #ifdef __SYMBIAN32__

 EXPORT_C

 #endif 

 unsigned int

 oil_cpu_get_flags (void)

 {

   return oil_cpu_flags;

 }

 #if 0

 /**

  * oil_cpu_get_ticks_per_second:

  *

  * Returns the estimated number of ticks per second.  This feature

  * is currently unimplemented.

  *

  * This function may take several milliseconds or more to execute

  * in order to calculate a good estimate of the number of ticks (as

  * measured by the profiling functions) per second.  Note that the

  * number of ticks per second is often dependent on the CPU frequency,

  * which can change dynamically.  Thus the value returned by this

  * function may be incorrect as soon as it is returned.

  *

  * Returns: a double

  */

 double

 oil_cpu_get_ticks_per_second (void)

 {

   return _oil_ticks_per_second;

 }

 #endif

 #ifdef __SYMBIAN32__

 EXPORT_C

 #endif

 double

 oil_cpu_get_frequency (void)

 {

 #if defined(__linux__)

   int freq;

   if (get_file_int ("/sys/devices/system/cpu/cpu0/cpufreq/scaling_cur_freq",

         &freq)) {

     return 1000.0 * freq;

   }

   return 0;

 #else

   return 0;

 #endif

 }