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();