[pcsx_rearmed.git] / plugins / gpu_neon / psx_gpu / psx_gpu_parse.c

/*
 * Copyright (C) 2011 Gilead Kutnick "Exophase" <exophase@gmail.com>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 */

#include <stdio.h>

#include "common.h"

const u8 command_lengths[256] =
{
	0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 00
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 10
	3,  3,  3,  3,  6,  6,  6,  6,  4,  4,  4,  4,  8,  8,  8,  8,   // 20
	5,  5,  5,  5,  8,  8,  8,  8,  7,  7,  7,  7,  11, 11, 11, 11,  // 30
	2,  2,  2,  2,  2,  2,  2,  2,  3,  3,  3,  3,  3,  3,  3,  3,   // 40
	3,  3,  3,  3,  3,  3,  3,  3,  4,  4,  4,  4,  4,  4,  4,  4,   // 50
	2,  2,  2,  2,  3,  3,  3,  3,  1,  1,  1,  1,  1,  1,  1,  1,   // 60
	1,  1,  1,  1,  2,  2,  2,  2,  1,  1,  1,  1,  2,  2,  2,  2,   // 70
	3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 80
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // 90
	2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // a0
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // b0
	2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // c0
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // d0
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   // e0
	0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0    // f0
};

void update_texture_ptr(psx_gpu_struct *psx_gpu)
{
  u8 *texture_base;
  u8 *texture_ptr;

  switch((psx_gpu->render_state_base >> 8) & 0x3)
  {
    default:
    case TEXTURE_MODE_4BPP:
      texture_base = psx_gpu->texture_4bpp_cache[psx_gpu->current_texture_page];

      texture_ptr = texture_base;
      texture_ptr += psx_gpu->texture_window_x & 0xF;
      texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
      texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
      texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
      break;

    case TEXTURE_MODE_8BPP:
      if(psx_gpu->current_texture_page & 0x1)
      {
        texture_base =
         psx_gpu->texture_8bpp_odd_cache[psx_gpu->current_texture_page >> 1];
      }
      else
      {
        texture_base =
         psx_gpu->texture_8bpp_even_cache[psx_gpu->current_texture_page >> 1];
      }
      
      texture_ptr = texture_base;
      texture_ptr += psx_gpu->texture_window_x & 0xF;
      texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
      texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
      texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
      break;

    case TEXTURE_MODE_16BPP:
      texture_base = (u8 *)(psx_gpu->vram_ptr);
      texture_base += (psx_gpu->current_texture_page & 0xF) * 128;
      texture_base += ((psx_gpu->current_texture_page >> 4) * 256) * 2048;

      texture_ptr = texture_base;
      texture_ptr += psx_gpu->texture_window_x * 2;
      texture_ptr += (psx_gpu->texture_window_y) * 2048;
      break;
  }

  psx_gpu->texture_page_base = texture_base;
  psx_gpu->texture_page_ptr = texture_ptr;  
}

void set_texture(psx_gpu_struct *psx_gpu, u32 texture_settings)
{
  if(psx_gpu->texture_settings != texture_settings)
  {
    u32 new_texture_page = texture_settings & 0x1F;
    u32 texture_mode = (texture_settings >> 7) & 0x3;
    u32 render_state_base = psx_gpu->render_state_base;

    flush_render_block_buffer(psx_gpu);

    render_state_base &= ~(0xF << 6);
    render_state_base |= ((texture_settings >> 5) & 0xF) << 6;

    psx_gpu->render_state_base = render_state_base;

    psx_gpu->current_texture_mask = 0x1 << new_texture_page;

    if(texture_mode == TEXTURE_MODE_8BPP)
    {     
      // In 8bpp mode 256x256 takes up two pages. If it's on the right edge it
      // wraps back around to the left edge.
      u32 adjacent_texture_page = ((texture_settings + 1) & 0xF) | (texture_settings & 0x10);
      psx_gpu->current_texture_mask |= 0x1 << adjacent_texture_page;

      if((psx_gpu->last_8bpp_texture_page ^ new_texture_page) & 0x1)
      {
        u32 dirty_textures_8bpp_alternate_mask =
         psx_gpu->dirty_textures_8bpp_alternate_mask;
        psx_gpu->dirty_textures_8bpp_alternate_mask =
         psx_gpu->dirty_textures_8bpp_mask;
        psx_gpu->dirty_textures_8bpp_mask = dirty_textures_8bpp_alternate_mask;
      }

      psx_gpu->last_8bpp_texture_page = new_texture_page;
    }

    psx_gpu->current_texture_page = new_texture_page;
    psx_gpu->texture_settings = texture_settings;

    update_texture_ptr(psx_gpu);
  }
}

void set_clut(psx_gpu_struct *psx_gpu, u32 clut_settings)
{
  if(psx_gpu->clut_settings != clut_settings)
  {
    flush_render_block_buffer(psx_gpu);
    psx_gpu->clut_settings = clut_settings;
    psx_gpu->clut_ptr = psx_gpu->vram_ptr + ((clut_settings & 0x7FFF) * 16);
  }
}

void set_triangle_color(psx_gpu_struct *psx_gpu, u32 triangle_color)
{
  if(psx_gpu->triangle_color != triangle_color)
  {
    flush_render_block_buffer(psx_gpu);
    psx_gpu->triangle_color = triangle_color;
  }
}

#define sign_extend_12bit(value)                                               \
  (((s32)((value) << 20)) >> 20)                                               \

#define sign_extend_11bit(value)                                               \
  (((s32)((value) << 21)) >> 21)                                               \

#define sign_extend_10bit(value)                                               \
  (((s32)((value) << 22)) >> 22)                                               \


#define get_vertex_data_xy(vertex_number, offset16)                            \
  vertexes[vertex_number].x =                                                  \
   sign_extend_12bit(list_s16[offset16]) + psx_gpu->offset_x;                  \
  vertexes[vertex_number].y =                                                  \
   sign_extend_12bit(list_s16[(offset16) + 1]) + psx_gpu->offset_y;            \

#define get_vertex_data_uv(vertex_number, offset16)                            \
  vertexes[vertex_number].u = list_s16[offset16] & 0xFF;                       \
  vertexes[vertex_number].v = (list_s16[offset16] >> 8) & 0xFF                 \

#define get_vertex_data_rgb(vertex_number, offset32)                           \
  vertexes[vertex_number].r = list[offset32] & 0xFF;                           \
  vertexes[vertex_number].g = (list[offset32] >> 8) & 0xFF;                    \
  vertexes[vertex_number].b = (list[offset32] >> 16) & 0xFF                    \

#define get_vertex_data_xy_uv(vertex_number, offset16)                         \
  get_vertex_data_xy(vertex_number, offset16);                                 \
  get_vertex_data_uv(vertex_number, (offset16) + 2)                            \

#define get_vertex_data_xy_rgb(vertex_number, offset16)                        \
  get_vertex_data_rgb(vertex_number, (offset16) / 2);                          \
  get_vertex_data_xy(vertex_number, (offset16) + 2);                           \

#define get_vertex_data_xy_uv_rgb(vertex_number, offset16)                     \
  get_vertex_data_rgb(vertex_number, (offset16) / 2);                          \
  get_vertex_data_xy(vertex_number, (offset16) + 2);                           \
  get_vertex_data_uv(vertex_number, (offset16) + 4);                           \

#define set_vertex_color_constant(vertex_number, color)                        \
  vertexes[vertex_number].r = color & 0xFF;                                    \
  vertexes[vertex_number].g = (color >> 8) & 0xFF;                             \
  vertexes[vertex_number].b = (color >> 16) & 0xFF                             \

#define get_vertex_data_xy_rgb_constant(vertex_number, offset16, color)        \
  get_vertex_data_xy(vertex_number, offset16);                                 \
  set_vertex_color_constant(vertex_number, color)                              \

vertex_struct vertexes[4] __attribute__((aligned(32)));

void gpu_parse(psx_gpu_struct *psx_gpu, u32 *list, u32 size)
{
  u32 current_command, command_length;
  
  u32 *list_end = list + (size / 4);

  for(; list < list_end; list += 1 + command_length)
  {
  	s16 *list_s16 = (void *)list;
  	current_command = *list >> 24;
  	command_length = command_lengths[current_command];
  
  	switch(current_command)
  	{
  		case 0x00:
  			break;
  
  		case 0x02:
        render_block_fill(psx_gpu, list[0] & 0xFFFFFF, list_s16[2] & 0x3FF,
         list_s16[3] & 0x1FF, list_s16[4] & 0x3FF, list_s16[5] & 0x1FF);
  			break;
  
  		case 0x20 ... 0x23:
      {
        set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
  
        get_vertex_data_xy(0, 2);
        get_vertex_data_xy(1, 4);
        get_vertex_data_xy(2, 6);
          
        render_triangle(psx_gpu, vertexes, current_command);
  			break;
      }
  
  		case 0x24 ... 0x27:
      {
        set_clut(psx_gpu, list_s16[5]);
        set_texture(psx_gpu, list_s16[9]);
        set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
  
        get_vertex_data_xy_uv(0, 2);
        get_vertex_data_xy_uv(1, 6);
        get_vertex_data_xy_uv(2, 10);
  
        render_triangle(psx_gpu, vertexes, current_command);
  			break;
      }
  
  		case 0x28 ... 0x2B:
      {
        set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
  
        get_vertex_data_xy(0, 2);
        get_vertex_data_xy(1, 4);
        get_vertex_data_xy(2, 6);
        get_vertex_data_xy(3, 8);
  
        render_triangle(psx_gpu, vertexes, current_command);
        render_triangle(psx_gpu, &(vertexes[1]), current_command);
  			break;
      }
  
  		case 0x2C ... 0x2F:
      {
        set_clut(psx_gpu, list_s16[5]);
        set_texture(psx_gpu, list_s16[9]);
        set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
  
        get_vertex_data_xy_uv(0, 2);   
        get_vertex_data_xy_uv(1, 6);   
        get_vertex_data_xy_uv(2, 10);  
        get_vertex_data_xy_uv(3, 14);
  
        render_triangle(psx_gpu, vertexes, current_command);
        render_triangle(psx_gpu, &(vertexes[1]), current_command);
  			break;
      }
  
  		case 0x30 ... 0x33:
      {
        get_vertex_data_xy_rgb(0, 0);
        get_vertex_data_xy_rgb(1, 4);
        get_vertex_data_xy_rgb(2, 8);
  
        render_triangle(psx_gpu, vertexes, current_command);
  			break;
      }
  
  		case 0x34:
  		case 0x35:
  		case 0x36:
  		case 0x37:
      {
        set_clut(psx_gpu, list_s16[5]);
        set_texture(psx_gpu, list_s16[11]);
  
        get_vertex_data_xy_uv_rgb(0, 0);
        get_vertex_data_xy_uv_rgb(1, 6);
        get_vertex_data_xy_uv_rgb(2, 12);

        render_triangle(psx_gpu, vertexes, current_command);
  			break;
      }
  
  		case 0x38:
  		case 0x39:
  		case 0x3A:
  		case 0x3B:
      {
        get_vertex_data_xy_rgb(0, 0);
        get_vertex_data_xy_rgb(1, 4);
        get_vertex_data_xy_rgb(2, 8);
        get_vertex_data_xy_rgb(3, 12);
  
        render_triangle(psx_gpu, vertexes, current_command);
        render_triangle(psx_gpu, &(vertexes[1]), current_command);
  			break;
      }
  
  		case 0x3C:
  		case 0x3D:
  		case 0x3E:
  		case 0x3F:
      {
        set_clut(psx_gpu, list_s16[5]);
        set_texture(psx_gpu, list_s16[11]);
  
        get_vertex_data_xy_uv_rgb(0, 0);
        get_vertex_data_xy_uv_rgb(1, 6);
        get_vertex_data_xy_uv_rgb(2, 12);
        get_vertex_data_xy_uv_rgb(3, 18);
  
        render_triangle(psx_gpu, vertexes, current_command);
        render_triangle(psx_gpu, &(vertexes[1]), current_command);
  			break;
      }
  
  		case 0x40 ... 0x47:
      {
        vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
        vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
        vertexes[1].x = list_s16[4] + psx_gpu->offset_x;
        vertexes[1].y = list_s16[5] + psx_gpu->offset_y;

        render_line(psx_gpu, vertexes, current_command, list[0]);
  			break;
      }
  
  		case 0x48 ... 0x4F:
      {
        u32 num_vertexes = 1;
        u32 *list_position = &(list[2]);
        u32 xy = list[1];

        vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
        vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
      
        while(1)
        {
          xy = *list_position;

          if((xy & 0xF000F000) == 0x50005000)
            break;

          vertexes[0] = vertexes[1];

          vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
          vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;

          list_position++;
          num_vertexes++;

          if(list_position > list_end)
            break;

          render_line(psx_gpu, vertexes, current_command, list[0]);
        }

        if(num_vertexes > 2)
          command_length += (num_vertexes - 2);

  			break;
      }
  
  		case 0x50 ... 0x57:
      {
        vertexes[0].r = list[0] & 0xFF;
        vertexes[0].g = (list[0] >> 8) & 0xFF;
        vertexes[0].b = (list[0] >> 16) & 0xFF;
        vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
        vertexes[0].y = list_s16[3] + psx_gpu->offset_y;

        vertexes[1].r = list[2] & 0xFF;
        vertexes[1].g = (list[2] >> 8) & 0xFF;
        vertexes[1].b = (list[2] >> 16) & 0xFF;
        vertexes[1].x = list_s16[6] + psx_gpu->offset_x;
        vertexes[1].y = list_s16[7] + psx_gpu->offset_y;

        render_line(psx_gpu, vertexes, current_command, 0);
  			break;
      }
 
      case 0x58 ... 0x5F:
      {
        u32 num_vertexes = 1;
        u32 *list_position = &(list[2]);
        u32 color = list[0];
        u32 xy = list[1];

        vertexes[1].r = color & 0xFF;
        vertexes[1].g = (color >> 8) & 0xFF;
        vertexes[1].b = (color >> 16) & 0xFF;
        vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
        vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
      
        while(1)
        {
          color = list_position[0];
          if((color & 0xF000F000) == 0x50005000)
            break;

          xy = list_position[1];

          vertexes[0] = vertexes[1];

          vertexes[1].r = color & 0xFF;
          vertexes[1].g = (color >> 8) & 0xFF;
          vertexes[1].b = (color >> 16) & 0xFF;
          vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
          vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;

          list_position += 2;
          num_vertexes++;

          if(list_position > list_end)
            break;

          render_line(psx_gpu, vertexes, current_command, 0);
        }

        if(num_vertexes > 2)
          command_length += ((num_vertexes * 2) - 2);

  			break;
      }
  
  		case 0x60 ... 0x63:
      {        
        u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
        u32 width = list_s16[4] & 0x3FF;
        u32 height = list_s16[5] & 0x1FF;

        render_sprite(psx_gpu, x, y, 0, 0, width, height, current_command, list[0]);
  			break;
      }
  
  		case 0x64 ... 0x67:
      {        
        u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
        u32 uv = list_s16[4];
        u32 width = list_s16[6] & 0x3FF;
        u32 height = list_s16[7] & 0x1FF;

        set_clut(psx_gpu, list_s16[5]);

        render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, width, height,
         current_command, list[0]);
  			break;
      }
  
  		case 0x68:
  		case 0x69:
  		case 0x6A:
  		case 0x6B:
      {
        s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);

        render_sprite(psx_gpu, x, y, 0, 0, 1, 1, current_command, list[0]);
  			break;
      }
  
  		case 0x70:
  		case 0x71:
  		case 0x72:
  		case 0x73:
      {        
        s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);

        render_sprite(psx_gpu, x, y, 0, 0, 8, 8, current_command, list[0]);
  			break;
      }
  
  		case 0x74:
  		case 0x75:
  		case 0x76:
  		case 0x77:
      {        
        s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
        u32 uv = list_s16[4];

        set_clut(psx_gpu, list_s16[5]);

        render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 8, 8,
         current_command, list[0]);
  			break;
      }
  
  		case 0x78:
  		case 0x79:
  		case 0x7A:
  		case 0x7B:
      {        
        s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);

        render_sprite(psx_gpu, x, y, 0, 0, 16, 16, current_command, list[0]);
  			break;
      }
  
  		case 0x7C:
  		case 0x7D:
  		case 0x7E:
  		case 0x7F:
      {        
        s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
        s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
        u32 uv = list_s16[4];

        set_clut(psx_gpu, list_s16[5]);

        render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 16, 16,
         current_command, list[0]);
  			break;
      }
  
  		case 0x80:          //  vid -> vid
        render_block_move(psx_gpu, list_s16[2] & 0x3FF, list_s16[3] & 0x1FF,
         list_s16[4] & 0x3FF, list_s16[5] & 0x1FF, list_s16[6], list_s16[7]);
  			break;
  
  		case 0xA0:          //  sys -> vid
      {
        u32 load_x = list_s16[2] & 0x3FF;
        u32 load_y = list_s16[3] & 0x1FF;
        u32 load_width = list_s16[4] & 0x3FF;
        u32 load_height = list_s16[5] & 0x1FF;
        u32 load_size = load_width * load_height;
  
        command_length += load_size / 2;

        if(load_size & 1)
          command_length++;

        render_block_copy(psx_gpu, (u16 *)&(list_s16[6]), load_x, load_y,
         load_width, load_height, load_width);
  			break;
      }
  
  		case 0xC0:          //  vid -> sys
  			break;
  
  		case 0xE1:
        set_texture(psx_gpu, list[0] & 0x1FF);
        if(list[0] & (1 << 9))
          psx_gpu->render_state_base |= RENDER_STATE_DITHER;
        else
          psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;

        psx_gpu->display_area_draw_enable = (list[0] >> 10) & 0x1;
  			break;
  
  		case 0xE2:
      {
        // TODO: Clean
        u32 texture_window_settings = list[0];
        u32 tmp, x, y, w, h;

        if(texture_window_settings != psx_gpu->texture_window_settings)
        {
          tmp = (texture_window_settings & 0x1F) | 0x20;
          for(w = 8; (tmp & 1) == 0; tmp >>= 1, w <<= 1);

          tmp = ((texture_window_settings >> 5) & 0x1f) | 0x20;
          for (h = 8; (tmp & 1) == 0; tmp >>= 1, h <<= 1);

          tmp = 32 - (w >> 3);
          x = ((texture_window_settings >> 10) & tmp) << 3;

          tmp = 32 - (h >> 3);
          y = ((texture_window_settings >> 15) & tmp) << 3;

          flush_render_block_buffer(psx_gpu);
          
          psx_gpu->texture_window_settings = texture_window_settings;
          psx_gpu->texture_window_x = x;
          psx_gpu->texture_window_y = y;
          psx_gpu->texture_mask_width = w - 1;
          psx_gpu->texture_mask_height = h - 1;

          update_texture_ptr(psx_gpu);
        }
        break;
  		}
  
  		case 0xE3:
        psx_gpu->viewport_start_x = list[0] & 0x3FF;
        psx_gpu->viewport_start_y = (list[0] >> 10) & 0x1FF;

#ifdef TEXTURE_CACHE_4BPP
        psx_gpu->viewport_mask =
         texture_region_mask(psx_gpu->viewport_start_x,
         psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
         psx_gpu->viewport_end_y);
#endif
  			break;
  
  		case 0xE4:
        psx_gpu->viewport_end_x = list[0] & 0x3FF;
        psx_gpu->viewport_end_y = (list[0] >> 10) & 0x1FF;

#ifdef TEXTURE_CACHE_4BPP
        psx_gpu->viewport_mask =
         texture_region_mask(psx_gpu->viewport_start_x,
         psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
         psx_gpu->viewport_end_y);
#endif
  			break;
  
  		case 0xE5:
      {
        s32 offset_x = list[0] << 21;
        s32 offset_y = list[0] << 10;
        psx_gpu->offset_x = offset_x >> 21;
        psx_gpu->offset_y = offset_y >> 21; 
  
  			break;
  		}

  		case 0xE6:
      {
        u32 mask_settings = list[0];
        u16 mask_msb = mask_settings << 15;

        if(list[0] & 0x2)
          psx_gpu->render_state_base |= RENDER_STATE_MASK_EVALUATE;
        else
          psx_gpu->render_state_base &= ~RENDER_STATE_MASK_EVALUATE;

        if(mask_msb != psx_gpu->mask_msb)
        {
          flush_render_block_buffer(psx_gpu);
          psx_gpu->mask_msb = mask_msb;
        }

  			break;
      }
  
  		default:
  			break;
  	}
  }
}
Commit	Line	Data
75e28f62 E	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	const u8 command_lengths[256] =
	20	{
	21	0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // 00
	22	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // 10
	23	3, 3, 3, 3, 6, 6, 6, 6, 4, 4, 4, 4, 8, 8, 8, 8, // 20
	24	5, 5, 5, 5, 8, 8, 8, 8, 7, 7, 7, 7, 11, 11, 11, 11, // 30
	25	2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, // 40
	26	3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, // 50
	27	2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, // 60
	28	1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, // 70
	29	3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // 80
	30	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // 90
	31	2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // a0
	32	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // b0
	33	2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // c0
	34	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // d0
	35	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, // e0
	36	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 // f0
	37	};
	38
	39	void update_texture_ptr(psx_gpu_struct *psx_gpu)
	40	{
3867c6ef	41	u8 *texture_base;
75e28f62 E	42	u8 *texture_ptr;
	43
	44	switch((psx_gpu->render_state_base >> 8) & 0x3)
	45	{
	46	default:
	47	case TEXTURE_MODE_4BPP:
3867c6ef E	48	texture_base = psx_gpu->texture_4bpp_cache[psx_gpu->current_texture_page];
	49
	50	texture_ptr = texture_base;
75e28f62 E	51	texture_ptr += psx_gpu->texture_window_x & 0xF;
	52	texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
	53	texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
	54	texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
75e28f62 E	55	break;
	56
	57	case TEXTURE_MODE_8BPP:
75e28f62 E	58	if(psx_gpu->current_texture_page & 0x1)
75e28f62 E	59	{
3867c6ef	60	texture_base =
75e28f62 E	61	psx_gpu->texture_8bpp_odd_cache[psx_gpu->current_texture_page >> 1];
	62	}
	63	else
	64	{
3867c6ef	65	texture_base =
75e28f62 E	66	psx_gpu->texture_8bpp_even_cache[psx_gpu->current_texture_page >> 1];
	67	}
	68
3867c6ef E	69	texture_ptr = texture_base;
3867c6ef E	70	texture_ptr += psx_gpu->texture_window_x & 0xF;
75e28f62 E	71	texture_ptr += (psx_gpu->texture_window_y & 0xF) << 4;
	72	texture_ptr += (psx_gpu->texture_window_x >> 4) << 8;
	73	texture_ptr += (psx_gpu->texture_window_y >> 4) << 12;
75e28f62 E	74	break;
	75
	76	case TEXTURE_MODE_16BPP:
3867c6ef E	77	texture_base = (u8 *)(psx_gpu->vram_ptr);
	78	texture_base += (psx_gpu->current_texture_page & 0xF) * 128;
	79	texture_base += ((psx_gpu->current_texture_page >> 4) * 256) * 2048;
	80
	81	texture_ptr = texture_base;
75e28f62 E	82	texture_ptr += psx_gpu->texture_window_x * 2;
	83	texture_ptr += (psx_gpu->texture_window_y) * 2048;
	84	break;
	85	}
	86
3867c6ef	87	psx_gpu->texture_page_base = texture_base;
75e28f62 E	88	psx_gpu->texture_page_ptr = texture_ptr;
	89	}
	90
	91	void set_texture(psx_gpu_struct *psx_gpu, u32 texture_settings)
	92	{
	93	if(psx_gpu->texture_settings != texture_settings)
	94	{
	95	u32 new_texture_page = texture_settings & 0x1F;
	96	u32 texture_mode = (texture_settings >> 7) & 0x3;
	97	u32 render_state_base = psx_gpu->render_state_base;
	98
b7ed0632	99	flush_render_block_buffer(psx_gpu);
75e28f62 E	100
	101	render_state_base &= ~(0xF << 6);
	102	render_state_base \|= ((texture_settings >> 5) & 0xF) << 6;
	103
	104	psx_gpu->render_state_base = render_state_base;
	105
	106	psx_gpu->current_texture_mask = 0x1 << new_texture_page;
	107
	108	if(texture_mode == TEXTURE_MODE_8BPP)
	109	{
	110	// In 8bpp mode 256x256 takes up two pages. If it's on the right edge it
	111	// wraps back around to the left edge.
	112	u32 adjacent_texture_page = ((texture_settings + 1) & 0xF) \| (texture_settings & 0x10);
	113	psx_gpu->current_texture_mask \|= 0x1 << adjacent_texture_page;
	114
	115	if((psx_gpu->last_8bpp_texture_page ^ new_texture_page) & 0x1)
	116	{
	117	u32 dirty_textures_8bpp_alternate_mask =
	118	psx_gpu->dirty_textures_8bpp_alternate_mask;
	119	psx_gpu->dirty_textures_8bpp_alternate_mask =
	120	psx_gpu->dirty_textures_8bpp_mask;
	121	psx_gpu->dirty_textures_8bpp_mask = dirty_textures_8bpp_alternate_mask;
	122	}
	123
	124	psx_gpu->last_8bpp_texture_page = new_texture_page;
	125	}
	126
	127	psx_gpu->current_texture_page = new_texture_page;
	128	psx_gpu->texture_settings = texture_settings;
	129
	130	update_texture_ptr(psx_gpu);
	131	}
	132	}
	133
	134	void set_clut(psx_gpu_struct *psx_gpu, u32 clut_settings)
	135	{
	136	if(psx_gpu->clut_settings != clut_settings)
	137	{
	138	flush_render_block_buffer(psx_gpu);
	139	psx_gpu->clut_settings = clut_settings;
	140	psx_gpu->clut_ptr = psx_gpu->vram_ptr + ((clut_settings & 0x7FFF) * 16);
	141	}
	142	}
	143
	144	void set_triangle_color(psx_gpu_struct *psx_gpu, u32 triangle_color)
	145	{
	146	if(psx_gpu->triangle_color != triangle_color)
	147	{
	148	flush_render_block_buffer(psx_gpu);
	149	psx_gpu->triangle_color = triangle_color;
	150	}
	151	}
	152
	153	#define sign_extend_12bit(value) \
	154	(((s32)((value) << 20)) >> 20) \
	155
4be044ba E	156	#define sign_extend_11bit(value) \
	157	(((s32)((value) << 21)) >> 21) \
	158
	159	#define sign_extend_10bit(value) \
	160	(((s32)((value) << 22)) >> 22) \
	161
	162
75e28f62 E	163	#define get_vertex_data_xy(vertex_number, offset16) \
	164	vertexes[vertex_number].x = \
	165	sign_extend_12bit(list_s16[offset16]) + psx_gpu->offset_x; \
	166	vertexes[vertex_number].y = \
	167	sign_extend_12bit(list_s16[(offset16) + 1]) + psx_gpu->offset_y; \
	168
	169	#define get_vertex_data_uv(vertex_number, offset16) \
	170	vertexes[vertex_number].u = list_s16[offset16] & 0xFF; \
	171	vertexes[vertex_number].v = (list_s16[offset16] >> 8) & 0xFF \
	172
	173	#define get_vertex_data_rgb(vertex_number, offset32) \
	174	vertexes[vertex_number].r = list[offset32] & 0xFF; \
	175	vertexes[vertex_number].g = (list[offset32] >> 8) & 0xFF; \
	176	vertexes[vertex_number].b = (list[offset32] >> 16) & 0xFF \
	177
	178	#define get_vertex_data_xy_uv(vertex_number, offset16) \
	179	get_vertex_data_xy(vertex_number, offset16); \
	180	get_vertex_data_uv(vertex_number, (offset16) + 2) \
	181
	182	#define get_vertex_data_xy_rgb(vertex_number, offset16) \
	183	get_vertex_data_rgb(vertex_number, (offset16) / 2); \
	184	get_vertex_data_xy(vertex_number, (offset16) + 2); \
	185
	186	#define get_vertex_data_xy_uv_rgb(vertex_number, offset16) \
	187	get_vertex_data_rgb(vertex_number, (offset16) / 2); \
	188	get_vertex_data_xy(vertex_number, (offset16) + 2); \
	189	get_vertex_data_uv(vertex_number, (offset16) + 4); \
	190
	191	#define set_vertex_color_constant(vertex_number, color) \
	192	vertexes[vertex_number].r = color & 0xFF; \
	193	vertexes[vertex_number].g = (color >> 8) & 0xFF; \
	194	vertexes[vertex_number].b = (color >> 16) & 0xFF \
	195
	196	#define get_vertex_data_xy_rgb_constant(vertex_number, offset16, color) \
	197	get_vertex_data_xy(vertex_number, offset16); \
	198	set_vertex_color_constant(vertex_number, color) \
	199
	200	vertex_struct vertexes[4] __attribute__((aligned(32)));
	201
	202	void gpu_parse(psx_gpu_struct psx_gpu, u32 list, u32 size)
	203	{
	204	u32 current_command, command_length;
	205
	206	u32 *list_end = list + (size / 4);
	207
	208	for(; list < list_end; list += 1 + command_length)
	209	{
	210	s16 list_s16 = (void )list;
	211	current_command = *list >> 24;
	212	command_length = command_lengths[current_command];
	213
	214	switch(current_command)
	215	{
	216	case 0x00:
	217	break;
	218
	219	case 0x02:
1f88961f E	220	render_block_fill(psx_gpu, list[0] & 0xFFFFFF, list_s16[2] & 0x3FF,
1f88961f E	221	list_s16[3] & 0x1FF, list_s16[4] & 0x3FF, list_s16[5] & 0x1FF);
75e28f62 E	222	break;
	223
	224	case 0x20 ... 0x23:
	225	{
	226	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	227
	228	get_vertex_data_xy(0, 2);
	229	get_vertex_data_xy(1, 4);
	230	get_vertex_data_xy(2, 6);
f9248bbf	231
75e28f62 E	232	render_triangle(psx_gpu, vertexes, current_command);
	233	break;
	234	}
	235
	236	case 0x24 ... 0x27:
	237	{
	238	set_clut(psx_gpu, list_s16[5]);
	239	set_texture(psx_gpu, list_s16[9]);
	240	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	241
	242	get_vertex_data_xy_uv(0, 2);
	243	get_vertex_data_xy_uv(1, 6);
	244	get_vertex_data_xy_uv(2, 10);
	245
	246	render_triangle(psx_gpu, vertexes, current_command);
	247	break;
	248	}
	249
	250	case 0x28 ... 0x2B:
	251	{
	252	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	253
	254	get_vertex_data_xy(0, 2);
	255	get_vertex_data_xy(1, 4);
	256	get_vertex_data_xy(2, 6);
	257	get_vertex_data_xy(3, 8);
	258
	259	render_triangle(psx_gpu, vertexes, current_command);
	260	render_triangle(psx_gpu, &(vertexes[1]), current_command);
	261	break;
	262	}
	263
	264	case 0x2C ... 0x2F:
	265	{
	266	set_clut(psx_gpu, list_s16[5]);
	267	set_texture(psx_gpu, list_s16[9]);
	268	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	269
	270	get_vertex_data_xy_uv(0, 2);
	271	get_vertex_data_xy_uv(1, 6);
	272	get_vertex_data_xy_uv(2, 10);
	273	get_vertex_data_xy_uv(3, 14);
	274
	275	render_triangle(psx_gpu, vertexes, current_command);
	276	render_triangle(psx_gpu, &(vertexes[1]), current_command);
	277	break;
	278	}
	279
	280	case 0x30 ... 0x33:
	281	{
	282	get_vertex_data_xy_rgb(0, 0);
	283	get_vertex_data_xy_rgb(1, 4);
	284	get_vertex_data_xy_rgb(2, 8);
	285
	286	render_triangle(psx_gpu, vertexes, current_command);
	287	break;
	288	}
	289
	290	case 0x34:
	291	case 0x35:
	292	case 0x36:
	293	case 0x37:
	294	{
	295	set_clut(psx_gpu, list_s16[5]);
296	set_texture(psx_gpu, list_s16[11]);
297
298	get_vertex_data_xy_uv_rgb(0, 0);
299	get_vertex_data_xy_uv_rgb(1, 6);
300	get_vertex_data_xy_uv_rgb(2, 12);
301
302	render_triangle(psx_gpu, vertexes, current_command);
303	break;
304	}
305
306	case 0x38:
307	case 0x39:
308	case 0x3A:
309	case 0x3B:
310	{
311	get_vertex_data_xy_rgb(0, 0);
312	get_vertex_data_xy_rgb(1, 4);
313	get_vertex_data_xy_rgb(2, 8);
314	get_vertex_data_xy_rgb(3, 12);
315
316	render_triangle(psx_gpu, vertexes, current_command);
317	render_triangle(psx_gpu, &(vertexes[1]), current_command);
318	break;
319	}
320
321	case 0x3C:
322	case 0x3D:
323	case 0x3E:
324	case 0x3F:
325	{
326	set_clut(psx_gpu, list_s16[5]);
327	set_texture(psx_gpu, list_s16[11]);
328
329	get_vertex_data_xy_uv_rgb(0, 0);
330	get_vertex_data_xy_uv_rgb(1, 6);
331	get_vertex_data_xy_uv_rgb(2, 12);
332	get_vertex_data_xy_uv_rgb(3, 18);
333
334	render_triangle(psx_gpu, vertexes, current_command);
335	render_triangle(psx_gpu, &(vertexes[1]), current_command);
336	break;
337	}
338
339	case 0x40 ... 0x47:
340	{
341	vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
342	vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
343	vertexes[1].x = list_s16[4] + psx_gpu->offset_x;
344	vertexes[1].y = list_s16[5] + psx_gpu->offset_y;
345
346	render_line(psx_gpu, vertexes, current_command, list[0]);
347	break;
348	}
349
350	case 0x48 ... 0x4F:
351	{
352	u32 num_vertexes = 1;
353	u32 *list_position = &(list[2]);
354	u32 xy = list[1];
355
356	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
357	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
358
359	while(1)
360	{
361	xy = *list_position;
f9248bbf E	362
f9248bbf E	363	if((xy & 0xF000F000) == 0x50005000)
75e28f62 E	364	break;
	365
	366	vertexes[0] = vertexes[1];
	367
	368	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
	369	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
	370
	371	list_position++;
	372	num_vertexes++;
	373
f9248bbf E	374	if(list_position > list_end)
	375	break;
	376
75e28f62 E	377	render_line(psx_gpu, vertexes, current_command, list[0]);
	378	}
	379
	380	if(num_vertexes > 2)
	381	command_length += (num_vertexes - 2);
	382
	383	break;
	384	}
	385
	386	case 0x50 ... 0x57:
	387	{
	388	vertexes[0].r = list[0] & 0xFF;
	389	vertexes[0].g = (list[0] >> 8) & 0xFF;
	390	vertexes[0].b = (list[0] >> 16) & 0xFF;
	391	vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
	392	vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
	393
	394	vertexes[1].r = list[2] & 0xFF;
	395	vertexes[1].g = (list[2] >> 8) & 0xFF;
	396	vertexes[1].b = (list[2] >> 16) & 0xFF;
	397	vertexes[1].x = list_s16[6] + psx_gpu->offset_x;
	398	vertexes[1].y = list_s16[7] + psx_gpu->offset_y;
	399
	400	render_line(psx_gpu, vertexes, current_command, 0);
	401	break;
	402	}
	403
	404	case 0x58 ... 0x5F:
	405	{
	406	u32 num_vertexes = 1;
	407	u32 *list_position = &(list[2]);
	408	u32 color = list[0];
	409	u32 xy = list[1];
	410
	411	vertexes[1].r = color & 0xFF;
	412	vertexes[1].g = (color >> 8) & 0xFF;
	413	vertexes[1].b = (color >> 16) & 0xFF;
	414	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
	415	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
	416
	417	while(1)
	418	{
	419	color = list_position[0];
f9248bbf	420	if((color & 0xF000F000) == 0x50005000)
75e28f62 E	421	break;
	422
	423	xy = list_position[1];
	424
	425	vertexes[0] = vertexes[1];
	426
	427	vertexes[1].r = color & 0xFF;
	428	vertexes[1].g = (color >> 8) & 0xFF;
	429	vertexes[1].b = (color >> 16) & 0xFF;
	430	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
	431	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
	432
	433	list_position += 2;
	434	num_vertexes++;
	435
f9248bbf E	436	if(list_position > list_end)
	437	break;
	438
75e28f62 E	439	render_line(psx_gpu, vertexes, current_command, 0);
	440	}
	441
	442	if(num_vertexes > 2)
	443	command_length += ((num_vertexes * 2) - 2);
	444
	445	break;
	446	}
	447
	448	case 0x60 ... 0x63:
	449	{
4be044ba E	450	u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	451	u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62 E	452	u32 width = list_s16[4] & 0x3FF;
	453	u32 height = list_s16[5] & 0x1FF;
	454
75e28f62 E	455	render_sprite(psx_gpu, x, y, 0, 0, width, height, current_command, list[0]);
	456	break;
	457	}
	458
	459	case 0x64 ... 0x67:
	460	{
4be044ba E	461	u32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	462	u32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62 E	463	u32 uv = list_s16[4];
	464	u32 width = list_s16[6] & 0x3FF;
	465	u32 height = list_s16[7] & 0x1FF;
	466
75e28f62 E	467	set_clut(psx_gpu, list_s16[5]);
	468
	469	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, width, height,
	470	current_command, list[0]);
	471	break;
	472	}
	473
	474	case 0x68:
	475	case 0x69:
	476	case 0x6A:
	477	case 0x6B:
	478	{
4be044ba E	479	s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	480	s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62	481
75e28f62 E	482	render_sprite(psx_gpu, x, y, 0, 0, 1, 1, current_command, list[0]);
	483	break;
	484	}
	485
	486	case 0x70:
	487	case 0x71:
	488	case 0x72:
	489	case 0x73:
	490	{
4be044ba E	491	s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	492	s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62	493
75e28f62 E	494	render_sprite(psx_gpu, x, y, 0, 0, 8, 8, current_command, list[0]);
	495	break;
	496	}
	497
	498	case 0x74:
	499	case 0x75:
	500	case 0x76:
	501	case 0x77:
	502	{
4be044ba E	503	s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	504	s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62 E	505	u32 uv = list_s16[4];
75e28f62 E	506
75e28f62 E	507	set_clut(psx_gpu, list_s16[5]);
	508
	509	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 8, 8,
	510	current_command, list[0]);
	511	break;
	512	}
	513
	514	case 0x78:
	515	case 0x79:
	516	case 0x7A:
	517	case 0x7B:
	518	{
4be044ba E	519	s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	520	s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62	521
75e28f62 E	522	render_sprite(psx_gpu, x, y, 0, 0, 16, 16, current_command, list[0]);
	523	break;
	524	}
	525
	526	case 0x7C:
	527	case 0x7D:
	528	case 0x7E:
	529	case 0x7F:
	530	{
4be044ba E	531	s32 x = sign_extend_11bit(list_s16[2] + psx_gpu->offset_x);
4be044ba E	532	s32 y = sign_extend_11bit(list_s16[3] + psx_gpu->offset_y);
75e28f62 E	533	u32 uv = list_s16[4];
75e28f62 E	534
75e28f62 E	535	set_clut(psx_gpu, list_s16[5]);
	536
	537	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 16, 16,
	538	current_command, list[0]);
	539	break;
	540	}
	541
	542	case 0x80: // vid -> vid
	543	render_block_move(psx_gpu, list_s16[2] & 0x3FF, list_s16[3] & 0x1FF,
	544	list_s16[4] & 0x3FF, list_s16[5] & 0x1FF, list_s16[6], list_s16[7]);
	545	break;
	546
	547	case 0xA0: // sys -> vid
	548	{
1f88961f E	549	u32 load_x = list_s16[2] & 0x3FF;
	550	u32 load_y = list_s16[3] & 0x1FF;
	551	u32 load_width = list_s16[4] & 0x3FF;
	552	u32 load_height = list_s16[5] & 0x1FF;
75e28f62 E	553	u32 load_size = load_width * load_height;
	554
	555	command_length += load_size / 2;
cec398c0 E	556
	557	if(load_size & 1)
	558	command_length++;
	559
75e28f62 E	560	render_block_copy(psx_gpu, (u16 *)&(list_s16[6]), load_x, load_y,
	561	load_width, load_height, load_width);
	562	break;
	563	}
	564
	565	case 0xC0: // vid -> sys
	566	break;
	567
	568	case 0xE1:
	569	set_texture(psx_gpu, list[0] & 0x1FF);
	570	if(list[0] & (1 << 9))
	571	psx_gpu->render_state_base \|= RENDER_STATE_DITHER;
	572	else
	573	psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;
	574
	575	psx_gpu->display_area_draw_enable = (list[0] >> 10) & 0x1;
	576	break;
	577
	578	case 0xE2:
	579	{
	580	// TODO: Clean
	581	u32 texture_window_settings = list[0];
	582	u32 tmp, x, y, w, h;
	583
	584	if(texture_window_settings != psx_gpu->texture_window_settings)
	585	{
	586	tmp = (texture_window_settings & 0x1F) \| 0x20;
	587	for(w = 8; (tmp & 1) == 0; tmp >>= 1, w <<= 1);
	588
	589	tmp = ((texture_window_settings >> 5) & 0x1f) \| 0x20;
	590	for (h = 8; (tmp & 1) == 0; tmp >>= 1, h <<= 1);
	591
	592	tmp = 32 - (w >> 3);
	593	x = ((texture_window_settings >> 10) & tmp) << 3;
	594
	595	tmp = 32 - (h >> 3);
	596	y = ((texture_window_settings >> 15) & tmp) << 3;
	597
	598	flush_render_block_buffer(psx_gpu);
	599
de35a464	600	psx_gpu->texture_window_settings = texture_window_settings;
75e28f62 E	601	psx_gpu->texture_window_x = x;
	602	psx_gpu->texture_window_y = y;
	603	psx_gpu->texture_mask_width = w - 1;
	604	psx_gpu->texture_mask_height = h - 1;
	605
	606	update_texture_ptr(psx_gpu);
	607	}
	608	break;
	609	}
	610
	611	case 0xE3:
	612	psx_gpu->viewport_start_x = list[0] & 0x3FF;
	613	psx_gpu->viewport_start_y = (list[0] >> 10) & 0x1FF;
	614
	615	#ifdef TEXTURE_CACHE_4BPP
	616	psx_gpu->viewport_mask =
	617	texture_region_mask(psx_gpu->viewport_start_x,
	618	psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
	619	psx_gpu->viewport_end_y);
	620	#endif
	621	break;
	622
	623	case 0xE4:
	624	psx_gpu->viewport_end_x = list[0] & 0x3FF;
	625	psx_gpu->viewport_end_y = (list[0] >> 10) & 0x1FF;
	626
	627	#ifdef TEXTURE_CACHE_4BPP
	628	psx_gpu->viewport_mask =
	629	texture_region_mask(psx_gpu->viewport_start_x,
	630	psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
	631	psx_gpu->viewport_end_y);
	632	#endif
	633	break;
	634
	635	case 0xE5:
	636	{
	637	s32 offset_x = list[0] << 21;
	638	s32 offset_y = list[0] << 10;
	639	psx_gpu->offset_x = offset_x >> 21;
	640	psx_gpu->offset_y = offset_y >> 21;
	641
	642	break;
	643	}
	644
	645	case 0xE6:
	646	{
	647	u32 mask_settings = list[0];
	648	u16 mask_msb = mask_settings << 15;
	649
	650	if(list[0] & 0x2)
	651	psx_gpu->render_state_base \|= RENDER_STATE_MASK_EVALUATE;
	652	else
	653	psx_gpu->render_state_base &= ~RENDER_STATE_MASK_EVALUATE;
	654
	655	if(mask_msb != psx_gpu->mask_msb)
	656	{
	657	flush_render_block_buffer(psx_gpu);
	658	psx_gpu->mask_msb = mask_msb;
	659	}
	660
	661	break;
	662	}
	663
	664	default:
665	break;
666	}
667	}
668	}
669