Git init
[profile/ivi/liboil.git] / liboil / liboilcpu-misc.c
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 /***** alpha *****/
48
49 #if defined(__alpha__)
50 static unsigned long
51 oil_profile_stamp_alpha(void)
52 {
53   unsigned int ts;
54   __asm__ __volatile__ ("rpcc %0\n" : "=r"(ts));
55   return ts;
56 }
57
58 static void
59 oil_cpu_detect_alpha(void)
60 {
61   _oil_profile_stamp = oil_profile_stamp_alpha;
62 }
63 #endif
64
65 /***** ia64 *****/
66
67 #if defined(__ia64__)
68 static unsigned long
69 oil_profile_stamp_ia64(void)
70 {
71   unsigned int ts;
72   __asm__ __volatile__("mov %0=ar.itc\n" : "=r"(ts) :: "memory");
73   return ts;
74 }
75
76 static void
77 oil_cpu_detect_ia64(void)
78 {
79   _oil_profile_stamp = oil_profile_stamp_ia64;
80 }
81 #endif
82
83 /***** s390 *****/
84
85 #if defined(__s390__)
86 static unsigned long
87 oil_profile_stamp_s390(void)
88 {
89   uint64_t ts;
90   __asm__ __volatile__ ("STCK %0(%0)\n" : : "r" (&ts));
91   return ts;
92 }
93
94 static void
95 oil_cpu_detect_s390(void)
96 {
97   _oil_profile_stamp = oil_profile_stamp_s390;
98 }
99 #endif
100
101 /***** mips *****/
102
103 #if defined(__mips__)
104 #if 0
105 /* broken */
106 static unsigned long
107 oil_profile_stamp_mips(void)
108 {
109         unsigned int ts;
110         __asm__ __volatile__ (
111                 "       .set    push            \n"
112                 "       .set    reorder         \n"
113                 "       mfc0    %0,$9           \n"
114                 "       .set    pop             \n"
115         : "=m" (ts));
116         return ts;
117 }
118 #endif
119
120 static void
121 oil_cpu_detect_mips(void)
122 {
123   //_oil_profile_stamp = oil_profile_stamp_mips;
124 }
125 #endif
126
127 void
128 oil_cpu_detect_arch(void)
129 {
130 #ifdef __alpha__
131   oil_cpu_detect_alpha();
132 #endif
133 #ifdef __ia64__
134   oil_cpu_detect_ia64();
135 #endif
136 #ifdef __s390__
137   oil_cpu_detect_s390();
138 #endif
139 #ifdef __mips__
140   oil_cpu_detect_mips();
141 #endif
142 }
143