src/ldconfig.cpp

/*
 *  LDForge: LDraw parts authoring CAD
 *  Copyright (C) 2013 Santeri Piippo
 *
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "file.h"
#include "ldconfig.h"
#include "gui.h"
#include "misc.h"
#include "colors.h"

// =============================================================================
// Helper function for parseLDConfig
static bool parseLDConfigTag( LDConfigParser& pars, char const* tag, str& val )
{
	short pos;

	// Try find the token and get its position
	if( !pars.findToken( pos, tag, 1 ))
		return false;

	// Get the token after it and store it into val
	return pars.getToken( val, pos + 1 );
}

// =============================================================================
void parseLDConfig()
{
	File* f = openLDrawFile( "LDConfig.ldr", false );
	
	if( !f )
	{
		critical( fmt( QObject::tr( "Unable to open LDConfig.ldr for parsing! (%1)" ),
			strerror( errno )) );
		delete f;
		return;
	}
	
	// Read in the lines
	for( str line : *f )
	{
		if( line.length() == 0 || line[0] != '0' )
			continue; // empty or illogical
		
		line.remove( '\r' );
		line.remove( '\n' );
		
		// Parse the line
		LDConfigParser pars( line, ' ' );
		
		short code = 0, alpha = 255;
		str name, facename, edgename, valuestr;
		
		// Check 0 !COLOUR, parse the name
		if( !pars.tokenCompare( 0, "0" ) || !pars.tokenCompare( 1, "!COLOUR" ) || !pars.getToken( name, 2 ))
			continue;
		
		// Replace underscores in the name with spaces for readability
		name.replace( "_", " " );
		
		// Get the CODE tag
		if( !parseLDConfigTag( pars, "CODE", valuestr ))
			continue;
		
		if( !isNumber( valuestr ))
			continue; // not a number
		
		// Ensure that the code is within [0 - 511]
		bool ok;
		code = valuestr.toShort( &ok );
		
		if( !ok || code < 0 || code >= 512 )
			continue;
		
		// VALUE and EDGE tags
		if( !parseLDConfigTag( pars, "VALUE", facename ) || !parseLDConfigTag( pars, "EDGE", edgename ))
			continue;
		
		// Ensure that our colors are correct
		QColor faceColor( facename ),
			edgeColor( edgename );
		
		if( !faceColor.isValid() || !edgeColor.isValid() )
			continue;
		
		// Parse alpha if given.
		if( parseLDConfigTag( pars, "ALPHA", valuestr ))
			alpha = clamp<short> ( valuestr.toShort(), 0, 255 );
		
		LDColor* col = new LDColor;
		col->name = name;
		col->faceColor = faceColor;
		col->edgeColor = edgeColor;
		col->hexcode = facename;
		col->faceColor.setAlpha( alpha );
		col->index = code;
		setColor( code, col );
	}
	
	delete f;
}

// =============================================================================
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
// =============================================================================
LDConfigParser::LDConfigParser (str inText, char sep) {
	m_tokens = container_cast<QStringList, List<str>> (inText.split (sep, QString::SkipEmptyParts));
	m_pos = -1;
}

// -----------------------------------------------------------------------------
bool LDConfigParser::atBeginning () {
	return (m_pos == -1);
}

// -----------------------------------------------------------------------------
bool LDConfigParser::atEnd () {
	return (m_pos == (signed) m_tokens.size () - 1);
}

// -----------------------------------------------------------------------------
bool LDConfigParser::getToken (str& val, const ushort pos) {
	if (pos >= m_tokens.size())
		return false;
	
	val = m_tokens[pos];
	return true;
}

// -----------------------------------------------------------------------------
bool LDConfigParser::next (str& val) {
	return getToken (val, ++m_pos);
}

// -----------------------------------------------------------------------------
bool LDConfigParser::peekNext (str& val) {
	return getToken (val, m_pos + 1);
}

// -----------------------------------------------------------------------------
bool LDConfigParser::findToken (short& result, char const* needle, short args) {
	for (ushort i = 0; i < (m_tokens.size () - args); ++i) {
		if (m_tokens[i] == needle) {
			result = i;
			return true;
		}
	}
	
	return false;
}

// -----------------------------------------------------------------------------
void LDConfigParser::rewind () {
	m_pos = -1;
}

// -----------------------------------------------------------------------------
void LDConfigParser::seek (short amount, bool rel) {
	m_pos = (rel ? m_pos : 0) + amount;
}

// -----------------------------------------------------------------------------
size_t LDConfigParser::size () {
	return m_tokens.size();
}

// -----------------------------------------------------------------------------
bool LDConfigParser::tokenCompare (short inPos, const char* sOther) {
	str tok;
	if (!getToken (tok, inPos))
		return false;
	
	return (tok == sOther);
}