[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 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 == 0x55555555)
            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++;

          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 == 0x55555555)
            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++;

          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_12bit(list_s16[2]) + psx_gpu->offset_x;
        u32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        u32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        s32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        s32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        s32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        s32 y = sign_extend_12bit(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_12bit(list_s16[2]) + psx_gpu->offset_x;
        s32 y = sign_extend_12bit(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;
  
        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
	156	#define get_vertex_data_xy(vertex_number, offset16) \
	157	vertexes[vertex_number].x = \
	158	sign_extend_12bit(list_s16[offset16]) + psx_gpu->offset_x; \
	159	vertexes[vertex_number].y = \
	160	sign_extend_12bit(list_s16[(offset16) + 1]) + psx_gpu->offset_y; \
	161
	162	#define get_vertex_data_uv(vertex_number, offset16) \
	163	vertexes[vertex_number].u = list_s16[offset16] & 0xFF; \
164	vertexes[vertex_number].v = (list_s16[offset16] >> 8) & 0xFF \
165
166	#define get_vertex_data_rgb(vertex_number, offset32) \
167	vertexes[vertex_number].r = list[offset32] & 0xFF; \
168	vertexes[vertex_number].g = (list[offset32] >> 8) & 0xFF; \
169	vertexes[vertex_number].b = (list[offset32] >> 16) & 0xFF \
170
171	#define get_vertex_data_xy_uv(vertex_number, offset16) \
172	get_vertex_data_xy(vertex_number, offset16); \
173	get_vertex_data_uv(vertex_number, (offset16) + 2) \
174
175	#define get_vertex_data_xy_rgb(vertex_number, offset16) \
176	get_vertex_data_rgb(vertex_number, (offset16) / 2); \
177	get_vertex_data_xy(vertex_number, (offset16) + 2); \
178
179	#define get_vertex_data_xy_uv_rgb(vertex_number, offset16) \
180	get_vertex_data_rgb(vertex_number, (offset16) / 2); \
181	get_vertex_data_xy(vertex_number, (offset16) + 2); \
182	get_vertex_data_uv(vertex_number, (offset16) + 4); \
183
184	#define set_vertex_color_constant(vertex_number, color) \
185	vertexes[vertex_number].r = color & 0xFF; \
186	vertexes[vertex_number].g = (color >> 8) & 0xFF; \
187	vertexes[vertex_number].b = (color >> 16) & 0xFF \
188
189	#define get_vertex_data_xy_rgb_constant(vertex_number, offset16, color) \
190	get_vertex_data_xy(vertex_number, offset16); \
191	set_vertex_color_constant(vertex_number, color) \
192
193	vertex_struct vertexes[4] __attribute__((aligned(32)));
194
195	void gpu_parse(psx_gpu_struct psx_gpu, u32 list, u32 size)
196	{
197	u32 current_command, command_length;
198
199	u32 *list_end = list + (size / 4);
200
201	for(; list < list_end; list += 1 + command_length)
202	{
203	s16 list_s16 = (void )list;
204	current_command = *list >> 24;
205	command_length = command_lengths[current_command];
206
207	switch(current_command)
208	{
209	case 0x00:
210	break;
211
212	case 0x02:
1f88961f E	213	render_block_fill(psx_gpu, list[0] & 0xFFFFFF, list_s16[2] & 0x3FF,
1f88961f E	214	list_s16[3] & 0x1FF, list_s16[4] & 0x3FF, list_s16[5] & 0x1FF);
75e28f62 E	215	break;
	216
	217	case 0x20 ... 0x23:
	218	{
	219	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	220
	221	get_vertex_data_xy(0, 2);
	222	get_vertex_data_xy(1, 4);
	223	get_vertex_data_xy(2, 6);
	224
	225	render_triangle(psx_gpu, vertexes, current_command);
	226	break;
	227	}
	228
	229	case 0x24 ... 0x27:
	230	{
	231	set_clut(psx_gpu, list_s16[5]);
	232	set_texture(psx_gpu, list_s16[9]);
	233	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	234
	235	get_vertex_data_xy_uv(0, 2);
	236	get_vertex_data_xy_uv(1, 6);
	237	get_vertex_data_xy_uv(2, 10);
	238
	239	render_triangle(psx_gpu, vertexes, current_command);
	240	break;
	241	}
	242
	243	case 0x28 ... 0x2B:
	244	{
	245	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	246
	247	get_vertex_data_xy(0, 2);
	248	get_vertex_data_xy(1, 4);
	249	get_vertex_data_xy(2, 6);
	250	get_vertex_data_xy(3, 8);
	251
	252	render_triangle(psx_gpu, vertexes, current_command);
	253	render_triangle(psx_gpu, &(vertexes[1]), current_command);
	254	break;
	255	}
	256
	257	case 0x2C ... 0x2F:
	258	{
	259	set_clut(psx_gpu, list_s16[5]);
	260	set_texture(psx_gpu, list_s16[9]);
	261	set_triangle_color(psx_gpu, list[0] & 0xFFFFFF);
	262
	263	get_vertex_data_xy_uv(0, 2);
	264	get_vertex_data_xy_uv(1, 6);
	265	get_vertex_data_xy_uv(2, 10);
	266	get_vertex_data_xy_uv(3, 14);
	267
	268	render_triangle(psx_gpu, vertexes, current_command);
	269	render_triangle(psx_gpu, &(vertexes[1]), current_command);
	270	break;
	271	}
	272
	273	case 0x30 ... 0x33:
	274	{
	275	get_vertex_data_xy_rgb(0, 0);
	276	get_vertex_data_xy_rgb(1, 4);
	277	get_vertex_data_xy_rgb(2, 8);
	278
279	render_triangle(psx_gpu, vertexes, current_command);
280	break;
281	}
282
283	case 0x34:
284	case 0x35:
285	case 0x36:
286	case 0x37:
287	{
288	set_clut(psx_gpu, list_s16[5]);
289	set_texture(psx_gpu, list_s16[11]);
290
291	get_vertex_data_xy_uv_rgb(0, 0);
292	get_vertex_data_xy_uv_rgb(1, 6);
293	get_vertex_data_xy_uv_rgb(2, 12);
294
295	render_triangle(psx_gpu, vertexes, current_command);
296	break;
297	}
298
299	case 0x38:
300	case 0x39:
301	case 0x3A:
302	case 0x3B:
303	{
304	get_vertex_data_xy_rgb(0, 0);
305	get_vertex_data_xy_rgb(1, 4);
306	get_vertex_data_xy_rgb(2, 8);
307	get_vertex_data_xy_rgb(3, 12);
308
309	render_triangle(psx_gpu, vertexes, current_command);
310	render_triangle(psx_gpu, &(vertexes[1]), current_command);
311	break;
312	}
313
314	case 0x3C:
315	case 0x3D:
316	case 0x3E:
317	case 0x3F:
318	{
319	set_clut(psx_gpu, list_s16[5]);
320	set_texture(psx_gpu, list_s16[11]);
321
322	get_vertex_data_xy_uv_rgb(0, 0);
323	get_vertex_data_xy_uv_rgb(1, 6);
324	get_vertex_data_xy_uv_rgb(2, 12);
325	get_vertex_data_xy_uv_rgb(3, 18);
326
327	render_triangle(psx_gpu, vertexes, current_command);
328	render_triangle(psx_gpu, &(vertexes[1]), current_command);
329	break;
330	}
331
332	case 0x40 ... 0x47:
333	{
334	vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
335	vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
336	vertexes[1].x = list_s16[4] + psx_gpu->offset_x;
337	vertexes[1].y = list_s16[5] + psx_gpu->offset_y;
338
339	render_line(psx_gpu, vertexes, current_command, list[0]);
340	break;
341	}
342
343	case 0x48 ... 0x4F:
344	{
345	u32 num_vertexes = 1;
346	u32 *list_position = &(list[2]);
347	u32 xy = list[1];
348
349	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
350	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
351
352	while(1)
353	{
354	xy = *list_position;
355	if(xy == 0x55555555)
356	break;
357
358	vertexes[0] = vertexes[1];
359
360	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
361	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
362
363	list_position++;
364	num_vertexes++;
365
366	render_line(psx_gpu, vertexes, current_command, list[0]);
367	}
368
369	if(num_vertexes > 2)
370	command_length += (num_vertexes - 2);
371
372	break;
373	}
374
375	case 0x50 ... 0x57:
376	{
377	vertexes[0].r = list[0] & 0xFF;
378	vertexes[0].g = (list[0] >> 8) & 0xFF;
379	vertexes[0].b = (list[0] >> 16) & 0xFF;
380	vertexes[0].x = list_s16[2] + psx_gpu->offset_x;
381	vertexes[0].y = list_s16[3] + psx_gpu->offset_y;
382
383	vertexes[1].r = list[2] & 0xFF;
384	vertexes[1].g = (list[2] >> 8) & 0xFF;
385	vertexes[1].b = (list[2] >> 16) & 0xFF;
386	vertexes[1].x = list_s16[6] + psx_gpu->offset_x;
387	vertexes[1].y = list_s16[7] + psx_gpu->offset_y;
388
389	render_line(psx_gpu, vertexes, current_command, 0);
390	break;
391	}
392
393	case 0x58 ... 0x5F:
394	{
395	u32 num_vertexes = 1;
396	u32 *list_position = &(list[2]);
397	u32 color = list[0];
398	u32 xy = list[1];
399
400	vertexes[1].r = color & 0xFF;
401	vertexes[1].g = (color >> 8) & 0xFF;
402	vertexes[1].b = (color >> 16) & 0xFF;
403	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
404	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
405
406	while(1)
407	{
408	color = list_position[0];
409	if(color == 0x55555555)
410	break;
411
412	xy = list_position[1];
413
414	vertexes[0] = vertexes[1];
415
416	vertexes[1].r = color & 0xFF;
417	vertexes[1].g = (color >> 8) & 0xFF;
418	vertexes[1].b = (color >> 16) & 0xFF;
419	vertexes[1].x = (xy & 0xFFFF) + psx_gpu->offset_x;
420	vertexes[1].y = (xy >> 16) + psx_gpu->offset_y;
421
422	list_position += 2;
423	num_vertexes++;
424
425	render_line(psx_gpu, vertexes, current_command, 0);
426	}
427
428	if(num_vertexes > 2)
429	command_length += ((num_vertexes * 2) - 2);
430
431	break;
432	}
433
434	case 0x60 ... 0x63:
435	{
bf2341d5 E	436	u32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	437	u32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62 E	438	u32 width = list_s16[4] & 0x3FF;
	439	u32 height = list_s16[5] & 0x1FF;
	440
75e28f62 E	441	render_sprite(psx_gpu, x, y, 0, 0, width, height, current_command, list[0]);
	442	break;
	443	}
	444
	445	case 0x64 ... 0x67:
	446	{
bf2341d5 E	447	u32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	448	u32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62 E	449	u32 uv = list_s16[4];
	450	u32 width = list_s16[6] & 0x3FF;
	451	u32 height = list_s16[7] & 0x1FF;
	452
75e28f62 E	453	set_clut(psx_gpu, list_s16[5]);
	454
	455	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, width, height,
	456	current_command, list[0]);
	457	break;
	458	}
	459
	460	case 0x68:
	461	case 0x69:
	462	case 0x6A:
	463	case 0x6B:
	464	{
bf2341d5 E	465	s32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	466	s32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62	467
75e28f62 E	468	render_sprite(psx_gpu, x, y, 0, 0, 1, 1, current_command, list[0]);
	469	break;
	470	}
	471
	472	case 0x70:
	473	case 0x71:
	474	case 0x72:
	475	case 0x73:
	476	{
bf2341d5 E	477	s32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	478	s32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62	479
75e28f62 E	480	render_sprite(psx_gpu, x, y, 0, 0, 8, 8, current_command, list[0]);
	481	break;
	482	}
	483
	484	case 0x74:
	485	case 0x75:
	486	case 0x76:
	487	case 0x77:
	488	{
bf2341d5 E	489	s32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	490	s32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62 E	491	u32 uv = list_s16[4];
75e28f62 E	492
75e28f62 E	493	set_clut(psx_gpu, list_s16[5]);
	494
	495	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 8, 8,
	496	current_command, list[0]);
	497	break;
	498	}
	499
	500	case 0x78:
	501	case 0x79:
	502	case 0x7A:
	503	case 0x7B:
	504	{
bf2341d5 E	505	s32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	506	s32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62	507
75e28f62 E	508	render_sprite(psx_gpu, x, y, 0, 0, 16, 16, current_command, list[0]);
	509	break;
	510	}
	511
	512	case 0x7C:
	513	case 0x7D:
	514	case 0x7E:
	515	case 0x7F:
	516	{
bf2341d5 E	517	s32 x = sign_extend_12bit(list_s16[2]) + psx_gpu->offset_x;
bf2341d5 E	518	s32 y = sign_extend_12bit(list_s16[3]) + psx_gpu->offset_y;
75e28f62 E	519	u32 uv = list_s16[4];
75e28f62 E	520
75e28f62 E	521	set_clut(psx_gpu, list_s16[5]);
	522
	523	render_sprite(psx_gpu, x, y, uv & 0xFF, (uv >> 8) & 0xFF, 16, 16,
	524	current_command, list[0]);
	525	break;
	526	}
	527
	528	case 0x80: // vid -> vid
	529	render_block_move(psx_gpu, list_s16[2] & 0x3FF, list_s16[3] & 0x1FF,
	530	list_s16[4] & 0x3FF, list_s16[5] & 0x1FF, list_s16[6], list_s16[7]);
	531	break;
	532
	533	case 0xA0: // sys -> vid
	534	{
1f88961f E	535	u32 load_x = list_s16[2] & 0x3FF;
	536	u32 load_y = list_s16[3] & 0x1FF;
	537	u32 load_width = list_s16[4] & 0x3FF;
	538	u32 load_height = list_s16[5] & 0x1FF;
75e28f62 E	539	u32 load_size = load_width * load_height;
	540
	541	command_length += load_size / 2;
	542
	543	render_block_copy(psx_gpu, (u16 *)&(list_s16[6]), load_x, load_y,
	544	load_width, load_height, load_width);
	545	break;
	546	}
	547
	548	case 0xC0: // vid -> sys
	549	break;
	550
	551	case 0xE1:
	552	set_texture(psx_gpu, list[0] & 0x1FF);
	553	if(list[0] & (1 << 9))
	554	psx_gpu->render_state_base \|= RENDER_STATE_DITHER;
	555	else
	556	psx_gpu->render_state_base &= ~RENDER_STATE_DITHER;
	557
	558	psx_gpu->display_area_draw_enable = (list[0] >> 10) & 0x1;
	559	break;
	560
	561	case 0xE2:
	562	{
	563	// TODO: Clean
	564	u32 texture_window_settings = list[0];
	565	u32 tmp, x, y, w, h;
	566
	567	if(texture_window_settings != psx_gpu->texture_window_settings)
	568	{
	569	tmp = (texture_window_settings & 0x1F) \| 0x20;
	570	for(w = 8; (tmp & 1) == 0; tmp >>= 1, w <<= 1);
	571
	572	tmp = ((texture_window_settings >> 5) & 0x1f) \| 0x20;
	573	for (h = 8; (tmp & 1) == 0; tmp >>= 1, h <<= 1);
	574
	575	tmp = 32 - (w >> 3);
	576	x = ((texture_window_settings >> 10) & tmp) << 3;
	577
	578	tmp = 32 - (h >> 3);
	579	y = ((texture_window_settings >> 15) & tmp) << 3;
	580
	581	flush_render_block_buffer(psx_gpu);
	582
de35a464	583	psx_gpu->texture_window_settings = texture_window_settings;
75e28f62 E	584	psx_gpu->texture_window_x = x;
	585	psx_gpu->texture_window_y = y;
	586	psx_gpu->texture_mask_width = w - 1;
	587	psx_gpu->texture_mask_height = h - 1;
	588
	589	update_texture_ptr(psx_gpu);
	590	}
	591	break;
	592	}
	593
	594	case 0xE3:
	595	psx_gpu->viewport_start_x = list[0] & 0x3FF;
	596	psx_gpu->viewport_start_y = (list[0] >> 10) & 0x1FF;
	597
	598	#ifdef TEXTURE_CACHE_4BPP
	599	psx_gpu->viewport_mask =
	600	texture_region_mask(psx_gpu->viewport_start_x,
	601	psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
	602	psx_gpu->viewport_end_y);
	603	#endif
	604	break;
	605
	606	case 0xE4:
	607	psx_gpu->viewport_end_x = list[0] & 0x3FF;
	608	psx_gpu->viewport_end_y = (list[0] >> 10) & 0x1FF;
	609
	610	#ifdef TEXTURE_CACHE_4BPP
	611	psx_gpu->viewport_mask =
	612	texture_region_mask(psx_gpu->viewport_start_x,
	613	psx_gpu->viewport_start_y, psx_gpu->viewport_end_x,
	614	psx_gpu->viewport_end_y);
	615	#endif
	616	break;
	617
	618	case 0xE5:
	619	{
	620	s32 offset_x = list[0] << 21;
	621	s32 offset_y = list[0] << 10;
	622	psx_gpu->offset_x = offset_x >> 21;
	623	psx_gpu->offset_y = offset_y >> 21;
	624
	625	break;
	626	}
	627
	628	case 0xE6:
	629	{
	630	u32 mask_settings = list[0];
	631	u16 mask_msb = mask_settings << 15;
	632
	633	if(list[0] & 0x2)
	634	psx_gpu->render_state_base \|= RENDER_STATE_MASK_EVALUATE;
	635	else
	636	psx_gpu->render_state_base &= ~RENDER_STATE_MASK_EVALUATE;
	637
	638	if(mask_msb != psx_gpu->mask_msb)
	639	{
	640	flush_render_block_buffer(psx_gpu);
	641	psx_gpu->mask_msb = mask_msb;
	642	}
	643
	644	break;
	645	}
	646
	647	default:
648	break;
649	}
650	}
651	}
652