1

utils/classcheck/classcheck_util.cpp

@@ -0,0 +1,369 @@
+//========= Copyright Valve Corporation, All rights reserved. ============//
+//
+// Purpose: 
+//
+// $NoKeywords: $
+//=============================================================================//
+#include "stdafx.h"
+#include <io.h>
+#include <stdio.h>
+#include <windows.h>
+#include "classcheck_util.h"
+#include "icodeprocessor.h"
+#include "tier0/dbg.h"
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : depth - 
+//			*fmt - 
+//			... - 
+//-----------------------------------------------------------------------------
+void vprint( int depth, const char *fmt, ... )
+{
+	char string[ 8192 ];
+	va_list va;
+	va_start( va, fmt );
+	vsprintf( string, fmt, va );
+	va_end( va );
+
+	FILE *fp = NULL;
+
+	if ( processor->GetLogFile() )
+	{
+		fp = fopen( "log.txt", "ab" );
+	}
+
+	while ( depth-- > 0 )
+	{
+		printf( "  " );
+		OutputDebugString( "  " );
+		if ( fp )
+		{
+			fprintf( fp, "  " );
+		}
+	}
+
+	::printf( "%s", string );
+	OutputDebugString( string );
+
+	if ( fp )
+	{
+		char *p = string;
+		while ( *p )
+		{
+			if ( *p == '\n' )
+			{
+				fputc( '\r', fp );
+			}
+			fputc( *p, fp );
+			p++;
+		}
+		fclose( fp );
+	}
+}
+
+
+bool com_ignorecolons = false;  // YWB:  Ignore colons as token separators in COM_Parse
+bool com_ignoreinlinecomment = false;
+static bool s_com_token_unget = false;
+char	com_token[1024];
+int linesprocessed = 0;
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+//-----------------------------------------------------------------------------
+void CC_UngetToken( void )
+{
+	s_com_token_unget = true;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : ch - 
+// Output : Returns true on success, false on failure.
+//-----------------------------------------------------------------------------
+bool CC_IsBreakChar( char ch )
+{
+	bool brk = false;
+	switch ( ch )
+	{
+	case '{':
+	case '}':
+	case ')':
+	case '(':
+	case '[':
+	case ']':
+	case '\'':
+	case '/':
+	case ',':
+	case ';':
+	case '<':
+	case '>':
+		brk = true;
+		break;
+		
+	case ':':
+		if ( !com_ignorecolons )
+			brk = true;
+		break;
+	default:
+		break;
+	}
+	return brk;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *data - 
+// Output : char
+//-----------------------------------------------------------------------------
+char *CC_ParseToken(char *data)
+{
+	int             c;
+	int             len;
+	
+	if ( s_com_token_unget )
+	{
+		s_com_token_unget = false;
+		return data;
+	}
+
+	len = 0;
+	com_token[0] = 0;
+	
+	if (!data)
+		return NULL;
+		
+// skip whitespace
+skipwhite:
+	while ( (c = *data) <= ' ')
+	{
+		if (c == 0)
+			return NULL;                    // end of file;
+		if ( c== '\n' )
+		{
+			linesprocessed++;
+		}
+		data++;
+	}
+	
+// skip // comments
+	if ( !com_ignoreinlinecomment )
+	{
+		if (c=='/' && data[1] == '/')
+		{
+			while (*data && *data != '\n')
+				data++;
+			goto skipwhite;
+		}
+	}
+	
+	if ( c == '/' && data[1] == '*' )
+	{
+		while (data[0] && data[1] && !( data[0] == '*' && data[1] == '/' ) )
+		{
+			if ( *data == '\n' )
+			{
+				linesprocessed++;
+			}
+			data++;
+		}
+
+		if ( data[0] == '*' && data[1] == '/' )
+		{
+			data+=2;
+		}
+		goto skipwhite;
+	}
+
+// handle quoted strings specially
+	bool isLstring = data[0] == 'L' && (data[1] == '\"' );
+	if ( isLstring )
+	{
+		com_token[len++] = (char)c;
+		return data+1;
+	}
+
+	if ( c == '\"' )
+	{
+		data++;
+		bool bEscapeSequence = false;
+		while (1)
+		{
+			Assert( len < 1024 );
+			if ( len >= 1024 )
+			{
+				com_token[ len -1 ] = 0;
+				return data;
+			}
+
+			c = *data++;
+			if ( (c=='\"' && !bEscapeSequence) || !c  && len < sizeof( com_token ) - 1 )
+			{
+				com_token[len] = 0;
+				return data;
+			}
+			bEscapeSequence = ( c == '\\' );
+			com_token[len] = (char)c;
+			len++;
+		}
+	}
+
+// parse single characters
+	if ( CC_IsBreakChar( (char)c ) )
+	{
+		Assert( len < 1024 );
+
+		com_token[len] = (char)c;
+		len++;
+		com_token[len] = 0;
+		return data+1;
+	}
+
+// parse a regular word
+	do
+	{
+		Assert( len < 1024 );
+
+		com_token[len] = (char)c;
+		data++;
+		len++;
+		c = *data;
+
+		if ( CC_IsBreakChar( (char)c ) )
+			break;
+	} while (c>32 && len < sizeof( com_token ) - 1);
+	
+	com_token[len] = 0;
+	return data;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *name - 
+//			*len - 
+// Output : unsigned char
+//-----------------------------------------------------------------------------
+unsigned char *COM_LoadFile( const char *name, int *len)
+{
+	FILE *fp;
+	fp = fopen( name, "rb" );
+	if ( !fp )
+	{
+		*len = 0;
+		return NULL;
+	}
+
+	fseek( fp, 0, SEEK_END );
+	*len = ftell( fp );
+	fseek( fp, 0, SEEK_SET );
+	
+	unsigned char *buffer = new unsigned char[ *len + 1 ];
+	fread( buffer, *len, 1, fp );
+	fclose( fp );
+	buffer[ *len ] = 0;
+
+	return buffer;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *buffer - 
+//-----------------------------------------------------------------------------
+void COM_FreeFile( unsigned char *buffer )
+{
+	delete[] buffer;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *dir - 
+// Output : Returns true on success, false on failure.
+//-----------------------------------------------------------------------------
+bool COM_DirectoryExists( const char *dir )
+{
+	if ( !_access( dir, 0 ) )
+		return true;
+
+	return false;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *input - 
+// Output : char
+//-----------------------------------------------------------------------------
+char *CC_ParseUntilEndOfLine( char *input )
+{
+	while (*input && *input != '\n')
+		input++;
+
+	return input;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *input - 
+//			*ch - 
+//			*breakchar - 
+// Output : char
+//-----------------------------------------------------------------------------
+char *CC_RawParseChar( char *input, const char *ch, char *breakchar )
+{
+	bool done = false;
+	int listlen = strlen( ch );
+
+	do
+	{
+		input = CC_ParseToken( input );
+		if ( strlen( com_token ) <= 0 )
+			break;
+
+		if ( strlen( com_token ) == 1 )
+		{
+			for ( int i = 0; i < listlen; i++ )
+			{
+				if ( com_token[ 0 ] == ch[ i ] )
+				{
+					*breakchar = ch [ i ];
+					done = true;
+					break;
+				}
+			}
+		}
+	} while ( !done );
+
+	return input;
+}
+
+//-----------------------------------------------------------------------------
+// Purpose: 
+// Input  : *input - 
+//			*pairing - 
+// Output : char
+//-----------------------------------------------------------------------------
+char *CC_DiscardUntilMatchingCharIncludingNesting( char *input, const char *pairing )
+{
+	int nestcount = 1;
+
+	do
+	{
+		input = CC_ParseToken( input );
+		if ( strlen( com_token ) <= 0 )
+			break;
+
+		if ( strlen( com_token ) == 1 )
+		{
+			if ( com_token[ 0 ] == pairing[ 0 ] )
+			{
+				nestcount++;
+			}
+			else if ( com_token[ 0 ] == pairing[ 1 ] )
+			{
+				nestcount--;
+			}
+		}
+	} while ( nestcount != 0 );
+
+	return input;
+}