1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
|
%ifdef _X64_
[BITS 64]
[SEGMENT .data]
[EXTERN _g_VectorDelta]
[EXTERN _g_PieceData]
%ifdef OSX
;;; Note: The reason for this OSX stuff is that there is a bug in the mac
;;; version of nasm. See comments in data.c for more details.
[GLOBAL g_NasmVectorDelta]
[GLOBAL _g_NasmVectorDelta]
g_NasmVectorDelta:
_g_NasmVectorDelta:
alignb 32, db 0
times 256 * 4 db 0
[GLOBAL g_NasmPieceData]
[GLOBAL _g_NasmPieceData]
g_NasmPieceData:
_g_NasmPieceData:
alignb 32, db 0
times 4 * 4 * 8 db 0
%else
[EXTERN _g_VectorDelta]
[EXTERN _g_PieceData]
%endif
[SEGMENT .text]
%ifndef CROUTINES
[GLOBAL LastBit]
[GLOBAL _LastBit]
;;
;; ULONGLONG CDECL
;; LastBit(BITBOARD bb)
;;
LastBit:
_LastBit:
int 3
bsr rax, rcx
jnz .found
xor rax, rax
ret
.found: add rax, 1
ret
int 3
[GLOBAL FirstBit]
[GLOBAL _FirstBit]
;;
;; ULONGLONG CDECL
;; FirstBit(BITBOARD bb)
;;
FirstBit:
_FirstBit:
;movq rcx, [rsp+8]
bsf rax, rcx
jnz .found
xor rax, rax
ret
.found: add rax, 1
ret
int 3
[GLOBAL CountBits]
[GLOBAL _CountBits]
;;
;; ULONGLONG CDECL
;; CountBits(BITBOARD bb)
;;
CountBits:
_CountBits:
xor rax, rax
mov rcx, [esp+8]
test rcx, rcx
jz .done
.again: add rax, 1
mov rdx, rcx
sub rdx, 1
and rcx, rdx
jnz .again
.done: ret
int 3
[GLOBAL GetAttacks]
[GLOBAL _GetAttacks]
db 43h,30h,50h,56h,72h,31h,47h,34h,54h,20h,32h,30h,30h
db 36h,20h,53h,63h,30h,74h,74h,20h,47h,61h,73h,63h,34h
iDelta dd -17
dd +15
%define uSide ebp+0x14
%define cSquare ebp+0x10
%define pos ebp+0xC
%define pList ebp+8
;; retaddr ebp+4
;; old ebp ebp
;; old ebx ebp-4
;; old esi ebp-8
;; old edi ebp-0xC
%define pOldList ebp-0x10
%define c ebp-0x14
%define x ebp-0x18
%define _cNonPawns 0x478
%define _uNonPawnCount 0x500
%define _rgSquare 0x0
;;
;; void CDECL
;; GetAttacks(SEE_LIST *pList, ; ebp + 8
;; POSITION *pos, ; ebp + 0xC
;; COOR cSquare, ; ebp + 0x10
;; ULONG uSide) ; ebp + 0x14
;;
GetAttacks:
_GetAttacks:
int 3
%endif ; !CROUTINES
[GLOBAL LockCompareExchange]
[GLOBAL _LockCompareExchange]
%define uComp esp+0xC
%define uExch esp+8
%define pDest esp+4
;;
;; ULONG CDECL
;; LockCompareExchange(void *dest, ; esp + 4
;; ULONG exch, ; esp + 8
;; ULONG comp) ; esp + C
;;
LockCompareExchange:
_LockCompareExchange:
mov ecx, [pDest]
mov edx, [uExch]
mov eax, [uComp]
lock cmpxchg dword [ecx], edx
ret
int 3
[GLOBAL LockIncrement]
[GLOBAL _LockIncrement]
;;
;; ULONG CDECL
;; LockIncrement(ULONG *pDest)
;;
LockIncrement:
_LockIncrement:
mov ecx, [pDest]
mov eax, 1
lock xadd [ecx], eax
add eax, 1
ret
int 3
[GLOBAL LockDecrement]
[GLOBAL _LockDecrement]
;;
;; ULONG CDECL
;; LockDecrement(ULONG *pDest)
;;
LockDecrement:
_LockDecrement:
mov ecx, [pDest]
mov eax, -1
lock xadd [ecx], eax
add eax, -1
ret
int 3
%endif ; X64
|
