d4708
/
source-engine
mirror of https://github.com/nillerusr/source-engine.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
Modified source engine (2017) developed by valve and leaked in 2020. Not for commercial purporses
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
494 Commits
25 Branches
6 Tags
221 MiB
 
 
 
 
 
 
Branch: mathlib-optimize
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'mathlib-optimize'
${ noResults }
source-engine/common/GameUI/scriptobject.cpp

1154 lines
24 KiB
Raw Permalink Blame History

//========= Copyright Valve Corporation, All rights reserved. ============//
//
// Purpose:
//
// $NoKeywords: $
//
//===========================================================================//
// CScriptObject and CDescription class definitions
//
#include "scriptobject.h"
#include <time.h>
#include <stdio.h>
#include <stdlib.h>
#include <vgui_controls/Label.h>
#include "filesystem.h"
#include "tier1/convar.h"
#include "cdll_int.h"
#include "vcrmode.h"
// memdbgon must be the last include file in a .cpp file!!!
#include "tier0/memdbgon.h"
using namespace vgui;
static char token[ 1024 ];
extern IVEngineClient *engine;
void StripFloatTrailingZeros(char *str)
{
// scan for a '.'
char *period = strchr(str, '.');
if (!period)
return;
// start at the end and scan back to the period
char *end = 0;
for ( end = str + strlen(str) - 1; end > period; --end )
{
if (*end == '0')
{
*end = '\0';
}
else
{
// we've hit a real value, stop truncating
break;
}
}
// if we've made it up to the period, kill that to
if ( *end == '.' )
{
*end = '\0';
}
}
/////////////////////
objtypedesc_t objtypes[] =
{
{ O_BOOL , "BOOL" },
{ O_NUMBER, "NUMBER" },
{ O_LIST , "LIST" },
{ O_STRING, "STRING" },
{ O_OBSOLETE , "OBSOLETE" },
{ O_SLIDER , "SLIDER" },
{ O_CATEGORY, "CATEGORY" },
};
mpcontrol_t::mpcontrol_t( Panel *parent, char const *panelName )
: Panel( parent, panelName )
{
type = O_BADTYPE;
pControl = NULL;
pPrompt = NULL;
pScrObj = NULL;
next = NULL;
SetPaintBackgroundEnabled( false );
}
void mpcontrol_t::OnSizeChanged( int wide, int tall )
{
int inset = 4;
if ( pPrompt )
{
int w = wide / 2;
if ( pControl )
{
pControl->SetBounds( w + 20, inset, w - 20, tall - 2 * inset );
}
pPrompt->SetBounds( 0, inset, w + 20, tall - 2 * inset );
}
else
{
if ( pControl )
{
pControl->SetBounds( 0, inset, wide, tall - 2 * inset );
}
}
}
CScriptListItem::CScriptListItem()
{
pNext = NULL;
memset( szItemText, 0, 128 );
memset( szValue, 0, 256 );
}
CScriptListItem::CScriptListItem( char const *strItem, char const *strValue )
{
pNext = NULL;
Q_strncpy( szItemText, strItem, sizeof( szItemText ) );
Q_strncpy( szValue , strValue, sizeof( szValue ) );
}
CScriptObject::CScriptObject( void )
{
type = O_BOOL;
bSetInfo = false; // Prepend "Setinfo" to keyvalue pair in config?
pNext = NULL;
pListItems = NULL;
tooltip[0] = '\0';
}
CScriptObject::~CScriptObject()
{
RemoveAndDeleteAllItems();
}
void CScriptObject::RemoveAndDeleteAllItems( void )
{
CScriptListItem *p, *n;
p = pListItems;
while ( p )
{
n = p->pNext;
delete p;
p = n;
}
pListItems = NULL;
}
void CScriptObject::SetCurValue( char const *strValue )
{
Q_strncpy( curValue, strValue, sizeof( curValue ) );
fcurValue = (float)atof( curValue );
if ( type == O_NUMBER || type == O_BOOL || type == O_SLIDER )
{
StripFloatTrailingZeros( curValue );
}
}
void CScriptObject::AddItem( CScriptListItem *pItem )
{
// Link it into the end of the list;
CScriptListItem *p;
p = pListItems;
if ( !p )
{
pListItems = pItem;
pItem->pNext = NULL;
return;
}
while ( p )
{
if ( !p->pNext )
{
p->pNext = pItem;
pItem->pNext = NULL;
return;
}
p = p->pNext;
}
}
/*
===================
UTIL_StripInvalidCharacters
Removes any possible formatting codes and double quote characters from the input string
===================
*/
void UTIL_StripInvalidCharacters( char *pszInput, int maxlen )
{
char szOutput[4096];
char *pIn, *pOut;
pIn = pszInput;
pOut = szOutput;
*pOut = '\0';
while ( *pIn )
{
if ( ( *pIn != '"' ) &&
( *pIn != '%' ) )
{
*pOut++ = *pIn;
}
pIn++;
}
*pOut = '\0';
// Copy back over, in place
Q_strncpy( pszInput, szOutput, maxlen );
}
void FixupString( char *inString, int maxlen )
{
char szBuffer[ 4096 ];
Q_strncpy( szBuffer, inString, sizeof( szBuffer ) );
UTIL_StripInvalidCharacters( szBuffer, sizeof( szBuffer ) );
Q_strncpy( inString, szBuffer, maxlen );
}
/*
===================
CleanFloat
Removes any ".000" from the end of floats
===================
*/
char * CleanFloat( float val )
{
static int curstring = 0;
static char string[2][32];
curstring = ( curstring + 1 ) % 2;
Q_snprintf( string[curstring], sizeof( string[curstring] ), "%f", val );
char * str = string[curstring];
char * tmp = str;
if ( !str || !*str || !strchr( str, '.' ) )
return str;
while ( *tmp )
++tmp;
--tmp;
while ( *tmp == '0' && tmp > str )
{
*tmp = 0;
--tmp;
}
if ( *tmp == '.' )
{
*tmp = 0;
}
return str;
}
void CScriptObject::WriteToScriptFile( FileHandle_t fp )
{
if ( type == O_OBSOLETE )
return;
FixupString( cvarname, sizeof( cvarname ) );
g_pFullFileSystem->FPrintf( fp, "\t\"%s\"\r\n", cvarname );
g_pFullFileSystem->FPrintf( fp, "\t{\r\n" );
CScriptListItem *pItem;
FixupString( prompt, sizeof( prompt ) );
FixupString( tooltip, sizeof( tooltip ) );
switch ( type )
{
case O_BOOL:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{ BOOL }\r\n" );
g_pFullFileSystem->FPrintf( fp, "\t\t{ \"%i\" }\r\n", (int)fcurValue ? 1 : 0 );
break;
case O_NUMBER:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{ NUMBER %s %s }\r\n", CleanFloat(fMin), CleanFloat(fMax) );
g_pFullFileSystem->FPrintf( fp, "\t\t{ \"%s\" }\r\n", CleanFloat(fcurValue) );
break;
case O_STRING:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{ STRING }\r\n" );
FixupString( curValue, sizeof( curValue ) );
g_pFullFileSystem->FPrintf( fp, "\t\t{ \"%s\" }\r\n", curValue );
break;
case O_LIST:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{\r\n\t\t\tLIST\r\n" );
pItem = pListItems;
while ( pItem )
{
UTIL_StripInvalidCharacters( pItem->szItemText, sizeof( pItem->szItemText ) );
UTIL_StripInvalidCharacters( pItem->szValue, sizeof( pItem->szValue ) );
g_pFullFileSystem->FPrintf( fp, "\t\t\t\"%s\" \"%s\"\r\n",
pItem->szItemText, pItem->szValue );
pItem = pItem->pNext;
}
g_pFullFileSystem->FPrintf( fp, "\t\t}\r\n");
g_pFullFileSystem->FPrintf( fp, "\t\t{ \"%s\" }\r\n", CleanFloat(fcurValue) );
break;
case O_SLIDER:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{ SLIDER %s %s }\r\n", CleanFloat(fMin), CleanFloat(fMax) );
g_pFullFileSystem->FPrintf( fp, "\t\t{ \"%s\" }\r\n", CleanFloat(fcurValue) );
break;
case O_CATEGORY:
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", prompt );
if ( tooltip && tooltip[0] )
{
g_pFullFileSystem->FPrintf( fp, "\t\t\"%s\"\r\n", tooltip );
}
g_pFullFileSystem->FPrintf( fp, "\t\t{ CATEGORY }\r\n" );
break;
}
if ( bSetInfo )
g_pFullFileSystem->FPrintf( fp, "\t\tSetInfo\r\n" );
g_pFullFileSystem->FPrintf( fp, "\t}\r\n\r\n" );
}
void CScriptObject::WriteToFile( FileHandle_t fp )
{
if ( type == O_OBSOLETE || type == O_CATEGORY )
return;
FixupString( cvarname, sizeof( cvarname ) );
g_pFullFileSystem->FPrintf( fp, "\"%s\"\t\t", cvarname );
CScriptListItem *pItem;
float fVal;
switch ( type )
{
case O_BOOL:
g_pFullFileSystem->FPrintf( fp, "\"%s\"\r\n", fcurValue != 0.0 ? "1" : "0" );
break;
case O_NUMBER:
case O_SLIDER:
fVal = fcurValue;
if ( fMin != -1.0 )
fVal = max( fVal, fMin );
if ( fMax != -1.0 )
fVal = min( fVal, fMax );
g_pFullFileSystem->FPrintf( fp, "\"%f\"\r\n", fVal );
break;
case O_STRING:
FixupString( curValue, sizeof( curValue ) );
g_pFullFileSystem->FPrintf( fp, "\"%s\"\r\n", curValue );
break;
case O_LIST:
pItem = pListItems;
while ( pItem )
{
if ( !Q_stricmp( pItem->szValue, curValue ) )
break;
pItem = pItem->pNext;
}
if ( pItem )
{
UTIL_StripInvalidCharacters( pItem->szValue, sizeof( pItem->szValue ) );
g_pFullFileSystem->FPrintf( fp, "\"%s\"\r\n", pItem->szValue );
}
else //Couln't find index
{
g_pFullFileSystem->FPrintf( fp, "\"0\"\r\n" );
}
break;
}
}
void CScriptObject::WriteToConfig( void )
{
if ( type == O_OBSOLETE || type == O_CATEGORY )
return;
char *pszKey;
char szValue[2048];
pszKey = ( char * )cvarname;
CScriptListItem *pItem;
float fVal;
switch ( type )
{
case O_BOOL:
Q_snprintf( szValue, sizeof( szValue ), "%s", fcurValue != 0.0 ? "1" : "0" );
break;
case O_NUMBER:
case O_SLIDER:
fVal = fcurValue;
if ( fMin != -1.0 )
fVal = max( fVal, fMin );
if ( fMax != -1.0 )
fVal = min( fVal, fMax );
Q_snprintf( szValue, sizeof( szValue ), "%f", fVal );
break;
case O_STRING:
Q_snprintf( szValue, sizeof( szValue ), "\"%s\"", (char *)curValue );
UTIL_StripInvalidCharacters( szValue, sizeof( szValue ) );
break;
case O_LIST:
pItem = pListItems;
while ( pItem )
{
if ( !Q_stricmp( pItem->szValue, curValue ) )
break;
pItem = pItem->pNext;
}
if ( pItem )
{
Q_snprintf( szValue, sizeof( szValue ), "%s", pItem->szValue );
UTIL_StripInvalidCharacters( szValue, sizeof( szValue ) );
}
else //Couldn't find index
{
Q_strncpy( szValue, "0", sizeof( szValue ) );
}
break;
}
char command[ 256 ];
if ( bSetInfo )
{
Q_snprintf( command, sizeof(command), "setinfo %s \"%s\"\n", pszKey, szValue );
}
else
{
Q_snprintf( command, sizeof(command), "%s \"%s\"\n", pszKey, szValue );
}
engine->ClientCmd_Unrestricted( command );
// CFG_SetKey( g_szCurrentConfigFile, pszKey, szValue, bSetInfo );
}
objtype_t CScriptObject::GetType( char *pszType )
{
int i;
int nTypes;
nTypes = sizeof( objtypes ) / sizeof( objtypedesc_t);
for ( i = 0; i < nTypes; i++ )
{
if ( !stricmp( objtypes[i].szDescription, pszType ) )
return objtypes[i].type;
}
return O_BADTYPE;
}
bool CScriptObject::ReadFromBuffer( const char **pBuffer, bool isNewObject )
{
// Get the first token.
// The cvar we are setting
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( isNewObject )
{
Q_strncpy( cvarname, token, sizeof( cvarname ) );
}
// Parse the {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "{" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
// Parse the Prompt
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( isNewObject )
{
Q_strncpy( prompt, token, sizeof( prompt ) );
}
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
// If it's not a {, consider it the optional tooltip
if ( strcmp( token, "{" ) )
{
Q_strncpy( tooltip, token, sizeof( tooltip ) );
// Parse the next {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
}
if ( strcmp( token, "{" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
// Now parse the type:
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
objtype_t newType = GetType( token );
if ( isNewObject )
{
type = newType;
}
if ( newType == O_BADTYPE )
{
Msg( "Type '%s' unknown", token );
return false;
}
// If it's a category, we're done.
if ( newType == O_CATEGORY )
{
// Parse the }
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
// Parse the final }
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
return true;
}
switch ( newType )
{
case O_OBSOLETE:
case O_BOOL:
// Parse the next {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
break;
case O_NUMBER:
case O_SLIDER:
// Parse the Min
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( isNewObject )
{
fMin = (float)atof( token );
}
// Parse the Min
*pBuffer = engine->ParseFile( *pBuffer, token , sizeof( token ));
if ( strlen( token ) <= 0 )
return false;
if ( isNewObject )
{
fMax = (float)atof( token );
}
// Parse the next {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
break;
case O_STRING:
// Parse the next {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
break;
case O_LIST:
// Parse items until we get the }
while ( 1 )
{
// Parse the next {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
// Done?
if ( !strcmp( token, "}" ) )
break;
//
// Add the item to a list somewhere
// AddItem( token )
char strItem[ 128 ];
char strValue[128];
Q_strncpy( strItem, token, sizeof( strItem ) );
// Parse the value
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
Q_strncpy( strValue, token, sizeof( strValue ) );
if ( isNewObject )
{
CScriptListItem *pItem;
pItem = new CScriptListItem( strItem, strValue );
AddItem( pItem );
}
}
break;
}
//
// Now read in the default value
// Parse the {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "{" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
// Parse the default
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
//if ( strlen( token ) <= 0 )
// return false;
// Set the values
Q_strncpy( defValue, token, sizeof( defValue ) );
fdefValue = (float)atof( token );
if (type == O_NUMBER || type == O_SLIDER)
{
StripFloatTrailingZeros( defValue );
}
SetCurValue( defValue );
// Parse the }
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
// Parse the final }
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( !stricmp( token, "SetInfo" ) )
{
bSetInfo = true;
// Parse the final }
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
}
if ( strcmp( token, "}" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
return true;
}
/////////////////////////
CDescription::CDescription( void )
{
pObjList = NULL;
}
CDescription::~CDescription()
{
CScriptObject *p, *n;
p = pObjList;
while ( p )
{
n = p->pNext;
p->pNext = NULL;
p->MarkForDeletion();
//delete p;
p = n;
}
pObjList = NULL;
if ( m_pszHintText )
free( m_pszHintText );
if ( m_pszDescriptionType )
free( m_pszDescriptionType );
}
CScriptObject * CDescription::FindObject( const char *pszObjectName )
{
if ( !pszObjectName )
return NULL;
CScriptObject *p;
p = pObjList;
while ( p )
{
if ( !stricmp( pszObjectName, p->cvarname ) )
return p;
p = p->pNext;
}
return NULL;
}
void CDescription::AddObject( CScriptObject *pObj )
{
CScriptObject *p;
p = pObjList;
if ( !p )
{
pObjList = pObj;
pObj->pNext = NULL;
return;
}
while ( p )
{
if ( !p->pNext )
{
p->pNext = pObj;
pObj->pNext = NULL;
return;
}
p = p->pNext;
}
}
bool CDescription::ReadFromBuffer( const char **pBuffer, bool bAllowNewObject )
{
// Get the first token.
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
// Read VERSION #
if ( stricmp ( token, "VERSION" ) )
{
Msg( "Expecting 'VERSION', got '%s'", token );
return false;
}
// Parse in the version #
// Get the first token.
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
{
Msg( "Expecting version #" );
return false;
}
float fVer;
fVer = (float)atof( token );
if ( fVer != SCRIPT_VERSION )
{
Msg( "Version mismatch, expecting %f, got %f", SCRIPT_VERSION, fVer );
return false;
}
// Get the "DESCRIPTION"
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
// Read DESCRIPTION
if ( stricmp ( token, "DESCRIPTION" ) )
{
Msg( "Expecting 'DESCRIPTION', got '%s'", token );
return false;
}
// Parse in the description type
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
{
Msg( "Expecting '%s'", m_pszDescriptionType );
return false;
}
if ( stricmp ( token, m_pszDescriptionType ) )
{
Msg( "Expecting %s, got %s", m_pszDescriptionType, token );
return false;
}
// Parse the {
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
if ( strcmp( token, "{" ) )
{
Msg( "Expecting '{', got '%s'", token );
return false;
}
const char *pStart;
CScriptObject *pObj;
// Now read in the objects and link them in
while ( 1 )
{
pStart = *pBuffer;
// Get the first token.
*pBuffer = engine->ParseFile( *pBuffer, token, sizeof( token ) );
if ( strlen( token ) <= 0 )
return false;
// Read "cvar name" or } when done
if ( !stricmp ( token, "}" ) )
break;
// Unget the token
*pBuffer = pStart;
// Create a new object
bool mustAdd = bAllowNewObject;
pObj = FindObject( token );
if ( pObj )
{
pObj->ReadFromBuffer( &pStart, false );
mustAdd = false; // already in list
}
else
{
pObj = new CScriptObject();
if ( !pObj )
{
Msg( "Couldn't create script object" );
return false;
}
if ( !pObj->ReadFromBuffer( &pStart, true ) )
{
delete pObj;
return false;
}
// throw away the object if we're not adding it.
if ( !mustAdd )
{
delete pObj;
}
}
*pBuffer = pStart;
// Add to list
// Fixme, move to end of list first
if ( mustAdd )
{
AddObject( pObj );
}
}
return true;
}
bool CDescription::InitFromFile( const char *pszFileName, bool bAllowNewObject /*= true*/ )
{
// Load file into memory
FileHandle_t file = g_pFullFileSystem->Open( pszFileName, "rb" );
if ( !file )
return false;
int len =g_pFullFileSystem->Size( file );
// read the file
byte *buffer = new unsigned char[ len ];
Assert( buffer );
g_pFullFileSystem->Read( buffer, len, file );
g_pFullFileSystem->Close( file );
const char *pBuffer = (const char*)buffer;
ReadFromBuffer( &pBuffer, bAllowNewObject );
delete[] buffer;
return true;
}
void CDescription::WriteToFile( FileHandle_t fp )
{
CScriptObject *pObj;
WriteFileHeader( fp );
pObj = pObjList;
while ( pObj )
{
pObj->WriteToFile( fp );
pObj = pObj->pNext;
}
}
void CDescription::WriteToConfig( void )
{
CScriptObject *pObj;
pObj = pObjList;
while ( pObj )
{
pObj->WriteToConfig();
pObj = pObj->pNext;
}
}
void CDescription::WriteToScriptFile( FileHandle_t fp )
{
CScriptObject *pObj;
WriteScriptHeader( fp );
pObj = pObjList;
while ( pObj )
{
pObj->WriteToScriptFile( fp );
pObj = pObj->pNext;
}
g_pFullFileSystem->FPrintf( fp, "}\r\n" );
}
void CDescription::TransferCurrentValues( const char *pszConfigFile )
{
char szValue[ 1024 ];
CScriptObject *pObj;
pObj = pObjList;
while ( pObj )
{
/*
TODO: if/when prefixed keys are implemented
const char *value;
if ( pObj->bSetInfo )
{
value = engine->LocalPlayerInfo_ValueForKey( pObj->cvarname ); // use LocalPlayerInfo because PlayerInfo strips keys prefixed with "_"
}
else
{
value = engine->pfnGetCvarString( pObj->cvarname );
}
*/
ConVarRef var( pObj->cvarname, true );
if ( !var.IsValid() )
{
if ( pObj->type != O_CATEGORY )
{
DevMsg( "Could not find '%s'\n", pObj->cvarname );
}
pObj = pObj->pNext;
continue;
}
const char *value = var.GetString();
if ( value && value[ 0 ] )
//if ( CFG_GetValue( pszConfigFile, pObj->cvarname, szValue ) )
{
Q_strncpy( szValue, value, sizeof( szValue ) );
// Fill in better default value
//
Q_strncpy( pObj->curValue, szValue, sizeof( pObj->curValue ) );
pObj->fcurValue = (float)atof( szValue );
Q_strncpy( pObj->defValue, szValue, sizeof( pObj->defValue ) );
pObj->fdefValue = (float)atof( szValue );
}
pObj = pObj->pNext;
}
}
void CDescription::setDescription( const char *pszDesc )
{
m_pszDescriptionType = strdup( pszDesc );
}
void CDescription::setHint( const char *pszHint )
{
m_pszHintText = strdup( pszHint );
}
//-----------------------------------------------------------------------------
// Purpose: Constructor, load/save client settings object
//-----------------------------------------------------------------------------
CInfoDescription::CInfoDescription( void )
: CDescription( )
{
setHint( "// NOTE: THIS FILE IS AUTOMATICALLY REGENERATED, \r\n\
//DO NOT EDIT THIS HEADER, YOUR COMMENTS WILL BE LOST IF YOU DO\r\n\
// User options script\r\n\
//\r\n\
// Format:\r\n\
// Version [float]\r\n\
// Options description followed by \r\n\
// Options defaults\r\n\
//\r\n\
// Option description syntax:\r\n\
//\r\n\
// \"cvar\" { \"Prompt\" { type [ type info ] } { default } }\r\n\
//\r\n\
// type = \r\n\
// BOOL (a yes/no toggle)\r\n\
// STRING\r\n\
// NUMBER\r\n\
// LIST\r\n\
//\r\n\
// type info:\r\n\
// BOOL no type info\r\n\
// NUMBER min max range, use -1 -1 for no limits\r\n\
// STRING no type info\r\n\
// LIST "" delimited list of options value pairs\r\n\
//\r\n\
//\r\n\
// default depends on type\r\n\
// BOOL is \"0\" or \"1\"\r\n\
// NUMBER is \"value\"\r\n\
// STRING is \"value\"\r\n\
// LIST is \"index\", where index \"0\" is the first element of the list\r\n\r\n\r\n" );
setDescription( "INFO_OPTIONS" );
}
//-----------------------------------------------------------------------------
// Purpose:
//-----------------------------------------------------------------------------
void CInfoDescription::WriteScriptHeader( FileHandle_t fp )
{
char am_pm[] = "AM";
tm newtime;
VCRHook_LocalTime( &newtime );
g_pFullFileSystem->FPrintf( fp, (char *)getHint() );
// Write out the comment and Cvar Info:
g_pFullFileSystem->FPrintf( fp, "// Half-Life User Info Configuration Layout Script (stores last settings chosen, too)\r\n" );
g_pFullFileSystem->FPrintf( fp, "// File generated: %.19s %s\r\n", asctime( &newtime ), am_pm );
g_pFullFileSystem->FPrintf( fp, "//\r\n//\r\n// Cvar\t-\tSetting\r\n\r\n" );
g_pFullFileSystem->FPrintf( fp, "VERSION %.1f\r\n\r\n", SCRIPT_VERSION );
g_pFullFileSystem->FPrintf( fp, "DESCRIPTION INFO_OPTIONS\r\n{\r\n" );
}
//-----------------------------------------------------------------------------
// Purpose:
//-----------------------------------------------------------------------------
void CInfoDescription::WriteFileHeader( FileHandle_t fp )
{
char am_pm[] = "AM";
tm newtime;
VCRHook_LocalTime( &newtime );
g_pFullFileSystem->FPrintf( fp, "// Half-Life User Info Configuration Settings\r\n" );
g_pFullFileSystem->FPrintf( fp, "// DO NOT EDIT, GENERATED BY HALF-LIFE\r\n" );
g_pFullFileSystem->FPrintf( fp, "// File generated: %.19s %s\r\n", asctime( &newtime ), am_pm );
g_pFullFileSystem->FPrintf( fp, "//\r\n//\r\n// Cvar\t-\tSetting\r\n\r\n" );
}
//-----------------------------------------------------------------------------