Cleanup: style
[blender.git] / source / blender / blenlib / intern / system.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * ***** END GPL LICENSE BLOCK *****
19  */
20
21 /** \file blender/blenlib/intern/system.c
22  *  \ingroup bli
23  */
24
25 #include <stdio.h>
26 #include <stdlib.h>
27
28 #include "BLI_utildefines.h"
29 #include "BLI_system.h"
30 #include "BLI_string.h"
31
32 #include "MEM_guardedalloc.h"
33
34 /* for backtrace */
35 #if defined(__linux__) || defined(__APPLE__)
36 #  include <execinfo.h>
37 #elif defined(WIN32)
38 #  include <windows.h>
39 #  include <dbghelp.h>
40 #endif
41
42 int BLI_cpu_support_sse2(void)
43 {
44 #if defined(__x86_64__) || defined(_M_X64)
45         /* x86_64 always has SSE2 instructions */
46         return 1;
47 #elif defined(__GNUC__) && defined(i386)
48         /* for GCC x86 we check cpuid */
49         unsigned int d;
50         __asm__(
51             "pushl %%ebx\n\t"
52             "cpuid\n\t"
53             "popl %%ebx\n\t"
54             : "=d" (d)
55             : "a" (1));
56         return (d & 0x04000000) != 0;
57 #elif (defined(_MSC_VER) && defined(_M_IX86))
58         /* also check cpuid for MSVC x86 */
59         unsigned int d;
60         __asm {
61                 xor     eax, eax
62                 inc eax
63                 push ebx
64                 cpuid
65                 pop ebx
66                 mov d, edx
67         }
68         return (d & 0x04000000) != 0;
69 #else
70         return 0;
71 #endif
72 }
73
74 /**
75  * Write a backtrace into a file for systems which support it.
76  */
77 void BLI_system_backtrace(FILE *fp)
78 {
79         /* ------------- */
80         /* Linux / Apple */
81 #if defined(__linux__) || defined(__APPLE__)
82
83 #define SIZE 100
84         void *buffer[SIZE];
85         int nptrs;
86         char **strings;
87         int i;
88
89         /* include a backtrace for good measure */
90         nptrs = backtrace(buffer, SIZE);
91         strings = backtrace_symbols(buffer, nptrs);
92         for (i = 0; i < nptrs; i++) {
93                 fputs(strings[i], fp);
94                 fputc('\n', fp);
95         }
96
97         free(strings);
98 #undef SIZE
99
100         /* -------- */
101         /* Windows  */
102 #elif defined(_MSC_VER)
103
104 #ifndef NDEBUG
105 #define MAXSYMBOL 256
106 #define SIZE 100
107         unsigned short i;
108         void *stack[SIZE];
109         unsigned short nframes;
110         SYMBOL_INFO *symbolinfo;
111         HANDLE process;
112
113         process = GetCurrentProcess();
114
115         SymInitialize(process, NULL, TRUE);
116
117         nframes = CaptureStackBackTrace(0, SIZE, stack, NULL);
118         symbolinfo = MEM_callocN(sizeof(SYMBOL_INFO) + MAXSYMBOL * sizeof(char), "crash Symbol table");
119         symbolinfo->MaxNameLen = MAXSYMBOL - 1;
120         symbolinfo->SizeOfStruct = sizeof(SYMBOL_INFO);
121
122         for (i = 0; i < nframes; i++) {
123                 SymFromAddr(process, (DWORD64)(stack[i]), 0, symbolinfo);
124
125                 fprintf(fp, "%u: %s - 0x%0X\n", nframes - i - 1, symbolinfo->Name, symbolinfo->Address);
126         }
127
128         MEM_freeN(symbolinfo);
129 #undef MAXSYMBOL
130 #undef SIZE
131 #else
132         fprintf(fp, "Crash backtrace not supported on release builds\n");
133 #endif /* NDEBUG */
134 #else /* _MSC_VER */
135         /* ------------------ */
136         /* non msvc/osx/linux */
137         (void)fp;
138 #endif
139
140 }
141 /* end BLI_system_backtrace */
142
143 /* NOTE: The code for CPU brand string is adopted from Cycles. */
144
145 #if !defined(_WIN32) || defined(FREE_WINDOWS)
146 static void __cpuid(int data[4], int selector)
147 {
148 #if defined(__x86_64__)
149         asm("cpuid" : "=a" (data[0]), "=b" (data[1]), "=c" (data[2]), "=d" (data[3]) : "a"(selector));
150 #elif defined(__i386__)
151         asm("pushl %%ebx    \n\t"
152                 "cpuid          \n\t"
153                 "movl %%ebx, %1 \n\t"
154                 "popl %%ebx     \n\t"
155                 : "=a" (data[0]), "=r" (data[1]), "=c" (data[2]), "=d" (data[3])
156                 : "a"(selector)
157                 : "ebx");
158 #else
159         data[0] = data[1] = data[2] = data[3] = 0;
160 #endif
161 }
162 #endif
163
164 char *BLI_cpu_brand_string(void)
165 {
166         char buf[48] = { 0 };
167         int result[4] = { 0 };
168         __cpuid(result, 0x80000000);
169         if (result[0] >= (int)0x80000004) {
170                 __cpuid((int *)(buf + 0), 0x80000002);
171                 __cpuid((int *)(buf + 16), 0x80000003);
172                 __cpuid((int *)(buf + 32), 0x80000004);
173                 char *brand = BLI_strdup(buf);
174                 /* TODO(sergey): Make it a bit more presentable by removing trademark. */
175                 return brand;
176         }
177         return NULL;
178 }