Home | History | Annotate | Download | only in compiler
      1 /*
      2  * Copyright 2009 Nicolai Hhnle <nhaehnle (at) gmail.com>
      3  *
      4  * Permission is hereby granted, free of charge, to any person obtaining a
      5  * copy of this software and associated documentation files (the "Software"),
      6  * to deal in the Software without restriction, including without limitation
      7  * on the rights to use, copy, modify, merge, publish, distribute, sub
      8  * license, and/or sell copies of the Software, and to permit persons to whom
      9  * the Software is furnished to do so, subject to the following conditions:
     10  *
     11  * The above copyright notice and this permission notice (including the next
     12  * paragraph) shall be included in all copies or substantial portions of the
     13  * Software.
     14  *
     15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
     16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
     17  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
     18  * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
     19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
     20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
     21  * USE OR OTHER DEALINGS IN THE SOFTWARE. */
     22 
     23 #include "radeon_compiler.h"
     24 
     25 #include <stdio.h>
     26 
     27 #include "radeon_compiler_util.h"
     28 #include "radeon_dataflow.h"
     29 #include "radeon_emulate_branches.h"
     30 #include "radeon_emulate_loops.h"
     31 #include "radeon_program_alu.h"
     32 #include "radeon_program_tex.h"
     33 #include "radeon_rename_regs.h"
     34 #include "radeon_remove_constants.h"
     35 #include "r300_fragprog.h"
     36 #include "r300_fragprog_swizzle.h"
     37 #include "r500_fragprog.h"
     38 
     39 
     40 static void dataflow_outputs_mark_use(void * userdata, void * data,
     41 		void (*callback)(void *, unsigned int, unsigned int))
     42 {
     43 	struct r300_fragment_program_compiler * c = userdata;
     44 	callback(data, c->OutputColor[0], RC_MASK_XYZW);
     45 	callback(data, c->OutputColor[1], RC_MASK_XYZW);
     46 	callback(data, c->OutputColor[2], RC_MASK_XYZW);
     47 	callback(data, c->OutputColor[3], RC_MASK_XYZW);
     48 	callback(data, c->OutputDepth, RC_MASK_W);
     49 }
     50 
     51 static void rc_rewrite_depth_out(struct radeon_compiler *cc, void *user)
     52 {
     53 	struct r300_fragment_program_compiler *c = (struct r300_fragment_program_compiler*)cc;
     54 	struct rc_instruction *rci;
     55 
     56 	for (rci = c->Base.Program.Instructions.Next; rci != &c->Base.Program.Instructions; rci = rci->Next) {
     57 		struct rc_sub_instruction * inst = &rci->U.I;
     58 		unsigned i;
     59 		const struct rc_opcode_info *info = rc_get_opcode_info(inst->Opcode);
     60 
     61 		if (inst->DstReg.File != RC_FILE_OUTPUT || inst->DstReg.Index != c->OutputDepth)
     62 			continue;
     63 
     64 		if (inst->DstReg.WriteMask & RC_MASK_Z) {
     65 			inst->DstReg.WriteMask = RC_MASK_W;
     66 		} else {
     67 			inst->DstReg.WriteMask = 0;
     68 			continue;
     69 		}
     70 
     71 		if (!info->IsComponentwise) {
     72 			continue;
     73 		}
     74 
     75 		for (i = 0; i < info->NumSrcRegs; i++) {
     76 			inst->SrcReg[i] = lmul_swizzle(RC_SWIZZLE_ZZZZ, inst->SrcReg[i]);
     77 		}
     78 	}
     79 }
     80 
     81 void r3xx_compile_fragment_program(struct r300_fragment_program_compiler* c)
     82 {
     83 	int is_r500 = c->Base.is_r500;
     84 	int opt = !c->Base.disable_optimizations;
     85 
     86 	/* Lists of instruction transformations. */
     87 	struct radeon_program_transformation rewrite_tex[] = {
     88 		{ &radeonTransformTEX, c },
     89 		{ 0, 0 }
     90 	};
     91 
     92 	struct radeon_program_transformation rewrite_if[] = {
     93 		{ &r500_transform_IF, 0 },
     94 		{0, 0}
     95 	};
     96 
     97 	struct radeon_program_transformation native_rewrite_r500[] = {
     98 		{ &radeonTransformALU, 0 },
     99 		{ &radeonTransformDeriv, 0 },
    100 		{ &radeonTransformTrigScale, 0 },
    101 		{ 0, 0 }
    102 	};
    103 
    104 	struct radeon_program_transformation native_rewrite_r300[] = {
    105 		{ &radeonTransformALU, 0 },
    106 		{ &r300_transform_trig_simple, 0 },
    107 		{ 0, 0 }
    108 	};
    109 
    110 	/* List of compiler passes. */
    111 	struct radeon_compiler_pass fs_list[] = {
    112 		/* NAME				DUMP PREDICATE	FUNCTION			PARAM */
    113 		{"rewrite depth out",		1, 1,		rc_rewrite_depth_out,		NULL},
    114 		/* This transformation needs to be done before any of the IF
    115 		 * instructions are modified. */
    116 		{"transform KILP",		1, 1,		rc_transform_KILP,		NULL},
    117 		{"unroll loops",		1, is_r500,	rc_unroll_loops,		NULL},
    118 		{"transform loops",		1, !is_r500,	rc_transform_loops,		NULL},
    119 		{"emulate branches",		1, !is_r500,	rc_emulate_branches,		NULL},
    120 		{"transform TEX",		1, 1,		rc_local_transform,		rewrite_tex},
    121 		{"transform IF",		1, is_r500,	rc_local_transform,		rewrite_if},
    122 		{"native rewrite",		1, is_r500,	rc_local_transform,		native_rewrite_r500},
    123 		{"native rewrite",		1, !is_r500,	rc_local_transform,		native_rewrite_r300},
    124 		{"deadcode",			1, opt,		rc_dataflow_deadcode,		dataflow_outputs_mark_use},
    125 		{"emulate loops",		1, !is_r500,	rc_emulate_loops,		NULL},
    126 		{"register rename",		1, !is_r500 || opt,		rc_rename_regs,			NULL},
    127 		{"dataflow optimize",		1, opt,		rc_optimize,			NULL},
    128 		{"inline literals",		1, is_r500 && opt,		rc_inline_literals,			NULL},
    129 		{"dataflow swizzles",		1, 1,		rc_dataflow_swizzles,		NULL},
    130 		{"dead constants",		1, 1,		rc_remove_unused_constants,	&c->code->constants_remap_table},
    131 		{"pair translate",		1, 1,		rc_pair_translate,		NULL},
    132 		{"pair scheduling",		1, 1,		rc_pair_schedule,		&opt},
    133 		{"dead sources",		1, 1,		rc_pair_remove_dead_sources, NULL},
    134 		{"register allocation",		1, 1,		rc_pair_regalloc,		&opt},
    135 		{"final code validation",	0, 1,		rc_validate_final_shader,	NULL},
    136 		{"machine code generation",	0, is_r500,	r500BuildFragmentProgramHwCode,	NULL},
    137 		{"machine code generation",	0, !is_r500,	r300BuildFragmentProgramHwCode,	NULL},
    138 		{"dump machine code",		0, is_r500  && (c->Base.Debug & RC_DBG_LOG), r500FragmentProgramDump, NULL},
    139 		{"dump machine code",		0, !is_r500 && (c->Base.Debug & RC_DBG_LOG), r300FragmentProgramDump, NULL},
    140 		{NULL, 0, 0, NULL, NULL}
    141 	};
    142 
    143 	c->Base.type = RC_FRAGMENT_PROGRAM;
    144 	c->Base.SwizzleCaps = c->Base.is_r500 ? &r500_swizzle_caps : &r300_swizzle_caps;
    145 
    146 	rc_run_compiler(&c->Base, fs_list);
    147 
    148 	rc_constants_copy(&c->code->constants, &c->Base.Program.Constants);
    149 }
    150