Merge branch 'llvm-cliptest-viewport'
[mesa.git] / src / mesa / drivers / dri / r600 / r700_oglprog.c
index 5290ef31be3a4173ef560c47c2c0d26ebb7c1c1b..6ca745800350bc08ebfd7bf1463fccba24847397 100644 (file)
@@ -29,7 +29,7 @@
 #include "main/glheader.h"
 #include "main/imports.h"
 
-#include "shader/program.h"
+#include "program/program.h"
 #include "tnl/tnl.h"
 
 #include "r600_context.h"
 #include "r700_vertprog.h"
 
 
-static struct gl_program *r700NewProgram(GLcontext * ctx, 
+static void freeVertProgCache(struct gl_context *ctx, struct r700_vertex_program_cont *cache)
+{
+       struct r700_vertex_program *tmp, *vp = cache->progs;
+
+       while (vp) {
+               tmp = vp->next;
+               /* Release DMA region */
+               r600DeleteShader(ctx, vp->shaderbo);
+
+        if(NULL != vp->constbo0)
+        {
+                   r600DeleteShader(ctx, vp->constbo0);
+        }
+
+               /* Clean up */
+               Clean_Up_Assembler(&(vp->r700AsmCode));
+               Clean_Up_Shader(&(vp->r700Shader));
+               
+               _mesa_reference_vertprog(ctx, &vp->mesa_program, NULL);
+               free(vp);
+               vp = tmp;
+       }
+}
+
+static struct gl_program *r700NewProgram(struct gl_context * ctx, 
                                          GLenum target,
                                                             GLuint id)
 {
@@ -61,6 +85,7 @@ static struct gl_program *r700NewProgram(GLcontext * ctx,
                                              &vpc->mesa_program,
                                                                 target, 
                                              id);
+        
            break;
     case GL_FRAGMENT_PROGRAM_NV:
     case GL_FRAGMENT_PROGRAM_ARB:
@@ -74,6 +99,8 @@ static struct gl_program *r700NewProgram(GLcontext * ctx,
 
         fp->shaderbo   = NULL;
 
+               fp->constbo0   = NULL;
+
            break;
     default:
            _mesa_problem(ctx, "Bad target in r700NewProgram");
@@ -82,10 +109,9 @@ static struct gl_program *r700NewProgram(GLcontext * ctx,
        return pProgram;
 }
 
-static void r700DeleteProgram(GLcontext * ctx, struct gl_program *prog)
+static void r700DeleteProgram(struct gl_context * ctx, struct gl_program *prog)
 {
-    struct r700_vertex_program_cont   * vpc;
-    struct r700_vertex_program *vp, *tmp;
+    struct r700_vertex_program_cont *vpc = (struct r700_vertex_program_cont *)prog;
     struct r700_fragment_program * fp;
 
        radeon_print(RADEON_SHADER, RADEON_VERBOSE,
@@ -95,20 +121,7 @@ static void r700DeleteProgram(GLcontext * ctx, struct gl_program *prog)
     {
     case GL_VERTEX_STATE_PROGRAM_NV:
     case GL_VERTEX_PROGRAM_ARB:            
-        vpc = (struct r700_vertex_program_cont*)prog;
-        vp = vpc->progs;
-       while (vp) {
-               tmp = vp->next;
-               /* Release DMA region */
-        
-               r600DeleteShader(ctx, vp->shaderbo);
-
-               /* Clean up */
-               Clean_Up_Assembler(&(vp->r700AsmCode));
-               Clean_Up_Shader(&(vp->r700Shader));
-               _mesa_free(vp);
-               vp = tmp;
-       }
+           freeVertProgCache(ctx, vpc);
            break;
     case GL_FRAGMENT_PROGRAM_NV:
     case GL_FRAGMENT_PROGRAM_ARB:
@@ -117,6 +130,11 @@ static void r700DeleteProgram(GLcontext * ctx, struct gl_program *prog)
 
         r600DeleteShader(ctx, fp->shaderbo);
 
+        if(NULL != fp->constbo0)
+        {
+                   r600DeleteShader(ctx, fp->constbo0);
+        }
+
         /* Clean up */
         Clean_Up_Assembler(&(fp->r700AsmCode));
         Clean_Up_Shader(&(fp->r700Shader));
@@ -128,13 +146,39 @@ static void r700DeleteProgram(GLcontext * ctx, struct gl_program *prog)
        _mesa_delete_program(ctx, prog);
 }
 
-static void
-r700ProgramStringNotify(GLcontext * ctx, GLenum target, struct gl_program *prog)
+static GLboolean
+r700ProgramStringNotify(struct gl_context * ctx, GLenum target, struct gl_program *prog)
 {
-
+       struct r700_vertex_program_cont *vpc = (struct r700_vertex_program_cont *)prog;
+       struct r700_fragment_program * fp = (struct r700_fragment_program*)prog;
+
+       switch (target) {
+       case GL_VERTEX_PROGRAM_ARB:
+               freeVertProgCache(ctx, vpc);
+               vpc->progs = NULL;
+               break;
+       case GL_FRAGMENT_PROGRAM_ARB:
+               r600DeleteShader(ctx, fp->shaderbo);
+
+        if(NULL != fp->constbo0)
+        {
+                   r600DeleteShader(ctx, fp->constbo0);
+                   fp->constbo0   = NULL;
+        }
+
+               Clean_Up_Assembler(&(fp->r700AsmCode));
+               Clean_Up_Shader(&(fp->r700Shader));
+               fp->translated = GL_FALSE;
+               fp->loaded     = GL_FALSE;
+               fp->shaderbo   = NULL;
+               break;
+       }
+               
+       /* XXX check if program is legal, within limits */
+       return GL_TRUE;
 }
 
-static GLboolean r700IsProgramNative(GLcontext * ctx, GLenum target, struct gl_program *prog)
+static GLboolean r700IsProgramNative(struct gl_context * ctx, GLenum target, struct gl_program *prog)
 {
 
        return GL_TRUE;