glsl: Use the without_array predicate to simplify some code
[mesa.git] / src / glsl / main.cpp
index 2f59848adbf1464fec74785ce38e07a6a6d67703..a4452e023f2a9e5ec5be67666c66185725352877 100644 (file)
 
 static int glsl_version = 330;
 
+extern "C" void
+_mesa_error_no_memory(const char *caller)
+{
+   fprintf(stderr, "Mesa error: out of memory in %s", caller);
+}
+
 static void
 initialize_context(struct gl_context *ctx, gl_api api)
 {
@@ -50,6 +56,17 @@ initialize_context(struct gl_context *ctx, gl_api api)
     */
    ctx->Const.GLSLVersion = glsl_version;
    ctx->Extensions.ARB_ES3_compatibility = true;
+   ctx->Const.MaxComputeWorkGroupCount[0] = 65535;
+   ctx->Const.MaxComputeWorkGroupCount[1] = 65535;
+   ctx->Const.MaxComputeWorkGroupCount[2] = 65535;
+   ctx->Const.MaxComputeWorkGroupSize[0] = 1024;
+   ctx->Const.MaxComputeWorkGroupSize[1] = 1024;
+   ctx->Const.MaxComputeWorkGroupSize[2] = 64;
+   ctx->Const.MaxComputeWorkGroupInvocations = 1024;
+   ctx->Const.Program[MESA_SHADER_COMPUTE].MaxTextureImageUnits = 16;
+   ctx->Const.Program[MESA_SHADER_COMPUTE].MaxUniformComponents = 1024;
+   ctx->Const.Program[MESA_SHADER_COMPUTE].MaxInputComponents = 0; /* not used */
+   ctx->Const.Program[MESA_SHADER_COMPUTE].MaxOutputComponents = 0; /* not used */
 
    switch (ctx->Const.GLSLVersion) {
    case 100:
@@ -62,20 +79,20 @@ initialize_context(struct gl_context *ctx, gl_api api)
       ctx->Const.MaxTextureCoordUnits = 0;
       ctx->Const.MaxTextureUnits = 8;
 
-      ctx->Const.VertexProgram.MaxAttribs = 8;
-      ctx->Const.VertexProgram.MaxTextureImageUnits = 0;
-      ctx->Const.VertexProgram.MaxUniformComponents = 128 * 4;
-      ctx->Const.VertexProgram.MaxInputComponents = 0; /* not used */
-      ctx->Const.VertexProgram.MaxOutputComponents = 32;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs = 8;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits = 0;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents = 128 * 4;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxInputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents = 32;
 
-      ctx->Const.FragmentProgram.MaxTextureImageUnits =
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits =
          ctx->Const.MaxCombinedTextureImageUnits;
-      ctx->Const.FragmentProgram.MaxUniformComponents = 16 * 4;
-      ctx->Const.FragmentProgram.MaxInputComponents =
-         ctx->Const.VertexProgram.MaxOutputComponents;
-      ctx->Const.FragmentProgram.MaxOutputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents = 16 * 4;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents =
+         ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxOutputComponents = 0; /* not used */
 
-      ctx->Const.MaxVarying = ctx->Const.VertexProgram.MaxOutputComponents / 4;
+      ctx->Const.MaxVarying = ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents / 4;
       break;
    case 110:
    case 120:
@@ -88,20 +105,20 @@ initialize_context(struct gl_context *ctx, gl_api api)
       ctx->Const.MaxTextureCoordUnits = 2;
       ctx->Const.MaxTextureUnits = 2;
 
-      ctx->Const.VertexProgram.MaxAttribs = 16;
-      ctx->Const.VertexProgram.MaxTextureImageUnits = 0;
-      ctx->Const.VertexProgram.MaxUniformComponents = 512;
-      ctx->Const.VertexProgram.MaxInputComponents = 0; /* not used */
-      ctx->Const.VertexProgram.MaxOutputComponents = 32;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits = 0;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents = 512;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxInputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents = 32;
 
-      ctx->Const.FragmentProgram.MaxTextureImageUnits =
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits =
          ctx->Const.MaxCombinedTextureImageUnits;
-      ctx->Const.FragmentProgram.MaxUniformComponents = 64;
-      ctx->Const.FragmentProgram.MaxInputComponents =
-         ctx->Const.VertexProgram.MaxOutputComponents;
-      ctx->Const.FragmentProgram.MaxOutputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents = 64;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents =
+         ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxOutputComponents = 0; /* not used */
 
-      ctx->Const.MaxVarying = ctx->Const.VertexProgram.MaxOutputComponents / 4;
+      ctx->Const.MaxVarying = ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents / 4;
       break;
    case 130:
    case 140:
@@ -114,19 +131,19 @@ initialize_context(struct gl_context *ctx, gl_api api)
       ctx->Const.MaxTextureCoordUnits = 8;
       ctx->Const.MaxTextureUnits = 2;
 
-      ctx->Const.VertexProgram.MaxAttribs = 16;
-      ctx->Const.VertexProgram.MaxTextureImageUnits = 16;
-      ctx->Const.VertexProgram.MaxUniformComponents = 1024;
-      ctx->Const.VertexProgram.MaxInputComponents = 0; /* not used */
-      ctx->Const.VertexProgram.MaxOutputComponents = 64;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxInputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents = 64;
 
-      ctx->Const.FragmentProgram.MaxTextureImageUnits = 16;
-      ctx->Const.FragmentProgram.MaxUniformComponents = 1024;
-      ctx->Const.FragmentProgram.MaxInputComponents =
-         ctx->Const.VertexProgram.MaxOutputComponents;
-      ctx->Const.FragmentProgram.MaxOutputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents =
+         ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxOutputComponents = 0; /* not used */
 
-      ctx->Const.MaxVarying = ctx->Const.VertexProgram.MaxOutputComponents / 4;
+      ctx->Const.MaxVarying = ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents / 4;
       break;
    case 150:
    case 330:
@@ -138,28 +155,28 @@ initialize_context(struct gl_context *ctx, gl_api api)
       ctx->Const.MaxTextureCoordUnits = 8;
       ctx->Const.MaxTextureUnits = 2;
 
-      ctx->Const.VertexProgram.MaxAttribs = 16;
-      ctx->Const.VertexProgram.MaxTextureImageUnits = 16;
-      ctx->Const.VertexProgram.MaxUniformComponents = 1024;
-      ctx->Const.VertexProgram.MaxInputComponents = 0; /* not used */
-      ctx->Const.VertexProgram.MaxOutputComponents = 64;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxInputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents = 64;
 
-      ctx->Const.GeometryProgram.MaxTextureImageUnits = 16;
-      ctx->Const.GeometryProgram.MaxUniformComponents = 1024;
-      ctx->Const.GeometryProgram.MaxInputComponents =
-         ctx->Const.VertexProgram.MaxOutputComponents;
-      ctx->Const.GeometryProgram.MaxOutputComponents = 128;
+      ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxInputComponents =
+         ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents;
+      ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxOutputComponents = 128;
 
-      ctx->Const.FragmentProgram.MaxTextureImageUnits = 16;
-      ctx->Const.FragmentProgram.MaxUniformComponents = 1024;
-      ctx->Const.FragmentProgram.MaxInputComponents =
-         ctx->Const.GeometryProgram.MaxOutputComponents;
-      ctx->Const.FragmentProgram.MaxOutputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents =
+         ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxOutputComponents;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxOutputComponents = 0; /* not used */
 
       ctx->Const.MaxCombinedTextureImageUnits =
-         ctx->Const.VertexProgram.MaxTextureImageUnits
-         + ctx->Const.GeometryProgram.MaxTextureImageUnits
-         + ctx->Const.FragmentProgram.MaxTextureImageUnits;
+         ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits
+         + ctx->Const.Program[MESA_SHADER_GEOMETRY].MaxTextureImageUnits
+         + ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits;
 
       ctx->Const.MaxGeometryOutputVertices = 256;
       ctx->Const.MaxGeometryTotalOutputComponents = 1024;
@@ -178,18 +195,18 @@ initialize_context(struct gl_context *ctx, gl_api api)
       ctx->Const.MaxTextureCoordUnits = 0;
       ctx->Const.MaxTextureUnits = 0;
 
-      ctx->Const.VertexProgram.MaxAttribs = 16;
-      ctx->Const.VertexProgram.MaxTextureImageUnits = 16;
-      ctx->Const.VertexProgram.MaxUniformComponents = 1024;
-      ctx->Const.VertexProgram.MaxInputComponents = 0; /* not used */
-      ctx->Const.VertexProgram.MaxOutputComponents = 16 * 4;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents = 1024;
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxInputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_VERTEX].MaxOutputComponents = 16 * 4;
 
-      ctx->Const.FragmentProgram.MaxTextureImageUnits = 16;
-      ctx->Const.FragmentProgram.MaxUniformComponents = 224;
-      ctx->Const.FragmentProgram.MaxInputComponents = 15 * 4;
-      ctx->Const.FragmentProgram.MaxOutputComponents = 0; /* not used */
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxTextureImageUnits = 16;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents = 224;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents = 15 * 4;
+      ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxOutputComponents = 0; /* not used */
 
-      ctx->Const.MaxVarying = ctx->Const.FragmentProgram.MaxInputComponents / 4;
+      ctx->Const.MaxVarying = ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxInputComponents / 4;
       break;
    }
 
@@ -221,7 +238,7 @@ load_text_file(void *ctx, const char *file_name)
                        if (bytes < size - total_read) {
                                free(text);
                                text = NULL;
-                               break;
+                               goto error;
                        }
 
                        if (bytes == 0) {
@@ -232,6 +249,7 @@ load_text_file(void *ctx, const char *file_name)
                } while (total_read < size);
 
                text[total_read] = '\0';
+error:;
        }
 
        fclose(fp);
@@ -276,13 +294,13 @@ void
 compile_shader(struct gl_context *ctx, struct gl_shader *shader)
 {
    struct _mesa_glsl_parse_state *state =
-      new(shader) _mesa_glsl_parse_state(ctx, shader->Type, shader);
+      new(shader) _mesa_glsl_parse_state(ctx, shader->Stage, shader);
 
    _mesa_glsl_compile_shader(ctx, shader, dump_ast, dump_hir);
 
    /* Print out the resulting IR */
    if (!state->error && dump_lir) {
-      _mesa_print_ir(shader->ir, state);
+      _mesa_print_ir(stdout, shader->ir, state);
    }
 
    return;
@@ -360,8 +378,11 @@ main(int argc, char **argv)
         shader->Type = GL_GEOMETRY_SHADER;
       else if (strncmp(".frag", ext, 5) == 0)
         shader->Type = GL_FRAGMENT_SHADER;
+      else if (strncmp(".comp", ext, 5) == 0)
+         shader->Type = GL_COMPUTE_SHADER;
       else
         usage_fail(argv[0]);
+      shader->Stage = _mesa_shader_enum_to_shader_stage(shader->Type);
 
       shader->Source = load_text_file(whole_program, argv[optind]);
       if (shader->Source == NULL) {