123

RenderDll/XRenderOGL/NVParse/vsp1.0_impl.cpp

@@ -0,0 +1,152 @@
+#include "RenderPCH.h"
+#include "nvparse.h"
+
+//using namespace std;
+
+
+namespace
+{
+	void LoadProgram( GLenum target, GLuint id, char *instring );
+	void StrToUpper(char * string);
+}
+
+
+bool is_vsp10(const char * s)
+{
+	return ! strncmp(s, "!!VSP1.0", 8);
+}
+
+bool vsp10_init(char * s)
+{
+	static bool vpinit = false;
+	if (vpinit == false )
+	{
+		if(!SUPPORTS_GL_NV_vertex_program)
+		{
+			errors.set("unable to initialize GL_NV_vertex_program");
+			return false;
+		}
+		else
+		{
+			vpinit = true;
+		}
+	}
+	
+	errors.reset();
+	line_number = 1;
+	myin = s;
+	
+	return true;	
+}
+
+int vsp10_parse(int vpsid)
+{
+    LoadProgram( GL_VERTEX_STATE_PROGRAM_NV, vpsid, myin );
+	return 0;
+}
+
+namespace
+{
+	//.----------------------------------------------------------------------------.
+	//|   Function   : LoadProgram                                                 |
+	//|   Description: Load a program into GL, and report any errors encountered.  |
+	//.----------------------------------------------------------------------------.
+	void LoadProgram( GLenum target, GLuint id, char *instring )
+	{
+		GLint  errPos;
+		GLenum errCode;
+		const GLubyte *errString;
+		
+		int len = strlen(instring);
+		glLoadProgramNV( target, id, len, (const GLubyte *) instring );
+		if ( (errCode = glGetError()) != GL_NO_ERROR )
+		{
+			errString = gluErrorString( errCode );
+			
+			glGetIntegerv( GL_PROGRAM_ERROR_POSITION_NV, &errPos );
+			
+			int nlines = 1;
+			int nchar  = 1;
+			int i;
+			for ( i = 0; i < errPos; i++ )
+			{
+				if ( instring[i] == '\n' )
+				{
+					nlines++;
+					nchar = 1;
+				}
+				else
+				{
+					nchar++;
+				}
+			}
+			int start;
+			int end;
+			int flag = ((instring[errPos]==';') | (instring[errPos-1]==';')) ? 1 : 0;
+			for ( i = errPos; i >= 0; i-- )
+			{
+				start = i;
+				if ( flag && (start >= errPos-1)  )
+					continue;
+				if ( instring[i] == ';' )
+				{
+					if ( !flag )
+					{
+						start = i+1;
+						if ( instring[start] == '\n' )
+							start++;
+					}
+					break;
+				}
+			}
+			for ( i = errPos; i < len; i++ )
+			{
+				end = i;
+				if ( instring[i] == ';' && end > start)
+				{
+					break;
+				}
+			}
+			if ( errPos - start > 30 )
+			{
+				start = errPos - 30;
+			}
+			if ( end - errPos > 30 )
+			{
+				end = errPos + 30;
+			}
+			
+			char substring[96];
+			memset( substring, 0, 96 );
+			strncpy( substring, &(instring[start]), end-start+1 );
+			char str[256];
+			//sprintf( str, "error at line %d character %d\n    \"%s\"\n", nlines, nchar, substring );
+			sprintf( str, "error at line %d character %d\n\"%s\"\n", nlines, nchar, substring );
+			int width = errPos-start;
+			for ( i = 0; i < width; i++ )
+			{
+				strcat( str, " " );
+			}
+			strcat( str, "|\n" );
+			for ( i = 0; i < width; i++ )
+			{
+				strcat( str, " " );
+			}
+			strcat( str, "^\n" );
+			
+			errors.set( str );
+		}
+	}
+	
+	
+	//.----------------------------------------------------------------------------.
+	//|   Function   : StrToUpper                                                  |
+	//|   Description: Converts all lowercase chars in a string to uppercase.      |
+	//.----------------------------------------------------------------------------.
+	void StrToUpper(char *string)
+	{
+		for (unsigned int i = 0; i < strlen(string); i++)
+			string[i] = toupper(string[i]);
+	}
+	
+}