/********************************************************** * Copyright 2008-2009 VMware, Inc. All rights reserved. * * Permission is hereby granted, free of charge, to any person * obtaining a copy of this software and associated documentation * files (the "Software"), to deal in the Software without * restriction, including without limitation the rights to use, copy, * modify, merge, publish, distribute, sublicense, and/or sell copies * of the Software, and to permit persons to whom the Software is * furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be * included in all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. * **********************************************************/ #include "pipe/p_compiler.h" #include "pipe/p_shader_tokens.h" #include "pipe/p_defines.h" #include "tgsi/tgsi_parse.h" #include "tgsi/tgsi_dump.h" #include "tgsi/tgsi_scan.h" #include "util/u_math.h" #include "util/u_memory.h" #include "util/u_bitmask.h" #include "svgadump/svga_shader_dump.h" #include "svga_context.h" #include "svga_tgsi.h" #include "svga_tgsi_emit.h" #include "svga_debug.h" #include "svga_hw_reg.h" #include "svga3d_shaderdefs.h" /* Sinkhole used only in error conditions. */ static char err_buf[128]; #if 0 static void svga_destroy_shader_emitter(struct svga_shader_emitter *emit) { if (emit->buf != err_buf) FREE(emit->buf); } #endif static boolean svga_shader_expand(struct svga_shader_emitter *emit) { char *new_buf; unsigned newsize = emit->size * 2; if (emit->buf != err_buf) new_buf = REALLOC(emit->buf, emit->size, newsize); else new_buf = NULL; if (new_buf == NULL) { emit->ptr = err_buf; emit->buf = err_buf; emit->size = sizeof(err_buf); return FALSE; } emit->size = newsize; emit->ptr = new_buf + (emit->ptr - emit->buf); emit->buf = new_buf; return TRUE; } static INLINE boolean reserve(struct svga_shader_emitter *emit, unsigned nr_dwords) { if (emit->ptr - emit->buf + nr_dwords * sizeof(unsigned) >= emit->size) { if (!svga_shader_expand(emit)) { return FALSE; } } return TRUE; } boolean svga_shader_emit_dword(struct svga_shader_emitter * emit, unsigned dword) { if (!reserve(emit, 1)) return FALSE; *(unsigned *) emit->ptr = dword; emit->ptr += sizeof dword; return TRUE; } boolean svga_shader_emit_dwords(struct svga_shader_emitter * emit, const unsigned *dwords, unsigned nr) { if (!reserve(emit, nr)) return FALSE; memcpy(emit->ptr, dwords, nr * sizeof *dwords); emit->ptr += nr * sizeof *dwords; return TRUE; } boolean svga_shader_emit_opcode(struct svga_shader_emitter * emit, unsigned opcode) { SVGA3dShaderInstToken *here; if (!reserve(emit, 1)) return FALSE; here = (SVGA3dShaderInstToken *) emit->ptr; here->value = opcode; if (emit->insn_offset) { SVGA3dShaderInstToken *prev = (SVGA3dShaderInstToken *) (emit->buf + emit->insn_offset); prev->size = (here - prev) - 1; } emit->insn_offset = emit->ptr - emit->buf; emit->ptr += sizeof(unsigned); return TRUE; } static boolean svga_shader_emit_header(struct svga_shader_emitter *emit) { SVGA3dShaderVersion header; memset(&header, 0, sizeof header); switch (emit->unit) { case PIPE_SHADER_FRAGMENT: header.value = SVGA3D_PS_30; break; case PIPE_SHADER_VERTEX: header.value = SVGA3D_VS_30; break; } return svga_shader_emit_dword(emit, header.value); } /** * Use the shader info to generate a bitmask indicating which generic * inputs are used by the shader. A set bit indicates that GENERIC[i] * is used. */ unsigned svga_get_generic_inputs_mask(const struct tgsi_shader_info *info) { unsigned i, mask = 0x0; for (i = 0; i < info->num_inputs; i++) { if (info->input_semantic_name[i] == TGSI_SEMANTIC_GENERIC) { unsigned j = info->input_semantic_index[i]; assert(j < sizeof(mask) * 8); mask |= 1 << j; } } return mask; } /** * Given a mask of used generic variables (as returned by the above functions) * fill in a table which maps those indexes to small integers. * This table is used by the remap_generic_index() function in * svga_tgsi_decl_sm30.c * Example: if generics_mask = binary(1010) it means that GENERIC[1] and * GENERIC[3] are used. The remap_table will contain: * table[1] = 0; * table[3] = 1; * The remaining table entries will be filled in with the next unused * generic index (in this example, 2). */ void svga_remap_generics(unsigned generics_mask, int8_t remap_table[MAX_GENERIC_VARYING]) { /* Note texcoord[0] is reserved so start at 1 */ unsigned count = 1, i; for (i = 0; i < MAX_GENERIC_VARYING; i++) { remap_table[i] = -1; } /* for each bit set in generic_mask */ while (generics_mask) { unsigned index = ffs(generics_mask) - 1; remap_table[index] = count++; generics_mask &= ~(1 << index); } } /** * Use the generic remap table to map a TGSI generic varying variable * index to a small integer. If the remapping table doesn't have a * valid value for the given index (the table entry is -1) it means * the fragment shader doesn't use that VS output. Just allocate * the next free value in that case. Alternately, we could cull * VS instructions that write to register, or replace the register * with a dummy temp register. * XXX TODO: we should do one of the later as it would save precious * texcoord registers. */ int svga_remap_generic_index(int8_t remap_table[MAX_GENERIC_VARYING], int generic_index) { assert(generic_index < MAX_GENERIC_VARYING); if (generic_index >= MAX_GENERIC_VARYING) { /* just don't return a random/garbage value */ generic_index = MAX_GENERIC_VARYING - 1; } if (remap_table[generic_index] == -1) { /* This is a VS output that has no matching PS input. Find a * free index. */ int i, max = 0; for (i = 0; i < MAX_GENERIC_VARYING; i++) { max = MAX2(max, remap_table[i]); } remap_table[generic_index] = max + 1; } return remap_table[generic_index]; } /** * Parse TGSI shader and translate to SVGA/DX9 serialized * representation. * * In this function SVGA shader is emitted to an in-memory buffer that * can be dynamically grown. Once we've finished and know how large * it is, it will be copied to a hardware buffer for upload. */ static struct svga_shader_result * svga_tgsi_translate(const struct svga_shader *shader, struct svga_compile_key key, unsigned unit) { struct svga_shader_result *result = NULL; struct svga_shader_emitter emit; memset(&emit, 0, sizeof(emit)); emit.size = 1024; emit.buf = MALLOC(emit.size); if (emit.buf == NULL) { goto fail; } emit.ptr = emit.buf; emit.unit = unit; emit.key = key; tgsi_scan_shader(shader->tokens, &emit.info); emit.imm_start = emit.info.file_max[TGSI_FILE_CONSTANT] + 1; if (unit == PIPE_SHADER_FRAGMENT) emit.imm_start += key.fkey.num_unnormalized_coords; if (unit == PIPE_SHADER_VERTEX) { emit.imm_start += key.vkey.need_prescale ? 2 : 0; } emit.nr_hw_float_const = (emit.imm_start + emit.info.file_max[TGSI_FILE_IMMEDIATE] + 1); emit.nr_hw_temp = emit.info.file_max[TGSI_FILE_TEMPORARY] + 1; if (emit.nr_hw_temp >= SVGA3D_TEMPREG_MAX) { debug_printf("svga: too many temporary registers (%u)\n", emit.nr_hw_temp); goto fail; } emit.in_main_func = TRUE; if (!svga_shader_emit_header(&emit)) { debug_printf("svga: emit header failed\n"); goto fail; } if (!svga_shader_emit_instructions(&emit, shader->tokens)) { debug_printf("svga: emit instructions failed\n"); goto fail; } result = CALLOC_STRUCT(svga_shader_result); if (result == NULL) goto fail; result->shader = shader; result->tokens = (const unsigned *) emit.buf; result->nr_tokens = (emit.ptr - emit.buf) / sizeof(unsigned); memcpy(&result->key, &key, sizeof key); result->id = UTIL_BITMASK_INVALID_INDEX; if (SVGA_DEBUG & DEBUG_TGSI) { debug_printf("#####################################\n"); debug_printf("Shader %u below\n", shader->id); tgsi_dump(shader->tokens, 0); if (SVGA_DEBUG & DEBUG_TGSI) { debug_printf("Shader %u compiled below\n", shader->id); svga_shader_dump(result->tokens, result->nr_tokens, FALSE); } debug_printf("#####################################\n"); } return result; fail: FREE(result); FREE(emit.buf); return NULL; } struct svga_shader_result * svga_translate_fragment_program(const struct svga_fragment_shader *fs, const struct svga_fs_compile_key *fkey) { struct svga_compile_key key; memset(&key, 0, sizeof(key)); memcpy(&key.fkey, fkey, sizeof *fkey); memcpy(key.generic_remap_table, fs->generic_remap_table, sizeof(fs->generic_remap_table)); return svga_tgsi_translate(&fs->base, key, PIPE_SHADER_FRAGMENT); } struct svga_shader_result * svga_translate_vertex_program(const struct svga_vertex_shader *vs, const struct svga_vs_compile_key *vkey) { struct svga_compile_key key; memset(&key, 0, sizeof(key)); memcpy(&key.vkey, vkey, sizeof *vkey); /* Note: we could alternately store the remap table in the vkey but * that would make it larger. We just regenerate it here instead. */ svga_remap_generics(vkey->fs_generic_inputs, key.generic_remap_table); return svga_tgsi_translate(&vs->base, key, PIPE_SHADER_VERTEX); } void svga_destroy_shader_result(struct svga_shader_result *result) { FREE((unsigned *) result->tokens); FREE(result); }