Go to most recent revision | Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 1901 | serge | 1 | /* |
| 2 | * Copyright (C) 2005-2007 Brian Paul All Rights Reserved. |
||
| 3 | * Copyright (C) 2008 VMware, Inc. All Rights Reserved. |
||
| 4 | * Copyright © 2010 Intel Corporation |
||
| 5 | * |
||
| 6 | * Permission is hereby granted, free of charge, to any person obtaining a |
||
| 7 | * copy of this software and associated documentation files (the "Software"), |
||
| 8 | * to deal in the Software without restriction, including without limitation |
||
| 9 | * the rights to use, copy, modify, merge, publish, distribute, sublicense, |
||
| 10 | * and/or sell copies of the Software, and to permit persons to whom the |
||
| 11 | * Software is furnished to do so, subject to the following conditions: |
||
| 12 | * |
||
| 13 | * The above copyright notice and this permission notice (including the next |
||
| 14 | * paragraph) shall be included in all copies or substantial portions of the |
||
| 15 | * Software. |
||
| 16 | * |
||
| 17 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
||
| 18 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
||
| 19 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
||
| 20 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
||
| 21 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
||
| 22 | * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
||
| 23 | * DEALINGS IN THE SOFTWARE. |
||
| 24 | */ |
||
| 25 | |||
| 26 | #include |
||
| 27 | #include "ir.h" |
||
| 28 | #include "glsl_types.h" |
||
| 29 | #include "ir_visitor.h" |
||
| 30 | |||
| 31 | extern "C" { |
||
| 32 | #include "main/compiler.h" |
||
| 33 | #include "main/mtypes.h" |
||
| 34 | #include "program/prog_parameter.h" |
||
| 35 | } |
||
| 36 | |||
| 37 | static void fail_link(struct gl_shader_program *prog, const char *fmt, ...) PRINTFLIKE(2, 3); |
||
| 38 | |||
| 39 | static void fail_link(struct gl_shader_program *prog, const char *fmt, ...) |
||
| 40 | { |
||
| 41 | va_list args; |
||
| 42 | va_start(args, fmt); |
||
| 43 | ralloc_vasprintf_append(&prog->InfoLog, fmt, args); |
||
| 44 | va_end(args); |
||
| 45 | |||
| 46 | prog->LinkStatus = GL_FALSE; |
||
| 47 | } |
||
| 48 | |||
| 49 | class get_sampler_name : public ir_hierarchical_visitor |
||
| 50 | { |
||
| 51 | public: |
||
| 52 | get_sampler_name(ir_dereference *last, |
||
| 53 | struct gl_shader_program *shader_program) |
||
| 54 | { |
||
| 55 | this->mem_ctx = ralloc_context(NULL); |
||
| 56 | this->shader_program = shader_program; |
||
| 57 | this->name = NULL; |
||
| 58 | this->offset = 0; |
||
| 59 | this->last = last; |
||
| 60 | } |
||
| 61 | |||
| 62 | ~get_sampler_name() |
||
| 63 | { |
||
| 64 | ralloc_free(this->mem_ctx); |
||
| 65 | } |
||
| 66 | |||
| 67 | virtual ir_visitor_status visit(ir_dereference_variable *ir) |
||
| 68 | { |
||
| 69 | this->name = ir->var->name; |
||
| 70 | return visit_continue; |
||
| 71 | } |
||
| 72 | |||
| 73 | virtual ir_visitor_status visit_leave(ir_dereference_record *ir) |
||
| 74 | { |
||
| 75 | this->name = ralloc_asprintf(mem_ctx, "%s.%s", name, ir->field); |
||
| 76 | return visit_continue; |
||
| 77 | } |
||
| 78 | |||
| 79 | virtual ir_visitor_status visit_leave(ir_dereference_array *ir) |
||
| 80 | { |
||
| 81 | ir_constant *index = ir->array_index->as_constant(); |
||
| 82 | int i; |
||
| 83 | |||
| 84 | if (index) { |
||
| 85 | i = index->value.i[0]; |
||
| 86 | } else { |
||
| 87 | /* GLSL 1.10 and 1.20 allowed variable sampler array indices, |
||
| 88 | * while GLSL 1.30 requires that the array indices be |
||
| 89 | * constant integer expressions. We don't expect any driver |
||
| 90 | * to actually work with a really variable array index, so |
||
| 91 | * all that would work would be an unrolled loop counter that ends |
||
| 92 | * up being constant above. |
||
| 93 | */ |
||
| 94 | ralloc_strcat(&shader_program->InfoLog, |
||
| 95 | "warning: Variable sampler array index unsupported.\n" |
||
| 96 | "This feature of the language was removed in GLSL 1.20 " |
||
| 97 | "and is unlikely to be supported for 1.10 in Mesa.\n"); |
||
| 98 | i = 0; |
||
| 99 | } |
||
| 100 | if (ir != last) { |
||
| 101 | this->name = ralloc_asprintf(mem_ctx, "%s[%d]", name, i); |
||
| 102 | } else { |
||
| 103 | offset = i; |
||
| 104 | } |
||
| 105 | return visit_continue; |
||
| 106 | } |
||
| 107 | |||
| 108 | struct gl_shader_program *shader_program; |
||
| 109 | const char *name; |
||
| 110 | void *mem_ctx; |
||
| 111 | int offset; |
||
| 112 | ir_dereference *last; |
||
| 113 | }; |
||
| 114 | |||
| 115 | extern "C" { |
||
| 116 | int |
||
| 117 | _mesa_get_sampler_uniform_value(class ir_dereference *sampler, |
||
| 118 | struct gl_shader_program *shader_program, |
||
| 119 | const struct gl_program *prog) |
||
| 120 | { |
||
| 121 | get_sampler_name getname(sampler, shader_program); |
||
| 122 | |||
| 123 | sampler->accept(&getname); |
||
| 124 | |||
| 125 | GLint index = _mesa_lookup_parameter_index(prog->Parameters, -1, |
||
| 126 | getname.name); |
||
| 127 | |||
| 128 | if (index < 0) { |
||
| 129 | fail_link(shader_program, |
||
| 130 | "failed to find sampler named %s.\n", getname.name); |
||
| 131 | return 0; |
||
| 132 | } |
||
| 133 | |||
| 134 | index += getname.offset; |
||
| 135 | |||
| 136 | return prog->Parameters->ParameterValues[index][0]; |
||
| 137 | } |
||
| 138 | } |