2 * Copyright © 2008, 2009 Intel Corporation
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 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
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
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 NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
27 * This file is the main() routine and scaffolding for producing
28 * builtin_compiler (which doesn't include builtins itself and is used
29 * to generate the profile information for builtin_function.cpp), and
30 * for glsl_compiler (which does include builtins and can be used to
31 * offline compile GLSL code and examine the resulting GLSL IR.
35 #include "glsl_parser_extras.h"
36 #include "ir_optimization.h"
37 #include "ir_print_visitor.h"
39 #include "loop_analysis.h"
40 #include "standalone_scaffolding.h"
43 initialize_context(struct gl_context
*ctx
, gl_api api
)
45 initialize_context_to_defaults(ctx
, api
);
47 /* The standalone compiler needs to claim support for almost
48 * everything in order to compile the built-in functions.
50 ctx
->Const
.GLSLVersion
= 150;
51 ctx
->Extensions
.ARB_ES3_compatibility
= true;
53 ctx
->Const
.MaxClipPlanes
= 8;
54 ctx
->Const
.MaxDrawBuffers
= 2;
56 /* More than the 1.10 minimum to appease parser tests taken from
57 * apps that (hopefully) already checked the number of coords.
59 ctx
->Const
.MaxTextureCoordUnits
= 4;
61 ctx
->Driver
.NewShader
= _mesa_new_shader
;
64 /* Returned string will have 'ctx' as its ralloc owner. */
66 load_text_file(void *ctx
, const char *file_name
)
70 size_t total_read
= 0;
71 FILE *fp
= fopen(file_name
, "rb");
77 fseek(fp
, 0L, SEEK_END
);
79 fseek(fp
, 0L, SEEK_SET
);
81 text
= (char *) ralloc_size(ctx
, size
+ 1);
84 size_t bytes
= fread(text
+ total_read
,
85 1, size
- total_read
, fp
);
86 if (bytes
< size
- total_read
) {
97 } while (total_read
< size
);
99 text
[total_read
] = '\0';
113 const struct option compiler_opts
[] = {
114 { "glsl-es", 0, &glsl_es
, 1 },
115 { "dump-ast", 0, &dump_ast
, 1 },
116 { "dump-hir", 0, &dump_hir
, 1 },
117 { "dump-lir", 0, &dump_lir
, 1 },
118 { "link", 0, &do_link
, 1 },
123 * \brief Print proper usage and exit with failure.
126 usage_fail(const char *name
)
130 "usage: %s [options] <file.vert | file.geom | file.frag>\n"
132 "Possible options are:\n";
133 printf(header
, name
, name
);
134 for (const struct option
*o
= compiler_opts
; o
->name
!= 0; ++o
) {
135 printf(" --%s\n", o
->name
);
142 compile_shader(struct gl_context
*ctx
, struct gl_shader
*shader
)
144 struct _mesa_glsl_parse_state
*state
=
145 new(shader
) _mesa_glsl_parse_state(ctx
, shader
->Type
, shader
);
147 const char *source
= shader
->Source
;
148 state
->error
= glcpp_preprocess(state
, &source
, &state
->info_log
,
149 state
->extensions
, ctx
) != 0;
152 _mesa_glsl_lexer_ctor(state
, source
);
153 _mesa_glsl_parse(state
);
154 _mesa_glsl_lexer_dtor(state
);
158 foreach_list_const(n
, &state
->translation_unit
) {
159 ast_node
*ast
= exec_node_data(ast_node
, n
, link
);
165 shader
->ir
= new(shader
) exec_list
;
166 if (!state
->error
&& !state
->translation_unit
.is_empty())
167 _mesa_ast_to_hir(shader
->ir
, state
);
169 /* Print out the unoptimized IR. */
170 if (!state
->error
&& dump_hir
) {
171 validate_ir_tree(shader
->ir
);
172 _mesa_print_ir(shader
->ir
, state
);
175 /* Optimization passes */
176 if (!state
->error
&& !shader
->ir
->is_empty()) {
177 const struct gl_shader_compiler_options
*opts
=
178 &ctx
->ShaderCompilerOptions
[_mesa_shader_type_to_index(shader
->Type
)];
181 progress
= do_common_optimization(shader
->ir
, false, false, 32, opts
);
184 validate_ir_tree(shader
->ir
);
188 /* Print out the resulting IR */
189 if (!state
->error
&& dump_lir
) {
190 _mesa_print_ir(shader
->ir
, state
);
193 shader
->symbols
= state
->symbols
;
194 shader
->CompileStatus
= !state
->error
;
195 shader
->Version
= state
->language_version
;
196 shader
->IsES
= state
->es_shader
;
197 memcpy(shader
->builtins_to_link
, state
->builtins_to_link
,
198 sizeof(shader
->builtins_to_link
[0]) * state
->num_builtins_to_link
);
199 shader
->num_builtins_to_link
= state
->num_builtins_to_link
;
202 ralloc_free(shader
->InfoLog
);
204 shader
->InfoLog
= state
->info_log
;
206 /* Retain any live IR, but trash the rest. */
207 reparent_ir(shader
->ir
, shader
);
215 main(int argc
, char **argv
)
217 int status
= EXIT_SUCCESS
;
218 struct gl_context local_ctx
;
219 struct gl_context
*ctx
= &local_ctx
;
223 while ((c
= getopt_long(argc
, argv
, "", compiler_opts
, &idx
)) != -1)
230 initialize_context(ctx
, (glsl_es
) ? API_OPENGLES2
: API_OPENGL_COMPAT
);
232 struct gl_shader_program
*whole_program
;
234 whole_program
= rzalloc (NULL
, struct gl_shader_program
);
235 assert(whole_program
!= NULL
);
236 whole_program
->InfoLog
= ralloc_strdup(whole_program
, "");
238 for (/* empty */; argc
> optind
; optind
++) {
239 whole_program
->Shaders
=
240 reralloc(whole_program
, whole_program
->Shaders
,
241 struct gl_shader
*, whole_program
->NumShaders
+ 1);
242 assert(whole_program
->Shaders
!= NULL
);
244 struct gl_shader
*shader
= rzalloc(whole_program
, gl_shader
);
246 whole_program
->Shaders
[whole_program
->NumShaders
] = shader
;
247 whole_program
->NumShaders
++;
249 const unsigned len
= strlen(argv
[optind
]);
253 const char *const ext
= & argv
[optind
][len
- 5];
254 if (strncmp(".vert", ext
, 5) == 0 || strncmp(".glsl", ext
, 5) == 0)
255 shader
->Type
= GL_VERTEX_SHADER
;
256 else if (strncmp(".geom", ext
, 5) == 0)
257 shader
->Type
= GL_GEOMETRY_SHADER
;
258 else if (strncmp(".frag", ext
, 5) == 0)
259 shader
->Type
= GL_FRAGMENT_SHADER
;
263 shader
->Source
= load_text_file(whole_program
, argv
[optind
]);
264 if (shader
->Source
== NULL
) {
265 printf("File \"%s\" does not exist.\n", argv
[optind
]);
269 compile_shader(ctx
, shader
);
271 if (!shader
->CompileStatus
) {
272 printf("Info log for %s:\n%s\n", argv
[optind
], shader
->InfoLog
);
273 status
= EXIT_FAILURE
;
278 if ((status
== EXIT_SUCCESS
) && do_link
) {
279 link_shaders(ctx
, whole_program
);
280 status
= (whole_program
->LinkStatus
) ? EXIT_SUCCESS
: EXIT_FAILURE
;
282 if (strlen(whole_program
->InfoLog
) > 0)
283 printf("Info log for linking:\n%s\n", whole_program
->InfoLog
);
286 for (unsigned i
= 0; i
< MESA_SHADER_TYPES
; i
++)
287 ralloc_free(whole_program
->_LinkedShaders
[i
]);
289 ralloc_free(whole_program
);
290 _mesa_glsl_release_types();
291 _mesa_glsl_release_functions();