153 lines
3.2 KiB
C++
153 lines
3.2 KiB
C++
#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]);
|
|
}
|
|
|
|
}
|