Merge pull request #123 from gameblabla/diablofix_hack
[pcsx_rearmed.git] / plugins / gpu_neon / psx_gpu / psx_gpu_parse.c
1 /*
2  * Copyright (C) 2011 Gilead Kutnick "Exophase" <exophase@gmail.com>
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 as
6  * published by the Free Software Foundation; either version 2 of
7  * 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 GNU
12  * General Public License for more details.
13  */
14
15 #include <stdio.h>
16
17 #include "common.h"
18
19 #ifndef command_lengths
20 const u8 command_lengths[256] =
21 {
22         0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 00
23         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 10
24         3,  3,  3,  3,  6,  6,  6,  6,  4,  4,  4,  4,  8,  8,  8,  8,   // 20
25         5,  5,  5,  5,  8,  8,  8,  8,  7,  7,  7,  7,  11, 11, 11, 11,  // 30
26         2,  2,  2,  2,  2,  2,  2,  2,  3,  3,  3,  3,  3,  3,  3,  3,   // 40
27         3,  3,  3,  3,  3,  3,  3,  3,  4,  4,  4,  4,  4,  4,  4,  4,   // 50
28         2,  2,  2,  2,  3,  3,  3,  3,  1,  1,  1,  1,  0,  0,  0,  0,   // 60
29         1,  1,  1,  1,  2,  2,  2,  2,  1,  1,  1,  1,  2,  2,  2,  2,   // 70
30         3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 80
31         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 90
32         2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // a0
33         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // b0
34         2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // c0
35         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // d0
36         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // e0
37         0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0    // f0
38 };
39 #endif
40
41 void update_texture_ptr(psx_gpu_struct *psx_gpu)
42 {
43   u8 *texture_base;
44   u8 *texture_ptr;
45
46   switch((psx_gpu->render_state_base >> 8) & 0x3)
47   {
48     default:
49     case TEXTURE_MODE_4BPP:
50       texture_base = psx_gpu->texture_4bpp_cache[psx_gpu->current_texture_page];
51
52       texture_ptr = texture_base;
53       texture_ptr += psx_gpu->texture_window_x & 0xF;
54       texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
55       texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
56       texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
57       break;
58
59     case TEXTURE_MODE_8BPP:
60       if(psx_gpu->current_texture_page & 0x1)
61       {
62         texture_base =
63          psx_gpu->texture_8bpp_odd_cache[psx_gpu->current_texture_page >> 1];
64       }
65       else
66       {
67         texture_base =
68          psx_gpu->texture_8bpp_even_cache[psx_gpu->current_texture_page >> 1];
69       }
70       
71       texture_ptr = texture_base;
72       texture_ptr += psx_gpu->texture_window_x & 0xF;
73       texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
74       texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
75       texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
76       break;
77
78     case TEXTURE_MODE_16BPP:
79       texture_base = (u8 *)(psx_gpu->vram_ptr);
80       texture_base += (psx_gpu->current_texture_page & 0xF) * 128;
81       texture_base += ((psx_gpu->current_texture_page >> 4) * 256) * 2048;
82
83       texture_ptr = texture_base;
84       texture_ptr += psx_gpu->texture_window_x * 2;
85       texture_ptr += (psx_gpu->texture_window_y) * 2048;
86       break;
87   }
88
89   psx_gpu->texture_page_base = texture_base;
90   psx_gpu->texture_page_ptr = texture_ptr;  
91 }
92
93 void set_texture(psx_gpu_struct *psx_gpu, u32 texture_settings)
94 {
95   texture_settings &= 0x1FF;
96   if(psx_gpu->texture_settings != texture_settings)
97   {
98     u32 new_texture_page = texture_settings & 0x1F;
99     u32 texture_mode = (texture_settings >> 7) & 0x3;
100     u32 render_state_base = psx_gpu->render_state_base;
101
102     flush_render_block_buffer(psx_gpu);
103
104     render_state_base &= ~(0xF << 6);
105     render_state_base |= ((texture_settings >> 5) & 0xF) << 6;
106
107     psx_gpu->render_state_base = render_state_base;
108
109     psx_gpu->current_texture_mask = 0x1 << new_texture_page;
110
111     if(texture_mode == TEXTURE_MODE_8BPP)
112     {     
113       // In 8bpp mode 256x256 takes up two pages. If it's on the right edge it
114       // wraps back around to the left edge.
115       u32 adjacent_texture_page = ((texture_settings + 1) & 0xF) | (texture_settings & 0x10);
116       psx_gpu->current_texture_mask |= 0x1 << adjacent_texture_page;
117
118       if((psx_gpu->last_8bpp_texture_page ^ new_texture_page) & 0x1)
119       {
120         u32 dirty_textures_8bpp_alternate_mask =
121          psx_gpu->dirty_textures_8bpp_alternate_mask;
122         psx_gpu->dirty_textures_8bpp_alternate_mask =
123          psx_gpu->dirty_textures_8bpp_mask;
124         psx_gpu->dirty_textures_8bpp_mask = dirty_textures_8bpp_alternate_mask;
125       }
126
127       psx_gpu->last_8bpp_texture_page = new_texture_page;
128     }
129
130     psx_gpu->current_texture_page = new_texture_page;
131     psx_gpu->texture_settings = texture_settings;
132
133     update_texture_ptr(psx_gpu);
134   }
135 }
136
137 void set_clut(psx_gpu_struct *psx_gpu, u32 clut_settings)
138 {
139   if(psx_gpu->clut_settings != clut_settings)
140   {
141     flush_render_block_buffer(psx_gpu);
142     psx_gpu->clut_settings = clut_settings;
143     psx_gpu->clut_ptr = psx_gpu->vram_ptr + ((clut_settings & 0x7FFF) * 16);
144   }
145 }
146
147 void set_triangle_color(psx_gpu_struct *psx_gpu, u32 triangle_color)
148 {
149   if(psx_gpu->triangle_color != triangle_color)
150   {
151     flush_render_block_buffer(psx_gpu);
152     psx_gpu->triangle_color = triangle_color;
153   }
154 }
155
156 static void do_fill(psx_gpu_struct *psx_gpu, u32 x, u32 y,
157  u32 width, u32 height, u32 color)
158 {
159   x &= ~0xF;
160   width = ((width + 0xF) & ~0xF);
161
162   flush_render_block_buffer(psx_gpu);
163
164   if(unlikely((x + width) > 1024))
165   {
166     u32 width_a = 1024 - x;
167     u32 width_b = width - width_a;
168
169     if(unlikely((y + height) > 512))
170     {
171       u32 height_a = 512 - y;
172       u32 height_b = height - height_a;
173
174       render_block_fill(psx_gpu, color, x, y, width_a, height_a);
175       render_block_fill(psx_gpu, color, 0, y, width_b, height_a);
176       render_block_fill(psx_gpu, color, x, 0, width_a, height_b);
177       render_block_fill(psx_gpu, color, 0, 0, width_b, height_b);
178     }
179     else
180     {
181       render_block_fill(psx_gpu, color, x, y, width_a, height);
182       render_block_fill(psx_gpu, color, 0, y, width_b, height);
183     }
184   }
185   else
186   {
187     if(unlikely((y + height) > 512))
188     {
189       u32 height_a = 512 - y;
190       u32 height_b = height - height_a;
191
192       render_block_fill(psx_gpu, color, x, y, width, height_a);
193       render_block_fill(psx_gpu, color, x, 0, width, height_b);
194     }
195     else
196     {
197       render_block_fill(psx_gpu, color, x, y, width, height);
198     }
199   }
200 }
201
202 #define sign_extend_12bit(value)                                               \
203   (((s32)((value) << 20)) >> 20)                                               \
204
205 #define sign_extend_11bit(value)                                               \
206   (((s32)((value) << 21)) >> 21)                                               \
207
208 #define sign_extend_10bit(value)                                               \
209   (((s32)((value) << 22)) >> 22)                                               \
210
211
212 #define get_vertex_data_xy(vertex_number, offset16)                            \
213   vertexes[vertex_number].x =                                                  \
214    sign_extend_12bit(list_s16[offset16]) + psx_gpu->offset_x;                  \
215   vertexes[vertex_number].y =                                                  \
216    sign_extend_12bit(list_s16[(offset16) + 1]) + psx_gpu->offset_y;            \
217
218 #define get_vertex_data_uv(vertex_number, offset16)                            \
219   vertexes[vertex_number].u = list_s16[offset16] & 0xFF;                       \
220   vertexes[vertex_number].v = (list_s16[offset16] >> 8) & 0xFF                 \
221
222 #define get_vertex_data_rgb(vertex_number, offset32)                           \
223   vertexes[vertex_number].r = list[offset32] & 0xFF;                           \
224   vertexes[vertex_number].g = (list[offset32] >> 8) & 0xFF;                    \
225   vertexes[vertex_number].b = (list[offset32] >> 16) & 0xFF                    \
226
227 #define get_vertex_data_xy_uv(vertex_number, offset16)                         \
228   get_vertex_data_xy(vertex_number, offset16);                                 \
229   get_vertex_data_uv(vertex_number, (offset16) + 2)                            \
230
231 #define get_vertex_data_xy_rgb(vertex_number, offset16)                        \
232   get_vertex_data_rgb(vertex_number, (offset16) / 2);                          \
233   get_vertex_data_xy(vertex_number, (offset16) + 2);                           \
234
235 #define get_vertex_data_xy_uv_rgb(vertex_number, offset16)                     \
236   get_vertex_data_rgb(vertex_number, (offset16) / 2);                          \
237   get_vertex_data_xy(vertex_number, (offset16) + 2);                           \
238   get_vertex_data_uv(vertex_number, (offset16) + 4);                           \
239
240 #define set_vertex_color_constant(vertex_number, color)                        \
241   vertexes[vertex_number].r = color & 0xFF;                                    \
242   vertexes[vertex_number].g = (color >> 8) & 0xFF;                             \
243   vertexes[vertex_number].b = (color >> 16) & 0xFF                             \
244
245 #define get_vertex_data_xy_rgb_constant(vertex_number, offset16, color)        \
246   get_vertex_data_xy(vertex_number, offset16);                                 \
247   set_vertex_color_constant(vertex_number, color)                              \
248
249 #ifndef SET_Ex
250 #define SET_Ex(r, v)
251 #endif
252
253 vertex_struct vertexes[4] __attribute__((aligned(32)));
254
255 u32 gpu_parse(psx_gpu_struct *psx_gpu, u32 *list, u32 size, u32 *last_command)
256 {
257   u32 current_command = 0, command_length;
258
259   u32 *list_start = list;
260   u32 *list_end = list + (size / 4);
261
262   for(; list < list_end; list += 1 + command_length)
263   {
264         s16 *list_s16 = (void *)list;
265         current_command = *list >> 24;
266         command_length = command_lengths[current_command];
267         if (list + 1 + command_length > list_end) {
268           current_command = (u32)-1;
269           break;
270         }
271
272         switch(current_command)
273         {
274                 case 0x00:
275                         break;
276   
277                 case 0x02:
278       {
279         u32 x = list_s16[2] & 0x3FF;
280         u32 y = list_s16[3] & 0x1FF;
281         u32 width = list_s16[4] & 0x3FF;
282         u32 height = list_s16[5] & 0x1FF;
283         u32 color = list[0] & 0xFFFFFF;
284
285         do_fill(psx_gpu, x, y, width, height, color);
286                         break;
287       }
288   
289                 case 0x20 ... 0x23:
290       {
291         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
292   
293         get_vertex_data_xy(0, 2);
294         get_vertex_data_xy(1, 4);
295         get_vertex_data_xy(2, 6);
296           
297         render_triangle(psx_gpu, vertexes, current_command);
298                         break;
299       }
300   
301                 case 0x24 ... 0x27:
302       {
303         set_clut(psx_gpu, list_s16[5]);
304         set_texture(psx_gpu, list_s16[9]);
305         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
306   
307         get_vertex_data_xy_uv(0, 2);
308         get_vertex_data_xy_uv(1, 6);
309         get_vertex_data_xy_uv(2, 10);
310   
311         render_triangle(psx_gpu, vertexes, current_command);
312                         break;
313       }
314   
315                 case 0x28 ... 0x2B:
316       {
317         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
318   
319         get_vertex_data_xy(0, 2);
320         get_vertex_data_xy(1, 4);
321         get_vertex_data_xy(2, 6);
322         get_vertex_data_xy(3, 8);
323   
324         render_triangle(psx_gpu, vertexes, current_command);
325         render_triangle(psx_gpu, &(vertexes[1]), current_command);
326                         break;
327       }
328   
329                 case 0x2C ... 0x2F:
330       {
331         set_clut(psx_gpu, list_s16[5]);
332         set_texture(psx_gpu, list_s16[9]);
333         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
334   
335         get_vertex_data_xy_uv(0, 2);   
336         get_vertex_data_xy_uv(1, 6);   
337         get_vertex_data_xy_uv(2, 10);  
338         get_vertex_data_xy_uv(3, 14);
339   
340         render_triangle(psx_gpu, vertexes, current_command);
341         render_triangle(psx_gpu, &(vertexes[1]), current_command);
342                         break;
343       }
344   
345                 case 0x30 ... 0x33:
346       {
347         get_vertex_data_xy_rgb(0, 0);
348         get_vertex_data_xy_rgb(1, 4);
349         get_vertex_data_xy_rgb(2, 8);
350   
351         render_triangle(psx_gpu, vertexes, current_command);
352                         break;
353       }
354   
355                 case 0x34:
356                 case 0x35:
357                 case 0x36:
358                 case 0x37:
359       {
360         set_clut(psx_gpu, list_s16[5]);
361         set_texture(psx_gpu, list_s16[11]);
362   
363         get_vertex_data_xy_uv_rgb(0, 0);
364         get_vertex_data_xy_uv_rgb(1, 6);
365         get_vertex_data_xy_uv_rgb(2, 12);
366
367         render_triangle(psx_gpu, vertexes, current_command);
368                         break;
369       }
370   
371                 case 0x38:
372                 case 0x39:
373                 case 0x3A:
374                 case 0x3B:
375       {
376         get_vertex_data_xy_rgb(0, 0);
377         get_vertex_data_xy_rgb(1, 4);
378         get_vertex_data_xy_rgb(2, 8);
379         get_vertex_data_xy_rgb(3, 12);
380   
381         render_triangle(psx_gpu, vertexes, current_command);
382         render_triangle(psx_gpu, &(vertexes[1]), current_command);
383                         break;
384       }
385   
386                 case 0x3C:
387                 case 0x3D:
388                 case 0x3E:
389                 case 0x3F:
390       {
391         set_clut(psx_gpu, list_s16[5]);
392         set_texture(psx_gpu, list_s16[11]);
393   
394         get_vertex_data_xy_uv_rgb(0, 0);
395         get_vertex_data_xy_uv_rgb(1, 6);
396         get_vertex_data_xy_uv_rgb(2, 12);
397         get_vertex_data_xy_uv_rgb(3, 18);
398   
399         render_triangle(psx_gpu, vertexes, current_command);
400         render_triangle(psx_gpu, &(vertexes[1]), current_command);
401                         break;
402       }
403   
404                 case 0x40 ... 0x47:
405       {
406         vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
407         vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
408         vertexes[1].x = list_s16[4] + psx_gpu->offset_x;
409         vertexes[1].y = list_s16[5] + psx_gpu->offset_y;
410
411         render_line(psx_gpu, vertexes, current_command, list[0], 0);
412                         break;
413       }
414   
415                 case 0x48 ... 0x4F:
416       {
417         u32 num_vertexes = 1;
418         u32 *list_position = &(list[2]);
419         u32 xy = list[1];
420
421         vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
422         vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
423       
424         xy = *list_position;
425         while(1)
426         {
427           vertexes[0] = vertexes[1];
428
429           vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
430           vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
431
432           render_line(psx_gpu, vertexes, current_command, list[0], 0);
433
434           list_position++;
435           num_vertexes++;
436
437           if(list_position >= list_end)
438           {
439             current_command = (u32)-1;
440             goto breakloop;
441           }
442
443           xy = *list_position;
444           if((xy & 0xF000F000) == 0x50005000)
445             break;
446         }
447
448         command_length += (num_vertexes - 2);
449         break;
450       }
451   
452                 case 0x50 ... 0x57:
453       {
454         vertexes[0].r = list[0] & 0xFF;
455         vertexes[0].g = (list[0] >> 8) & 0xFF;
456         vertexes[0].b = (list[0] >> 16) & 0xFF;
457         vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
458         vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
459
460         vertexes[1].r = list[2] & 0xFF;
461         vertexes[1].g = (list[2] >> 8) & 0xFF;
462         vertexes[1].b = (list[2] >> 16) & 0xFF;
463         vertexes[1].x = list_s16[6] + psx_gpu->offset_x;
464         vertexes[1].y = list_s16[7] + psx_gpu->offset_y;
465
466         render_line(psx_gpu, vertexes, current_command, 0, 0);
467                         break;
468       }
469  
470       case 0x58 ... 0x5F:
471       {
472         u32 num_vertexes = 1;
473         u32 *list_position = &(list[2]);
474         u32 color = list[0];
475         u32 xy = list[1];
476
477         vertexes[1].r = color & 0xFF;
478         vertexes[1].g = (color >> 8) & 0xFF;
479         vertexes[1].b = (color >> 16) & 0xFF;
480         vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
481         vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
482       
483         color = list_position[0];
484         while(1)
485         {
486           xy = list_position[1];
487
488           vertexes[0] = vertexes[1];
489
490           vertexes[1].r = color & 0xFF;
491           vertexes[1].g = (color >> 8) & 0xFF;
492           vertexes[1].b = (color >> 16) & 0xFF;
493           vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
494           vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
495
496           render_line(psx_gpu, vertexes, current_command, 0, 0);
497
498           list_position += 2;
499           num_vertexes++;
500
501           if(list_position >= list_end)
502           {
503             current_command = (u32)-1;
504             goto breakloop;
505           }
506
507           color = list_position[0];
508           if((color & 0xF000F000) == 0x50005000)
509             break;
510         }
511
512         command_length += ((num_vertexes - 2) * 2);
513         break;
514       }
515   
516                 case 0x60 ... 0x63:
517       {        
518         u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
519         u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
520         u32 width = list_s16[4] & 0x3FF;
521         u32 height = list_s16[5] & 0x1FF;
522
523         render_sprite(psx_gpu, x, y, 0, 0, width, height, current_command, list[0]);
524                         break;
525       }
526   
527                 case 0x64 ... 0x67:
528       {        
529         u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
530         u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
531         u32 uv = list_s16[4];
532         u32 width = list_s16[6] & 0x3FF;
533         u32 height = list_s16[7] & 0x1FF;
534
535         set_clut(psx_gpu, list_s16[5]);
536
537         render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, width, height,
538          current_command, list[0]);
539                         break;
540       }
541   
542                 case 0x68:
543                 case 0x69:
544                 case 0x6A:
545                 case 0x6B:
546       {
547         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
548         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
549
550         render_sprite(psx_gpu, x, y, 0, 0, 1, 1, current_command, list[0]);
551                         break;
552       }
553   
554                 case 0x70:
555                 case 0x71:
556                 case 0x72:
557                 case 0x73:
558       {        
559         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
560         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
561
562         render_sprite(psx_gpu, x, y, 0, 0, 8, 8, current_command, list[0]);
563                         break;
564       }
565   
566                 case 0x74:
567                 case 0x75:
568                 case 0x76:
569                 case 0x77:
570       {        
571         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
572         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
573         u32 uv = list_s16[4];
574
575         set_clut(psx_gpu, list_s16[5]);
576
577         render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 8, 8,
578          current_command, list[0]);
579                         break;
580       }
581   
582                 case 0x78:
583                 case 0x79:
584                 case 0x7A:
585                 case 0x7B:
586       {        
587         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
588         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
589
590         render_sprite(psx_gpu, x, y, 0, 0, 16, 16, current_command, list[0]);
591                         break;
592       }
593   
594                 case 0x7C:
595                 case 0x7D:
596                 case 0x7E:
597                 case 0x7F:
598       {        
599         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
600         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
601         u32 uv = list_s16[4];
602
603         set_clut(psx_gpu, list_s16[5]);
604
605         render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 16, 16,
606          current_command, list[0]);
607                         break;
608       }
609   
610       case 0x80:          //  vid -> vid
611       {
612         u32 sx = list_s16[2] & 0x3FF;
613         u32 sy = list_s16[3] & 0x1FF;
614         u32 dx = list_s16[4] & 0x3FF;
615         u32 dy = list_s16[5] & 0x1FF;
616         u32 w = ((list_s16[6] - 1) & 0x3FF) + 1;
617         u32 h = ((list_s16[7] - 1) & 0x1FF) + 1;
618
619         if (sx == dx && sy == dy && psx_gpu->mask_msb == 0)
620           break;
621
622         render_block_move(psx_gpu, sx, sy, dx, dy, w, h);
623         break;
624       } 
625
626 #ifdef PCSX
627                 case 0xA0:          //  sys -> vid
628                 case 0xC0:          //  vid -> sys
629                         goto breakloop;
630 #else
631                 case 0xA0:          //  sys -> vid
632       {
633         u32 load_x = list_s16[2] & 0x3FF;
634         u32 load_y = list_s16[3] & 0x1FF;
635         u32 load_width = list_s16[4] & 0x3FF;
636         u32 load_height = list_s16[5] & 0x1FF;
637         u32 load_size = load_width * load_height;
638   
639         command_length += load_size / 2;
640
641         if(load_size & 1)
642           command_length++;
643
644         render_block_copy(psx_gpu, (u16 *)&(list_s16[6]), load_x, load_y,
645          load_width, load_height, load_width);
646                         break;
647       }
648
649                 case 0xC0:          //  vid -> sys
650                         break;
651 #endif
652
653                 case 0xE1:
654         set_texture(psx_gpu, list[0]);
655
656         if(list[0] & (1 << 9))
657           psx_gpu->render_state_base |= RENDER_STATE_DITHER;
658         else
659           psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;
660
661         psx_gpu->display_area_draw_enable = (list[0] >> 10) & 0x1;
662                         SET_Ex(1, list[0]);
663                         break;
664   
665                 case 0xE2:
666       {
667         // TODO: Clean
668         u32 texture_window_settings = list[0];
669         u32 tmp, x, y, w, h;
670
671         if(texture_window_settings != psx_gpu->texture_window_settings)
672         {
673           tmp = (texture_window_settings & 0x1F) | 0x20;
674           for(w = 8; (tmp & 1) == 0; tmp >>= 1, w <<= 1);
675
676           tmp = ((texture_window_settings >> 5) & 0x1f) | 0x20;
677           for (h = 8; (tmp & 1) == 0; tmp >>= 1, h <<= 1);
678
679           tmp = 32 - (w >> 3);
680           x = ((texture_window_settings >> 10) & tmp) << 3;
681
682           tmp = 32 - (h >> 3);
683           y = ((texture_window_settings >> 15) & tmp) << 3;
684
685           flush_render_block_buffer(psx_gpu);
686           
687           psx_gpu->texture_window_settings = texture_window_settings;
688           psx_gpu->texture_window_x = x;
689           psx_gpu->texture_window_y = y;
690           psx_gpu->texture_mask_width = w - 1;
691           psx_gpu->texture_mask_height = h - 1;
692
693           update_texture_ptr(psx_gpu);
694         }
695         SET_Ex(2, list[0]);
696         break;
697       }
698
699       case 0xE3:
700       {
701         s16 viewport_start_x = list[0] & 0x3FF;
702         s16 viewport_start_y = (list[0] >> 10) & 0x1FF;
703
704         if(viewport_start_x == psx_gpu->viewport_start_x &&
705          viewport_start_y == psx_gpu->viewport_start_y)
706         {
707           break;
708         }
709   
710         psx_gpu->viewport_start_x = viewport_start_x;
711         psx_gpu->viewport_start_y = viewport_start_y;
712
713 #ifdef TEXTURE_CACHE_4BPP
714         psx_gpu->viewport_mask =
715          texture_region_mask(psx_gpu->viewport_start_x,
716          psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
717          psx_gpu->viewport_end_y);
718 #endif
719         SET_Ex(3, list[0]);
720         break;
721       }
722
723       case 0xE4:
724       {
725         s16 viewport_end_x = list[0] & 0x3FF;
726         s16 viewport_end_y = (list[0] >> 10) & 0x1FF;
727
728         if(viewport_end_x == psx_gpu->viewport_end_x &&
729          viewport_end_y == psx_gpu->viewport_end_y)
730         {
731           break;
732         }
733
734         psx_gpu->viewport_end_x = viewport_end_x;
735         psx_gpu->viewport_end_y = viewport_end_y;
736
737 #ifdef TEXTURE_CACHE_4BPP
738         psx_gpu->viewport_mask =
739          texture_region_mask(psx_gpu->viewport_start_x,
740          psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
741          psx_gpu->viewport_end_y);
742 #endif
743         SET_Ex(4, list[0]);
744         break;
745       }
746   
747       case 0xE5:
748       {
749         s32 offset_x = list[0] << 21;
750         s32 offset_y = list[0] << 10;
751         psx_gpu->offset_x = offset_x >> 21;
752         psx_gpu->offset_y = offset_y >> 21; 
753   
754                         SET_Ex(5, list[0]);
755                         break;
756                 }
757
758                 case 0xE6:
759       {
760         u32 mask_settings = list[0];
761         u16 mask_msb = mask_settings << 15;
762
763         if(list[0] & 0x2)
764           psx_gpu->render_state_base |= RENDER_STATE_MASK_EVALUATE;
765         else
766           psx_gpu->render_state_base &= ~RENDER_STATE_MASK_EVALUATE;
767
768         if(mask_msb != psx_gpu->mask_msb)
769         {
770           flush_render_block_buffer(psx_gpu);
771           psx_gpu->mask_msb = mask_msb;
772         }
773
774                         SET_Ex(6, list[0]);
775                         break;
776       }
777   
778                 default:
779                         break;
780         }
781   }
782
783 breakloop:
784   if (last_command != NULL)
785     *last_command = current_command;
786   return list - list_start;
787 }
788
789 #ifdef PCSX
790
791 #define ENH_BUF_TABLE_STEP (1024 / sizeof(psx_gpu->enhancement_buf_by_x16))
792
793 static void update_enhancement_buf_table_from_hres(psx_gpu_struct *psx_gpu)
794 {
795   u32 b, x, s;
796
797   b = 0;
798   s = psx_gpu->enhancement_x_threshold;
799   for (x = 0; x < sizeof(psx_gpu->enhancement_buf_by_x16); x++)
800   {
801     if (b < 3 && x * ENH_BUF_TABLE_STEP >= s - ENH_BUF_TABLE_STEP - 1)
802     {
803       s += psx_gpu->enhancement_x_threshold;
804       b++;
805     }
806     psx_gpu->enhancement_buf_by_x16[x] = b;
807   }
808 }
809
810 static void update_enhancement_buf_table_from_x(psx_gpu_struct *psx_gpu,
811  u32 x0, u32 len)
812 {
813   u32 x, b;
814
815   for (x = x0, b = 0; x >= len; b++)
816     x -= len;
817   if (b > 3)
818     b = 3;
819
820   memset(psx_gpu->enhancement_buf_by_x16 + x0 / ENH_BUF_TABLE_STEP,
821    b, (len + ENH_BUF_TABLE_STEP - 1) / ENH_BUF_TABLE_STEP);
822 }
823
824 #define select_enhancement_buf(psx_gpu) \
825   psx_gpu->enhancement_current_buf_ptr = \
826     select_enhancement_buf_ptr(psx_gpu, psx_gpu->saved_viewport_start_x)
827
828 #define enhancement_disable() { \
829   psx_gpu->vram_out_ptr = psx_gpu->vram_ptr; \
830   psx_gpu->viewport_start_x = psx_gpu->saved_viewport_start_x; \
831   psx_gpu->viewport_start_y = psx_gpu->saved_viewport_start_y; \
832   psx_gpu->viewport_end_x = psx_gpu->saved_viewport_end_x; \
833   psx_gpu->viewport_end_y = psx_gpu->saved_viewport_end_y; \
834   psx_gpu->uvrgb_phase = 0x8000; \
835 }
836
837 #define enhancement_enable() { \
838   psx_gpu->vram_out_ptr = psx_gpu->enhancement_current_buf_ptr; \
839   psx_gpu->viewport_start_x = psx_gpu->saved_viewport_start_x * 2; \
840   psx_gpu->viewport_start_y = psx_gpu->saved_viewport_start_y * 2; \
841   psx_gpu->viewport_end_x = psx_gpu->saved_viewport_end_x * 2 + 1; \
842   psx_gpu->viewport_end_y = psx_gpu->saved_viewport_end_y * 2 + 1; \
843   psx_gpu->uvrgb_phase = 0x1000; \
844 }
845
846 #define shift_vertices3(v) { \
847   v[0]->x *= 2; \
848   v[0]->y *= 2; \
849   v[1]->x *= 2; \
850   v[1]->y *= 2; \
851   v[2]->x *= 2; \
852   v[2]->y *= 2; \
853 }
854
855 #define unshift_vertices3(v) { \
856   v[0]->x /= 2; \
857   v[0]->y /= 2; \
858   v[1]->x /= 2; \
859   v[1]->y /= 2; \
860   v[2]->x /= 2; \
861   v[2]->y /= 2; \
862 }
863
864 #define shift_triangle_area() \
865   psx_gpu->triangle_area *= 4
866
867 extern void scale2x_tiles8(void *dst, const void *src, int w8, int h);
868
869 #ifndef NEON_BUILD
870 // TODO?
871 void scale2x_tiles8(void *dst, const void *src, int w8, int h) {}
872 #endif
873
874 static int disable_main_render;
875
876 static void do_triangle_enhanced(psx_gpu_struct *psx_gpu,
877  vertex_struct *vertexes, u32 current_command)
878 {
879   vertex_struct *vertex_ptrs[3];
880
881   if (!prepare_triangle(psx_gpu, vertexes, vertex_ptrs))
882     return;
883
884   if (!disable_main_render)
885     render_triangle_p(psx_gpu, vertex_ptrs, current_command);
886
887   enhancement_enable();
888   shift_vertices3(vertex_ptrs);
889   shift_triangle_area();
890   render_triangle_p(psx_gpu, vertex_ptrs, current_command);
891 }
892
893 static void do_quad_enhanced(psx_gpu_struct *psx_gpu, vertex_struct *vertexes,
894  u32 current_command)
895 {
896   vertex_struct *vertex_ptrs[3];
897
898   if (prepare_triangle(psx_gpu, vertexes, vertex_ptrs)) {
899     if (!disable_main_render)
900       render_triangle_p(psx_gpu, vertex_ptrs, current_command);
901
902     enhancement_enable();
903     shift_vertices3(vertex_ptrs);
904     shift_triangle_area();
905     render_triangle_p(psx_gpu, vertex_ptrs, current_command);
906     unshift_vertices3(vertex_ptrs);
907   }
908   enhancement_disable();
909   if (prepare_triangle(psx_gpu, &vertexes[1], vertex_ptrs)) {
910     if (!disable_main_render)
911       render_triangle_p(psx_gpu, vertex_ptrs, current_command);
912
913     enhancement_enable();
914     shift_vertices3(vertex_ptrs);
915     shift_triangle_area();
916     render_triangle_p(psx_gpu, vertex_ptrs, current_command);
917   }
918 }
919
920 #if 0
921
922 #define fill_vertex(i, x_, y_, u_, v_, rgb_) \
923   vertexes[i].x = x_; \
924   vertexes[i].y = y_; \
925   vertexes[i].u = u_; \
926   vertexes[i].v = v_; \
927   vertexes[i].r = rgb_; \
928   vertexes[i].g = (rgb_) >> 8; \
929   vertexes[i].b = (rgb_) >> 16
930
931 static void do_sprite_enhanced(psx_gpu_struct *psx_gpu, int x, int y,
932  u32 u, u32 v, u32 w, u32 h, u32 cmd_rgb)
933 {
934   vertex_struct *vertex_ptrs[3];
935   u32 flags = (cmd_rgb >> 24);
936   u32 color = cmd_rgb & 0xffffff;
937   u32 render_state_base_saved = psx_gpu->render_state_base;
938   int x1, y1;
939   u8 u1, v1;
940
941   flags &=
942    (RENDER_FLAGS_MODULATE_TEXELS | RENDER_FLAGS_BLEND |
943    RENDER_FLAGS_TEXTURE_MAP);
944
945   set_triangle_color(psx_gpu, color);
946   if(color == 0x808080)
947     flags |= RENDER_FLAGS_MODULATE_TEXELS;
948
949   psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;
950   enhancement_enable();
951
952   x1 = x + w;
953   y1 = y + h;
954   u1 = u + w;
955   v1 = v + h;
956   // FIXME..
957   if (u1 < u) u1 = 0xff;
958   if (v1 < v) v1 = 0xff;
959
960   // 0-2
961   // |/
962   // 1
963   fill_vertex(0, x,  y,  u,  v,  color);
964   fill_vertex(1, x,  y1, u,  v1, color);
965   fill_vertex(2, x1, y,  u1, v,  color);
966   if (prepare_triangle(psx_gpu, vertexes, vertex_ptrs)) {
967     shift_vertices3(vertex_ptrs);
968     shift_triangle_area();
969     render_triangle_p(psx_gpu, vertex_ptrs, flags);
970   }
971
972   //   0
973   //  /|
974   // 1-2
975   fill_vertex(0, x1, y,  u1, v,  color);
976   fill_vertex(1, x,  y1, u,  v1, color);
977   fill_vertex(2, x1, y1, u1, v1, color);
978   if (prepare_triangle(psx_gpu, vertexes, vertex_ptrs)) {
979     shift_vertices3(vertex_ptrs);
980     shift_triangle_area();
981     render_triangle_p(psx_gpu, vertex_ptrs, flags);
982   }
983
984   psx_gpu->render_state_base = render_state_base_saved;
985 }
986 #else
987 static void do_sprite_enhanced(psx_gpu_struct *psx_gpu, int x, int y,
988  u32 u, u32 v, u32 w, u32 h, u32 cmd_rgb)
989 {
990   u32 flags = (cmd_rgb >> 24);
991   u32 color = cmd_rgb & 0xffffff;
992
993   render_sprite_4x(psx_gpu, x, y, u, v, w, h, flags, color);
994 }
995 #endif
996
997 u32 gpu_parse_enhanced(psx_gpu_struct *psx_gpu, u32 *list, u32 size,
998  u32 *last_command)
999 {
1000   u32 current_command = 0, command_length;
1001
1002   u32 *list_start = list;
1003   u32 *list_end = list + (size / 4);
1004
1005   psx_gpu->saved_viewport_start_x = psx_gpu->viewport_start_x;
1006   psx_gpu->saved_viewport_start_y = psx_gpu->viewport_start_y;
1007   psx_gpu->saved_viewport_end_x = psx_gpu->viewport_end_x;
1008   psx_gpu->saved_viewport_end_y = psx_gpu->viewport_end_y;
1009   select_enhancement_buf(psx_gpu);
1010
1011   for(; list < list_end; list += 1 + command_length)
1012   {
1013     s16 *list_s16 = (void *)list;
1014     current_command = *list >> 24;
1015     command_length = command_lengths[current_command];
1016     if (list + 1 + command_length > list_end) {
1017       current_command = (u32)-1;
1018       break;
1019     }
1020
1021     enhancement_disable();
1022
1023     switch(current_command)
1024     {
1025       case 0x00:
1026         break;
1027   
1028       case 0x02:
1029       {
1030         u32 x = list_s16[2] & 0x3FF;
1031         u32 y = list_s16[3] & 0x1FF;
1032         u32 width = list_s16[4] & 0x3FF;
1033         u32 height = list_s16[5] & 0x1FF;
1034         u32 color = list[0] & 0xFFFFFF;
1035
1036         x &= ~0xF;
1037         width = ((width + 0xF) & ~0xF);
1038
1039         do_fill(psx_gpu, x, y, width, height, color);
1040
1041         psx_gpu->vram_out_ptr = select_enhancement_buf_ptr(psx_gpu, x);
1042         x *= 2;
1043         y *= 2;
1044         width *= 2;
1045         height *= 2;
1046         render_block_fill_enh(psx_gpu, color, x, y, width, height);
1047         break;
1048       }
1049   
1050       case 0x20 ... 0x23:
1051       {
1052         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
1053   
1054         get_vertex_data_xy(0, 2);
1055         get_vertex_data_xy(1, 4);
1056         get_vertex_data_xy(2, 6);
1057
1058         do_triangle_enhanced(psx_gpu, vertexes, current_command);
1059         break;
1060       }
1061   
1062       case 0x24 ... 0x27:
1063       {
1064         set_clut(psx_gpu, list_s16[5]);
1065         set_texture(psx_gpu, list_s16[9]);
1066         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
1067   
1068         get_vertex_data_xy_uv(0, 2);
1069         get_vertex_data_xy_uv(1, 6);
1070         get_vertex_data_xy_uv(2, 10);
1071   
1072         do_triangle_enhanced(psx_gpu, vertexes, current_command);
1073         break;
1074       }
1075   
1076       case 0x28 ... 0x2B:
1077       {
1078         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
1079   
1080         get_vertex_data_xy(0, 2);
1081         get_vertex_data_xy(1, 4);
1082         get_vertex_data_xy(2, 6);
1083         get_vertex_data_xy(3, 8);
1084
1085         do_quad_enhanced(psx_gpu, vertexes, current_command);
1086         break;
1087       }
1088   
1089       case 0x2C ... 0x2F:
1090       {
1091         set_clut(psx_gpu, list_s16[5]);
1092         set_texture(psx_gpu, list_s16[9]);
1093         set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
1094   
1095         get_vertex_data_xy_uv(0, 2);   
1096         get_vertex_data_xy_uv(1, 6);   
1097         get_vertex_data_xy_uv(2, 10);  
1098         get_vertex_data_xy_uv(3, 14);
1099   
1100         do_quad_enhanced(psx_gpu, vertexes, current_command);
1101         break;
1102       }
1103   
1104       case 0x30 ... 0x33:
1105       {
1106         get_vertex_data_xy_rgb(0, 0);
1107         get_vertex_data_xy_rgb(1, 4);
1108         get_vertex_data_xy_rgb(2, 8);
1109   
1110         do_triangle_enhanced(psx_gpu, vertexes, current_command);
1111         break;
1112       }
1113   
1114       case 0x34:
1115       case 0x35:
1116       case 0x36:
1117       case 0x37:
1118       {
1119         set_clut(psx_gpu, list_s16[5]);
1120         set_texture(psx_gpu, list_s16[11]);
1121   
1122         get_vertex_data_xy_uv_rgb(0, 0);
1123         get_vertex_data_xy_uv_rgb(1, 6);
1124         get_vertex_data_xy_uv_rgb(2, 12);
1125
1126         do_triangle_enhanced(psx_gpu, vertexes, current_command);
1127         break;
1128       }
1129   
1130       case 0x38:
1131       case 0x39:
1132       case 0x3A:
1133       case 0x3B:
1134       {
1135         get_vertex_data_xy_rgb(0, 0);
1136         get_vertex_data_xy_rgb(1, 4);
1137         get_vertex_data_xy_rgb(2, 8);
1138         get_vertex_data_xy_rgb(3, 12);
1139   
1140         do_quad_enhanced(psx_gpu, vertexes, current_command);
1141         break;
1142       }
1143   
1144       case 0x3C:
1145       case 0x3D:
1146       case 0x3E:
1147       case 0x3F:
1148       {
1149         set_clut(psx_gpu, list_s16[5]);
1150         set_texture(psx_gpu, list_s16[11]);
1151   
1152         get_vertex_data_xy_uv_rgb(0, 0);
1153         get_vertex_data_xy_uv_rgb(1, 6);
1154         get_vertex_data_xy_uv_rgb(2, 12);
1155         get_vertex_data_xy_uv_rgb(3, 18);
1156
1157         do_quad_enhanced(psx_gpu, vertexes, current_command);
1158         break;
1159       }
1160   
1161       case 0x40 ... 0x47:
1162       {
1163         vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
1164         vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
1165         vertexes[1].x = list_s16[4] + psx_gpu->offset_x;
1166         vertexes[1].y = list_s16[5] + psx_gpu->offset_y;
1167
1168         render_line(psx_gpu, vertexes, current_command, list[0], 0);
1169         enhancement_enable();
1170         render_line(psx_gpu, vertexes, current_command, list[0], 1);
1171         break;
1172       }
1173   
1174       case 0x48 ... 0x4F:
1175       {
1176         u32 num_vertexes = 1;
1177         u32 *list_position = &(list[2]);
1178         u32 xy = list[1];
1179
1180         vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
1181         vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
1182       
1183         xy = *list_position;
1184         while(1)
1185         {
1186           vertexes[0] = vertexes[1];
1187
1188           vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
1189           vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
1190
1191           enhancement_disable();
1192           render_line(psx_gpu, vertexes, current_command, list[0], 0);
1193           enhancement_enable();
1194           render_line(psx_gpu, vertexes, current_command, list[0], 1);
1195
1196           list_position++;
1197           num_vertexes++;
1198
1199           if(list_position >= list_end)
1200           {
1201             current_command = (u32)-1;
1202             goto breakloop;
1203           }
1204
1205           xy = *list_position;
1206           if((xy & 0xF000F000) == 0x50005000)
1207             break;
1208         }
1209
1210         command_length += (num_vertexes - 2);
1211         break;
1212       }
1213   
1214       case 0x50 ... 0x57:
1215       {
1216         vertexes[0].r = list[0] & 0xFF;
1217         vertexes[0].g = (list[0] >> 8) & 0xFF;
1218         vertexes[0].b = (list[0] >> 16) & 0xFF;
1219         vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
1220         vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
1221
1222         vertexes[1].r = list[2] & 0xFF;
1223         vertexes[1].g = (list[2] >> 8) & 0xFF;
1224         vertexes[1].b = (list[2] >> 16) & 0xFF;
1225         vertexes[1].x = list_s16[6] + psx_gpu->offset_x;
1226         vertexes[1].y = list_s16[7] + psx_gpu->offset_y;
1227
1228         render_line(psx_gpu, vertexes, current_command, 0, 0);
1229         enhancement_enable();
1230         render_line(psx_gpu, vertexes, current_command, 0, 1);
1231         break;
1232       }
1233  
1234       case 0x58 ... 0x5F:
1235       {
1236         u32 num_vertexes = 1;
1237         u32 *list_position = &(list[2]);
1238         u32 color = list[0];
1239         u32 xy = list[1];
1240
1241         vertexes[1].r = color & 0xFF;
1242         vertexes[1].g = (color >> 8) & 0xFF;
1243         vertexes[1].b = (color >> 16) & 0xFF;
1244         vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
1245         vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
1246       
1247         color = list_position[0];
1248         while(1)
1249         {
1250           xy = list_position[1];
1251
1252           vertexes[0] = vertexes[1];
1253
1254           vertexes[1].r = color & 0xFF;
1255           vertexes[1].g = (color >> 8) & 0xFF;
1256           vertexes[1].b = (color >> 16) & 0xFF;
1257           vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
1258           vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
1259
1260           enhancement_disable();
1261           render_line(psx_gpu, vertexes, current_command, 0, 0);
1262           enhancement_enable();
1263           render_line(psx_gpu, vertexes, current_command, 0, 1);
1264
1265           list_position += 2;
1266           num_vertexes++;
1267
1268           if(list_position >= list_end)
1269           {
1270             current_command = (u32)-1;
1271             goto breakloop;
1272           }
1273
1274           color = list_position[0];
1275           if((color & 0xF000F000) == 0x50005000)
1276             break;
1277         }
1278
1279         command_length += ((num_vertexes - 2) * 2);
1280         break;
1281       }
1282   
1283       case 0x60 ... 0x63:
1284       {        
1285         u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1286         u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1287         u32 width = list_s16[4] & 0x3FF;
1288         u32 height = list_s16[5] & 0x1FF;
1289
1290         render_sprite(psx_gpu, x, y, 0, 0, width, height, current_command, list[0]);
1291         do_sprite_enhanced(psx_gpu, x, y, 0, 0, width, height, list[0]);
1292         break;
1293       }
1294   
1295       case 0x64 ... 0x67:
1296       {        
1297         u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1298         u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1299         u8 u = list_s16[4];
1300         u8 v = list_s16[4] >> 8;
1301         u32 width = list_s16[6] & 0x3FF;
1302         u32 height = list_s16[7] & 0x1FF;
1303
1304         set_clut(psx_gpu, list_s16[5]);
1305
1306         render_sprite(psx_gpu, x, y, u, v, width, height,
1307          current_command, list[0]);
1308         do_sprite_enhanced(psx_gpu, x, y, u, v, width, height, list[0]);
1309         break;
1310       }
1311   
1312       case 0x68:
1313       case 0x69:
1314       case 0x6A:
1315       case 0x6B:
1316       {
1317         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1318         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1319
1320         render_sprite(psx_gpu, x, y, 0, 0, 1, 1, current_command, list[0]);
1321         do_sprite_enhanced(psx_gpu, x, y, 0, 0, 1, 1, list[0]);
1322         break;
1323       }
1324   
1325       case 0x70:
1326       case 0x71:
1327       case 0x72:
1328       case 0x73:
1329       {        
1330         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1331         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1332
1333         render_sprite(psx_gpu, x, y, 0, 0, 8, 8, current_command, list[0]);
1334         do_sprite_enhanced(psx_gpu, x, y, 0, 0, 8, 8, list[0]);
1335         break;
1336       }
1337   
1338       case 0x74:
1339       case 0x75:
1340       case 0x76:
1341       case 0x77:
1342       {        
1343         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1344         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1345         u8 u = list_s16[4];
1346         u8 v = list_s16[4] >> 8;
1347
1348         set_clut(psx_gpu, list_s16[5]);
1349
1350         render_sprite(psx_gpu, x, y, u, v, 8, 8,
1351          current_command, list[0]);
1352         do_sprite_enhanced(psx_gpu, x, y, u, v, 8, 8, list[0]);
1353         break;
1354       }
1355   
1356       case 0x78:
1357       case 0x79:
1358       case 0x7A:
1359       case 0x7B:
1360       {        
1361         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1362         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1363
1364         render_sprite(psx_gpu, x, y, 0, 0, 16, 16, current_command, list[0]);
1365         do_sprite_enhanced(psx_gpu, x, y, 0, 0, 16, 16, list[0]);
1366         break;
1367       }
1368   
1369       case 0x7C:
1370       case 0x7D:
1371       case 0x7E:
1372       case 0x7F:
1373       {        
1374         s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
1375         s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
1376         u8 u = list_s16[4];
1377         u8 v = list_s16[4] >> 8;
1378
1379         set_clut(psx_gpu, list_s16[5]);
1380
1381         render_sprite(psx_gpu, x, y, u, v, 16, 16, current_command, list[0]);
1382         do_sprite_enhanced(psx_gpu, x, y, u, v, 16, 16, list[0]);
1383         break;
1384       }
1385   
1386       case 0x80:          //  vid -> vid
1387       {
1388         u32 sx = list_s16[2] & 0x3FF;
1389         u32 sy = list_s16[3] & 0x1FF;
1390         u32 dx = list_s16[4] & 0x3FF;
1391         u32 dy = list_s16[5] & 0x1FF;
1392         u32 w = ((list_s16[6] - 1) & 0x3FF) + 1;
1393         u32 h = ((list_s16[7] - 1) & 0x1FF) + 1;
1394         u16 *buf;
1395
1396         if (sx == dx && sy == dy && psx_gpu->mask_msb == 0)
1397           break;
1398
1399         render_block_move(psx_gpu, sx, sy, dx, dy, w, h);
1400         if (dy + h > 512)
1401           h = 512 - dy;
1402         sx = sx & ~7; // FIXME?
1403         dx = dx * 2 & ~7;
1404         dy *= 2;
1405         w = (w + 7) / 8;
1406         buf = select_enhancement_buf_ptr(psx_gpu, dx / 2);
1407         scale2x_tiles8(buf + dy * 1024 + dx,
1408           psx_gpu->vram_ptr + sy * 1024 + sx, w, h);
1409         break;
1410       }
1411  
1412       case 0xA0:          //  sys -> vid
1413       case 0xC0:          //  vid -> sys
1414         goto breakloop;
1415
1416       case 0xE1:
1417         set_texture(psx_gpu, list[0]);
1418
1419         if(list[0] & (1 << 9))
1420           psx_gpu->render_state_base |= RENDER_STATE_DITHER;
1421         else
1422           psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;
1423
1424         psx_gpu->display_area_draw_enable = (list[0] >> 10) & 0x1;
1425         SET_Ex(1, list[0]);
1426         break;
1427   
1428       case 0xE2:
1429       {
1430         // TODO: Clean
1431         u32 texture_window_settings = list[0];
1432         u32 tmp, x, y, w, h;
1433
1434         if(texture_window_settings != psx_gpu->texture_window_settings)
1435         {
1436           tmp = (texture_window_settings & 0x1F) | 0x20;
1437           for(w = 8; (tmp & 1) == 0; tmp >>= 1, w <<= 1);
1438
1439           tmp = ((texture_window_settings >> 5) & 0x1f) | 0x20;
1440           for (h = 8; (tmp & 1) == 0; tmp >>= 1, h <<= 1);
1441
1442           tmp = 32 - (w >> 3);
1443           x = ((texture_window_settings >> 10) & tmp) << 3;
1444
1445           tmp = 32 - (h >> 3);
1446           y = ((texture_window_settings >> 15) & tmp) << 3;
1447
1448           flush_render_block_buffer(psx_gpu);
1449           
1450           psx_gpu->texture_window_settings = texture_window_settings;
1451           psx_gpu->texture_window_x = x;
1452           psx_gpu->texture_window_y = y;
1453           psx_gpu->texture_mask_width = w - 1;
1454           psx_gpu->texture_mask_height = h - 1;
1455
1456           update_texture_ptr(psx_gpu);
1457         }
1458         SET_Ex(2, list[0]);
1459         break;
1460       }
1461   
1462       case 0xE3:
1463       {
1464         s16 viewport_start_x = list[0] & 0x3FF;
1465         s16 viewport_start_y = (list[0] >> 10) & 0x1FF;
1466         u32 w;
1467         s32 d;
1468
1469         if(viewport_start_x == psx_gpu->viewport_start_x &&
1470          viewport_start_y == psx_gpu->viewport_start_y)
1471         {
1472           break;
1473         }
1474         psx_gpu->viewport_start_x = viewport_start_x;
1475         psx_gpu->viewport_start_y = viewport_start_y;
1476         psx_gpu->saved_viewport_start_x = viewport_start_x;
1477         psx_gpu->saved_viewport_start_y = viewport_start_y;
1478
1479         w = (u32)psx_gpu->viewport_end_x - (u32)viewport_start_x + 1;
1480         d = psx_gpu->enhancement_x_threshold - w;
1481         if(-16 <= d && d <= 16)
1482         {
1483           update_enhancement_buf_table_from_x(psx_gpu,
1484            viewport_start_x, w);
1485         }
1486         select_enhancement_buf(psx_gpu);
1487
1488 #ifdef TEXTURE_CACHE_4BPP
1489         psx_gpu->viewport_mask =
1490          texture_region_mask(psx_gpu->viewport_start_x,
1491          psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
1492          psx_gpu->viewport_end_y);
1493 #endif
1494         SET_Ex(3, list[0]);
1495         break;
1496       }
1497
1498       case 0xE4:
1499       {
1500         s16 viewport_end_x = list[0] & 0x3FF;
1501         s16 viewport_end_y = (list[0] >> 10) & 0x1FF;
1502         u32 w;
1503         s32 d;
1504
1505         if(viewport_end_x == psx_gpu->viewport_end_x &&
1506          viewport_end_y == psx_gpu->viewport_end_y)
1507         {
1508           break;
1509         }
1510
1511         psx_gpu->viewport_end_x = viewport_end_x;
1512         psx_gpu->viewport_end_y = viewport_end_y;
1513         psx_gpu->saved_viewport_end_x = viewport_end_x;
1514         psx_gpu->saved_viewport_end_y = viewport_end_y;
1515
1516         w = (u32)viewport_end_x - (u32)psx_gpu->viewport_start_x + 1;
1517         d = psx_gpu->enhancement_x_threshold - w;
1518         if(-16 <= d && d <= 16)
1519         {
1520           update_enhancement_buf_table_from_x(psx_gpu,
1521            psx_gpu->viewport_start_x, w);
1522         }
1523         select_enhancement_buf(psx_gpu);
1524
1525 #ifdef TEXTURE_CACHE_4BPP
1526         psx_gpu->viewport_mask =
1527          texture_region_mask(psx_gpu->viewport_start_x,
1528          psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
1529          psx_gpu->viewport_end_y);
1530 #endif
1531         SET_Ex(4, list[0]);
1532         break;
1533       }
1534   
1535       case 0xE5:
1536       {
1537         s32 offset_x = list[0] << 21;
1538         s32 offset_y = list[0] << 10;
1539         psx_gpu->offset_x = offset_x >> 21;
1540         psx_gpu->offset_y = offset_y >> 21; 
1541   
1542         SET_Ex(5, list[0]);
1543         break;
1544       }
1545
1546       case 0xE6:
1547       {
1548         u32 mask_settings = list[0];
1549         u16 mask_msb = mask_settings << 15;
1550
1551         if(list[0] & 0x2)
1552           psx_gpu->render_state_base |= RENDER_STATE_MASK_EVALUATE;
1553         else
1554           psx_gpu->render_state_base &= ~RENDER_STATE_MASK_EVALUATE;
1555
1556         if(mask_msb != psx_gpu->mask_msb)
1557         {
1558           flush_render_block_buffer(psx_gpu);
1559           psx_gpu->mask_msb = mask_msb;
1560         }
1561
1562         SET_Ex(6, list[0]);
1563         break;
1564       }
1565   
1566       default:
1567         break;
1568     }
1569   }
1570
1571   enhancement_disable();
1572
1573 breakloop:
1574   if (last_command != NULL)
1575     *last_command = current_command;
1576   return list - list_start;
1577 }
1578
1579 #endif /* PCSX */
1580
1581 // vim:shiftwidth=2:expandtab