glProgramParameteri API implementation

src/OpenGL/libGLESv2/Program.cpp

@@ -118,6 +118,7 @@ namespace es2
 		unlink();
 
 		orphaned = false;
+		retrievableBinary = false;
 		referenceCount = 0;
 	}
 

src/OpenGL/libGLESv2/Program.h

@@ -216,6 +216,8 @@ namespace es2
 
 		unsigned int getSerial() const;
 
+		void setBinaryRetrievable(bool retrievable) { retrievableBinary = retrievable; }
+
 	private:
 		void unlink();
 		void resetUniformBlockBindings();
@@ -303,6 +305,7 @@ namespace es2
 		bool orphaned;   // Flag to indicate that the program can be deleted when no longer in use
 		char *infoLog;
 		bool validated;
+		bool retrievableBinary;
 
 		unsigned int referenceCount;
 		const unsigned int serial;

src/OpenGL/libGLESv2/libGLESv3.cpp

@@ -3865,7 +3865,26 @@ GL_APICALL void GL_APIENTRY glProgramParameteri(GLuint program, GLenum pname, GL
 	TRACE("(GLuint program = %d, GLenum pname = 0x%X, GLint value = %d)",
 	      program, pname, value);
 
-	UNIMPLEMENTED();
+	es2::Context *context = es2::getContext();
+
+	if(context)
+	{
+		es2::Program *programObject = context->getProgram(program);
+
+		if(!programObject)
+		{
+			return error(GL_INVALID_OPERATION);
+		}
+
+		switch(pname)
+		{
+		case GL_PROGRAM_BINARY_RETRIEVABLE_HINT:
+			programObject->setBinaryRetrievable(value != GL_FALSE);
+			break;
+		default:
+			return error(GL_INVALID_ENUM);
+		}
+	}
 }
 
 GL_APICALL void GL_APIENTRY glInvalidateFramebuffer(GLenum target, GLsizei numAttachments, const GLenum *attachments)