rev |
line source |
nuclear@0
|
1 /* pnggccrd.c was removed from libpng-1.2.20. */
|
nuclear@0
|
2
|
nuclear@0
|
3 /* This code snippet is for use by configure's compilation test. */
|
nuclear@0
|
4
|
nuclear@0
|
5 #if (!defined _MSC_VER) && \
|
nuclear@0
|
6 defined(PNG_ASSEMBLER_CODE_SUPPORTED) && \
|
nuclear@0
|
7 defined(PNG_MMX_CODE_SUPPORTED)
|
nuclear@0
|
8
|
nuclear@0
|
9 int PNGAPI png_dummy_mmx_support(void);
|
nuclear@0
|
10
|
nuclear@0
|
11 static int _mmx_supported = 2; // 0: no MMX; 1: MMX supported; 2: not tested
|
nuclear@0
|
12
|
nuclear@0
|
13 int PNGAPI
|
nuclear@0
|
14 png_dummy_mmx_support(void) __attribute__((noinline));
|
nuclear@0
|
15
|
nuclear@0
|
16 int PNGAPI
|
nuclear@0
|
17 png_dummy_mmx_support(void)
|
nuclear@0
|
18 {
|
nuclear@0
|
19 int result;
|
nuclear@0
|
20 #if defined(PNG_MMX_CODE_SUPPORTED) // superfluous, but what the heck
|
nuclear@0
|
21 __asm__ __volatile__ (
|
nuclear@0
|
22 #if defined(__x86_64__)
|
nuclear@0
|
23 "pushq %%rbx \n\t" // rbx gets clobbered by CPUID instruction
|
nuclear@0
|
24 "pushq %%rcx \n\t" // so does rcx...
|
nuclear@0
|
25 "pushq %%rdx \n\t" // ...and rdx (but rcx & rdx safe on Linux)
|
nuclear@0
|
26 "pushfq \n\t" // save Eflag to stack
|
nuclear@0
|
27 "popq %%rax \n\t" // get Eflag from stack into rax
|
nuclear@0
|
28 "movq %%rax, %%rcx \n\t" // make another copy of Eflag in rcx
|
nuclear@0
|
29 "xorl $0x200000, %%eax \n\t" // toggle ID bit in Eflag (i.e., bit 21)
|
nuclear@0
|
30 "pushq %%rax \n\t" // save modified Eflag back to stack
|
nuclear@0
|
31 "popfq \n\t" // restore modified value to Eflag reg
|
nuclear@0
|
32 "pushfq \n\t" // save Eflag to stack
|
nuclear@0
|
33 "popq %%rax \n\t" // get Eflag from stack
|
nuclear@0
|
34 "pushq %%rcx \n\t" // save original Eflag to stack
|
nuclear@0
|
35 "popfq \n\t" // restore original Eflag
|
nuclear@0
|
36 #else
|
nuclear@0
|
37 "pushl %%ebx \n\t" // ebx gets clobbered by CPUID instruction
|
nuclear@0
|
38 "pushl %%ecx \n\t" // so does ecx...
|
nuclear@0
|
39 "pushl %%edx \n\t" // ...and edx (but ecx & edx safe on Linux)
|
nuclear@0
|
40 "pushfl \n\t" // save Eflag to stack
|
nuclear@0
|
41 "popl %%eax \n\t" // get Eflag from stack into eax
|
nuclear@0
|
42 "movl %%eax, %%ecx \n\t" // make another copy of Eflag in ecx
|
nuclear@0
|
43 "xorl $0x200000, %%eax \n\t" // toggle ID bit in Eflag (i.e., bit 21)
|
nuclear@0
|
44 "pushl %%eax \n\t" // save modified Eflag back to stack
|
nuclear@0
|
45 "popfl \n\t" // restore modified value to Eflag reg
|
nuclear@0
|
46 "pushfl \n\t" // save Eflag to stack
|
nuclear@0
|
47 "popl %%eax \n\t" // get Eflag from stack
|
nuclear@0
|
48 "pushl %%ecx \n\t" // save original Eflag to stack
|
nuclear@0
|
49 "popfl \n\t" // restore original Eflag
|
nuclear@0
|
50 #endif
|
nuclear@0
|
51 "xorl %%ecx, %%eax \n\t" // compare new Eflag with original Eflag
|
nuclear@0
|
52 "jz 0f \n\t" // if same, CPUID instr. is not supported
|
nuclear@0
|
53
|
nuclear@0
|
54 "xorl %%eax, %%eax \n\t" // set eax to zero
|
nuclear@0
|
55 // ".byte 0x0f, 0xa2 \n\t" // CPUID instruction (two-byte opcode)
|
nuclear@0
|
56 "cpuid \n\t" // get the CPU identification info
|
nuclear@0
|
57 "cmpl $1, %%eax \n\t" // make sure eax return non-zero value
|
nuclear@0
|
58 "jl 0f \n\t" // if eax is zero, MMX is not supported
|
nuclear@0
|
59
|
nuclear@0
|
60 "xorl %%eax, %%eax \n\t" // set eax to zero and...
|
nuclear@0
|
61 "incl %%eax \n\t" // ...increment eax to 1. This pair is
|
nuclear@0
|
62 // faster than the instruction "mov eax, 1"
|
nuclear@0
|
63 "cpuid \n\t" // get the CPU identification info again
|
nuclear@0
|
64 "andl $0x800000, %%edx \n\t" // mask out all bits but MMX bit (23)
|
nuclear@0
|
65 "cmpl $0, %%edx \n\t" // 0 = MMX not supported
|
nuclear@0
|
66 "jz 0f \n\t" // non-zero = yes, MMX IS supported
|
nuclear@0
|
67
|
nuclear@0
|
68 "movl $1, %%eax \n\t" // set return value to 1
|
nuclear@0
|
69 "jmp 1f \n\t" // DONE: have MMX support
|
nuclear@0
|
70
|
nuclear@0
|
71 "0: \n\t" // .NOT_SUPPORTED: target label for jump instructions
|
nuclear@0
|
72 "movl $0, %%eax \n\t" // set return value to 0
|
nuclear@0
|
73 "1: \n\t" // .RETURN: target label for jump instructions
|
nuclear@0
|
74 #if defined(__x86_64__)
|
nuclear@0
|
75 "popq %%rdx \n\t" // restore rdx
|
nuclear@0
|
76 "popq %%rcx \n\t" // restore rcx
|
nuclear@0
|
77 "popq %%rbx \n\t" // restore rbx
|
nuclear@0
|
78 #else
|
nuclear@0
|
79 "popl %%edx \n\t" // restore edx
|
nuclear@0
|
80 "popl %%ecx \n\t" // restore ecx
|
nuclear@0
|
81 "popl %%ebx \n\t" // restore ebx
|
nuclear@0
|
82 #endif
|
nuclear@0
|
83
|
nuclear@0
|
84 // "ret \n\t" // DONE: no MMX support
|
nuclear@0
|
85 // (fall through to standard C "ret")
|
nuclear@0
|
86
|
nuclear@0
|
87 : "=a" (result) // output list
|
nuclear@0
|
88
|
nuclear@0
|
89 : // any variables used on input (none)
|
nuclear@0
|
90
|
nuclear@0
|
91 // no clobber list
|
nuclear@0
|
92 // , "%ebx", "%ecx", "%edx" // GRR: we handle these manually
|
nuclear@0
|
93 // , "memory" // if write to a variable gcc thought was in a reg
|
nuclear@0
|
94 // , "cc" // "condition codes" (flag bits)
|
nuclear@0
|
95 );
|
nuclear@0
|
96 _mmx_supported = result;
|
nuclear@0
|
97 #else
|
nuclear@0
|
98 _mmx_supported = 0;
|
nuclear@0
|
99 #endif /* PNG_MMX_CODE_SUPPORTED */
|
nuclear@0
|
100
|
nuclear@0
|
101 return _mmx_supported;
|
nuclear@0
|
102 }
|
nuclear@0
|
103 #endif
|