Merge branch 'armhf' of github.com:alexrp/mono
[mono.git] / mono / utils / mono-hwcap-arm.c
1 /*
2  * mono-hwcap-arm.c: ARM hardware feature detection
3  *
4  * Authors:
5  *    Alex Rønne Petersen (alexrp@xamarin.com)
6  *    Elijah Taylor (elijahtaylor@google.com)
7  *    Miguel de Icaza (miguel@xamarin.com)
8  *    Neale Ferguson (Neale.Ferguson@SoftwareAG-usa.com)
9  *    Paolo Molaro (lupus@xamarin.com)
10  *    Rodrigo Kumpera (kumpera@gmail.com)
11  *    Sebastien Pouliot (sebastien@xamarin.com)
12  *    Zoltan Varga (vargaz@xamarin.com)
13  *
14  * Copyright 2003 Ximian, Inc.
15  * Copyright 2003-2011 Novell, Inc
16  * Copyright 2006 Broadcom
17  * Copyright 2007-2008 Andreas Faerber
18  * Copyright 2011-2013 Xamarin Inc
19  */
20
21 #include "mono/utils/mono-hwcap-arm.h"
22
23 #if defined(HAVE_SYS_AUXV_H) && !defined(PLATFORM_ANDROID)
24 #include <sys/auxv.h>
25 #elif defined(__APPLE__)
26 #include <mach/machine.h>
27 #include <sys/sysctl.h>
28 #include <sys/types.h>
29 #else
30 #include <stdio.h>
31 #endif
32
33 gboolean mono_hwcap_arm_is_v5 = FALSE;
34 gboolean mono_hwcap_arm_is_v6 = FALSE;
35 gboolean mono_hwcap_arm_is_v7 = FALSE;
36 gboolean mono_hwcap_arm_is_v7s = FALSE;
37 gboolean mono_hwcap_arm_has_vfp = FALSE;
38 gboolean mono_hwcap_arm_has_vfp3 = FALSE;
39 gboolean mono_hwcap_arm_has_vfp3_d16 = FALSE;
40 gboolean mono_hwcap_arm_has_thumb = FALSE;
41 gboolean mono_hwcap_arm_has_thumb2 = FALSE;
42
43 #if defined(MONO_CROSS_COMPILE)
44 void
45 mono_hwcap_arch_init (void)
46 {
47 }
48 #else
49 void
50 mono_hwcap_arch_init (void)
51 {
52 #if defined(HAVE_SYS_AUXV_H) && !defined(PLATFORM_ANDROID)
53         unsigned long hwcap;
54         unsigned long platform;
55
56         if ((hwcap = getauxval(AT_HWCAP))) {
57                 /* HWCAP_ARM_THUMB */
58                 if (hwcap & 0x00000004)
59                         mono_hwcap_arm_has_thumb = TRUE;
60
61                 /* HWCAP_ARM_VFP */
62                 if (hwcap & 0x00000040)
63                         mono_hwcap_arm_has_vfp = TRUE;
64
65                 /* HWCAP_ARM_VFPv3 */
66                 if (hwcap & 0x00002000)
67                         mono_hwcap_arm_has_vfp3 = TRUE;
68
69                 /* HWCAP_ARM_VFPv3D16 */
70                 if (hwcap & 0x00004000)
71                         mono_hwcap_arm_has_vfp3_d16 = TRUE;
72
73                 /* TODO: Find a way to detect Thumb 2. */
74         }
75
76         if ((platform = getauxval(AT_PLATFORM))) {
77                 const char *str = (const char *) platform;
78
79                 if (str [1] >= '5')
80                         mono_hwcap_arm_is_v5 = TRUE;
81
82                 if (str [1] >= '6')
83                         mono_hwcap_arm_is_v6 = TRUE;
84
85                 if (str [1] >= '7')
86                         mono_hwcap_arm_is_v7 = TRUE;
87
88                 /* TODO: Find a way to detect v7s. */
89         }
90 #elif defined(__APPLE__)
91         cpu_subtype_t sub_type;
92         size_t length = sizeof (sub_type);
93
94         sysctlbyname ("hw.cpusubtype", &sub_type, &length, NULL, 0);
95
96         if (sub_type == CPU_SUBTYPE_ARM_V5TEJ || sub_type == CPU_SUBTYPE_ARM_XSCALE) {
97                 mono_hwcap_arm_is_v5 = TRUE;
98         } else if (sub_type == CPU_SUBTYPE_ARM_V6) {
99                 mono_hwcap_arm_is_v5 = TRUE;
100                 mono_hwcap_arm_is_v6 = TRUE;
101         } else if (sub_type == CPU_SUBTYPE_ARM_V7 || sub_type == CPU_SUBTYPE_ARM_V7F || sub_type == CPU_SUBTYPE_ARM_V7K) {
102                 mono_hwcap_arm_is_v5 = TRUE;
103                 mono_hwcap_arm_is_v6 = TRUE;
104                 mono_hwcap_arm_is_v7 = TRUE;
105         }
106
107         /* TODO: Find a way to detect features like Thumb and VFP. */
108 #else
109         /* We can't use the auxiliary vector on Android due to
110          * permissions, so fall back to /proc/cpuinfo. We also
111          * hit this path if the target doesn't have sys/auxv.h.
112          */
113
114         char buf [512];
115         char *line;
116
117         FILE *file = fopen ("/proc/cpuinfo", "r");
118
119         if (file) {
120                 while ((line = fgets (buf, 512, file))) {
121                         if (!strncmp (line, "Processor", 9)) {
122                                 char *ver = strstr (line, "(v");
123
124                                 if (ver) {
125                                         if (ver [2] >= '5')
126                                                 mono_hwcap_arm_is_v5 = TRUE;
127
128                                         if (ver [2] >= '6')
129                                                 mono_hwcap_arm_is_v6 = TRUE;
130
131                                         if (ver [2] >= '7')
132                                                 mono_hwcap_arm_is_v7 = TRUE;
133
134                                         /* TODO: Find a way to detect v7s. */
135                                 }
136
137                                 continue;
138                         }
139
140                         if (!strncmp (line, "Features", 8)) {
141                                 if (strstr (line, "thumb"))
142                                         mono_hwcap_arm_has_thumb = TRUE;
143
144                                 /* TODO: Find a way to detect Thumb 2. */
145
146                                 if (strstr (line, "vfp"))
147                                         mono_hwcap_arm_has_vfp = TRUE;
148
149                                 if (strstr (line, "vfpv3"))
150                                         mono_hwcap_arm_has_vfp3 = TRUE;
151
152                                 if (strstr (line, "vfpv3-d16"))
153                                         mono_hwcap_arm_has_vfp3_d16 = TRUE;
154
155                                 continue;
156                         }
157                 }
158
159                 fclose (file);
160         }
161 #endif
162 }
163 #endif
164
165 void
166 mono_hwcap_print(FILE *f)
167 {
168         g_fprintf (f, "mono_hwcap_arm_is_v5 = %i\n", mono_hwcap_arm_is_v5);
169         g_fprintf (f, "mono_hwcap_arm_is_v6 = %i\n", mono_hwcap_arm_is_v6);
170         g_fprintf (f, "mono_hwcap_arm_is_v7 = %i\n", mono_hwcap_arm_is_v7);
171         g_fprintf (f, "mono_hwcap_arm_is_v7s = %i\n", mono_hwcap_arm_is_v7s);
172         g_fprintf (f, "mono_hwcap_arm_has_vfp = %i\n", mono_hwcap_arm_has_vfp);
173         g_fprintf (f, "mono_hwcap_arm_has_vfp3 = %i\n", mono_hwcap_arm_has_vfp3);
174         g_fprintf (f, "mono_hwcap_arm_has_vfp3_d16 = %i\n", mono_hwcap_arm_has_vfp3_d16);
175         g_fprintf (f, "mono_hwcap_arm_has_thumb = %i\n", mono_hwcap_arm_has_thumb);
176         g_fprintf (f, "mono_hwcap_arm_has_thumb2 = %i\n", mono_hwcap_arm_has_thumb2);
177 }