[runtime] Fixed ARMv7k detection logic.
[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_is_v7k = FALSE;
38 gboolean mono_hwcap_arm_has_vfp = FALSE;
39 gboolean mono_hwcap_arm_has_vfp3 = FALSE;
40 gboolean mono_hwcap_arm_has_vfp3_d16 = FALSE;
41 gboolean mono_hwcap_arm_has_thumb = FALSE;
42 gboolean mono_hwcap_arm_has_thumb2 = FALSE;
43
44 void
45 mono_hwcap_arch_init (void)
46 {
47 #if defined(HAVE_SYS_AUXV_H) && !defined(PLATFORM_ANDROID)
48         unsigned long hwcap;
49         unsigned long platform;
50
51         if ((hwcap = getauxval(AT_HWCAP))) {
52                 /* HWCAP_ARM_THUMB */
53                 if (hwcap & 0x00000004)
54                         mono_hwcap_arm_has_thumb = TRUE;
55
56                 /* HWCAP_ARM_VFP */
57                 if (hwcap & 0x00000040)
58                         mono_hwcap_arm_has_vfp = TRUE;
59
60                 /* HWCAP_ARM_VFPv3 */
61                 if (hwcap & 0x00002000)
62                         mono_hwcap_arm_has_vfp3 = TRUE;
63
64                 /* HWCAP_ARM_VFPv3D16 */
65                 if (hwcap & 0x00004000)
66                         mono_hwcap_arm_has_vfp3_d16 = TRUE;
67
68                 /* TODO: Find a way to detect Thumb 2. */
69         }
70
71         if ((platform = getauxval(AT_PLATFORM))) {
72                 const char *str = (const char *) platform;
73
74                 if (str [1] >= '5')
75                         mono_hwcap_arm_is_v5 = TRUE;
76
77                 if (str [1] >= '6')
78                         mono_hwcap_arm_is_v6 = TRUE;
79
80                 if (str [1] >= '7')
81                         mono_hwcap_arm_is_v7 = TRUE;
82
83                 /* TODO: Find a way to detect v7s. */
84         }
85 #elif defined(__APPLE__)
86         cpu_subtype_t sub_type;
87         size_t length = sizeof (sub_type);
88
89         sysctlbyname ("hw.cpusubtype", &sub_type, &length, NULL, 0);
90
91         if (sub_type == CPU_SUBTYPE_ARM_V5TEJ || sub_type == CPU_SUBTYPE_ARM_XSCALE) {
92                 mono_hwcap_arm_is_v5 = TRUE;
93         } else if (sub_type == CPU_SUBTYPE_ARM_V6) {
94                 mono_hwcap_arm_is_v5 = TRUE;
95                 mono_hwcap_arm_is_v6 = TRUE;
96         } else if (sub_type == CPU_SUBTYPE_ARM_V7 || sub_type == CPU_SUBTYPE_ARM_V7F || sub_type == CPU_SUBTYPE_ARM_V7K) {
97                 mono_hwcap_arm_is_v5 = TRUE;
98                 mono_hwcap_arm_is_v6 = TRUE;
99                 mono_hwcap_arm_is_v7 = TRUE;
100         }
101
102         /* TODO: Find a way to detect features like Thumb and VFP. */
103 #else
104         /* We can't use the auxiliary vector on Android due to
105          * permissions, so fall back to /proc/cpuinfo. We also
106          * hit this path if the target doesn't have sys/auxv.h.
107          */
108
109         char buf [512];
110         char *line;
111
112         FILE *file = fopen ("/proc/cpuinfo", "r");
113
114         if (file) {
115                 while ((line = fgets (buf, 512, file))) {
116                         if (!strncmp (line, "Processor", 9)) {
117                                 char *ver = strstr (line, "(v");
118
119                                 if (ver) {
120                                         if (ver [2] >= '5')
121                                                 mono_hwcap_arm_is_v5 = TRUE;
122
123                                         if (ver [2] >= '6')
124                                                 mono_hwcap_arm_is_v6 = TRUE;
125
126                                         if (ver [2] >= '7')
127                                                 mono_hwcap_arm_is_v7 = TRUE;
128
129                                         /* TODO: Find a way to detect v7s. */
130                                 }
131
132                                 continue;
133                         }
134
135                         if (!strncmp (line, "Features", 8)) {
136                                 if (strstr (line, "thumb"))
137                                         mono_hwcap_arm_has_thumb = TRUE;
138
139                                 /* TODO: Find a way to detect Thumb 2. */
140
141                                 if (strstr (line, "vfp"))
142                                         mono_hwcap_arm_has_vfp = TRUE;
143
144                                 if (strstr (line, "vfpv3"))
145                                         mono_hwcap_arm_has_vfp3 = TRUE;
146
147                                 if (strstr (line, "vfpv3-d16"))
148                                         mono_hwcap_arm_has_vfp3_d16 = TRUE;
149
150                                 continue;
151                         }
152                 }
153
154                 fclose (file);
155         }
156 #endif
157 }
158
159 void
160 mono_hwcap_print(FILE *f)
161 {
162         g_fprintf (f, "mono_hwcap_arm_is_v5 = %i\n", mono_hwcap_arm_is_v5);
163         g_fprintf (f, "mono_hwcap_arm_is_v6 = %i\n", mono_hwcap_arm_is_v6);
164         g_fprintf (f, "mono_hwcap_arm_is_v7 = %i\n", mono_hwcap_arm_is_v7);
165         g_fprintf (f, "mono_hwcap_arm_is_v7s = %i\n", mono_hwcap_arm_is_v7s);
166         g_fprintf (f, "mono_hwcap_arm_is_v7k = %i\n", mono_hwcap_arm_is_v7k);
167         g_fprintf (f, "mono_hwcap_arm_has_vfp = %i\n", mono_hwcap_arm_has_vfp);
168         g_fprintf (f, "mono_hwcap_arm_has_vfp3 = %i\n", mono_hwcap_arm_has_vfp3);
169         g_fprintf (f, "mono_hwcap_arm_has_vfp3_d16 = %i\n", mono_hwcap_arm_has_vfp3_d16);
170         g_fprintf (f, "mono_hwcap_arm_has_thumb = %i\n", mono_hwcap_arm_has_thumb);
171         g_fprintf (f, "mono_hwcap_arm_has_thumb2 = %i\n", mono_hwcap_arm_has_thumb2);
172 }