2 * Copyright (C) 2005-2007 Brian Paul All Rights Reserved.
3 * Copyright (C) 2008 VMware, Inc. All Rights Reserved.
4 * Copyright © 2010 Intel Corporation
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:
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
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.
27 #include "glsl_types.h"
28 #include "ir_visitor.h"
29 #include "../glsl/program.h"
30 #include "program/hash_table.h"
31 #include "ir_uniform.h"
34 #include "main/compiler.h"
35 #include "main/mtypes.h"
36 #include "program/prog_parameter.h"
39 class get_sampler_name
: public ir_hierarchical_visitor
42 get_sampler_name(ir_dereference
*last
,
43 struct gl_shader_program
*shader_program
)
45 this->mem_ctx
= ralloc_context(NULL
);
46 this->shader_program
= shader_program
;
54 ralloc_free(this->mem_ctx
);
57 virtual ir_visitor_status
visit(ir_dereference_variable
*ir
)
59 this->name
= ir
->var
->name
;
60 return visit_continue
;
63 virtual ir_visitor_status
visit_leave(ir_dereference_record
*ir
)
65 this->name
= ralloc_asprintf(mem_ctx
, "%s.%s", name
, ir
->field
);
66 return visit_continue
;
69 virtual ir_visitor_status
visit_leave(ir_dereference_array
*ir
)
71 ir_constant
*index
= ir
->array_index
->as_constant();
75 i
= index
->value
.i
[0];
77 /* GLSL 1.10 and 1.20 allowed variable sampler array indices,
78 * while GLSL 1.30 requires that the array indices be
79 * constant integer expressions. We don't expect any driver
80 * to actually work with a really variable array index, so
81 * all that would work would be an unrolled loop counter that ends
82 * up being constant above.
84 ralloc_strcat(&shader_program
->InfoLog
,
85 "warning: Variable sampler array index unsupported.\n"
86 "This feature of the language was removed in GLSL 1.20 "
87 "and is unlikely to be supported for 1.10 in Mesa.\n");
91 this->name
= ralloc_asprintf(mem_ctx
, "%s[%d]", name
, i
);
95 return visit_continue
;
98 struct gl_shader_program
*shader_program
;
102 ir_dereference
*last
;
107 _mesa_get_sampler_uniform_value(class ir_dereference
*sampler
,
108 struct gl_shader_program
*shader_program
,
109 const struct gl_program
*prog
)
111 get_sampler_name
getname(sampler
, shader_program
);
113 sampler
->accept(&getname
);
116 if (!shader_program
->UniformHash
->get(location
, getname
.name
)) {
117 linker_error(shader_program
,
118 "failed to find sampler named %s.\n", getname
.name
);
122 return shader_program
->UniformStorage
[location
].sampler
+ getname
.offset
;