Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
alexbevi
GitHub Repository: alexbevi/BizHawk
Path: blob/master/libmupen64plus/mupen64plus-video-glide64mk2/src/Glide64/TexLoad8b.h
2 views
1
/*
2
* Glide64 - Glide video plugin for Nintendo 64 emulators.
3
* Copyright (c) 2002 Dave2001
4
* Copyright (c) 2003-2009 Sergey 'Gonetz' Lipski
5
*
6
* This program is free software; you can redistribute it and/or modify
7
* it under the terms of the GNU General Public License as published by
8
* the Free Software Foundation; either version 2 of the License, or
9
* any later version.
10
*
11
* This program is distributed in the hope that it will be useful,
12
* but WITHOUT ANY WARRANTY; without even the implied warranty of
13
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
* GNU General Public License for more details.
15
*
16
* You should have received a copy of the GNU General Public License
17
* along with this program; if not, write to the Free Software
18
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19
*/
20
21
//****************************************************************
22
//
23
// Glide64 - Glide Plugin for Nintendo 64 emulators
24
// Project started on December 29th, 2001
25
//
26
// Authors:
27
// Dave2001, original author, founded the project in 2001, left it in 2002
28
// Gugaman, joined the project in 2002, left it in 2002
29
// Sergey 'Gonetz' Lipski, joined the project in 2002, main author since fall of 2002
30
// Hiroshi 'KoolSmoky' Morii, joined the project in 2007
31
//
32
//****************************************************************
33
//
34
// To modify Glide64:
35
// * Write your name and (optional)email, commented by your work, so I know who did it, and so that you can find which parts you modified when it comes time to send it to me.
36
// * Do NOT send me the whole project or file that you modified. Take out your modified code sections, and tell me where to put them. If people sent the whole thing, I would have many different versions, but no idea how to combine them all.
37
//
38
//****************************************************************
39
#include <stdint.h>
40
41
static inline void load8bCI(uint8_t *src, uint8_t *dst, int wid_64, int height, int line, int ext, uint16_t *pal)
42
{
43
uint8_t *v7;
44
uint32_t *v8;
45
int v9;
46
int v10;
47
int v11;
48
uint32_t v12;
49
uint32_t *v13;
50
uint32_t v14;
51
uint32_t *v15;
52
uint32_t v16;
53
uint32_t *v17;
54
uint32_t *v18;
55
int v19;
56
int v20;
57
uint32_t v21;
58
uint32_t v22;
59
uint32_t *v23;
60
uint32_t v24;
61
int v25;
62
int v26;
63
64
v7 = src;
65
v8 = (uint32_t *)dst;
66
v9 = height;
67
do
68
{
69
v25 = v9;
70
v10 = wid_64;
71
do
72
{
73
v11 = v10;
74
v12 = bswap32(*(uint32_t *)v7);
75
v13 = (uint32_t *)(v7 + 4);
76
ALOWORD(v10) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 15) & 0x1FE)), 1);
77
v14 = v10 << 16;
78
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 23) & 0x1FE)), 1);
79
*v8 = v14;
80
v15 = v8 + 1;
81
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v12 & 0x1FE)), 1);
82
v14 <<= 16;
83
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 7) & 0x1FE)), 1);
84
*v15 = v14;
85
++v15;
86
v16 = bswap32(*v13);
87
v7 = (uint8_t *)(v13 + 1);
88
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 15) & 0x1FE)), 1);
89
v14 <<= 16;
90
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 23) & 0x1FE)), 1);
91
*v15 = v14;
92
++v15;
93
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v16 & 0x1FE)), 1);
94
v14 <<= 16;
95
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 7) & 0x1FE)), 1);
96
*v15 = v14;
97
v8 = v15 + 1;
98
v10 = v11 - 1;
99
}
100
while ( v11 != 1 );
101
if ( v25 == 1 )
102
break;
103
v26 = v25 - 1;
104
v17 = (uint32_t *)&src[(line + (uintptr_t)v7 - (uintptr_t)src) & 0x7FF];
105
v18 = (uint32_t *)((char *)v8 + ext);
106
v19 = wid_64;
107
do
108
{
109
v20 = v19;
110
v21 = bswap32(v17[1]);
111
ALOWORD(v19) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 15) & 0x1FE)), 1);
112
v22 = v19 << 16;
113
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 23) & 0x1FE)), 1);
114
*v18 = v22;
115
v23 = v18 + 1;
116
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v21 & 0x1FE)), 1);
117
v22 <<= 16;
118
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 7) & 0x1FE)), 1);
119
*v23 = v22;
120
++v23;
121
v24 = bswap32(*v17);
122
v17 = (uint32_t *)&src[((uintptr_t)v17 + 8 - (uintptr_t)src) & 0x7FF];
123
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 15) & 0x1FE)), 1);
124
v22 <<= 16;
125
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 23) & 0x1FE)), 1);
126
*v23 = v22;
127
++v23;
128
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v24 & 0x1FE)), 1);
129
v22 <<= 16;
130
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 7) & 0x1FE)), 1);
131
*v23 = v22;
132
v18 = v23 + 1;
133
v19 = v20 - 1;
134
}
135
while ( v20 != 1 );
136
v7 = &src[(line + (uintptr_t)v17 - (uintptr_t)src) & 0x7FF];
137
v8 = (uint32_t *)((char *)v18 + ext);
138
v9 = v26 - 1;
139
}
140
while ( v26 != 1 );
141
}
142
143
static inline void load8bIA8(uint8_t *src, uint8_t *dst, int wid_64, int height, int line, int ext, uint16_t *pal)
144
{
145
uint32_t *v7;
146
uint32_t *v8;
147
int v9;
148
int v10;
149
int v11;
150
uint32_t v12;
151
uint32_t *v13;
152
uint32_t v14;
153
uint32_t *v15;
154
uint32_t v16;
155
uint32_t *v17;
156
uint32_t *v18;
157
int v19;
158
int v20;
159
uint32_t v21;
160
uint32_t v22;
161
uint32_t *v23;
162
uint32_t v24;
163
int v25;
164
int v26;
165
166
v7 = (uint32_t *)src;
167
v8 = (uint32_t *)dst;
168
v9 = height;
169
do
170
{
171
v25 = v9;
172
v10 = wid_64;
173
do
174
{
175
v11 = v10;
176
v12 = bswap32(*v7);
177
v13 = v7 + 1;
178
ALOWORD(v10) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 15) & 0x1FE)), 8);
179
v14 = v10 << 16;
180
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 23) & 0x1FE)), 8);
181
*v8 = v14;
182
v15 = v8 + 1;
183
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v12 & 0x1FE)), 8);
184
v14 <<= 16;
185
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v12 >> 7) & 0x1FE)), 8);
186
*v15 = v14;
187
++v15;
188
v16 = bswap32(*v13);
189
v7 = v13 + 1;
190
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 15) & 0x1FE)), 8);
191
v14 <<= 16;
192
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 23) & 0x1FE)), 8);
193
*v15 = v14;
194
++v15;
195
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v16 & 0x1FE)), 8);
196
v14 <<= 16;
197
ALOWORD(v14) = __ROR__(*(uint16_t *)((char *)pal + ((v16 >> 7) & 0x1FE)), 8);
198
*v15 = v14;
199
v8 = v15 + 1;
200
v10 = v11 - 1;
201
}
202
while ( v11 != 1 );
203
if ( v25 == 1 )
204
break;
205
v26 = v25 - 1;
206
v17 = (uint32_t *)((char *)v7 + line);
207
v18 = (uint32_t *)((char *)v8 + ext);
208
v19 = wid_64;
209
do
210
{
211
v20 = v19;
212
v21 = bswap32(v17[1]);
213
ALOWORD(v19) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 15) & 0x1FE)), 8);
214
v22 = v19 << 16;
215
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 23) & 0x1FE)), 8);
216
*v18 = v22;
217
v23 = v18 + 1;
218
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v21 & 0x1FE)), 8);
219
v22 <<= 16;
220
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v21 >> 7) & 0x1FE)), 8);
221
*v23 = v22;
222
++v23;
223
v24 = bswap32(*v17);
224
v17 += 2;
225
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 15) & 0x1FE)), 8);
226
v22 <<= 16;
227
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 23) & 0x1FE)), 8);
228
*v23 = v22;
229
++v23;
230
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + (2 * (uint16_t)v24 & 0x1FE)), 8);
231
v22 <<= 16;
232
ALOWORD(v22) = __ROR__(*(uint16_t *)((char *)pal + ((v24 >> 7) & 0x1FE)), 8);
233
*v23 = v22;
234
v18 = v23 + 1;
235
v19 = v20 - 1;
236
}
237
while ( v20 != 1 );
238
v7 = (uint32_t *)((char *)v17 + line);
239
v8 = (uint32_t *)((char *)v18 + ext);
240
v9 = v26 - 1;
241
}
242
while ( v26 != 1 );
243
}
244
245
static inline void load8bIA4(uint8_t *src, uint8_t *dst, int wid_64, int height, int line, int ext)
246
{
247
uint32_t *v6;
248
uint32_t *v7;
249
int v8;
250
int v9;
251
uint32_t v10;
252
uint32_t v11;
253
uint32_t *v12;
254
uint32_t *v13;
255
uint32_t v14;
256
uint32_t v15;
257
uint32_t *v16;
258
uint32_t *v17;
259
int v18;
260
uint32_t *v19;
261
uint32_t v20;
262
int v21;
263
int v22;
264
265
v6 = (uint32_t *)src;
266
v7 = (uint32_t *)dst;
267
v8 = height;
268
do
269
{
270
v21 = v8;
271
v9 = wid_64;
272
do
273
{
274
v10 = *v6;
275
v11 = (*v6 >> 4) & 0xF0F0F0F;
276
v12 = v6 + 1;
277
*v7 = (16 * v10 & 0xF0F0F0F0) | v11;
278
v13 = v7 + 1;
279
v14 = (*v12 >> 4) & 0xF0F0F0F;
280
v15 = 16 * *v12 & 0xF0F0F0F0;
281
v6 = v12 + 1;
282
*v13 = v15 | v14;
283
v7 = v13 + 1;
284
--v9;
285
}
286
while ( v9 );
287
if ( v21 == 1 )
288
break;
289
v22 = v21 - 1;
290
v16 = (uint32_t *)((char *)v6 + line);
291
v17 = (uint32_t *)((char *)v7 + ext);
292
v18 = wid_64;
293
do
294
{
295
*v17 = (16 * v16[1] & 0xF0F0F0F0) | ((v16[1] >> 4) & 0xF0F0F0F);
296
v19 = v17 + 1;
297
v20 = *v16;
298
v16 += 2;
299
*v19 = (16 * v20 & 0xF0F0F0F0) | ((v20 >> 4) & 0xF0F0F0F);
300
v17 = v19 + 1;
301
--v18;
302
}
303
while ( v18 );
304
v6 = (uint32_t *)((char *)v16 + line);
305
v7 = (uint32_t *)((char *)v17 + ext);
306
v8 = v22 - 1;
307
}
308
while ( v22 != 1 );
309
}
310
311
static inline void load8bI(uint8_t *src, uint8_t *dst, int wid_64, int height, int line, int ext)
312
{
313
uint32_t *v6;
314
uint32_t *v7;
315
int v8;
316
int v9;
317
uint32_t v10;
318
uint32_t *v11;
319
uint32_t *v12;
320
uint32_t v13;
321
uint32_t *v14;
322
uint32_t *v15;
323
int v16;
324
uint32_t *v17;
325
uint32_t v18;
326
int v19;
327
int v20;
328
329
v6 = (uint32_t *)src;
330
v7 = (uint32_t *)dst;
331
v8 = height;
332
do
333
{
334
v19 = v8;
335
v9 = wid_64;
336
do
337
{
338
v10 = *v6;
339
v11 = v6 + 1;
340
*v7 = v10;
341
v12 = v7 + 1;
342
v13 = *v11;
343
v6 = v11 + 1;
344
*v12 = v13;
345
v7 = v12 + 1;
346
--v9;
347
}
348
while ( v9 );
349
if ( v19 == 1 )
350
break;
351
v20 = v19 - 1;
352
v14 = (uint32_t *)((char *)v6 + line);
353
v15 = (uint32_t *)((char *)v7 + ext);
354
v16 = wid_64;
355
do
356
{
357
*v15 = v14[1];
358
v17 = v15 + 1;
359
v18 = *v14;
360
v14 += 2;
361
*v17 = v18;
362
v15 = v17 + 1;
363
--v16;
364
}
365
while ( v16 );
366
v6 = (uint32_t *)((char *)v14 + line);
367
v7 = (uint32_t *)((char *)v15 + ext);
368
v8 = v20 - 1;
369
}
370
while ( v20 != 1 );
371
}
372
373
//****************************************************************
374
// Size: 1, Format: 2
375
//
376
377
wxUint32 Load8bCI (wxUIntPtr dst, wxUIntPtr src, int wid_64, int height, int line, int real_width, int tile)
378
{
379
if (wid_64 < 1) wid_64 = 1;
380
if (height < 1) height = 1;
381
int ext = (real_width - (wid_64 << 3));
382
unsigned short * pal = rdp.pal_8;
383
384
switch (rdp.tlut_mode) {
385
case 0: //palette is not used
386
//in tlut DISABLE mode load CI texture as plain intensity texture instead of palette dereference.
387
//Thanks to angrylion for the advice
388
load8bI ((uint8_t *)src, (uint8_t *)dst, wid_64, height, line, ext);
389
return /*(0 << 16) | */GR_TEXFMT_ALPHA_8;
390
case 2: //color palette
391
ext <<= 1;
392
load8bCI ((uint8_t *)src, (uint8_t *)dst, wid_64, height, line, ext, pal);
393
return (1 << 16) | GR_TEXFMT_ARGB_1555;
394
default: //IA palette
395
ext <<= 1;
396
load8bIA8 ((uint8_t *)src, (uint8_t *)dst, wid_64, height, line, ext, pal);
397
return (1 << 16) | GR_TEXFMT_ALPHA_INTENSITY_88;
398
}
399
}
400
401
//****************************************************************
402
// Size: 1, Format: 3
403
//
404
// ** by Gugaman **
405
406
wxUint32 Load8bIA (wxUIntPtr dst, wxUIntPtr src, int wid_64, int height, int line, int real_width, int tile)
407
{
408
if (rdp.tlut_mode != 0)
409
return Load8bCI (dst, src, wid_64, height, line, real_width, tile);
410
411
if (wid_64 < 1) wid_64 = 1;
412
if (height < 1) height = 1;
413
int ext = (real_width - (wid_64 << 3));
414
load8bIA4 ((uint8_t *)src, (uint8_t *)dst, wid_64, height, line, ext);
415
return /*(0 << 16) | */GR_TEXFMT_ALPHA_INTENSITY_44;
416
}
417
418
//****************************************************************
419
// Size: 1, Format: 4
420
//
421
// ** by Gugaman **
422
423
wxUint32 Load8bI (wxUIntPtr dst, wxUIntPtr src, int wid_64, int height, int line, int real_width, int tile)
424
{
425
if (rdp.tlut_mode != 0)
426
return Load8bCI (dst, src, wid_64, height, line, real_width, tile);
427
428
if (wid_64 < 1) wid_64 = 1;
429
if (height < 1) height = 1;
430
int ext = (real_width - (wid_64 << 3));
431
load8bI ((uint8_t *)src, (uint8_t *)dst, wid_64, height, line, ext);
432
return /*(0 << 16) | */GR_TEXFMT_ALPHA_8;
433
}
434
435
436